| Token number |
FL4 |
The token number within the source
file generated by the compiler, starting at 1. Any copybooks have already
been included in the source. |
| Token code |
HL2 |
The type of token (user-name,
literal, reserved word, and so forth).
For reserved words, the compiler reserved-word table values are used.
For PICTURE strings, the special code 0000 is used.
For each piece (other than the last) of a continued token, the special
code 3333 is used.
Otherwise, the following codes are used:
- 0001
- ACCEPT
- 0002
- ADD
- 0003
- ALTER
- 0004
- CALL
- 0005
- CANCEL
- 0007
- CLOSE
- 0009
- COMPUTE
- 0011
- DELETE
- 0013
- DISPLAY
- 0014
- DIVIDE
- 0017
- READY
- 0018
- END-PERFORM
- 0019
- ENTER
- 0020
- ENTRY
- 0021
- EXIT
- 0022
- EXEC
-
- EXECUTE
- 0023
- GO
- 0024
- IF
- 0025
- INITIALIZE
- 0026
- INVOKE
- 0027
- INSPECT
- 0028
- MERGE
- 0029
- MOVE
|
| |
|
- 0030
- MULTIPLY
- 0031
- OPEN
- 0032
- PERFORM
- 0033
- READ
- 0035
- RELEASE
- 0036
- RETURN
- 0037
- REWRITE
- 0038
- SEARCH
- 0040
- SET
- 0041
- SORT
- 0042
- START
- 0043
- STOP
- 0044
- STRING
- 0045
- SUBTRACT
- 0048
- UNSTRING
- 0049
- USE
- 0050
- WRITE
- 0051
- CONTINUE
- 0052
- END-ADD
- 0053
- END-CALL
- 0054
- END-COMPUTE
- 0055
- END-DELETE
- 0056
- END-DIVIDE
- 0057
- END-EVALUATE
- 0058
- END-IF
- 0059
- END-MULTIPLY
- 0060
- END-READ
- 0061
- END-RETURN
- 0062
- END-REWRITE
- 0063
- END-SEARCH
- 0064
- END-START
- 0065
- END-STRING
- 0066
- END-SUBTRACT
- 0067
- END-UNSTRING
- 0068
- END-WRITE
- 0069
- GOBACK
|
| |
|
- 0070
- EVALUATE
- 0071
- RESET
- 0072
- SERVICE
- 0073
- END-INVOKE
- 0074
- END-EXEC
- 0075
- XML
- 0076
- END-XML
- 0099
- FOREIGN-VERB
- 0101
- DATA-NAME
- 0105
- DASHED-NUM
- 0106
- DECIMAL
- 0107
- DIV-SIGN
- 0108
- EQ
- 0109
- EXPONENTIATION
- 0110
- GT
- 0111
- INTEGER
- 0112
- LT
- 0113
- LPAREN
- 0114
- MINUS-SIGN
- 0115
- MULT-SIGN
- 0116
- NONUMLIT
- 0117
- PERIOD
- 0118
- PLUS-SIGN
- 0121
- RPAREN
- 0122
- SIGNED-INTEGER
- 0123
- QUID
- 0124
- COLON
- 0125
- IEOF
- 0126
- EGCS-LIT
- 0127
- COMMA-SPACE
- 0128
- SEMICOLON-SPACE
- 0129
- PROCEDURE-NAME
- 0130
- FLT-POINT-LIT
- 0131
- Language Environment
|
| |
|
- 0132
- GE
- 0133
- IDREF
- 0134
- EXPREF
- 0136
- CICS
- 0137
- NEW
- 0138
- NATIONAL-LIT
- 0200
- ADDRESS
- 0201
- ADVANCING
- 0202
- AFTER
- 0203
- ALL
- 0204
- ALPHABETIC
- 0205
- ALPHANUMERIC
- 0206
- ANY
- 0207
- AND
- 0208
- ALPHANUMERIC-EDITED
- 0209
- BEFORE
- 0210
- BEGINNING
- 0211
- FUNCTION
- 0212
- CONTENT
- 0213
- CORR
-
- CORRESPONDING
- 0214
- DAY
- 0215
- DATE
- 0216
- DEBUG-CONTENTS
- 0217
- DEBUG-ITEM
- 0218
- DEBUG-LINE
- 0219
- DEBUG-NAME
- 0220
- DEBUG-SUB-1
- 0221
- DEBUG-SUB-2
- 0222
- DEBUG-SUB-3
- 0223
- DELIMITED
- 0224
- DELIMITER
- 0225
- DOWN
|
| |
|
- 0226
- NUMERIC-EDITED
- 0227
- XML-EVENT
- 0228
- END-OF-PAGE
-
- EOP
- 0229
- EQUAL
- 0230
- ERROR
- 0231
- XML-NTEXT
- 0232
- EXCEPTION
- 0233
- EXTEND
- 0234
- FIRST
- 0235
- FROM
- 0236
- GIVING
- 0237
- GREATER
- 0238
- I-O
- 0239
- IN
- 0240
- INITIAL
- 0241
- INTO
- 0242
- INVALID
- 0243
- SQL
- 0244
- LESS
- 0245
- LINAGE-COUNTER
- 0246
- XML-TEXT
- 0247
- LOCK
- 0248
- GENERATE
- 0249
- NEGATIVE
- 0250
- NEXT
- 0251
- NO
- 0252
- NOT
- 0253
- NUMERIC
- 0254
- KANJI
- 0255
- OR
- 0256
- OTHER
- 0257
- OVERFLOW
- 0258
- PAGE
- 0259
- CONVERTING
|
| |
|
- 0260
- POINTER
- 0261
- POSITIVE
- 0262
- DBCS
- 0263
- PROCEDURES
- 0264
- PROCEED
- 0265
- REFERENCES
- 0266
- DAY-OF-WEEK
- 0267
- REMAINDER
- 0268
- REMOVAL
- 0269
- REPLACING
- 0270
- REVERSED
- 0271
- REWIND
- 0272
- ROUNDED
- 0273
- RUN
- 0274
- SENTENCE
- 0275
- STANDARD
- 0276
- RETURN-CODE
-
- SORT-CORE-SIZE
-
- SORT-FILE-SIZE
-
- SORT-MESSAGE
-
- SORT-MODE-SIZE
-
- SORT-RETURN
-
- TALLY
-
- XML-CODE
- 0277
- TALLYING
- 0278
- SUM
- 0279
- TEST
- 0280
- THAN
- 0281
- UNTIL
- 0282
- UP
- 0283
- UPON
- 0284
- VARYING
- 0285
- RELOAD
- 0286
- TRUE
|
| |
|
- 0287
- THEN
- 0288
- RETURNING
- 0289
- ELSE
- 0290
- SELF
- 0291
- SUPER
- 0292
- WHEN-COMPILED
- 0293
- ENDING
- 0294
- FALSE
- 0295
- REFERENCE
- 0296
- NATIONAL-EDITED
- 0297
- COM-REG
- 0298
- ALPHABETIC-LOWER
- 0299
- ALPHABETIC-UPPER
- 0301
- REDEFINES
- 0302
- OCCURS
- 0303
- SYNC
-
- SYNCHRONIZED
- 0304
- MORE-LABELS
- 0305
- JUST
-
- JUSTIFIED
- 0306
- SHIFT-IN
- 0307
- BLANK
- 0308
- VALUE
- 0309
- COMP
-
- COMPUTATIONAL
- 0310
- COMP-1
-
- COMPUTATIONAL-1
- 0311
- COMP-3
-
- COMPUTATIONAL-3
- 0312
- COMP-2
-
- COMPUTATIONAL-2
- 0313
- COMP-4
-
- COMPUTATIONAL-4
- 0314
- DISPLAY-1
- 0315
- SHIFT-OUT
|
| |
|
- 0316
- INDEX
- 0317
- USAGE
- 0318
- SIGN
- 0319
- LEADING
- 0320
- SEPARATE
- 0321
- INDEXED
- 0322
- LEFT
- 0323
- RIGHT
- 0324
- PIC
-
- PICTURE
- 0325
- VALUES
- 0326
- GLOBAL
- 0327
- EXTERNAL
- 0328
- BINARY
- 0329
- PACKED-DECIMAL
- 0330
- EGCS
- 0331
- PROCEDURE-POINTER
- 0332
- COMP-5
-
- COMPUTATIONAL-5
- 0333
- FUNCTION-POINTER
- 0334
- TYPE
- 0335
- JNIENVPTR
- 0336
- NATIONAL
- 0337
- GROUP-USAGE
- 0401
- HIGH-VALUE
-
- HIGH-VALUES
- 0402
- LOW-VALUE
-
- LOW-VALUES
- 0403
- QUOTE
-
- QUOTES
- 0404
- SPACE
-
- SPACES
- 0405
- ZERO
|
| |
|
- 0406
- ZEROES
-
- ZEROS
- 0407
- NULL
-
- NULLS
- 0501
- BLOCK
- 0502
- BOTTOM
- 0505
- CHARACTER
- 0506
- CODE
- 0507
- CODE-SET
- 0514
- FILLER
- 0516
- FOOTING
- 0520
- LABEL
- 0521
- LENGTH
- 0524
- LINAGE
- 0526
- OMITTED
- 0531
- RENAMES
- 0543
- TOP
- 0545
- TRAILING
- 0549
- RECORDING
- 0601
- INHERITS
- 0603
- RECURSIVE
- 0701
- ACCESS
- 0702
- ALSO
- 0703
- ALTERNATE
- 0704
- AREA
-
- AREAS
- 0705
- ASSIGN
- 0707
- COLLATING
- 0708
- COMMA
- 0709
- CURRENCY
- 0710
- CLASS
- 0711
- DECIMAL-POINT
- 0712
- DUPLICATES
- 0713
- DYNAMIC
- 0714
- EVERY
|
| |
|
- 0716
- MEMORY
- 0717
- MODE
- 0718
- MODULES
- 0719
- MULTIPLE
- 0720
- NATIVE
- 0721
- OFF
- 0722
- OPTIONAL
- 0723
- ORGANIZATION
- 0724
- POSITION
- 0725
- PROGRAM
- 0726
- RANDOM
- 0727
- RELATIVE
- 0728
- RERUN
- 0729
- RESERVE
- 0730
- SAME
- 0731
- SEGMENT-LIMIT
- 0732
- SELECT
- 0733
- SEQUENCE
- 0734
- SEQUENTIAL
- 0736
- SORT-MERGE
- 0737
- STANDARD-1
- 0738
- TAPE
- 0739
- WORDS
- 0740
- PROCESSING
- 0741
- APPLY
- 0742
- WRITE-ONLY
- 0743
- COMMON
- 0744
- ALPHABET
- 0745
- PADDING
- 0746
- SYMBOLIC
- 0747
- STANDARD-2
- 0748
- OVERRIDE
- 0750
- PASSWORD
|
| |
|
- 0801
- ARE
-
- IS
- 0802
- ASCENDING
- 0803
- AT
- 0804
- BY
- 0805
- CHARACTERS
- 0806
- CONTAINS
- 0808
- COUNT
- 0809
- DEBUGGING
- 0810
- DEPENDING
- 0811
- DESCENDING
- 0812
- DIVISION
- 0814
- FOR
- 0815
- ORDER
- 0816
- INPUT
- 0817
- REPLACE
- 0818
- KEY
- 0819
- LINE
-
- LINES
- 0821
- OF
- 0822
- ON
- 0823
- OUTPUT
- 0825
- RECORD
- 0826
- RECORDS
- 0827
- REEL
- 0828
- SECTION
- 0829
- SIZE
- 0830
- STATUS
- 0831
- THROUGH
-
- THRU
- 0832
- TIME
- 0833
- TIMES
- 0834
- TO
- 0836
- UNIT
|
| |
|
- 0837
- USING
- 0838
- WHEN
- 0839
- WITH
- 0901
- PROCEDURE
- 0902
- DECLARATIVES
- 0903
- END
- 1001
- DATA
- 1002
- FILE
- 1003
- FD
- 1004
- SD
- 1005
- WORKING-STORAGE
- 1006
- LOCAL-STORAGE
- 1007
- LINKAGE
- 1101
- ENVIRONMENT
- 1102
- CONFIGURATION
- 1103
- SOURCE-COMPUTER
- 1104
- OBJECT-COMPUTER
- 1105
- SPECIAL-NAMES
- 1106
- REPOSITORY
- 1107
- INPUT-OUTPUT
- 1108
- FILE-CONTROL
- 1109
- I-O-CONTROL
- 1201
- ID
-
- IDENTIFICATION
- 1202
- PROGRAM-ID
- 1203
- AUTHOR
- 1204
- INSTALLATION
- 1205
- DATE-WRITTEN
- 1206
- DATE-COMPILED
- 1207
- SECURITY
- 1208
- CLASS-ID
- 1209
- METHOD-ID
- 1210
- METHOD
- 1211
- FACTORY
|
| |
|
- 1212
- OBJECT
- 2020
- TRACE
- 3000
- DATADEF
- 3001
- F-NAME
- 3002
- UPSI-SWITCH
- 3003
- CONDNAME
- 3004
- CONDVAR
- 3005
- BLOB
- 3006
- CLOB
- 3007
- DBCLOB
- 3008
- BLOB-LOCATOR
- 3009
- CLOB-LOCATOR
- 3010
- DBCLOB-LOCATOR
- 3011
- BLOB-FILE
- 3012
- CLOB-FILE
- 3013
- DBCLOB-FILE
- 3014
- DFHRESP
- 5001
- PARSE
- 5002
- AUTOMATIC
- 5003
- PREVIOUS
- 9999
- COBOL
|
| Token length |
HL2 |
The length of the token |
| Token column |
FL4 |
The starting column number of the
token on the source line |
| Token line |
FL4 |
The line number of the token |
| Flags |
CL1 |
Information about the token:
- X'80'
- Token is continued
- X'40'
- Last piece of continued token
Note that for PICTURE strings, even if the source token is
continued, there will be only one Token record generated. It will have a
token code of 0000, the token column and line of the first piece, the
length of the complete string, no continuation flags set, and the token
text of the complete string. |
| Reserved |
CL7 |
Reserved for future use |
| Token text |
CL(n) |
The actual token string |