$SAVE NOLIST rq$send$control: PROCEDURE( except$ptr ) EXTERNAL; DECLARE except$ptr POINTER; END rq$send$control; $RESTORE