DYNAMIC RESULT SETS 1
LANGUAGE SQL
 BEGIN


	            BEGIN

					    DECLARE crs CURSOR WITH RETURN FOR	
						SELECT	 cro.ProgramId,
					            prgAlsxyz.AliasName AS ProgramName,
					            pth.PathStr,
					            occ1.StartRow,
					            CASE
					                WHEN pth.PathID = occ2.PathID
					                THEN 0
					                ELSE -1
					            END AS IsCopy
					     FROM Paths pth
					          INNER JOIN Occurrences occ1 ON pth.PathID = occ1.PathID
					          INNER JOIN Sections s ON occ1.OccurID = s.OccurID
					          INNER JOIN CodingRuleOccur cro ON s.SectionID = cro.RelatedSectionId
					          INNER JOIN Programs prg ON cro.ProgramId = prg.ProgramID
					          INNER JOIN Occurrences occ2 ON prg.OccurID = occ2.OccurID
					    	  INNER JOIN ProgramAliases prgAlsxyz ON prg.ProgramId = prgAlsxyz.ProgramID
								AND prgAlsxyz.AliasType = 0
						 WHERE cro.CodingRuleId = 32
					           AND cro.ProgramID IN (SELECT * FROM SESSION.numeric_param_temp)
					     ORDER BY prgAlsxyz.AliasName,
					              pth.PathStr,
					              occ1.StartRow;

                        OPEN crs;

                  END;
 END	
