$SAVE NOLIST

rq$set$default$user:  PROCEDURE( job$t,
                                 user$t,
                                 except$ptr ) EXTERNAL;

DECLARE job$t      TOKEN,
        user$t     TOKEN,
        except$ptr POINTER;

END rq$set$default$user;

$RESTORE