DYNAMIC RESULT SETS 1
LANGUAGE SQL
 BEGIN

					     DECLARE crs CURSOR WITH RETURN FOR
						 SELECT DISTINCT
					            DataSetName,
					            DataSetID
					     FROM JCLPhysicalDataSet
					     WHERE IsTemp <> 1
					          AND IsInstream <> 1
					          AND DataSetName NOT LIKE '&%'
					     ORDER BY DataSetName;		
						
						 OPEN crs;
				
END	
