DYNAMIC RESULT SETS 1
LANGUAGE SQL
 BEGIN



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


				         OPEN crs;
				
END	
