DYNAMIC RESULT SETS 1
LANGUAGE SQL
 BEGIN

            DECLARE crs CURSOR WITH RETURN FOR
		    SELECT	 cro.ProgramId,
			        prgAlsxyz.AliasName AS ProgramName,
		            pth.PathStr,
		            os.StartRow,
		            CASE
		                WHEN os.PathID = occ.PathID
		                THEN 0
		                ELSE -1
		            END AS IsCopy
		     FROM Paths pth
		          INNER JOIN OccurrencesStmt os ON pth.PathID = os.PathID
				  INNER JOIN CodingRuleOccur cro ON os.OccurID = cro.RelatedStatementOccurId
				  INNER JOIN Programs prg ON prg.ProgramID = cro.ProgramId
		          INNER JOIN Occurrences occ ON prg.OccurID = occ.OccurID
		     	  INNER JOIN ProgramAliases prgAlsxyz ON prg.ProgramId = prgAlsxyz.ProgramID
						AND prgAlsxyz.AliasType = 0
			 WHERE cro.CodingRuleId = 78
		           AND prg.ProgramTypeID = 1
		     ORDER BY prgAlsxyz.AliasName,
		              pth.PathStr,
		              os.StartRow;

            OPEN crs;

 END	
