$SAVE NOLIST

rq$logical$detach$device:  PROCEDURE( log$name,
                                      except$ptr ) EXTERNAL;

DECLARE log$name    POINTER,
        except$ptr  POINTER;

END rq$logical$detach$device;

$RESTORE