DYNAMIC RESULT SETS 1
LANGUAGE SQL
 BEGIN

					     DECLARE crs CURSOR WITH RETURN FOR
					        SELECT DISTINCT mt.TransCode AS TransactionName
							FROM MFCICSList mfl
								   INNER JOIN MFCICSListVsGroup mflg ON mfl.ListID = mflg.ListID
								   INNER JOIN MFCICSGroup mg ON mflg.GroupID = mg.GroupID
								   INNER JOIN MFCICSGroupVsEntity mge ON mg.GroupID = mge.GroupID
								   INNER JOIN MFCICSGroupVsEntityLinks mgel ON mge.EntityID = mgel.EntityID
								   INNER JOIN MFCICSTransaction mt ON mgel.TransID = mt.TransID
								   INNER JOIN MFCICSProgram cp ON cp.ProgID = mt.ProgID AND mt.ProgID > 0
								   INNER JOIN ProgramAliases pa ON cp.ProgName = pa.AliasName and pa.AliasType = 0
							WHERE mge.EntityTypeID = 2
							ORDER BY 1;
											
						 OPEN crs;
				
END	
