DYNAMIC RESULT SETS 1
LANGUAGE SQL
 BEGIN


	            BEGIN
					    DECLARE crs CURSOR WITH RETURN FOR
						SELECT DISTINCT
					            af.FileId,
					            (CASE
					                 WHEN maf.FileName IS NOT NULL THEN maf.FileName
					                 ELSE CAST(af.FileNumber AS VARCHAR(16))
					             END) AS fName,
					            '' AS Definition_Source,
					            '' AS startRow,
					            (CASE
					                 WHEN mad.DBName IS NOT NULL THEN mad.DBName
					                 ELSE CAST(ad.DBNumber AS VARCHAR(16))
					             END) AS db
					     FROM AdabasFiles af
					          INNER JOIN AdabasDatabases ad ON ad.AdabasDBID = af.AdabasDBID
					          LEFT OUTER JOIN MFAdabasFiles maf ON maf.FileNumber = af.FileNumber
					          LEFT OUTER JOIN MFAdabasDB mad ON mad.DBNumber = ad.DBNumber
					     WHERE af.FileID IN (SELECT * FROM SESSION.numeric_param_temp)
					     ORDER BY fName, db;


				        OPEN crs;
				
                END;
END	
