DYNAMIC RESULT SETS 1
LANGUAGE SQL
ss: BEGIN

   
					     DECLARE crs CURSOR WITH RETURN FOR	      
						 SELECT	 prgAlsxyz.ProgramID,
					            prgAlsxyz.AliasName AS ProgramName,
					            pth.PathStr,
					            os.StartRow,
					            CASE
					                WHEN pth.PathID = occ.PathID
					                THEN 0
					                ELSE -1
					            END AS IsCopy
					     FROM Programs prg
						     INNER JOIN OccurrencesStmt os ON prg.ProgramID = os.ProgID
					          INNER JOIN Paths pth ON pth.PathID = os.PathID 
					          INNER JOIN Occurrences occ ON prg.OccurID = occ.OccurID
					    	  INNER JOIN ProgramAliases prgAlsxyz ON prg.ProgramId = prgAlsxyz.ProgramID
								AND prgAlsxyz.AliasType = 0
						 WHERE prg.ProgramTypeID = 1
					          AND os.StmtInfo = 2
					          AND os.StatementType <> 44
					          AND os.StartCol <> 12
					     ORDER BY prgAlsxyz.AliasName,
					              pth.PathStr,
					              os.StartRow;
					       

				         OPEN crs;
				           
END ss	



