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 = 35
							          AND prg.ProgramTypeID = 1
							     ORDER BY prgAlsxyz.AliasName,
							              pth.PathStr,
							              occ2.StartRow;
							

				             OPEN crs;
				
END	
