(
IN p_RootID INTEGER
)
DYNAMIC RESULT SETS 1
LANGUAGE SQL
ss: BEGIN
            
            DECLARE v_RootID INTEGER;
            SET v_RootID = p_RootID; 

	            BEGIN
					         DECLARE crs CURSOR WITH RETURN FOR
							 SELECT sppd.RootID,
						            sppd.FormNo OutputForm,
						            sppd.ProgramNo,
						            sppd.ProgramName,
						            sppd.ProgramID
						     FROM SPNS_ProgramDefinition sppd
						     WHERE sppd.RootID = v_RootID
						          AND sppd.FormNo IN (SELECT * FROM SESSION.numeric_param_temp) ;						     					    
						             
				             OPEN crs;
				
                END;
END ss	



