$SAVE NOLIST

rq$enable:  PROCEDURE( level,
                       except$ptr ) EXTERNAL;

DECLARE level         WORD,
        except$ptr    POINTER;

END rq$enable;

$RESTORE