DYNAMIC RESULT SETS 1
LANGUAGE SQL
 BEGIN

					     DECLARE crs CURSOR WITH RETURN FOR	
					     SELECT	 prgAlsxyz.ProgramID,
					            prgAlsxyz.AliasName AS ProgramName,
								  pth.PathStr,
								  occ.StartRow,
								  v.IsCopy
						    FROM Variables v
							   INNER JOIN Occurrences occ ON v.OccurID = occ.OccurID
							   INNER JOIN Paths pth ON occ.PathID = pth.PathID
							   INNER JOIN Programs prg ON v.ProgIDReference = prg.ProgramID
						       INNER JOIN ProgramAliases prgAlsxyz ON prg.ProgramId = prgAlsxyz.ProgramID
								AND prgAlsxyz.AliasType = 0
							WHERE  v.VarID NOT IN
											 (
												SELECT FollowedByVarId
												FROM SourceComments
						 						WHERE FollowedByVarId IS NOT NULL
											  )
							   AND prg.ProgramTypeID = 1
							   AND v.iLevel = 1
						    ORDER BY prgAlsxyz.AliasName,
								  pth.PathStr,
								  occ.StartRow;
					
				         OPEN crs;
				
END	
