DYNAMIC RESULT SETS 1
LANGUAGE SQL
 BEGIN


	            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.ProgramID IN (SELECT * FROM SESSION.numeric_param_temp)
						     ORDER BY prgAlsxyz.AliasName,
						              pth.PathStr;

					
					
				        OPEN crs;
				
                END;
 		
END	
