$SAVE NOLIST

rq$a$rename$file:  PROCEDURE( connection$t,
                              user$t,
                              prefix,
                              subpath,
                              resp$mbox,
                              except$ptr ) EXTERNAL;

DECLARE connection$t  TOKEN,
        user$t        TOKEN,
        prefix        TOKEN,
        subpath       POINTER,
        resp$mbox     TOKEN,
        except$ptr    POINTER;

END rq$a$rename$file;

$RESTORE