$SAVE NOLIST rq$get$pool$attrib: PROCEDURE( attrib$ptr, except$ptr ) EXTERNAL; DECLARE attrib$ptr POINTER, except$ptr POINTER; END rq$get$pool$attrib; $RESTORE