!INCLUDE
******************************************************************************
*
*       Define tokens for *vmadmsub File Fix rpc calls
*
*	Module	%M%	Version	%I% 	Date	%H%
*
*       (c) Copyright 1997 Ardent Software Inc. - All Rights Reserved
*       This is unpublished proprietary source code of Ardent Software Inc.
*       The copyright notice above does not evidence any actual or intended
*       publication of such source code.
*
*******************************************************************************
*
*       Maintenence log - insert most recent change descriptions at top
*
*       Date.... GTAR# WHO Description........................................
*       10/19/98 23768 DJD Module created
************************************************************************

      * Function Command numbers
      EQU FILEFIX.OPEN TO 1
      EQU FILEFIX.CLOSE TO 2
      EQU FILEFIX.SETUP TO 3
      EQU FILEFIX.SETUPLOGGING TO 4
      EQU FILEFIX.DIAGPHYSICALSTRUCT TO 5
      EQU FILEFIX.GETERRORS TO 6
      EQU FILEFIX.LOADUVHEADER TO 7
      EQU FILEFIX.UNLOADUVHEADER TO 8
      EQU FILEFIX.DIAGHEADER TO 9
      EQU FILEFIX.DIAGGROUPS TO 10
      EQU FILEFIX.DIAGDATA TO 11
      EQU FILEFIX.DIAGMISC TO 12
      EQU FILEFIX.GETFILEINFO TO 13
      EQU FILEFIX.SHUTDOWN TO 14
      EQU FILEFIX.FIXFILE TO 15

      * Service define
      EQU FILEFIX.SERVICE TO "uvfilefix"

      * Errors
      EQU FILEFIX.INVALID.FILETYPE TO 10
      EQU FILEFIX.UNABLE.TO.OPEN.OVER TO 11
      EQU FILEFIX.UNABLE.TO.OPEN.DATA TO 12
      EQU FILEFIX.DATA.NO.OVER TO 13
      EQU FILEFIX.UNABLE.TO.DBOPEN.FILE TO 14
      EQU FILEFIX.NO.LOCK TO 15
      EQU FILEFIX.FILE.TOO.SMALL TO 16
      EQU FILEFIX.BAD.SEEK TO 17
      EQU FILEFIX.BAD.READ.FREECHAIN TO 18
      EQU FILEFIX.UNSUPPORTED.FILE.REV TO 19
      EQU FILEFIX.BAD.READ.GROUP TO 20
      EQU FILEFIX.BAD.GROUP.NUM TO 21
      EQU FILEFIX.TYPE1FILE TO 22
      EQU FILEFIX.TYPE19FILE TO 23

      * Seek failures
      EQU FILEFIX.BAD.SEEK.PRIMARY TO 51
      EQU FILEFIX.BAD.SEEK.OVER TO 52
      EQU FILEFIX.SEEK.FAILED TO 53

      * Logging failures
      EQU FILEFIX.CANT.CREATE.LOGDIR TO 101
      EQU FILEFIX.CANT.CREATE.LOGFILE TO 102
      EQU FILEFIX.CANT.CREATE.DUMPDIR TO 103
      EQU FILEFIX.CANT.CREATE.DUMPFILE TO 104
      EQU FILEFIX.WRITE.FAILED.SHORT TO 105

      EQU FILEFIX.BAD.SCAN.LEVEL TO 200