*DECK CBDIAGM                                                           026240
          IDENT CBDIAGM 
          ENTRY DIAGPTR 
          ENTRY D100
D100      DATA    50H  ***100***                EMPTY INPUT FILE
D101      DATA    50H  ***101***                TITLE DIVISION DECLARAT 
          DATA    16HION IS INCORRECT 
D102      DATA    50H  ***102***                TITLE DIVISION / SUB-SC 
          DATA    50HHEMA DECLARATION IS INCORRECT, COMPILATION ABORTED 
D103      DATA    50H  ***103***                SUB-SCHEMA DECLARATION
          DATA    12HIS INCORRECT 
D104      DATA    50H  ***104***                INVALID SCHEMA NAME, CO 
          DATA    17HMPILATION ABORTED
D105      DATA    50H  ***105***                ALIAS DIVISION DECLARAT 
          DATA    16HION IS INCORRECT 
D106      DATA    50H  ***106***                AD DECLARATION IS INCO
          DATA    05RRECT 
D107      DATA    50H  ***107***                INVALID NAME IN ALIAS D 
          DATA    07HIVISION
D108      DATA    50H  ***108***                RESERVED WORD -BECOMES
          DATA    12H- IS MISSING 
D109      DATA    50H  ***109***                DUPLICATE ALIAS NAME
D110      DATA    50H  ***110***                ALIAS-NAME-1 UNKNOWN
D111      DATA    50H  ***111***                INVALID QUALIFIER NAME
D112      DATA    50H  ***112***                REALM DIVISION NOT SPEC 
          DATA    30HIFIED, DEFAULTED TO  - ALL-
D113      DATA    50H  ***113***                REALM DIVISION TITLE IS 
          DATA    10H INCORRECT 
D114      DATA    50H  ***114***                REALM DESCRIPTION IS IN 
          DATA    30HCORRECT, DEFAULTED TO  -ALL- 
D115      DATA    50H  ***115***                 INVALID REALM NAME 
D116      DATA    50H  ***116***                DUPLICATE REALM NAME
D117      DATA    50H  ***117***                RECORD DIVISION TITLE I 
          DATA    20HS INCORRECT
D118      DATA    50H  ***118***                LEVEL NUMBER NOT SPECIF 
          DATA    30HIED, DEFAULTED TO -01- 
D119      DATA    50H  ***119***                FIRST ENTRY IN RECORD D 
          DATA    50HIVISION IS NOT A RECORD ENTRY, UNABLE TO CONTINUE
          DATA    30H - COMPILATION ABORTED 
D120      DATA    50H  ***120***                INVALID RECORD NAME 
D121      DATA    50H  ***121***                DUPLICATE RECORD NAME 
D122      DATA    50H  ***122***                 CANNOT LOCATE OWNER RE 
          DATA    30HALM IN THE SCHEMA
D123      DATA    50H  ***123***                INVALID LEVEL NUMBER
D124      DATA    50H  ***124***                INVALID DATA-NAME 
D125      DATA    50H  ***125***                DATA-NAME NOT UNIQUE
D126      DATA    50H  ***126***                VALUE OF LEVEL NUMBER I 
          DATA    50HS LESS THAN THE FIRST ITEM DEFINED IN THE RECORD 
D127      DATA    50H  ***127***                PICTURE LITERAL GREATER 
          DATA    52HTHAN 30 CHARACTERS, RIGHT MOST CHARACTERS TRUNCATED
D128      DATA    50H  ***128***                INVALID USAGE TYPE, DEF 
          DATA    20HAULTED TO -DISPLAY-
D129      DATA    50H  ***129***                USAGE DOES NOT AGREE WI 
          DATA    40HTH THE USAGE SPECIFIED IN THE GROUP ITEM 
D130      DATA    50H  ***130***                INVALID OCCURENCE VALUE 
D131      DATA    50H  ***131**                  THE SECOND OCCURRENCE
          DATA    39HVALUE IS LESS THAN THE FIRST OCCURRENCE
D133      DATA    50H  ***133***                DEPENDING ON DATA-NAME
          DATA    10HIS INVALID 
D134      DATA    50H  ***134***                DEPENDING ON DATA-NAME
          DATA    30HIS UNDEFINED IN CURRENT RECORD 
D135      DATA    50H  ***135***                A VARIABLE-OCCURENCE DA 
          DATA    50HTA ITEM IS NOT ALLOWED TO BE A SUBORDINATE OF AN D 
          DATA    31HATA ITEM WITH AN OCCURS CLAUSE 
D136      DATA    50H  ***136***                USAGE TYPE OF THE DEPEN 
          DATA    30HDING ON NAME IS INVALID
D137      DATA    50H  ***137***                INVALID KEY NAME
D138      DATA    50H  ***138***                INVALID INDEX NAME
D139      DATA    51H  ***139                   INDEX NAME IS NOT UNIQUE
D140      DATA    50H  ***140***                LEVEL NUMBER IS OUT OF
          DATA    50HRANGE, AS BEEN READJUSTED TO AN -02- LEVEL 
D141      DATA    50H  ***141***                DATA DESCRIPTION ENTRY
          DATA    32HWAS NOT TERMINATED WITH A PERIOD 
D142      DATA    50H  ***142***                ALIAS ENTRY TYPE NOT SP 
          DATA    10HECIFIED
D143      DATA    50H  ***143***                DATA IS THE ONLY ENTRY
          DATA    30HTYPE THAT CAN BE QUALIFIED 
D144      DATA    50H  ***144***                UNKNOWN QUALIFIER NAME
D145      DATA    50H  ***145***
          DATA    43H           INVALID IN THE FOLLOWING CLAUSE 
D146      DATA    50H  ***146***                TITLE DIVISION NOT SPEC 
          DATA    30HIFIED - COMPILATION ABORTED
D147      DATA    50H  ***147***                SS - KEYWORD MISSING
D148      DATA    50H  ***148***                INVALID SCHEMA OR SUB-S 
          DATA    10HCHEMA NAME 
D149      DATA    51H  ***149***                WITHIN - KEYWORD MISSING
D150      DATA    50H  ***150***                UNABLE TO COMPLETE ENTR 
          DATA   50HY - ENTRY WILL BE IGNORED - SEARCHING FOR A PERIOD   D2A167 
D151      DATA    40H  ***151***                PERIOD FOUND
D152      DATA    50H  ***152***                TITLE DIVISION TITLE IS 
          DATA    10H INCORRECT 
D153      DATA    50H  ***153***                UNKNOWN SOURCE WORD 
D154      DATA    40H  ***154***                UNDEFINED KEY 
D155      DATA    50H  ***155***                SCHEMA NAME SPECIFIED I 
          DATA    50HN THE SUB-SCHEMA DOES NOT MATCH THE SCHEMA NAME IN 
          DATA    20H THE SCHEMA
D156      DATA    50H  ***156***                 REDEFINING A REDEFINES 
          DATA    50H ENTRY IS INVALID, MUST USE THE DATA NAME OF THE E 
          DATA    37HNTRY THAT ORIGINALLY DEFINED THE AREA
D157      DATA    50H  ***157***                EDITING CHARACTERS NOT
          DATA    20H ALLOWED IN PICTURE
D158      DATA    50H  ***158***                ILLEGAL CHARACTER IN PI 
          DATA    10HCTURE
D159      DATA    50H  ***159***                PICTURE SIZE EXCEEDS MA 
          DATA    25HXIMUM OF 32767 CHARACTERS
D160      DATA    50H  ***160***                SYNTACTICAL ERROR IN PI 
          DATA    10HCTURE
D161      DATA    50H  ***161***                EXCESS REPEAT COUNT IN
          DATA    20HEDITED PICTURE 
D162      DATA    50H  ***162***                MAXIMUM OF 63 INSERTION 
          DATA    30H CHARACTERS ALLOWED IN PICTURE 
D163      DATA    50H  ***163***                NON NUMERIC WITHIN PARE 
          DATA    10HNTHESES
D164      DATA    50H  ***164***                NUMERIC ITEM GREATER TH 
          DATA    10HAN 18
D165      DATA    50H  ***165***                IN THE PRIOR ITEM ENTRY 
          DATA    50H THE USAGE AND/OR PICTURE CLAUSE MUST BE SPECIFIED 
D166      DATA    50H  ***166***                INVALID SUBSCRIPT IN CL 
          DATA    10HASS MATRIX 
D167      DATA    50H  ***167***                ALPHABETIC OR ALPHANUME 
          DATA    50HRIC PICTURE NOT ALLOWED WITH USAGE IS COMP, COMP-1 
          DATA    20H OR COMP-2 
D168      DATA    50H  ***168***                PICTURE CLAUSE IS NOT A 
          DATA    30HLLOWED WITH USAGE IS INDEX 
D169      DATA    50H  ***169***                EMPTY SCHEMA DIRECTORY
D170      DATA    50H  ***170***                IN THE PRIOR ITEM ENTRY 
          DATA    50H THE PICTURE CLAUSE IS NOT ALLOWED IN A GROUP ITEM 
D171      DATA    50H  ***171***                INSUFFICIENT FIELD LEN
          DATA    40HGTH, INCREASE YOUR FL--DDL ABORTED 
D172      DATA    50H  ***172***                 REDEFINED NAME IS EITH 
          DATA    30HER MISSING OR INVALID
D173      DATA    50H  ***173***                 REDEFINED NAME DOES NO 
          DATA    10HT EXIST
D174      DATA    50H  ***174***                 ORIGINALLY DEFINED ITE 
          DATA    50HM CANNOT CONTAIN AN OCCURS CLAUSE
D175      DATA    50H  ***175***                 INVALID LEVEL NUMBER F 
          DATA    20HOR REDEFINES 
D176      DATA    50H  ***176***                 LEVEL NUMBER OF DATA-N 
          DATA    40HAME-1 IS NOT IDENTICAL TO DATA-NAME-2
D177      DATA    50H  ***177***                 REDEFINED ITEM CANNOT
          DATA    50HCONTAIN AN OCCURS OF VARIABLE DEMENSION
D178      DATA    50H  ***178***                 THE SIZE OF THE REDEFI 
          DATA    50HNED ITEM IS NOT THE SAME AS THE ORIGINALLY DEFINED 
          DATA    10H ITEM
D179      DATA    50H  ***179***                 UNABLE TO COPY AREA EN 
          DATA    40HTRIES FROM THE SCHEMA, SCHEMA IS INVALID 
D180      DATA    50H  ***180***                 RESERVE WORD -RENAMES
          DATA    20H- IS MISSING 
D181      DATA    50H  ***181***                 UNABLE TO FIND DATA-NA 
          DATA    10HME-2 
D182      DATA    50H  ***182***                 A 66 LEVEL ENTRY CANNO 
          DATA    30HT RENAME A 66 OR 88 LEVEL ITEM 
D183      DATA    50H  ***183***                 DATA-NAME-I AND DATA-N 
          DATA    50HAME-3 CANNOT CONTAIN AN OCCURS CLAUSE OR BE SUBORD 
          DATA    40HINATE TO AN ITEM WITH AN OCCURS
D184      DATA    50H  ***184***                 NONE OF THE ITEMS WITH 
          DATA    50HIN THE RANGE CAN BE VARIABLE-OCCURENCE DATA-ITEMS
D185      DATA    50H  ***185***                 DATA-NAME-2 AND DATA-N 
          DATA    40HAME-3 CANNOT BE THE SAME NAME
D186      DATA    50H  ***186***                 DATA-NAME-3 IS DEFINED 
          DATA    50H BEFORE DATA-NAME2 
D187      DATA    50H  ***187***                 UNABLE TO FIND DATA-NA 
          DATA    10HME-3 
D188      DATA    50H  ***188***                 DATA-NAME-3 CANNOT BE
          DATA    30HSUBORDINATE TO DATA-NAME-2 
D189      DATA    50H  ***189***                 TARGET DATA ITEM MUST
          DATA    31HBE AN ELEMANTARY ITEM OR VECTOR
D190      DATA    50H  ***190***                 KEYWORD VALUE NOT SPEC 
          DATA    30HIFIED FOR CONDITION-NAME ENTRY 
D191      DATA    50H  ***191***                 LITERAL IS EITHER MISS 
          DATA    14HING OR INVALID 
D192      DATA    50H  ***192***                 LITERALS ARE NOT IN AS 
          DATA    13HCENDING ORDER
D193      DATA    50H  ***193***                 ITEM IS NOT SUBORDINAT 
          DATA    40HE TO THE GROUP THAT DEFINED IT AS A KEY
D194      DATA    50H  ***194***                 KEY ITEMS CANNOT CONTA 
          DATA    20HIN AN OCCURS CLAUSE
D195      DATA    50H  ***195***                 UNABEL TO LOCATE KEY E 
          DATA    10HNTRY 
D196      DATA    50H  ***196***                LEVEL 66 ITEM ENTRIES M 
          DATA    51HUST BE DEFINED AT THE END OF THE RECORD DESCRIPTION
D200      DATA    50H  ***200***                SYNCHRONIZED LEFT IS AS 
          DATA    10HSUMED
D199      DATA    50H  ***199***                 MAXIMUM OF 14 CHARACTE 
          DATA    30HRS ARE ALLOWED FOR COMP-1
D201      DATA   50H  ***201***                  AN ALIASED NAME MUST 
          DATA   50HBE REFERENCED BY THE ALIAS-NAME SPECIFIED IN THE A
          DATA   13HLIAS DIVISION 
D202      DATA    50H  ***202***                 MAXIMUM AREA COUNT EXC 
          DATA    05HEEDED
D204      DATA    50H  ***204***                 MAXIMUM ITEM COUNT EXC 
          DATA    05HEEDED
D203      DATA    50H  ***203***                 MAXIMUM RECORD COUNT E 
          DATA    07HXCEEDED
D205      DATA    50H  ***205***                 MAXIMUM ITEM COUNT FOR 
          DATA    18H A RECORD EXCEEDED 
D206      DATA    50H  ***206***                 FATAL ERRORS OCCURRED
          DATA    31H-- FOLLOWING STATEMENTS IGNORED
 D207     DATA    50H  ***207***                 REDEFINES ENTRY DOES N 
          DATA    43HOT IMMEDIATELY FOLLOW ENTRY BEING REDEFINED
DIAGPTR   VFD    4/0,8/50,18/D100,4/0,8/66,18/D101
          VFD    4/0,8/101,18/D102,4/0,8/62,18/D103 
          VFD    4/0,8/67,18/D104,4/0,8/66,18/D105
          VFD    4/0,8/55,18/D106,4/0,8/57,18/D107
          VFD    4/0,8/62,18/D108,4/0,8/50,18/D109
          VFD    4/0,8/50,18/D110,4/0,8/50,18/D111
          VFD    4/0,8/80,18/D112,4/0,8/60,18/D113
          VFD    4/0,8/80,18/D114,4/0,8/50,18/D115
          VFD    4/0,8/50,18/D116,4/0,8/70,18/D117
          VFD    4/0,8/80,18/D118,4/0,8/130,18/D119 
          VFD    4/0,8/50,18/D120,4/0,8/50,18/D121
          VFD    4/0,8/80,18/D122,4/0,8/50,18/D123
          VFD    4/0,8/50,18/D124,4/0,8/50,18/D125
          VFD    4/0,8/100,18/D126,4/0,8/102,18/D127
          VFD     4/0,8/70,18/D128,4/0,8/90,18/D129 
          VFD    4/0,8/50,18/D130 
          VFD    4/0,8/89,18/D131 
          VFD    30/0 
          VFD    4/0,8/60,18/D133 
          VFD    4/0,8/80,18/D134,4/0,8/131,18/D135 
          VFD    4/0,8/80,18/D136,4/0,8/50,18/D137
          VFD    4/0,8/50,18/D138,4/0,8/51,18/D139
          VFD    4/0,8/100,18/D140,4/0,8/90,18/D141 
          VFD    4/0,8/60,18/D142,4/0,8/80,18/D143
          VFD    4/0,8/50,18/D144,4/0,8/93,18/D145
          VFD    4/0,8/80,18/D146,4/0,8/50,18/D147
          VFD    4/0,8/60,18/D148,4/0,8/51,18/D149
          VFD    4/0,8/100,18/D150,4/0,8/40,18/D151 
          VFD    4/0,8/60,18/D152,4/0,8/50,18/D153
          VFD    4/0,8/40,18/D154,4/0,8/120,18/D155 
          VFD    4/0,8/137,18/D156,4/0,8/70,18/D157 
          VFD     4/0,8/60,18/D158,4/0,8/75,18/D159 
          VFD    4/0,8/60,18/D160,4/0,8/70,18/D161
          VFD    4/0,8/80,18/D162,4/0,8/60,18/D163
          VFD    4/0,8/60,18/D164,4/0,8/100,18/D165 
          VFD    4/0,8/60,18/D166,4/0,8/120,18/D167 
          VFD    4/0,8/80,18/D168,4/0,8/50,18/D169
          VFD    4/0,8/100,18/D170,4/0,8/80,18/D171 
          VFD    4/0,8/80,18/D172,4/0,8/60,18/D173
          VFD    4/0,8/100,18/D174,4/0,8/70,18/D175 
          VFD    4/0,8/90,18/D176,4/0,8/100,18/D177 
          VFD    4/0,8/110,18/D178,4/0,8/90,18/D179 
          VFD    4/0,8/70,18/D180,4/0,8/60,18/D181
          VFD    4/0,8/80,18/D182,4/0,8/140,18/D183 
          VFD    4/0,8/100,18/D184,4/0,8/90,18/D185 
          VFD    4/0,8/100,18/D186,4/0,8/60,18/D187 
          VFD    4/0,8/80,18/D188,4/0,8/90,18/D189
          VFD    4/0,8/80,18/D190,4/0,8/70,18/D191
          VFD     4/0,8/70,18/D192,4/0,8/90,18/D193 
          VFD     4/0,8/70,18/D194,4/0,8/60,18/D195 
          VFD    4/0,8/101,18/D196
          VFD    30/0 
          VFD    30/0 
          VFD    30/0 
          VFD    4/7,8/60,18/D200,4/0,8/113,18/D201 
          VFD     4/0,8/55,18/D202,4/0,8/57,18/D203 
          VFD     4/0,8/55,18/D204,4/0,8/68,18/D205 
          VFD    4/0,8/81,18/D206 
          VFD    4/0,8/93,18/D207      REDFSCN IN CBPASS1 
          END 
