$SAVE NOLIST dq$seek: PROCEDURE( conn, mode, offset, except$ptr ) EXTERNAL; DECLARE conn TOKEN, mode BYTE, offset DWORD, except$ptr POINTER; END dq$seek; $RESTORE