$SAVE NOLIST rq$a$get$extension$data: PROCEDURE( connection$t, resp$mbox, except$ptr ) EXTERNAL; DECLARE connection$t TOKEN, resp$mbox TOKEN, except$ptr POINTER; END rq$a$get$extension$data; $RESTORE