$SAVE NOLIST

rq$delete$job:  PROCEDURE( job$t, 
                           except$ptr ) EXTERNAL;

DECLARE job$t       TOKEN,
        except$ptr  POINTER;

END rq$delete$job;

$RESTORE