DYNAMIC RESULT SETS 1
LANGUAGE SQL
ss: BEGIN

   
					        DECLARE crs CURSOR WITH RETURN FOR	      
						    SELECT	 prgAlsxyz.ProgramID,
					            prgAlsxyz.AliasName AS ProgramName,
						            pth.PathStr,
						            1 AS StartRow,
						            0 AS IsCopy
						     FROM Programs prg
						          INNER JOIN Occurrences occ ON prg.OccurID = occ.OccurID
						          INNER JOIN Paths pth ON occ.PathID = pth.PathID
						    	  INNER JOIN ProgramAliases prgAlsxyz ON prg.ProgramId = prgAlsxyz.ProgramID
									AND prgAlsxyz.AliasType = 0
						 WHERE prg.ProgramID NOT IN
						              (
						                  SELECT DISTINCT prg1.ProgramID
						                  FROM Programs prg1
						                       INNER JOIN OccurrencesStmt os ON prg1.ProgramID = os.ProgID
										  WHERE os.StatementType = 21
						              )
						            AND prg.ProgramTypeID = 1
						     ORDER BY prgAlsxyz.AliasName,
						              pth.PathStr;
				         
				             OPEN crs;
				           
END ss	



