************************************************************************
*M*      CCITABLS MODULE CONTAINS CCI TABLES AND OTHER STATIC DATA
************************************************************************
*P*
*P*      NAME:    CCITABLS
*P*
*P*      PURPOSE: TO PROVIDE TABLES, PARAMETER LISTS, AND DEFINITIONS
*P*               FOR REFERENCE BY OTHER CCI MODULES
*P*
*P*      DESCRIPTION: THIS MODULE CONTAINS THE FOLLOWING TABLES AND DATA:
*P*               1. TSTACK
*P*               2. VARIOUS CONSTANTS
*P*               3. ADDRESS TABLE OF OUTPUT DCB'S (LISTDCBT)
*P*               4. KEYS FOR READING VARIOUS RECORDS
*P*               5. DISPLACEMENT OF PARAMETERS IN LOCCT
*P*               6. DEFAULT COPY OF CONTROL COMMAND PARAMETER LIST
*P*               7. ERROR CODES FOR VARIOUS ERRORS DETECTED IN
*P*                  PROCESSING THE CONTROL COMMANDS
*P*
         SYSTEM   SIG7FDP
         SYSTEM   BPM
         DEF      DSI               CONSTANT-DEIVCE ENTRY IN DCB
         DEF      LINK1STROM        CONSTANT-RELATIVE POSITION IN TREE
*,*                                 ENTRY OF ROM LINK
         DEF      LINKNEXTROM       CONSTANT-RELATIVE POSITION IN ROM
*,*                                 ENTRY OF ROM LINK
         DEF      LSTROMLINK        CONSTANT-RELATIVE POSITION IN TREE
*,*                                 TABLE OF LAST ROM LINK
         DEF      RLMNENTRY         CONSTANT
         DEF      ROMNAME           CONSTANT-RELATIVE POSITION OF ROM
*,*                                 NAME IN ROM ENTRY
         DEF      ROMTADR           CONSTANT-RELATIVE POSITION OF ROM
*,*                                 TABLE ADDRESS IN LOCCT
         DEF      ROMTESIZE         CONSTANT-ROM TABLE ENTRY SIZE
         DEF      SEGNAME           CONSTANT-RELATIVE POSITION OF SEGMENT
*,*                                 NAME IN TREE ENTRY
         DEF      TTESIZE           CONSTANT-TREE TABLE ENTRY SIZE
         DEF      TREETADR          CONSTANT-RELATIVE POSITION OF TREE
*,*                                 ADDRESS IN LOCCT
         DEF      X1                CONSTANT
         DEF      X2                CONSTANT
         DEF      X4                CONSTANT
         DEF      X8                CONSTANT
         DEF      XF                CONSTANT
         DEF      X10               CONSTANT
         DEF      X7F               CONSTANT
         DEF      XFF               CONSTANT
         DEF      X1FF              CONSTANT
         DEF      X202              CONSTANT
         DEF      X4000             CONSTANT
         DEF      X8000             CONSTANT
         DEF      XFFFF             CONSTANT
         DEF      X1FE00            CONSTANT
         DEF      X1FFFF            CONSTANT
         DEF      X2000202          CONSTANT
         DEF      X3000202          CONSTANT
         DEF      X4000202          CONSTANT
         DEF      X7FFFFFFF         CONSTANT
         DEF      XFFFFFFFB         CONSTANT
         DEF      Y1                CONSTANT
         DEF      Y14               CONSTANT
         DEF      Y15               CONSTANT
         DEF      Y2                CONSTANT
         DEF      Y4                CONSTANT
         DEF      Y8                CONSTANT
         DEF      YFF               CONSTANT
         DEF      YFFFE             CONSTANT
         DEF      YFFFF             CONSTANT
         DEF      YDFFFFFFF         CONSTANT
         DEF      Y7FFFFFFF         CONSTANT
         DEF      Y01               CONSTANT
         DEF      Y02               CONSTANT
         DEF      Y04               CONSTANT
         DEF      Y05               CONSTANT
         DEF      Y06               CONSTANT
         DEF      Y07               CONSTANT
         DEF      Y08               CONSTANT
         DEF      Y09               CONSTANT
         DEF      Y0A               CONSTANT
         DEF      Y0C               CONSTANT
         DEF      Y001              CONSTANT
         DEF      Y002              CONSTANT
         DEF      Y003              CONSTANT
         DEF      Y004              CONSTANT
         DEF      Y008              CONSTANT
         DEF      Y0001             CONSTANT
         DEF      Y0002             CONSTANT
         DEF      Y0004             CONSTANT
         DEF      Y0008             CONSTANT
         DEF      Y000F             CONSTANT
         DEF      LDEXSTCD          ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      CCORDCD           ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      LDBUSYCD          ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      RPROERCD          ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      KEYSCAN1          BITS TO INDICATE KEYWORDS SCANNED ON
*,*                                 LOAD/LOCCT CONTROL COMMAND
         DEF      KEYSCAN2          BITS TO INDICATE KEYWORDS SCANNED ON
*,*                                 LOAD /LOCCT CONTROL COMMAND
         DEF      ALPHERCD          ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      BLNKERCD          ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      COMERCD           ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      CHSTERCD          ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      DECERCD           ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      DUPERCD           ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      HEXERCD           ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      IDCBNAM           ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      ILCHERCD          ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      ILLASGCD          ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      ILLRMNCD          ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      ILSEGNCD          ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      INSFERCD          ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      KWERCD            ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      LPERCD            ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      MRWERCD           ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      NAMERCD           ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      OPNERCD           ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      ROMTOVCD          ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      RPERCD            ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      SDCBNA            ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      SYNTXER           ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      TERMERCD          ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      VALERCD           ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      MAXCCERCD         ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      DVERCD            ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      BIGERCD           ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      OUTERCD           ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      GETERCD           ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      PUTERCD           ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      OPERR             ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      ACCNER            ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      NRESERR           ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      RUNERCD           ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      RDBIECOD          ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      INSTARCD          ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      LMXCDCD           ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      NOPGERR           ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      TSTORCD1          ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      TSTORCD2          ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      PSTORCD1          ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      PSTORCD2          ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      WSNERCD           ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      PARAMCD           ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      INVHDCD           ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      INVTRCD           ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      MXUNSTCD          ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      MXEXECCD          ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      DUPSEGCD          ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      NOROMCD           ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      MODERCD           ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      OPERCD            ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      PASSERCD          ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      ILLCFCD           ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      RDEXCD            ERROR CODE INDEX INTO ERROR MESSAGE
*,*                                 ADDRESS TABLE
         DEF      JOBCCLF           CONSTANT-JOB CONTROL COMMAND LIST FLAGS
         DEF      KEYHEAD           KEYWORD 'HEAD' IN TEXTC
         DEF      LMNAME            CONSTANT-RELATIVE POSITION IN LOCCT
*,*                                 OF LOAD MODULE NAME
         DEF      CCPL              CONTROL COMMAND PARAMETER LIST FOR
*,*                                 CHARACTER SCANNING ROUTINES
         DEF      LISTDCBT          ADDRESS TABLE OF OUTPUT DCBS
         DEF      CCLFM             CONTROL COMMAND LIST FLAG MASK
         DEF      KCCELMK1          CONTROL COMMAND ERROR LIST MASK ONE
         DEF      KCCELMK2          CONTROL COMMAND ERROR LIST MASK TWO
         DEF      KCCELMK3          CONTROL COMMAND ERROR LIST MASK THREE
         DEF      CCLFMASK          CONTROL COMMAND LIST FLAG MASK
         DEF      ERLFMASK          ERROR LIST FLAG MASK
         DEF      BLANK             KEYWORD 'BLANK' IN TEXT
         DEF      LISTCNT           CONSTANT-NUMBER OF OUTPUT DCBS IN
*,*                                 ADDRESS TABLE
         DEF      AM:CNAME          CONSTANT-OFFSET INTO A/M FOR FILE NAME
         DEF      AM:CACCT          CONSTANT-OFFSET INTO A/M FOR ACCOUNT
         DEF      AM:CPASS          CONSTANT-OFFSET INTO A/M FOR PASSWORD
         DEF      AM:CREC           CONSTANT-OFFSET INTO A/M FOR RECORD
         DEF      CCEBFM1           BYTE COUNT OF CONTROL COMMAND ERROR
*,*                                 BUFFER
         DEF      CCEBF             CONTROL COMMAND ERROR BUFFER
         DEF      CJOB              J:JIT ADDRESS
         DEF      TSTACK            TEMPORARY STACK
         DEF      XA                CONSTANT
         DEF      X1000             CONSTANT
         DEF      Y00FF             CONSTANT
         DEF      Y03               CONSTANT
         DEF      X200020           CONSTANT
         DEF      X100010           CONSTANT
         DEF      X80008            CONSTANT
         DEF      X40004            CONSTANT
         DEF      X20002            CONSTANT
         DEF      X10001            CONSTANT
         DEF      X3                CONSTANT
         DEF      BLNKOUTFLG        CONSTANT
         DEF      LDSYSID           CONSTANT-RELATIVE POSITION IN LOCCT
*,*                                 OF SYSID
         DEF      ACCBUF            OFFSET OF J:CCBUF IN JIT
         REF      CLD               EQU; OFFSET INTO CCPL FOR NUMBER AND
*,*                                 ADDRESS OF DELIMITERS
         DEF      PACLD             NUMBER AND ADDRESS OF DELIMITERS
*,*                                 FOR JOB CC PASSWORD SCANNING
         DEF      EXTACLD           NUMBER AND ADDRESS OF DELIMITERS FOR
*,*                                 EXTENDED ACCOUNTING SCANNING
         SPACE    3
         REF      CREAD             ADDRESS OF CONTROL COMMAND
*,*                                 CONTINUATION READ ROUTINE
         REF      CCLIST            ADDRESS OF CONTROL COMMAND OUTPUT
*,*                                 ROUTINE
         REF      J:JIT             INPUT-JIT ADDRESS
         REF      J:CCBUF           INPUT-DETERMINE ACCBUF OFFSET FROM
*,*                                 START OF JIT
         REF      M:LL              INPUT-ADDRESS OF DCB
         REF      M:SL              INPUT-ADDRESS OF DCB
         REF      M:LO              INPUT-ADDRESS OF DCB
         REF      M:DO              INPUT-ADDRESS OF DCB
         REF      M:PO              INPUT-ADDRESS OF DCB
         REF      M:AL              INPUT-ADDRESS OF DCB
DSI      EQU      1                 DEVICE ENTRY IN DCB
         PAGE
* * * * *TEMP STACK AND ERR BUF MUST HAVE PROTECTION TYPE = 0 * * * * * *
         CSECT    0
*
TSTACK   DATA     %+1               TEMP STACK DBLWRD
         DATA,2   300,0
         RES      300
CCEBFM1  DATA     X'50404040'       CCEBF MINUS 1,INCLUDES BYTE
CCEBF    RES      20
         RES      13                FOR STRBUF IN CCIR
*
NRESERR  DATA     0                 NAME OF RESOURCE EXCEEDED IN JOBR.
         BOUND    8
KEYSCAN1 DATA     0                 BITS TO INDICATE KEYWORDS
KEYSCAN2 DATA     0                 SCANNED ON LOAD OR LOCCT CC.
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * **
       CSECT       1
X200020   DATA   X'200020'
X100010   DATA   X'100010'
X80008    DATA   X'80008'
X40004    DATA   X'40004'
X20002    DATA   X'20002'
X10001    DATA   X'10001'
X3        DATA   X'3'
         PAGE
X1       DATA     X'1'
X2       DATA     X'2'
X4       DATA     X'4'
X8       DATA     X'8'
XA       DATA     X'A'
XF       DATA     X'F'
X10      DATA     X'10'
X7F      DATA     X'7F'
XFF      DATA     X'FF'
X202     DATA     X'202'
X1FF     DATA     X'1FF'
X1000    DATA     X'1000'
X4000    DATA     X'00004000'
X8000    DATA     X'8000'
X1FE00   DATA     X'0001FE00'
XFFFF    DATA     X'0000FFFF'
X1FFFF   DATA     X'1FFFF'
X2000202 DATA     X'02000202'
X3000202 DATA     X'03000202'
X4000202 DATA     X'04000202'
X7FFFFFFF DATA    X'7FFFFFFF'
XFFFFFFFB DATA    X'FFFFFFFB'
         PAGE
Y1       DATA     X'10000000'
Y14      DATA     X'14000000'
Y15      DATA     X'15000000'
Y2        DATA    X'20000000'
Y4       DATA     X'40000000'
Y8       DATA     X'80000000'
YFF      DATA     X'FF000000'
YFFFE    DATA     X'FFFE0000'
YFFFF    DATA     X'FFFF0000'
Y01      DATA     X'01000000'
Y02      DATA     X'02000000'
Y03      DATA     X'03000000'
Y04      DATA     X'04000000'
Y05      DATA     X'05000000'
Y06      DATA     X'06000000'
Y07      DATA     X'07000000'
Y08      DATA     X'08000000'
Y09      DATA     X'09000000'
Y0A      DATA     X'0A000000'
Y0C      DATA     X'0C000000'
Y001     DATA     X'00100000'
Y002     DATA     X'00200000'
Y003     DATA     X'00300000'
Y004     DATA     X'00400000'
Y008     DATA     X'00800000'
Y00FF    DATA     X'00FF0000'
Y0001    DATA     X'00010000'
Y0002    DATA     X'20000'
Y0004    DATA     X'00040000'
Y000F    DATA     X'000F0000'
Y0008    DATA     X'00080000'
YDFFFFFFF DATA    X'DFFFFFFF'
Y7FFFFFFF DATA    X'7FFFFFFF'
Y7000001 DATA     X'70000010'
         PAGE
K1       EQU      1
K4       EQU      4
K8       EQU      8
K10      EQU      X'10'
K40      EQU      X'40'
K80      EQU      X'80'
K100     EQU      X'100'
K200     EQU      X'200'
K400     EQU      X'400'
K600     EQU      X'600'
         PAGE
BLANK    TEXT     '    '
         BOUND    4
         PAGE
*
         BOUND    4
LISTDCBT EQU      %                 ADR TABLE OF OUTPUT DCBS
         DATA     0
         DATA     M:AL
         DATA     M:PO
         DATA     M:DO
         DATA     M:LO
         DATA     M:SL
         DATA     M:LL
         DATA     0                                                     901
LISTCNT  EQU      %-LISTDCBT-1
         PAGE
CJOB     DATA     J:JIT
ACCBUF   EQU      J:CCBUF-J:JIT
JOBCCLF  EQU      X'12'             JOB CC LIST DO,LL
MABRTCD  EQU      K40               MONITOR ABORT CODE
ERLFMASK EQU      X7F               ERR LIST FLAG MASK
CCLFMASK EQU      X7F               CONTROL CO
KCCELMK1 EQU      K200              CC ERROR LIST MASK 1
KCCELMK2 EQU      K400              CC ERROR LIST MASK 2
CCLFM    EQU      K100
KCCELMK3 EQU      K600              CC ERR LIST MASK 3
KEYHEAD  TEXTC    'HEAD'
KEYLOCCT TEXTC    'LOCCT'
LDSYSID  EQU      1                 REL. POS. OF SYSID IN LOCCT
TREETADR      EQU 2                 REL. POS. OF TREE ADR IN LOCCT
ROMTADR  EQU      3                 REL. POS. OF ROMT ADR IN LOCCT
ROMTESIZE     EQU 8                 ROMT ENTRY SIZE
TTESIZE       EQU 11                TREE ENTRY SIZE
SEGNAME       EQU 0                 REL. POS. OF SEG NAME IN TREE ENTRY
ROMNAME       EQU 0                 REL. POS. OF ROM NAME IN ROM  ENTRY
LINK1STROM    EQU 3                 REL. POS. IN TREE ENTRY OF ROM LINK
LINKNEXTROM   EQU 7                 REL. POS. IN ROM  ENTRY OF ROM LINK
LSTROMLINK    EQU 5                 REL. POS. IN TREE ENTRY LST ROM LNK
RLMNENTRY  EQU    3
LMNAME   EQU      10                INDEX FOR LOAD MODULE NAME IN LOCCT
AM:CNAME EQU      22                OFFSET INTO A/M FOR FILE NAME
AM:CACCT EQU      25                OFFSET INTO A/M FOR ACCOUNT
AM:CPASS EQU      27                OFFSET INTO A/M FOR PASSWORD
AM:CREC  EQU      29                OFFSET INTO A/M FOR RECORD
         PAGE
*
*        CCPL     CONTROL COMMAND PARAMETER LIST FOR CHAR ROUTINES
*
CCPL     EQU      %
         GEN,8,24 NDELIM,BA(CCDELIM)  NO. OF DELIM, BA( DELIMETERS)
         GEN,8,24 CNTCLMN,CREAD     CONT. COLUMN, CONT. READ ROUT.
         DATA     CCLIST            OUTPUT ROUTINE
         DATA     0                 CUR CHAR  POSITION
         GEN,8,24 0,0               FLAGS, CC BUFFER ADR
         DATA     0                 CHAR STRING LENGTH
         DATA     0                 CHAR POSITION OF 1ST CHAR OF FIELD
         RES      9                 CHAR STRING BUFFER
*
CCDELIM  EQU      %                 CC  DELIMITERS
         DATA     '(),.'
         DATA,1   ' '
* NOTE: HYPHEN IS USED AS A DELIMITER IN PROCESSING THE TREE CONTROL
* COMMAND, START OPTION ON RUN COMMAND, AND DEBUG COMMANDS; OTHERWISE
* HYPHEN IS TREATED AS ALPHANUMERIC.
         DATA,1   '-'               ORDER DEPENDENT
* NOTE: PLUS IS USED AS A DELIMITER WHEN PROCESSING THE START OPTION ON
* THE RUN COMMAND, AND DEBUG COMMANDS; OTHERWISE PLUS IS TREATED AS
* ALPHANUMERIC.
         DATA,1   '+'
NDELIM   EQU      BA(%)-BA(CCDELIM)-2
*
         BOUND    4
PACLD    GEN,8,24 NPADELIM,BA(PADELIM) DELIMITERS FOR JOB CC PASS. SCAN
PADELIM  EQU      %
         DATA,2   ' .'
NPADELIM EQU      BA(%)-BA(PADELIM)
*
         BOUND    4
EXTACLD  GEN,8,24 NEADELIM,BA(EADELIM) DELIMITERS FOR EXT. ACCTG. SCAN.
EADELIM  EQU      %
         DATA,1   ')'
NEADELIM EQU      BA(%)-BA(EADELIM)
*
         BOUND    4
CNTCLMN  EQU      1
BLNKOUTFLG  EQU   Y4                BLANK OUT FLAG
         PAGE
**********************************************************************
*                                                                    *
*        CONTROL  COMMAND  ERROR CODES                               *
*                                                                    *
**********************************************************************
BLNKERCD EQU      X'001'            EXPECTED BLANK      MISS. ERR CODE
COMERCD  EQU      X'002'            EXPECTED COMMA      MISS. ERR CODE
LPERCD   EQU      X'003'            EXPECTED LEFT PAREN MISS. ERR CODE
RPERCD   EQU      X'004'            EXPECTED RGHT PAREN MISS. ERR CODE
TERMERCD EQU      X'005'            EXPECTED TERMINATOR MISS. ERR CODE
ILCHERCD EQU      X'007'            ILLEGAL  CHAR             ERR CODE
SYNTXER  EQU      X'008'            SYNTAX                    ERR CODE
WSNERCD  EQU      X'00B'
KWERCD   EQU      X'100'            ILLEGAL  KEYWORD          ERR CODE
CHSTERCD EQU      X'101'            ILLEGAL  CHARACTER STRING ERR CODE
ALPHERCD EQU      X'102'            ILLEGAL  ALPHANUM. NAME   ERR CODE
DECERCD  EQU      X'103'            ILLEGAL  DEC. NUMBER      ERR CODE
HEXERCD  EQU      X'104'            ILLEGAL  HEX. NUMBER      ERR CODE
DUPERCD  EQU      X'105'            DUPLICATION OF FIELD      ERR CODE
VALERCD  EQU      X'106'            ILLEGAL  VALUE            ERR CODE
INSFERCD EQU      X'107'            INSUFFICIENT PARAMETERS   ERR CODE
MRWERCD  EQU      X'108'            MAX RD&WT ACCTS EXCEEDED  ERR CODE
ILSEGNCD EQU      X'109'            ILLEGAL SEGMENT NAME      ERR CODE
ILLRMNCD EQU      X'10A'            ILL. REL. OJB. MOD. NAME            901
DVERCD   EQU      X'10B'
BIGERCD  EQU      X'10C'
OUTERCD  EQU      X'10D'
GETERCD  EQU      X'10E'
PUTERCD  EQU      X'10F'
OPERCD   EQU      X'110'            ILLEGAL OPTION ERROR CODE
OPERR    EQU      X'111'
ACCNER   EQU       X'112'
TSTORCD1 EQU      X'113'            TSTORE XCEEDS RMNG RAD SPACE ERR CD
TSTORCD2 EQU      X'114'            TSTORE XCEEDS RMNG PACK SPACE ERR CD
PSTORCD1 EQU      X'115'            PSTORE XCEEDS RMNG RAD SPCE ERR CD
PSTORCD2 EQU      X'116'            PSTORE XCEEDS RMNG PACK SPACE ERR CD
PARAMCD  EQU      X'117'            ILLEGAL PARAMETER
IDCBNAM  EQU      X'118'            ILLEGAL DCB NAME
MXUNSTCD EQU      X'119'            MAX UNSAT ACCTS EXCEEDED
MXEXECCD EQU      X'11A'            MAX EXECUTE ACCTS EXCEEDED
RPROERCD EQU      X'11B'            NO AUTHORIZATION FOR REMOTE PROCESSING
CCORDCD  EQU      X'11C'            CONTROL COMMAND OUT OF SEQUENCE
PASSERCD EQU      X'11D'            INVALID PASSWORD
*
INVTRCD  EQU      X'200'            LOAD MODULE HAS INVALID TREE RECD.
SDCBNA   EQU      X'201'            SYSTEM DCB NOT ASSIGNABLE ERR CODE
LDEXSTCD EQU      X'202'            LOAD MODULE DOES NOT EXIST
LDBUSYCD EQU      X'203'            LOAD MODULE IS BUSY
ILLASGCD EQU      X'204'            ILLEGAL ASSIGNMENT        ERR CODE
DUPSEGCD EQU      X'205'            DUPLICATE SEGMENT NAME
ROMTOVCD EQU      X'206'            ROMT OVERFLOW             ERR CODE
NOROMCD  EQU      X'207'            ROM IN EF LIST NOT SPECIFIED IN TREE
OPNERCD  EQU      X'208'            ABN COND ON OPEN DCB ERR CODE
MODERCD  EQU      X'209'            MAX MODIFY LOCATIONS EXCEEDED
INVHDCD  EQU      X'20A'            LOAD MODULE HAS INVALID HEAD RECD.
RUNERCD  EQU      X'20B'            RUN CC ERR CODE
RDBIECOD EQU      X'20C'            READ BI I/O ERR CODE
INSTARCD EQU      X'20D'            USER BARRED BY INST. ROUTINE ERR CODE
NOPGERR  EQU      X'20F'
LMXCDCD  EQU      X'211'            LIMIT EXCEEDS MAXIMUM.
ILLCFCD  EQU      X'212'            ILLEGAL CC FOR COMMAND FILE
RDEXCD   EQU      X'213'            RECORD DOESN'T EXIST
         PAGE
F:CF     DSECT    1
F:CF     M:DCB    (FILE),(CONSEC),(SEQUEN),(IN,EXCL),(SAVE),;
                  (BUF,J:CCBUF),(PASS)
*
MAXCCERCD  EQU    X'300'            MAX  CC  ERR  CODE
*
NAMERCD  EQU      ALPHERCD          ILLEGAL ALPHANUM. NAME   ERR CODE
         END

