         TITLE    'PHASE 1.2, 1.3 LEXICON'
         DEF      HLNK12
HLNK12   DATA,2   LEX00-HLNK12      00 - CONTAINS
         DATA,2   LEX01-HLNK12      01 - LINES
         DATA,2   LEX02-HLNK12      02 - PICTURE
         DATA,2   LEX03-HLNK12      03 - KEY
         DATA,2   LEX04-HLNK12      04 - ARE
         DATA,2   LEX05-HLNK12      05 - SECTION
         DATA,2   LEX06-HLNK12      06 - STANDARD
         DATA,2   LEX07-HLNK12      07 - CODE
         DATA,2   LEX08-HLNK12      08 - ALL
         DATA,2   LEX09-HLNK12      09 - FILE
         DATA,2   LEX0A-HLNK12      0A - GROUP
         DATA,2   0                 0B
         DATA,2   LEX0C-HLNK12      0C - LIBRARY
         DATA,2   0                 0D
         DATA,2   LEX0E-HLNK12      0E - TALLY
         DATA,2   LEX0F-HLNK12      0F - HEADING
         DATA,2   0                 10
         DATA,2   LEX11-HLNK12      11 - ON
         DATA,2   0                 12
         DATA,2   LEX13-HLNK12      13 - FILLER
         DATA,2   LEX14-HLNK12      14 - LIMITS
         DATA,2   0                 15
         DATA,2   LEX16-HLNK12      16 - INDICATE
         DATA,2   0                 17
         DATA,2   LEX18-HLNK12      18 - COLUMN
         DATA,2   0                 19
         DATA,2   LEX1A-HLNK12      1A - NEXT
         DATA,2   LEX1B-HLNK12      1B - DETAIL
         DATA,2   0                 1C
         DATA,2   LEX1D-HLNK12      1D - RIGHT
         DATA,2   0                 1E
         DATA,2   LEX1F-HLNK12      1F - ZERO
         DATA,2   LEX20-HLNK12      20 - SPACE
         DATA,2   LEX21-HLNK12      21 - BLOCK
         DATA,2   LEX22-HLNK12      22 - DEPENDING
         DATA,2   LEX23-HLNK12      23 - LINKAGE
         DATA,2   0                 24
         DATA,2   0                 25
         DATA,2   0                 26
         DATA,2   LEX27-HLNK12      27 - COMP
         DATA,2   LEX28-HLNK12      28 - IN
         DATA,2   0                 29
         DATA,2   LEX2A-HLNK12      2A - ZEROS
         DATA,2   LEX2B-HLNK12      2B - WITH
         DATA,2   0                 2C
         DATA,2   LEX2D-HLNK12      2D - COPY
         DATA,2   LEX2E-HLNK12      2E - QUOTE
         DATA,2   0                 2F
         DATA,2   0                 30
         DATA,2   0                 31
         DATA,2   0                 32
         DATA,2   0                 33
         DATA,2   LEX34-HLNK12      34 - REPORTS
         DATA,2   0                 35
         DATA,2   LEX36-HLNK12      36 - LINE-COUNTER
         DATA,2   0                 37
         DATA,2   0                 38
         DATA,2   LEX39-HLNK12      39 - UPON
         DATA,2   0                 3A
         DATA,2   LEX3B-HLNK12      3B - CF
         DATA,2   LEX3C-HLNK12      3C - BY
         DATA,2   0                 3D
         DATA,2   0                 3E
         DATA,2   LEX3F-HLNK12      3F - DE
         DATA,2   0                 40
         DATA,2   LEX41-HLNK12      41 - LABEL
         DATA,2   0                 42
         DATA,2   LEX43-HLNK12      43 - CH
         DATA,2   0                 44
         DATA,2   0                 45
         DATA,2   0                 46
         DATA,2   LEX47-HLNK12      47 - LEFT
         DATA,2   LEX48-HLNK12      48 - RECORD
         DATA,2   LEX49-HLNK12      49 - DESCENDING
         DATA,2   0                 4A
         DATA,2   LEX4B-HLNK12      4B - FD
         DATA,2   0                 4C
         DATA,2   LEX4D-HLNK12      4D - ZEROES
         DATA,2   0                 4E
         DATA,2   LEX4F-HLNK12      4F - FROM
         DATA,2   0                 50
         DATA,2   LEX51-HLNK12      51 - OV
         DATA,2   0                 52
         DATA,2   0                 53
         DATA,2   LEX54-HLNK12      54 - OF
         DATA,2   0                 55
         DATA,2   LEX56-HLNK12      56 - ASCENDING
         DATA,2   LEX57-HLNK12      57 - OMITTED
         DATA,2   LEX58-HLNK12      58 - SUM
         DATA,2   LEX59-HLNK12      59 - PAGE
         DATA,2   0                 5A
         DATA,2   0                 5B
         DATA,2   LEX5C-HLNK12      5C - IS
         DATA,2   0                 5D
         DATA,2   0                 5E
         DATA,2   0                 5F
         DATA,2   0                 60
         DATA,2   0                 61
         DATA,2   0                 62
         DATA,2   LEX63-HLNK12      63 - SYNCHRONIZED
         DATA,2   LEX64-HLNK12      64 - PH
         DATA,2   0                 65
         DATA,2   LEX66-HLNK12      66 - INDEX
         DATA,2   0                 67
         DATA,2   0                 68
         DATA,2   0                 69
         DATA,2   0                 6A
         DATA,2   LEX6B-HLNK12      6B - SYNC
         DATA,2   LEX6C-HLNK12      6C - RF
         DATA,2   LEX6D-HLNK12      6D - JUST
         DATA,2   LEX6E-HLNK12      6E - FOOTING
         DATA,2   0                 6F
         DATA,2   LEX70-HLNK12      70 - LAST
         DATA,2   LEX71-HLNK12      71 - CONTROL
         DATA,2   LEX72-HLNK12      72 - CONTROLS
         DATA,2   LEX73-HLNK12      73 - COMP-1
         DATA,2   LEX74-HLNK12      74 - RH
         DATA,2   LEX75-HLNK12      75 - LINE
         DATA,2   0                 76
         DATA,2   LEX77-HLNK12      77 - TYPE
         DATA,2   LEX78-HLNK12      78 - DATA
         DATA,2   LEX79-HLNK12      79 - PROCEDURE
         DATA,2   LEX7A-HLNK12      7A - NUMBER
         DATA,2   LEX7B-HLNK12      7B - THRU
         DATA,2   0                 7C
         DATA,2   LEX7D-HLNK12      7D - TO
         DATA,2   0                 7E
         DATA,2   LEX7F-HLNK12      7F - REDEFINES
*
*    LEXICON WORD OF ONE WORD
*
LEX08    GEN,4,12,4,12  2,O'0136',1,LEX92-HLNK12
         TEXT     'ALL '            TO OVERFLOW
LEX04    GEN,4,12,4,12  2,O'0037',1,LEX80-HLNK12
         TEXT     'ARE '            TO KEYS
LEX3C    GEN,4,12,4,12  2,O'0012',1,0
         TEXT     'BY  '
LEX3B    GEN,4,12,4,12  2,O'2043',1,LEX93-HLNK12
         TEXT     'CF  '            TO QUOTES
LEX43    GEN,4,12,4,12  2,O'2044',1,LEX97-HLNK12
         TEXT     'CH  '            TO RESET
LEX07    GEN,4,12,4,12  2,O'2023',1,LEX90-HLNK12
         TEXT     'CODE'            TO LIMIT
LEX27    GEN,4,12,4,12  2,O'2026',1,0
         TEXT     'COMP'
LEX2D    GEN,4,12,4,12  2,O'2035',1,LEX86-HLNK12
         TEXT     'COPY'            TO SD
LEX78    GEN,4,12,4,12  2,O'2037',1,0
         TEXT     'DATA'
LEX3F    GEN,4,12,4,12  2,O'2042',1,0
         TEXT     'DE  '
LEX4B    GEN,4,12,4,12  2,O'3000',1,LEXA7-HLNK12
         TEXT     'FD  '            TO REPLACING
LEX09    GEN,4,12,4,12  2,O'0024',1,LEX8F-HLNK12
         TEXT     'FILE'            TO INDEXED
LEX4F    GEN,4,12,4,12  2,O'0026',1,0
         TEXT     'FROM'
LEX28    GEN,4,12,4,12  2,O'0032',1,LEX8E-HLNK12
         TEXT     'IN  '            TO FIRST
LEX5C    GEN,4,12,4,12  2,O'0037',1,LEX81-HLNK12
         TEXT     'IS  '            TO OH
LEX6D    GEN,4,12,4,12  2,O'2077',1,LEXA4-HLNK12
         TEXT     'JUST'            TO LOW-VALUE
LEX03    GEN,4,12,4,12  2,O'0040',1,0
         TEXT     'KEY '
LEX80    GEN,4,12,4,12  2,O'0000',1,LEX8B-HLNK12
         TEXT     'KEYS'            TO DISPLAY
LEX70    GEN,4,12,4,12  2,O'2101',1,LEX83-HLNK12
         TEXT     'LAST'            TO PIC
LEX47    GEN,4,12,4,12  2,O'2103',1,0
         TEXT     'LEFT'
LEX75    GEN,4,12,4,12  2,O'0044',1,0
         TEXT     'LINE'
LEX1A    GEN,4,12,4,12  2,O'0051',1,LEXA6-HLNK12
         TEXT     'NEXT'            TO PAGE-COUNTER
LEX54    GEN,4,12,4,12  2,O'0061',1,0
         TEXT     'OF  '
LEX81    GEN,4,12,4,12  2,O'2045',1,LEX82-HLNK12
         TEXT     'OH  '            TO PF
LEX11    GEN,4,12,4,12  2,O'0056',1,LEX9F-HLNK12
         TEXT     'ON  '            TO VALUES
LEX51    GEN,4,12,4,12  2,O'2117',1,0
         TEXT     'OV  '
LEX59    GEN,4,12,4,12  2,O'2121',1,0
         TEXT     'PAGE'
LEX82    GEN,4,12,4,12  2,O'2050',1,LEX84-HLNK12
         TEXT     'PF  '            TO PLUS
LEX64    GEN,4,12,4,12  2,O'2051',1,LEX85-HLNK12
         TEXT     'PH  '            TO RD
LEX83    GEN,4,12,4,12  2,O'2122',1,0
         TEXT     'PIC '
LEX84    GEN,4,12,4,12  2,O'2124',1,LEX9D-HLNK12
         TEXT     'PLUS'            TO USAGE
LEX85    GEN,4,12,4,12  2,O'3001',1,0
         TEXT     'RD  '
LEX6C    GEN,4,12,4,12  2,O'2046',1,0
         TEXT     'RF  '
LEX74    GEN,4,12,4,12  2,O'2047',1,0
         TEXT     'RH  '
LEX86    GEN,4,12,4,12  2,O'3002',1,LEX9A-HLNK12
         TEXT     'SD  '            TO SPACES
LEX58    GEN,4,12,4,12  2,O'2164',1,0
         TEXT     'SUM '
LEX6B    GEN,4,12,4,12  2,O'2166',1,LEX87-HLNK12
         TEXT     'SYNC'            TO WHEN
LEX7B    GEN,4,12,4,12  2,O'0105',1,LEX8A-HLNK12
         TEXT     'THRU'            TO COMP-3
LEX7D    GEN,4,12,4,12  2,O'0107',1,0
         TEXT     'TO  '
LEX77    GEN,4,12,4,12  2,O'2170',1,LEX88-HLNK12
         TEXT     'TYPE'            TO BLANK
LEX39    GEN,4,12,4,12  2,O'0113',1,LEXA9-HLNK12
         TEXT     'UPON'            TO COMPUTATIONAL
LEX87    GEN,4,12,4,12  2,O'1042',1,LEX99-HLNK12
         TEXT     'WHEN'            TO SOURCE
LEX2B    GEN,4,12,4,12  2,O'0116',1,0
         TEXT     'WITH'
LEX1F    GEN,4,12,4,12  2,O'0117',1,LEX8D-HLNK12
         TEXT     'ZERO'            TO FINAL
*
*    LEXICON WORD OF TWO WORDS
*
LEX88    GEN,4,12,4,12  2,O'2013',2,LEX89-HLNK12
         TEXT     'BLANK   '        TO COMP-2
LEX21    GEN,4,12,4,12  2,O'2015',2,LEX91-HLNK12
         TEXT     'BLOCK   '        TO OCCRUS
LEX18    GEN,4,12,4,12  2,O'2024',2,LEXA0-HLNK12
         TEXT     'COLUMN  '        TO CHARACTERS
LEX73    GEN,4,12,4,12  2,O'2027',2,0
         TEXT     'COMP-1  '
LEX89    GEN,4,12,4,12  2,O'2030',2,0
         TEXT     'COMP-2  '
LEX8A    GEN,4,12,4,12  2,O'2204',2,LEXA2-HLNK12
         TEXT     'COMP-3  '        TO HIGH-VALUES
LEX00    GEN,4,12,4,12  2,O'2033',2,LEX8C-HLNK12
         TEXT     'CONTAINS'        TO DIVISION
LEX71    GEN,4,12,4,12  2,O'2034',2,LEXA8-HLNK12
         TEXT     'CONTROL '        TO COMMON-STORAGE
LEX72    GEN,4,12,4,12  2,O'2034',2,0
         TEXT     'CONTROLS'
LEX1B    GEN,4,12,4,12  2,O'2055',2,0
         TEXT     'DETAIL  '
LEX8B    GEN,4,12,4,12  2,O'1604',2,LEX9E-HLNK12
         TEXT     'DISPLAY '        TO VALUE
LEX8C    GEN,4,12,4,12  2,O'0017',2,LEX9C-HLNK12
         TEXT     'DIVISION'        TO TIMES
LEX13    GEN,4,12,4,12  2,O'2064',2,0
         TEXT     'FILLER  '
LEX8D    GEN,4,12,4,12  2,O'2065',2,LEXAA-HLNK12
         TEXT     'FINAL   '        TO COMPUTATIONAL-1
LEX8E    GEN,4,12,4,12  2,O'0025',2,0
         TEXT     'FIRST   '
LEX6E    GEN,4,12,4,12  2,O'2067',2,LEX96-HLNK12
         TEXT     'FOOTING '        TO REPORT
LEX0A    GEN,4,12,4,12  2,O'2071',2,LEX98-HLNK12
         TEXT     'GROUP   '        TO SELECTED
LEX0F    GEN,4,12,4,12  2,O'2072',2,LEX94-HLNK12
         TEXT     'HEADING '        TO RECORDS
LEX66    GEN,4,12,4,12  2,O'2203',2,0
         TEXT     'INDEX   '
LEX8F    GEN,4,12,4,12  2,O'2175',2,0
         TEXT     'INDEXED '
LEX16    GEN,4,12,4,12  2,O'2074',2,0
         TEXT     'INDICATE'
LEX41    GEN,4,12,4,12  2,O'0041',2,0
         TEXT     'LABEL   '
LEX0C    GEN,4,12,4,12  2,O'2104',2,0
         TEXT     'LIBRARY '
LEX90    GEN,4,12,4,12  2,O'2105',2,0
         TEXT     'LIMIT   '
LEX14    GEN,4,12,4,12  2,O'2105',2,0
         TEXT     'LIMITS  '
LEX01    GEN,4,12,4,12  2,O'0044',2,0
         TEXT     'LINES   '
LEX23    GEN,4,12,4,12  2,O'3005',2,LEXAD-HLNK12
         TEXT     'LINKAGE '        TO COMPUTATIONAL-3
LEX7A    GEN,4,12,4,12  2,O'2111',2,LEXA5-HLNK12
         TEXT     'NUMBER  '        TO LOW-VALUES
LEX91    GEN,4,12,4,12  2,O'2113',2,LEXAB-HLNK12
         TEXT     'OCCURS  '        TO COMPUTATIONAL-2
LEX57    GEN,4,12,4,12  2,O'2115',2,0
         TEXT     'OMITTED '
LEX92    GEN,4,12,4,12  2,O'2120',2,0
         TEXT     'OVERFLOW'
LEX02    GEN,4,12,4,12  2,O'2122',2,0
         TEXT     'PICTURE '
LEX2E    GEN,4,12,4,12  2,O'0064',2,0
         TEXT     'QUOTE   '
LEX93    GEN,4,12,4,12  2,O'0064',2,0
         TEXT     'QUOTES  '
LEX48    GEN,4,12,4,12  2,O'0065',2,LEX9B-HLNK12
         TEXT     'RECORD  '        TO THROUGH
LEX94    GEN,4,12,4,12  2,O'0065',2,LEX95-HLNK12
         TEXT     'RECORDS '        TO RENAMES
LEX95    GEN,4,12,4,12  2,O'2140',2,0
         TEXT     'RENAMES '
LEX96    GEN,4,12,4,12  2,O'2142',2,0
         TEXT     'REPORT  '
LEX34    GEN,4,12,4,12  2,O'2142',2,LEXA1-HLNK12
         TEXT     'REPORTS '        TO HIGH-VALUE
LEX97    GEN,4,12,4,12  2,O'1631',2,0
         TEXT     'RESET   '
LEX1D    GEN,4,12,4,12  2,O'2146',2,0
         TEXT     'RIGHT   '
LEX05    GEN,4,12,4,12  2,O'0075',2,0
         TEXT     'SECTION '
LEX98    GEN,4,12,4,12  2,O'2153',2,0
         TEXT     'SELECTED'
LEX99    GEN,4,12,4,12  2,O'2160',2,0
         TEXT     'SOURCE  '
LEX20    GEN,4,12,4,12  2,O'0100',2,0
         TEXT     'SPACE   '
LEX9A    GEN,4,12,4,12  2,O'0100',2,0
         TEXT     'SPACES  '
LEX06    GEN,4,12,4,12  2,O'0101',2,LEXA3-HLNK12
         TEXT     'STANDARD'        TO JUSTIFIED
LEX0E    GEN,4,12,4,12  2,O'0000',2,0
         TEXT     'TALLY   '
LEX9B    GEN,4,12,4,12  2,O'0105',2,0
         TEXT     'THROUGH '
LEX9C    GEN,4,12,4,12  2,O'0106',2,0
         TEXT     'TIMES   '
LEX9D    GEN,4,12,4,12  2,O'2172',2,0
         TEXT     'USAGE   '
LEX9E    GEN,4,12,4,12  2,O'2173',2,0
         TEXT     'VALUE   '
LEX9F    GEN,4,12,4,12  2,O'2173',2,0
         TEXT     'VALUES  '
LEX4D    GEN,4,12,4,12  2,O'0117',2,0
         TEXT     'ZEROES  '
LEX2A    GEN,4,12,4,12  2,O'0117',2,0
         TEXT     'ZEROS   '
*
*    LEXICON WORD OF THREE WORDS
*
LEX56    GEN,4,12,4,12  2,O'0006',3,0
         TEXT     'ASCENDING   '
LEXA0    GEN,4,12,4,12  2,O'2016',3,0
         TEXT     'CHARACTERS  '
LEX22    GEN,4,12,4,12  2,O'0015',3,0
         TEXT     'DEPENDING   '
LEX49    GEN,4,12,4,12  2,O'0016',3,0
         TEXT     'DESCENDING  '
LEXA1    GEN,4,12,4,12  2,O'0031',3,0
         TEXT     'HIGH-VALUE  '
LEXA2    GEN,4,12,4,12  2,O'0031',3,0
         TEXT     'HIGH-VALUES '
LEXA3    GEN,4,12,4,12  2,O'2077',3,0
         TEXT     'JUSTIFIED   '
LEX36    GEN,4,12,4,12  2,O'0000',3,0
         TEXT     'LINE-COUNTER'
LEXA4    GEN,4,12,4,12  2,O'0047',3,0
         TEXT     'LOW-VALUE   '
LEXA5    GEN,4,12,4,12  2,O'0047',3,0
         TEXT     'LOW-VALUES  '
LEXA6    GEN,4,12,4,12  2,O'0000',3,0
         TEXT     'PAGE-COUNTER'
LEX79    GEN,4,12,4,12  2,O'1040',3,LEXAC-HLNK12
         TEXT     'PROCEDURE   '    TO WORKING-STORAGE
LEX7F    GEN,4,12,4,12  2,O'2136',3,0
         TEXT     'REDEFINES   '
LEXA7    GEN,4,12,4,12  2,O'0067',3,0
         TEXT     'REPLACING   '
LEX63    GEN,4,12,4,12  2,O'2166',3,0
         TEXT     'SYNCHRONIZED'
*
*    LEXICON WORD OF FOUR WORDS
*
LEXA8    GEN,4,12,4,12  2,O'3004',4,0
         TEXT     'COMMON-STORAGE  '
LEXA9    GEN,4,12,4,12  2,O'2026',4,0
         TEXT     'COMPUTATIONAL   '
LEXAA    GEN,4,12,4,12  2,O'2027',4,0
         TEXT     'COMPUTATIONAL-1 '
LEXAB    GEN,4,12,4,12  2,O'2030',4,0
         TEXT     'COMPUTATIONAL-2 '
LEXAD    GEN,4,12,4,12  2,O'2204',4,0
         TEXT     'COMPUTATIONAL-3 '
LEXAC    GEN,4,12,4,12  2,O'3003',4,0
         TEXT     'WORKING-STORAGE '
         END
