DYNAMIC RESULT SETS 1
LANGUAGE SQL
ss: 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 ss	




