      ****************************************************************  00010002
      * COPYBOOK: COMORB19                                           *  00020002
      * 19 COMORBIDITY TABLES FOR USE IN INPATIENT PSYCH PPS PRICER  *  00030002
      * CATEGORIES 1-6, 6P, AND 7-17                                 *  00040002
      * EFFECTIVE: 10/01/2018                                        *  00050002
      ****************************************************************  00070002
      * UPDATED CAT6  - ONCOLOGY TREATMENT - DIAGNOSIS CODES         *  00100002
      * UPDATED CAT11 - DRUG AND/OR ALCOHOL INDUCED MENTAL DISORDERS *  00100102
      * UPDATED CAT13 - GANGRENE                                     *  00100202
      * UPDATED CAT17 - POISONING                                    *  00101002
      ****************************************************************  00120002
      * DEVELOPMENTAL DISABILITIES                                   *  00130002
      ****************************************************************  00140002
       01 CAT1-TABLE.                                                   00150002
           05  CAT1-TABLE-DATA.                                         00160002
               10  FILLER           PIC X(7) VALUE 'F70    '.           00170002
               10  FILLER           PIC X(7) VALUE 'F71    '.           00180002
               10  FILLER           PIC X(7) VALUE 'F72    '.           00190002
               10  FILLER           PIC X(7) VALUE 'F73    '.           00200002
               10  FILLER           PIC X(7) VALUE 'F78    '.           00210002
               10  FILLER           PIC X(7) VALUE 'F79    '.           00220002
           05  FILLER     REDEFINES CAT1-TABLE-DATA.                    00230002
               10  CAT1-DATA        OCCURS  6 TIMES                     00240002
                                    ASCENDING KEY IS CAT1-CODE          00250002
                                    INDEXED BY IX-CAT1.                 00260002
                   15  CAT1-CODE    PIC X(7).                           00270002
                                                                        00280002
      ****************************************************************  00290002
      * COAGULATION FACTOR DEFICITS                                  *  00300002
      ****************************************************************  00310002
       01 CAT2-TABLE.                                                   00320002
           05  CAT2-TABLE-DATA.                                         00330002
               10  FILLER           PIC X(7) VALUE 'D66    '.           00340002
               10  FILLER           PIC X(7) VALUE 'D67    '.           00350002
               10  FILLER           PIC X(7) VALUE 'D680   '.           00360002
               10  FILLER           PIC X(7) VALUE 'D681   '.           00370002
               10  FILLER           PIC X(7) VALUE 'D682   '.           00380002
           05  FILLER     REDEFINES CAT2-TABLE-DATA.                    00390002
               10  CAT2-DATA        OCCURS  5 TIMES                     00400002
                                    ASCENDING KEY IS CAT2-CODE          00410002
                                    INDEXED BY IX-CAT2.                 00420002
                   15  CAT2-CODE    PIC X(7).                           00430002
                                                                        00440002
      ****************************************************************  00450002
      * TRACHEOSTOMY                                                 *  00460002
      ****************************************************************  00470002
       01 CAT3-TABLE.                                                   00480002
           05  CAT3-TABLE-DATA.                                         00490002
               10  FILLER           PIC X(7) VALUE 'J9500  '.           00500002
               10  FILLER           PIC X(7) VALUE 'J9501  '.           00510002
               10  FILLER           PIC X(7) VALUE 'J9502  '.           00520002
               10  FILLER           PIC X(7) VALUE 'J9503  '.           00530002
               10  FILLER           PIC X(7) VALUE 'J9504  '.           00540002
               10  FILLER           PIC X(7) VALUE 'J9509  '.           00550002
               10  FILLER           PIC X(7) VALUE 'Z930   '.           00560002
           05  FILLER     REDEFINES CAT3-TABLE-DATA.                    00570002
               10  CAT3-DATA        OCCURS 7 TIMES                      00580002
                                    ASCENDING KEY IS CAT3-CODE          00590002
                                    INDEXED BY IX-CAT3.                 00600002
                   15  CAT3-CODE    PIC X(7).                           00610002
                                                                        00620002
      ****************************************************************  00630002
      * RENAL FAILURE, ACUTE                                         *  00640002
      ****************************************************************  00650002
       01 CAT4-TABLE.                                                   00660002
           05  CAT4-TABLE-DATA.                                         00670002
               10  FILLER           PIC X(7) VALUE 'N170   '.           00680002
               10  FILLER           PIC X(7) VALUE 'N171   '.           00690002
               10  FILLER           PIC X(7) VALUE 'N172   '.           00700002
               10  FILLER           PIC X(7) VALUE 'N178   '.           00710002
               10  FILLER           PIC X(7) VALUE 'N179   '.           00720002
               10  FILLER           PIC X(7) VALUE 'O0482  '.           00730002
               10  FILLER           PIC X(7) VALUE 'O0732  '.           00740002
               10  FILLER           PIC X(7) VALUE 'O084   '.           00750002
               10  FILLER           PIC X(7) VALUE 'O904   '.           00760002
               10  FILLER           PIC X(7) VALUE 'T795XXA'.           00770002
           05  FILLER     REDEFINES CAT4-TABLE-DATA.                    00780002
               10  CAT4-DATA        OCCURS 10 TIMES                     00790002
                                    ASCENDING KEY IS CAT4-CODE          00800002
                                    INDEXED BY IX-CAT4.                 00810002
                   15  CAT4-CODE    PIC X(7).                           00820002
                                                                        00830002
      ****************************************************************  00840002
      * RENAL FAILURE, CHRONIC - EFFECTIVE 10/01/2005                *  00850002
      ****************************************************************  00860002
       01 CAT5-TABLE.                                                   00870002
           05  CAT5-TABLE-DATA.                                         00880002
               10  FILLER           PIC X(7) VALUE 'I120   '.           00890002
               10  FILLER           PIC X(7) VALUE 'I1311  '.           00900002
               10  FILLER           PIC X(7) VALUE 'I132   '.           00910002
               10  FILLER           PIC X(7) VALUE 'N183   '.           00920002
               10  FILLER           PIC X(7) VALUE 'N184   '.           00930002
               10  FILLER           PIC X(7) VALUE 'N185   '.           00940002
               10  FILLER           PIC X(7) VALUE 'N186   '.           00950002
               10  FILLER           PIC X(7) VALUE 'N189   '.           00960002
               10  FILLER           PIC X(7) VALUE 'N19    '.           00970002
               10  FILLER           PIC X(7) VALUE 'Z4901  '.           00980002
               10  FILLER           PIC X(7) VALUE 'Z4902  '.           00990002
               10  FILLER           PIC X(7) VALUE 'Z4931  '.           01000002
               10  FILLER           PIC X(7) VALUE 'Z9115  '.           01010002
               10  FILLER           PIC X(7) VALUE 'Z992   '.           01020002
           05  FILLER     REDEFINES CAT5-TABLE-DATA.                    01030002
               10  CAT5-DATA        OCCURS 14 TIMES                     01040002
                                    ASCENDING KEY IS CAT5-CODE          01050002
                                    INDEXED BY IX-CAT5.                 01060002
                   15  CAT5-CODE    PIC X(7).                           01070002
                                                                        01080002
      ****************************************************************  01090002
      * ONCOLOGY TREATMENT - DIAGNOSIS CODES                         *  01100002
      ****************************************************************  01110002
       01 CAT6-TABLE.                                                   01120002
           05  CAT6-TABLE-DATA.                                         01130002
               10  FILLER           PIC X(7) VALUE 'C000   '.           01140002
               10  FILLER           PIC X(7) VALUE 'C001   '.           01150002
               10  FILLER           PIC X(7) VALUE 'C002   '.           01160002
               10  FILLER           PIC X(7) VALUE 'C003   '.           01170002
               10  FILLER           PIC X(7) VALUE 'C004   '.           01180002
               10  FILLER           PIC X(7) VALUE 'C005   '.           01190002
               10  FILLER           PIC X(7) VALUE 'C006   '.           01200002
               10  FILLER           PIC X(7) VALUE 'C008   '.           01210002
               10  FILLER           PIC X(7) VALUE 'C01    '.           01220002
               10  FILLER           PIC X(7) VALUE 'C020   '.           01230002
               10  FILLER           PIC X(7) VALUE 'C021   '.           01240002
               10  FILLER           PIC X(7) VALUE 'C022   '.           01250002
               10  FILLER           PIC X(7) VALUE 'C023   '.           01260002
               10  FILLER           PIC X(7) VALUE 'C024   '.           01270002
               10  FILLER           PIC X(7) VALUE 'C028   '.           01280002
               10  FILLER           PIC X(7) VALUE 'C030   '.           01290002
               10  FILLER           PIC X(7) VALUE 'C031   '.           01300002
               10  FILLER           PIC X(7) VALUE 'C040   '.           01310002
               10  FILLER           PIC X(7) VALUE 'C041   '.           01320002
               10  FILLER           PIC X(7) VALUE 'C048   '.           01330002
               10  FILLER           PIC X(7) VALUE 'C050   '.           01340002
               10  FILLER           PIC X(7) VALUE 'C051   '.           01350002
               10  FILLER           PIC X(7) VALUE 'C052   '.           01360002
               10  FILLER           PIC X(7) VALUE 'C058   '.           01370002
               10  FILLER           PIC X(7) VALUE 'C060   '.           01380002
               10  FILLER           PIC X(7) VALUE 'C061   '.           01390002
               10  FILLER           PIC X(7) VALUE 'C062   '.           01400002
               10  FILLER           PIC X(7) VALUE 'C0680  '.           01410002
               10  FILLER           PIC X(7) VALUE 'C0689  '.           01420002
               10  FILLER           PIC X(7) VALUE 'C07    '.           01430002
               10  FILLER           PIC X(7) VALUE 'C080   '.           01440002
               10  FILLER           PIC X(7) VALUE 'C081   '.           01450002
               10  FILLER           PIC X(7) VALUE 'C089   '.           01460002
               10  FILLER           PIC X(7) VALUE 'C090   '.           01470002
               10  FILLER           PIC X(7) VALUE 'C091   '.           01480002
               10  FILLER           PIC X(7) VALUE 'C098   '.           01490002
               10  FILLER           PIC X(7) VALUE 'C099   '.           01500002
               10  FILLER           PIC X(7) VALUE 'C100   '.           01510002
               10  FILLER           PIC X(7) VALUE 'C101   '.           01520002
               10  FILLER           PIC X(7) VALUE 'C102   '.           01530002
               10  FILLER           PIC X(7) VALUE 'C103   '.           01540002
               10  FILLER           PIC X(7) VALUE 'C104   '.           01550002
               10  FILLER           PIC X(7) VALUE 'C108   '.           01560002
               10  FILLER           PIC X(7) VALUE 'C109   '.           01570002
               10  FILLER           PIC X(7) VALUE 'C110   '.           01580002
               10  FILLER           PIC X(7) VALUE 'C111   '.           01590002
               10  FILLER           PIC X(7) VALUE 'C112   '.           01600002
               10  FILLER           PIC X(7) VALUE 'C113   '.           01610002
               10  FILLER           PIC X(7) VALUE 'C118   '.           01620002
               10  FILLER           PIC X(7) VALUE 'C119   '.           01630002
               10  FILLER           PIC X(7) VALUE 'C12    '.           01640002
               10  FILLER           PIC X(7) VALUE 'C130   '.           01650002
               10  FILLER           PIC X(7) VALUE 'C131   '.           01660002
               10  FILLER           PIC X(7) VALUE 'C132   '.           01670002
               10  FILLER           PIC X(7) VALUE 'C138   '.           01680002
               10  FILLER           PIC X(7) VALUE 'C139   '.           01690002
               10  FILLER           PIC X(7) VALUE 'C140   '.           01700002
               10  FILLER           PIC X(7) VALUE 'C142   '.           01710002
               10  FILLER           PIC X(7) VALUE 'C148   '.           01720002
               10  FILLER           PIC X(7) VALUE 'C153   '.           01730002
               10  FILLER           PIC X(7) VALUE 'C154   '.           01740002
               10  FILLER           PIC X(7) VALUE 'C155   '.           01750002
               10  FILLER           PIC X(7) VALUE 'C158   '.           01760002
               10  FILLER           PIC X(7) VALUE 'C159   '.           01770002
               10  FILLER           PIC X(7) VALUE 'C160   '.           01780002
               10  FILLER           PIC X(7) VALUE 'C161   '.           01790002
               10  FILLER           PIC X(7) VALUE 'C162   '.           01800002
               10  FILLER           PIC X(7) VALUE 'C163   '.           01810002
               10  FILLER           PIC X(7) VALUE 'C164   '.           01820002
               10  FILLER           PIC X(7) VALUE 'C165   '.           01830002
               10  FILLER           PIC X(7) VALUE 'C166   '.           01840002
               10  FILLER           PIC X(7) VALUE 'C168   '.           01850002
               10  FILLER           PIC X(7) VALUE 'C169   '.           01860002
               10  FILLER           PIC X(7) VALUE 'C170   '.           01870002
               10  FILLER           PIC X(7) VALUE 'C171   '.           01880002
               10  FILLER           PIC X(7) VALUE 'C172   '.           01890002
               10  FILLER           PIC X(7) VALUE 'C173   '.           01900002
               10  FILLER           PIC X(7) VALUE 'C178   '.           01910002
               10  FILLER           PIC X(7) VALUE 'C179   '.           01920002
               10  FILLER           PIC X(7) VALUE 'C180   '.           01930002
               10  FILLER           PIC X(7) VALUE 'C181   '.           01940002
               10  FILLER           PIC X(7) VALUE 'C182   '.           01950002
               10  FILLER           PIC X(7) VALUE 'C183   '.           01960002
               10  FILLER           PIC X(7) VALUE 'C184   '.           01970002
               10  FILLER           PIC X(7) VALUE 'C185   '.           01980002
               10  FILLER           PIC X(7) VALUE 'C186   '.           01990002
               10  FILLER           PIC X(7) VALUE 'C187   '.           02000002
               10  FILLER           PIC X(7) VALUE 'C188   '.           02010002
               10  FILLER           PIC X(7) VALUE 'C189   '.           02020002
               10  FILLER           PIC X(7) VALUE 'C19    '.           02030002
               10  FILLER           PIC X(7) VALUE 'C20    '.           02040002
               10  FILLER           PIC X(7) VALUE 'C210   '.           02050002
               10  FILLER           PIC X(7) VALUE 'C211   '.           02060002
               10  FILLER           PIC X(7) VALUE 'C212   '.           02070002
               10  FILLER           PIC X(7) VALUE 'C218   '.           02080002
               10  FILLER           PIC X(7) VALUE 'C220   '.           02090002
               10  FILLER           PIC X(7) VALUE 'C221   '.           02100002
               10  FILLER           PIC X(7) VALUE 'C222   '.           02110002
               10  FILLER           PIC X(7) VALUE 'C223   '.           02120002
               10  FILLER           PIC X(7) VALUE 'C224   '.           02130002
               10  FILLER           PIC X(7) VALUE 'C227   '.           02140002
               10  FILLER           PIC X(7) VALUE 'C228   '.           02150002
               10  FILLER           PIC X(7) VALUE 'C229   '.           02160002
               10  FILLER           PIC X(7) VALUE 'C23    '.           02170002
               10  FILLER           PIC X(7) VALUE 'C240   '.           02180002
               10  FILLER           PIC X(7) VALUE 'C241   '.           02190002
               10  FILLER           PIC X(7) VALUE 'C248   '.           02200002
               10  FILLER           PIC X(7) VALUE 'C249   '.           02210002
               10  FILLER           PIC X(7) VALUE 'C250   '.           02220002
               10  FILLER           PIC X(7) VALUE 'C251   '.           02230002
               10  FILLER           PIC X(7) VALUE 'C252   '.           02240002
               10  FILLER           PIC X(7) VALUE 'C253   '.           02250002
               10  FILLER           PIC X(7) VALUE 'C254   '.           02260002
               10  FILLER           PIC X(7) VALUE 'C257   '.           02270002
               10  FILLER           PIC X(7) VALUE 'C258   '.           02280002
               10  FILLER           PIC X(7) VALUE 'C259   '.           02290002
               10  FILLER           PIC X(7) VALUE 'C260   '.           02300002
               10  FILLER           PIC X(7) VALUE 'C261   '.           02310002
               10  FILLER           PIC X(7) VALUE 'C269   '.           02320002
               10  FILLER           PIC X(7) VALUE 'C300   '.           02330002
               10  FILLER           PIC X(7) VALUE 'C301   '.           02340002
               10  FILLER           PIC X(7) VALUE 'C310   '.           02350002
               10  FILLER           PIC X(7) VALUE 'C311   '.           02360002
               10  FILLER           PIC X(7) VALUE 'C312   '.           02370002
               10  FILLER           PIC X(7) VALUE 'C313   '.           02380002
               10  FILLER           PIC X(7) VALUE 'C318   '.           02390002
               10  FILLER           PIC X(7) VALUE 'C319   '.           02400002
               10  FILLER           PIC X(7) VALUE 'C320   '.           02410002
               10  FILLER           PIC X(7) VALUE 'C321   '.           02420002
               10  FILLER           PIC X(7) VALUE 'C322   '.           02430002
               10  FILLER           PIC X(7) VALUE 'C323   '.           02440002
               10  FILLER           PIC X(7) VALUE 'C328   '.           02450002
               10  FILLER           PIC X(7) VALUE 'C329   '.           02460002
               10  FILLER           PIC X(7) VALUE 'C33    '.           02470002
               10  FILLER           PIC X(7) VALUE 'C3400  '.           02480002
               10  FILLER           PIC X(7) VALUE 'C3401  '.           02490002
               10  FILLER           PIC X(7) VALUE 'C3402  '.           02500002
               10  FILLER           PIC X(7) VALUE 'C3410  '.           02510002
               10  FILLER           PIC X(7) VALUE 'C3411  '.           02520002
               10  FILLER           PIC X(7) VALUE 'C3412  '.           02530002
               10  FILLER           PIC X(7) VALUE 'C342   '.           02540002
               10  FILLER           PIC X(7) VALUE 'C3430  '.           02550002
               10  FILLER           PIC X(7) VALUE 'C3431  '.           02560002
               10  FILLER           PIC X(7) VALUE 'C3432  '.           02570002
               10  FILLER           PIC X(7) VALUE 'C3480  '.           02580002
               10  FILLER           PIC X(7) VALUE 'C3481  '.           02590002
               10  FILLER           PIC X(7) VALUE 'C3482  '.           02600002
               10  FILLER           PIC X(7) VALUE 'C3491  '.           02610002
               10  FILLER           PIC X(7) VALUE 'C3492  '.           02620002
               10  FILLER           PIC X(7) VALUE 'C37    '.           02630002
               10  FILLER           PIC X(7) VALUE 'C380   '.           02640002
               10  FILLER           PIC X(7) VALUE 'C381   '.           02650002
               10  FILLER           PIC X(7) VALUE 'C382   '.           02660002
               10  FILLER           PIC X(7) VALUE 'C383   '.           02670002
               10  FILLER           PIC X(7) VALUE 'C384   '.           02680002
               10  FILLER           PIC X(7) VALUE 'C388   '.           02690002
               10  FILLER           PIC X(7) VALUE 'C390   '.           02700002
               10  FILLER           PIC X(7) VALUE 'C399   '.           02710002
               10  FILLER           PIC X(7) VALUE 'C4A0   '.           02720002
               10  FILLER           PIC X(7) VALUE 'C4A111 '.           02730002
               10  FILLER           PIC X(7) VALUE 'C4A112 '.           02740002
               10  FILLER           PIC X(7) VALUE 'C4A121 '.           02750002
               10  FILLER           PIC X(7) VALUE 'C4A122 '.           02760002
               10  FILLER           PIC X(7) VALUE 'C4A21  '.           02770002
               10  FILLER           PIC X(7) VALUE 'C4A22  '.           02780002
               10  FILLER           PIC X(7) VALUE 'C4A30  '.           02790002
               10  FILLER           PIC X(7) VALUE 'C4A31  '.           02800002
               10  FILLER           PIC X(7) VALUE 'C4A39  '.           02810002
               10  FILLER           PIC X(7) VALUE 'C4A4   '.           02820002
               10  FILLER           PIC X(7) VALUE 'C4A51  '.           02830002
               10  FILLER           PIC X(7) VALUE 'C4A52  '.           02840002
               10  FILLER           PIC X(7) VALUE 'C4A59  '.           02850002
               10  FILLER           PIC X(7) VALUE 'C4A61  '.           02860002
               10  FILLER           PIC X(7) VALUE 'C4A62  '.           02870002
               10  FILLER           PIC X(7) VALUE 'C4A71  '.           02880002
               10  FILLER           PIC X(7) VALUE 'C4A72  '.           02890002
               10  FILLER           PIC X(7) VALUE 'C4A8   '.           02900002
               10  FILLER           PIC X(7) VALUE 'C4001  '.           02910002
               10  FILLER           PIC X(7) VALUE 'C4002  '.           02920002
               10  FILLER           PIC X(7) VALUE 'C4011  '.           02930002
               10  FILLER           PIC X(7) VALUE 'C4012  '.           02940002
               10  FILLER           PIC X(7) VALUE 'C4021  '.           02950002
               10  FILLER           PIC X(7) VALUE 'C4022  '.           02960002
               10  FILLER           PIC X(7) VALUE 'C4031  '.           02970002
               10  FILLER           PIC X(7) VALUE 'C4032  '.           02980002
               10  FILLER           PIC X(7) VALUE 'C4081  '.           02990002
               10  FILLER           PIC X(7) VALUE 'C4082  '.           03000002
               10  FILLER           PIC X(7) VALUE 'C4091  '.           03010002
               10  FILLER           PIC X(7) VALUE 'C4092  '.           03020002
               10  FILLER           PIC X(7) VALUE 'C410   '.           03030002
               10  FILLER           PIC X(7) VALUE 'C411   '.           03040002
               10  FILLER           PIC X(7) VALUE 'C412   '.           03050002
               10  FILLER           PIC X(7) VALUE 'C413   '.           03060002
               10  FILLER           PIC X(7) VALUE 'C414   '.           03070002
               10  FILLER           PIC X(7) VALUE 'C419   '.           03080002
               10  FILLER           PIC X(7) VALUE 'C430   '.           03090002
               10  FILLER           PIC X(7) VALUE 'C43111 '.           03100002
               10  FILLER           PIC X(7) VALUE 'C43112 '.           03110002
               10  FILLER           PIC X(7) VALUE 'C43121 '.           03120002
               10  FILLER           PIC X(7) VALUE 'C43122 '.           03130002
               10  FILLER           PIC X(7) VALUE 'C4321  '.           03140002
               10  FILLER           PIC X(7) VALUE 'C4322  '.           03150002
               10  FILLER           PIC X(7) VALUE 'C4330  '.           03160002
               10  FILLER           PIC X(7) VALUE 'C4331  '.           03170002
               10  FILLER           PIC X(7) VALUE 'C4339  '.           03180002
               10  FILLER           PIC X(7) VALUE 'C434   '.           03190002
               10  FILLER           PIC X(7) VALUE 'C4351  '.           03200002
               10  FILLER           PIC X(7) VALUE 'C4352  '.           03210002
               10  FILLER           PIC X(7) VALUE 'C4359  '.           03220002
               10  FILLER           PIC X(7) VALUE 'C4361  '.           03230002
               10  FILLER           PIC X(7) VALUE 'C4362  '.           03240002
               10  FILLER           PIC X(7) VALUE 'C4371  '.           03250002
               10  FILLER           PIC X(7) VALUE 'C4372  '.           03260002
               10  FILLER           PIC X(7) VALUE 'C438   '.           03270002
               10  FILLER           PIC X(7) VALUE 'C4400  '.           03280002
               10  FILLER           PIC X(7) VALUE 'C4401  '.           03290002
               10  FILLER           PIC X(7) VALUE 'C4402  '.           03300002
               10  FILLER           PIC X(7) VALUE 'C4409  '.           03310002
               10  FILLER           PIC X(7) VALUE 'C441021'.           03320002
               10  FILLER           PIC X(7) VALUE 'C441022'.           03330002
               10  FILLER           PIC X(7) VALUE 'C441091'.           03340002
               10  FILLER           PIC X(7) VALUE 'C441092'.           03350002
               10  FILLER           PIC X(7) VALUE 'C441121'.           03360002
               10  FILLER           PIC X(7) VALUE 'C441122'.           03370002
               10  FILLER           PIC X(7) VALUE 'C441191'.           03380002
               10  FILLER           PIC X(7) VALUE 'C441192'.           03390002
               10  FILLER           PIC X(7) VALUE 'C441221'.           03400002
               10  FILLER           PIC X(7) VALUE 'C441222'.           03410002
               10  FILLER           PIC X(7) VALUE 'C441291'.           03420002
               10  FILLER           PIC X(7) VALUE 'C441292'.           03430002
               10  FILLER           PIC X(7) VALUE 'C441321'.           03440002
               10  FILLER           PIC X(7) VALUE 'C441322'.           03450002
               10  FILLER           PIC X(7) VALUE 'C441391'.           03460002
               10  FILLER           PIC X(7) VALUE 'C441392'.           03470002
               10  FILLER           PIC X(7) VALUE 'C441921'.           03480002
               10  FILLER           PIC X(7) VALUE 'C441922'.           03490002
               10  FILLER           PIC X(7) VALUE 'C441991'.           03500002
               10  FILLER           PIC X(7) VALUE 'C441992'.           03510002
               10  FILLER           PIC X(7) VALUE 'C44202 '.           03520002
               10  FILLER           PIC X(7) VALUE 'C44209 '.           03530002
               10  FILLER           PIC X(7) VALUE 'C44212 '.           03540002
               10  FILLER           PIC X(7) VALUE 'C44219 '.           03550002
               10  FILLER           PIC X(7) VALUE 'C44222 '.           03560002
               10  FILLER           PIC X(7) VALUE 'C44229 '.           03570002
               10  FILLER           PIC X(7) VALUE 'C44291 '.           03580002
               10  FILLER           PIC X(7) VALUE 'C44292 '.           03590002
               10  FILLER           PIC X(7) VALUE 'C44299 '.           03600002
               10  FILLER           PIC X(7) VALUE 'C44300 '.           03610002
               10  FILLER           PIC X(7) VALUE 'C44301 '.           03620002
               10  FILLER           PIC X(7) VALUE 'C44309 '.           03630002
               10  FILLER           PIC X(7) VALUE 'C44310 '.           03640002
               10  FILLER           PIC X(7) VALUE 'C44311 '.           03650002
               10  FILLER           PIC X(7) VALUE 'C44319 '.           03660002
               10  FILLER           PIC X(7) VALUE 'C44320 '.           03670002
               10  FILLER           PIC X(7) VALUE 'C44321 '.           03680002
               10  FILLER           PIC X(7) VALUE 'C44329 '.           03690002
               10  FILLER           PIC X(7) VALUE 'C44390 '.           03700002
               10  FILLER           PIC X(7) VALUE 'C44391 '.           03710002
               10  FILLER           PIC X(7) VALUE 'C44399 '.           03720002
               10  FILLER           PIC X(7) VALUE 'C4440  '.           03730002
               10  FILLER           PIC X(7) VALUE 'C4441  '.           03740002
               10  FILLER           PIC X(7) VALUE 'C4442  '.           03750002
               10  FILLER           PIC X(7) VALUE 'C4449  '.           03760002
               10  FILLER           PIC X(7) VALUE 'C44500 '.           03770002
               10  FILLER           PIC X(7) VALUE 'C44501 '.           03780002
               10  FILLER           PIC X(7) VALUE 'C44509 '.           03790002
               10  FILLER           PIC X(7) VALUE 'C44510 '.           03800002
               10  FILLER           PIC X(7) VALUE 'C44511 '.           03810002
               10  FILLER           PIC X(7) VALUE 'C44519 '.           03820002
               10  FILLER           PIC X(7) VALUE 'C44520 '.           03830002
               10  FILLER           PIC X(7) VALUE 'C44521 '.           03840002
               10  FILLER           PIC X(7) VALUE 'C44529 '.           03850002
               10  FILLER           PIC X(7) VALUE 'C44590 '.           03860002
               10  FILLER           PIC X(7) VALUE 'C44591 '.           03870002
               10  FILLER           PIC X(7) VALUE 'C44599 '.           03880002
               10  FILLER           PIC X(7) VALUE 'C44602 '.           03890002
               10  FILLER           PIC X(7) VALUE 'C44609 '.           03900002
               10  FILLER           PIC X(7) VALUE 'C44612 '.           03910002
               10  FILLER           PIC X(7) VALUE 'C44619 '.           03920002
               10  FILLER           PIC X(7) VALUE 'C44622 '.           03930002
               10  FILLER           PIC X(7) VALUE 'C44629 '.           03940002
               10  FILLER           PIC X(7) VALUE 'C44692 '.           03950002
               10  FILLER           PIC X(7) VALUE 'C44699 '.           03960002
               10  FILLER           PIC X(7) VALUE 'C44702 '.           03970002
               10  FILLER           PIC X(7) VALUE 'C44709 '.           03980002
               10  FILLER           PIC X(7) VALUE 'C44712 '.           03990002
               10  FILLER           PIC X(7) VALUE 'C44719 '.           04000002
               10  FILLER           PIC X(7) VALUE 'C44722 '.           04010002
               10  FILLER           PIC X(7) VALUE 'C44729 '.           04020002
               10  FILLER           PIC X(7) VALUE 'C44792 '.           04030002
               10  FILLER           PIC X(7) VALUE 'C44799 '.           04040002
               10  FILLER           PIC X(7) VALUE 'C4480  '.           04050002
               10  FILLER           PIC X(7) VALUE 'C4481  '.           04060002
               10  FILLER           PIC X(7) VALUE 'C4482  '.           04070002
               10  FILLER           PIC X(7) VALUE 'C4489  '.           04080002
               10  FILLER           PIC X(7) VALUE 'C450   '.           04090002
               10  FILLER           PIC X(7) VALUE 'C451   '.           04100002
               10  FILLER           PIC X(7) VALUE 'C452   '.           04110002
               10  FILLER           PIC X(7) VALUE 'C457   '.           04120002
               10  FILLER           PIC X(7) VALUE 'C459   '.           04130002
               10  FILLER           PIC X(7) VALUE 'C460   '.           04140002
               10  FILLER           PIC X(7) VALUE 'C461   '.           04150002
               10  FILLER           PIC X(7) VALUE 'C462   '.           04160002
               10  FILLER           PIC X(7) VALUE 'C463   '.           04170002
               10  FILLER           PIC X(7) VALUE 'C464   '.           04180002
               10  FILLER           PIC X(7) VALUE 'C4650  '.           04190002
               10  FILLER           PIC X(7) VALUE 'C4651  '.           04200002
               10  FILLER           PIC X(7) VALUE 'C4652  '.           04210002
               10  FILLER           PIC X(7) VALUE 'C467   '.           04220002
               10  FILLER           PIC X(7) VALUE 'C469   '.           04230002
               10  FILLER           PIC X(7) VALUE 'C470   '.           04240002
               10  FILLER           PIC X(7) VALUE 'C4711  '.           04250002
               10  FILLER           PIC X(7) VALUE 'C4712  '.           04260002
               10  FILLER           PIC X(7) VALUE 'C4721  '.           04270002
               10  FILLER           PIC X(7) VALUE 'C4722  '.           04280002
               10  FILLER           PIC X(7) VALUE 'C473   '.           04290002
               10  FILLER           PIC X(7) VALUE 'C474   '.           04300002
               10  FILLER           PIC X(7) VALUE 'C475   '.           04310002
               10  FILLER           PIC X(7) VALUE 'C476   '.           04320002
               10  FILLER           PIC X(7) VALUE 'C478   '.           04330002
               10  FILLER           PIC X(7) VALUE 'C480   '.           04340002
               10  FILLER           PIC X(7) VALUE 'C481   '.           04350002
               10  FILLER           PIC X(7) VALUE 'C482   '.           04360002
               10  FILLER           PIC X(7) VALUE 'C488   '.           04370002
               10  FILLER           PIC X(7) VALUE 'C49A0  '.           04380002
               10  FILLER           PIC X(7) VALUE 'C49A1  '.           04390002
               10  FILLER           PIC X(7) VALUE 'C49A2  '.           04400002
               10  FILLER           PIC X(7) VALUE 'C49A3  '.           04410002
               10  FILLER           PIC X(7) VALUE 'C49A4  '.           04420002
               10  FILLER           PIC X(7) VALUE 'C49A5  '.           04430002
               10  FILLER           PIC X(7) VALUE 'C49A9  '.           04440002
               10  FILLER           PIC X(7) VALUE 'C490   '.           04450002
               10  FILLER           PIC X(7) VALUE 'C4911  '.           04460002
               10  FILLER           PIC X(7) VALUE 'C4912  '.           04470002
               10  FILLER           PIC X(7) VALUE 'C4921  '.           04480002
               10  FILLER           PIC X(7) VALUE 'C4922  '.           04490002
               10  FILLER           PIC X(7) VALUE 'C493   '.           04500002
               10  FILLER           PIC X(7) VALUE 'C494   '.           04510002
               10  FILLER           PIC X(7) VALUE 'C495   '.           04520002
               10  FILLER           PIC X(7) VALUE 'C496   '.           04530002
               10  FILLER           PIC X(7) VALUE 'C498   '.           04540002
               10  FILLER           PIC X(7) VALUE 'C50011 '.           04550002
               10  FILLER           PIC X(7) VALUE 'C50012 '.           04560002
               10  FILLER           PIC X(7) VALUE 'C50021 '.           04570002
               10  FILLER           PIC X(7) VALUE 'C50022 '.           04580002
               10  FILLER           PIC X(7) VALUE 'C50111 '.           04590002
               10  FILLER           PIC X(7) VALUE 'C50112 '.           04600002
               10  FILLER           PIC X(7) VALUE 'C50121 '.           04610002
               10  FILLER           PIC X(7) VALUE 'C50122 '.           04620002
               10  FILLER           PIC X(7) VALUE 'C50211 '.           04630002
               10  FILLER           PIC X(7) VALUE 'C50212 '.           04640002
               10  FILLER           PIC X(7) VALUE 'C50221 '.           04650002
               10  FILLER           PIC X(7) VALUE 'C50222 '.           04660002
               10  FILLER           PIC X(7) VALUE 'C50311 '.           04670002
               10  FILLER           PIC X(7) VALUE 'C50312 '.           04680002
               10  FILLER           PIC X(7) VALUE 'C50321 '.           04690002
               10  FILLER           PIC X(7) VALUE 'C50322 '.           04700002
               10  FILLER           PIC X(7) VALUE 'C50411 '.           04710002
               10  FILLER           PIC X(7) VALUE 'C50412 '.           04720002
               10  FILLER           PIC X(7) VALUE 'C50421 '.           04730002
               10  FILLER           PIC X(7) VALUE 'C50422 '.           04740002
               10  FILLER           PIC X(7) VALUE 'C50511 '.           04750002
               10  FILLER           PIC X(7) VALUE 'C50512 '.           04760002
               10  FILLER           PIC X(7) VALUE 'C50521 '.           04770002
               10  FILLER           PIC X(7) VALUE 'C50522 '.           04780002
               10  FILLER           PIC X(7) VALUE 'C50611 '.           04790002
               10  FILLER           PIC X(7) VALUE 'C50612 '.           04800002
               10  FILLER           PIC X(7) VALUE 'C50621 '.           04810002
               10  FILLER           PIC X(7) VALUE 'C50622 '.           04820002
               10  FILLER           PIC X(7) VALUE 'C50811 '.           04830002
               10  FILLER           PIC X(7) VALUE 'C50812 '.           04840002
               10  FILLER           PIC X(7) VALUE 'C50821 '.           04850002
               10  FILLER           PIC X(7) VALUE 'C50822 '.           04860002
               10  FILLER           PIC X(7) VALUE 'C50911 '.           04870002
               10  FILLER           PIC X(7) VALUE 'C50912 '.           04880002
               10  FILLER           PIC X(7) VALUE 'C50921 '.           04890002
               10  FILLER           PIC X(7) VALUE 'C50922 '.           04900002
               10  FILLER           PIC X(7) VALUE 'C510   '.           04910002
               10  FILLER           PIC X(7) VALUE 'C511   '.           04920002
               10  FILLER           PIC X(7) VALUE 'C512   '.           04930002
               10  FILLER           PIC X(7) VALUE 'C518   '.           04940002
               10  FILLER           PIC X(7) VALUE 'C519   '.           04950002
               10  FILLER           PIC X(7) VALUE 'C52    '.           04960002
               10  FILLER           PIC X(7) VALUE 'C530   '.           04970002
               10  FILLER           PIC X(7) VALUE 'C531   '.           04980002
               10  FILLER           PIC X(7) VALUE 'C538   '.           04990002
               10  FILLER           PIC X(7) VALUE 'C539   '.           05000002
               10  FILLER           PIC X(7) VALUE 'C540   '.           05010002
               10  FILLER           PIC X(7) VALUE 'C541   '.           05020002
               10  FILLER           PIC X(7) VALUE 'C542   '.           05030002
               10  FILLER           PIC X(7) VALUE 'C543   '.           05040002
               10  FILLER           PIC X(7) VALUE 'C548   '.           05050002
               10  FILLER           PIC X(7) VALUE 'C549   '.           05060002
               10  FILLER           PIC X(7) VALUE 'C55    '.           05070002
               10  FILLER           PIC X(7) VALUE 'C561   '.           05080002
               10  FILLER           PIC X(7) VALUE 'C562   '.           05090002
               10  FILLER           PIC X(7) VALUE 'C569   '.           05100002
               10  FILLER           PIC X(7) VALUE 'C5700  '.           05110002
               10  FILLER           PIC X(7) VALUE 'C5701  '.           05120002
               10  FILLER           PIC X(7) VALUE 'C5702  '.           05130002
               10  FILLER           PIC X(7) VALUE 'C5710  '.           05140002
               10  FILLER           PIC X(7) VALUE 'C5711  '.           05150002
               10  FILLER           PIC X(7) VALUE 'C5712  '.           05160002
               10  FILLER           PIC X(7) VALUE 'C5720  '.           05170002
               10  FILLER           PIC X(7) VALUE 'C5721  '.           05180002
               10  FILLER           PIC X(7) VALUE 'C5722  '.           05190002
               10  FILLER           PIC X(7) VALUE 'C573   '.           05200002
               10  FILLER           PIC X(7) VALUE 'C574   '.           05210002
               10  FILLER           PIC X(7) VALUE 'C577   '.           05220002
               10  FILLER           PIC X(7) VALUE 'C578   '.           05230002
               10  FILLER           PIC X(7) VALUE 'C58    '.           05240002
               10  FILLER           PIC X(7) VALUE 'C600   '.           05250002
               10  FILLER           PIC X(7) VALUE 'C601   '.           05260002
               10  FILLER           PIC X(7) VALUE 'C602   '.           05270002
               10  FILLER           PIC X(7) VALUE 'C608   '.           05280002
               10  FILLER           PIC X(7) VALUE 'C609   '.           05290002
               10  FILLER           PIC X(7) VALUE 'C61    '.           05300002
               10  FILLER           PIC X(7) VALUE 'C6200  '.           05310002
               10  FILLER           PIC X(7) VALUE 'C6201  '.           05320002
               10  FILLER           PIC X(7) VALUE 'C6202  '.           05330002
               10  FILLER           PIC X(7) VALUE 'C6210  '.           05340002
               10  FILLER           PIC X(7) VALUE 'C6211  '.           05350002
               10  FILLER           PIC X(7) VALUE 'C6212  '.           05360002
               10  FILLER           PIC X(7) VALUE 'C6291  '.           05370002
               10  FILLER           PIC X(7) VALUE 'C6292  '.           05380002
               10  FILLER           PIC X(7) VALUE 'C6300  '.           05390002
               10  FILLER           PIC X(7) VALUE 'C6301  '.           05400002
               10  FILLER           PIC X(7) VALUE 'C6302  '.           05410002
               10  FILLER           PIC X(7) VALUE 'C6310  '.           05420002
               10  FILLER           PIC X(7) VALUE 'C6311  '.           05430002
               10  FILLER           PIC X(7) VALUE 'C6312  '.           05440002
               10  FILLER           PIC X(7) VALUE 'C632   '.           05450002
               10  FILLER           PIC X(7) VALUE 'C637   '.           05460002
               10  FILLER           PIC X(7) VALUE 'C638   '.           05470002
               10  FILLER           PIC X(7) VALUE 'C641   '.           05480002
               10  FILLER           PIC X(7) VALUE 'C642   '.           05490002
               10  FILLER           PIC X(7) VALUE 'C651   '.           05500002
               10  FILLER           PIC X(7) VALUE 'C652   '.           05510002
               10  FILLER           PIC X(7) VALUE 'C659   '.           05520002
               10  FILLER           PIC X(7) VALUE 'C661   '.           05530002
               10  FILLER           PIC X(7) VALUE 'C662   '.           05540002
               10  FILLER           PIC X(7) VALUE 'C669   '.           05550002
               10  FILLER           PIC X(7) VALUE 'C670   '.           05560002
               10  FILLER           PIC X(7) VALUE 'C671   '.           05570002
               10  FILLER           PIC X(7) VALUE 'C672   '.           05580002
               10  FILLER           PIC X(7) VALUE 'C673   '.           05590002
               10  FILLER           PIC X(7) VALUE 'C674   '.           05600002
               10  FILLER           PIC X(7) VALUE 'C675   '.           05610002
               10  FILLER           PIC X(7) VALUE 'C676   '.           05620002
               10  FILLER           PIC X(7) VALUE 'C677   '.           05630002
               10  FILLER           PIC X(7) VALUE 'C678   '.           05640002
               10  FILLER           PIC X(7) VALUE 'C679   '.           05650002
               10  FILLER           PIC X(7) VALUE 'C680   '.           05660002
               10  FILLER           PIC X(7) VALUE 'C681   '.           05670002
               10  FILLER           PIC X(7) VALUE 'C688   '.           05680002
               10  FILLER           PIC X(7) VALUE 'C689   '.           05690002
               10  FILLER           PIC X(7) VALUE 'C6901  '.           05700002
               10  FILLER           PIC X(7) VALUE 'C6902  '.           05710002
               10  FILLER           PIC X(7) VALUE 'C6911  '.           05720002
               10  FILLER           PIC X(7) VALUE 'C6912  '.           05730002
               10  FILLER           PIC X(7) VALUE 'C6920  '.           05740002
               10  FILLER           PIC X(7) VALUE 'C6921  '.           05750002
               10  FILLER           PIC X(7) VALUE 'C6922  '.           05760002
               10  FILLER           PIC X(7) VALUE 'C6930  '.           05770002
               10  FILLER           PIC X(7) VALUE 'C6931  '.           05780002
               10  FILLER           PIC X(7) VALUE 'C6932  '.           05790002
               10  FILLER           PIC X(7) VALUE 'C6940  '.           05800002
               10  FILLER           PIC X(7) VALUE 'C6941  '.           05810002
               10  FILLER           PIC X(7) VALUE 'C6942  '.           05820002
               10  FILLER           PIC X(7) VALUE 'C6951  '.           05830002
               10  FILLER           PIC X(7) VALUE 'C6952  '.           05840002
               10  FILLER           PIC X(7) VALUE 'C6961  '.           05850002
               10  FILLER           PIC X(7) VALUE 'C6962  '.           05860002
               10  FILLER           PIC X(7) VALUE 'C6981  '.           05870002
               10  FILLER           PIC X(7) VALUE 'C6982  '.           05880002
               10  FILLER           PIC X(7) VALUE 'C6991  '.           05890002
               10  FILLER           PIC X(7) VALUE 'C6992  '.           05900002
               10  FILLER           PIC X(7) VALUE 'C7A00  '.           05910002
               10  FILLER           PIC X(7) VALUE 'C7A010 '.           05920002
               10  FILLER           PIC X(7) VALUE 'C7A011 '.           05930002
               10  FILLER           PIC X(7) VALUE 'C7A012 '.           05940002
               10  FILLER           PIC X(7) VALUE 'C7A019 '.           05950002
               10  FILLER           PIC X(7) VALUE 'C7A020 '.           05960002
               10  FILLER           PIC X(7) VALUE 'C7A021 '.           05970002
               10  FILLER           PIC X(7) VALUE 'C7A022 '.           05980002
               10  FILLER           PIC X(7) VALUE 'C7A023 '.           05990002
               10  FILLER           PIC X(7) VALUE 'C7A024 '.           06000002
               10  FILLER           PIC X(7) VALUE 'C7A025 '.           06010002
               10  FILLER           PIC X(7) VALUE 'C7A026 '.           06020002
               10  FILLER           PIC X(7) VALUE 'C7A029 '.           06030002
               10  FILLER           PIC X(7) VALUE 'C7A090 '.           06040002
               10  FILLER           PIC X(7) VALUE 'C7A091 '.           06050002
               10  FILLER           PIC X(7) VALUE 'C7A092 '.           06060002
               10  FILLER           PIC X(7) VALUE 'C7A093 '.           06070002
               10  FILLER           PIC X(7) VALUE 'C7A094 '.           06080002
               10  FILLER           PIC X(7) VALUE 'C7A095 '.           06090002
               10  FILLER           PIC X(7) VALUE 'C7A096 '.           06100002
               10  FILLER           PIC X(7) VALUE 'C7A098 '.           06110002
               10  FILLER           PIC X(7) VALUE 'C7A1   '.           06120002
               10  FILLER           PIC X(7) VALUE 'C7A8   '.           06130002
               10  FILLER           PIC X(7) VALUE 'C7B00  '.           06140002
               10  FILLER           PIC X(7) VALUE 'C7B01  '.           06150002
               10  FILLER           PIC X(7) VALUE 'C7B02  '.           06160002
               10  FILLER           PIC X(7) VALUE 'C7B03  '.           06170002
               10  FILLER           PIC X(7) VALUE 'C7B04  '.           06180002
               10  FILLER           PIC X(7) VALUE 'C7B09  '.           06190002
               10  FILLER           PIC X(7) VALUE 'C7B1   '.           06200002
               10  FILLER           PIC X(7) VALUE 'C7B8   '.           06210002
               10  FILLER           PIC X(7) VALUE 'C700   '.           06220002
               10  FILLER           PIC X(7) VALUE 'C701   '.           06230002
               10  FILLER           PIC X(7) VALUE 'C709   '.           06240002
               10  FILLER           PIC X(7) VALUE 'C710   '.           06250002
               10  FILLER           PIC X(7) VALUE 'C711   '.           06260002
               10  FILLER           PIC X(7) VALUE 'C712   '.           06270002
               10  FILLER           PIC X(7) VALUE 'C713   '.           06280002
               10  FILLER           PIC X(7) VALUE 'C714   '.           06290002
               10  FILLER           PIC X(7) VALUE 'C715   '.           06300002
               10  FILLER           PIC X(7) VALUE 'C716   '.           06310002
               10  FILLER           PIC X(7) VALUE 'C717   '.           06320002
               10  FILLER           PIC X(7) VALUE 'C718   '.           06330002
               10  FILLER           PIC X(7) VALUE 'C719   '.           06340002
               10  FILLER           PIC X(7) VALUE 'C720   '.           06350002
               10  FILLER           PIC X(7) VALUE 'C721   '.           06360002
               10  FILLER           PIC X(7) VALUE 'C7220  '.           06370002
               10  FILLER           PIC X(7) VALUE 'C7221  '.           06380002
               10  FILLER           PIC X(7) VALUE 'C7222  '.           06390002
               10  FILLER           PIC X(7) VALUE 'C7230  '.           06400002
               10  FILLER           PIC X(7) VALUE 'C7231  '.           06410002
               10  FILLER           PIC X(7) VALUE 'C7232  '.           06420002
               10  FILLER           PIC X(7) VALUE 'C7240  '.           06430002
               10  FILLER           PIC X(7) VALUE 'C7241  '.           06440002
               10  FILLER           PIC X(7) VALUE 'C7242  '.           06450002
               10  FILLER           PIC X(7) VALUE 'C7250  '.           06460002
               10  FILLER           PIC X(7) VALUE 'C7259  '.           06470002
               10  FILLER           PIC X(7) VALUE 'C73    '.           06480002
               10  FILLER           PIC X(7) VALUE 'C7400  '.           06490002
               10  FILLER           PIC X(7) VALUE 'C7401  '.           06500002
               10  FILLER           PIC X(7) VALUE 'C7402  '.           06510002
               10  FILLER           PIC X(7) VALUE 'C7410  '.           06520002
               10  FILLER           PIC X(7) VALUE 'C7411  '.           06530002
               10  FILLER           PIC X(7) VALUE 'C7412  '.           06540002
               10  FILLER           PIC X(7) VALUE 'C7491  '.           06550002
               10  FILLER           PIC X(7) VALUE 'C7492  '.           06560002
               10  FILLER           PIC X(7) VALUE 'C750   '.           06570002
               10  FILLER           PIC X(7) VALUE 'C751   '.           06580002
               10  FILLER           PIC X(7) VALUE 'C752   '.           06590002
               10  FILLER           PIC X(7) VALUE 'C753   '.           06600002
               10  FILLER           PIC X(7) VALUE 'C754   '.           06610002
               10  FILLER           PIC X(7) VALUE 'C755   '.           06620002
               10  FILLER           PIC X(7) VALUE 'C758   '.           06630002
               10  FILLER           PIC X(7) VALUE 'C759   '.           06640002
               10  FILLER           PIC X(7) VALUE 'C760   '.           06650002
               10  FILLER           PIC X(7) VALUE 'C761   '.           06660002
               10  FILLER           PIC X(7) VALUE 'C762   '.           06670002
               10  FILLER           PIC X(7) VALUE 'C763   '.           06680002
               10  FILLER           PIC X(7) VALUE 'C7641  '.           06690002
               10  FILLER           PIC X(7) VALUE 'C7642  '.           06700002
               10  FILLER           PIC X(7) VALUE 'C7651  '.           06710002
               10  FILLER           PIC X(7) VALUE 'C7652  '.           06720002
               10  FILLER           PIC X(7) VALUE 'C768   '.           06730002
               10  FILLER           PIC X(7) VALUE 'C770   '.           06740002
               10  FILLER           PIC X(7) VALUE 'C771   '.           06750002
               10  FILLER           PIC X(7) VALUE 'C772   '.           06760002
               10  FILLER           PIC X(7) VALUE 'C773   '.           06770002
               10  FILLER           PIC X(7) VALUE 'C774   '.           06780002
               10  FILLER           PIC X(7) VALUE 'C775   '.           06790002
               10  FILLER           PIC X(7) VALUE 'C778   '.           06800002
               10  FILLER           PIC X(7) VALUE 'C7800  '.           06810002
               10  FILLER           PIC X(7) VALUE 'C7801  '.           06820002
               10  FILLER           PIC X(7) VALUE 'C7802  '.           06830002
               10  FILLER           PIC X(7) VALUE 'C781   '.           06840002
               10  FILLER           PIC X(7) VALUE 'C782   '.           06850002
               10  FILLER           PIC X(7) VALUE 'C7830  '.           06860002
               10  FILLER           PIC X(7) VALUE 'C7839  '.           06870002
               10  FILLER           PIC X(7) VALUE 'C784   '.           06880002
               10  FILLER           PIC X(7) VALUE 'C785   '.           06890002
               10  FILLER           PIC X(7) VALUE 'C786   '.           06900002
               10  FILLER           PIC X(7) VALUE 'C787   '.           06910002
               10  FILLER           PIC X(7) VALUE 'C7880  '.           06920002
               10  FILLER           PIC X(7) VALUE 'C7889  '.           06930002
               10  FILLER           PIC X(7) VALUE 'C7900  '.           06940002
               10  FILLER           PIC X(7) VALUE 'C7901  '.           06950002
               10  FILLER           PIC X(7) VALUE 'C7902  '.           06960002
               10  FILLER           PIC X(7) VALUE 'C7910  '.           06970002
               10  FILLER           PIC X(7) VALUE 'C7911  '.           06980002
               10  FILLER           PIC X(7) VALUE 'C7919  '.           06990002
               10  FILLER           PIC X(7) VALUE 'C792   '.           07000002
               10  FILLER           PIC X(7) VALUE 'C7931  '.           07010002
               10  FILLER           PIC X(7) VALUE 'C7932  '.           07020002
               10  FILLER           PIC X(7) VALUE 'C7940  '.           07030002
               10  FILLER           PIC X(7) VALUE 'C7949  '.           07040002
               10  FILLER           PIC X(7) VALUE 'C7951  '.           07050002
               10  FILLER           PIC X(7) VALUE 'C7952  '.           07060002
               10  FILLER           PIC X(7) VALUE 'C7960  '.           07070002
               10  FILLER           PIC X(7) VALUE 'C7961  '.           07080002
               10  FILLER           PIC X(7) VALUE 'C7962  '.           07090002
               10  FILLER           PIC X(7) VALUE 'C7970  '.           07100002
               10  FILLER           PIC X(7) VALUE 'C7971  '.           07110002
               10  FILLER           PIC X(7) VALUE 'C7972  '.           07120002
               10  FILLER           PIC X(7) VALUE 'C7981  '.           07130002
               10  FILLER           PIC X(7) VALUE 'C7982  '.           07140002
               10  FILLER           PIC X(7) VALUE 'C7989  '.           07150002
               10  FILLER           PIC X(7) VALUE 'C800   '.           07160002
               10  FILLER           PIC X(7) VALUE 'C801   '.           07170002
               10  FILLER           PIC X(7) VALUE 'C802   '.           07180002
               10  FILLER           PIC X(7) VALUE 'C8100  '.           07190002
               10  FILLER           PIC X(7) VALUE 'C8101  '.           07200002
               10  FILLER           PIC X(7) VALUE 'C8102  '.           07210002
               10  FILLER           PIC X(7) VALUE 'C8103  '.           07220002
               10  FILLER           PIC X(7) VALUE 'C8104  '.           07230002
               10  FILLER           PIC X(7) VALUE 'C8105  '.           07240002
               10  FILLER           PIC X(7) VALUE 'C8106  '.           07250002
               10  FILLER           PIC X(7) VALUE 'C8107  '.           07260002
               10  FILLER           PIC X(7) VALUE 'C8108  '.           07270002
               10  FILLER           PIC X(7) VALUE 'C8109  '.           07280002
               10  FILLER           PIC X(7) VALUE 'C8110  '.           07290002
               10  FILLER           PIC X(7) VALUE 'C8111  '.           07300002
               10  FILLER           PIC X(7) VALUE 'C8112  '.           07310002
               10  FILLER           PIC X(7) VALUE 'C8113  '.           07320002
               10  FILLER           PIC X(7) VALUE 'C8114  '.           07330002
               10  FILLER           PIC X(7) VALUE 'C8115  '.           07340002
               10  FILLER           PIC X(7) VALUE 'C8116  '.           07350002
               10  FILLER           PIC X(7) VALUE 'C8117  '.           07360002
               10  FILLER           PIC X(7) VALUE 'C8118  '.           07370002
               10  FILLER           PIC X(7) VALUE 'C8119  '.           07380002
               10  FILLER           PIC X(7) VALUE 'C8120  '.           07390002
               10  FILLER           PIC X(7) VALUE 'C8121  '.           07400002
               10  FILLER           PIC X(7) VALUE 'C8122  '.           07410002
               10  FILLER           PIC X(7) VALUE 'C8123  '.           07420002
               10  FILLER           PIC X(7) VALUE 'C8124  '.           07430002
               10  FILLER           PIC X(7) VALUE 'C8125  '.           07440002
               10  FILLER           PIC X(7) VALUE 'C8126  '.           07450002
               10  FILLER           PIC X(7) VALUE 'C8127  '.           07460002
               10  FILLER           PIC X(7) VALUE 'C8128  '.           07470002
               10  FILLER           PIC X(7) VALUE 'C8129  '.           07480002
               10  FILLER           PIC X(7) VALUE 'C8130  '.           07490002
               10  FILLER           PIC X(7) VALUE 'C8131  '.           07500002
               10  FILLER           PIC X(7) VALUE 'C8132  '.           07510002
               10  FILLER           PIC X(7) VALUE 'C8133  '.           07520002
               10  FILLER           PIC X(7) VALUE 'C8134  '.           07530002
               10  FILLER           PIC X(7) VALUE 'C8135  '.           07540002
               10  FILLER           PIC X(7) VALUE 'C8136  '.           07550002
               10  FILLER           PIC X(7) VALUE 'C8137  '.           07560002
               10  FILLER           PIC X(7) VALUE 'C8138  '.           07570002
               10  FILLER           PIC X(7) VALUE 'C8139  '.           07580002
               10  FILLER           PIC X(7) VALUE 'C8140  '.           07590002
               10  FILLER           PIC X(7) VALUE 'C8141  '.           07600002
               10  FILLER           PIC X(7) VALUE 'C8142  '.           07610002
               10  FILLER           PIC X(7) VALUE 'C8143  '.           07620002
               10  FILLER           PIC X(7) VALUE 'C8144  '.           07630002
               10  FILLER           PIC X(7) VALUE 'C8145  '.           07640002
               10  FILLER           PIC X(7) VALUE 'C8146  '.           07650002
               10  FILLER           PIC X(7) VALUE 'C8147  '.           07660002
               10  FILLER           PIC X(7) VALUE 'C8148  '.           07670002
               10  FILLER           PIC X(7) VALUE 'C8149  '.           07680002
               10  FILLER           PIC X(7) VALUE 'C8170  '.           07690002
               10  FILLER           PIC X(7) VALUE 'C8171  '.           07700002
               10  FILLER           PIC X(7) VALUE 'C8172  '.           07710002
               10  FILLER           PIC X(7) VALUE 'C8173  '.           07720002
               10  FILLER           PIC X(7) VALUE 'C8174  '.           07730002
               10  FILLER           PIC X(7) VALUE 'C8175  '.           07740002
               10  FILLER           PIC X(7) VALUE 'C8176  '.           07750002
               10  FILLER           PIC X(7) VALUE 'C8177  '.           07760002
               10  FILLER           PIC X(7) VALUE 'C8178  '.           07770002
               10  FILLER           PIC X(7) VALUE 'C8179  '.           07780002
               10  FILLER           PIC X(7) VALUE 'C8190  '.           07790002
               10  FILLER           PIC X(7) VALUE 'C8191  '.           07800002
               10  FILLER           PIC X(7) VALUE 'C8192  '.           07810002
               10  FILLER           PIC X(7) VALUE 'C8193  '.           07820002
               10  FILLER           PIC X(7) VALUE 'C8194  '.           07830002
               10  FILLER           PIC X(7) VALUE 'C8195  '.           07840002
               10  FILLER           PIC X(7) VALUE 'C8196  '.           07850002
               10  FILLER           PIC X(7) VALUE 'C8197  '.           07860002
               10  FILLER           PIC X(7) VALUE 'C8198  '.           07870002
               10  FILLER           PIC X(7) VALUE 'C8199  '.           07880002
               10  FILLER           PIC X(7) VALUE 'C8200  '.           07890002
               10  FILLER           PIC X(7) VALUE 'C8201  '.           07900002
               10  FILLER           PIC X(7) VALUE 'C8202  '.           07910002
               10  FILLER           PIC X(7) VALUE 'C8203  '.           07920002
               10  FILLER           PIC X(7) VALUE 'C8204  '.           07930002
               10  FILLER           PIC X(7) VALUE 'C8205  '.           07940002
               10  FILLER           PIC X(7) VALUE 'C8206  '.           07950002
               10  FILLER           PIC X(7) VALUE 'C8207  '.           07960002
               10  FILLER           PIC X(7) VALUE 'C8208  '.           07970002
               10  FILLER           PIC X(7) VALUE 'C8209  '.           07980002
               10  FILLER           PIC X(7) VALUE 'C8210  '.           07990002
               10  FILLER           PIC X(7) VALUE 'C8211  '.           08000002
               10  FILLER           PIC X(7) VALUE 'C8212  '.           08010002
               10  FILLER           PIC X(7) VALUE 'C8213  '.           08020002
               10  FILLER           PIC X(7) VALUE 'C8214  '.           08030002
               10  FILLER           PIC X(7) VALUE 'C8215  '.           08040002
               10  FILLER           PIC X(7) VALUE 'C8216  '.           08050002
               10  FILLER           PIC X(7) VALUE 'C8217  '.           08060002
               10  FILLER           PIC X(7) VALUE 'C8218  '.           08070002
               10  FILLER           PIC X(7) VALUE 'C8219  '.           08080002
               10  FILLER           PIC X(7) VALUE 'C8220  '.           08090002
               10  FILLER           PIC X(7) VALUE 'C8221  '.           08100002
               10  FILLER           PIC X(7) VALUE 'C8222  '.           08110002
               10  FILLER           PIC X(7) VALUE 'C8223  '.           08120002
               10  FILLER           PIC X(7) VALUE 'C8224  '.           08130002
               10  FILLER           PIC X(7) VALUE 'C8225  '.           08140002
               10  FILLER           PIC X(7) VALUE 'C8226  '.           08150002
               10  FILLER           PIC X(7) VALUE 'C8227  '.           08160002
               10  FILLER           PIC X(7) VALUE 'C8228  '.           08170002
               10  FILLER           PIC X(7) VALUE 'C8229  '.           08180002
               10  FILLER           PIC X(7) VALUE 'C8230  '.           08190002
               10  FILLER           PIC X(7) VALUE 'C8231  '.           08200002
               10  FILLER           PIC X(7) VALUE 'C8232  '.           08210002
               10  FILLER           PIC X(7) VALUE 'C8233  '.           08220002
               10  FILLER           PIC X(7) VALUE 'C8234  '.           08230002
               10  FILLER           PIC X(7) VALUE 'C8235  '.           08240002
               10  FILLER           PIC X(7) VALUE 'C8236  '.           08250002
               10  FILLER           PIC X(7) VALUE 'C8237  '.           08260002
               10  FILLER           PIC X(7) VALUE 'C8238  '.           08270002
               10  FILLER           PIC X(7) VALUE 'C8239  '.           08280002
               10  FILLER           PIC X(7) VALUE 'C8240  '.           08290002
               10  FILLER           PIC X(7) VALUE 'C8241  '.           08300002
               10  FILLER           PIC X(7) VALUE 'C8242  '.           08310002
               10  FILLER           PIC X(7) VALUE 'C8243  '.           08320002
               10  FILLER           PIC X(7) VALUE 'C8244  '.           08330002
               10  FILLER           PIC X(7) VALUE 'C8245  '.           08340002
               10  FILLER           PIC X(7) VALUE 'C8246  '.           08350002
               10  FILLER           PIC X(7) VALUE 'C8247  '.           08360002
               10  FILLER           PIC X(7) VALUE 'C8248  '.           08370002
               10  FILLER           PIC X(7) VALUE 'C8249  '.           08380002
               10  FILLER           PIC X(7) VALUE 'C8250  '.           08390002
               10  FILLER           PIC X(7) VALUE 'C8251  '.           08400002
               10  FILLER           PIC X(7) VALUE 'C8252  '.           08410002
               10  FILLER           PIC X(7) VALUE 'C8253  '.           08420002
               10  FILLER           PIC X(7) VALUE 'C8254  '.           08430002
               10  FILLER           PIC X(7) VALUE 'C8255  '.           08440002
               10  FILLER           PIC X(7) VALUE 'C8256  '.           08450002
               10  FILLER           PIC X(7) VALUE 'C8257  '.           08460002
               10  FILLER           PIC X(7) VALUE 'C8258  '.           08470002
               10  FILLER           PIC X(7) VALUE 'C8259  '.           08480002
               10  FILLER           PIC X(7) VALUE 'C8260  '.           08490002
               10  FILLER           PIC X(7) VALUE 'C8261  '.           08500002
               10  FILLER           PIC X(7) VALUE 'C8262  '.           08510002
               10  FILLER           PIC X(7) VALUE 'C8263  '.           08520002
               10  FILLER           PIC X(7) VALUE 'C8264  '.           08530002
               10  FILLER           PIC X(7) VALUE 'C8265  '.           08540002
               10  FILLER           PIC X(7) VALUE 'C8266  '.           08550002
               10  FILLER           PIC X(7) VALUE 'C8267  '.           08560002
               10  FILLER           PIC X(7) VALUE 'C8268  '.           08570002
               10  FILLER           PIC X(7) VALUE 'C8269  '.           08580002
               10  FILLER           PIC X(7) VALUE 'C8280  '.           08590002
               10  FILLER           PIC X(7) VALUE 'C8281  '.           08600002
               10  FILLER           PIC X(7) VALUE 'C8282  '.           08610002
               10  FILLER           PIC X(7) VALUE 'C8283  '.           08620002
               10  FILLER           PIC X(7) VALUE 'C8284  '.           08630002
               10  FILLER           PIC X(7) VALUE 'C8285  '.           08640002
               10  FILLER           PIC X(7) VALUE 'C8286  '.           08650002
               10  FILLER           PIC X(7) VALUE 'C8287  '.           08660002
               10  FILLER           PIC X(7) VALUE 'C8288  '.           08670002
               10  FILLER           PIC X(7) VALUE 'C8289  '.           08680002
               10  FILLER           PIC X(7) VALUE 'C8290  '.           08690002
               10  FILLER           PIC X(7) VALUE 'C8291  '.           08700002
               10  FILLER           PIC X(7) VALUE 'C8292  '.           08710002
               10  FILLER           PIC X(7) VALUE 'C8293  '.           08720002
               10  FILLER           PIC X(7) VALUE 'C8294  '.           08730002
               10  FILLER           PIC X(7) VALUE 'C8295  '.           08740002
               10  FILLER           PIC X(7) VALUE 'C8296  '.           08750002
               10  FILLER           PIC X(7) VALUE 'C8297  '.           08760002
               10  FILLER           PIC X(7) VALUE 'C8298  '.           08770002
               10  FILLER           PIC X(7) VALUE 'C8299  '.           08780002
               10  FILLER           PIC X(7) VALUE 'C8300  '.           08790002
               10  FILLER           PIC X(7) VALUE 'C8301  '.           08800002
               10  FILLER           PIC X(7) VALUE 'C8302  '.           08810002
               10  FILLER           PIC X(7) VALUE 'C8303  '.           08820002
               10  FILLER           PIC X(7) VALUE 'C8304  '.           08830002
               10  FILLER           PIC X(7) VALUE 'C8305  '.           08840002
               10  FILLER           PIC X(7) VALUE 'C8306  '.           08850002
               10  FILLER           PIC X(7) VALUE 'C8307  '.           08860002
               10  FILLER           PIC X(7) VALUE 'C8308  '.           08870002
               10  FILLER           PIC X(7) VALUE 'C8309  '.           08880002
               10  FILLER           PIC X(7) VALUE 'C8310  '.           08890002
               10  FILLER           PIC X(7) VALUE 'C8311  '.           08900002
               10  FILLER           PIC X(7) VALUE 'C8312  '.           08910002
               10  FILLER           PIC X(7) VALUE 'C8313  '.           08920002
               10  FILLER           PIC X(7) VALUE 'C8314  '.           08930002
               10  FILLER           PIC X(7) VALUE 'C8315  '.           08940002
               10  FILLER           PIC X(7) VALUE 'C8316  '.           08950002
               10  FILLER           PIC X(7) VALUE 'C8317  '.           08960002
               10  FILLER           PIC X(7) VALUE 'C8318  '.           08970002
               10  FILLER           PIC X(7) VALUE 'C8319  '.           08980002
               10  FILLER           PIC X(7) VALUE 'C8330  '.           08990002
               10  FILLER           PIC X(7) VALUE 'C8331  '.           09000002
               10  FILLER           PIC X(7) VALUE 'C8332  '.           09010002
               10  FILLER           PIC X(7) VALUE 'C8333  '.           09020002
               10  FILLER           PIC X(7) VALUE 'C8334  '.           09030002
               10  FILLER           PIC X(7) VALUE 'C8335  '.           09040002
               10  FILLER           PIC X(7) VALUE 'C8336  '.           09050002
               10  FILLER           PIC X(7) VALUE 'C8337  '.           09060002
               10  FILLER           PIC X(7) VALUE 'C8338  '.           09070002
               10  FILLER           PIC X(7) VALUE 'C8339  '.           09080002
               10  FILLER           PIC X(7) VALUE 'C8350  '.           09090002
               10  FILLER           PIC X(7) VALUE 'C8351  '.           09100002
               10  FILLER           PIC X(7) VALUE 'C8352  '.           09110002
               10  FILLER           PIC X(7) VALUE 'C8353  '.           09120002
               10  FILLER           PIC X(7) VALUE 'C8354  '.           09130002
               10  FILLER           PIC X(7) VALUE 'C8355  '.           09140002
               10  FILLER           PIC X(7) VALUE 'C8356  '.           09150002
               10  FILLER           PIC X(7) VALUE 'C8357  '.           09160002
               10  FILLER           PIC X(7) VALUE 'C8358  '.           09170002
               10  FILLER           PIC X(7) VALUE 'C8359  '.           09180002
               10  FILLER           PIC X(7) VALUE 'C8370  '.           09190002
               10  FILLER           PIC X(7) VALUE 'C8371  '.           09200002
               10  FILLER           PIC X(7) VALUE 'C8372  '.           09210002
               10  FILLER           PIC X(7) VALUE 'C8373  '.           09220002
               10  FILLER           PIC X(7) VALUE 'C8374  '.           09230002
               10  FILLER           PIC X(7) VALUE 'C8375  '.           09240002
               10  FILLER           PIC X(7) VALUE 'C8376  '.           09250002
               10  FILLER           PIC X(7) VALUE 'C8377  '.           09260002
               10  FILLER           PIC X(7) VALUE 'C8378  '.           09270002
               10  FILLER           PIC X(7) VALUE 'C8379  '.           09280002
               10  FILLER           PIC X(7) VALUE 'C8380  '.           09290002
               10  FILLER           PIC X(7) VALUE 'C8381  '.           09300002
               10  FILLER           PIC X(7) VALUE 'C8382  '.           09310002
               10  FILLER           PIC X(7) VALUE 'C8383  '.           09320002
               10  FILLER           PIC X(7) VALUE 'C8384  '.           09330002
               10  FILLER           PIC X(7) VALUE 'C8385  '.           09340002
               10  FILLER           PIC X(7) VALUE 'C8386  '.           09350002
               10  FILLER           PIC X(7) VALUE 'C8387  '.           09360002
               10  FILLER           PIC X(7) VALUE 'C8388  '.           09370002
               10  FILLER           PIC X(7) VALUE 'C8389  '.           09380002
               10  FILLER           PIC X(7) VALUE 'C8390  '.           09390002
               10  FILLER           PIC X(7) VALUE 'C8391  '.           09400002
               10  FILLER           PIC X(7) VALUE 'C8392  '.           09410002
               10  FILLER           PIC X(7) VALUE 'C8393  '.           09420002
               10  FILLER           PIC X(7) VALUE 'C8394  '.           09430002
               10  FILLER           PIC X(7) VALUE 'C8395  '.           09440002
               10  FILLER           PIC X(7) VALUE 'C8396  '.           09450002
               10  FILLER           PIC X(7) VALUE 'C8397  '.           09460002
               10  FILLER           PIC X(7) VALUE 'C8398  '.           09470002
               10  FILLER           PIC X(7) VALUE 'C8399  '.           09480002
               10  FILLER           PIC X(7) VALUE 'C84A0  '.           09490002
               10  FILLER           PIC X(7) VALUE 'C84A1  '.           09500002
               10  FILLER           PIC X(7) VALUE 'C84A2  '.           09510002
               10  FILLER           PIC X(7) VALUE 'C84A3  '.           09520002
               10  FILLER           PIC X(7) VALUE 'C84A4  '.           09530002
               10  FILLER           PIC X(7) VALUE 'C84A5  '.           09540002
               10  FILLER           PIC X(7) VALUE 'C84A6  '.           09550002
               10  FILLER           PIC X(7) VALUE 'C84A7  '.           09560002
               10  FILLER           PIC X(7) VALUE 'C84A8  '.           09570002
               10  FILLER           PIC X(7) VALUE 'C84A9  '.           09580002
               10  FILLER           PIC X(7) VALUE 'C84Z0  '.           09590002
               10  FILLER           PIC X(7) VALUE 'C84Z1  '.           09600002
               10  FILLER           PIC X(7) VALUE 'C84Z2  '.           09610002
               10  FILLER           PIC X(7) VALUE 'C84Z3  '.           09620002
               10  FILLER           PIC X(7) VALUE 'C84Z4  '.           09630002
               10  FILLER           PIC X(7) VALUE 'C84Z5  '.           09640002
               10  FILLER           PIC X(7) VALUE 'C84Z6  '.           09650002
               10  FILLER           PIC X(7) VALUE 'C84Z7  '.           09660002
               10  FILLER           PIC X(7) VALUE 'C84Z8  '.           09670002
               10  FILLER           PIC X(7) VALUE 'C84Z9  '.           09680002
               10  FILLER           PIC X(7) VALUE 'C8400  '.           09690002
               10  FILLER           PIC X(7) VALUE 'C8401  '.           09700002
               10  FILLER           PIC X(7) VALUE 'C8402  '.           09710002
               10  FILLER           PIC X(7) VALUE 'C8403  '.           09720002
               10  FILLER           PIC X(7) VALUE 'C8404  '.           09730002
               10  FILLER           PIC X(7) VALUE 'C8405  '.           09740002
               10  FILLER           PIC X(7) VALUE 'C8406  '.           09750002
               10  FILLER           PIC X(7) VALUE 'C8407  '.           09760002
               10  FILLER           PIC X(7) VALUE 'C8408  '.           09770002
               10  FILLER           PIC X(7) VALUE 'C8409  '.           09780002
               10  FILLER           PIC X(7) VALUE 'C8410  '.           09790002
               10  FILLER           PIC X(7) VALUE 'C8411  '.           09800002
               10  FILLER           PIC X(7) VALUE 'C8412  '.           09810002
               10  FILLER           PIC X(7) VALUE 'C8413  '.           09820002
               10  FILLER           PIC X(7) VALUE 'C8414  '.           09830002
               10  FILLER           PIC X(7) VALUE 'C8415  '.           09840002
               10  FILLER           PIC X(7) VALUE 'C8416  '.           09850002
               10  FILLER           PIC X(7) VALUE 'C8417  '.           09860002
               10  FILLER           PIC X(7) VALUE 'C8418  '.           09870002
               10  FILLER           PIC X(7) VALUE 'C8419  '.           09880002
               10  FILLER           PIC X(7) VALUE 'C8440  '.           09890002
               10  FILLER           PIC X(7) VALUE 'C8441  '.           09900002
               10  FILLER           PIC X(7) VALUE 'C8442  '.           09910002
               10  FILLER           PIC X(7) VALUE 'C8443  '.           09920002
               10  FILLER           PIC X(7) VALUE 'C8444  '.           09930002
               10  FILLER           PIC X(7) VALUE 'C8445  '.           09940002
               10  FILLER           PIC X(7) VALUE 'C8446  '.           09950002
               10  FILLER           PIC X(7) VALUE 'C8447  '.           09960002
               10  FILLER           PIC X(7) VALUE 'C8448  '.           09970002
               10  FILLER           PIC X(7) VALUE 'C8449  '.           09980002
               10  FILLER           PIC X(7) VALUE 'C8460  '.           09990002
               10  FILLER           PIC X(7) VALUE 'C8461  '.           10000002
               10  FILLER           PIC X(7) VALUE 'C8462  '.           10010002
               10  FILLER           PIC X(7) VALUE 'C8463  '.           10020002
               10  FILLER           PIC X(7) VALUE 'C8464  '.           10030002
               10  FILLER           PIC X(7) VALUE 'C8465  '.           10040002
               10  FILLER           PIC X(7) VALUE 'C8466  '.           10050002
               10  FILLER           PIC X(7) VALUE 'C8467  '.           10060002
               10  FILLER           PIC X(7) VALUE 'C8468  '.           10070002
               10  FILLER           PIC X(7) VALUE 'C8469  '.           10080002
               10  FILLER           PIC X(7) VALUE 'C8470  '.           10090002
               10  FILLER           PIC X(7) VALUE 'C8471  '.           10100002
               10  FILLER           PIC X(7) VALUE 'C8472  '.           10110002
               10  FILLER           PIC X(7) VALUE 'C8473  '.           10120002
               10  FILLER           PIC X(7) VALUE 'C8474  '.           10130002
               10  FILLER           PIC X(7) VALUE 'C8475  '.           10140002
               10  FILLER           PIC X(7) VALUE 'C8476  '.           10150002
               10  FILLER           PIC X(7) VALUE 'C8477  '.           10160002
               10  FILLER           PIC X(7) VALUE 'C8478  '.           10170002
               10  FILLER           PIC X(7) VALUE 'C8479  '.           10180002
               10  FILLER           PIC X(7) VALUE 'C8490  '.           10190002
               10  FILLER           PIC X(7) VALUE 'C8491  '.           10200002
               10  FILLER           PIC X(7) VALUE 'C8492  '.           10210002
               10  FILLER           PIC X(7) VALUE 'C8493  '.           10220002
               10  FILLER           PIC X(7) VALUE 'C8494  '.           10230002
               10  FILLER           PIC X(7) VALUE 'C8495  '.           10240002
               10  FILLER           PIC X(7) VALUE 'C8496  '.           10250002
               10  FILLER           PIC X(7) VALUE 'C8497  '.           10260002
               10  FILLER           PIC X(7) VALUE 'C8498  '.           10270002
               10  FILLER           PIC X(7) VALUE 'C8499  '.           10280002
               10  FILLER           PIC X(7) VALUE 'C8510  '.           10290002
               10  FILLER           PIC X(7) VALUE 'C8511  '.           10300002
               10  FILLER           PIC X(7) VALUE 'C8512  '.           10310002
               10  FILLER           PIC X(7) VALUE 'C8513  '.           10320002
               10  FILLER           PIC X(7) VALUE 'C8514  '.           10330002
               10  FILLER           PIC X(7) VALUE 'C8515  '.           10340002
               10  FILLER           PIC X(7) VALUE 'C8516  '.           10350002
               10  FILLER           PIC X(7) VALUE 'C8517  '.           10360002
               10  FILLER           PIC X(7) VALUE 'C8518  '.           10370002
               10  FILLER           PIC X(7) VALUE 'C8519  '.           10380002
               10  FILLER           PIC X(7) VALUE 'C8520  '.           10390002
               10  FILLER           PIC X(7) VALUE 'C8521  '.           10400002
               10  FILLER           PIC X(7) VALUE 'C8522  '.           10410002
               10  FILLER           PIC X(7) VALUE 'C8523  '.           10420002
               10  FILLER           PIC X(7) VALUE 'C8524  '.           10430002
               10  FILLER           PIC X(7) VALUE 'C8525  '.           10440002
               10  FILLER           PIC X(7) VALUE 'C8526  '.           10450002
               10  FILLER           PIC X(7) VALUE 'C8527  '.           10460002
               10  FILLER           PIC X(7) VALUE 'C8528  '.           10470002
               10  FILLER           PIC X(7) VALUE 'C8529  '.           10480002
               10  FILLER           PIC X(7) VALUE 'C8580  '.           10490002
               10  FILLER           PIC X(7) VALUE 'C8581  '.           10500002
               10  FILLER           PIC X(7) VALUE 'C8582  '.           10510002
               10  FILLER           PIC X(7) VALUE 'C8583  '.           10520002
               10  FILLER           PIC X(7) VALUE 'C8584  '.           10530002
               10  FILLER           PIC X(7) VALUE 'C8585  '.           10540002
               10  FILLER           PIC X(7) VALUE 'C8586  '.           10550002
               10  FILLER           PIC X(7) VALUE 'C8587  '.           10560002
               10  FILLER           PIC X(7) VALUE 'C8588  '.           10570002
               10  FILLER           PIC X(7) VALUE 'C8589  '.           10580002
               10  FILLER           PIC X(7) VALUE 'C8590  '.           10590002
               10  FILLER           PIC X(7) VALUE 'C8591  '.           10600002
               10  FILLER           PIC X(7) VALUE 'C8592  '.           10610002
               10  FILLER           PIC X(7) VALUE 'C8593  '.           10620002
               10  FILLER           PIC X(7) VALUE 'C8594  '.           10630002
               10  FILLER           PIC X(7) VALUE 'C8595  '.           10640002
               10  FILLER           PIC X(7) VALUE 'C8596  '.           10650002
               10  FILLER           PIC X(7) VALUE 'C8597  '.           10660002
               10  FILLER           PIC X(7) VALUE 'C8598  '.           10670002
               10  FILLER           PIC X(7) VALUE 'C8599  '.           10680002
               10  FILLER           PIC X(7) VALUE 'C860   '.           10690002
               10  FILLER           PIC X(7) VALUE 'C861   '.           10700002
               10  FILLER           PIC X(7) VALUE 'C862   '.           10710002
               10  FILLER           PIC X(7) VALUE 'C863   '.           10720002
               10  FILLER           PIC X(7) VALUE 'C864   '.           10730002
               10  FILLER           PIC X(7) VALUE 'C865   '.           10740002
               10  FILLER           PIC X(7) VALUE 'C866   '.           10750002
               10  FILLER           PIC X(7) VALUE 'C882   '.           10760002
               10  FILLER           PIC X(7) VALUE 'C883   '.           10770002
               10  FILLER           PIC X(7) VALUE 'C884   '.           10780002
               10  FILLER           PIC X(7) VALUE 'C888   '.           10790002
               10  FILLER           PIC X(7) VALUE 'C889   '.           10800002
               10  FILLER           PIC X(7) VALUE 'C9000  '.           10810002
               10  FILLER           PIC X(7) VALUE 'C9001  '.           10820002
               10  FILLER           PIC X(7) VALUE 'C9002  '.           10830002
               10  FILLER           PIC X(7) VALUE 'C9010  '.           10840002
               10  FILLER           PIC X(7) VALUE 'C9011  '.           10850002
               10  FILLER           PIC X(7) VALUE 'C9012  '.           10860002
               10  FILLER           PIC X(7) VALUE 'C9020  '.           10870002
               10  FILLER           PIC X(7) VALUE 'C9021  '.           10880002
               10  FILLER           PIC X(7) VALUE 'C9022  '.           10890002
               10  FILLER           PIC X(7) VALUE 'C9030  '.           10900002
               10  FILLER           PIC X(7) VALUE 'C9031  '.           10910002
               10  FILLER           PIC X(7) VALUE 'C9032  '.           10920002
               10  FILLER           PIC X(7) VALUE 'C91A0  '.           10930002
               10  FILLER           PIC X(7) VALUE 'C91A1  '.           10940002
               10  FILLER           PIC X(7) VALUE 'C91A2  '.           10950002
               10  FILLER           PIC X(7) VALUE 'C91Z0  '.           10960002
               10  FILLER           PIC X(7) VALUE 'C91Z1  '.           10970002
               10  FILLER           PIC X(7) VALUE 'C91Z2  '.           10980002
               10  FILLER           PIC X(7) VALUE 'C9100  '.           10990002
               10  FILLER           PIC X(7) VALUE 'C9101  '.           11000002
               10  FILLER           PIC X(7) VALUE 'C9102  '.           11010002
               10  FILLER           PIC X(7) VALUE 'C9110  '.           11020002
               10  FILLER           PIC X(7) VALUE 'C9111  '.           11030002
               10  FILLER           PIC X(7) VALUE 'C9112  '.           11040002
               10  FILLER           PIC X(7) VALUE 'C9130  '.           11050002
               10  FILLER           PIC X(7) VALUE 'C9131  '.           11060002
               10  FILLER           PIC X(7) VALUE 'C9132  '.           11070002
               10  FILLER           PIC X(7) VALUE 'C9140  '.           11080002
               10  FILLER           PIC X(7) VALUE 'C9141  '.           11090002
               10  FILLER           PIC X(7) VALUE 'C9142  '.           11100002
               10  FILLER           PIC X(7) VALUE 'C9150  '.           11110002
               10  FILLER           PIC X(7) VALUE 'C9151  '.           11120002
               10  FILLER           PIC X(7) VALUE 'C9152  '.           11130002
               10  FILLER           PIC X(7) VALUE 'C9160  '.           11140002
               10  FILLER           PIC X(7) VALUE 'C9161  '.           11150002
               10  FILLER           PIC X(7) VALUE 'C9162  '.           11160002
               10  FILLER           PIC X(7) VALUE 'C9190  '.           11170002
               10  FILLER           PIC X(7) VALUE 'C9191  '.           11180002
               10  FILLER           PIC X(7) VALUE 'C9192  '.           11190002
               10  FILLER           PIC X(7) VALUE 'C92A0  '.           11200002
               10  FILLER           PIC X(7) VALUE 'C92A1  '.           11210002
               10  FILLER           PIC X(7) VALUE 'C92A2  '.           11220002
               10  FILLER           PIC X(7) VALUE 'C92Z0  '.           11230002
               10  FILLER           PIC X(7) VALUE 'C92Z1  '.           11240002
               10  FILLER           PIC X(7) VALUE 'C92Z2  '.           11250002
               10  FILLER           PIC X(7) VALUE 'C9200  '.           11260002
               10  FILLER           PIC X(7) VALUE 'C9201  '.           11270002
               10  FILLER           PIC X(7) VALUE 'C9202  '.           11280002
               10  FILLER           PIC X(7) VALUE 'C9210  '.           11290002
               10  FILLER           PIC X(7) VALUE 'C9211  '.           11300002
               10  FILLER           PIC X(7) VALUE 'C9212  '.           11310002
               10  FILLER           PIC X(7) VALUE 'C9220  '.           11320002
               10  FILLER           PIC X(7) VALUE 'C9221  '.           11330002
               10  FILLER           PIC X(7) VALUE 'C9222  '.           11340002
               10  FILLER           PIC X(7) VALUE 'C9230  '.           11350002
               10  FILLER           PIC X(7) VALUE 'C9231  '.           11360002
               10  FILLER           PIC X(7) VALUE 'C9232  '.           11370002
               10  FILLER           PIC X(7) VALUE 'C9240  '.           11380002
               10  FILLER           PIC X(7) VALUE 'C9241  '.           11390002
               10  FILLER           PIC X(7) VALUE 'C9242  '.           11400002
               10  FILLER           PIC X(7) VALUE 'C9250  '.           11410002
               10  FILLER           PIC X(7) VALUE 'C9251  '.           11420002
               10  FILLER           PIC X(7) VALUE 'C9252  '.           11430002
               10  FILLER           PIC X(7) VALUE 'C9260  '.           11440002
               10  FILLER           PIC X(7) VALUE 'C9261  '.           11450002
               10  FILLER           PIC X(7) VALUE 'C9262  '.           11460002
               10  FILLER           PIC X(7) VALUE 'C9290  '.           11470002
               10  FILLER           PIC X(7) VALUE 'C9291  '.           11480002
               10  FILLER           PIC X(7) VALUE 'C9292  '.           11490002
               10  FILLER           PIC X(7) VALUE 'C93Z0  '.           11500002
               10  FILLER           PIC X(7) VALUE 'C93Z1  '.           11510002
               10  FILLER           PIC X(7) VALUE 'C93Z2  '.           11520002
               10  FILLER           PIC X(7) VALUE 'C9300  '.           11530002
               10  FILLER           PIC X(7) VALUE 'C9301  '.           11540002
               10  FILLER           PIC X(7) VALUE 'C9302  '.           11550002
               10  FILLER           PIC X(7) VALUE 'C9310  '.           11560002
               10  FILLER           PIC X(7) VALUE 'C9311  '.           11570002
               10  FILLER           PIC X(7) VALUE 'C9312  '.           11580002
               10  FILLER           PIC X(7) VALUE 'C9330  '.           11590002
               10  FILLER           PIC X(7) VALUE 'C9331  '.           11600002
               10  FILLER           PIC X(7) VALUE 'C9332  '.           11610002
               10  FILLER           PIC X(7) VALUE 'C9390  '.           11620002
               10  FILLER           PIC X(7) VALUE 'C9391  '.           11630002
               10  FILLER           PIC X(7) VALUE 'C9392  '.           11640002
               10  FILLER           PIC X(7) VALUE 'C9400  '.           11650002
               10  FILLER           PIC X(7) VALUE 'C9401  '.           11660002
               10  FILLER           PIC X(7) VALUE 'C9402  '.           11670002
               10  FILLER           PIC X(7) VALUE 'C9420  '.           11680002
               10  FILLER           PIC X(7) VALUE 'C9421  '.           11690002
               10  FILLER           PIC X(7) VALUE 'C9422  '.           11700002
               10  FILLER           PIC X(7) VALUE 'C9430  '.           11710002
               10  FILLER           PIC X(7) VALUE 'C9431  '.           11720002
               10  FILLER           PIC X(7) VALUE 'C9432  '.           11730002
               10  FILLER           PIC X(7) VALUE 'C9440  '.           11740002
               10  FILLER           PIC X(7) VALUE 'C9441  '.           11750002
               10  FILLER           PIC X(7) VALUE 'C9442  '.           11760002
               10  FILLER           PIC X(7) VALUE 'C946   '.           11770002
               10  FILLER           PIC X(7) VALUE 'C9480  '.           11780002
               10  FILLER           PIC X(7) VALUE 'C9481  '.           11790002
               10  FILLER           PIC X(7) VALUE 'C9482  '.           11800002
               10  FILLER           PIC X(7) VALUE 'C9500  '.           11810002
               10  FILLER           PIC X(7) VALUE 'C9501  '.           11820002
               10  FILLER           PIC X(7) VALUE 'C9502  '.           11830002
               10  FILLER           PIC X(7) VALUE 'C9510  '.           11840002
               10  FILLER           PIC X(7) VALUE 'C9511  '.           11850002
               10  FILLER           PIC X(7) VALUE 'C9512  '.           11860002
               10  FILLER           PIC X(7) VALUE 'C9590  '.           11870002
               10  FILLER           PIC X(7) VALUE 'C9591  '.           11880002
               10  FILLER           PIC X(7) VALUE 'C9592  '.           11890002
               10  FILLER           PIC X(7) VALUE 'C96A   '.           11900002
               10  FILLER           PIC X(7) VALUE 'C96Z   '.           11910002
               10  FILLER           PIC X(7) VALUE 'C960   '.           11920002
               10  FILLER           PIC X(7) VALUE 'C9620  '.           11930002
               10  FILLER           PIC X(7) VALUE 'C9621  '.           11940002
               10  FILLER           PIC X(7) VALUE 'C9622  '.           11950002
               10  FILLER           PIC X(7) VALUE 'C9629  '.           11960002
               10  FILLER           PIC X(7) VALUE 'C964   '.           11970002
               10  FILLER           PIC X(7) VALUE 'C969   '.           11980002
               10  FILLER           PIC X(7) VALUE 'D0000  '.           11990002
               10  FILLER           PIC X(7) VALUE 'D0001  '.           12000002
               10  FILLER           PIC X(7) VALUE 'D0002  '.           12010002
               10  FILLER           PIC X(7) VALUE 'D0003  '.           12020002
               10  FILLER           PIC X(7) VALUE 'D0004  '.           12030002
               10  FILLER           PIC X(7) VALUE 'D0005  '.           12040002
               10  FILLER           PIC X(7) VALUE 'D0006  '.           12050002
               10  FILLER           PIC X(7) VALUE 'D0007  '.           12060002
               10  FILLER           PIC X(7) VALUE 'D0008  '.           12070002
               10  FILLER           PIC X(7) VALUE 'D001   '.           12080002
               10  FILLER           PIC X(7) VALUE 'D002   '.           12090002
               10  FILLER           PIC X(7) VALUE 'D010   '.           12100002
               10  FILLER           PIC X(7) VALUE 'D011   '.           12110002
               10  FILLER           PIC X(7) VALUE 'D012   '.           12120002
               10  FILLER           PIC X(7) VALUE 'D013   '.           12130002
               10  FILLER           PIC X(7) VALUE 'D0140  '.           12140002
               10  FILLER           PIC X(7) VALUE 'D0149  '.           12150002
               10  FILLER           PIC X(7) VALUE 'D015   '.           12160002
               10  FILLER           PIC X(7) VALUE 'D017   '.           12170002
               10  FILLER           PIC X(7) VALUE 'D019   '.           12180002
               10  FILLER           PIC X(7) VALUE 'D020   '.           12190002
               10  FILLER           PIC X(7) VALUE 'D021   '.           12200002
               10  FILLER           PIC X(7) VALUE 'D0220  '.           12210002
               10  FILLER           PIC X(7) VALUE 'D0221  '.           12220002
               10  FILLER           PIC X(7) VALUE 'D0222  '.           12230002
               10  FILLER           PIC X(7) VALUE 'D023   '.           12240002
               10  FILLER           PIC X(7) VALUE 'D024   '.           12250002
               10  FILLER           PIC X(7) VALUE 'D030   '.           12260002
               10  FILLER           PIC X(7) VALUE 'D03111 '.           12270002
               10  FILLER           PIC X(7) VALUE 'D03112 '.           12280002
               10  FILLER           PIC X(7) VALUE 'D03121 '.           12290002
               10  FILLER           PIC X(7) VALUE 'D03122 '.           12300002
               10  FILLER           PIC X(7) VALUE 'D0321  '.           12310002
               10  FILLER           PIC X(7) VALUE 'D0322  '.           12320002
               10  FILLER           PIC X(7) VALUE 'D0330  '.           12330002
               10  FILLER           PIC X(7) VALUE 'D0339  '.           12340002
               10  FILLER           PIC X(7) VALUE 'D034   '.           12350002
               10  FILLER           PIC X(7) VALUE 'D0351  '.           12360002
               10  FILLER           PIC X(7) VALUE 'D0352  '.           12370002
               10  FILLER           PIC X(7) VALUE 'D0359  '.           12380002
               10  FILLER           PIC X(7) VALUE 'D0361  '.           12390002
               10  FILLER           PIC X(7) VALUE 'D0362  '.           12400002
               10  FILLER           PIC X(7) VALUE 'D0371  '.           12410002
               10  FILLER           PIC X(7) VALUE 'D0372  '.           12420002
               10  FILLER           PIC X(7) VALUE 'D038   '.           12430002
               10  FILLER           PIC X(7) VALUE 'D039   '.           12440002
               10  FILLER           PIC X(7) VALUE 'D040   '.           12450002
               10  FILLER           PIC X(7) VALUE 'D04111 '.           12460002
               10  FILLER           PIC X(7) VALUE 'D04112 '.           12470002
               10  FILLER           PIC X(7) VALUE 'D04121 '.           12480002
               10  FILLER           PIC X(7) VALUE 'D04122 '.           12490002
               10  FILLER           PIC X(7) VALUE 'D0421  '.           12500002
               10  FILLER           PIC X(7) VALUE 'D0422  '.           12510002
               10  FILLER           PIC X(7) VALUE 'D0430  '.           12520002
               10  FILLER           PIC X(7) VALUE 'D0439  '.           12530002
               10  FILLER           PIC X(7) VALUE 'D044   '.           12540002
               10  FILLER           PIC X(7) VALUE 'D045   '.           12550002
               10  FILLER           PIC X(7) VALUE 'D0461  '.           12560002
               10  FILLER           PIC X(7) VALUE 'D0462  '.           12570002
               10  FILLER           PIC X(7) VALUE 'D0471  '.           12580002
               10  FILLER           PIC X(7) VALUE 'D0472  '.           12590002
               10  FILLER           PIC X(7) VALUE 'D048   '.           12600002
               10  FILLER           PIC X(7) VALUE 'D049   '.           12610002
               10  FILLER           PIC X(7) VALUE 'D0501  '.           12620002
               10  FILLER           PIC X(7) VALUE 'D0502  '.           12630002
               10  FILLER           PIC X(7) VALUE 'D0511  '.           12640002
               10  FILLER           PIC X(7) VALUE 'D0512  '.           12650002
               10  FILLER           PIC X(7) VALUE 'D0581  '.           12660002
               10  FILLER           PIC X(7) VALUE 'D0582  '.           12670002
               10  FILLER           PIC X(7) VALUE 'D0591  '.           12680002
               10  FILLER           PIC X(7) VALUE 'D0592  '.           12690002
               10  FILLER           PIC X(7) VALUE 'D060   '.           12700002
               10  FILLER           PIC X(7) VALUE 'D061   '.           12710002
               10  FILLER           PIC X(7) VALUE 'D067   '.           12720002
               10  FILLER           PIC X(7) VALUE 'D069   '.           12730002
               10  FILLER           PIC X(7) VALUE 'D070   '.           12740002
               10  FILLER           PIC X(7) VALUE 'D071   '.           12750002
               10  FILLER           PIC X(7) VALUE 'D072   '.           12760002
               10  FILLER           PIC X(7) VALUE 'D0730  '.           12770002
               10  FILLER           PIC X(7) VALUE 'D0739  '.           12780002
               10  FILLER           PIC X(7) VALUE 'D074   '.           12790002
               10  FILLER           PIC X(7) VALUE 'D075   '.           12800002
               10  FILLER           PIC X(7) VALUE 'D0760  '.           12810002
               10  FILLER           PIC X(7) VALUE 'D0761  '.           12820002
               10  FILLER           PIC X(7) VALUE 'D0769  '.           12830002
               10  FILLER           PIC X(7) VALUE 'D090   '.           12840002
               10  FILLER           PIC X(7) VALUE 'D0910  '.           12850002
               10  FILLER           PIC X(7) VALUE 'D0919  '.           12860002
               10  FILLER           PIC X(7) VALUE 'D0921  '.           12870002
               10  FILLER           PIC X(7) VALUE 'D0922  '.           12880002
               10  FILLER           PIC X(7) VALUE 'D093   '.           12890002
               10  FILLER           PIC X(7) VALUE 'D098   '.           12900002
               10  FILLER           PIC X(7) VALUE 'D099   '.           12910002
               10  FILLER           PIC X(7) VALUE 'D100   '.           12920002
               10  FILLER           PIC X(7) VALUE 'D101   '.           12930002
               10  FILLER           PIC X(7) VALUE 'D102   '.           12940002
               10  FILLER           PIC X(7) VALUE 'D1030  '.           12950002
               10  FILLER           PIC X(7) VALUE 'D1039  '.           12960002
               10  FILLER           PIC X(7) VALUE 'D104   '.           12970002
               10  FILLER           PIC X(7) VALUE 'D105   '.           12980002
               10  FILLER           PIC X(7) VALUE 'D106   '.           12990002
               10  FILLER           PIC X(7) VALUE 'D107   '.           13000002
               10  FILLER           PIC X(7) VALUE 'D109   '.           13010002
               10  FILLER           PIC X(7) VALUE 'D110   '.           13020002
               10  FILLER           PIC X(7) VALUE 'D117   '.           13030002
               10  FILLER           PIC X(7) VALUE 'D119   '.           13040002
               10  FILLER           PIC X(7) VALUE 'D120   '.           13050002
               10  FILLER           PIC X(7) VALUE 'D121   '.           13060002
               10  FILLER           PIC X(7) VALUE 'D122   '.           13070002
               10  FILLER           PIC X(7) VALUE 'D123   '.           13080002
               10  FILLER           PIC X(7) VALUE 'D124   '.           13090002
               10  FILLER           PIC X(7) VALUE 'D125   '.           13100002
               10  FILLER           PIC X(7) VALUE 'D126   '.           13110002
               10  FILLER           PIC X(7) VALUE 'D127   '.           13120002
               10  FILLER           PIC X(7) VALUE 'D128   '.           13130002
               10  FILLER           PIC X(7) VALUE 'D129   '.           13140002
               10  FILLER           PIC X(7) VALUE 'D130   '.           13150002
               10  FILLER           PIC X(7) VALUE 'D131   '.           13160002
               10  FILLER           PIC X(7) VALUE 'D132   '.           13170002
               10  FILLER           PIC X(7) VALUE 'D1330  '.           13180002
               10  FILLER           PIC X(7) VALUE 'D1339  '.           13190002
               10  FILLER           PIC X(7) VALUE 'D134   '.           13200002
               10  FILLER           PIC X(7) VALUE 'D135   '.           13210002
               10  FILLER           PIC X(7) VALUE 'D136   '.           13220002
               10  FILLER           PIC X(7) VALUE 'D137   '.           13230002
               10  FILLER           PIC X(7) VALUE 'D139   '.           13240002
               10  FILLER           PIC X(7) VALUE 'D140   '.           13250002
               10  FILLER           PIC X(7) VALUE 'D141   '.           13260002
               10  FILLER           PIC X(7) VALUE 'D142   '.           13270002
               10  FILLER           PIC X(7) VALUE 'D1430  '.           13280002
               10  FILLER           PIC X(7) VALUE 'D1431  '.           13290002
               10  FILLER           PIC X(7) VALUE 'D1432  '.           13300002
               10  FILLER           PIC X(7) VALUE 'D144   '.           13310002
               10  FILLER           PIC X(7) VALUE 'D150   '.           13320002
               10  FILLER           PIC X(7) VALUE 'D151   '.           13330002
               10  FILLER           PIC X(7) VALUE 'D152   '.           13340002
               10  FILLER           PIC X(7) VALUE 'D157   '.           13350002
               10  FILLER           PIC X(7) VALUE 'D159   '.           13360002
               10  FILLER           PIC X(7) VALUE 'D1601  '.           13370002
               10  FILLER           PIC X(7) VALUE 'D1602  '.           13380002
               10  FILLER           PIC X(7) VALUE 'D1611  '.           13390002
               10  FILLER           PIC X(7) VALUE 'D1612  '.           13400002
               10  FILLER           PIC X(7) VALUE 'D1621  '.           13410002
               10  FILLER           PIC X(7) VALUE 'D1622  '.           13420002
               10  FILLER           PIC X(7) VALUE 'D1631  '.           13430002
               10  FILLER           PIC X(7) VALUE 'D1632  '.           13440002
               10  FILLER           PIC X(7) VALUE 'D164   '.           13450002
               10  FILLER           PIC X(7) VALUE 'D165   '.           13460002
               10  FILLER           PIC X(7) VALUE 'D166   '.           13470002
               10  FILLER           PIC X(7) VALUE 'D167   '.           13480002
               10  FILLER           PIC X(7) VALUE 'D168   '.           13490002
               10  FILLER           PIC X(7) VALUE 'D169   '.           13500002
               10  FILLER           PIC X(7) VALUE 'D170   '.           13510002
               10  FILLER           PIC X(7) VALUE 'D171   '.           13520002
               10  FILLER           PIC X(7) VALUE 'D1721  '.           13530002
               10  FILLER           PIC X(7) VALUE 'D1722  '.           13540002
               10  FILLER           PIC X(7) VALUE 'D1723  '.           13550002
               10  FILLER           PIC X(7) VALUE 'D1724  '.           13560002
               10  FILLER           PIC X(7) VALUE 'D1730  '.           13570002
               10  FILLER           PIC X(7) VALUE 'D1739  '.           13580002
               10  FILLER           PIC X(7) VALUE 'D174   '.           13590002
               10  FILLER           PIC X(7) VALUE 'D175   '.           13600002
               10  FILLER           PIC X(7) VALUE 'D176   '.           13610002
               10  FILLER           PIC X(7) VALUE 'D1771  '.           13620002
               10  FILLER           PIC X(7) VALUE 'D1772  '.           13630002
               10  FILLER           PIC X(7) VALUE 'D1779  '.           13640002
               10  FILLER           PIC X(7) VALUE 'D179   '.           13650002
               10  FILLER           PIC X(7) VALUE 'D1800  '.           13660002
               10  FILLER           PIC X(7) VALUE 'D1801  '.           13670002
               10  FILLER           PIC X(7) VALUE 'D1802  '.           13680002
               10  FILLER           PIC X(7) VALUE 'D1803  '.           13690002
               10  FILLER           PIC X(7) VALUE 'D1809  '.           13700002
               10  FILLER           PIC X(7) VALUE 'D181   '.           13710002
               10  FILLER           PIC X(7) VALUE 'D190   '.           13720002
               10  FILLER           PIC X(7) VALUE 'D191   '.           13730002
               10  FILLER           PIC X(7) VALUE 'D197   '.           13740002
               10  FILLER           PIC X(7) VALUE 'D199   '.           13750002
               10  FILLER           PIC X(7) VALUE 'D200   '.           13760002
               10  FILLER           PIC X(7) VALUE 'D201   '.           13770002
               10  FILLER           PIC X(7) VALUE 'D210   '.           13780002
               10  FILLER           PIC X(7) VALUE 'D2111  '.           13790002
               10  FILLER           PIC X(7) VALUE 'D2112  '.           13800002
               10  FILLER           PIC X(7) VALUE 'D2121  '.           13810002
               10  FILLER           PIC X(7) VALUE 'D2122  '.           13820002
               10  FILLER           PIC X(7) VALUE 'D213   '.           13830002
               10  FILLER           PIC X(7) VALUE 'D214   '.           13840002
               10  FILLER           PIC X(7) VALUE 'D215   '.           13850002
               10  FILLER           PIC X(7) VALUE 'D216   '.           13860002
               10  FILLER           PIC X(7) VALUE 'D219   '.           13870002
               10  FILLER           PIC X(7) VALUE 'D220   '.           13880002
               10  FILLER           PIC X(7) VALUE 'D22111 '.           13890002
               10  FILLER           PIC X(7) VALUE 'D22112 '.           13900002
               10  FILLER           PIC X(7) VALUE 'D22121 '.           13910002
               10  FILLER           PIC X(7) VALUE 'D22122 '.           13920002
               10  FILLER           PIC X(7) VALUE 'D2221  '.           13930002
               10  FILLER           PIC X(7) VALUE 'D2222  '.           13940002
               10  FILLER           PIC X(7) VALUE 'D2230  '.           13950002
               10  FILLER           PIC X(7) VALUE 'D2239  '.           13960002
               10  FILLER           PIC X(7) VALUE 'D224   '.           13970002
               10  FILLER           PIC X(7) VALUE 'D225   '.           13980002
               10  FILLER           PIC X(7) VALUE 'D2261  '.           13990002
               10  FILLER           PIC X(7) VALUE 'D2262  '.           14000002
               10  FILLER           PIC X(7) VALUE 'D2271  '.           14010002
               10  FILLER           PIC X(7) VALUE 'D2272  '.           14020002
               10  FILLER           PIC X(7) VALUE 'D229   '.           14030002
               10  FILLER           PIC X(7) VALUE 'D230   '.           14040002
               10  FILLER           PIC X(7) VALUE 'D23111 '.           14050002
               10  FILLER           PIC X(7) VALUE 'D23112 '.           14060002
               10  FILLER           PIC X(7) VALUE 'D23121 '.           14070002
               10  FILLER           PIC X(7) VALUE 'D23122 '.           14080002
               10  FILLER           PIC X(7) VALUE 'D2321  '.           14090002
               10  FILLER           PIC X(7) VALUE 'D2322  '.           14100002
               10  FILLER           PIC X(7) VALUE 'D2330  '.           14110002
               10  FILLER           PIC X(7) VALUE 'D2339  '.           14120002
               10  FILLER           PIC X(7) VALUE 'D234   '.           14130002
               10  FILLER           PIC X(7) VALUE 'D235   '.           14140002
               10  FILLER           PIC X(7) VALUE 'D2361  '.           14150002
               10  FILLER           PIC X(7) VALUE 'D2362  '.           14160002
               10  FILLER           PIC X(7) VALUE 'D2371  '.           14170002
               10  FILLER           PIC X(7) VALUE 'D2372  '.           14180002
               10  FILLER           PIC X(7) VALUE 'D239   '.           14190002
               10  FILLER           PIC X(7) VALUE 'D241   '.           14200002
               10  FILLER           PIC X(7) VALUE 'D242   '.           14210002
               10  FILLER           PIC X(7) VALUE 'D250   '.           14220002
               10  FILLER           PIC X(7) VALUE 'D251   '.           14230002
               10  FILLER           PIC X(7) VALUE 'D252   '.           14240002
               10  FILLER           PIC X(7) VALUE 'D259   '.           14250002
               10  FILLER           PIC X(7) VALUE 'D260   '.           14260002
               10  FILLER           PIC X(7) VALUE 'D261   '.           14270002
               10  FILLER           PIC X(7) VALUE 'D267   '.           14280002
               10  FILLER           PIC X(7) VALUE 'D269   '.           14290002
               10  FILLER           PIC X(7) VALUE 'D270   '.           14300002
               10  FILLER           PIC X(7) VALUE 'D271   '.           14310002
               10  FILLER           PIC X(7) VALUE 'D279   '.           14320002
               10  FILLER           PIC X(7) VALUE 'D280   '.           14330002
               10  FILLER           PIC X(7) VALUE 'D281   '.           14340002
               10  FILLER           PIC X(7) VALUE 'D282   '.           14350002
               10  FILLER           PIC X(7) VALUE 'D287   '.           14360002
               10  FILLER           PIC X(7) VALUE 'D289   '.           14370002
               10  FILLER           PIC X(7) VALUE 'D290   '.           14380002
               10  FILLER           PIC X(7) VALUE 'D291   '.           14390002
               10  FILLER           PIC X(7) VALUE 'D2920  '.           14400002
               10  FILLER           PIC X(7) VALUE 'D2921  '.           14410002
               10  FILLER           PIC X(7) VALUE 'D2922  '.           14420002
               10  FILLER           PIC X(7) VALUE 'D2930  '.           14430002
               10  FILLER           PIC X(7) VALUE 'D2931  '.           14440002
               10  FILLER           PIC X(7) VALUE 'D2932  '.           14450002
               10  FILLER           PIC X(7) VALUE 'D294   '.           14460002
               10  FILLER           PIC X(7) VALUE 'D298   '.           14470002
               10  FILLER           PIC X(7) VALUE 'D299   '.           14480002
               10  FILLER           PIC X(7) VALUE 'D3A00  '.           14490002
               10  FILLER           PIC X(7) VALUE 'D3A010 '.           14500002
               10  FILLER           PIC X(7) VALUE 'D3A011 '.           14510002
               10  FILLER           PIC X(7) VALUE 'D3A012 '.           14520002
               10  FILLER           PIC X(7) VALUE 'D3A019 '.           14530002
               10  FILLER           PIC X(7) VALUE 'D3A020 '.           14540002
               10  FILLER           PIC X(7) VALUE 'D3A021 '.           14550002
               10  FILLER           PIC X(7) VALUE 'D3A022 '.           14560002
               10  FILLER           PIC X(7) VALUE 'D3A023 '.           14570002
               10  FILLER           PIC X(7) VALUE 'D3A024 '.           14580002
               10  FILLER           PIC X(7) VALUE 'D3A025 '.           14590002
               10  FILLER           PIC X(7) VALUE 'D3A026 '.           14600002
               10  FILLER           PIC X(7) VALUE 'D3A029 '.           14610002
               10  FILLER           PIC X(7) VALUE 'D3A090 '.           14620002
               10  FILLER           PIC X(7) VALUE 'D3A091 '.           14630002
               10  FILLER           PIC X(7) VALUE 'D3A092 '.           14640002
               10  FILLER           PIC X(7) VALUE 'D3A093 '.           14650002
               10  FILLER           PIC X(7) VALUE 'D3A094 '.           14660002
               10  FILLER           PIC X(7) VALUE 'D3A095 '.           14670002
               10  FILLER           PIC X(7) VALUE 'D3A096 '.           14680002
               10  FILLER           PIC X(7) VALUE 'D3A098 '.           14690002
               10  FILLER           PIC X(7) VALUE 'D3A8   '.           14700002
               10  FILLER           PIC X(7) VALUE 'D3000  '.           14710002
               10  FILLER           PIC X(7) VALUE 'D3001  '.           14720002
               10  FILLER           PIC X(7) VALUE 'D3002  '.           14730002
               10  FILLER           PIC X(7) VALUE 'D3010  '.           14740002
               10  FILLER           PIC X(7) VALUE 'D3011  '.           14750002
               10  FILLER           PIC X(7) VALUE 'D3012  '.           14760002
               10  FILLER           PIC X(7) VALUE 'D3020  '.           14770002
               10  FILLER           PIC X(7) VALUE 'D3021  '.           14780002
               10  FILLER           PIC X(7) VALUE 'D3022  '.           14790002
               10  FILLER           PIC X(7) VALUE 'D303   '.           14800002
               10  FILLER           PIC X(7) VALUE 'D304   '.           14810002
               10  FILLER           PIC X(7) VALUE 'D308   '.           14820002
               10  FILLER           PIC X(7) VALUE 'D309   '.           14830002
               10  FILLER           PIC X(7) VALUE 'D3101  '.           14840002
               10  FILLER           PIC X(7) VALUE 'D3102  '.           14850002
               10  FILLER           PIC X(7) VALUE 'D3110  '.           14860002
               10  FILLER           PIC X(7) VALUE 'D3111  '.           14870002
               10  FILLER           PIC X(7) VALUE 'D3112  '.           14880002
               10  FILLER           PIC X(7) VALUE 'D3120  '.           14890002
               10  FILLER           PIC X(7) VALUE 'D3121  '.           14900002
               10  FILLER           PIC X(7) VALUE 'D3122  '.           14910002
               10  FILLER           PIC X(7) VALUE 'D3130  '.           14920002
               10  FILLER           PIC X(7) VALUE 'D3131  '.           14930002
               10  FILLER           PIC X(7) VALUE 'D3132  '.           14940002
               10  FILLER           PIC X(7) VALUE 'D3140  '.           14950002
               10  FILLER           PIC X(7) VALUE 'D3141  '.           14960002
               10  FILLER           PIC X(7) VALUE 'D3142  '.           14970002
               10  FILLER           PIC X(7) VALUE 'D3151  '.           14980002
               10  FILLER           PIC X(7) VALUE 'D3152  '.           14990002
               10  FILLER           PIC X(7) VALUE 'D3161  '.           15000002
               10  FILLER           PIC X(7) VALUE 'D3162  '.           15010002
               10  FILLER           PIC X(7) VALUE 'D3191  '.           15020002
               10  FILLER           PIC X(7) VALUE 'D3192  '.           15030002
               10  FILLER           PIC X(7) VALUE 'D320   '.           15040002
               10  FILLER           PIC X(7) VALUE 'D321   '.           15050002
               10  FILLER           PIC X(7) VALUE 'D329   '.           15060002
               10  FILLER           PIC X(7) VALUE 'D330   '.           15070002
               10  FILLER           PIC X(7) VALUE 'D331   '.           15080002
               10  FILLER           PIC X(7) VALUE 'D332   '.           15090002
               10  FILLER           PIC X(7) VALUE 'D333   '.           15100002
               10  FILLER           PIC X(7) VALUE 'D334   '.           15110002
               10  FILLER           PIC X(7) VALUE 'D337   '.           15120002
               10  FILLER           PIC X(7) VALUE 'D339   '.           15130002
               10  FILLER           PIC X(7) VALUE 'D34    '.           15140002
               10  FILLER           PIC X(7) VALUE 'D3500  '.           15150002
               10  FILLER           PIC X(7) VALUE 'D3501  '.           15160002
               10  FILLER           PIC X(7) VALUE 'D3502  '.           15170002
               10  FILLER           PIC X(7) VALUE 'D351   '.           15180002
               10  FILLER           PIC X(7) VALUE 'D352   '.           15190002
               10  FILLER           PIC X(7) VALUE 'D353   '.           15200002
               10  FILLER           PIC X(7) VALUE 'D354   '.           15210002
               10  FILLER           PIC X(7) VALUE 'D355   '.           15220002
               10  FILLER           PIC X(7) VALUE 'D356   '.           15230002
               10  FILLER           PIC X(7) VALUE 'D357   '.           15240002
               10  FILLER           PIC X(7) VALUE 'D359   '.           15250002
               10  FILLER           PIC X(7) VALUE 'D360   '.           15260002
               10  FILLER           PIC X(7) VALUE 'D3610  '.           15270002
               10  FILLER           PIC X(7) VALUE 'D3611  '.           15280002
               10  FILLER           PIC X(7) VALUE 'D3612  '.           15290002
               10  FILLER           PIC X(7) VALUE 'D3613  '.           15300002
               10  FILLER           PIC X(7) VALUE 'D3614  '.           15310002
               10  FILLER           PIC X(7) VALUE 'D3615  '.           15320002
               10  FILLER           PIC X(7) VALUE 'D3616  '.           15330002
               10  FILLER           PIC X(7) VALUE 'D3617  '.           15340002
               10  FILLER           PIC X(7) VALUE 'D367   '.           15350002
               10  FILLER           PIC X(7) VALUE 'D369   '.           15360002
               10  FILLER           PIC X(7) VALUE 'D3701  '.           15370002
               10  FILLER           PIC X(7) VALUE 'D3702  '.           15380002
               10  FILLER           PIC X(7) VALUE 'D37030 '.           15390002
               10  FILLER           PIC X(7) VALUE 'D37031 '.           15400002
               10  FILLER           PIC X(7) VALUE 'D37032 '.           15410002
               10  FILLER           PIC X(7) VALUE 'D37039 '.           15420002
               10  FILLER           PIC X(7) VALUE 'D3704  '.           15430002
               10  FILLER           PIC X(7) VALUE 'D3705  '.           15440002
               10  FILLER           PIC X(7) VALUE 'D3709  '.           15450002
               10  FILLER           PIC X(7) VALUE 'D371   '.           15460002
               10  FILLER           PIC X(7) VALUE 'D372   '.           15470002
               10  FILLER           PIC X(7) VALUE 'D373   '.           15480002
               10  FILLER           PIC X(7) VALUE 'D374   '.           15490002
               10  FILLER           PIC X(7) VALUE 'D375   '.           15500002
               10  FILLER           PIC X(7) VALUE 'D376   '.           15510002
               10  FILLER           PIC X(7) VALUE 'D378   '.           15520002
               10  FILLER           PIC X(7) VALUE 'D379   '.           15530002
               10  FILLER           PIC X(7) VALUE 'D380   '.           15540002
               10  FILLER           PIC X(7) VALUE 'D381   '.           15550002
               10  FILLER           PIC X(7) VALUE 'D382   '.           15560002
               10  FILLER           PIC X(7) VALUE 'D383   '.           15570002
               10  FILLER           PIC X(7) VALUE 'D384   '.           15580002
               10  FILLER           PIC X(7) VALUE 'D385   '.           15590002
               10  FILLER           PIC X(7) VALUE 'D386   '.           15600002
               10  FILLER           PIC X(7) VALUE 'D390   '.           15610002
               10  FILLER           PIC X(7) VALUE 'D3910  '.           15620002
               10  FILLER           PIC X(7) VALUE 'D3911  '.           15630002
               10  FILLER           PIC X(7) VALUE 'D3912  '.           15640002
               10  FILLER           PIC X(7) VALUE 'D392   '.           15650002
               10  FILLER           PIC X(7) VALUE 'D398   '.           15660002
               10  FILLER           PIC X(7) VALUE 'D399   '.           15670002
               10  FILLER           PIC X(7) VALUE 'D400   '.           15680002
               10  FILLER           PIC X(7) VALUE 'D4010  '.           15690002
               10  FILLER           PIC X(7) VALUE 'D4011  '.           15700002
               10  FILLER           PIC X(7) VALUE 'D4012  '.           15710002
               10  FILLER           PIC X(7) VALUE 'D408   '.           15720002
               10  FILLER           PIC X(7) VALUE 'D409   '.           15730002
               10  FILLER           PIC X(7) VALUE 'D4100  '.           15740002
               10  FILLER           PIC X(7) VALUE 'D4101  '.           15750002
               10  FILLER           PIC X(7) VALUE 'D4102  '.           15760002
               10  FILLER           PIC X(7) VALUE 'D4110  '.           15770002
               10  FILLER           PIC X(7) VALUE 'D4111  '.           15780002
               10  FILLER           PIC X(7) VALUE 'D4112  '.           15790002
               10  FILLER           PIC X(7) VALUE 'D4120  '.           15800002
               10  FILLER           PIC X(7) VALUE 'D4121  '.           15810002
               10  FILLER           PIC X(7) VALUE 'D4122  '.           15820002
               10  FILLER           PIC X(7) VALUE 'D413   '.           15830002
               10  FILLER           PIC X(7) VALUE 'D414   '.           15840002
               10  FILLER           PIC X(7) VALUE 'D418   '.           15850002
               10  FILLER           PIC X(7) VALUE 'D419   '.           15860002
               10  FILLER           PIC X(7) VALUE 'D420   '.           15870002
               10  FILLER           PIC X(7) VALUE 'D421   '.           15880002
               10  FILLER           PIC X(7) VALUE 'D429   '.           15890002
               10  FILLER           PIC X(7) VALUE 'D430   '.           15900002
               10  FILLER           PIC X(7) VALUE 'D431   '.           15910002
               10  FILLER           PIC X(7) VALUE 'D432   '.           15920002
               10  FILLER           PIC X(7) VALUE 'D433   '.           15930002
               10  FILLER           PIC X(7) VALUE 'D434   '.           15940002
               10  FILLER           PIC X(7) VALUE 'D438   '.           15950002
               10  FILLER           PIC X(7) VALUE 'D439   '.           15960002
               10  FILLER           PIC X(7) VALUE 'D440   '.           15970002
               10  FILLER           PIC X(7) VALUE 'D4410  '.           15980002
               10  FILLER           PIC X(7) VALUE 'D4411  '.           15990002
               10  FILLER           PIC X(7) VALUE 'D4412  '.           16000002
               10  FILLER           PIC X(7) VALUE 'D442   '.           16010002
               10  FILLER           PIC X(7) VALUE 'D443   '.           16020002
               10  FILLER           PIC X(7) VALUE 'D444   '.           16030002
               10  FILLER           PIC X(7) VALUE 'D445   '.           16040002
               10  FILLER           PIC X(7) VALUE 'D446   '.           16050002
               10  FILLER           PIC X(7) VALUE 'D447   '.           16060002
               10  FILLER           PIC X(7) VALUE 'D449   '.           16070002
               10  FILLER           PIC X(7) VALUE 'D45    '.           16080002
               10  FILLER           PIC X(7) VALUE 'D46A   '.           16090002
               10  FILLER           PIC X(7) VALUE 'D46B   '.           16100002
               10  FILLER           PIC X(7) VALUE 'D46C   '.           16110002
               10  FILLER           PIC X(7) VALUE 'D46Z   '.           16120002
               10  FILLER           PIC X(7) VALUE 'D460   '.           16130002
               10  FILLER           PIC X(7) VALUE 'D461   '.           16140002
               10  FILLER           PIC X(7) VALUE 'D4620  '.           16150002
               10  FILLER           PIC X(7) VALUE 'D4621  '.           16160002
               10  FILLER           PIC X(7) VALUE 'D4622  '.           16170002
               10  FILLER           PIC X(7) VALUE 'D464   '.           16180002
               10  FILLER           PIC X(7) VALUE 'D469   '.           16190002
               10  FILLER           PIC X(7) VALUE 'D47Z1  '.           16200002
               10  FILLER           PIC X(7) VALUE 'D47Z9  '.           16210002
               10  FILLER           PIC X(7) VALUE 'D4701  '.           16220002
               10  FILLER           PIC X(7) VALUE 'D4702  '.           16230002
               10  FILLER           PIC X(7) VALUE 'D4709  '.           16240002
               10  FILLER           PIC X(7) VALUE 'D471   '.           16250002
               10  FILLER           PIC X(7) VALUE 'D473   '.           16260002
               10  FILLER           PIC X(7) VALUE 'D479   '.           16270002
               10  FILLER           PIC X(7) VALUE 'D480   '.           16280002
               10  FILLER           PIC X(7) VALUE 'D481   '.           16290002
               10  FILLER           PIC X(7) VALUE 'D482   '.           16300002
               10  FILLER           PIC X(7) VALUE 'D483   '.           16310002
               10  FILLER           PIC X(7) VALUE 'D484   '.           16320002
               10  FILLER           PIC X(7) VALUE 'D485   '.           16330002
               10  FILLER           PIC X(7) VALUE 'D4861  '.           16331002
               10  FILLER           PIC X(7) VALUE 'D4862  '.           16332002
               10  FILLER           PIC X(7) VALUE 'D487   '.           16333002
               10  FILLER           PIC X(7) VALUE 'D489   '.           16334002
               10  FILLER           PIC X(7) VALUE 'D490   '.           16335002
               10  FILLER           PIC X(7) VALUE 'D491   '.           16336002
               10  FILLER           PIC X(7) VALUE 'D492   '.           16337002
               10  FILLER           PIC X(7) VALUE 'D493   '.           16338002
               10  FILLER           PIC X(7) VALUE 'D494   '.           16339002
               10  FILLER           PIC X(7) VALUE 'D49511 '.           16339102
               10  FILLER           PIC X(7) VALUE 'D49512 '.           16339202
               10  FILLER           PIC X(7) VALUE 'D4959  '.           16339302
               10  FILLER           PIC X(7) VALUE 'D496   '.           16339402
               10  FILLER           PIC X(7) VALUE 'D497   '.           16339502
               10  FILLER           PIC X(7) VALUE 'D4981  '.           16339602
               10  FILLER           PIC X(7) VALUE 'D4989  '.           16339702
               10  FILLER           PIC X(7) VALUE 'D499   '.           16339802
               10  FILLER           PIC X(7) VALUE 'K317   '.           16339902
               10  FILLER           PIC X(7) VALUE 'K635   '.           16340002
               10  FILLER           PIC X(7) VALUE 'Q8500  '.           16340102
               10  FILLER           PIC X(7) VALUE 'Q8501  '.           16340202
               10  FILLER           PIC X(7) VALUE 'Q8502  '.           16340302
               10  FILLER           PIC X(7) VALUE 'Q8503  '.           16340402
               10  FILLER           PIC X(7) VALUE 'Q8509  '.           16340502
           05  FILLER     REDEFINES CAT6-TABLE-DATA.                    16341002
               10  CAT6-DATA        OCCURS 1544 TIMES                   16350002
                                    ASCENDING KEY IS CAT6-CODE          16360002
                                    INDEXED BY IX-CAT6.                 16370002
                   15  CAT6-CODE    PIC X(7).                           16380002
                                                                        16390002
      ****************************************************************  16400002
      * ONCOLOGY TREATMENT - PROCEDURE CODES                         *  16410002
      ****************************************************************  16420002
       01 CAT6P-TABLE.                                                  16430002
           05  CAT6P-TABLE-DATA.                                        16440002
               10  FILLER           PIC X(7) VALUE 'CW7GGZZ'.           16450002
               10  FILLER           PIC X(7) VALUE 'CW7GYZZ'.           16460002
               10  FILLER           PIC X(7) VALUE 'CW7NGZZ'.           16470002
               10  FILLER           PIC X(7) VALUE 'CW7NNZZ'.           16480002
               10  FILLER           PIC X(7) VALUE 'CW7NPZZ'.           16490002
               10  FILLER           PIC X(7) VALUE 'CW7NYZZ'.           16500002
               10  FILLER           PIC X(7) VALUE 'CW7N8ZZ'.           16510002
               10  FILLER           PIC X(7) VALUE 'CW7YYZZ'.           16520002
               10  FILLER           PIC X(7) VALUE 'CW70NZZ'.           16530002
               10  FILLER           PIC X(7) VALUE 'CW70YZZ'.           16540002
               10  FILLER           PIC X(7) VALUE 'CW73NZZ'.           16550002
               10  FILLER           PIC X(7) VALUE 'CW73YZZ'.           16560002
               10  FILLER           PIC X(7) VALUE 'DBY0FZZ'.           16570002
               10  FILLER           PIC X(7) VALUE 'DBY0KZZ'.           16580002
               10  FILLER           PIC X(7) VALUE 'DBY07ZZ'.           16590002
               10  FILLER           PIC X(7) VALUE 'DBY08ZZ'.           16600002
               10  FILLER           PIC X(7) VALUE 'DBY1FZZ'.           16610002
               10  FILLER           PIC X(7) VALUE 'DBY1KZZ'.           16620002
               10  FILLER           PIC X(7) VALUE 'DBY17ZZ'.           16630002
               10  FILLER           PIC X(7) VALUE 'DBY18ZZ'.           16640002
               10  FILLER           PIC X(7) VALUE 'DBY2FZZ'.           16650002
               10  FILLER           PIC X(7) VALUE 'DBY2KZZ'.           16660002
               10  FILLER           PIC X(7) VALUE 'DBY27ZZ'.           16670002
               10  FILLER           PIC X(7) VALUE 'DBY28ZZ'.           16680002
               10  FILLER           PIC X(7) VALUE 'DBY5FZZ'.           16690002
               10  FILLER           PIC X(7) VALUE 'DBY5KZZ'.           16700002
               10  FILLER           PIC X(7) VALUE 'DBY57ZZ'.           16710002
               10  FILLER           PIC X(7) VALUE 'DBY58ZZ'.           16720002
               10  FILLER           PIC X(7) VALUE 'DBY6FZZ'.           16730002
               10  FILLER           PIC X(7) VALUE 'DBY6KZZ'.           16740002
               10  FILLER           PIC X(7) VALUE 'DBY67ZZ'.           16750002
               10  FILLER           PIC X(7) VALUE 'DBY68ZZ'.           16760002
               10  FILLER           PIC X(7) VALUE 'DBY7FZZ'.           16770002
               10  FILLER           PIC X(7) VALUE 'DBY7KZZ'.           16780002
               10  FILLER           PIC X(7) VALUE 'DBY77ZZ'.           16790002
               10  FILLER           PIC X(7) VALUE 'DBY78ZZ'.           16800002
               10  FILLER           PIC X(7) VALUE 'DBY8FZZ'.           16810002
               10  FILLER           PIC X(7) VALUE 'DBY8KZZ'.           16820002
               10  FILLER           PIC X(7) VALUE 'DBY87ZZ'.           16830002
               10  FILLER           PIC X(7) VALUE 'DBY88ZZ'.           16840002
               10  FILLER           PIC X(7) VALUE 'DB000ZZ'.           16850002
               10  FILLER           PIC X(7) VALUE 'DB001ZZ'.           16860002
               10  FILLER           PIC X(7) VALUE 'DB002ZZ'.           16870002
               10  FILLER           PIC X(7) VALUE 'DB003ZZ'.           16880002
               10  FILLER           PIC X(7) VALUE 'DB003Z0'.           16890002
               10  FILLER           PIC X(7) VALUE 'DB004ZZ'.           16900002
               10  FILLER           PIC X(7) VALUE 'DB005ZZ'.           16910002
               10  FILLER           PIC X(7) VALUE 'DB006ZZ'.           16920002
               10  FILLER           PIC X(7) VALUE 'DB010ZZ'.           16930002
               10  FILLER           PIC X(7) VALUE 'DB011ZZ'.           16940002
               10  FILLER           PIC X(7) VALUE 'DB012ZZ'.           16950002
               10  FILLER           PIC X(7) VALUE 'DB013ZZ'.           16960002
               10  FILLER           PIC X(7) VALUE 'DB013Z0'.           16970002
               10  FILLER           PIC X(7) VALUE 'DB014ZZ'.           16980002
               10  FILLER           PIC X(7) VALUE 'DB015ZZ'.           16990002
               10  FILLER           PIC X(7) VALUE 'DB016ZZ'.           17000002
               10  FILLER           PIC X(7) VALUE 'DB020ZZ'.           17010002
               10  FILLER           PIC X(7) VALUE 'DB021ZZ'.           17020002
               10  FILLER           PIC X(7) VALUE 'DB022ZZ'.           17030002
               10  FILLER           PIC X(7) VALUE 'DB023ZZ'.           17040002
               10  FILLER           PIC X(7) VALUE 'DB023Z0'.           17050002
               10  FILLER           PIC X(7) VALUE 'DB024ZZ'.           17060002
               10  FILLER           PIC X(7) VALUE 'DB025ZZ'.           17070002
               10  FILLER           PIC X(7) VALUE 'DB026ZZ'.           17080002
               10  FILLER           PIC X(7) VALUE 'DB050ZZ'.           17090002
               10  FILLER           PIC X(7) VALUE 'DB051ZZ'.           17100002
               10  FILLER           PIC X(7) VALUE 'DB052ZZ'.           17110002
               10  FILLER           PIC X(7) VALUE 'DB053ZZ'.           17120002
               10  FILLER           PIC X(7) VALUE 'DB053Z0'.           17130002
               10  FILLER           PIC X(7) VALUE 'DB054ZZ'.           17140002
               10  FILLER           PIC X(7) VALUE 'DB055ZZ'.           17150002
               10  FILLER           PIC X(7) VALUE 'DB056ZZ'.           17160002
               10  FILLER           PIC X(7) VALUE 'DB060ZZ'.           17170002
               10  FILLER           PIC X(7) VALUE 'DB061ZZ'.           17180002
               10  FILLER           PIC X(7) VALUE 'DB062ZZ'.           17190002
               10  FILLER           PIC X(7) VALUE 'DB063ZZ'.           17200002
               10  FILLER           PIC X(7) VALUE 'DB063Z0'.           17210002
               10  FILLER           PIC X(7) VALUE 'DB064ZZ'.           17220002
               10  FILLER           PIC X(7) VALUE 'DB065ZZ'.           17230002
               10  FILLER           PIC X(7) VALUE 'DB066ZZ'.           17240002
               10  FILLER           PIC X(7) VALUE 'DB070ZZ'.           17250002
               10  FILLER           PIC X(7) VALUE 'DB071ZZ'.           17260002
               10  FILLER           PIC X(7) VALUE 'DB072ZZ'.           17270002
               10  FILLER           PIC X(7) VALUE 'DB073ZZ'.           17280002
               10  FILLER           PIC X(7) VALUE 'DB073Z0'.           17290002
               10  FILLER           PIC X(7) VALUE 'DB074ZZ'.           17300002
               10  FILLER           PIC X(7) VALUE 'DB075ZZ'.           17310002
               10  FILLER           PIC X(7) VALUE 'DB076ZZ'.           17320002
               10  FILLER           PIC X(7) VALUE 'DB080ZZ'.           17330002
               10  FILLER           PIC X(7) VALUE 'DB081ZZ'.           17340002
               10  FILLER           PIC X(7) VALUE 'DB082ZZ'.           17350002
               10  FILLER           PIC X(7) VALUE 'DB083ZZ'.           17360002
               10  FILLER           PIC X(7) VALUE 'DB083Z0'.           17370002
               10  FILLER           PIC X(7) VALUE 'DB084ZZ'.           17380002
               10  FILLER           PIC X(7) VALUE 'DB085ZZ'.           17390002
               10  FILLER           PIC X(7) VALUE 'DB086ZZ'.           17400002
               10  FILLER           PIC X(7) VALUE 'DB10BBZ'.           17410002
               10  FILLER           PIC X(7) VALUE 'DB10BCZ'.           17420002
               10  FILLER           PIC X(7) VALUE 'DB10BYZ'.           17430002
               10  FILLER           PIC X(7) VALUE 'DB10B7Z'.           17440002
               10  FILLER           PIC X(7) VALUE 'DB10B8Z'.           17450002
               10  FILLER           PIC X(7) VALUE 'DB10B9Z'.           17460002
               10  FILLER           PIC X(7) VALUE 'DB109BZ'.           17470002
               10  FILLER           PIC X(7) VALUE 'DB109CZ'.           17480002
               10  FILLER           PIC X(7) VALUE 'DB109YZ'.           17490002
               10  FILLER           PIC X(7) VALUE 'DB1097Z'.           17500002
               10  FILLER           PIC X(7) VALUE 'DB1098Z'.           17510002
               10  FILLER           PIC X(7) VALUE 'DB1099Z'.           17520002
               10  FILLER           PIC X(7) VALUE 'DB11BBZ'.           17530002
               10  FILLER           PIC X(7) VALUE 'DB11BCZ'.           17540002
               10  FILLER           PIC X(7) VALUE 'DB11BYZ'.           17550002
               10  FILLER           PIC X(7) VALUE 'DB11B7Z'.           17560002
               10  FILLER           PIC X(7) VALUE 'DB11B8Z'.           17570002
               10  FILLER           PIC X(7) VALUE 'DB11B9Z'.           17580002
               10  FILLER           PIC X(7) VALUE 'DB119BZ'.           17590002
               10  FILLER           PIC X(7) VALUE 'DB119CZ'.           17600002
               10  FILLER           PIC X(7) VALUE 'DB119YZ'.           17610002
               10  FILLER           PIC X(7) VALUE 'DB1197Z'.           17620002
               10  FILLER           PIC X(7) VALUE 'DB1198Z'.           17630002
               10  FILLER           PIC X(7) VALUE 'DB1199Z'.           17640002
               10  FILLER           PIC X(7) VALUE 'DB12BBZ'.           17650002
               10  FILLER           PIC X(7) VALUE 'DB12BCZ'.           17660002
               10  FILLER           PIC X(7) VALUE 'DB12BYZ'.           17670002
               10  FILLER           PIC X(7) VALUE 'DB12B7Z'.           17680002
               10  FILLER           PIC X(7) VALUE 'DB12B8Z'.           17690002
               10  FILLER           PIC X(7) VALUE 'DB12B9Z'.           17700002
               10  FILLER           PIC X(7) VALUE 'DB129BZ'.           17710002
               10  FILLER           PIC X(7) VALUE 'DB129CZ'.           17720002
               10  FILLER           PIC X(7) VALUE 'DB129YZ'.           17730002
               10  FILLER           PIC X(7) VALUE 'DB1297Z'.           17740002
               10  FILLER           PIC X(7) VALUE 'DB1298Z'.           17750002
               10  FILLER           PIC X(7) VALUE 'DB1299Z'.           17760002
               10  FILLER           PIC X(7) VALUE 'DB15BBZ'.           17770002
               10  FILLER           PIC X(7) VALUE 'DB15BCZ'.           17780002
               10  FILLER           PIC X(7) VALUE 'DB15BYZ'.           17790002
               10  FILLER           PIC X(7) VALUE 'DB15B7Z'.           17800002
               10  FILLER           PIC X(7) VALUE 'DB15B8Z'.           17810002
               10  FILLER           PIC X(7) VALUE 'DB15B9Z'.           17820002
               10  FILLER           PIC X(7) VALUE 'DB159BZ'.           17830002
               10  FILLER           PIC X(7) VALUE 'DB159CZ'.           17840002
               10  FILLER           PIC X(7) VALUE 'DB159YZ'.           17850002
               10  FILLER           PIC X(7) VALUE 'DB1597Z'.           17860002
               10  FILLER           PIC X(7) VALUE 'DB1598Z'.           17870002
               10  FILLER           PIC X(7) VALUE 'DB1599Z'.           17880002
               10  FILLER           PIC X(7) VALUE 'DB16BBZ'.           17890002
               10  FILLER           PIC X(7) VALUE 'DB16BCZ'.           17900002
               10  FILLER           PIC X(7) VALUE 'DB16BYZ'.           17910002
               10  FILLER           PIC X(7) VALUE 'DB16B7Z'.           17920002
               10  FILLER           PIC X(7) VALUE 'DB16B8Z'.           17930002
               10  FILLER           PIC X(7) VALUE 'DB16B9Z'.           17940002
               10  FILLER           PIC X(7) VALUE 'DB169BZ'.           17950002
               10  FILLER           PIC X(7) VALUE 'DB169CZ'.           17960002
               10  FILLER           PIC X(7) VALUE 'DB169YZ'.           17970002
               10  FILLER           PIC X(7) VALUE 'DB1697Z'.           17980002
               10  FILLER           PIC X(7) VALUE 'DB1698Z'.           17990002
               10  FILLER           PIC X(7) VALUE 'DB1699Z'.           18000002
               10  FILLER           PIC X(7) VALUE 'DB17BBZ'.           18010002
               10  FILLER           PIC X(7) VALUE 'DB17BCZ'.           18020002
               10  FILLER           PIC X(7) VALUE 'DB17BYZ'.           18030002
               10  FILLER           PIC X(7) VALUE 'DB17B7Z'.           18040002
               10  FILLER           PIC X(7) VALUE 'DB17B8Z'.           18050002
               10  FILLER           PIC X(7) VALUE 'DB17B9Z'.           18060002
               10  FILLER           PIC X(7) VALUE 'DB179BZ'.           18070002
               10  FILLER           PIC X(7) VALUE 'DB179CZ'.           18080002
               10  FILLER           PIC X(7) VALUE 'DB179YZ'.           18090002
               10  FILLER           PIC X(7) VALUE 'DB1797Z'.           18100002
               10  FILLER           PIC X(7) VALUE 'DB1798Z'.           18110002
               10  FILLER           PIC X(7) VALUE 'DB1799Z'.           18120002
               10  FILLER           PIC X(7) VALUE 'DB18BBZ'.           18130002
               10  FILLER           PIC X(7) VALUE 'DB18BCZ'.           18140002
               10  FILLER           PIC X(7) VALUE 'DB18BYZ'.           18150002
               10  FILLER           PIC X(7) VALUE 'DB18B7Z'.           18160002
               10  FILLER           PIC X(7) VALUE 'DB18B8Z'.           18170002
               10  FILLER           PIC X(7) VALUE 'DB18B9Z'.           18180002
               10  FILLER           PIC X(7) VALUE 'DB189BZ'.           18190002
               10  FILLER           PIC X(7) VALUE 'DB189CZ'.           18200002
               10  FILLER           PIC X(7) VALUE 'DB189YZ'.           18210002
               10  FILLER           PIC X(7) VALUE 'DB1897Z'.           18220002
               10  FILLER           PIC X(7) VALUE 'DB1898Z'.           18230002
               10  FILLER           PIC X(7) VALUE 'DB1899Z'.           18240002
               10  FILLER           PIC X(7) VALUE 'DDY0FZZ'.           18250002
               10  FILLER           PIC X(7) VALUE 'DDY0KZZ'.           18260002
               10  FILLER           PIC X(7) VALUE 'DDY07ZZ'.           18270002
               10  FILLER           PIC X(7) VALUE 'DDY08ZZ'.           18280002
               10  FILLER           PIC X(7) VALUE 'DDY1CZZ'.           18290002
               10  FILLER           PIC X(7) VALUE 'DDY1FZZ'.           18300002
               10  FILLER           PIC X(7) VALUE 'DDY1KZZ'.           18310002
               10  FILLER           PIC X(7) VALUE 'DDY17ZZ'.           18320002
               10  FILLER           PIC X(7) VALUE 'DDY18ZZ'.           18330002
               10  FILLER           PIC X(7) VALUE 'DDY2CZZ'.           18340002
               10  FILLER           PIC X(7) VALUE 'DDY2FZZ'.           18350002
               10  FILLER           PIC X(7) VALUE 'DDY2KZZ'.           18360002
               10  FILLER           PIC X(7) VALUE 'DDY27ZZ'.           18370002
               10  FILLER           PIC X(7) VALUE 'DDY28ZZ'.           18380002
               10  FILLER           PIC X(7) VALUE 'DDY3CZZ'.           18390002
               10  FILLER           PIC X(7) VALUE 'DDY3FZZ'.           18400002
               10  FILLER           PIC X(7) VALUE 'DDY3KZZ'.           18410002
               10  FILLER           PIC X(7) VALUE 'DDY37ZZ'.           18420002
               10  FILLER           PIC X(7) VALUE 'DDY38ZZ'.           18430002
               10  FILLER           PIC X(7) VALUE 'DDY4CZZ'.           18440002
               10  FILLER           PIC X(7) VALUE 'DDY4FZZ'.           18450002
               10  FILLER           PIC X(7) VALUE 'DDY4KZZ'.           18460002
               10  FILLER           PIC X(7) VALUE 'DDY47ZZ'.           18470002
               10  FILLER           PIC X(7) VALUE 'DDY48ZZ'.           18480002
               10  FILLER           PIC X(7) VALUE 'DDY5CZZ'.           18490002
               10  FILLER           PIC X(7) VALUE 'DDY5FZZ'.           18500002
               10  FILLER           PIC X(7) VALUE 'DDY5KZZ'.           18510002
               10  FILLER           PIC X(7) VALUE 'DDY57ZZ'.           18520002
               10  FILLER           PIC X(7) VALUE 'DDY58ZZ'.           18530002
               10  FILLER           PIC X(7) VALUE 'DDY7CZZ'.           18540002
               10  FILLER           PIC X(7) VALUE 'DDY7FZZ'.           18550002
               10  FILLER           PIC X(7) VALUE 'DDY7KZZ'.           18560002
               10  FILLER           PIC X(7) VALUE 'DDY77ZZ'.           18570002
               10  FILLER           PIC X(7) VALUE 'DDY78ZZ'.           18580002
               10  FILLER           PIC X(7) VALUE 'DDY8CZZ'.           18590002
               10  FILLER           PIC X(7) VALUE 'DDY8FZZ'.           18600002
               10  FILLER           PIC X(7) VALUE 'DDY8KZZ'.           18610002
               10  FILLER           PIC X(7) VALUE 'DD000ZZ'.           18620002
               10  FILLER           PIC X(7) VALUE 'DD001ZZ'.           18630002
               10  FILLER           PIC X(7) VALUE 'DD002ZZ'.           18640002
               10  FILLER           PIC X(7) VALUE 'DD003ZZ'.           18650002
               10  FILLER           PIC X(7) VALUE 'DD003Z0'.           18660002
               10  FILLER           PIC X(7) VALUE 'DD004ZZ'.           18670002
               10  FILLER           PIC X(7) VALUE 'DD005ZZ'.           18680002
               10  FILLER           PIC X(7) VALUE 'DD006ZZ'.           18690002
               10  FILLER           PIC X(7) VALUE 'DD010ZZ'.           18700002
               10  FILLER           PIC X(7) VALUE 'DD011ZZ'.           18710002
               10  FILLER           PIC X(7) VALUE 'DD012ZZ'.           18720002
               10  FILLER           PIC X(7) VALUE 'DD013ZZ'.           18730002
               10  FILLER           PIC X(7) VALUE 'DD013Z0'.           18740002
               10  FILLER           PIC X(7) VALUE 'DD014ZZ'.           18750002
               10  FILLER           PIC X(7) VALUE 'DD015ZZ'.           18760002
               10  FILLER           PIC X(7) VALUE 'DD016ZZ'.           18770002
               10  FILLER           PIC X(7) VALUE 'DD020ZZ'.           18780002
               10  FILLER           PIC X(7) VALUE 'DD021ZZ'.           18790002
               10  FILLER           PIC X(7) VALUE 'DD022ZZ'.           18800002
               10  FILLER           PIC X(7) VALUE 'DD023ZZ'.           18810002
               10  FILLER           PIC X(7) VALUE 'DD023Z0'.           18820002
               10  FILLER           PIC X(7) VALUE 'DD024ZZ'.           18830002
               10  FILLER           PIC X(7) VALUE 'DD025ZZ'.           18840002
               10  FILLER           PIC X(7) VALUE 'DD026ZZ'.           18850002
               10  FILLER           PIC X(7) VALUE 'DD030ZZ'.           18860002
               10  FILLER           PIC X(7) VALUE 'DD031ZZ'.           18870002
               10  FILLER           PIC X(7) VALUE 'DD032ZZ'.           18880002
               10  FILLER           PIC X(7) VALUE 'DD033ZZ'.           18890002
               10  FILLER           PIC X(7) VALUE 'DD033Z0'.           18900002
               10  FILLER           PIC X(7) VALUE 'DD034ZZ'.           18910002
               10  FILLER           PIC X(7) VALUE 'DD035ZZ'.           18920002
               10  FILLER           PIC X(7) VALUE 'DD036ZZ'.           18930002
               10  FILLER           PIC X(7) VALUE 'DD040ZZ'.           18940002
               10  FILLER           PIC X(7) VALUE 'DD041ZZ'.           18950002
               10  FILLER           PIC X(7) VALUE 'DD042ZZ'.           18960002
               10  FILLER           PIC X(7) VALUE 'DD043ZZ'.           18970002
               10  FILLER           PIC X(7) VALUE 'DD043Z0'.           18980002
               10  FILLER           PIC X(7) VALUE 'DD044ZZ'.           18990002
               10  FILLER           PIC X(7) VALUE 'DD045ZZ'.           19000002
               10  FILLER           PIC X(7) VALUE 'DD046ZZ'.           19010002
               10  FILLER           PIC X(7) VALUE 'DD050ZZ'.           19020002
               10  FILLER           PIC X(7) VALUE 'DD051ZZ'.           19030002
               10  FILLER           PIC X(7) VALUE 'DD052ZZ'.           19040002
               10  FILLER           PIC X(7) VALUE 'DD053ZZ'.           19050002
               10  FILLER           PIC X(7) VALUE 'DD053Z0'.           19060002
               10  FILLER           PIC X(7) VALUE 'DD054ZZ'.           19070002
               10  FILLER           PIC X(7) VALUE 'DD055ZZ'.           19080002
               10  FILLER           PIC X(7) VALUE 'DD056ZZ'.           19090002
               10  FILLER           PIC X(7) VALUE 'DD070ZZ'.           19100002
               10  FILLER           PIC X(7) VALUE 'DD071ZZ'.           19110002
               10  FILLER           PIC X(7) VALUE 'DD072ZZ'.           19120002
               10  FILLER           PIC X(7) VALUE 'DD073ZZ'.           19130002
               10  FILLER           PIC X(7) VALUE 'DD073Z0'.           19140002
               10  FILLER           PIC X(7) VALUE 'DD074ZZ'.           19150002
               10  FILLER           PIC X(7) VALUE 'DD075ZZ'.           19160002
               10  FILLER           PIC X(7) VALUE 'DD076ZZ'.           19170002
               10  FILLER           PIC X(7) VALUE 'DD10BBZ'.           19180002
               10  FILLER           PIC X(7) VALUE 'DD10BCZ'.           19190002
               10  FILLER           PIC X(7) VALUE 'DD10BYZ'.           19200002
               10  FILLER           PIC X(7) VALUE 'DD10B7Z'.           19210002
               10  FILLER           PIC X(7) VALUE 'DD10B8Z'.           19220002
               10  FILLER           PIC X(7) VALUE 'DD10B9Z'.           19230002
               10  FILLER           PIC X(7) VALUE 'DD109BZ'.           19240002
               10  FILLER           PIC X(7) VALUE 'DD109CZ'.           19250002
               10  FILLER           PIC X(7) VALUE 'DD109YZ'.           19260002
               10  FILLER           PIC X(7) VALUE 'DD1097Z'.           19270002
               10  FILLER           PIC X(7) VALUE 'DD1098Z'.           19280002
               10  FILLER           PIC X(7) VALUE 'DD1099Z'.           19290002
               10  FILLER           PIC X(7) VALUE 'DD11BBZ'.           19300002
               10  FILLER           PIC X(7) VALUE 'DD11BCZ'.           19310002
               10  FILLER           PIC X(7) VALUE 'DD11BYZ'.           19320002
               10  FILLER           PIC X(7) VALUE 'DD11B7Z'.           19330002
               10  FILLER           PIC X(7) VALUE 'DD11B8Z'.           19340002
               10  FILLER           PIC X(7) VALUE 'DD11B9Z'.           19350002
               10  FILLER           PIC X(7) VALUE 'DD119BZ'.           19360002
               10  FILLER           PIC X(7) VALUE 'DD119CZ'.           19370002
               10  FILLER           PIC X(7) VALUE 'DD119YZ'.           19380002
               10  FILLER           PIC X(7) VALUE 'DD1197Z'.           19390002
               10  FILLER           PIC X(7) VALUE 'DD1198Z'.           19400002
               10  FILLER           PIC X(7) VALUE 'DD1199Z'.           19410002
               10  FILLER           PIC X(7) VALUE 'DD12BBZ'.           19420002
               10  FILLER           PIC X(7) VALUE 'DD12BCZ'.           19430002
               10  FILLER           PIC X(7) VALUE 'DD12BYZ'.           19440002
               10  FILLER           PIC X(7) VALUE 'DD12B7Z'.           19450002
               10  FILLER           PIC X(7) VALUE 'DD12B8Z'.           19460002
               10  FILLER           PIC X(7) VALUE 'DD12B9Z'.           19470002
               10  FILLER           PIC X(7) VALUE 'DD129BZ'.           19480002
               10  FILLER           PIC X(7) VALUE 'DD129CZ'.           19490002
               10  FILLER           PIC X(7) VALUE 'DD129YZ'.           19500002
               10  FILLER           PIC X(7) VALUE 'DD1297Z'.           19510002
               10  FILLER           PIC X(7) VALUE 'DD1298Z'.           19520002
               10  FILLER           PIC X(7) VALUE 'DD1299Z'.           19530002
               10  FILLER           PIC X(7) VALUE 'DD13BBZ'.           19540002
               10  FILLER           PIC X(7) VALUE 'DD13BCZ'.           19550002
               10  FILLER           PIC X(7) VALUE 'DD13BYZ'.           19560002
               10  FILLER           PIC X(7) VALUE 'DD13B7Z'.           19570002
               10  FILLER           PIC X(7) VALUE 'DD13B8Z'.           19580002
               10  FILLER           PIC X(7) VALUE 'DD13B9Z'.           19590002
               10  FILLER           PIC X(7) VALUE 'DD139BZ'.           19600002
               10  FILLER           PIC X(7) VALUE 'DD139CZ'.           19610002
               10  FILLER           PIC X(7) VALUE 'DD139YZ'.           19620002
               10  FILLER           PIC X(7) VALUE 'DD1397Z'.           19630002
               10  FILLER           PIC X(7) VALUE 'DD1398Z'.           19640002
               10  FILLER           PIC X(7) VALUE 'DD1399Z'.           19650002
               10  FILLER           PIC X(7) VALUE 'DD14BBZ'.           19660002
               10  FILLER           PIC X(7) VALUE 'DD14BCZ'.           19670002
               10  FILLER           PIC X(7) VALUE 'DD14BYZ'.           19680002
               10  FILLER           PIC X(7) VALUE 'DD14B7Z'.           19690002
               10  FILLER           PIC X(7) VALUE 'DD14B8Z'.           19700002
               10  FILLER           PIC X(7) VALUE 'DD14B9Z'.           19710002
               10  FILLER           PIC X(7) VALUE 'DD149BZ'.           19720002
               10  FILLER           PIC X(7) VALUE 'DD149CZ'.           19730002
               10  FILLER           PIC X(7) VALUE 'DD149YZ'.           19740002
               10  FILLER           PIC X(7) VALUE 'DD1497Z'.           19750002
               10  FILLER           PIC X(7) VALUE 'DD1498Z'.           19760002
               10  FILLER           PIC X(7) VALUE 'DD1499Z'.           19770002
               10  FILLER           PIC X(7) VALUE 'DD15BBZ'.           19780002
               10  FILLER           PIC X(7) VALUE 'DD15BCZ'.           19790002
               10  FILLER           PIC X(7) VALUE 'DD15BYZ'.           19800002
               10  FILLER           PIC X(7) VALUE 'DD15B7Z'.           19810002
               10  FILLER           PIC X(7) VALUE 'DD15B8Z'.           19820002
               10  FILLER           PIC X(7) VALUE 'DD15B9Z'.           19830002
               10  FILLER           PIC X(7) VALUE 'DD159BZ'.           19840002
               10  FILLER           PIC X(7) VALUE 'DD159CZ'.           19850002
               10  FILLER           PIC X(7) VALUE 'DD159YZ'.           19860002
               10  FILLER           PIC X(7) VALUE 'DD1597Z'.           19870002
               10  FILLER           PIC X(7) VALUE 'DD1598Z'.           19880002
               10  FILLER           PIC X(7) VALUE 'DD1599Z'.           19890002
               10  FILLER           PIC X(7) VALUE 'DD17BBZ'.           19900002
               10  FILLER           PIC X(7) VALUE 'DD17BCZ'.           19910002
               10  FILLER           PIC X(7) VALUE 'DD17BYZ'.           19920002
               10  FILLER           PIC X(7) VALUE 'DD17B7Z'.           19930002
               10  FILLER           PIC X(7) VALUE 'DD17B8Z'.           19940002
               10  FILLER           PIC X(7) VALUE 'DD17B9Z'.           19950002
               10  FILLER           PIC X(7) VALUE 'DD179BZ'.           19960002
               10  FILLER           PIC X(7) VALUE 'DD179CZ'.           19970002
               10  FILLER           PIC X(7) VALUE 'DD179YZ'.           19980002
               10  FILLER           PIC X(7) VALUE 'DD1797Z'.           19990002
               10  FILLER           PIC X(7) VALUE 'DD1798Z'.           20000002
               10  FILLER           PIC X(7) VALUE 'DD1799Z'.           20010002
               10  FILLER           PIC X(7) VALUE 'DFY0CZZ'.           20020002
               10  FILLER           PIC X(7) VALUE 'DFY0FZZ'.           20030002
               10  FILLER           PIC X(7) VALUE 'DFY0KZZ'.           20040002
               10  FILLER           PIC X(7) VALUE 'DFY07ZZ'.           20050002
               10  FILLER           PIC X(7) VALUE 'DFY08ZZ'.           20060002
               10  FILLER           PIC X(7) VALUE 'DFY1CZZ'.           20070002
               10  FILLER           PIC X(7) VALUE 'DFY1FZZ'.           20080002
               10  FILLER           PIC X(7) VALUE 'DFY1KZZ'.           20090002
               10  FILLER           PIC X(7) VALUE 'DFY17ZZ'.           20100002
               10  FILLER           PIC X(7) VALUE 'DFY18ZZ'.           20110002
               10  FILLER           PIC X(7) VALUE 'DFY2CZZ'.           20120002
               10  FILLER           PIC X(7) VALUE 'DFY2FZZ'.           20130002
               10  FILLER           PIC X(7) VALUE 'DFY2KZZ'.           20140002
               10  FILLER           PIC X(7) VALUE 'DFY27ZZ'.           20150002
               10  FILLER           PIC X(7) VALUE 'DFY28ZZ'.           20160002
               10  FILLER           PIC X(7) VALUE 'DFY3CZZ'.           20170002
               10  FILLER           PIC X(7) VALUE 'DFY3FZZ'.           20180002
               10  FILLER           PIC X(7) VALUE 'DFY3KZZ'.           20190002
               10  FILLER           PIC X(7) VALUE 'DFY37ZZ'.           20200002
               10  FILLER           PIC X(7) VALUE 'DFY38ZZ'.           20210002
               10  FILLER           PIC X(7) VALUE 'DF000ZZ'.           20220002
               10  FILLER           PIC X(7) VALUE 'DF001ZZ'.           20230002
               10  FILLER           PIC X(7) VALUE 'DF002ZZ'.           20240002
               10  FILLER           PIC X(7) VALUE 'DF003ZZ'.           20250002
               10  FILLER           PIC X(7) VALUE 'DF003Z0'.           20260002
               10  FILLER           PIC X(7) VALUE 'DF004ZZ'.           20270002
               10  FILLER           PIC X(7) VALUE 'DF005ZZ'.           20280002
               10  FILLER           PIC X(7) VALUE 'DF006ZZ'.           20290002
               10  FILLER           PIC X(7) VALUE 'DF010ZZ'.           20300002
               10  FILLER           PIC X(7) VALUE 'DF011ZZ'.           20310002
               10  FILLER           PIC X(7) VALUE 'DF012ZZ'.           20320002
               10  FILLER           PIC X(7) VALUE 'DF013ZZ'.           20330002
               10  FILLER           PIC X(7) VALUE 'DF013Z0'.           20340002
               10  FILLER           PIC X(7) VALUE 'DF014ZZ'.           20350002
               10  FILLER           PIC X(7) VALUE 'DF015ZZ'.           20360002
               10  FILLER           PIC X(7) VALUE 'DF016ZZ'.           20370002
               10  FILLER           PIC X(7) VALUE 'DF020ZZ'.           20380002
               10  FILLER           PIC X(7) VALUE 'DF021ZZ'.           20390002
               10  FILLER           PIC X(7) VALUE 'DF022ZZ'.           20400002
               10  FILLER           PIC X(7) VALUE 'DF023ZZ'.           20410002
               10  FILLER           PIC X(7) VALUE 'DF023Z0'.           20420002
               10  FILLER           PIC X(7) VALUE 'DF024ZZ'.           20430002
               10  FILLER           PIC X(7) VALUE 'DF025ZZ'.           20440002
               10  FILLER           PIC X(7) VALUE 'DF026ZZ'.           20450002
               10  FILLER           PIC X(7) VALUE 'DF030ZZ'.           20460002
               10  FILLER           PIC X(7) VALUE 'DF031ZZ'.           20470002
               10  FILLER           PIC X(7) VALUE 'DF032ZZ'.           20480002
               10  FILLER           PIC X(7) VALUE 'DF033ZZ'.           20490002
               10  FILLER           PIC X(7) VALUE 'DF033Z0'.           20500002
               10  FILLER           PIC X(7) VALUE 'DF034ZZ'.           20510002
               10  FILLER           PIC X(7) VALUE 'DF035ZZ'.           20520002
               10  FILLER           PIC X(7) VALUE 'DF036ZZ'.           20530002
               10  FILLER           PIC X(7) VALUE 'DF10BBZ'.           20540002
               10  FILLER           PIC X(7) VALUE 'DF10BCZ'.           20550002
               10  FILLER           PIC X(7) VALUE 'DF10BYZ'.           20560002
               10  FILLER           PIC X(7) VALUE 'DF10B7Z'.           20570002
               10  FILLER           PIC X(7) VALUE 'DF10B8Z'.           20580002
               10  FILLER           PIC X(7) VALUE 'DF10B9Z'.           20590002
               10  FILLER           PIC X(7) VALUE 'DF109BZ'.           20600002
               10  FILLER           PIC X(7) VALUE 'DF109CZ'.           20610002
               10  FILLER           PIC X(7) VALUE 'DF109YZ'.           20620002
               10  FILLER           PIC X(7) VALUE 'DF1097Z'.           20630002
               10  FILLER           PIC X(7) VALUE 'DF1098Z'.           20640002
               10  FILLER           PIC X(7) VALUE 'DF1099Z'.           20650002
               10  FILLER           PIC X(7) VALUE 'DF11BBZ'.           20660002
               10  FILLER           PIC X(7) VALUE 'DF11BCZ'.           20670002
               10  FILLER           PIC X(7) VALUE 'DF11BYZ'.           20680002
               10  FILLER           PIC X(7) VALUE 'DF11B7Z'.           20690002
               10  FILLER           PIC X(7) VALUE 'DF11B8Z'.           20700002
               10  FILLER           PIC X(7) VALUE 'DF11B9Z'.           20710002
               10  FILLER           PIC X(7) VALUE 'DF119BZ'.           20720002
               10  FILLER           PIC X(7) VALUE 'DF119CZ'.           20730002
               10  FILLER           PIC X(7) VALUE 'DF119YZ'.           20740002
               10  FILLER           PIC X(7) VALUE 'DF1197Z'.           20750002
               10  FILLER           PIC X(7) VALUE 'DF1198Z'.           20760002
               10  FILLER           PIC X(7) VALUE 'DF1199Z'.           20770002
               10  FILLER           PIC X(7) VALUE 'DF12BBZ'.           20780002
               10  FILLER           PIC X(7) VALUE 'DF12BCZ'.           20790002
               10  FILLER           PIC X(7) VALUE 'DF12BYZ'.           20800002
               10  FILLER           PIC X(7) VALUE 'DF12B7Z'.           20810002
               10  FILLER           PIC X(7) VALUE 'DF12B8Z'.           20820002
               10  FILLER           PIC X(7) VALUE 'DF12B9Z'.           20830002
               10  FILLER           PIC X(7) VALUE 'DF129BZ'.           20840002
               10  FILLER           PIC X(7) VALUE 'DF129CZ'.           20850002
               10  FILLER           PIC X(7) VALUE 'DF129YZ'.           20860002
               10  FILLER           PIC X(7) VALUE 'DF1297Z'.           20870002
               10  FILLER           PIC X(7) VALUE 'DF1298Z'.           20880002
               10  FILLER           PIC X(7) VALUE 'DF1299Z'.           20890002
               10  FILLER           PIC X(7) VALUE 'DF13BBZ'.           20900002
               10  FILLER           PIC X(7) VALUE 'DF13BCZ'.           20910002
               10  FILLER           PIC X(7) VALUE 'DF13BYZ'.           20920002
               10  FILLER           PIC X(7) VALUE 'DF13B7Z'.           20930002
               10  FILLER           PIC X(7) VALUE 'DF13B8Z'.           20940002
               10  FILLER           PIC X(7) VALUE 'DF13B9Z'.           20950002
               10  FILLER           PIC X(7) VALUE 'DF139BZ'.           20960002
               10  FILLER           PIC X(7) VALUE 'DF139CZ'.           20970002
               10  FILLER           PIC X(7) VALUE 'DF139YZ'.           20980002
               10  FILLER           PIC X(7) VALUE 'DF1397Z'.           20990002
               10  FILLER           PIC X(7) VALUE 'DF1398Z'.           21000002
               10  FILLER           PIC X(7) VALUE 'DF1399Z'.           21010002
               10  FILLER           PIC X(7) VALUE 'DGY0FZZ'.           21020002
               10  FILLER           PIC X(7) VALUE 'DGY0KZZ'.           21030002
               10  FILLER           PIC X(7) VALUE 'DGY07ZZ'.           21040002
               10  FILLER           PIC X(7) VALUE 'DGY08ZZ'.           21050002
               10  FILLER           PIC X(7) VALUE 'DGY1FZZ'.           21060002
               10  FILLER           PIC X(7) VALUE 'DGY1KZZ'.           21070002
               10  FILLER           PIC X(7) VALUE 'DGY17ZZ'.           21080002
               10  FILLER           PIC X(7) VALUE 'DGY18ZZ'.           21090002
               10  FILLER           PIC X(7) VALUE 'DGY2FZZ'.           21100002
               10  FILLER           PIC X(7) VALUE 'DGY2KZZ'.           21110002
               10  FILLER           PIC X(7) VALUE 'DGY27ZZ'.           21120002
               10  FILLER           PIC X(7) VALUE 'DGY28ZZ'.           21130002
               10  FILLER           PIC X(7) VALUE 'DGY4FZZ'.           21140002
               10  FILLER           PIC X(7) VALUE 'DGY4KZZ'.           21150002
               10  FILLER           PIC X(7) VALUE 'DGY47ZZ'.           21160002
               10  FILLER           PIC X(7) VALUE 'DGY48ZZ'.           21170002
               10  FILLER           PIC X(7) VALUE 'DGY5FZZ'.           21180002
               10  FILLER           PIC X(7) VALUE 'DGY5KZZ'.           21190002
               10  FILLER           PIC X(7) VALUE 'DGY57ZZ'.           21200002
               10  FILLER           PIC X(7) VALUE 'DGY58ZZ'.           21210002
               10  FILLER           PIC X(7) VALUE 'DG000ZZ'.           21220002
               10  FILLER           PIC X(7) VALUE 'DG001ZZ'.           21230002
               10  FILLER           PIC X(7) VALUE 'DG002ZZ'.           21240002
               10  FILLER           PIC X(7) VALUE 'DG003ZZ'.           21250002
               10  FILLER           PIC X(7) VALUE 'DG003Z0'.           21260002
               10  FILLER           PIC X(7) VALUE 'DG005ZZ'.           21270002
               10  FILLER           PIC X(7) VALUE 'DG006ZZ'.           21280002
               10  FILLER           PIC X(7) VALUE 'DG010ZZ'.           21290002
               10  FILLER           PIC X(7) VALUE 'DG011ZZ'.           21300002
               10  FILLER           PIC X(7) VALUE 'DG012ZZ'.           21310002
               10  FILLER           PIC X(7) VALUE 'DG013ZZ'.           21320002
               10  FILLER           PIC X(7) VALUE 'DG013Z0'.           21330002
               10  FILLER           PIC X(7) VALUE 'DG015ZZ'.           21340002
               10  FILLER           PIC X(7) VALUE 'DG016ZZ'.           21350002
               10  FILLER           PIC X(7) VALUE 'DG020ZZ'.           21360002
               10  FILLER           PIC X(7) VALUE 'DG021ZZ'.           21370002
               10  FILLER           PIC X(7) VALUE 'DG022ZZ'.           21380002
               10  FILLER           PIC X(7) VALUE 'DG023ZZ'.           21390002
               10  FILLER           PIC X(7) VALUE 'DG023Z0'.           21400002
               10  FILLER           PIC X(7) VALUE 'DG025ZZ'.           21410002
               10  FILLER           PIC X(7) VALUE 'DG026ZZ'.           21420002
               10  FILLER           PIC X(7) VALUE 'DG040ZZ'.           21430002
               10  FILLER           PIC X(7) VALUE 'DG041ZZ'.           21440002
               10  FILLER           PIC X(7) VALUE 'DG042ZZ'.           21450002
               10  FILLER           PIC X(7) VALUE 'DG043ZZ'.           21460002
               10  FILLER           PIC X(7) VALUE 'DG043Z0'.           21470002
               10  FILLER           PIC X(7) VALUE 'DG045ZZ'.           21480002
               10  FILLER           PIC X(7) VALUE 'DG046ZZ'.           21490002
               10  FILLER           PIC X(7) VALUE 'DG050ZZ'.           21500002
               10  FILLER           PIC X(7) VALUE 'DG051ZZ'.           21510002
               10  FILLER           PIC X(7) VALUE 'DG052ZZ'.           21520002
               10  FILLER           PIC X(7) VALUE 'DG053ZZ'.           21530002
               10  FILLER           PIC X(7) VALUE 'DG053Z0'.           21540002
               10  FILLER           PIC X(7) VALUE 'DG055ZZ'.           21550002
               10  FILLER           PIC X(7) VALUE 'DG056ZZ'.           21560002
               10  FILLER           PIC X(7) VALUE 'DG10BBZ'.           21570002
               10  FILLER           PIC X(7) VALUE 'DG10BCZ'.           21580002
               10  FILLER           PIC X(7) VALUE 'DG10BYZ'.           21590002
               10  FILLER           PIC X(7) VALUE 'DG10B7Z'.           21600002
               10  FILLER           PIC X(7) VALUE 'DG10B8Z'.           21610002
               10  FILLER           PIC X(7) VALUE 'DG10B9Z'.           21620002
               10  FILLER           PIC X(7) VALUE 'DG109BZ'.           21630002
               10  FILLER           PIC X(7) VALUE 'DG109CZ'.           21640002
               10  FILLER           PIC X(7) VALUE 'DG109YZ'.           21650002
               10  FILLER           PIC X(7) VALUE 'DG1097Z'.           21660002
               10  FILLER           PIC X(7) VALUE 'DG1098Z'.           21670002
               10  FILLER           PIC X(7) VALUE 'DG1099Z'.           21680002
               10  FILLER           PIC X(7) VALUE 'DG11BBZ'.           21690002
               10  FILLER           PIC X(7) VALUE 'DG11BCZ'.           21700002
               10  FILLER           PIC X(7) VALUE 'DG11BYZ'.           21710002
               10  FILLER           PIC X(7) VALUE 'DG11B7Z'.           21720002
               10  FILLER           PIC X(7) VALUE 'DG11B8Z'.           21730002
               10  FILLER           PIC X(7) VALUE 'DG11B9Z'.           21740002
               10  FILLER           PIC X(7) VALUE 'DG119BZ'.           21750002
               10  FILLER           PIC X(7) VALUE 'DG119CZ'.           21760002
               10  FILLER           PIC X(7) VALUE 'DG119YZ'.           21770002
               10  FILLER           PIC X(7) VALUE 'DG1197Z'.           21780002
               10  FILLER           PIC X(7) VALUE 'DG1198Z'.           21790002
               10  FILLER           PIC X(7) VALUE 'DG1199Z'.           21800002
               10  FILLER           PIC X(7) VALUE 'DG12BBZ'.           21810002
               10  FILLER           PIC X(7) VALUE 'DG12BCZ'.           21820002
               10  FILLER           PIC X(7) VALUE 'DG12BYZ'.           21830002
               10  FILLER           PIC X(7) VALUE 'DG12B7Z'.           21840002
               10  FILLER           PIC X(7) VALUE 'DG12B8Z'.           21850002
               10  FILLER           PIC X(7) VALUE 'DG12B9Z'.           21860002
               10  FILLER           PIC X(7) VALUE 'DG129BZ'.           21870002
               10  FILLER           PIC X(7) VALUE 'DG129CZ'.           21880002
               10  FILLER           PIC X(7) VALUE 'DG129YZ'.           21890002
               10  FILLER           PIC X(7) VALUE 'DG1297Z'.           21900002
               10  FILLER           PIC X(7) VALUE 'DG1298Z'.           21910002
               10  FILLER           PIC X(7) VALUE 'DG1299Z'.           21920002
               10  FILLER           PIC X(7) VALUE 'DG14BBZ'.           21930002
               10  FILLER           PIC X(7) VALUE 'DG14BCZ'.           21940002
               10  FILLER           PIC X(7) VALUE 'DG14BYZ'.           21950002
               10  FILLER           PIC X(7) VALUE 'DG14B7Z'.           21960002
               10  FILLER           PIC X(7) VALUE 'DG14B8Z'.           21970002
               10  FILLER           PIC X(7) VALUE 'DG14B9Z'.           21980002
               10  FILLER           PIC X(7) VALUE 'DG149BZ'.           21990002
               10  FILLER           PIC X(7) VALUE 'DG149CZ'.           22000002
               10  FILLER           PIC X(7) VALUE 'DG149YZ'.           22010002
               10  FILLER           PIC X(7) VALUE 'DG1497Z'.           22020002
               10  FILLER           PIC X(7) VALUE 'DG1498Z'.           22030002
               10  FILLER           PIC X(7) VALUE 'DG1499Z'.           22040002
               10  FILLER           PIC X(7) VALUE 'DG15BBZ'.           22050002
               10  FILLER           PIC X(7) VALUE 'DG15BCZ'.           22060002
               10  FILLER           PIC X(7) VALUE 'DG15BYZ'.           22070002
               10  FILLER           PIC X(7) VALUE 'DG15B7Z'.           22080002
               10  FILLER           PIC X(7) VALUE 'DG15B8Z'.           22090002
               10  FILLER           PIC X(7) VALUE 'DG15B9Z'.           22100002
               10  FILLER           PIC X(7) VALUE 'DG159BZ'.           22110002
               10  FILLER           PIC X(7) VALUE 'DG159CZ'.           22120002
               10  FILLER           PIC X(7) VALUE 'DG159YZ'.           22130002
               10  FILLER           PIC X(7) VALUE 'DG1597Z'.           22140002
               10  FILLER           PIC X(7) VALUE 'DG1598Z'.           22150002
               10  FILLER           PIC X(7) VALUE 'DG1599Z'.           22160002
               10  FILLER           PIC X(7) VALUE 'DHYBFZZ'.           22170002
               10  FILLER           PIC X(7) VALUE 'DHYB7ZZ'.           22180002
               10  FILLER           PIC X(7) VALUE 'DHYB8ZZ'.           22190002
               10  FILLER           PIC X(7) VALUE 'DHYCFZZ'.           22200002
               10  FILLER           PIC X(7) VALUE 'DHY2FZZ'.           22210002
               10  FILLER           PIC X(7) VALUE 'DHY27ZZ'.           22220002
               10  FILLER           PIC X(7) VALUE 'DHY28ZZ'.           22230002
               10  FILLER           PIC X(7) VALUE 'DHY3FZZ'.           22240002
               10  FILLER           PIC X(7) VALUE 'DHY37ZZ'.           22250002
               10  FILLER           PIC X(7) VALUE 'DHY38ZZ'.           22260002
               10  FILLER           PIC X(7) VALUE 'DHY4FZZ'.           22270002
               10  FILLER           PIC X(7) VALUE 'DHY47ZZ'.           22280002
               10  FILLER           PIC X(7) VALUE 'DHY48ZZ'.           22290002
               10  FILLER           PIC X(7) VALUE 'DHY5FZZ'.           22300002
               10  FILLER           PIC X(7) VALUE 'DHY6FZZ'.           22310002
               10  FILLER           PIC X(7) VALUE 'DHY67ZZ'.           22320002
               10  FILLER           PIC X(7) VALUE 'DHY68ZZ'.           22330002
               10  FILLER           PIC X(7) VALUE 'DHY7FZZ'.           22340002
               10  FILLER           PIC X(7) VALUE 'DHY77ZZ'.           22350002
               10  FILLER           PIC X(7) VALUE 'DHY78ZZ'.           22360002
               10  FILLER           PIC X(7) VALUE 'DHY8FZZ'.           22370002
               10  FILLER           PIC X(7) VALUE 'DHY87ZZ'.           22380002
               10  FILLER           PIC X(7) VALUE 'DHY88ZZ'.           22390002
               10  FILLER           PIC X(7) VALUE 'DHY9FZZ'.           22400002
               10  FILLER           PIC X(7) VALUE 'DHY97ZZ'.           22410002
               10  FILLER           PIC X(7) VALUE 'DHY98ZZ'.           22420002
               10  FILLER           PIC X(7) VALUE 'DH0B0ZZ'.           22430002
               10  FILLER           PIC X(7) VALUE 'DH0B1ZZ'.           22440002
               10  FILLER           PIC X(7) VALUE 'DH0B2ZZ'.           22450002
               10  FILLER           PIC X(7) VALUE 'DH0B3ZZ'.           22460002
               10  FILLER           PIC X(7) VALUE 'DH0B3Z0'.           22470002
               10  FILLER           PIC X(7) VALUE 'DH0B4ZZ'.           22480002
               10  FILLER           PIC X(7) VALUE 'DH0B5ZZ'.           22490002
               10  FILLER           PIC X(7) VALUE 'DH0B6ZZ'.           22500002
               10  FILLER           PIC X(7) VALUE 'DH020ZZ'.           22510002
               10  FILLER           PIC X(7) VALUE 'DH021ZZ'.           22520002
               10  FILLER           PIC X(7) VALUE 'DH022ZZ'.           22530002
               10  FILLER           PIC X(7) VALUE 'DH023ZZ'.           22540002
               10  FILLER           PIC X(7) VALUE 'DH023Z0'.           22550002
               10  FILLER           PIC X(7) VALUE 'DH024ZZ'.           22560002
               10  FILLER           PIC X(7) VALUE 'DH025ZZ'.           22570002
               10  FILLER           PIC X(7) VALUE 'DH026ZZ'.           22580002
               10  FILLER           PIC X(7) VALUE 'DH030ZZ'.           22590002
               10  FILLER           PIC X(7) VALUE 'DH031ZZ'.           22600002
               10  FILLER           PIC X(7) VALUE 'DH032ZZ'.           22610002
               10  FILLER           PIC X(7) VALUE 'DH033ZZ'.           22620002
               10  FILLER           PIC X(7) VALUE 'DH033Z0'.           22630002
               10  FILLER           PIC X(7) VALUE 'DH034ZZ'.           22640002
               10  FILLER           PIC X(7) VALUE 'DH035ZZ'.           22650002
               10  FILLER           PIC X(7) VALUE 'DH036ZZ'.           22660002
               10  FILLER           PIC X(7) VALUE 'DH040ZZ'.           22670002
               10  FILLER           PIC X(7) VALUE 'DH041ZZ'.           22680002
               10  FILLER           PIC X(7) VALUE 'DH042ZZ'.           22690002
               10  FILLER           PIC X(7) VALUE 'DH043ZZ'.           22700002
               10  FILLER           PIC X(7) VALUE 'DH043Z0'.           22710002
               10  FILLER           PIC X(7) VALUE 'DH044ZZ'.           22720002
               10  FILLER           PIC X(7) VALUE 'DH045ZZ'.           22730002
               10  FILLER           PIC X(7) VALUE 'DH046ZZ'.           22740002
               10  FILLER           PIC X(7) VALUE 'DH060ZZ'.           22750002
               10  FILLER           PIC X(7) VALUE 'DH061ZZ'.           22760002
               10  FILLER           PIC X(7) VALUE 'DH062ZZ'.           22770002
               10  FILLER           PIC X(7) VALUE 'DH063ZZ'.           22780002
               10  FILLER           PIC X(7) VALUE 'DH063Z0'.           22790002
               10  FILLER           PIC X(7) VALUE 'DH064ZZ'.           22800002
               10  FILLER           PIC X(7) VALUE 'DH065ZZ'.           22810002
               10  FILLER           PIC X(7) VALUE 'DH066ZZ'.           22820002
               10  FILLER           PIC X(7) VALUE 'DH070ZZ'.           22830002
               10  FILLER           PIC X(7) VALUE 'DH071ZZ'.           22840002
               10  FILLER           PIC X(7) VALUE 'DH072ZZ'.           22850002
               10  FILLER           PIC X(7) VALUE 'DH073ZZ'.           22860002
               10  FILLER           PIC X(7) VALUE 'DH073Z0'.           22870002
               10  FILLER           PIC X(7) VALUE 'DH074ZZ'.           22880002
               10  FILLER           PIC X(7) VALUE 'DH075ZZ'.           22890002
               10  FILLER           PIC X(7) VALUE 'DH076ZZ'.           22900002
               10  FILLER           PIC X(7) VALUE 'DH080ZZ'.           22910002
               10  FILLER           PIC X(7) VALUE 'DH081ZZ'.           22920002
               10  FILLER           PIC X(7) VALUE 'DH082ZZ'.           22930002
               10  FILLER           PIC X(7) VALUE 'DH083ZZ'.           22940002
               10  FILLER           PIC X(7) VALUE 'DH083Z0'.           22950002
               10  FILLER           PIC X(7) VALUE 'DH084ZZ'.           22960002
               10  FILLER           PIC X(7) VALUE 'DH085ZZ'.           22970002
               10  FILLER           PIC X(7) VALUE 'DH086ZZ'.           22980002
               10  FILLER           PIC X(7) VALUE 'DH090ZZ'.           22990002
               10  FILLER           PIC X(7) VALUE 'DH091ZZ'.           23000002
               10  FILLER           PIC X(7) VALUE 'DH092ZZ'.           23010002
               10  FILLER           PIC X(7) VALUE 'DH093ZZ'.           23020002
               10  FILLER           PIC X(7) VALUE 'DH093Z0'.           23030002
               10  FILLER           PIC X(7) VALUE 'DH094ZZ'.           23040002
               10  FILLER           PIC X(7) VALUE 'DH095ZZ'.           23050002
               10  FILLER           PIC X(7) VALUE 'DH096ZZ'.           23060002
               10  FILLER           PIC X(7) VALUE 'DMY0FZZ'.           23070002
               10  FILLER           PIC X(7) VALUE 'DMY0KZZ'.           23080002
               10  FILLER           PIC X(7) VALUE 'DMY07ZZ'.           23090002
               10  FILLER           PIC X(7) VALUE 'DMY08ZZ'.           23100002
               10  FILLER           PIC X(7) VALUE 'DMY1FZZ'.           23110002
               10  FILLER           PIC X(7) VALUE 'DMY1KZZ'.           23120002
               10  FILLER           PIC X(7) VALUE 'DMY17ZZ'.           23130002
               10  FILLER           PIC X(7) VALUE 'DMY18ZZ'.           23140002
               10  FILLER           PIC X(7) VALUE 'DM000ZZ'.           23150002
               10  FILLER           PIC X(7) VALUE 'DM001ZZ'.           23160002
               10  FILLER           PIC X(7) VALUE 'DM002ZZ'.           23170002
               10  FILLER           PIC X(7) VALUE 'DM003ZZ'.           23180002
               10  FILLER           PIC X(7) VALUE 'DM003Z0'.           23190002
               10  FILLER           PIC X(7) VALUE 'DM004ZZ'.           23200002
               10  FILLER           PIC X(7) VALUE 'DM005ZZ'.           23210002
               10  FILLER           PIC X(7) VALUE 'DM006ZZ'.           23220002
               10  FILLER           PIC X(7) VALUE 'DM010ZZ'.           23230002
               10  FILLER           PIC X(7) VALUE 'DM011ZZ'.           23240002
               10  FILLER           PIC X(7) VALUE 'DM012ZZ'.           23250002
               10  FILLER           PIC X(7) VALUE 'DM013ZZ'.           23260002
               10  FILLER           PIC X(7) VALUE 'DM013Z0'.           23270002
               10  FILLER           PIC X(7) VALUE 'DM014ZZ'.           23280002
               10  FILLER           PIC X(7) VALUE 'DM015ZZ'.           23290002
               10  FILLER           PIC X(7) VALUE 'DM016ZZ'.           23300002
               10  FILLER           PIC X(7) VALUE 'DM10BBZ'.           23310002
               10  FILLER           PIC X(7) VALUE 'DM10BCZ'.           23320002
               10  FILLER           PIC X(7) VALUE 'DM10BYZ'.           23330002
               10  FILLER           PIC X(7) VALUE 'DM10B7Z'.           23340002
               10  FILLER           PIC X(7) VALUE 'DM10B8Z'.           23350002
               10  FILLER           PIC X(7) VALUE 'DM10B9Z'.           23360002
               10  FILLER           PIC X(7) VALUE 'DM109BZ'.           23370002
               10  FILLER           PIC X(7) VALUE 'DM109CZ'.           23380002
               10  FILLER           PIC X(7) VALUE 'DM109YZ'.           23390002
               10  FILLER           PIC X(7) VALUE 'DM1097Z'.           23400002
               10  FILLER           PIC X(7) VALUE 'DM1098Z'.           23410002
               10  FILLER           PIC X(7) VALUE 'DM1099Z'.           23420002
               10  FILLER           PIC X(7) VALUE 'DM11BBZ'.           23430002
               10  FILLER           PIC X(7) VALUE 'DM11BCZ'.           23440002
               10  FILLER           PIC X(7) VALUE 'DM11BYZ'.           23450002
               10  FILLER           PIC X(7) VALUE 'DM11B7Z'.           23460002
               10  FILLER           PIC X(7) VALUE 'DM11B8Z'.           23470002
               10  FILLER           PIC X(7) VALUE 'DM11B9Z'.           23480002
               10  FILLER           PIC X(7) VALUE 'DM119BZ'.           23490002
               10  FILLER           PIC X(7) VALUE 'DM119CZ'.           23500002
               10  FILLER           PIC X(7) VALUE 'DM119YZ'.           23510002
               10  FILLER           PIC X(7) VALUE 'DM1197Z'.           23520002
               10  FILLER           PIC X(7) VALUE 'DM1198Z'.           23530002
               10  FILLER           PIC X(7) VALUE 'DM1199Z'.           23540002
               10  FILLER           PIC X(7) VALUE 'DPYBFZZ'.           23550002
               10  FILLER           PIC X(7) VALUE 'DPYB7ZZ'.           23560002
               10  FILLER           PIC X(7) VALUE 'DPYB8ZZ'.           23570002
               10  FILLER           PIC X(7) VALUE 'DPYCFZZ'.           23580002
               10  FILLER           PIC X(7) VALUE 'DPYC7ZZ'.           23590002
               10  FILLER           PIC X(7) VALUE 'DPYC8ZZ'.           23600002
               10  FILLER           PIC X(7) VALUE 'DPY0FZZ'.           23610002
               10  FILLER           PIC X(7) VALUE 'DPY07ZZ'.           23620002
               10  FILLER           PIC X(7) VALUE 'DPY08ZZ'.           23630002
               10  FILLER           PIC X(7) VALUE 'DPY2FZZ'.           23640002
               10  FILLER           PIC X(7) VALUE 'DPY27ZZ'.           23650002
               10  FILLER           PIC X(7) VALUE 'DPY28ZZ'.           23660002
               10  FILLER           PIC X(7) VALUE 'DPY3FZZ'.           23670002
               10  FILLER           PIC X(7) VALUE 'DPY37ZZ'.           23680002
               10  FILLER           PIC X(7) VALUE 'DPY38ZZ'.           23690002
               10  FILLER           PIC X(7) VALUE 'DPY4FZZ'.           23700002
               10  FILLER           PIC X(7) VALUE 'DPY47ZZ'.           23710002
               10  FILLER           PIC X(7) VALUE 'DPY48ZZ'.           23720002
               10  FILLER           PIC X(7) VALUE 'DPY5FZZ'.           23730002
               10  FILLER           PIC X(7) VALUE 'DPY57ZZ'.           23740002
               10  FILLER           PIC X(7) VALUE 'DPY58ZZ'.           23750002
               10  FILLER           PIC X(7) VALUE 'DPY6FZZ'.           23760002
               10  FILLER           PIC X(7) VALUE 'DPY67ZZ'.           23770002
               10  FILLER           PIC X(7) VALUE 'DPY68ZZ'.           23780002
               10  FILLER           PIC X(7) VALUE 'DPY7FZZ'.           23790002
               10  FILLER           PIC X(7) VALUE 'DPY77ZZ'.           23800002
               10  FILLER           PIC X(7) VALUE 'DPY78ZZ'.           23810002
               10  FILLER           PIC X(7) VALUE 'DPY8FZZ'.           23820002
               10  FILLER           PIC X(7) VALUE 'DPY87ZZ'.           23830002
               10  FILLER           PIC X(7) VALUE 'DPY88ZZ'.           23840002
               10  FILLER           PIC X(7) VALUE 'DPY9FZZ'.           23850002
               10  FILLER           PIC X(7) VALUE 'DPY97ZZ'.           23860002
               10  FILLER           PIC X(7) VALUE 'DPY98ZZ'.           23870002
               10  FILLER           PIC X(7) VALUE 'DP0B0ZZ'.           23880002
               10  FILLER           PIC X(7) VALUE 'DP0B1ZZ'.           23890002
               10  FILLER           PIC X(7) VALUE 'DP0B2ZZ'.           23900002
               10  FILLER           PIC X(7) VALUE 'DP0B3ZZ'.           23910002
               10  FILLER           PIC X(7) VALUE 'DP0B3Z0'.           23920002
               10  FILLER           PIC X(7) VALUE 'DP0B4ZZ'.           23930002
               10  FILLER           PIC X(7) VALUE 'DP0B5ZZ'.           23940002
               10  FILLER           PIC X(7) VALUE 'DP0B6ZZ'.           23950002
               10  FILLER           PIC X(7) VALUE 'DP0C0ZZ'.           23960002
               10  FILLER           PIC X(7) VALUE 'DP0C1ZZ'.           23970002
               10  FILLER           PIC X(7) VALUE 'DP0C2ZZ'.           23980002
               10  FILLER           PIC X(7) VALUE 'DP0C3ZZ'.           23990002
               10  FILLER           PIC X(7) VALUE 'DP0C3Z0'.           24000002
               10  FILLER           PIC X(7) VALUE 'DP0C4ZZ'.           24010002
               10  FILLER           PIC X(7) VALUE 'DP0C5ZZ'.           24020002
               10  FILLER           PIC X(7) VALUE 'DP0C6ZZ'.           24030002
               10  FILLER           PIC X(7) VALUE 'DP000ZZ'.           24040002
               10  FILLER           PIC X(7) VALUE 'DP001ZZ'.           24050002
               10  FILLER           PIC X(7) VALUE 'DP002ZZ'.           24060002
               10  FILLER           PIC X(7) VALUE 'DP003ZZ'.           24070002
               10  FILLER           PIC X(7) VALUE 'DP003Z0'.           24080002
               10  FILLER           PIC X(7) VALUE 'DP004ZZ'.           24090002
               10  FILLER           PIC X(7) VALUE 'DP005ZZ'.           24100002
               10  FILLER           PIC X(7) VALUE 'DP006ZZ'.           24110002
               10  FILLER           PIC X(7) VALUE 'DP020ZZ'.           24120002
               10  FILLER           PIC X(7) VALUE 'DP021ZZ'.           24130002
               10  FILLER           PIC X(7) VALUE 'DP022ZZ'.           24140002
               10  FILLER           PIC X(7) VALUE 'DP023ZZ'.           24150002
               10  FILLER           PIC X(7) VALUE 'DP023Z0'.           24160002
               10  FILLER           PIC X(7) VALUE 'DP024ZZ'.           24170002
               10  FILLER           PIC X(7) VALUE 'DP025ZZ'.           24180002
               10  FILLER           PIC X(7) VALUE 'DP026ZZ'.           24190002
               10  FILLER           PIC X(7) VALUE 'DP030ZZ'.           24200002
               10  FILLER           PIC X(7) VALUE 'DP031ZZ'.           24210002
               10  FILLER           PIC X(7) VALUE 'DP032ZZ'.           24220002
               10  FILLER           PIC X(7) VALUE 'DP033ZZ'.           24230002
               10  FILLER           PIC X(7) VALUE 'DP033Z0'.           24240002
               10  FILLER           PIC X(7) VALUE 'DP034ZZ'.           24250002
               10  FILLER           PIC X(7) VALUE 'DP035ZZ'.           24260002
               10  FILLER           PIC X(7) VALUE 'DP036ZZ'.           24270002
               10  FILLER           PIC X(7) VALUE 'DP040ZZ'.           24280002
               10  FILLER           PIC X(7) VALUE 'DP041ZZ'.           24290002
               10  FILLER           PIC X(7) VALUE 'DP042ZZ'.           24300002
               10  FILLER           PIC X(7) VALUE 'DP043ZZ'.           24310002
               10  FILLER           PIC X(7) VALUE 'DP043Z0'.           24320002
               10  FILLER           PIC X(7) VALUE 'DP044ZZ'.           24330002
               10  FILLER           PIC X(7) VALUE 'DP045ZZ'.           24340002
               10  FILLER           PIC X(7) VALUE 'DP046ZZ'.           24350002
               10  FILLER           PIC X(7) VALUE 'DP050ZZ'.           24360002
               10  FILLER           PIC X(7) VALUE 'DP051ZZ'.           24370002
               10  FILLER           PIC X(7) VALUE 'DP052ZZ'.           24380002
               10  FILLER           PIC X(7) VALUE 'DP053ZZ'.           24390002
               10  FILLER           PIC X(7) VALUE 'DP053Z0'.           24400002
               10  FILLER           PIC X(7) VALUE 'DP054ZZ'.           24410002
               10  FILLER           PIC X(7) VALUE 'DP055ZZ'.           24420002
               10  FILLER           PIC X(7) VALUE 'DP056ZZ'.           24430002
               10  FILLER           PIC X(7) VALUE 'DP060ZZ'.           24440002
               10  FILLER           PIC X(7) VALUE 'DP061ZZ'.           24450002
               10  FILLER           PIC X(7) VALUE 'DP062ZZ'.           24460002
               10  FILLER           PIC X(7) VALUE 'DP063ZZ'.           24470002
               10  FILLER           PIC X(7) VALUE 'DP063Z0'.           24480002
               10  FILLER           PIC X(7) VALUE 'DP064ZZ'.           24490002
               10  FILLER           PIC X(7) VALUE 'DP065ZZ'.           24500002
               10  FILLER           PIC X(7) VALUE 'DP066ZZ'.           24510002
               10  FILLER           PIC X(7) VALUE 'DP070ZZ'.           24520002
               10  FILLER           PIC X(7) VALUE 'DP071ZZ'.           24530002
               10  FILLER           PIC X(7) VALUE 'DP072ZZ'.           24540002
               10  FILLER           PIC X(7) VALUE 'DP073ZZ'.           24550002
               10  FILLER           PIC X(7) VALUE 'DP073Z0'.           24560002
               10  FILLER           PIC X(7) VALUE 'DP074ZZ'.           24570002
               10  FILLER           PIC X(7) VALUE 'DP075ZZ'.           24580002
               10  FILLER           PIC X(7) VALUE 'DP076ZZ'.           24590002
               10  FILLER           PIC X(7) VALUE 'DP080ZZ'.           24600002
               10  FILLER           PIC X(7) VALUE 'DP081ZZ'.           24610002
               10  FILLER           PIC X(7) VALUE 'DP082ZZ'.           24620002
               10  FILLER           PIC X(7) VALUE 'DP083ZZ'.           24630002
               10  FILLER           PIC X(7) VALUE 'DP083Z0'.           24640002
               10  FILLER           PIC X(7) VALUE 'DP084ZZ'.           24650002
               10  FILLER           PIC X(7) VALUE 'DP085ZZ'.           24660002
               10  FILLER           PIC X(7) VALUE 'DP086ZZ'.           24670002
               10  FILLER           PIC X(7) VALUE 'DP090ZZ'.           24680002
               10  FILLER           PIC X(7) VALUE 'DP091ZZ'.           24690002
               10  FILLER           PIC X(7) VALUE 'DP092ZZ'.           24700002
               10  FILLER           PIC X(7) VALUE 'DP093ZZ'.           24710002
               10  FILLER           PIC X(7) VALUE 'DP093Z0'.           24720002
               10  FILLER           PIC X(7) VALUE 'DP094ZZ'.           24730002
               10  FILLER           PIC X(7) VALUE 'DP095ZZ'.           24740002
               10  FILLER           PIC X(7) VALUE 'DP096ZZ'.           24750002
               10  FILLER           PIC X(7) VALUE 'DTY0CZZ'.           24760002
               10  FILLER           PIC X(7) VALUE 'DTY0FZZ'.           24770002
               10  FILLER           PIC X(7) VALUE 'DTY07ZZ'.           24780002
               10  FILLER           PIC X(7) VALUE 'DTY08ZZ'.           24790002
               10  FILLER           PIC X(7) VALUE 'DTY1CZZ'.           24800002
               10  FILLER           PIC X(7) VALUE 'DTY1FZZ'.           24810002
               10  FILLER           PIC X(7) VALUE 'DTY17ZZ'.           24820002
               10  FILLER           PIC X(7) VALUE 'DTY18ZZ'.           24830002
               10  FILLER           PIC X(7) VALUE 'DTY2CZZ'.           24840002
               10  FILLER           PIC X(7) VALUE 'DTY2FZZ'.           24850002
               10  FILLER           PIC X(7) VALUE 'DTY27ZZ'.           24860002
               10  FILLER           PIC X(7) VALUE 'DTY28ZZ'.           24870002
               10  FILLER           PIC X(7) VALUE 'DTY3CZZ'.           24880002
               10  FILLER           PIC X(7) VALUE 'DTY3FZZ'.           24890002
               10  FILLER           PIC X(7) VALUE 'DTY37ZZ'.           24900002
               10  FILLER           PIC X(7) VALUE 'DTY38ZZ'.           24910002
               10  FILLER           PIC X(7) VALUE 'DT000ZZ'.           24920002
               10  FILLER           PIC X(7) VALUE 'DT001ZZ'.           24930002
               10  FILLER           PIC X(7) VALUE 'DT002ZZ'.           24940002
               10  FILLER           PIC X(7) VALUE 'DT003ZZ'.           24950002
               10  FILLER           PIC X(7) VALUE 'DT003Z0'.           24960002
               10  FILLER           PIC X(7) VALUE 'DT004ZZ'.           24970002
               10  FILLER           PIC X(7) VALUE 'DT005ZZ'.           24980002
               10  FILLER           PIC X(7) VALUE 'DT006ZZ'.           24990002
               10  FILLER           PIC X(7) VALUE 'DT010ZZ'.           25000002
               10  FILLER           PIC X(7) VALUE 'DT011ZZ'.           25010002
               10  FILLER           PIC X(7) VALUE 'DT012ZZ'.           25020002
               10  FILLER           PIC X(7) VALUE 'DT013ZZ'.           25030002
               10  FILLER           PIC X(7) VALUE 'DT013Z0'.           25040002
               10  FILLER           PIC X(7) VALUE 'DT014ZZ'.           25050002
               10  FILLER           PIC X(7) VALUE 'DT015ZZ'.           25060002
               10  FILLER           PIC X(7) VALUE 'DT016ZZ'.           25070002
               10  FILLER           PIC X(7) VALUE 'DT020ZZ'.           25080002
               10  FILLER           PIC X(7) VALUE 'DT021ZZ'.           25090002
               10  FILLER           PIC X(7) VALUE 'DT022ZZ'.           25100002
               10  FILLER           PIC X(7) VALUE 'DT023ZZ'.           25110002
               10  FILLER           PIC X(7) VALUE 'DT023Z0'.           25120002
               10  FILLER           PIC X(7) VALUE 'DT024ZZ'.           25130002
               10  FILLER           PIC X(7) VALUE 'DT025ZZ'.           25140002
               10  FILLER           PIC X(7) VALUE 'DT026ZZ'.           25150002
               10  FILLER           PIC X(7) VALUE 'DT030ZZ'.           25160002
               10  FILLER           PIC X(7) VALUE 'DT031ZZ'.           25170002
               10  FILLER           PIC X(7) VALUE 'DT032ZZ'.           25180002
               10  FILLER           PIC X(7) VALUE 'DT033ZZ'.           25190002
               10  FILLER           PIC X(7) VALUE 'DT033Z0'.           25200002
               10  FILLER           PIC X(7) VALUE 'DT034ZZ'.           25210002
               10  FILLER           PIC X(7) VALUE 'DT035ZZ'.           25220002
               10  FILLER           PIC X(7) VALUE 'DT036ZZ'.           25230002
               10  FILLER           PIC X(7) VALUE 'DT10BBZ'.           25240002
               10  FILLER           PIC X(7) VALUE 'DT10BCZ'.           25250002
               10  FILLER           PIC X(7) VALUE 'DT10BYZ'.           25260002
               10  FILLER           PIC X(7) VALUE 'DT10B7Z'.           25270002
               10  FILLER           PIC X(7) VALUE 'DT10B8Z'.           25280002
               10  FILLER           PIC X(7) VALUE 'DT10B9Z'.           25290002
               10  FILLER           PIC X(7) VALUE 'DT109BZ'.           25300002
               10  FILLER           PIC X(7) VALUE 'DT109CZ'.           25310002
               10  FILLER           PIC X(7) VALUE 'DT109YZ'.           25320002
               10  FILLER           PIC X(7) VALUE 'DT1097Z'.           25330002
               10  FILLER           PIC X(7) VALUE 'DT1098Z'.           25340002
               10  FILLER           PIC X(7) VALUE 'DT1099Z'.           25350002
               10  FILLER           PIC X(7) VALUE 'DT11BBZ'.           25360002
               10  FILLER           PIC X(7) VALUE 'DT11BCZ'.           25370002
               10  FILLER           PIC X(7) VALUE 'DT11BYZ'.           25380002
               10  FILLER           PIC X(7) VALUE 'DT11B7Z'.           25390002
               10  FILLER           PIC X(7) VALUE 'DT11B8Z'.           25400002
               10  FILLER           PIC X(7) VALUE 'DT11B9Z'.           25410002
               10  FILLER           PIC X(7) VALUE 'DT119BZ'.           25420002
               10  FILLER           PIC X(7) VALUE 'DT119CZ'.           25430002
               10  FILLER           PIC X(7) VALUE 'DT119YZ'.           25440002
               10  FILLER           PIC X(7) VALUE 'DT1197Z'.           25450002
               10  FILLER           PIC X(7) VALUE 'DT1198Z'.           25460002
               10  FILLER           PIC X(7) VALUE 'DT1199Z'.           25470002
               10  FILLER           PIC X(7) VALUE 'DT12BBZ'.           25480002
               10  FILLER           PIC X(7) VALUE 'DT12BCZ'.           25490002
               10  FILLER           PIC X(7) VALUE 'DT12BYZ'.           25500002
               10  FILLER           PIC X(7) VALUE 'DT12B7Z'.           25510002
               10  FILLER           PIC X(7) VALUE 'DT12B8Z'.           25520002
               10  FILLER           PIC X(7) VALUE 'DT12B9Z'.           25530002
               10  FILLER           PIC X(7) VALUE 'DT129BZ'.           25540002
               10  FILLER           PIC X(7) VALUE 'DT129CZ'.           25550002
               10  FILLER           PIC X(7) VALUE 'DT129YZ'.           25560002
               10  FILLER           PIC X(7) VALUE 'DT1297Z'.           25570002
               10  FILLER           PIC X(7) VALUE 'DT1298Z'.           25580002
               10  FILLER           PIC X(7) VALUE 'DT1299Z'.           25590002
               10  FILLER           PIC X(7) VALUE 'DT13BBZ'.           25600002
               10  FILLER           PIC X(7) VALUE 'DT13BCZ'.           25610002
               10  FILLER           PIC X(7) VALUE 'DT13BYZ'.           25620002
               10  FILLER           PIC X(7) VALUE 'DT13B7Z'.           25630002
               10  FILLER           PIC X(7) VALUE 'DT13B8Z'.           25640002
               10  FILLER           PIC X(7) VALUE 'DT13B9Z'.           25650002
               10  FILLER           PIC X(7) VALUE 'DT139BZ'.           25660002
               10  FILLER           PIC X(7) VALUE 'DT139CZ'.           25670002
               10  FILLER           PIC X(7) VALUE 'DT139YZ'.           25680002
               10  FILLER           PIC X(7) VALUE 'DT1397Z'.           25690002
               10  FILLER           PIC X(7) VALUE 'DT1398Z'.           25700002
               10  FILLER           PIC X(7) VALUE 'DT1399Z'.           25710002
               10  FILLER           PIC X(7) VALUE 'DUY0CZZ'.           25720002
               10  FILLER           PIC X(7) VALUE 'DUY0FZZ'.           25730002
               10  FILLER           PIC X(7) VALUE 'DUY07ZZ'.           25740002
               10  FILLER           PIC X(7) VALUE 'DUY08ZZ'.           25750002
               10  FILLER           PIC X(7) VALUE 'DUY1CZZ'.           25760002
               10  FILLER           PIC X(7) VALUE 'DUY1FZZ'.           25770002
               10  FILLER           PIC X(7) VALUE 'DUY17ZZ'.           25780002
               10  FILLER           PIC X(7) VALUE 'DUY18ZZ'.           25790002
               10  FILLER           PIC X(7) VALUE 'DUY2CZZ'.           25800002
               10  FILLER           PIC X(7) VALUE 'DUY2FZZ'.           25810002
               10  FILLER           PIC X(7) VALUE 'DUY27ZZ'.           25820002
               10  FILLER           PIC X(7) VALUE 'DUY28ZZ'.           25830002
               10  FILLER           PIC X(7) VALUE 'DU000ZZ'.           25840002
               10  FILLER           PIC X(7) VALUE 'DU001ZZ'.           25850002
               10  FILLER           PIC X(7) VALUE 'DU002ZZ'.           25860002
               10  FILLER           PIC X(7) VALUE 'DU003ZZ'.           25870002
               10  FILLER           PIC X(7) VALUE 'DU003Z0'.           25880002
               10  FILLER           PIC X(7) VALUE 'DU004ZZ'.           25890002
               10  FILLER           PIC X(7) VALUE 'DU005ZZ'.           25900002
               10  FILLER           PIC X(7) VALUE 'DU006ZZ'.           25910002
               10  FILLER           PIC X(7) VALUE 'DU010ZZ'.           25920002
               10  FILLER           PIC X(7) VALUE 'DU011ZZ'.           25930002
               10  FILLER           PIC X(7) VALUE 'DU012ZZ'.           25940002
               10  FILLER           PIC X(7) VALUE 'DU013ZZ'.           25950002
               10  FILLER           PIC X(7) VALUE 'DU013Z0'.           25960002
               10  FILLER           PIC X(7) VALUE 'DU014ZZ'.           25970002
               10  FILLER           PIC X(7) VALUE 'DU015ZZ'.           25980002
               10  FILLER           PIC X(7) VALUE 'DU016ZZ'.           25990002
               10  FILLER           PIC X(7) VALUE 'DU020ZZ'.           26000002
               10  FILLER           PIC X(7) VALUE 'DU021ZZ'.           26010002
               10  FILLER           PIC X(7) VALUE 'DU022ZZ'.           26020002
               10  FILLER           PIC X(7) VALUE 'DU023ZZ'.           26030002
               10  FILLER           PIC X(7) VALUE 'DU023Z0'.           26040002
               10  FILLER           PIC X(7) VALUE 'DU024ZZ'.           26050002
               10  FILLER           PIC X(7) VALUE 'DU025ZZ'.           26060002
               10  FILLER           PIC X(7) VALUE 'DU026ZZ'.           26070002
               10  FILLER           PIC X(7) VALUE 'DU10BBZ'.           26080002
               10  FILLER           PIC X(7) VALUE 'DU10BCZ'.           26090002
               10  FILLER           PIC X(7) VALUE 'DU10BYZ'.           26100002
               10  FILLER           PIC X(7) VALUE 'DU10B7Z'.           26110002
               10  FILLER           PIC X(7) VALUE 'DU10B8Z'.           26120002
               10  FILLER           PIC X(7) VALUE 'DU10B9Z'.           26130002
               10  FILLER           PIC X(7) VALUE 'DU109BZ'.           26140002
               10  FILLER           PIC X(7) VALUE 'DU109CZ'.           26150002
               10  FILLER           PIC X(7) VALUE 'DU109YZ'.           26160002
               10  FILLER           PIC X(7) VALUE 'DU1097Z'.           26170002
               10  FILLER           PIC X(7) VALUE 'DU1098Z'.           26180002
               10  FILLER           PIC X(7) VALUE 'DU1099Z'.           26190002
               10  FILLER           PIC X(7) VALUE 'DU11BBZ'.           26200002
               10  FILLER           PIC X(7) VALUE 'DU11BCZ'.           26210002
               10  FILLER           PIC X(7) VALUE 'DU11BYZ'.           26220002
               10  FILLER           PIC X(7) VALUE 'DU11B7Z'.           26230002
               10  FILLER           PIC X(7) VALUE 'DU11B8Z'.           26240002
               10  FILLER           PIC X(7) VALUE 'DU11B9Z'.           26250002
               10  FILLER           PIC X(7) VALUE 'DU119BZ'.           26260002
               10  FILLER           PIC X(7) VALUE 'DU119CZ'.           26270002
               10  FILLER           PIC X(7) VALUE 'DU119YZ'.           26280002
               10  FILLER           PIC X(7) VALUE 'DU1197Z'.           26290002
               10  FILLER           PIC X(7) VALUE 'DU1198Z'.           26300002
               10  FILLER           PIC X(7) VALUE 'DU1199Z'.           26310002
               10  FILLER           PIC X(7) VALUE 'DU12BBZ'.           26320002
               10  FILLER           PIC X(7) VALUE 'DU12BCZ'.           26330002
               10  FILLER           PIC X(7) VALUE 'DU12BYZ'.           26340002
               10  FILLER           PIC X(7) VALUE 'DU12B7Z'.           26350002
               10  FILLER           PIC X(7) VALUE 'DU12B8Z'.           26360002
               10  FILLER           PIC X(7) VALUE 'DU12B9Z'.           26370002
               10  FILLER           PIC X(7) VALUE 'DU129BZ'.           26380002
               10  FILLER           PIC X(7) VALUE 'DU129CZ'.           26390002
               10  FILLER           PIC X(7) VALUE 'DU129YZ'.           26400002
               10  FILLER           PIC X(7) VALUE 'DU1297Z'.           26410002
               10  FILLER           PIC X(7) VALUE 'DU1298Z'.           26420002
               10  FILLER           PIC X(7) VALUE 'DU1299Z'.           26430002
               10  FILLER           PIC X(7) VALUE 'DVY0CZZ'.           26440002
               10  FILLER           PIC X(7) VALUE 'DVY0FZZ'.           26450002
               10  FILLER           PIC X(7) VALUE 'DVY0KZZ'.           26460002
               10  FILLER           PIC X(7) VALUE 'DVY07ZZ'.           26470002
               10  FILLER           PIC X(7) VALUE 'DVY08ZZ'.           26480002
               10  FILLER           PIC X(7) VALUE 'DVY1FZZ'.           26490002
               10  FILLER           PIC X(7) VALUE 'DVY17ZZ'.           26500002
               10  FILLER           PIC X(7) VALUE 'DVY18ZZ'.           26510002
               10  FILLER           PIC X(7) VALUE 'DV000ZZ'.           26520002
               10  FILLER           PIC X(7) VALUE 'DV001ZZ'.           26530002
               10  FILLER           PIC X(7) VALUE 'DV002ZZ'.           26540002
               10  FILLER           PIC X(7) VALUE 'DV003ZZ'.           26550002
               10  FILLER           PIC X(7) VALUE 'DV003Z0'.           26560002
               10  FILLER           PIC X(7) VALUE 'DV004ZZ'.           26570002
               10  FILLER           PIC X(7) VALUE 'DV005ZZ'.           26580002
               10  FILLER           PIC X(7) VALUE 'DV006ZZ'.           26590002
               10  FILLER           PIC X(7) VALUE 'DV010ZZ'.           26600002
               10  FILLER           PIC X(7) VALUE 'DV011ZZ'.           26610002
               10  FILLER           PIC X(7) VALUE 'DV012ZZ'.           26620002
               10  FILLER           PIC X(7) VALUE 'DV013ZZ'.           26630002
               10  FILLER           PIC X(7) VALUE 'DV013Z0'.           26640002
               10  FILLER           PIC X(7) VALUE 'DV014ZZ'.           26650002
               10  FILLER           PIC X(7) VALUE 'DV015ZZ'.           26660002
               10  FILLER           PIC X(7) VALUE 'DV016ZZ'.           26670002
               10  FILLER           PIC X(7) VALUE 'DV10BBZ'.           26680002
               10  FILLER           PIC X(7) VALUE 'DV10BCZ'.           26690002
               10  FILLER           PIC X(7) VALUE 'DV10BYZ'.           26700002
               10  FILLER           PIC X(7) VALUE 'DV10B7Z'.           26710002
               10  FILLER           PIC X(7) VALUE 'DV10B8Z'.           26720002
               10  FILLER           PIC X(7) VALUE 'DV10B9Z'.           26730002
               10  FILLER           PIC X(7) VALUE 'DV109BZ'.           26740002
               10  FILLER           PIC X(7) VALUE 'DV109CZ'.           26750002
               10  FILLER           PIC X(7) VALUE 'DV109YZ'.           26760002
               10  FILLER           PIC X(7) VALUE 'DV1097Z'.           26770002
               10  FILLER           PIC X(7) VALUE 'DV1098Z'.           26780002
               10  FILLER           PIC X(7) VALUE 'DV1099Z'.           26790002
               10  FILLER           PIC X(7) VALUE 'DV11BBZ'.           26800002
               10  FILLER           PIC X(7) VALUE 'DV11BCZ'.           26810002
               10  FILLER           PIC X(7) VALUE 'DV11BYZ'.           26820002
               10  FILLER           PIC X(7) VALUE 'DV11B7Z'.           26830002
               10  FILLER           PIC X(7) VALUE 'DV11B8Z'.           26840002
               10  FILLER           PIC X(7) VALUE 'DV11B9Z'.           26850002
               10  FILLER           PIC X(7) VALUE 'DV119BZ'.           26860002
               10  FILLER           PIC X(7) VALUE 'DV119CZ'.           26870002
               10  FILLER           PIC X(7) VALUE 'DV119YZ'.           26880002
               10  FILLER           PIC X(7) VALUE 'DV1197Z'.           26890002
               10  FILLER           PIC X(7) VALUE 'DV1198Z'.           26900002
               10  FILLER           PIC X(7) VALUE 'DV1199Z'.           26910002
               10  FILLER           PIC X(7) VALUE 'DWY1FZZ'.           26920002
               10  FILLER           PIC X(7) VALUE 'DWY17ZZ'.           26930002
               10  FILLER           PIC X(7) VALUE 'DWY18ZZ'.           26940002
               10  FILLER           PIC X(7) VALUE 'DWY2FZZ'.           26950002
               10  FILLER           PIC X(7) VALUE 'DWY27ZZ'.           26960002
               10  FILLER           PIC X(7) VALUE 'DWY28ZZ'.           26970002
               10  FILLER           PIC X(7) VALUE 'DWY3FZZ'.           26980002
               10  FILLER           PIC X(7) VALUE 'DWY37ZZ'.           26990002
               10  FILLER           PIC X(7) VALUE 'DWY38ZZ'.           27000002
               10  FILLER           PIC X(7) VALUE 'DWY4FZZ'.           27010002
               10  FILLER           PIC X(7) VALUE 'DWY47ZZ'.           27020002
               10  FILLER           PIC X(7) VALUE 'DWY48ZZ'.           27030002
               10  FILLER           PIC X(7) VALUE 'DWY5FZZ'.           27040002
               10  FILLER           PIC X(7) VALUE 'DWY5GDZ'.           27050002
               10  FILLER           PIC X(7) VALUE 'DWY5GFZ'.           27060002
               10  FILLER           PIC X(7) VALUE 'DWY5GGZ'.           27070002
               10  FILLER           PIC X(7) VALUE 'DWY5GHZ'.           27080002
               10  FILLER           PIC X(7) VALUE 'DWY5GYZ'.           27090002
               10  FILLER           PIC X(7) VALUE 'DWY57ZZ'.           27100002
               10  FILLER           PIC X(7) VALUE 'DWY58ZZ'.           27110002
               10  FILLER           PIC X(7) VALUE 'DWY6FZZ'.           27120002
               10  FILLER           PIC X(7) VALUE 'DWY67ZZ'.           27130002
               10  FILLER           PIC X(7) VALUE 'DWY68ZZ'.           27140002
               10  FILLER           PIC X(7) VALUE 'DW010ZZ'.           27150002
               10  FILLER           PIC X(7) VALUE 'DW011ZZ'.           27160002
               10  FILLER           PIC X(7) VALUE 'DW012ZZ'.           27170002
               10  FILLER           PIC X(7) VALUE 'DW013ZZ'.           27180002
               10  FILLER           PIC X(7) VALUE 'DW013Z0'.           27190002
               10  FILLER           PIC X(7) VALUE 'DW014ZZ'.           27200002
               10  FILLER           PIC X(7) VALUE 'DW015ZZ'.           27210002
               10  FILLER           PIC X(7) VALUE 'DW016ZZ'.           27220002
               10  FILLER           PIC X(7) VALUE 'DW020ZZ'.           27230002
               10  FILLER           PIC X(7) VALUE 'DW021ZZ'.           27240002
               10  FILLER           PIC X(7) VALUE 'DW022ZZ'.           27250002
               10  FILLER           PIC X(7) VALUE 'DW023ZZ'.           27260002
               10  FILLER           PIC X(7) VALUE 'DW023Z0'.           27270002
               10  FILLER           PIC X(7) VALUE 'DW024ZZ'.           27280002
               10  FILLER           PIC X(7) VALUE 'DW025ZZ'.           27290002
               10  FILLER           PIC X(7) VALUE 'DW026ZZ'.           27300002
               10  FILLER           PIC X(7) VALUE 'DW030ZZ'.           27310002
               10  FILLER           PIC X(7) VALUE 'DW031ZZ'.           27320002
               10  FILLER           PIC X(7) VALUE 'DW032ZZ'.           27330002
               10  FILLER           PIC X(7) VALUE 'DW033ZZ'.           27340002
               10  FILLER           PIC X(7) VALUE 'DW033Z0'.           27350002
               10  FILLER           PIC X(7) VALUE 'DW034ZZ'.           27360002
               10  FILLER           PIC X(7) VALUE 'DW035ZZ'.           27370002
               10  FILLER           PIC X(7) VALUE 'DW036ZZ'.           27380002
               10  FILLER           PIC X(7) VALUE 'DW040ZZ'.           27390002
               10  FILLER           PIC X(7) VALUE 'DW041ZZ'.           27400002
               10  FILLER           PIC X(7) VALUE 'DW042ZZ'.           27410002
               10  FILLER           PIC X(7) VALUE 'DW043ZZ'.           27420002
               10  FILLER           PIC X(7) VALUE 'DW043Z0'.           27430002
               10  FILLER           PIC X(7) VALUE 'DW044ZZ'.           27440002
               10  FILLER           PIC X(7) VALUE 'DW045ZZ'.           27450002
               10  FILLER           PIC X(7) VALUE 'DW046ZZ'.           27460002
               10  FILLER           PIC X(7) VALUE 'DW050ZZ'.           27470002
               10  FILLER           PIC X(7) VALUE 'DW051ZZ'.           27480002
               10  FILLER           PIC X(7) VALUE 'DW052ZZ'.           27490002
               10  FILLER           PIC X(7) VALUE 'DW053ZZ'.           27500002
               10  FILLER           PIC X(7) VALUE 'DW053Z0'.           27510002
               10  FILLER           PIC X(7) VALUE 'DW054ZZ'.           27520002
               10  FILLER           PIC X(7) VALUE 'DW055ZZ'.           27530002
               10  FILLER           PIC X(7) VALUE 'DW056ZZ'.           27540002
               10  FILLER           PIC X(7) VALUE 'DW060ZZ'.           27550002
               10  FILLER           PIC X(7) VALUE 'DW061ZZ'.           27560002
               10  FILLER           PIC X(7) VALUE 'DW062ZZ'.           27570002
               10  FILLER           PIC X(7) VALUE 'DW063ZZ'.           27580002
               10  FILLER           PIC X(7) VALUE 'DW063Z0'.           27590002
               10  FILLER           PIC X(7) VALUE 'DW064ZZ'.           27600002
               10  FILLER           PIC X(7) VALUE 'DW065ZZ'.           27610002
               10  FILLER           PIC X(7) VALUE 'DW066ZZ'.           27620002
               10  FILLER           PIC X(7) VALUE 'DW11BBZ'.           27630002
               10  FILLER           PIC X(7) VALUE 'DW11BCZ'.           27640002
               10  FILLER           PIC X(7) VALUE 'DW11BYZ'.           27650002
               10  FILLER           PIC X(7) VALUE 'DW11B7Z'.           27660002
               10  FILLER           PIC X(7) VALUE 'DW11B8Z'.           27670002
               10  FILLER           PIC X(7) VALUE 'DW11B9Z'.           27680002
               10  FILLER           PIC X(7) VALUE 'DW119BZ'.           27690002
               10  FILLER           PIC X(7) VALUE 'DW119CZ'.           27700002
               10  FILLER           PIC X(7) VALUE 'DW119YZ'.           27710002
               10  FILLER           PIC X(7) VALUE 'DW1197Z'.           27720002
               10  FILLER           PIC X(7) VALUE 'DW1198Z'.           27730002
               10  FILLER           PIC X(7) VALUE 'DW1199Z'.           27740002
               10  FILLER           PIC X(7) VALUE 'DW12BBZ'.           27750002
               10  FILLER           PIC X(7) VALUE 'DW12BCZ'.           27760002
               10  FILLER           PIC X(7) VALUE 'DW12BYZ'.           27770002
               10  FILLER           PIC X(7) VALUE 'DW12B7Z'.           27780002
               10  FILLER           PIC X(7) VALUE 'DW12B8Z'.           27790002
               10  FILLER           PIC X(7) VALUE 'DW12B9Z'.           27800002
               10  FILLER           PIC X(7) VALUE 'DW129BZ'.           27810002
               10  FILLER           PIC X(7) VALUE 'DW129CZ'.           27820002
               10  FILLER           PIC X(7) VALUE 'DW129YZ'.           27830002
               10  FILLER           PIC X(7) VALUE 'DW1297Z'.           27840002
               10  FILLER           PIC X(7) VALUE 'DW1298Z'.           27850002
               10  FILLER           PIC X(7) VALUE 'DW1299Z'.           27860002
               10  FILLER           PIC X(7) VALUE 'DW13BBZ'.           27870002
               10  FILLER           PIC X(7) VALUE 'DW13BCZ'.           27880002
               10  FILLER           PIC X(7) VALUE 'DW13BYZ'.           27890002
               10  FILLER           PIC X(7) VALUE 'DW13B7Z'.           27900002
               10  FILLER           PIC X(7) VALUE 'DW13B8Z'.           27910002
               10  FILLER           PIC X(7) VALUE 'DW13B9Z'.           27920002
               10  FILLER           PIC X(7) VALUE 'DW139BZ'.           27930002
               10  FILLER           PIC X(7) VALUE 'DW139CZ'.           27940002
               10  FILLER           PIC X(7) VALUE 'DW139YZ'.           27950002
               10  FILLER           PIC X(7) VALUE 'DW1397Z'.           27960002
               10  FILLER           PIC X(7) VALUE 'DW1398Z'.           27970002
               10  FILLER           PIC X(7) VALUE 'DW1399Z'.           27980002
               10  FILLER           PIC X(7) VALUE 'DW16BBZ'.           27990002
               10  FILLER           PIC X(7) VALUE 'DW16BCZ'.           28000002
               10  FILLER           PIC X(7) VALUE 'DW16BYZ'.           28010002
               10  FILLER           PIC X(7) VALUE 'DW16B7Z'.           28020002
               10  FILLER           PIC X(7) VALUE 'DW16B8Z'.           28030002
               10  FILLER           PIC X(7) VALUE 'DW16B9Z'.           28040002
               10  FILLER           PIC X(7) VALUE 'DW169BZ'.           28050002
               10  FILLER           PIC X(7) VALUE 'DW169CZ'.           28060002
               10  FILLER           PIC X(7) VALUE 'DW169YZ'.           28070002
               10  FILLER           PIC X(7) VALUE 'DW1697Z'.           28080002
               10  FILLER           PIC X(7) VALUE 'DW1698Z'.           28090002
               10  FILLER           PIC X(7) VALUE 'DW1699Z'.           28100002
               10  FILLER           PIC X(7) VALUE 'D0Y0FZZ'.           28110002
               10  FILLER           PIC X(7) VALUE 'D0Y0KZZ'.           28120002
               10  FILLER           PIC X(7) VALUE 'D0Y07ZZ'.           28130002
               10  FILLER           PIC X(7) VALUE 'D0Y08ZZ'.           28140002
               10  FILLER           PIC X(7) VALUE 'D0Y1FZZ'.           28150002
               10  FILLER           PIC X(7) VALUE 'D0Y1KZZ'.           28160002
               10  FILLER           PIC X(7) VALUE 'D0Y17ZZ'.           28170002
               10  FILLER           PIC X(7) VALUE 'D0Y18ZZ'.           28180002
               10  FILLER           PIC X(7) VALUE 'D0Y6FZZ'.           28190002
               10  FILLER           PIC X(7) VALUE 'D0Y6KZZ'.           28200002
               10  FILLER           PIC X(7) VALUE 'D0Y67ZZ'.           28210002
               10  FILLER           PIC X(7) VALUE 'D0Y68ZZ'.           28220002
               10  FILLER           PIC X(7) VALUE 'D0Y7FZZ'.           28230002
               10  FILLER           PIC X(7) VALUE 'D0Y7KZZ'.           28240002
               10  FILLER           PIC X(7) VALUE 'D0Y77ZZ'.           28250002
               10  FILLER           PIC X(7) VALUE 'D0Y78ZZ'.           28260002
               10  FILLER           PIC X(7) VALUE 'D0000ZZ'.           28270002
               10  FILLER           PIC X(7) VALUE 'D0001ZZ'.           28280002
               10  FILLER           PIC X(7) VALUE 'D0002ZZ'.           28290002
               10  FILLER           PIC X(7) VALUE 'D0003ZZ'.           28300002
               10  FILLER           PIC X(7) VALUE 'D0003Z0'.           28310002
               10  FILLER           PIC X(7) VALUE 'D0004ZZ'.           28320002
               10  FILLER           PIC X(7) VALUE 'D0005ZZ'.           28330002
               10  FILLER           PIC X(7) VALUE 'D0006ZZ'.           28340002
               10  FILLER           PIC X(7) VALUE 'D0010ZZ'.           28350002
               10  FILLER           PIC X(7) VALUE 'D0011ZZ'.           28360002
               10  FILLER           PIC X(7) VALUE 'D0012ZZ'.           28370002
               10  FILLER           PIC X(7) VALUE 'D0013ZZ'.           28380002
               10  FILLER           PIC X(7) VALUE 'D0013Z0'.           28390002
               10  FILLER           PIC X(7) VALUE 'D0014ZZ'.           28400002
               10  FILLER           PIC X(7) VALUE 'D0015ZZ'.           28410002
               10  FILLER           PIC X(7) VALUE 'D0016ZZ'.           28420002
               10  FILLER           PIC X(7) VALUE 'D0060ZZ'.           28430002
               10  FILLER           PIC X(7) VALUE 'D0061ZZ'.           28440002
               10  FILLER           PIC X(7) VALUE 'D0062ZZ'.           28450002
               10  FILLER           PIC X(7) VALUE 'D0063ZZ'.           28460002
               10  FILLER           PIC X(7) VALUE 'D0063Z0'.           28470002
               10  FILLER           PIC X(7) VALUE 'D0064ZZ'.           28480002
               10  FILLER           PIC X(7) VALUE 'D0065ZZ'.           28490002
               10  FILLER           PIC X(7) VALUE 'D0066ZZ'.           28500002
               10  FILLER           PIC X(7) VALUE 'D0070ZZ'.           28510002
               10  FILLER           PIC X(7) VALUE 'D0071ZZ'.           28520002
               10  FILLER           PIC X(7) VALUE 'D0072ZZ'.           28530002
               10  FILLER           PIC X(7) VALUE 'D0073ZZ'.           28540002
               10  FILLER           PIC X(7) VALUE 'D0073Z0'.           28550002
               10  FILLER           PIC X(7) VALUE 'D0074ZZ'.           28560002
               10  FILLER           PIC X(7) VALUE 'D0075ZZ'.           28570002
               10  FILLER           PIC X(7) VALUE 'D0076ZZ'.           28580002
               10  FILLER           PIC X(7) VALUE 'D010BBZ'.           28590002
               10  FILLER           PIC X(7) VALUE 'D010BCZ'.           28600002
               10  FILLER           PIC X(7) VALUE 'D010BYZ'.           28610002
               10  FILLER           PIC X(7) VALUE 'D010B7Z'.           28620002
               10  FILLER           PIC X(7) VALUE 'D010B8Z'.           28630002
               10  FILLER           PIC X(7) VALUE 'D010B9Z'.           28640002
               10  FILLER           PIC X(7) VALUE 'D0109BZ'.           28650002
               10  FILLER           PIC X(7) VALUE 'D0109CZ'.           28660002
               10  FILLER           PIC X(7) VALUE 'D0109YZ'.           28670002
               10  FILLER           PIC X(7) VALUE 'D01097Z'.           28680002
               10  FILLER           PIC X(7) VALUE 'D01098Z'.           28690002
               10  FILLER           PIC X(7) VALUE 'D01099Z'.           28700002
               10  FILLER           PIC X(7) VALUE 'D011BBZ'.           28710002
               10  FILLER           PIC X(7) VALUE 'D011BCZ'.           28720002
               10  FILLER           PIC X(7) VALUE 'D011BYZ'.           28730002
               10  FILLER           PIC X(7) VALUE 'D011B7Z'.           28740002
               10  FILLER           PIC X(7) VALUE 'D011B8Z'.           28750002
               10  FILLER           PIC X(7) VALUE 'D011B9Z'.           28760002
               10  FILLER           PIC X(7) VALUE 'D0119BZ'.           28770002
               10  FILLER           PIC X(7) VALUE 'D0119CZ'.           28780002
               10  FILLER           PIC X(7) VALUE 'D0119YZ'.           28790002
               10  FILLER           PIC X(7) VALUE 'D01197Z'.           28800002
               10  FILLER           PIC X(7) VALUE 'D01198Z'.           28810002
               10  FILLER           PIC X(7) VALUE 'D01199Z'.           28820002
               10  FILLER           PIC X(7) VALUE 'D016BBZ'.           28830002
               10  FILLER           PIC X(7) VALUE 'D016BCZ'.           28840002
               10  FILLER           PIC X(7) VALUE 'D016BYZ'.           28850002
               10  FILLER           PIC X(7) VALUE 'D016B7Z'.           28860002
               10  FILLER           PIC X(7) VALUE 'D016B8Z'.           28870002
               10  FILLER           PIC X(7) VALUE 'D016B9Z'.           28880002
               10  FILLER           PIC X(7) VALUE 'D0169BZ'.           28890002
               10  FILLER           PIC X(7) VALUE 'D0169CZ'.           28900002
               10  FILLER           PIC X(7) VALUE 'D0169YZ'.           28910002
               10  FILLER           PIC X(7) VALUE 'D01697Z'.           28920002
               10  FILLER           PIC X(7) VALUE 'D01698Z'.           28930002
               10  FILLER           PIC X(7) VALUE 'D01699Z'.           28940002
               10  FILLER           PIC X(7) VALUE 'D017BBZ'.           28950002
               10  FILLER           PIC X(7) VALUE 'D017BCZ'.           28960002
               10  FILLER           PIC X(7) VALUE 'D017BYZ'.           28970002
               10  FILLER           PIC X(7) VALUE 'D017B7Z'.           28980002
               10  FILLER           PIC X(7) VALUE 'D017B8Z'.           28990002
               10  FILLER           PIC X(7) VALUE 'D017B9Z'.           29000002
               10  FILLER           PIC X(7) VALUE 'D0179BZ'.           29010002
               10  FILLER           PIC X(7) VALUE 'D0179CZ'.           29020002
               10  FILLER           PIC X(7) VALUE 'D0179YZ'.           29030002
               10  FILLER           PIC X(7) VALUE 'D01797Z'.           29040002
               10  FILLER           PIC X(7) VALUE 'D01798Z'.           29050002
               10  FILLER           PIC X(7) VALUE 'D01799Z'.           29060002
               10  FILLER           PIC X(7) VALUE 'D7Y0FZZ'.           29070002
               10  FILLER           PIC X(7) VALUE 'D7Y08ZZ'.           29080002
               10  FILLER           PIC X(7) VALUE 'D7Y1FZZ'.           29090002
               10  FILLER           PIC X(7) VALUE 'D7Y18ZZ'.           29100002
               10  FILLER           PIC X(7) VALUE 'D7Y2FZZ'.           29110002
               10  FILLER           PIC X(7) VALUE 'D7Y28ZZ'.           29120002
               10  FILLER           PIC X(7) VALUE 'D7Y3FZZ'.           29130002
               10  FILLER           PIC X(7) VALUE 'D7Y38ZZ'.           29140002
               10  FILLER           PIC X(7) VALUE 'D7Y4FZZ'.           29150002
               10  FILLER           PIC X(7) VALUE 'D7Y48ZZ'.           29160002
               10  FILLER           PIC X(7) VALUE 'D7Y5FZZ'.           29170002
               10  FILLER           PIC X(7) VALUE 'D7Y58ZZ'.           29180002
               10  FILLER           PIC X(7) VALUE 'D7Y6FZZ'.           29190002
               10  FILLER           PIC X(7) VALUE 'D7Y68ZZ'.           29200002
               10  FILLER           PIC X(7) VALUE 'D7Y7FZZ'.           29210002
               10  FILLER           PIC X(7) VALUE 'D7Y78ZZ'.           29220002
               10  FILLER           PIC X(7) VALUE 'D7Y8FZZ'.           29230002
               10  FILLER           PIC X(7) VALUE 'D7Y88ZZ'.           29240002
               10  FILLER           PIC X(7) VALUE 'D7000ZZ'.           29250002
               10  FILLER           PIC X(7) VALUE 'D7001ZZ'.           29260002
               10  FILLER           PIC X(7) VALUE 'D7002ZZ'.           29270002
               10  FILLER           PIC X(7) VALUE 'D7003ZZ'.           29280002
               10  FILLER           PIC X(7) VALUE 'D7003Z0'.           29290002
               10  FILLER           PIC X(7) VALUE 'D7004ZZ'.           29300002
               10  FILLER           PIC X(7) VALUE 'D7005ZZ'.           29310002
               10  FILLER           PIC X(7) VALUE 'D7006ZZ'.           29320002
               10  FILLER           PIC X(7) VALUE 'D7010ZZ'.           29330002
               10  FILLER           PIC X(7) VALUE 'D7011ZZ'.           29340002
               10  FILLER           PIC X(7) VALUE 'D7012ZZ'.           29350002
               10  FILLER           PIC X(7) VALUE 'D7013ZZ'.           29360002
               10  FILLER           PIC X(7) VALUE 'D7013Z0'.           29370002
               10  FILLER           PIC X(7) VALUE 'D7014ZZ'.           29380002
               10  FILLER           PIC X(7) VALUE 'D7015ZZ'.           29390002
               10  FILLER           PIC X(7) VALUE 'D7016ZZ'.           29400002
               10  FILLER           PIC X(7) VALUE 'D7020ZZ'.           29410002
               10  FILLER           PIC X(7) VALUE 'D7021ZZ'.           29420002
               10  FILLER           PIC X(7) VALUE 'D7022ZZ'.           29430002
               10  FILLER           PIC X(7) VALUE 'D7023ZZ'.           29440002
               10  FILLER           PIC X(7) VALUE 'D7023Z0'.           29450002
               10  FILLER           PIC X(7) VALUE 'D7024ZZ'.           29460002
               10  FILLER           PIC X(7) VALUE 'D7025ZZ'.           29470002
               10  FILLER           PIC X(7) VALUE 'D7026ZZ'.           29480002
               10  FILLER           PIC X(7) VALUE 'D7030ZZ'.           29490002
               10  FILLER           PIC X(7) VALUE 'D7031ZZ'.           29500002
               10  FILLER           PIC X(7) VALUE 'D7032ZZ'.           29510002
               10  FILLER           PIC X(7) VALUE 'D7033ZZ'.           29520002
               10  FILLER           PIC X(7) VALUE 'D7033Z0'.           29530002
               10  FILLER           PIC X(7) VALUE 'D7034ZZ'.           29540002
               10  FILLER           PIC X(7) VALUE 'D7035ZZ'.           29550002
               10  FILLER           PIC X(7) VALUE 'D7036ZZ'.           29560002
               10  FILLER           PIC X(7) VALUE 'D7040ZZ'.           29570002
               10  FILLER           PIC X(7) VALUE 'D7041ZZ'.           29580002
               10  FILLER           PIC X(7) VALUE 'D7042ZZ'.           29590002
               10  FILLER           PIC X(7) VALUE 'D7043ZZ'.           29600002
               10  FILLER           PIC X(7) VALUE 'D7043Z0'.           29610002
               10  FILLER           PIC X(7) VALUE 'D7044ZZ'.           29620002
               10  FILLER           PIC X(7) VALUE 'D7045ZZ'.           29630002
               10  FILLER           PIC X(7) VALUE 'D7046ZZ'.           29640002
               10  FILLER           PIC X(7) VALUE 'D7050ZZ'.           29650002
               10  FILLER           PIC X(7) VALUE 'D7051ZZ'.           29660002
               10  FILLER           PIC X(7) VALUE 'D7052ZZ'.           29670002
               10  FILLER           PIC X(7) VALUE 'D7053ZZ'.           29680002
               10  FILLER           PIC X(7) VALUE 'D7053Z0'.           29690002
               10  FILLER           PIC X(7) VALUE 'D7054ZZ'.           29700002
               10  FILLER           PIC X(7) VALUE 'D7055ZZ'.           29710002
               10  FILLER           PIC X(7) VALUE 'D7056ZZ'.           29720002
               10  FILLER           PIC X(7) VALUE 'D7060ZZ'.           29730002
               10  FILLER           PIC X(7) VALUE 'D7061ZZ'.           29740002
               10  FILLER           PIC X(7) VALUE 'D7062ZZ'.           29750002
               10  FILLER           PIC X(7) VALUE 'D7063ZZ'.           29760002
               10  FILLER           PIC X(7) VALUE 'D7063Z0'.           29770002
               10  FILLER           PIC X(7) VALUE 'D7064ZZ'.           29780002
               10  FILLER           PIC X(7) VALUE 'D7065ZZ'.           29790002
               10  FILLER           PIC X(7) VALUE 'D7066ZZ'.           29800002
               10  FILLER           PIC X(7) VALUE 'D7070ZZ'.           29810002
               10  FILLER           PIC X(7) VALUE 'D7071ZZ'.           29820002
               10  FILLER           PIC X(7) VALUE 'D7072ZZ'.           29830002
               10  FILLER           PIC X(7) VALUE 'D7073ZZ'.           29840002
               10  FILLER           PIC X(7) VALUE 'D7073Z0'.           29850002
               10  FILLER           PIC X(7) VALUE 'D7074ZZ'.           29860002
               10  FILLER           PIC X(7) VALUE 'D7075ZZ'.           29870002
               10  FILLER           PIC X(7) VALUE 'D7076ZZ'.           29880002
               10  FILLER           PIC X(7) VALUE 'D7080ZZ'.           29890002
               10  FILLER           PIC X(7) VALUE 'D7081ZZ'.           29900002
               10  FILLER           PIC X(7) VALUE 'D7082ZZ'.           29910002
               10  FILLER           PIC X(7) VALUE 'D7083ZZ'.           29920002
               10  FILLER           PIC X(7) VALUE 'D7083Z0'.           29930002
               10  FILLER           PIC X(7) VALUE 'D7084ZZ'.           29940002
               10  FILLER           PIC X(7) VALUE 'D7085ZZ'.           29950002
               10  FILLER           PIC X(7) VALUE 'D7086ZZ'.           29960002
               10  FILLER           PIC X(7) VALUE 'D710BBZ'.           29970002
               10  FILLER           PIC X(7) VALUE 'D710BCZ'.           29980002
               10  FILLER           PIC X(7) VALUE 'D710BYZ'.           29990002
               10  FILLER           PIC X(7) VALUE 'D710B7Z'.           30000002
               10  FILLER           PIC X(7) VALUE 'D710B8Z'.           30010002
               10  FILLER           PIC X(7) VALUE 'D710B9Z'.           30020002
               10  FILLER           PIC X(7) VALUE 'D7109BZ'.           30030002
               10  FILLER           PIC X(7) VALUE 'D7109CZ'.           30040002
               10  FILLER           PIC X(7) VALUE 'D7109YZ'.           30050002
               10  FILLER           PIC X(7) VALUE 'D71097Z'.           30060002
               10  FILLER           PIC X(7) VALUE 'D71098Z'.           30070002
               10  FILLER           PIC X(7) VALUE 'D71099Z'.           30080002
               10  FILLER           PIC X(7) VALUE 'D711BBZ'.           30090002
               10  FILLER           PIC X(7) VALUE 'D711BCZ'.           30100002
               10  FILLER           PIC X(7) VALUE 'D711BYZ'.           30110002
               10  FILLER           PIC X(7) VALUE 'D711B7Z'.           30120002
               10  FILLER           PIC X(7) VALUE 'D711B8Z'.           30130002
               10  FILLER           PIC X(7) VALUE 'D711B9Z'.           30140002
               10  FILLER           PIC X(7) VALUE 'D7119BZ'.           30150002
               10  FILLER           PIC X(7) VALUE 'D7119CZ'.           30160002
               10  FILLER           PIC X(7) VALUE 'D7119YZ'.           30170002
               10  FILLER           PIC X(7) VALUE 'D71197Z'.           30180002
               10  FILLER           PIC X(7) VALUE 'D71198Z'.           30190002
               10  FILLER           PIC X(7) VALUE 'D71199Z'.           30200002
               10  FILLER           PIC X(7) VALUE 'D712BBZ'.           30210002
               10  FILLER           PIC X(7) VALUE 'D712BCZ'.           30220002
               10  FILLER           PIC X(7) VALUE 'D712BYZ'.           30230002
               10  FILLER           PIC X(7) VALUE 'D712B7Z'.           30240002
               10  FILLER           PIC X(7) VALUE 'D712B8Z'.           30250002
               10  FILLER           PIC X(7) VALUE 'D712B9Z'.           30260002
               10  FILLER           PIC X(7) VALUE 'D7129BZ'.           30270002
               10  FILLER           PIC X(7) VALUE 'D7129CZ'.           30280002
               10  FILLER           PIC X(7) VALUE 'D7129YZ'.           30290002
               10  FILLER           PIC X(7) VALUE 'D71297Z'.           30300002
               10  FILLER           PIC X(7) VALUE 'D71298Z'.           30310002
               10  FILLER           PIC X(7) VALUE 'D71299Z'.           30320002
               10  FILLER           PIC X(7) VALUE 'D713BBZ'.           30330002
               10  FILLER           PIC X(7) VALUE 'D713BCZ'.           30340002
               10  FILLER           PIC X(7) VALUE 'D713BYZ'.           30350002
               10  FILLER           PIC X(7) VALUE 'D713B7Z'.           30360002
               10  FILLER           PIC X(7) VALUE 'D713B8Z'.           30370002
               10  FILLER           PIC X(7) VALUE 'D713B9Z'.           30380002
               10  FILLER           PIC X(7) VALUE 'D7139BZ'.           30390002
               10  FILLER           PIC X(7) VALUE 'D7139CZ'.           30400002
               10  FILLER           PIC X(7) VALUE 'D7139YZ'.           30410002
               10  FILLER           PIC X(7) VALUE 'D71397Z'.           30420002
               10  FILLER           PIC X(7) VALUE 'D71398Z'.           30430002
               10  FILLER           PIC X(7) VALUE 'D71399Z'.           30440002
               10  FILLER           PIC X(7) VALUE 'D714BBZ'.           30450002
               10  FILLER           PIC X(7) VALUE 'D714BCZ'.           30460002
               10  FILLER           PIC X(7) VALUE 'D714BYZ'.           30470002
               10  FILLER           PIC X(7) VALUE 'D714B7Z'.           30480002
               10  FILLER           PIC X(7) VALUE 'D714B8Z'.           30490002
               10  FILLER           PIC X(7) VALUE 'D714B9Z'.           30500002
               10  FILLER           PIC X(7) VALUE 'D7149BZ'.           30510002
               10  FILLER           PIC X(7) VALUE 'D7149CZ'.           30520002
               10  FILLER           PIC X(7) VALUE 'D7149YZ'.           30530002
               10  FILLER           PIC X(7) VALUE 'D71497Z'.           30540002
               10  FILLER           PIC X(7) VALUE 'D71498Z'.           30550002
               10  FILLER           PIC X(7) VALUE 'D71499Z'.           30560002
               10  FILLER           PIC X(7) VALUE 'D715BBZ'.           30570002
               10  FILLER           PIC X(7) VALUE 'D715BCZ'.           30580002
               10  FILLER           PIC X(7) VALUE 'D715BYZ'.           30590002
               10  FILLER           PIC X(7) VALUE 'D715B7Z'.           30600002
               10  FILLER           PIC X(7) VALUE 'D715B8Z'.           30610002
               10  FILLER           PIC X(7) VALUE 'D715B9Z'.           30620002
               10  FILLER           PIC X(7) VALUE 'D7159BZ'.           30630002
               10  FILLER           PIC X(7) VALUE 'D7159CZ'.           30640002
               10  FILLER           PIC X(7) VALUE 'D7159YZ'.           30650002
               10  FILLER           PIC X(7) VALUE 'D71597Z'.           30660002
               10  FILLER           PIC X(7) VALUE 'D71598Z'.           30670002
               10  FILLER           PIC X(7) VALUE 'D71599Z'.           30680002
               10  FILLER           PIC X(7) VALUE 'D716BBZ'.           30690002
               10  FILLER           PIC X(7) VALUE 'D716BCZ'.           30700002
               10  FILLER           PIC X(7) VALUE 'D716BYZ'.           30710002
               10  FILLER           PIC X(7) VALUE 'D716B7Z'.           30720002
               10  FILLER           PIC X(7) VALUE 'D716B8Z'.           30730002
               10  FILLER           PIC X(7) VALUE 'D716B9Z'.           30740002
               10  FILLER           PIC X(7) VALUE 'D7169BZ'.           30750002
               10  FILLER           PIC X(7) VALUE 'D7169CZ'.           30760002
               10  FILLER           PIC X(7) VALUE 'D7169YZ'.           30770002
               10  FILLER           PIC X(7) VALUE 'D71697Z'.           30780002
               10  FILLER           PIC X(7) VALUE 'D71698Z'.           30790002
               10  FILLER           PIC X(7) VALUE 'D71699Z'.           30800002
               10  FILLER           PIC X(7) VALUE 'D717BBZ'.           30810002
               10  FILLER           PIC X(7) VALUE 'D717BCZ'.           30820002
               10  FILLER           PIC X(7) VALUE 'D717BYZ'.           30830002
               10  FILLER           PIC X(7) VALUE 'D717B7Z'.           30840002
               10  FILLER           PIC X(7) VALUE 'D717B8Z'.           30850002
               10  FILLER           PIC X(7) VALUE 'D717B9Z'.           30860002
               10  FILLER           PIC X(7) VALUE 'D7179BZ'.           30870002
               10  FILLER           PIC X(7) VALUE 'D7179CZ'.           30880002
               10  FILLER           PIC X(7) VALUE 'D7179YZ'.           30890002
               10  FILLER           PIC X(7) VALUE 'D71797Z'.           30900002
               10  FILLER           PIC X(7) VALUE 'D71798Z'.           30910002
               10  FILLER           PIC X(7) VALUE 'D71799Z'.           30920002
               10  FILLER           PIC X(7) VALUE 'D718BBZ'.           30930002
               10  FILLER           PIC X(7) VALUE 'D718BCZ'.           30940002
               10  FILLER           PIC X(7) VALUE 'D718BYZ'.           30950002
               10  FILLER           PIC X(7) VALUE 'D718B7Z'.           30960002
               10  FILLER           PIC X(7) VALUE 'D718B8Z'.           30970002
               10  FILLER           PIC X(7) VALUE 'D718B9Z'.           30980002
               10  FILLER           PIC X(7) VALUE 'D7189BZ'.           30990002
               10  FILLER           PIC X(7) VALUE 'D7189CZ'.           31000002
               10  FILLER           PIC X(7) VALUE 'D7189YZ'.           31010002
               10  FILLER           PIC X(7) VALUE 'D71897Z'.           31020002
               10  FILLER           PIC X(7) VALUE 'D71898Z'.           31030002
               10  FILLER           PIC X(7) VALUE 'D71899Z'.           31040002
               10  FILLER           PIC X(7) VALUE 'D8Y0FZZ'.           31050002
               10  FILLER           PIC X(7) VALUE 'D8Y07ZZ'.           31060002
               10  FILLER           PIC X(7) VALUE 'D8Y08ZZ'.           31070002
               10  FILLER           PIC X(7) VALUE 'D8000ZZ'.           31080002
               10  FILLER           PIC X(7) VALUE 'D8001ZZ'.           31090002
               10  FILLER           PIC X(7) VALUE 'D8002ZZ'.           31100002
               10  FILLER           PIC X(7) VALUE 'D8003ZZ'.           31110002
               10  FILLER           PIC X(7) VALUE 'D8003Z0'.           31120002
               10  FILLER           PIC X(7) VALUE 'D8004ZZ'.           31130002
               10  FILLER           PIC X(7) VALUE 'D8005ZZ'.           31140002
               10  FILLER           PIC X(7) VALUE 'D8006ZZ'.           31150002
               10  FILLER           PIC X(7) VALUE 'D810BBZ'.           31160002
               10  FILLER           PIC X(7) VALUE 'D810BCZ'.           31170002
               10  FILLER           PIC X(7) VALUE 'D810BYZ'.           31180002
               10  FILLER           PIC X(7) VALUE 'D810B7Z'.           31190002
               10  FILLER           PIC X(7) VALUE 'D810B8Z'.           31200002
               10  FILLER           PIC X(7) VALUE 'D810B9Z'.           31210002
               10  FILLER           PIC X(7) VALUE 'D8109BZ'.           31220002
               10  FILLER           PIC X(7) VALUE 'D8109CZ'.           31230002
               10  FILLER           PIC X(7) VALUE 'D8109YZ'.           31240002
               10  FILLER           PIC X(7) VALUE 'D81097Z'.           31250002
               10  FILLER           PIC X(7) VALUE 'D81098Z'.           31260002
               10  FILLER           PIC X(7) VALUE 'D81099Z'.           31270002
               10  FILLER           PIC X(7) VALUE 'D9YBCZZ'.           31280002
               10  FILLER           PIC X(7) VALUE 'D9YBFZZ'.           31290002
               10  FILLER           PIC X(7) VALUE 'D9YB7ZZ'.           31300002
               10  FILLER           PIC X(7) VALUE 'D9YB8ZZ'.           31310002
               10  FILLER           PIC X(7) VALUE 'D9YCCZZ'.           31320002
               10  FILLER           PIC X(7) VALUE 'D9YCFZZ'.           31330002
               10  FILLER           PIC X(7) VALUE 'D9YDCZZ'.           31340002
               10  FILLER           PIC X(7) VALUE 'D9YDFZZ'.           31350002
               10  FILLER           PIC X(7) VALUE 'D9YD7ZZ'.           31360002
               10  FILLER           PIC X(7) VALUE 'D9YD8ZZ'.           31370002
               10  FILLER           PIC X(7) VALUE 'D9YF7ZZ'.           31380002
               10  FILLER           PIC X(7) VALUE 'D9YF8ZZ'.           31390002
               10  FILLER           PIC X(7) VALUE 'D9Y0FZZ'.           31400002
               10  FILLER           PIC X(7) VALUE 'D9Y07ZZ'.           31410002
               10  FILLER           PIC X(7) VALUE 'D9Y08ZZ'.           31420002
               10  FILLER           PIC X(7) VALUE 'D9Y1FZZ'.           31430002
               10  FILLER           PIC X(7) VALUE 'D9Y17ZZ'.           31440002
               10  FILLER           PIC X(7) VALUE 'D9Y18ZZ'.           31450002
               10  FILLER           PIC X(7) VALUE 'D9Y37ZZ'.           31460002
               10  FILLER           PIC X(7) VALUE 'D9Y38ZZ'.           31470002
               10  FILLER           PIC X(7) VALUE 'D9Y4CZZ'.           31480002
               10  FILLER           PIC X(7) VALUE 'D9Y4FZZ'.           31490002
               10  FILLER           PIC X(7) VALUE 'D9Y47ZZ'.           31500002
               10  FILLER           PIC X(7) VALUE 'D9Y48ZZ'.           31510002
               10  FILLER           PIC X(7) VALUE 'D9Y5FZZ'.           31520002
               10  FILLER           PIC X(7) VALUE 'D9Y57ZZ'.           31530002
               10  FILLER           PIC X(7) VALUE 'D9Y58ZZ'.           31540002
               10  FILLER           PIC X(7) VALUE 'D9Y6FZZ'.           31550002
               10  FILLER           PIC X(7) VALUE 'D9Y67ZZ'.           31560002
               10  FILLER           PIC X(7) VALUE 'D9Y68ZZ'.           31570002
               10  FILLER           PIC X(7) VALUE 'D9Y7FZZ'.           31580002
               10  FILLER           PIC X(7) VALUE 'D9Y77ZZ'.           31590002
               10  FILLER           PIC X(7) VALUE 'D9Y78ZZ'.           31600002
               10  FILLER           PIC X(7) VALUE 'D9Y8FZZ'.           31610002
               10  FILLER           PIC X(7) VALUE 'D9Y87ZZ'.           31620002
               10  FILLER           PIC X(7) VALUE 'D9Y88ZZ'.           31630002
               10  FILLER           PIC X(7) VALUE 'D9Y9FZZ'.           31640002
               10  FILLER           PIC X(7) VALUE 'D9Y97ZZ'.           31650002
               10  FILLER           PIC X(7) VALUE 'D9Y98ZZ'.           31660002
               10  FILLER           PIC X(7) VALUE 'D90B0ZZ'.           31670002
               10  FILLER           PIC X(7) VALUE 'D90B1ZZ'.           31680002
               10  FILLER           PIC X(7) VALUE 'D90B2ZZ'.           31690002
               10  FILLER           PIC X(7) VALUE 'D90B3ZZ'.           31700002
               10  FILLER           PIC X(7) VALUE 'D90B3Z0'.           31710002
               10  FILLER           PIC X(7) VALUE 'D90B4ZZ'.           31720002
               10  FILLER           PIC X(7) VALUE 'D90B5ZZ'.           31730002
               10  FILLER           PIC X(7) VALUE 'D90B6ZZ'.           31740002
               10  FILLER           PIC X(7) VALUE 'D90D0ZZ'.           31750002
               10  FILLER           PIC X(7) VALUE 'D90D1ZZ'.           31760002
               10  FILLER           PIC X(7) VALUE 'D90D2ZZ'.           31770002
               10  FILLER           PIC X(7) VALUE 'D90D3ZZ'.           31780002
               10  FILLER           PIC X(7) VALUE 'D90D3Z0'.           31790002
               10  FILLER           PIC X(7) VALUE 'D90D4ZZ'.           31800002
               10  FILLER           PIC X(7) VALUE 'D90D5ZZ'.           31810002
               10  FILLER           PIC X(7) VALUE 'D90D6ZZ'.           31820002
               10  FILLER           PIC X(7) VALUE 'D90F0ZZ'.           31830002
               10  FILLER           PIC X(7) VALUE 'D90F1ZZ'.           31840002
               10  FILLER           PIC X(7) VALUE 'D90F2ZZ'.           31850002
               10  FILLER           PIC X(7) VALUE 'D90F3ZZ'.           31860002
               10  FILLER           PIC X(7) VALUE 'D90F3Z0'.           31870002
               10  FILLER           PIC X(7) VALUE 'D90F4ZZ'.           31880002
               10  FILLER           PIC X(7) VALUE 'D90F5ZZ'.           31890002
               10  FILLER           PIC X(7) VALUE 'D90F6ZZ'.           31900002
               10  FILLER           PIC X(7) VALUE 'D9000ZZ'.           31910002
               10  FILLER           PIC X(7) VALUE 'D9001ZZ'.           31920002
               10  FILLER           PIC X(7) VALUE 'D9002ZZ'.           31930002
               10  FILLER           PIC X(7) VALUE 'D9003ZZ'.           31940002
               10  FILLER           PIC X(7) VALUE 'D9003Z0'.           31950002
               10  FILLER           PIC X(7) VALUE 'D9004ZZ'.           31960002
               10  FILLER           PIC X(7) VALUE 'D9005ZZ'.           31970002
               10  FILLER           PIC X(7) VALUE 'D9006ZZ'.           31980002
               10  FILLER           PIC X(7) VALUE 'D9010ZZ'.           31990002
               10  FILLER           PIC X(7) VALUE 'D9011ZZ'.           32000002
               10  FILLER           PIC X(7) VALUE 'D9012ZZ'.           32010002
               10  FILLER           PIC X(7) VALUE 'D9013ZZ'.           32020002
               10  FILLER           PIC X(7) VALUE 'D9013Z0'.           32030002
               10  FILLER           PIC X(7) VALUE 'D9014ZZ'.           32040002
               10  FILLER           PIC X(7) VALUE 'D9015ZZ'.           32050002
               10  FILLER           PIC X(7) VALUE 'D9016ZZ'.           32060002
               10  FILLER           PIC X(7) VALUE 'D9030ZZ'.           32070002
               10  FILLER           PIC X(7) VALUE 'D9031ZZ'.           32080002
               10  FILLER           PIC X(7) VALUE 'D9032ZZ'.           32090002
               10  FILLER           PIC X(7) VALUE 'D9033ZZ'.           32100002
               10  FILLER           PIC X(7) VALUE 'D9033Z0'.           32110002
               10  FILLER           PIC X(7) VALUE 'D9034ZZ'.           32120002
               10  FILLER           PIC X(7) VALUE 'D9035ZZ'.           32130002
               10  FILLER           PIC X(7) VALUE 'D9036ZZ'.           32140002
               10  FILLER           PIC X(7) VALUE 'D9040ZZ'.           32150002
               10  FILLER           PIC X(7) VALUE 'D9041ZZ'.           32160002
               10  FILLER           PIC X(7) VALUE 'D9042ZZ'.           32170002
               10  FILLER           PIC X(7) VALUE 'D9043ZZ'.           32180002
               10  FILLER           PIC X(7) VALUE 'D9043Z0'.           32190002
               10  FILLER           PIC X(7) VALUE 'D9044ZZ'.           32200002
               10  FILLER           PIC X(7) VALUE 'D9045ZZ'.           32210002
               10  FILLER           PIC X(7) VALUE 'D9046ZZ'.           32220002
               10  FILLER           PIC X(7) VALUE 'D9050ZZ'.           32230002
               10  FILLER           PIC X(7) VALUE 'D9051ZZ'.           32240002
               10  FILLER           PIC X(7) VALUE 'D9052ZZ'.           32250002
               10  FILLER           PIC X(7) VALUE 'D9053ZZ'.           32260002
               10  FILLER           PIC X(7) VALUE 'D9053Z0'.           32270002
               10  FILLER           PIC X(7) VALUE 'D9054ZZ'.           32280002
               10  FILLER           PIC X(7) VALUE 'D9055ZZ'.           32290002
               10  FILLER           PIC X(7) VALUE 'D9056ZZ'.           32300002
               10  FILLER           PIC X(7) VALUE 'D9060ZZ'.           32310002
               10  FILLER           PIC X(7) VALUE 'D9061ZZ'.           32320002
               10  FILLER           PIC X(7) VALUE 'D9062ZZ'.           32330002
               10  FILLER           PIC X(7) VALUE 'D9063ZZ'.           32340002
               10  FILLER           PIC X(7) VALUE 'D9063Z0'.           32350002
               10  FILLER           PIC X(7) VALUE 'D9064ZZ'.           32360002
               10  FILLER           PIC X(7) VALUE 'D9065ZZ'.           32370002
               10  FILLER           PIC X(7) VALUE 'D9066ZZ'.           32380002
               10  FILLER           PIC X(7) VALUE 'D9070ZZ'.           32390002
               10  FILLER           PIC X(7) VALUE 'D9071ZZ'.           32400002
               10  FILLER           PIC X(7) VALUE 'D9072ZZ'.           32410002
               10  FILLER           PIC X(7) VALUE 'D9073ZZ'.           32420002
               10  FILLER           PIC X(7) VALUE 'D9073Z0'.           32430002
               10  FILLER           PIC X(7) VALUE 'D9074ZZ'.           32440002
               10  FILLER           PIC X(7) VALUE 'D9075ZZ'.           32450002
               10  FILLER           PIC X(7) VALUE 'D9076ZZ'.           32460002
               10  FILLER           PIC X(7) VALUE 'D9080ZZ'.           32470002
               10  FILLER           PIC X(7) VALUE 'D9081ZZ'.           32480002
               10  FILLER           PIC X(7) VALUE 'D9082ZZ'.           32490002
               10  FILLER           PIC X(7) VALUE 'D9083ZZ'.           32500002
               10  FILLER           PIC X(7) VALUE 'D9083Z0'.           32510002
               10  FILLER           PIC X(7) VALUE 'D9084ZZ'.           32520002
               10  FILLER           PIC X(7) VALUE 'D9085ZZ'.           32530002
               10  FILLER           PIC X(7) VALUE 'D9086ZZ'.           32540002
               10  FILLER           PIC X(7) VALUE 'D9090ZZ'.           32550002
               10  FILLER           PIC X(7) VALUE 'D9091ZZ'.           32560002
               10  FILLER           PIC X(7) VALUE 'D9092ZZ'.           32570002
               10  FILLER           PIC X(7) VALUE 'D9093ZZ'.           32580002
               10  FILLER           PIC X(7) VALUE 'D9093Z0'.           32590002
               10  FILLER           PIC X(7) VALUE 'D9094ZZ'.           32600002
               10  FILLER           PIC X(7) VALUE 'D9095ZZ'.           32610002
               10  FILLER           PIC X(7) VALUE 'D9096ZZ'.           32620002
               10  FILLER           PIC X(7) VALUE 'D91BBBZ'.           32630002
               10  FILLER           PIC X(7) VALUE 'D91BBCZ'.           32640002
               10  FILLER           PIC X(7) VALUE 'D91BBYZ'.           32650002
               10  FILLER           PIC X(7) VALUE 'D91BB7Z'.           32660002
               10  FILLER           PIC X(7) VALUE 'D91BB8Z'.           32670002
               10  FILLER           PIC X(7) VALUE 'D91BB9Z'.           32680002
               10  FILLER           PIC X(7) VALUE 'D91B9BZ'.           32690002
               10  FILLER           PIC X(7) VALUE 'D91B9CZ'.           32700002
               10  FILLER           PIC X(7) VALUE 'D91B9YZ'.           32710002
               10  FILLER           PIC X(7) VALUE 'D91B97Z'.           32720002
               10  FILLER           PIC X(7) VALUE 'D91B98Z'.           32730002
               10  FILLER           PIC X(7) VALUE 'D91B99Z'.           32740002
               10  FILLER           PIC X(7) VALUE 'D91DBBZ'.           32750002
               10  FILLER           PIC X(7) VALUE 'D91DBCZ'.           32760002
               10  FILLER           PIC X(7) VALUE 'D91DBYZ'.           32770002
               10  FILLER           PIC X(7) VALUE 'D91DB7Z'.           32780002
               10  FILLER           PIC X(7) VALUE 'D91DB8Z'.           32790002
               10  FILLER           PIC X(7) VALUE 'D91DB9Z'.           32800002
               10  FILLER           PIC X(7) VALUE 'D91D9BZ'.           32810002
               10  FILLER           PIC X(7) VALUE 'D91D9CZ'.           32820002
               10  FILLER           PIC X(7) VALUE 'D91D9YZ'.           32830002
               10  FILLER           PIC X(7) VALUE 'D91D97Z'.           32840002
               10  FILLER           PIC X(7) VALUE 'D91D98Z'.           32850002
               10  FILLER           PIC X(7) VALUE 'D91D99Z'.           32860002
               10  FILLER           PIC X(7) VALUE 'D91FBBZ'.           32870002
               10  FILLER           PIC X(7) VALUE 'D91FBCZ'.           32880002
               10  FILLER           PIC X(7) VALUE 'D91FBYZ'.           32890002
               10  FILLER           PIC X(7) VALUE 'D91FB7Z'.           32900002
               10  FILLER           PIC X(7) VALUE 'D91FB8Z'.           32910002
               10  FILLER           PIC X(7) VALUE 'D91FB9Z'.           32920002
               10  FILLER           PIC X(7) VALUE 'D91F9BZ'.           32930002
               10  FILLER           PIC X(7) VALUE 'D91F9CZ'.           32940002
               10  FILLER           PIC X(7) VALUE 'D91F9YZ'.           32950002
               10  FILLER           PIC X(7) VALUE 'D91F97Z'.           32960002
               10  FILLER           PIC X(7) VALUE 'D91F98Z'.           32970002
               10  FILLER           PIC X(7) VALUE 'D91F99Z'.           32980002
               10  FILLER           PIC X(7) VALUE 'D910BBZ'.           32990002
               10  FILLER           PIC X(7) VALUE 'D910BCZ'.           33000002
               10  FILLER           PIC X(7) VALUE 'D910BYZ'.           33010002
               10  FILLER           PIC X(7) VALUE 'D910B7Z'.           33020002
               10  FILLER           PIC X(7) VALUE 'D910B8Z'.           33030002
               10  FILLER           PIC X(7) VALUE 'D910B9Z'.           33040002
               10  FILLER           PIC X(7) VALUE 'D9109BZ'.           33050002
               10  FILLER           PIC X(7) VALUE 'D9109CZ'.           33060002
               10  FILLER           PIC X(7) VALUE 'D9109YZ'.           33070002
               10  FILLER           PIC X(7) VALUE 'D91097Z'.           33080002
               10  FILLER           PIC X(7) VALUE 'D91098Z'.           33090002
               10  FILLER           PIC X(7) VALUE 'D91099Z'.           33100002
               10  FILLER           PIC X(7) VALUE 'D911BBZ'.           33110002
               10  FILLER           PIC X(7) VALUE 'D911BCZ'.           33120002
               10  FILLER           PIC X(7) VALUE 'D911BYZ'.           33130002
               10  FILLER           PIC X(7) VALUE 'D911B7Z'.           33140002
               10  FILLER           PIC X(7) VALUE 'D911B8Z'.           33150002
               10  FILLER           PIC X(7) VALUE 'D911B9Z'.           33160002
               10  FILLER           PIC X(7) VALUE 'D9119BZ'.           33170002
               10  FILLER           PIC X(7) VALUE 'D9119CZ'.           33180002
               10  FILLER           PIC X(7) VALUE 'D9119YZ'.           33190002
               10  FILLER           PIC X(7) VALUE 'D91197Z'.           33200002
               10  FILLER           PIC X(7) VALUE 'D91198Z'.           33210002
               10  FILLER           PIC X(7) VALUE 'D91199Z'.           33220002
               10  FILLER           PIC X(7) VALUE 'D913BBZ'.           33230002
               10  FILLER           PIC X(7) VALUE 'D913BCZ'.           33240002
               10  FILLER           PIC X(7) VALUE 'D913BYZ'.           33250002
               10  FILLER           PIC X(7) VALUE 'D913B7Z'.           33260002
               10  FILLER           PIC X(7) VALUE 'D913B8Z'.           33270002
               10  FILLER           PIC X(7) VALUE 'D913B9Z'.           33280002
               10  FILLER           PIC X(7) VALUE 'D9139BZ'.           33290002
               10  FILLER           PIC X(7) VALUE 'D9139CZ'.           33300002
               10  FILLER           PIC X(7) VALUE 'D9139YZ'.           33310002
               10  FILLER           PIC X(7) VALUE 'D91397Z'.           33320002
               10  FILLER           PIC X(7) VALUE 'D91398Z'.           33330002
               10  FILLER           PIC X(7) VALUE 'D91399Z'.           33340002
               10  FILLER           PIC X(7) VALUE 'D914BBZ'.           33350002
               10  FILLER           PIC X(7) VALUE 'D914BCZ'.           33360002
               10  FILLER           PIC X(7) VALUE 'D914BYZ'.           33370002
               10  FILLER           PIC X(7) VALUE 'D914B7Z'.           33380002
               10  FILLER           PIC X(7) VALUE 'D914B8Z'.           33390002
               10  FILLER           PIC X(7) VALUE 'D914B9Z'.           33400002
               10  FILLER           PIC X(7) VALUE 'D9149BZ'.           33410002
               10  FILLER           PIC X(7) VALUE 'D9149CZ'.           33420002
               10  FILLER           PIC X(7) VALUE 'D9149YZ'.           33430002
               10  FILLER           PIC X(7) VALUE 'D91497Z'.           33440002
               10  FILLER           PIC X(7) VALUE 'D91498Z'.           33450002
               10  FILLER           PIC X(7) VALUE 'D91499Z'.           33460002
               10  FILLER           PIC X(7) VALUE 'D915BBZ'.           33470002
               10  FILLER           PIC X(7) VALUE 'D915BCZ'.           33480002
               10  FILLER           PIC X(7) VALUE 'D915BYZ'.           33490002
               10  FILLER           PIC X(7) VALUE 'D915B7Z'.           33500002
               10  FILLER           PIC X(7) VALUE 'D915B8Z'.           33510002
               10  FILLER           PIC X(7) VALUE 'D915B9Z'.           33520002
               10  FILLER           PIC X(7) VALUE 'D9159BZ'.           33530002
               10  FILLER           PIC X(7) VALUE 'D9159CZ'.           33540002
               10  FILLER           PIC X(7) VALUE 'D9159YZ'.           33550002
               10  FILLER           PIC X(7) VALUE 'D91597Z'.           33560002
               10  FILLER           PIC X(7) VALUE 'D91598Z'.           33570002
               10  FILLER           PIC X(7) VALUE 'D91599Z'.           33580002
               10  FILLER           PIC X(7) VALUE 'D916BBZ'.           33590002
               10  FILLER           PIC X(7) VALUE 'D916BCZ'.           33600002
               10  FILLER           PIC X(7) VALUE 'D916BYZ'.           33610002
               10  FILLER           PIC X(7) VALUE 'D916B7Z'.           33620002
               10  FILLER           PIC X(7) VALUE 'D916B8Z'.           33630002
               10  FILLER           PIC X(7) VALUE 'D916B9Z'.           33640002
               10  FILLER           PIC X(7) VALUE 'D9169BZ'.           33650002
               10  FILLER           PIC X(7) VALUE 'D9169CZ'.           33660002
               10  FILLER           PIC X(7) VALUE 'D9169YZ'.           33670002
               10  FILLER           PIC X(7) VALUE 'D91697Z'.           33680002
               10  FILLER           PIC X(7) VALUE 'D91698Z'.           33690002
               10  FILLER           PIC X(7) VALUE 'D91699Z'.           33700002
               10  FILLER           PIC X(7) VALUE 'D917BBZ'.           33710002
               10  FILLER           PIC X(7) VALUE 'D917BCZ'.           33720002
               10  FILLER           PIC X(7) VALUE 'D917BYZ'.           33730002
               10  FILLER           PIC X(7) VALUE 'D917B7Z'.           33740002
               10  FILLER           PIC X(7) VALUE 'D917B8Z'.           33750002
               10  FILLER           PIC X(7) VALUE 'D917B9Z'.           33760002
               10  FILLER           PIC X(7) VALUE 'D9179BZ'.           33770002
               10  FILLER           PIC X(7) VALUE 'D9179CZ'.           33780002
               10  FILLER           PIC X(7) VALUE 'D9179YZ'.           33790002
               10  FILLER           PIC X(7) VALUE 'D91797Z'.           33800002
               10  FILLER           PIC X(7) VALUE 'D91798Z'.           33810002
               10  FILLER           PIC X(7) VALUE 'D91799Z'.           33820002
               10  FILLER           PIC X(7) VALUE 'D918BBZ'.           33830002
               10  FILLER           PIC X(7) VALUE 'D918BCZ'.           33840002
               10  FILLER           PIC X(7) VALUE 'D918BYZ'.           33850002
               10  FILLER           PIC X(7) VALUE 'D918B7Z'.           33860002
               10  FILLER           PIC X(7) VALUE 'D918B8Z'.           33870002
               10  FILLER           PIC X(7) VALUE 'D918B9Z'.           33880002
               10  FILLER           PIC X(7) VALUE 'D9189BZ'.           33890002
               10  FILLER           PIC X(7) VALUE 'D9189CZ'.           33900002
               10  FILLER           PIC X(7) VALUE 'D9189YZ'.           33910002
               10  FILLER           PIC X(7) VALUE 'D91897Z'.           33920002
               10  FILLER           PIC X(7) VALUE 'D91898Z'.           33930002
               10  FILLER           PIC X(7) VALUE 'D91899Z'.           33940002
               10  FILLER           PIC X(7) VALUE 'D919BBZ'.           33950002
               10  FILLER           PIC X(7) VALUE 'D919BCZ'.           33960002
               10  FILLER           PIC X(7) VALUE 'D919BYZ'.           33970002
               10  FILLER           PIC X(7) VALUE 'D919B7Z'.           33980002
               10  FILLER           PIC X(7) VALUE 'D919B8Z'.           33990002
               10  FILLER           PIC X(7) VALUE 'D919B9Z'.           34000002
               10  FILLER           PIC X(7) VALUE 'D9199BZ'.           34010002
               10  FILLER           PIC X(7) VALUE 'D9199CZ'.           34020002
               10  FILLER           PIC X(7) VALUE 'D9199YZ'.           34030002
               10  FILLER           PIC X(7) VALUE 'D91997Z'.           34040002
               10  FILLER           PIC X(7) VALUE 'D91998Z'.           34050002
               10  FILLER           PIC X(7) VALUE 'D91999Z'.           34060002
               10  FILLER           PIC X(7) VALUE 'XW033B3'.           34070002
               10  FILLER           PIC X(7) VALUE 'XW043B3'.           34080002
               10  FILLER           PIC X(7) VALUE '0BHK01Z'.           34090002
               10  FILLER           PIC X(7) VALUE '0BHK31Z'.           34100002
               10  FILLER           PIC X(7) VALUE '0BHK41Z'.           34110002
               10  FILLER           PIC X(7) VALUE '0BHK71Z'.           34120002
               10  FILLER           PIC X(7) VALUE '0BHK81Z'.           34130002
               10  FILLER           PIC X(7) VALUE '0BHL01Z'.           34140002
               10  FILLER           PIC X(7) VALUE '0BHL31Z'.           34150002
               10  FILLER           PIC X(7) VALUE '0BHL41Z'.           34160002
               10  FILLER           PIC X(7) VALUE '0BHL71Z'.           34170002
               10  FILLER           PIC X(7) VALUE '0BHL81Z'.           34180002
               10  FILLER           PIC X(7) VALUE '0BH001Z'.           34190002
               10  FILLER           PIC X(7) VALUE '0BH031Z'.           34200002
               10  FILLER           PIC X(7) VALUE '0BH041Z'.           34210002
               10  FILLER           PIC X(7) VALUE '0BH071Z'.           34220002
               10  FILLER           PIC X(7) VALUE '0BH081Z'.           34230002
               10  FILLER           PIC X(7) VALUE '0CH7X1Z'.           34240002
               10  FILLER           PIC X(7) VALUE '0CH701Z'.           34250002
               10  FILLER           PIC X(7) VALUE '0CH731Z'.           34260002
               10  FILLER           PIC X(7) VALUE '0DHP01Z'.           34270002
               10  FILLER           PIC X(7) VALUE '0DHP31Z'.           34280002
               10  FILLER           PIC X(7) VALUE '0DHP41Z'.           34290002
               10  FILLER           PIC X(7) VALUE '0DHP71Z'.           34300002
               10  FILLER           PIC X(7) VALUE '0DHP81Z'.           34310002
               10  FILLER           PIC X(7) VALUE '0DH501Z'.           34320002
               10  FILLER           PIC X(7) VALUE '0DH531Z'.           34330002
               10  FILLER           PIC X(7) VALUE '0DH541Z'.           34340002
               10  FILLER           PIC X(7) VALUE '0DH571Z'.           34350002
               10  FILLER           PIC X(7) VALUE '0DH581Z'.           34360002
               10  FILLER           PIC X(7) VALUE '0FHB01Z'.           34370002
               10  FILLER           PIC X(7) VALUE '0FHB31Z'.           34380002
               10  FILLER           PIC X(7) VALUE '0FHB41Z'.           34390002
               10  FILLER           PIC X(7) VALUE '0FHB71Z'.           34400002
               10  FILLER           PIC X(7) VALUE '0FHB81Z'.           34410002
               10  FILLER           PIC X(7) VALUE '0FHD01Z'.           34420002
               10  FILLER           PIC X(7) VALUE '0FHD31Z'.           34430002
               10  FILLER           PIC X(7) VALUE '0FHD41Z'.           34440002
               10  FILLER           PIC X(7) VALUE '0FHD71Z'.           34450002
               10  FILLER           PIC X(7) VALUE '0FHD81Z'.           34460002
               10  FILLER           PIC X(7) VALUE '0HHTX1Z'.           34470002
               10  FILLER           PIC X(7) VALUE '0HHT01Z'.           34480002
               10  FILLER           PIC X(7) VALUE '0HHT31Z'.           34490002
               10  FILLER           PIC X(7) VALUE '0HHT71Z'.           34500002
               10  FILLER           PIC X(7) VALUE '0HHT81Z'.           34510002
               10  FILLER           PIC X(7) VALUE '0HHUX1Z'.           34520002
               10  FILLER           PIC X(7) VALUE '0HHU01Z'.           34530002
               10  FILLER           PIC X(7) VALUE '0HHU31Z'.           34540002
               10  FILLER           PIC X(7) VALUE '0HHU71Z'.           34550002
               10  FILLER           PIC X(7) VALUE '0HHU81Z'.           34560002
               10  FILLER           PIC X(7) VALUE '0HHVX1Z'.           34570002
               10  FILLER           PIC X(7) VALUE '0HHV01Z'.           34580002
               10  FILLER           PIC X(7) VALUE '0HHV31Z'.           34590002
               10  FILLER           PIC X(7) VALUE '0HHV71Z'.           34600002
               10  FILLER           PIC X(7) VALUE '0HHV81Z'.           34610002
               10  FILLER           PIC X(7) VALUE '0HHWX1Z'.           34620002
               10  FILLER           PIC X(7) VALUE '0HHW01Z'.           34630002
               10  FILLER           PIC X(7) VALUE '0HHW31Z'.           34640002
               10  FILLER           PIC X(7) VALUE '0HHW71Z'.           34650002
               10  FILLER           PIC X(7) VALUE '0HHW81Z'.           34660002
               10  FILLER           PIC X(7) VALUE '0HHXX1Z'.           34670002
               10  FILLER           PIC X(7) VALUE '0HHX01Z'.           34680002
               10  FILLER           PIC X(7) VALUE '0HHX31Z'.           34690002
               10  FILLER           PIC X(7) VALUE '0HHX71Z'.           34700002
               10  FILLER           PIC X(7) VALUE '0HHX81Z'.           34710002
               10  FILLER           PIC X(7) VALUE '0JHS01Z'.           34720002
               10  FILLER           PIC X(7) VALUE '0JHS31Z'.           34730002
               10  FILLER           PIC X(7) VALUE '0JHT01Z'.           34740002
               10  FILLER           PIC X(7) VALUE '0JHT31Z'.           34750002
               10  FILLER           PIC X(7) VALUE '0JHV01Z'.           34760002
               10  FILLER           PIC X(7) VALUE '0JHV31Z'.           34770002
               10  FILLER           PIC X(7) VALUE '0JHW01Z'.           34780002
               10  FILLER           PIC X(7) VALUE '0JHW31Z'.           34790002
               10  FILLER           PIC X(7) VALUE '0UHC01Z'.           34800002
               10  FILLER           PIC X(7) VALUE '0UHC31Z'.           34810002
               10  FILLER           PIC X(7) VALUE '0UHC41Z'.           34820002
               10  FILLER           PIC X(7) VALUE '0UHC71Z'.           34830002
               10  FILLER           PIC X(7) VALUE '0UHC81Z'.           34840002
               10  FILLER           PIC X(7) VALUE '0UHGX1Z'.           34850002
               10  FILLER           PIC X(7) VALUE '0UHG01Z'.           34860002
               10  FILLER           PIC X(7) VALUE '0UHG31Z'.           34870002
               10  FILLER           PIC X(7) VALUE '0UHG41Z'.           34880002
               10  FILLER           PIC X(7) VALUE '0UHG71Z'.           34890002
               10  FILLER           PIC X(7) VALUE '0UHG81Z'.           34900002
               10  FILLER           PIC X(7) VALUE '0VH001Z'.           34910002
               10  FILLER           PIC X(7) VALUE '0VH031Z'.           34920002
               10  FILLER           PIC X(7) VALUE '0VH041Z'.           34930002
               10  FILLER           PIC X(7) VALUE '0VH071Z'.           34940002
               10  FILLER           PIC X(7) VALUE '0VH081Z'.           34950002
               10  FILLER           PIC X(7) VALUE '0WHB01Z'.           34960002
               10  FILLER           PIC X(7) VALUE '0WHB31Z'.           34970002
               10  FILLER           PIC X(7) VALUE '0WHB41Z'.           34980002
               10  FILLER           PIC X(7) VALUE '0WHC01Z'.           34990002
               10  FILLER           PIC X(7) VALUE '0WHC31Z'.           35000002
               10  FILLER           PIC X(7) VALUE '0WHC41Z'.           35010002
               10  FILLER           PIC X(7) VALUE '0WHD01Z'.           35020002
               10  FILLER           PIC X(7) VALUE '0WHD31Z'.           35030002
               10  FILLER           PIC X(7) VALUE '0WHD41Z'.           35040002
               10  FILLER           PIC X(7) VALUE '0WHF01Z'.           35050002
               10  FILLER           PIC X(7) VALUE '0WHF31Z'.           35060002
               10  FILLER           PIC X(7) VALUE '0WHF41Z'.           35070002
               10  FILLER           PIC X(7) VALUE '0WHG01Z'.           35080002
               10  FILLER           PIC X(7) VALUE '0WHG31Z'.           35090002
               10  FILLER           PIC X(7) VALUE '0WHG41Z'.           35100002
               10  FILLER           PIC X(7) VALUE '0WHH01Z'.           35110002
               10  FILLER           PIC X(7) VALUE '0WHH31Z'.           35120002
               10  FILLER           PIC X(7) VALUE '0WHH41Z'.           35130002
               10  FILLER           PIC X(7) VALUE '0WHJ01Z'.           35140002
               10  FILLER           PIC X(7) VALUE '0WHJ31Z'.           35150002
               10  FILLER           PIC X(7) VALUE '0WHJ41Z'.           35160002
               10  FILLER           PIC X(7) VALUE '0WHK01Z'.           35170002
               10  FILLER           PIC X(7) VALUE '0WHK31Z'.           35180002
               10  FILLER           PIC X(7) VALUE '0WHK41Z'.           35190002
               10  FILLER           PIC X(7) VALUE '0WHL01Z'.           35200002
               10  FILLER           PIC X(7) VALUE '0WHL31Z'.           35210002
               10  FILLER           PIC X(7) VALUE '0WHL41Z'.           35220002
               10  FILLER           PIC X(7) VALUE '0WHM01Z'.           35230002
               10  FILLER           PIC X(7) VALUE '0WHM31Z'.           35240002
               10  FILLER           PIC X(7) VALUE '0WHM41Z'.           35250002
               10  FILLER           PIC X(7) VALUE '0WHN01Z'.           35260002
               10  FILLER           PIC X(7) VALUE '0WHN31Z'.           35270002
               10  FILLER           PIC X(7) VALUE '0WHN41Z'.           35280002
               10  FILLER           PIC X(7) VALUE '0WHP01Z'.           35290002
               10  FILLER           PIC X(7) VALUE '0WHP31Z'.           35300002
               10  FILLER           PIC X(7) VALUE '0WHP41Z'.           35310002
               10  FILLER           PIC X(7) VALUE '0WHP71Z'.           35320002
               10  FILLER           PIC X(7) VALUE '0WHP81Z'.           35330002
               10  FILLER           PIC X(7) VALUE '0WHQ01Z'.           35340002
               10  FILLER           PIC X(7) VALUE '0WHQ31Z'.           35350002
               10  FILLER           PIC X(7) VALUE '0WHQ41Z'.           35360002
               10  FILLER           PIC X(7) VALUE '0WHQ71Z'.           35370002
               10  FILLER           PIC X(7) VALUE '0WHQ81Z'.           35380002
               10  FILLER           PIC X(7) VALUE '0WHR01Z'.           35390002
               10  FILLER           PIC X(7) VALUE '0WHR31Z'.           35400002
               10  FILLER           PIC X(7) VALUE '0WHR41Z'.           35410002
               10  FILLER           PIC X(7) VALUE '0WHR71Z'.           35420002
               10  FILLER           PIC X(7) VALUE '0WHR81Z'.           35430002
               10  FILLER           PIC X(7) VALUE '0WH001Z'.           35440002
               10  FILLER           PIC X(7) VALUE '0WH031Z'.           35450002
               10  FILLER           PIC X(7) VALUE '0WH041Z'.           35460002
               10  FILLER           PIC X(7) VALUE '0WH101Z'.           35470002
               10  FILLER           PIC X(7) VALUE '0WH131Z'.           35480002
               10  FILLER           PIC X(7) VALUE '0WH141Z'.           35490002
               10  FILLER           PIC X(7) VALUE '0WH201Z'.           35500002
               10  FILLER           PIC X(7) VALUE '0WH231Z'.           35510002
               10  FILLER           PIC X(7) VALUE '0WH241Z'.           35520002
               10  FILLER           PIC X(7) VALUE '0WH301Z'.           35530002
               10  FILLER           PIC X(7) VALUE '0WH331Z'.           35540002
               10  FILLER           PIC X(7) VALUE '0WH341Z'.           35550002
               10  FILLER           PIC X(7) VALUE '0WH401Z'.           35560002
               10  FILLER           PIC X(7) VALUE '0WH431Z'.           35570002
               10  FILLER           PIC X(7) VALUE '0WH441Z'.           35580002
               10  FILLER           PIC X(7) VALUE '0WH501Z'.           35590002
               10  FILLER           PIC X(7) VALUE '0WH531Z'.           35600002
               10  FILLER           PIC X(7) VALUE '0WH541Z'.           35610002
               10  FILLER           PIC X(7) VALUE '0WH601Z'.           35620002
               10  FILLER           PIC X(7) VALUE '0WH631Z'.           35630002
               10  FILLER           PIC X(7) VALUE '0WH641Z'.           35640002
               10  FILLER           PIC X(7) VALUE '0WH801Z'.           35650002
               10  FILLER           PIC X(7) VALUE '0WH831Z'.           35660002
               10  FILLER           PIC X(7) VALUE '0WH841Z'.           35670002
               10  FILLER           PIC X(7) VALUE '0WH901Z'.           35680002
               10  FILLER           PIC X(7) VALUE '0WH931Z'.           35690002
               10  FILLER           PIC X(7) VALUE '0WH941Z'.           35700002
               10  FILLER           PIC X(7) VALUE '0XHB01Z'.           35710002
               10  FILLER           PIC X(7) VALUE '0XHB31Z'.           35720002
               10  FILLER           PIC X(7) VALUE '0XHB41Z'.           35730002
               10  FILLER           PIC X(7) VALUE '0XHC01Z'.           35740002
               10  FILLER           PIC X(7) VALUE '0XHC31Z'.           35750002
               10  FILLER           PIC X(7) VALUE '0XHC41Z'.           35760002
               10  FILLER           PIC X(7) VALUE '0XHD01Z'.           35770002
               10  FILLER           PIC X(7) VALUE '0XHD31Z'.           35780002
               10  FILLER           PIC X(7) VALUE '0XHD41Z'.           35790002
               10  FILLER           PIC X(7) VALUE '0XHF01Z'.           35800002
               10  FILLER           PIC X(7) VALUE '0XHF31Z'.           35810002
               10  FILLER           PIC X(7) VALUE '0XHF41Z'.           35820002
               10  FILLER           PIC X(7) VALUE '0XHG01Z'.           35830002
               10  FILLER           PIC X(7) VALUE '0XHG31Z'.           35840002
               10  FILLER           PIC X(7) VALUE '0XHG41Z'.           35850002
               10  FILLER           PIC X(7) VALUE '0XHH01Z'.           35860002
               10  FILLER           PIC X(7) VALUE '0XHH31Z'.           35870002
               10  FILLER           PIC X(7) VALUE '0XHH41Z'.           35880002
               10  FILLER           PIC X(7) VALUE '0XHJ01Z'.           35890002
               10  FILLER           PIC X(7) VALUE '0XHJ31Z'.           35900002
               10  FILLER           PIC X(7) VALUE '0XHJ41Z'.           35910002
               10  FILLER           PIC X(7) VALUE '0XHK01Z'.           35920002
               10  FILLER           PIC X(7) VALUE '0XHK31Z'.           35930002
               10  FILLER           PIC X(7) VALUE '0XHK41Z'.           35940002
               10  FILLER           PIC X(7) VALUE '0XH201Z'.           35950002
               10  FILLER           PIC X(7) VALUE '0XH231Z'.           35960002
               10  FILLER           PIC X(7) VALUE '0XH241Z'.           35970002
               10  FILLER           PIC X(7) VALUE '0XH301Z'.           35980002
               10  FILLER           PIC X(7) VALUE '0XH331Z'.           35990002
               10  FILLER           PIC X(7) VALUE '0XH341Z'.           36000002
               10  FILLER           PIC X(7) VALUE '0XH401Z'.           36010002
               10  FILLER           PIC X(7) VALUE '0XH431Z'.           36020002
               10  FILLER           PIC X(7) VALUE '0XH441Z'.           36030002
               10  FILLER           PIC X(7) VALUE '0XH501Z'.           36040002
               10  FILLER           PIC X(7) VALUE '0XH531Z'.           36050002
               10  FILLER           PIC X(7) VALUE '0XH541Z'.           36060002
               10  FILLER           PIC X(7) VALUE '0XH601Z'.           36070002
               10  FILLER           PIC X(7) VALUE '0XH631Z'.           36080002
               10  FILLER           PIC X(7) VALUE '0XH641Z'.           36090002
               10  FILLER           PIC X(7) VALUE '0XH701Z'.           36100002
               10  FILLER           PIC X(7) VALUE '0XH731Z'.           36110002
               10  FILLER           PIC X(7) VALUE '0XH741Z'.           36120002
               10  FILLER           PIC X(7) VALUE '0XH801Z'.           36130002
               10  FILLER           PIC X(7) VALUE '0XH831Z'.           36140002
               10  FILLER           PIC X(7) VALUE '0XH841Z'.           36150002
               10  FILLER           PIC X(7) VALUE '0XH901Z'.           36160002
               10  FILLER           PIC X(7) VALUE '0XH931Z'.           36170002
               10  FILLER           PIC X(7) VALUE '0XH941Z'.           36180002
               10  FILLER           PIC X(7) VALUE '0YHB01Z'.           36190002
               10  FILLER           PIC X(7) VALUE '0YHB31Z'.           36200002
               10  FILLER           PIC X(7) VALUE '0YHB41Z'.           36210002
               10  FILLER           PIC X(7) VALUE '0YHC01Z'.           36220002
               10  FILLER           PIC X(7) VALUE '0YHC31Z'.           36230002
               10  FILLER           PIC X(7) VALUE '0YHC41Z'.           36240002
               10  FILLER           PIC X(7) VALUE '0YHD01Z'.           36250002
               10  FILLER           PIC X(7) VALUE '0YHD31Z'.           36260002
               10  FILLER           PIC X(7) VALUE '0YHD41Z'.           36270002
               10  FILLER           PIC X(7) VALUE '0YHF01Z'.           36280002
               10  FILLER           PIC X(7) VALUE '0YHF31Z'.           36290002
               10  FILLER           PIC X(7) VALUE '0YHF41Z'.           36300002
               10  FILLER           PIC X(7) VALUE '0YHG01Z'.           36310002
               10  FILLER           PIC X(7) VALUE '0YHG31Z'.           36320002
               10  FILLER           PIC X(7) VALUE '0YHG41Z'.           36330002
               10  FILLER           PIC X(7) VALUE '0YHH01Z'.           36340002
               10  FILLER           PIC X(7) VALUE '0YHH31Z'.           36350002
               10  FILLER           PIC X(7) VALUE '0YHH41Z'.           36360002
               10  FILLER           PIC X(7) VALUE '0YHJ01Z'.           36370002
               10  FILLER           PIC X(7) VALUE '0YHJ31Z'.           36380002
               10  FILLER           PIC X(7) VALUE '0YHJ41Z'.           36390002
               10  FILLER           PIC X(7) VALUE '0YHK01Z'.           36400002
               10  FILLER           PIC X(7) VALUE '0YHK31Z'.           36410002
               10  FILLER           PIC X(7) VALUE '0YHK41Z'.           36420002
               10  FILLER           PIC X(7) VALUE '0YHL01Z'.           36430002
               10  FILLER           PIC X(7) VALUE '0YHL31Z'.           36440002
               10  FILLER           PIC X(7) VALUE '0YHL41Z'.           36450002
               10  FILLER           PIC X(7) VALUE '0YHM01Z'.           36460002
               10  FILLER           PIC X(7) VALUE '0YHM31Z'.           36470002
               10  FILLER           PIC X(7) VALUE '0YHM41Z'.           36480002
               10  FILLER           PIC X(7) VALUE '0YHN01Z'.           36490002
               10  FILLER           PIC X(7) VALUE '0YHN31Z'.           36500002
               10  FILLER           PIC X(7) VALUE '0YHN41Z'.           36510002
               10  FILLER           PIC X(7) VALUE '0YH001Z'.           36520002
               10  FILLER           PIC X(7) VALUE '0YH031Z'.           36530002
               10  FILLER           PIC X(7) VALUE '0YH041Z'.           36540002
               10  FILLER           PIC X(7) VALUE '0YH101Z'.           36550002
               10  FILLER           PIC X(7) VALUE '0YH131Z'.           36560002
               10  FILLER           PIC X(7) VALUE '0YH141Z'.           36570002
               10  FILLER           PIC X(7) VALUE '0YH501Z'.           36580002
               10  FILLER           PIC X(7) VALUE '0YH531Z'.           36590002
               10  FILLER           PIC X(7) VALUE '0YH541Z'.           36600002
               10  FILLER           PIC X(7) VALUE '0YH601Z'.           36610002
               10  FILLER           PIC X(7) VALUE '0YH631Z'.           36620002
               10  FILLER           PIC X(7) VALUE '0YH641Z'.           36630002
               10  FILLER           PIC X(7) VALUE '0YH701Z'.           36640002
               10  FILLER           PIC X(7) VALUE '0YH731Z'.           36650002
               10  FILLER           PIC X(7) VALUE '0YH741Z'.           36660002
               10  FILLER           PIC X(7) VALUE '0YH801Z'.           36670002
               10  FILLER           PIC X(7) VALUE '0YH831Z'.           36680002
               10  FILLER           PIC X(7) VALUE '0YH841Z'.           36690002
               10  FILLER           PIC X(7) VALUE '0YH901Z'.           36700002
               10  FILLER           PIC X(7) VALUE '0YH931Z'.           36710002
               10  FILLER           PIC X(7) VALUE '0YH941Z'.           36720002
               10  FILLER           PIC X(7) VALUE '00H004Z'.           36730002
               10  FILLER           PIC X(7) VALUE '08H0X1Z'.           36740002
               10  FILLER           PIC X(7) VALUE '08H031Z'.           36750002
               10  FILLER           PIC X(7) VALUE '08H1X1Z'.           36760002
               10  FILLER           PIC X(7) VALUE '08H131Z'.           36770002
               10  FILLER           PIC X(7) VALUE '3E0A305'.           36780002
               10  FILLER           PIC X(7) VALUE '3E0BX05'.           36790002
               10  FILLER           PIC X(7) VALUE '3E0B305'.           36800002
               10  FILLER           PIC X(7) VALUE '3E0B705'.           36810002
               10  FILLER           PIC X(7) VALUE '3E0CX05'.           36820002
               10  FILLER           PIC X(7) VALUE '3E0C305'.           36830002
               10  FILLER           PIC X(7) VALUE '3E0C705'.           36840002
               10  FILLER           PIC X(7) VALUE '3E0DX05'.           36850002
               10  FILLER           PIC X(7) VALUE '3E0D305'.           36860002
               10  FILLER           PIC X(7) VALUE '3E0D705'.           36870002
               10  FILLER           PIC X(7) VALUE '3E0E305'.           36880002
               10  FILLER           PIC X(7) VALUE '3E0E705'.           36890002
               10  FILLER           PIC X(7) VALUE '3E0E805'.           36900002
               10  FILLER           PIC X(7) VALUE '3E0F305'.           36910002
               10  FILLER           PIC X(7) VALUE '3E0F705'.           36920002
               10  FILLER           PIC X(7) VALUE '3E0F805'.           36930002
               10  FILLER           PIC X(7) VALUE '3E0G305'.           36940002
               10  FILLER           PIC X(7) VALUE '3E0G705'.           36950002
               10  FILLER           PIC X(7) VALUE '3E0G805'.           36960002
               10  FILLER           PIC X(7) VALUE '3E0H305'.           36970002
               10  FILLER           PIC X(7) VALUE '3E0H705'.           36980002
               10  FILLER           PIC X(7) VALUE '3E0H805'.           36990002
               10  FILLER           PIC X(7) VALUE '3E0J305'.           37000002
               10  FILLER           PIC X(7) VALUE '3E0J705'.           37010002
               10  FILLER           PIC X(7) VALUE '3E0J805'.           37020002
               10  FILLER           PIC X(7) VALUE '3E0K305'.           37030002
               10  FILLER           PIC X(7) VALUE '3E0K705'.           37040002
               10  FILLER           PIC X(7) VALUE '3E0K805'.           37050002
               10  FILLER           PIC X(7) VALUE '3E0L305'.           37060002
               10  FILLER           PIC X(7) VALUE '3E0L705'.           37070002
               10  FILLER           PIC X(7) VALUE '3E0M305'.           37080002
               10  FILLER           PIC X(7) VALUE '3E0M705'.           37090002
               10  FILLER           PIC X(7) VALUE '3E0N305'.           37100002
               10  FILLER           PIC X(7) VALUE '3E0N705'.           37110002
               10  FILLER           PIC X(7) VALUE '3E0N805'.           37120002
               10  FILLER           PIC X(7) VALUE '3E0P305'.           37130002
               10  FILLER           PIC X(7) VALUE '3E0P705'.           37140002
               10  FILLER           PIC X(7) VALUE '3E0P805'.           37150002
               10  FILLER           PIC X(7) VALUE '3E0Q005'.           37160002
               10  FILLER           PIC X(7) VALUE '3E0Q305'.           37170002
               10  FILLER           PIC X(7) VALUE '3E0Q705'.           37180002
               10  FILLER           PIC X(7) VALUE '3E0R305'.           37190002
               10  FILLER           PIC X(7) VALUE '3E0S305'.           37200002
               10  FILLER           PIC X(7) VALUE '3E0U305'.           37210002
               10  FILLER           PIC X(7) VALUE '3E0V305'.           37220002
               10  FILLER           PIC X(7) VALUE '3E0W305'.           37230002
               10  FILLER           PIC X(7) VALUE '3E0Y305'.           37240002
               10  FILLER           PIC X(7) VALUE '3E0Y705'.           37250002
               10  FILLER           PIC X(7) VALUE '3E00X05'.           37260002
               10  FILLER           PIC X(7) VALUE '3E01305'.           37270002
               10  FILLER           PIC X(7) VALUE '3E02305'.           37280002
               10  FILLER           PIC X(7) VALUE '3E03005'.           37290002
               10  FILLER           PIC X(7) VALUE '3E03305'.           37300002
               10  FILLER           PIC X(7) VALUE '3E04005'.           37310002
               10  FILLER           PIC X(7) VALUE '3E04305'.           37320002
               10  FILLER           PIC X(7) VALUE '3E05005'.           37330002
               10  FILLER           PIC X(7) VALUE '3E05305'.           37340002
               10  FILLER           PIC X(7) VALUE '3E06005'.           37350002
               10  FILLER           PIC X(7) VALUE '3E06305'.           37360002
               10  FILLER           PIC X(7) VALUE '3E09X05'.           37361002
               10  FILLER           PIC X(7) VALUE '3E09305'.           37362002
               10  FILLER           PIC X(7) VALUE '3E09705'.           37363002
           05  FILLER     REDEFINES CAT6P-TABLE-DATA.                   37364002
               10  CAT6P-DATA       OCCURS 2095 TIMES                   37365002
                                    ASCENDING KEY IS CAT6P-CODE         37366002
                                    INDEXED BY IX-CAT6P.                37367002
                   15  CAT6P-CODE   PIC X(7).                           37368002
                                                                        37369002
      ****************************************************************  37370002
      * UNCONTROLLED DIABETES - MELLITUS W OR WO COMPLICATIONS       *  37380002
      ****************************************************************  37390002
       01 CAT7-TABLE.                                                   37400002
           05  CAT7-TABLE-DATA.                                         37410002
               10  FILLER           PIC X(7) VALUE 'E1065  '.           37420002
               10  FILLER           PIC X(7) VALUE 'E1165  '.           37430002
           05  FILLER     REDEFINES CAT7-TABLE-DATA.                    37440002
               10  CAT7-DATA        OCCURS 2 TIMES                      37450002
                                    ASCENDING KEY IS CAT7-CODE          37460002
                                    INDEXED BY IX-CAT7.                 37470002
                   15  CAT7-CODE    PIC X(7).                           37480002
                                                                        37490002
      ****************************************************************  37500002
      * SEVERE PROTEIN CALORIE MALNUTRITION                          *  37510002
      ****************************************************************  37520002
       01 CAT8-TABLE.                                                   37530002
           05  CAT8-TABLE-DATA.                                         37540002
               10  FILLER           PIC X(7) VALUE 'E40    '.           37550002
               10  FILLER           PIC X(7) VALUE 'E41    '.           37560002
               10  FILLER           PIC X(7) VALUE 'E42    '.           37570002
               10  FILLER           PIC X(7) VALUE 'E43    '.           37580002
           05  FILLER     REDEFINES CAT8-TABLE-DATA.                    37590002
               10  CAT8-DATA        OCCURS  4 TIMES                     37600002
                                    ASCENDING KEY IS CAT8-CODE          37610002
                                    INDEXED BY IX-CAT8.                 37620002
                   15  CAT8-CODE    PIC X(7).                           37630002
                                                                        37640002
      ****************************************************************  37650002
      * EATING AND CONDUCT DISORDERS                                 *  37660002
      ****************************************************************  37670002
       01 CAT9-TABLE.                                                   37680002
           05  CAT9-TABLE-DATA.                                         37690002
               10  FILLER           PIC X(7) VALUE 'F5000  '.           37700002
               10  FILLER           PIC X(7) VALUE 'F5001  '.           37710002
               10  FILLER           PIC X(7) VALUE 'F5002  '.           37720002
               10  FILLER           PIC X(7) VALUE 'F509   '.           37730002
               10  FILLER           PIC X(7) VALUE 'F631   '.           37740002
               10  FILLER           PIC X(7) VALUE 'F6381  '.           37750002
               10  FILLER           PIC X(7) VALUE 'F911   '.           37760002
           05  FILLER     REDEFINES CAT9-TABLE-DATA.                    37770002
               10  CAT9-DATA        OCCURS  7 TIMES                     37780002
                                    ASCENDING KEY IS CAT9-CODE          37790002
                                    INDEXED BY IX-CAT9.                 37800002
                   15  CAT9-CODE    PIC X(7).                           37810002
                                                                        37820002
      ****************************************************************  37830002
      * INFECTIOUS DISEASE                                           *  37840002
      ****************************************************************  37850002
       01 CAT10-TABLE.                                                  37860002
           05  CAT10-TABLE-DATA.                                        37870002
               10  FILLER           PIC X(7) VALUE 'A150   '.           37880002
               10  FILLER           PIC X(7) VALUE 'A154   '.           37890002
               10  FILLER           PIC X(7) VALUE 'A155   '.           37900002
               10  FILLER           PIC X(7) VALUE 'A156   '.           37910002
               10  FILLER           PIC X(7) VALUE 'A157   '.           37920002
               10  FILLER           PIC X(7) VALUE 'A158   '.           37930002
               10  FILLER           PIC X(7) VALUE 'A159   '.           37940002
               10  FILLER           PIC X(7) VALUE 'A170   '.           37950002
               10  FILLER           PIC X(7) VALUE 'A171   '.           37960002
               10  FILLER           PIC X(7) VALUE 'A1781  '.           37970002
               10  FILLER           PIC X(7) VALUE 'A1782  '.           37980002
               10  FILLER           PIC X(7) VALUE 'A1783  '.           37990002
               10  FILLER           PIC X(7) VALUE 'A1789  '.           38000002
               10  FILLER           PIC X(7) VALUE 'A179   '.           38010002
               10  FILLER           PIC X(7) VALUE 'A1801  '.           38020002
               10  FILLER           PIC X(7) VALUE 'A1802  '.           38030002
               10  FILLER           PIC X(7) VALUE 'A1803  '.           38040002
               10  FILLER           PIC X(7) VALUE 'A1809  '.           38050002
               10  FILLER           PIC X(7) VALUE 'A1810  '.           38060002
               10  FILLER           PIC X(7) VALUE 'A1811  '.           38070002
               10  FILLER           PIC X(7) VALUE 'A1812  '.           38080002
               10  FILLER           PIC X(7) VALUE 'A1813  '.           38090002
               10  FILLER           PIC X(7) VALUE 'A1814  '.           38100002
               10  FILLER           PIC X(7) VALUE 'A1815  '.           38110002
               10  FILLER           PIC X(7) VALUE 'A1816  '.           38120002
               10  FILLER           PIC X(7) VALUE 'A1817  '.           38130002
               10  FILLER           PIC X(7) VALUE 'A1818  '.           38140002
               10  FILLER           PIC X(7) VALUE 'A182   '.           38150002
               10  FILLER           PIC X(7) VALUE 'A1831  '.           38160002
               10  FILLER           PIC X(7) VALUE 'A1832  '.           38170002
               10  FILLER           PIC X(7) VALUE 'A1839  '.           38180002
               10  FILLER           PIC X(7) VALUE 'A184   '.           38190002
               10  FILLER           PIC X(7) VALUE 'A1850  '.           38200002
               10  FILLER           PIC X(7) VALUE 'A1851  '.           38210002
               10  FILLER           PIC X(7) VALUE 'A1852  '.           38220002
               10  FILLER           PIC X(7) VALUE 'A1853  '.           38230002
               10  FILLER           PIC X(7) VALUE 'A1854  '.           38240002
               10  FILLER           PIC X(7) VALUE 'A1859  '.           38250002
               10  FILLER           PIC X(7) VALUE 'A186   '.           38260002
               10  FILLER           PIC X(7) VALUE 'A187   '.           38270002
               10  FILLER           PIC X(7) VALUE 'A1881  '.           38280002
               10  FILLER           PIC X(7) VALUE 'A1882  '.           38290002
               10  FILLER           PIC X(7) VALUE 'A1883  '.           38300002
               10  FILLER           PIC X(7) VALUE 'A1884  '.           38310002
               10  FILLER           PIC X(7) VALUE 'A1885  '.           38320002
               10  FILLER           PIC X(7) VALUE 'A1889  '.           38330002
               10  FILLER           PIC X(7) VALUE 'A190   '.           38340002
               10  FILLER           PIC X(7) VALUE 'A191   '.           38350002
               10  FILLER           PIC X(7) VALUE 'A192   '.           38360002
               10  FILLER           PIC X(7) VALUE 'A198   '.           38370002
               10  FILLER           PIC X(7) VALUE 'A199   '.           38380002
               10  FILLER           PIC X(7) VALUE 'A200   '.           38390002
               10  FILLER           PIC X(7) VALUE 'A201   '.           38400002
               10  FILLER           PIC X(7) VALUE 'A202   '.           38410002
               10  FILLER           PIC X(7) VALUE 'A203   '.           38420002
               10  FILLER           PIC X(7) VALUE 'A207   '.           38430002
               10  FILLER           PIC X(7) VALUE 'A208   '.           38440002
               10  FILLER           PIC X(7) VALUE 'A209   '.           38450002
               10  FILLER           PIC X(7) VALUE 'A210   '.           38460002
               10  FILLER           PIC X(7) VALUE 'A211   '.           38470002
               10  FILLER           PIC X(7) VALUE 'A212   '.           38480002
               10  FILLER           PIC X(7) VALUE 'A213   '.           38490002
               10  FILLER           PIC X(7) VALUE 'A217   '.           38500002
               10  FILLER           PIC X(7) VALUE 'A218   '.           38510002
               10  FILLER           PIC X(7) VALUE 'A219   '.           38520002
               10  FILLER           PIC X(7) VALUE 'A220   '.           38530002
               10  FILLER           PIC X(7) VALUE 'A221   '.           38540002
               10  FILLER           PIC X(7) VALUE 'A222   '.           38550002
               10  FILLER           PIC X(7) VALUE 'A227   '.           38560002
               10  FILLER           PIC X(7) VALUE 'A228   '.           38570002
               10  FILLER           PIC X(7) VALUE 'A229   '.           38580002
               10  FILLER           PIC X(7) VALUE 'A230   '.           38590002
               10  FILLER           PIC X(7) VALUE 'A231   '.           38600002
               10  FILLER           PIC X(7) VALUE 'A232   '.           38610002
               10  FILLER           PIC X(7) VALUE 'A233   '.           38620002
               10  FILLER           PIC X(7) VALUE 'A238   '.           38630002
               10  FILLER           PIC X(7) VALUE 'A239   '.           38640002
               10  FILLER           PIC X(7) VALUE 'A240   '.           38650002
               10  FILLER           PIC X(7) VALUE 'A241   '.           38660002
               10  FILLER           PIC X(7) VALUE 'A242   '.           38670002
               10  FILLER           PIC X(7) VALUE 'A243   '.           38680002
               10  FILLER           PIC X(7) VALUE 'A249   '.           38690002
               10  FILLER           PIC X(7) VALUE 'A250   '.           38700002
               10  FILLER           PIC X(7) VALUE 'A251   '.           38710002
               10  FILLER           PIC X(7) VALUE 'A259   '.           38720002
               10  FILLER           PIC X(7) VALUE 'A260   '.           38730002
               10  FILLER           PIC X(7) VALUE 'A267   '.           38740002
               10  FILLER           PIC X(7) VALUE 'A268   '.           38750002
               10  FILLER           PIC X(7) VALUE 'A269   '.           38760002
               10  FILLER           PIC X(7) VALUE 'A280   '.           38770002
               10  FILLER           PIC X(7) VALUE 'A281   '.           38780002
               10  FILLER           PIC X(7) VALUE 'A282   '.           38790002
               10  FILLER           PIC X(7) VALUE 'A288   '.           38800002
               10  FILLER           PIC X(7) VALUE 'A289   '.           38810002
               10  FILLER           PIC X(7) VALUE 'A300   '.           38820002
               10  FILLER           PIC X(7) VALUE 'A301   '.           38830002
               10  FILLER           PIC X(7) VALUE 'A302   '.           38840002
               10  FILLER           PIC X(7) VALUE 'A303   '.           38850002
               10  FILLER           PIC X(7) VALUE 'A304   '.           38860002
               10  FILLER           PIC X(7) VALUE 'A305   '.           38870002
               10  FILLER           PIC X(7) VALUE 'A308   '.           38880002
               10  FILLER           PIC X(7) VALUE 'A309   '.           38890002
               10  FILLER           PIC X(7) VALUE 'A310   '.           38900002
               10  FILLER           PIC X(7) VALUE 'A311   '.           38910002
               10  FILLER           PIC X(7) VALUE 'A312   '.           38920002
               10  FILLER           PIC X(7) VALUE 'A318   '.           38930002
               10  FILLER           PIC X(7) VALUE 'A319   '.           38940002
               10  FILLER           PIC X(7) VALUE 'A320   '.           38950002
               10  FILLER           PIC X(7) VALUE 'A3211  '.           38960002
               10  FILLER           PIC X(7) VALUE 'A3212  '.           38970002
               10  FILLER           PIC X(7) VALUE 'A327   '.           38980002
               10  FILLER           PIC X(7) VALUE 'A3281  '.           38990002
               10  FILLER           PIC X(7) VALUE 'A3282  '.           39000002
               10  FILLER           PIC X(7) VALUE 'A3289  '.           39010002
               10  FILLER           PIC X(7) VALUE 'A329   '.           39020002
               10  FILLER           PIC X(7) VALUE 'A35    '.           39030002
               10  FILLER           PIC X(7) VALUE 'A360   '.           39040002
               10  FILLER           PIC X(7) VALUE 'A361   '.           39050002
               10  FILLER           PIC X(7) VALUE 'A362   '.           39060002
               10  FILLER           PIC X(7) VALUE 'A363   '.           39070002
               10  FILLER           PIC X(7) VALUE 'A3681  '.           39080002
               10  FILLER           PIC X(7) VALUE 'A3682  '.           39090002
               10  FILLER           PIC X(7) VALUE 'A3683  '.           39100002
               10  FILLER           PIC X(7) VALUE 'A3684  '.           39110002
               10  FILLER           PIC X(7) VALUE 'A3685  '.           39120002
               10  FILLER           PIC X(7) VALUE 'A3686  '.           39130002
               10  FILLER           PIC X(7) VALUE 'A3689  '.           39140002
               10  FILLER           PIC X(7) VALUE 'A369   '.           39150002
               10  FILLER           PIC X(7) VALUE 'A3700  '.           39160002
               10  FILLER           PIC X(7) VALUE 'A3701  '.           39170002
               10  FILLER           PIC X(7) VALUE 'A3710  '.           39180002
               10  FILLER           PIC X(7) VALUE 'A3711  '.           39190002
               10  FILLER           PIC X(7) VALUE 'A3780  '.           39200002
               10  FILLER           PIC X(7) VALUE 'A3781  '.           39210002
               10  FILLER           PIC X(7) VALUE 'A3790  '.           39220002
               10  FILLER           PIC X(7) VALUE 'A3791  '.           39230002
               10  FILLER           PIC X(7) VALUE 'A380   '.           39240002
               10  FILLER           PIC X(7) VALUE 'A381   '.           39250002
               10  FILLER           PIC X(7) VALUE 'A388   '.           39260002
               10  FILLER           PIC X(7) VALUE 'A389   '.           39270002
               10  FILLER           PIC X(7) VALUE 'A390   '.           39280002
               10  FILLER           PIC X(7) VALUE 'A391   '.           39290002
               10  FILLER           PIC X(7) VALUE 'A392   '.           39300002
               10  FILLER           PIC X(7) VALUE 'A393   '.           39310002
               10  FILLER           PIC X(7) VALUE 'A394   '.           39320002
               10  FILLER           PIC X(7) VALUE 'A3950  '.           39330002
               10  FILLER           PIC X(7) VALUE 'A3951  '.           39340002
               10  FILLER           PIC X(7) VALUE 'A3952  '.           39350002
               10  FILLER           PIC X(7) VALUE 'A3953  '.           39360002
               10  FILLER           PIC X(7) VALUE 'A3981  '.           39370002
               10  FILLER           PIC X(7) VALUE 'A3982  '.           39380002
               10  FILLER           PIC X(7) VALUE 'A3983  '.           39390002
               10  FILLER           PIC X(7) VALUE 'A3984  '.           39400002
               10  FILLER           PIC X(7) VALUE 'A3989  '.           39410002
               10  FILLER           PIC X(7) VALUE 'A399   '.           39420002
               10  FILLER           PIC X(7) VALUE 'A400   '.           39430002
               10  FILLER           PIC X(7) VALUE 'A401   '.           39440002
               10  FILLER           PIC X(7) VALUE 'A403   '.           39450002
               10  FILLER           PIC X(7) VALUE 'A408   '.           39460002
               10  FILLER           PIC X(7) VALUE 'A409   '.           39470002
               10  FILLER           PIC X(7) VALUE 'A4101  '.           39480002
               10  FILLER           PIC X(7) VALUE 'A4102  '.           39490002
               10  FILLER           PIC X(7) VALUE 'A411   '.           39500002
               10  FILLER           PIC X(7) VALUE 'A412   '.           39510002
               10  FILLER           PIC X(7) VALUE 'A413   '.           39520002
               10  FILLER           PIC X(7) VALUE 'A414   '.           39530002
               10  FILLER           PIC X(7) VALUE 'A4150  '.           39540002
               10  FILLER           PIC X(7) VALUE 'A4151  '.           39550002
               10  FILLER           PIC X(7) VALUE 'A4152  '.           39560002
               10  FILLER           PIC X(7) VALUE 'A4153  '.           39570002
               10  FILLER           PIC X(7) VALUE 'A4159  '.           39580002
               10  FILLER           PIC X(7) VALUE 'A4181  '.           39590002
               10  FILLER           PIC X(7) VALUE 'A4189  '.           39600002
               10  FILLER           PIC X(7) VALUE 'A419   '.           39610002
               10  FILLER           PIC X(7) VALUE 'A420   '.           39620002
               10  FILLER           PIC X(7) VALUE 'A421   '.           39630002
               10  FILLER           PIC X(7) VALUE 'A422   '.           39640002
               10  FILLER           PIC X(7) VALUE 'A427   '.           39650002
               10  FILLER           PIC X(7) VALUE 'A4281  '.           39660002
               10  FILLER           PIC X(7) VALUE 'A4282  '.           39670002
               10  FILLER           PIC X(7) VALUE 'A4289  '.           39680002
               10  FILLER           PIC X(7) VALUE 'A429   '.           39690002
               10  FILLER           PIC X(7) VALUE 'A430   '.           39700002
               10  FILLER           PIC X(7) VALUE 'A431   '.           39710002
               10  FILLER           PIC X(7) VALUE 'A438   '.           39720002
               10  FILLER           PIC X(7) VALUE 'A439   '.           39730002
               10  FILLER           PIC X(7) VALUE 'A46    '.           39740002
               10  FILLER           PIC X(7) VALUE 'A480   '.           39750002
               10  FILLER           PIC X(7) VALUE 'A482   '.           39760002
               10  FILLER           PIC X(7) VALUE 'A483   '.           39770002
               10  FILLER           PIC X(7) VALUE 'A484   '.           39780002
               10  FILLER           PIC X(7) VALUE 'A4851  '.           39790002
               10  FILLER           PIC X(7) VALUE 'A4852  '.           39800002
               10  FILLER           PIC X(7) VALUE 'A488   '.           39810002
               10  FILLER           PIC X(7) VALUE 'A491   '.           39820002
               10  FILLER           PIC X(7) VALUE 'A70    '.           39830002
               10  FILLER           PIC X(7) VALUE 'A710   '.           39840002
               10  FILLER           PIC X(7) VALUE 'A711   '.           39850002
               10  FILLER           PIC X(7) VALUE 'A719   '.           39860002
               10  FILLER           PIC X(7) VALUE 'A740   '.           39870002
               10  FILLER           PIC X(7) VALUE 'A7489  '.           39880002
               10  FILLER           PIC X(7) VALUE 'A800   '.           39890002
               10  FILLER           PIC X(7) VALUE 'A801   '.           39900002
               10  FILLER           PIC X(7) VALUE 'A802   '.           39910002
               10  FILLER           PIC X(7) VALUE 'A8030  '.           39920002
               10  FILLER           PIC X(7) VALUE 'A8039  '.           39930002
               10  FILLER           PIC X(7) VALUE 'A804   '.           39940002
               10  FILLER           PIC X(7) VALUE 'A809   '.           39950002
               10  FILLER           PIC X(7) VALUE 'A8100  '.           39960002
               10  FILLER           PIC X(7) VALUE 'A8101  '.           39970002
               10  FILLER           PIC X(7) VALUE 'A8109  '.           39980002
               10  FILLER           PIC X(7) VALUE 'A811   '.           39990002
               10  FILLER           PIC X(7) VALUE 'A812   '.           40000002
               10  FILLER           PIC X(7) VALUE 'A8181  '.           40010002
               10  FILLER           PIC X(7) VALUE 'A8182  '.           40020002
               10  FILLER           PIC X(7) VALUE 'A8183  '.           40030002
               10  FILLER           PIC X(7) VALUE 'A8189  '.           40040002
               10  FILLER           PIC X(7) VALUE 'A819   '.           40050002
               10  FILLER           PIC X(7) VALUE 'A820   '.           40060002
               10  FILLER           PIC X(7) VALUE 'A821   '.           40070002
               10  FILLER           PIC X(7) VALUE 'A829   '.           40080002
               10  FILLER           PIC X(7) VALUE 'A830   '.           40090002
               10  FILLER           PIC X(7) VALUE 'A831   '.           40100002
               10  FILLER           PIC X(7) VALUE 'A832   '.           40110002
               10  FILLER           PIC X(7) VALUE 'A833   '.           40120002
               10  FILLER           PIC X(7) VALUE 'A834   '.           40130002
               10  FILLER           PIC X(7) VALUE 'A835   '.           40140002
               10  FILLER           PIC X(7) VALUE 'A836   '.           40150002
               10  FILLER           PIC X(7) VALUE 'A838   '.           40160002
               10  FILLER           PIC X(7) VALUE 'A839   '.           40170002
               10  FILLER           PIC X(7) VALUE 'A840   '.           40180002
               10  FILLER           PIC X(7) VALUE 'A841   '.           40190002
               10  FILLER           PIC X(7) VALUE 'A848   '.           40200002
               10  FILLER           PIC X(7) VALUE 'A849   '.           40210002
               10  FILLER           PIC X(7) VALUE 'A850   '.           40220002
               10  FILLER           PIC X(7) VALUE 'A851   '.           40230002
               10  FILLER           PIC X(7) VALUE 'A852   '.           40240002
               10  FILLER           PIC X(7) VALUE 'A858   '.           40250002
               10  FILLER           PIC X(7) VALUE 'A86    '.           40260002
               10  FILLER           PIC X(7) VALUE 'A870   '.           40270002
               10  FILLER           PIC X(7) VALUE 'A871   '.           40280002
               10  FILLER           PIC X(7) VALUE 'A872   '.           40290002
               10  FILLER           PIC X(7) VALUE 'A878   '.           40300002
               10  FILLER           PIC X(7) VALUE 'A879   '.           40310002
               10  FILLER           PIC X(7) VALUE 'A880   '.           40320002
               10  FILLER           PIC X(7) VALUE 'A881   '.           40330002
               10  FILLER           PIC X(7) VALUE 'A888   '.           40340002
               10  FILLER           PIC X(7) VALUE 'A89    '.           40350002
               10  FILLER           PIC X(7) VALUE 'A90    '.           40360002
               10  FILLER           PIC X(7) VALUE 'A91    '.           40370002
               10  FILLER           PIC X(7) VALUE 'A920   '.           40380002
               10  FILLER           PIC X(7) VALUE 'A921   '.           40390002
               10  FILLER           PIC X(7) VALUE 'A922   '.           40400002
               10  FILLER           PIC X(7) VALUE 'A9230  '.           40410002
               10  FILLER           PIC X(7) VALUE 'A9231  '.           40420002
               10  FILLER           PIC X(7) VALUE 'A9232  '.           40430002
               10  FILLER           PIC X(7) VALUE 'A9239  '.           40440002
               10  FILLER           PIC X(7) VALUE 'A924   '.           40450002
               10  FILLER           PIC X(7) VALUE 'A925   '.           40460002
               10  FILLER           PIC X(7) VALUE 'A928   '.           40470002
               10  FILLER           PIC X(7) VALUE 'A929   '.           40480002
               10  FILLER           PIC X(7) VALUE 'A930   '.           40490002
               10  FILLER           PIC X(7) VALUE 'A931   '.           40500002
               10  FILLER           PIC X(7) VALUE 'A932   '.           40510002
               10  FILLER           PIC X(7) VALUE 'A938   '.           40520002
               10  FILLER           PIC X(7) VALUE 'A94    '.           40530002
               10  FILLER           PIC X(7) VALUE 'A950   '.           40540002
               10  FILLER           PIC X(7) VALUE 'A951   '.           40550002
               10  FILLER           PIC X(7) VALUE 'A959   '.           40560002
               10  FILLER           PIC X(7) VALUE 'A960   '.           40570002
               10  FILLER           PIC X(7) VALUE 'A961   '.           40580002
               10  FILLER           PIC X(7) VALUE 'A962   '.           40590002
               10  FILLER           PIC X(7) VALUE 'A968   '.           40600002
               10  FILLER           PIC X(7) VALUE 'A969   '.           40610002
               10  FILLER           PIC X(7) VALUE 'A980   '.           40620002
               10  FILLER           PIC X(7) VALUE 'A981   '.           40630002
               10  FILLER           PIC X(7) VALUE 'A982   '.           40640002
               10  FILLER           PIC X(7) VALUE 'A983   '.           40650002
               10  FILLER           PIC X(7) VALUE 'A984   '.           40660002
               10  FILLER           PIC X(7) VALUE 'A985   '.           40670002
               10  FILLER           PIC X(7) VALUE 'A988   '.           40680002
               10  FILLER           PIC X(7) VALUE 'A99    '.           40690002
               10  FILLER           PIC X(7) VALUE 'B0050  '.           40700002
               10  FILLER           PIC X(7) VALUE 'B0051  '.           40710002
               10  FILLER           PIC X(7) VALUE 'B0052  '.           40720002
               10  FILLER           PIC X(7) VALUE 'B0053  '.           40730002
               10  FILLER           PIC X(7) VALUE 'B0059  '.           40740002
               10  FILLER           PIC X(7) VALUE 'B010   '.           40750002
               10  FILLER           PIC X(7) VALUE 'B0111  '.           40760002
               10  FILLER           PIC X(7) VALUE 'B0112  '.           40770002
               10  FILLER           PIC X(7) VALUE 'B012   '.           40780002
               10  FILLER           PIC X(7) VALUE 'B0181  '.           40790002
               10  FILLER           PIC X(7) VALUE 'B0189  '.           40800002
               10  FILLER           PIC X(7) VALUE 'B019   '.           40810002
               10  FILLER           PIC X(7) VALUE 'B020   '.           40820002
               10  FILLER           PIC X(7) VALUE 'B021   '.           40830002
               10  FILLER           PIC X(7) VALUE 'B0221  '.           40840002
               10  FILLER           PIC X(7) VALUE 'B0222  '.           40850002
               10  FILLER           PIC X(7) VALUE 'B0223  '.           40860002
               10  FILLER           PIC X(7) VALUE 'B0224  '.           40870002
               10  FILLER           PIC X(7) VALUE 'B0229  '.           40880002
               10  FILLER           PIC X(7) VALUE 'B03    '.           40890002
               10  FILLER           PIC X(7) VALUE 'B04    '.           40900002
               10  FILLER           PIC X(7) VALUE 'B050   '.           40910002
               10  FILLER           PIC X(7) VALUE 'B051   '.           40920002
               10  FILLER           PIC X(7) VALUE 'B052   '.           40930002
               10  FILLER           PIC X(7) VALUE 'B053   '.           40940002
               10  FILLER           PIC X(7) VALUE 'B054   '.           40950002
               10  FILLER           PIC X(7) VALUE 'B0581  '.           40960002
               10  FILLER           PIC X(7) VALUE 'B0589  '.           40970002
               10  FILLER           PIC X(7) VALUE 'B059   '.           40980002
               10  FILLER           PIC X(7) VALUE 'B0600  '.           40990002
               10  FILLER           PIC X(7) VALUE 'B0601  '.           41000002
               10  FILLER           PIC X(7) VALUE 'B0602  '.           41010002
               10  FILLER           PIC X(7) VALUE 'B0609  '.           41020002
               10  FILLER           PIC X(7) VALUE 'B0681  '.           41030002
               10  FILLER           PIC X(7) VALUE 'B0682  '.           41040002
               10  FILLER           PIC X(7) VALUE 'B0689  '.           41050002
               10  FILLER           PIC X(7) VALUE 'B069   '.           41060002
               10  FILLER           PIC X(7) VALUE 'B08010 '.           41070002
               10  FILLER           PIC X(7) VALUE 'B08011 '.           41080002
               10  FILLER           PIC X(7) VALUE 'B0802  '.           41090002
               10  FILLER           PIC X(7) VALUE 'B0803  '.           41100002
               10  FILLER           PIC X(7) VALUE 'B0804  '.           41110002
               10  FILLER           PIC X(7) VALUE 'B0809  '.           41120002
               10  FILLER           PIC X(7) VALUE 'B0820  '.           41130002
               10  FILLER           PIC X(7) VALUE 'B0821  '.           41140002
               10  FILLER           PIC X(7) VALUE 'B0822  '.           41150002
               10  FILLER           PIC X(7) VALUE 'B083   '.           41160002
               10  FILLER           PIC X(7) VALUE 'B084   '.           41170002
               10  FILLER           PIC X(7) VALUE 'B085   '.           41180002
               10  FILLER           PIC X(7) VALUE 'B0860  '.           41190002
               10  FILLER           PIC X(7) VALUE 'B0861  '.           41200002
               10  FILLER           PIC X(7) VALUE 'B0862  '.           41210002
               10  FILLER           PIC X(7) VALUE 'B0869  '.           41220002
               10  FILLER           PIC X(7) VALUE 'B0870  '.           41230002
               10  FILLER           PIC X(7) VALUE 'B0871  '.           41240002
               10  FILLER           PIC X(7) VALUE 'B0872  '.           41250002
               10  FILLER           PIC X(7) VALUE 'B0879  '.           41260002
               10  FILLER           PIC X(7) VALUE 'B088   '.           41270002
               10  FILLER           PIC X(7) VALUE 'B09    '.           41280002
               10  FILLER           PIC X(7) VALUE 'B1001  '.           41290002
               10  FILLER           PIC X(7) VALUE 'B1009  '.           41300002
               10  FILLER           PIC X(7) VALUE 'B1081  '.           41310002
               10  FILLER           PIC X(7) VALUE 'B1082  '.           41320002
               10  FILLER           PIC X(7) VALUE 'B1089  '.           41330002
               10  FILLER           PIC X(7) VALUE 'B150   '.           41340002
               10  FILLER           PIC X(7) VALUE 'B159   '.           41350002
               10  FILLER           PIC X(7) VALUE 'B160   '.           41360002
               10  FILLER           PIC X(7) VALUE 'B161   '.           41370002
               10  FILLER           PIC X(7) VALUE 'B162   '.           41380002
               10  FILLER           PIC X(7) VALUE 'B169   '.           41390002
               10  FILLER           PIC X(7) VALUE 'B170   '.           41400002
               10  FILLER           PIC X(7) VALUE 'B1710  '.           41410002
               10  FILLER           PIC X(7) VALUE 'B1711  '.           41420002
               10  FILLER           PIC X(7) VALUE 'B172   '.           41430002
               10  FILLER           PIC X(7) VALUE 'B178   '.           41440002
               10  FILLER           PIC X(7) VALUE 'B179   '.           41450002
               10  FILLER           PIC X(7) VALUE 'B180   '.           41460002
               10  FILLER           PIC X(7) VALUE 'B181   '.           41470002
               10  FILLER           PIC X(7) VALUE 'B182   '.           41480002
               10  FILLER           PIC X(7) VALUE 'B188   '.           41490002
               10  FILLER           PIC X(7) VALUE 'B189   '.           41500002
               10  FILLER           PIC X(7) VALUE 'B190   '.           41510002
               10  FILLER           PIC X(7) VALUE 'B1910  '.           41520002
               10  FILLER           PIC X(7) VALUE 'B1911  '.           41530002
               10  FILLER           PIC X(7) VALUE 'B1920  '.           41540002
               10  FILLER           PIC X(7) VALUE 'B1921  '.           41550002
               10  FILLER           PIC X(7) VALUE 'B199   '.           41560002
               10  FILLER           PIC X(7) VALUE 'B20    '.           41570002
               10  FILLER           PIC X(7) VALUE 'B250   '.           41580002
               10  FILLER           PIC X(7) VALUE 'B251   '.           41590002
               10  FILLER           PIC X(7) VALUE 'B252   '.           41600002
               10  FILLER           PIC X(7) VALUE 'B258   '.           41610002
               10  FILLER           PIC X(7) VALUE 'B259   '.           41620002
               10  FILLER           PIC X(7) VALUE 'B260   '.           41630002
               10  FILLER           PIC X(7) VALUE 'B261   '.           41640002
               10  FILLER           PIC X(7) VALUE 'B262   '.           41650002
               10  FILLER           PIC X(7) VALUE 'B263   '.           41660002
               10  FILLER           PIC X(7) VALUE 'B2681  '.           41670002
               10  FILLER           PIC X(7) VALUE 'B2682  '.           41680002
               10  FILLER           PIC X(7) VALUE 'B2683  '.           41690002
               10  FILLER           PIC X(7) VALUE 'B2684  '.           41700002
               10  FILLER           PIC X(7) VALUE 'B2685  '.           41710002
               10  FILLER           PIC X(7) VALUE 'B2689  '.           41720002
               10  FILLER           PIC X(7) VALUE 'B269   '.           41730002
               10  FILLER           PIC X(7) VALUE 'B2700  '.           41740002
               10  FILLER           PIC X(7) VALUE 'B2701  '.           41750002
               10  FILLER           PIC X(7) VALUE 'B2702  '.           41760002
               10  FILLER           PIC X(7) VALUE 'B2709  '.           41770002
               10  FILLER           PIC X(7) VALUE 'B2710  '.           41780002
               10  FILLER           PIC X(7) VALUE 'B2711  '.           41790002
               10  FILLER           PIC X(7) VALUE 'B2712  '.           41800002
               10  FILLER           PIC X(7) VALUE 'B2719  '.           41810002
               10  FILLER           PIC X(7) VALUE 'B2780  '.           41820002
               10  FILLER           PIC X(7) VALUE 'B2781  '.           41830002
               10  FILLER           PIC X(7) VALUE 'B2782  '.           41840002
               10  FILLER           PIC X(7) VALUE 'B2789  '.           41850002
               10  FILLER           PIC X(7) VALUE 'B2790  '.           41860002
               10  FILLER           PIC X(7) VALUE 'B2791  '.           41870002
               10  FILLER           PIC X(7) VALUE 'B2792  '.           41880002
               10  FILLER           PIC X(7) VALUE 'B2799  '.           41890002
               10  FILLER           PIC X(7) VALUE 'B330   '.           41900002
               10  FILLER           PIC X(7) VALUE 'B331   '.           41910002
               10  FILLER           PIC X(7) VALUE 'B3320  '.           41920002
               10  FILLER           PIC X(7) VALUE 'B3321  '.           41930002
               10  FILLER           PIC X(7) VALUE 'B3322  '.           41940002
               10  FILLER           PIC X(7) VALUE 'B3323  '.           41950002
               10  FILLER           PIC X(7) VALUE 'B3324  '.           41960002
               10  FILLER           PIC X(7) VALUE 'B333   '.           41970002
               10  FILLER           PIC X(7) VALUE 'B338   '.           41980002
               10  FILLER           PIC X(7) VALUE 'B341   '.           41990002
               10  FILLER           PIC X(7) VALUE 'B471   '.           42000002
               10  FILLER           PIC X(7) VALUE 'B479   '.           42010002
               10  FILLER           PIC X(7) VALUE 'B950   '.           42020002
               10  FILLER           PIC X(7) VALUE 'B951   '.           42030002
               10  FILLER           PIC X(7) VALUE 'B952   '.           42040002
               10  FILLER           PIC X(7) VALUE 'B953   '.           42050002
               10  FILLER           PIC X(7) VALUE 'B954   '.           42060002
               10  FILLER           PIC X(7) VALUE 'B955   '.           42070002
               10  FILLER           PIC X(7) VALUE 'B958   '.           42080002
               10  FILLER           PIC X(7) VALUE 'B9730  '.           42090002
               10  FILLER           PIC X(7) VALUE 'B9731  '.           42100002
               10  FILLER           PIC X(7) VALUE 'B9732  '.           42110002
               10  FILLER           PIC X(7) VALUE 'B9733  '.           42120002
               10  FILLER           PIC X(7) VALUE 'B9734  '.           42130002
               10  FILLER           PIC X(7) VALUE 'B9735  '.           42140002
               10  FILLER           PIC X(7) VALUE 'B9739  '.           42150002
               10  FILLER           PIC X(7) VALUE 'G032   '.           42160002
               10  FILLER           PIC X(7) VALUE 'I673   '.           42170002
               10  FILLER           PIC X(7) VALUE 'J020   '.           42180002
               10  FILLER           PIC X(7) VALUE 'J0300  '.           42190002
               10  FILLER           PIC X(7) VALUE 'J0301  '.           42200002
               10  FILLER           PIC X(7) VALUE 'J202   '.           42210002
               10  FILLER           PIC X(7) VALUE 'K9081  '.           42220002
               10  FILLER           PIC X(7) VALUE 'L081   '.           42230002
               10  FILLER           PIC X(7) VALUE 'L444   '.           42240002
               10  FILLER           PIC X(7) VALUE 'M60009 '.           42250002
           05  FILLER     REDEFINES CAT10-TABLE-DATA.                   42260002
               10  CAT10-DATA       OCCURS 438 TIMES                    42270002
                                    ASCENDING KEY IS CAT10-CODE         42280002
                                    INDEXED BY IX-CAT10.                42290002
                   15  CAT10-CODE   PIC X(7).                           42300002
                                                                        42310002
      ****************************************************************  42320002
      * DRUG AND/OR ALCOHOL INDUCED MENTAL DISORDERS                 *  42330002
      ****************************************************************  42340002
       01 CAT11-TABLE.                                                  42350002
           05  CAT11-TABLE-DATA.                                        42360002
               10  FILLER           PIC X(7) VALUE 'F10121 '.           42370002
               10  FILLER           PIC X(7) VALUE 'F10220 '.           42380002
               10  FILLER           PIC X(7) VALUE 'F10221 '.           42390002
               10  FILLER           PIC X(7) VALUE 'F10229 '.           42400002
               10  FILLER           PIC X(7) VALUE 'F10231 '.           42410002
               10  FILLER           PIC X(7) VALUE 'F10921 '.           42420002
               10  FILLER           PIC X(7) VALUE 'F11151 '.           42430002
               10  FILLER           PIC X(7) VALUE 'F1120  '.           42440002
               10  FILLER           PIC X(7) VALUE 'F11220 '.           42450002
               10  FILLER           PIC X(7) VALUE 'F11221 '.           42460002
               10  FILLER           PIC X(7) VALUE 'F11222 '.           42470002
               10  FILLER           PIC X(7) VALUE 'F11229 '.           42480002
               10  FILLER           PIC X(7) VALUE 'F1123  '.           42490002
               10  FILLER           PIC X(7) VALUE 'F1124  '.           42500002
               10  FILLER           PIC X(7) VALUE 'F11250 '.           42510002
               10  FILLER           PIC X(7) VALUE 'F11251 '.           42520002
               10  FILLER           PIC X(7) VALUE 'F11259 '.           42530002
               10  FILLER           PIC X(7) VALUE 'F11281 '.           42540002
               10  FILLER           PIC X(7) VALUE 'F11282 '.           42550002
               10  FILLER           PIC X(7) VALUE 'F11288 '.           42560002
               10  FILLER           PIC X(7) VALUE 'F1129  '.           42570002
               10  FILLER           PIC X(7) VALUE 'F11920 '.           42580002
               10  FILLER           PIC X(7) VALUE 'F11921 '.           42590002
               10  FILLER           PIC X(7) VALUE 'F11922 '.           42600002
               10  FILLER           PIC X(7) VALUE 'F11929 '.           42610002
               10  FILLER           PIC X(7) VALUE 'F1193  '.           42620002
               10  FILLER           PIC X(7) VALUE 'F11951 '.           42630002
               10  FILLER           PIC X(7) VALUE 'F12120 '.           42640002
               10  FILLER           PIC X(7) VALUE 'F12121 '.           42650002
               10  FILLER           PIC X(7) VALUE 'F12122 '.           42660002
               10  FILLER           PIC X(7) VALUE 'F12129 '.           42670002
               10  FILLER           PIC X(7) VALUE 'F12151 '.           42680002
               10  FILLER           PIC X(7) VALUE 'F12220 '.           42690002
               10  FILLER           PIC X(7) VALUE 'F12221 '.           42700002
               10  FILLER           PIC X(7) VALUE 'F12222 '.           42710002
               10  FILLER           PIC X(7) VALUE 'F12229 '.           42720002
               10  FILLER           PIC X(7) VALUE 'F1223  '.           42730002
               10  FILLER           PIC X(7) VALUE 'F12251 '.           42740002
               10  FILLER           PIC X(7) VALUE 'F12920 '.           42750002
               10  FILLER           PIC X(7) VALUE 'F12921 '.           42760002
               10  FILLER           PIC X(7) VALUE 'F12922 '.           42770002
               10  FILLER           PIC X(7) VALUE 'F12929 '.           42780002
               10  FILLER           PIC X(7) VALUE 'F1293  '.           42790002
               10  FILLER           PIC X(7) VALUE 'F12951 '.           42800002
               10  FILLER           PIC X(7) VALUE 'F13120 '.           42810002
               10  FILLER           PIC X(7) VALUE 'F13121 '.           42820002
               10  FILLER           PIC X(7) VALUE 'F13129 '.           42830002
               10  FILLER           PIC X(7) VALUE 'F13151 '.           42840002
               10  FILLER           PIC X(7) VALUE 'F13220 '.           42850002
               10  FILLER           PIC X(7) VALUE 'F13221 '.           42860002
               10  FILLER           PIC X(7) VALUE 'F13229 '.           42870002
               10  FILLER           PIC X(7) VALUE 'F13230 '.           42880002
               10  FILLER           PIC X(7) VALUE 'F13231 '.           42890002
               10  FILLER           PIC X(7) VALUE 'F13232 '.           42900002
               10  FILLER           PIC X(7) VALUE 'F13239 '.           42910002
               10  FILLER           PIC X(7) VALUE 'F13251 '.           42920002
               10  FILLER           PIC X(7) VALUE 'F13920 '.           42930002
               10  FILLER           PIC X(7) VALUE 'F13921 '.           42940002
               10  FILLER           PIC X(7) VALUE 'F13929 '.           42950002
               10  FILLER           PIC X(7) VALUE 'F13930 '.           42960002
               10  FILLER           PIC X(7) VALUE 'F13931 '.           42970002
               10  FILLER           PIC X(7) VALUE 'F13932 '.           42980002
               10  FILLER           PIC X(7) VALUE 'F13939 '.           42990002
               10  FILLER           PIC X(7) VALUE 'F13951 '.           43000002
               10  FILLER           PIC X(7) VALUE 'F14120 '.           43010002
               10  FILLER           PIC X(7) VALUE 'F14121 '.           43020002
               10  FILLER           PIC X(7) VALUE 'F14122 '.           43030002
               10  FILLER           PIC X(7) VALUE 'F14129 '.           43040002
               10  FILLER           PIC X(7) VALUE 'F14151 '.           43050002
               10  FILLER           PIC X(7) VALUE 'F14220 '.           43060002
               10  FILLER           PIC X(7) VALUE 'F14221 '.           43070002
               10  FILLER           PIC X(7) VALUE 'F14222 '.           43080002
               10  FILLER           PIC X(7) VALUE 'F14229 '.           43090002
               10  FILLER           PIC X(7) VALUE 'F1423  '.           43100002
               10  FILLER           PIC X(7) VALUE 'F14251 '.           43110002
               10  FILLER           PIC X(7) VALUE 'F14920 '.           43120002
               10  FILLER           PIC X(7) VALUE 'F14921 '.           43130002
               10  FILLER           PIC X(7) VALUE 'F14922 '.           43140002
               10  FILLER           PIC X(7) VALUE 'F14929 '.           43150002
               10  FILLER           PIC X(7) VALUE 'F14951 '.           43160002
               10  FILLER           PIC X(7) VALUE 'F15120 '.           43170002
               10  FILLER           PIC X(7) VALUE 'F15121 '.           43180002
               10  FILLER           PIC X(7) VALUE 'F15122 '.           43190002
               10  FILLER           PIC X(7) VALUE 'F15129 '.           43200002
               10  FILLER           PIC X(7) VALUE 'F15151 '.           43210002
               10  FILLER           PIC X(7) VALUE 'F15220 '.           43220002
               10  FILLER           PIC X(7) VALUE 'F15221 '.           43230002
               10  FILLER           PIC X(7) VALUE 'F15222 '.           43240002
               10  FILLER           PIC X(7) VALUE 'F15229 '.           43250002
               10  FILLER           PIC X(7) VALUE 'F1523  '.           43260002
               10  FILLER           PIC X(7) VALUE 'F15251 '.           43270002
               10  FILLER           PIC X(7) VALUE 'F15920 '.           43280002
               10  FILLER           PIC X(7) VALUE 'F15921 '.           43290002
               10  FILLER           PIC X(7) VALUE 'F15922 '.           43300002
               10  FILLER           PIC X(7) VALUE 'F15929 '.           43310002
               10  FILLER           PIC X(7) VALUE 'F1593  '.           43320002
               10  FILLER           PIC X(7) VALUE 'F15951 '.           43330002
               10  FILLER           PIC X(7) VALUE 'F16120 '.           43340002
               10  FILLER           PIC X(7) VALUE 'F16121 '.           43350002
               10  FILLER           PIC X(7) VALUE 'F16122 '.           43360002
               10  FILLER           PIC X(7) VALUE 'F16129 '.           43370002
               10  FILLER           PIC X(7) VALUE 'F16151 '.           43380002
               10  FILLER           PIC X(7) VALUE 'F16220 '.           43390002
               10  FILLER           PIC X(7) VALUE 'F16221 '.           43400002
               10  FILLER           PIC X(7) VALUE 'F16229 '.           43410002
               10  FILLER           PIC X(7) VALUE 'F16251 '.           43420002
               10  FILLER           PIC X(7) VALUE 'F16920 '.           43430002
               10  FILLER           PIC X(7) VALUE 'F16921 '.           43440002
               10  FILLER           PIC X(7) VALUE 'F16929 '.           43450002
               10  FILLER           PIC X(7) VALUE 'F16951 '.           43460002
               10  FILLER           PIC X(7) VALUE 'F17203 '.           43470002
               10  FILLER           PIC X(7) VALUE 'F17213 '.           43480002
               10  FILLER           PIC X(7) VALUE 'F17223 '.           43490002
               10  FILLER           PIC X(7) VALUE 'F17293 '.           43500002
               10  FILLER           PIC X(7) VALUE 'F18120 '.           43510002
               10  FILLER           PIC X(7) VALUE 'F18121 '.           43520002
               10  FILLER           PIC X(7) VALUE 'F18129 '.           43530002
               10  FILLER           PIC X(7) VALUE 'F18151 '.           43540002
               10  FILLER           PIC X(7) VALUE 'F18220 '.           43550002
               10  FILLER           PIC X(7) VALUE 'F18221 '.           43560002
               10  FILLER           PIC X(7) VALUE 'F18229 '.           43570002
               10  FILLER           PIC X(7) VALUE 'F18251 '.           43580002
               10  FILLER           PIC X(7) VALUE 'F18920 '.           43590002
               10  FILLER           PIC X(7) VALUE 'F18921 '.           43600002
               10  FILLER           PIC X(7) VALUE 'F18929 '.           43610002
               10  FILLER           PIC X(7) VALUE 'F18951 '.           43620002
               10  FILLER           PIC X(7) VALUE 'F19120 '.           43630002
               10  FILLER           PIC X(7) VALUE 'F19121 '.           43640002
               10  FILLER           PIC X(7) VALUE 'F19122 '.           43650002
               10  FILLER           PIC X(7) VALUE 'F19129 '.           43660002
               10  FILLER           PIC X(7) VALUE 'F19151 '.           43670002
               10  FILLER           PIC X(7) VALUE 'F19220 '.           43680002
               10  FILLER           PIC X(7) VALUE 'F19221 '.           43690002
               10  FILLER           PIC X(7) VALUE 'F19222 '.           43700002
               10  FILLER           PIC X(7) VALUE 'F19229 '.           43710002
               10  FILLER           PIC X(7) VALUE 'F19230 '.           43720002
               10  FILLER           PIC X(7) VALUE 'F19231 '.           43730002
               10  FILLER           PIC X(7) VALUE 'F19232 '.           43740002
               10  FILLER           PIC X(7) VALUE 'F19239 '.           43750002
               10  FILLER           PIC X(7) VALUE 'F19251 '.           43760002
               10  FILLER           PIC X(7) VALUE 'F19920 '.           43770002
               10  FILLER           PIC X(7) VALUE 'F19921 '.           43780002
               10  FILLER           PIC X(7) VALUE 'F19922 '.           43790002
               10  FILLER           PIC X(7) VALUE 'F19929 '.           43800002
               10  FILLER           PIC X(7) VALUE 'F19930 '.           43810002
               10  FILLER           PIC X(7) VALUE 'F19931 '.           43820002
               10  FILLER           PIC X(7) VALUE 'F19932 '.           43830002
               10  FILLER           PIC X(7) VALUE 'F19939 '.           43840002
               10  FILLER           PIC X(7) VALUE 'F19951 '.           43850002
           05  FILLER     REDEFINES CAT11-TABLE-DATA.                   43853102
               10  CAT11-DATA       OCCURS 149 TIMES                    43854002
                                    ASCENDING KEY IS CAT11-CODE         43860002
                                    INDEXED BY IX-CAT11.                43870002
                   15  CAT11-CODE   PIC X(7).                           43880002
                                                                        43890002
      ****************************************************************  43900002
      * CARDIAC CONDITIONS                                           *  43910002
      ****************************************************************  43920002
       01 CAT12-TABLE.                                                  43930002
           05  CAT12-TABLE-DATA.                                        43940002
               10  FILLER           PIC X(7) VALUE 'I010   '.           43950002
               10  FILLER           PIC X(7) VALUE 'I011   '.           43960002
               10  FILLER           PIC X(7) VALUE 'I012   '.           43970002
               10  FILLER           PIC X(7) VALUE 'I110   '.           43980002
               10  FILLER           PIC X(7) VALUE 'I270   '.           43990002
               10  FILLER           PIC X(7) VALUE 'I330   '.           44000002
               10  FILLER           PIC X(7) VALUE 'I339   '.           44010002
               10  FILLER           PIC X(7) VALUE 'I39    '.           44020002
           05  FILLER     REDEFINES CAT12-TABLE-DATA.                   44030002
               10  CAT12-DATA       OCCURS 8 TIMES                      44040002
                                    ASCENDING KEY IS CAT12-CODE         44050002
                                    INDEXED BY IX-CAT12.                44060002
                   15  CAT12-CODE   PIC X(7).                           44070002
                                                                        44080002
      ****************************************************************  44090002
      * GANGRENE                                                     *  44100002
      ****************************************************************  44110002
       01 CAT13-TABLE.                                                  44120002
           05  CAT13-TABLE-DATA.                                        44130002
               10  FILLER           PIC X(7) VALUE 'E0852  '.           44140002
               10  FILLER           PIC X(7) VALUE 'E0952  '.           44150002
               10  FILLER           PIC X(7) VALUE 'E1052  '.           44160002
               10  FILLER           PIC X(7) VALUE 'E1152  '.           44170002
               10  FILLER           PIC X(7) VALUE 'E1352  '.           44180002
               10  FILLER           PIC X(7) VALUE 'I70261 '.           44190002
               10  FILLER           PIC X(7) VALUE 'I70262 '.           44200002
               10  FILLER           PIC X(7) VALUE 'I70263 '.           44210002
               10  FILLER           PIC X(7) VALUE 'I70268 '.           44220002
               10  FILLER           PIC X(7) VALUE 'I70361 '.           44230002
               10  FILLER           PIC X(7) VALUE 'I70362 '.           44240002
               10  FILLER           PIC X(7) VALUE 'I70363 '.           44250002
               10  FILLER           PIC X(7) VALUE 'I70368 '.           44260002
               10  FILLER           PIC X(7) VALUE 'I70461 '.           44270002
               10  FILLER           PIC X(7) VALUE 'I70462 '.           44280002
               10  FILLER           PIC X(7) VALUE 'I70463 '.           44290002
               10  FILLER           PIC X(7) VALUE 'I70468 '.           44300002
               10  FILLER           PIC X(7) VALUE 'I70561 '.           44310002
               10  FILLER           PIC X(7) VALUE 'I70562 '.           44320002
               10  FILLER           PIC X(7) VALUE 'I70563 '.           44330002
               10  FILLER           PIC X(7) VALUE 'I70568 '.           44340002
               10  FILLER           PIC X(7) VALUE 'I70661 '.           44350002
               10  FILLER           PIC X(7) VALUE 'I70662 '.           44360002
               10  FILLER           PIC X(7) VALUE 'I70663 '.           44370002
               10  FILLER           PIC X(7) VALUE 'I70668 '.           44380002
               10  FILLER           PIC X(7) VALUE 'I70761 '.           44390002
               10  FILLER           PIC X(7) VALUE 'I70762 '.           44400002
               10  FILLER           PIC X(7) VALUE 'I70763 '.           44410002
               10  FILLER           PIC X(7) VALUE 'I70768 '.           44420002
               10  FILLER           PIC X(7) VALUE 'I7301  '.           44430002
               10  FILLER           PIC X(7) VALUE 'I96    '.           44440002
               10  FILLER           PIC X(7) VALUE 'K3531  '.           44441002
               10  FILLER           PIC X(7) VALUE 'K35891 '.           44442002
               10  FILLER           PIC X(7) VALUE 'K82A1  '.           44443002
           05  FILLER     REDEFINES CAT13-TABLE-DATA.                   44450002
               10  CAT13-DATA       OCCURS 34 TIMES                     44460002
                                    ASCENDING KEY IS CAT13-CODE         44470002
                                    INDEXED BY IX-CAT13.                44480002
                   15  CAT13-CODE   PIC X(7).                           44490002
                                                                        44500002
      ****************************************************************  44510002
      * CHRONIC OBSTRUCTIVE PULMONARY DISEASE - EFFECTIVE 10/01/2005 *  44520002
      ****************************************************************  44530002
       01 CAT14-TABLE.                                                  44540002
           05  CAT14-TABLE-DATA.                                        44550002
               10  FILLER           PIC X(7) VALUE 'J441   '.           44560002
               10  FILLER           PIC X(7) VALUE 'J470   '.           44570002
               10  FILLER           PIC X(7) VALUE 'J471   '.           44580002
               10  FILLER           PIC X(7) VALUE 'J860   '.           44590002
               10  FILLER           PIC X(7) VALUE 'J95850 '.           44600002
               10  FILLER           PIC X(7) VALUE 'J9610  '.           44610002
               10  FILLER           PIC X(7) VALUE 'J9611  '.           44620002
               10  FILLER           PIC X(7) VALUE 'J9612  '.           44630002
               10  FILLER           PIC X(7) VALUE 'J9620  '.           44640002
               10  FILLER           PIC X(7) VALUE 'J9621  '.           44650002
               10  FILLER           PIC X(7) VALUE 'J9622  '.           44660002
               10  FILLER           PIC X(7) VALUE 'Z9911  '.           44670002
               10  FILLER           PIC X(7) VALUE 'Z9912  '.           44680002
           05  FILLER     REDEFINES CAT14-TABLE-DATA.                   44690002
               10  CAT14-DATA       OCCURS 13 TIMES                     44700002
                                    ASCENDING KEY IS CAT14-CODE         44710002
                                    INDEXED BY IX-CAT14.                44720002
                   15  CAT14-CODE   PIC X(7).                           44730002
                                                                        44740002
      ****************************************************************  44750002
      * ARTIFICIAL OPENING - DIGESTIVE AND URINARY                   *  44760002
      ****************************************************************  44770002
       01 CAT15-TABLE.                                                  44780002
           05  CAT15-TABLE-DATA.                                        44790002
               10  FILLER           PIC X(7) VALUE 'K9400  '.           44800002
               10  FILLER           PIC X(7) VALUE 'K9401  '.           44810002
               10  FILLER           PIC X(7) VALUE 'K9402  '.           44820002
               10  FILLER           PIC X(7) VALUE 'K9403  '.           44830002
               10  FILLER           PIC X(7) VALUE 'K9409  '.           44840002
               10  FILLER           PIC X(7) VALUE 'K9410  '.           44850002
               10  FILLER           PIC X(7) VALUE 'K9411  '.           44860002
               10  FILLER           PIC X(7) VALUE 'K9412  '.           44870002
               10  FILLER           PIC X(7) VALUE 'K9413  '.           44880002
               10  FILLER           PIC X(7) VALUE 'K9419  '.           44890002
               10  FILLER           PIC X(7) VALUE 'N990   '.           44900002
               10  FILLER           PIC X(7) VALUE 'N99520 '.           44910002
               10  FILLER           PIC X(7) VALUE 'N99521 '.           44920002
               10  FILLER           PIC X(7) VALUE 'N99522 '.           44930002
               10  FILLER           PIC X(7) VALUE 'N99523 '.           44940002
               10  FILLER           PIC X(7) VALUE 'N99524 '.           44950002
               10  FILLER           PIC X(7) VALUE 'N99528 '.           44960002
               10  FILLER           PIC X(7) VALUE 'N99530 '.           44970002
               10  FILLER           PIC X(7) VALUE 'N99531 '.           44980002
               10  FILLER           PIC X(7) VALUE 'N99532 '.           44990002
               10  FILLER           PIC X(7) VALUE 'N99533 '.           45000002
               10  FILLER           PIC X(7) VALUE 'N99534 '.           45010002
               10  FILLER           PIC X(7) VALUE 'N99538 '.           45020002
               10  FILLER           PIC X(7) VALUE 'N9981  '.           45030002
               10  FILLER           PIC X(7) VALUE 'N9989  '.           45040002
               10  FILLER           PIC X(7) VALUE 'Z931   '.           45050002
               10  FILLER           PIC X(7) VALUE 'Z932   '.           45060002
               10  FILLER           PIC X(7) VALUE 'Z933   '.           45070002
               10  FILLER           PIC X(7) VALUE 'Z934   '.           45080002
               10  FILLER           PIC X(7) VALUE 'Z9350  '.           45090002
               10  FILLER           PIC X(7) VALUE 'Z9351  '.           45100002
               10  FILLER           PIC X(7) VALUE 'Z9352  '.           45110002
               10  FILLER           PIC X(7) VALUE 'Z9359  '.           45120002
               10  FILLER           PIC X(7) VALUE 'Z936   '.           45130002
           05  FILLER     REDEFINES CAT15-TABLE-DATA.                   45140002
               10  CAT15-DATA       OCCURS 34 TIMES                     45150002
                                    ASCENDING KEY IS CAT15-CODE         45160002
                                    INDEXED BY IX-CAT15.                45170002
                   15  CAT15-CODE   PIC X(7).                           45180002
                                                                        45190002
      ****************************************************************  45200002
      * SEVERE MUSCLOSKELETAL AND CONNECTIVE TISSUE                  *  45210002
      ****************************************************************  45220002
       01 CAT16-TABLE.                                                  45230002
           05  CAT16-TABLE-DATA.                                        45240002
               10  FILLER           PIC X(7) VALUE 'L4050  '.           45250002
               10  FILLER           PIC X(7) VALUE 'L4051  '.           45260002
               10  FILLER           PIC X(7) VALUE 'L4052  '.           45270002
               10  FILLER           PIC X(7) VALUE 'L4053  '.           45280002
               10  FILLER           PIC X(7) VALUE 'L4054  '.           45290002
               10  FILLER           PIC X(7) VALUE 'L4059  '.           45300002
               10  FILLER           PIC X(7) VALUE 'M320   '.           45310002
               10  FILLER           PIC X(7) VALUE 'M3210  '.           45320002
               10  FILLER           PIC X(7) VALUE 'M3211  '.           45330002
               10  FILLER           PIC X(7) VALUE 'M3212  '.           45340002
               10  FILLER           PIC X(7) VALUE 'M3213  '.           45350002
               10  FILLER           PIC X(7) VALUE 'M3214  '.           45360002
               10  FILLER           PIC X(7) VALUE 'M3215  '.           45370002
               10  FILLER           PIC X(7) VALUE 'M3219  '.           45380002
               10  FILLER           PIC X(7) VALUE 'M328   '.           45390002
               10  FILLER           PIC X(7) VALUE 'M329   '.           45400002
               10  FILLER           PIC X(7) VALUE 'M4620  '.           45410002
               10  FILLER           PIC X(7) VALUE 'M4621  '.           45420002
               10  FILLER           PIC X(7) VALUE 'M4622  '.           45430002
               10  FILLER           PIC X(7) VALUE 'M4623  '.           45440002
               10  FILLER           PIC X(7) VALUE 'M4624  '.           45450002
               10  FILLER           PIC X(7) VALUE 'M4625  '.           45460002
               10  FILLER           PIC X(7) VALUE 'M4626  '.           45470002
               10  FILLER           PIC X(7) VALUE 'M4627  '.           45480002
               10  FILLER           PIC X(7) VALUE 'M4628  '.           45490002
               10  FILLER           PIC X(7) VALUE 'M86011 '.           45500002
               10  FILLER           PIC X(7) VALUE 'M86012 '.           45510002
               10  FILLER           PIC X(7) VALUE 'M86021 '.           45520002
               10  FILLER           PIC X(7) VALUE 'M86022 '.           45530002
               10  FILLER           PIC X(7) VALUE 'M86031 '.           45540002
               10  FILLER           PIC X(7) VALUE 'M86032 '.           45550002
               10  FILLER           PIC X(7) VALUE 'M86041 '.           45560002
               10  FILLER           PIC X(7) VALUE 'M86042 '.           45570002
               10  FILLER           PIC X(7) VALUE 'M86051 '.           45580002
               10  FILLER           PIC X(7) VALUE 'M86052 '.           45590002
               10  FILLER           PIC X(7) VALUE 'M86061 '.           45600002
               10  FILLER           PIC X(7) VALUE 'M86062 '.           45610002
               10  FILLER           PIC X(7) VALUE 'M86071 '.           45620002
               10  FILLER           PIC X(7) VALUE 'M86072 '.           45630002
               10  FILLER           PIC X(7) VALUE 'M8608  '.           45640002
               10  FILLER           PIC X(7) VALUE 'M8609  '.           45650002
               10  FILLER           PIC X(7) VALUE 'M86111 '.           45660002
               10  FILLER           PIC X(7) VALUE 'M86112 '.           45670002
               10  FILLER           PIC X(7) VALUE 'M86121 '.           45680002
               10  FILLER           PIC X(7) VALUE 'M86122 '.           45690002
               10  FILLER           PIC X(7) VALUE 'M86131 '.           45700002
               10  FILLER           PIC X(7) VALUE 'M86132 '.           45710002
               10  FILLER           PIC X(7) VALUE 'M86141 '.           45720002
               10  FILLER           PIC X(7) VALUE 'M86142 '.           45730002
               10  FILLER           PIC X(7) VALUE 'M86151 '.           45740002
               10  FILLER           PIC X(7) VALUE 'M86152 '.           45750002
               10  FILLER           PIC X(7) VALUE 'M86161 '.           45760002
               10  FILLER           PIC X(7) VALUE 'M86162 '.           45770002
               10  FILLER           PIC X(7) VALUE 'M86171 '.           45780002
               10  FILLER           PIC X(7) VALUE 'M86172 '.           45790002
               10  FILLER           PIC X(7) VALUE 'M8618  '.           45800002
               10  FILLER           PIC X(7) VALUE 'M8619  '.           45810002
               10  FILLER           PIC X(7) VALUE 'M86211 '.           45820002
               10  FILLER           PIC X(7) VALUE 'M86212 '.           45830002
               10  FILLER           PIC X(7) VALUE 'M86221 '.           45840002
               10  FILLER           PIC X(7) VALUE 'M86222 '.           45850002
               10  FILLER           PIC X(7) VALUE 'M86231 '.           45860002
               10  FILLER           PIC X(7) VALUE 'M86232 '.           45870002
               10  FILLER           PIC X(7) VALUE 'M86241 '.           45880002
               10  FILLER           PIC X(7) VALUE 'M86242 '.           45890002
               10  FILLER           PIC X(7) VALUE 'M86251 '.           45900002
               10  FILLER           PIC X(7) VALUE 'M86252 '.           45910002
               10  FILLER           PIC X(7) VALUE 'M86261 '.           45920002
               10  FILLER           PIC X(7) VALUE 'M86262 '.           45930002
               10  FILLER           PIC X(7) VALUE 'M86271 '.           45940002
               10  FILLER           PIC X(7) VALUE 'M86272 '.           45950002
               10  FILLER           PIC X(7) VALUE 'M8628  '.           45960002
               10  FILLER           PIC X(7) VALUE 'M8629  '.           45970002
               10  FILLER           PIC X(7) VALUE 'M86311 '.           45980002
               10  FILLER           PIC X(7) VALUE 'M86312 '.           45990002
               10  FILLER           PIC X(7) VALUE 'M86321 '.           46000002
               10  FILLER           PIC X(7) VALUE 'M86322 '.           46010002
               10  FILLER           PIC X(7) VALUE 'M86331 '.           46020002
               10  FILLER           PIC X(7) VALUE 'M86332 '.           46030002
               10  FILLER           PIC X(7) VALUE 'M86341 '.           46040002
               10  FILLER           PIC X(7) VALUE 'M86342 '.           46050002
               10  FILLER           PIC X(7) VALUE 'M86351 '.           46060002
               10  FILLER           PIC X(7) VALUE 'M86352 '.           46070002
               10  FILLER           PIC X(7) VALUE 'M86361 '.           46080002
               10  FILLER           PIC X(7) VALUE 'M86362 '.           46090002
               10  FILLER           PIC X(7) VALUE 'M86371 '.           46100002
               10  FILLER           PIC X(7) VALUE 'M86372 '.           46110002
               10  FILLER           PIC X(7) VALUE 'M8638  '.           46120002
               10  FILLER           PIC X(7) VALUE 'M8639  '.           46130002
               10  FILLER           PIC X(7) VALUE 'M86411 '.           46140002
               10  FILLER           PIC X(7) VALUE 'M86412 '.           46150002
               10  FILLER           PIC X(7) VALUE 'M86421 '.           46160002
               10  FILLER           PIC X(7) VALUE 'M86422 '.           46170002
               10  FILLER           PIC X(7) VALUE 'M86431 '.           46180002
               10  FILLER           PIC X(7) VALUE 'M86432 '.           46190002
               10  FILLER           PIC X(7) VALUE 'M86441 '.           46200002
               10  FILLER           PIC X(7) VALUE 'M86442 '.           46210002
               10  FILLER           PIC X(7) VALUE 'M86451 '.           46220002
               10  FILLER           PIC X(7) VALUE 'M86452 '.           46230002
               10  FILLER           PIC X(7) VALUE 'M86461 '.           46240002
               10  FILLER           PIC X(7) VALUE 'M86462 '.           46250002
               10  FILLER           PIC X(7) VALUE 'M86471 '.           46260002
               10  FILLER           PIC X(7) VALUE 'M86472 '.           46270002
               10  FILLER           PIC X(7) VALUE 'M8648  '.           46280002
               10  FILLER           PIC X(7) VALUE 'M8649  '.           46290002
               10  FILLER           PIC X(7) VALUE 'M86511 '.           46300002
               10  FILLER           PIC X(7) VALUE 'M86512 '.           46310002
               10  FILLER           PIC X(7) VALUE 'M86521 '.           46320002
               10  FILLER           PIC X(7) VALUE 'M86522 '.           46330002
               10  FILLER           PIC X(7) VALUE 'M86531 '.           46340002
               10  FILLER           PIC X(7) VALUE 'M86532 '.           46350002
               10  FILLER           PIC X(7) VALUE 'M86541 '.           46360002
               10  FILLER           PIC X(7) VALUE 'M86542 '.           46370002
               10  FILLER           PIC X(7) VALUE 'M86551 '.           46380002
               10  FILLER           PIC X(7) VALUE 'M86552 '.           46390002
               10  FILLER           PIC X(7) VALUE 'M86561 '.           46400002
               10  FILLER           PIC X(7) VALUE 'M86562 '.           46410002
               10  FILLER           PIC X(7) VALUE 'M86571 '.           46420002
               10  FILLER           PIC X(7) VALUE 'M86572 '.           46430002
               10  FILLER           PIC X(7) VALUE 'M8658  '.           46440002
               10  FILLER           PIC X(7) VALUE 'M8659  '.           46450002
               10  FILLER           PIC X(7) VALUE 'M86611 '.           46460002
               10  FILLER           PIC X(7) VALUE 'M86612 '.           46470002
               10  FILLER           PIC X(7) VALUE 'M86621 '.           46480002
               10  FILLER           PIC X(7) VALUE 'M86622 '.           46490002
               10  FILLER           PIC X(7) VALUE 'M86631 '.           46500002
               10  FILLER           PIC X(7) VALUE 'M86632 '.           46510002
               10  FILLER           PIC X(7) VALUE 'M86641 '.           46520002
               10  FILLER           PIC X(7) VALUE 'M86642 '.           46530002
               10  FILLER           PIC X(7) VALUE 'M86651 '.           46540002
               10  FILLER           PIC X(7) VALUE 'M86652 '.           46550002
               10  FILLER           PIC X(7) VALUE 'M86661 '.           46560002
               10  FILLER           PIC X(7) VALUE 'M86662 '.           46570002
               10  FILLER           PIC X(7) VALUE 'M86671 '.           46580002
               10  FILLER           PIC X(7) VALUE 'M86672 '.           46590002
               10  FILLER           PIC X(7) VALUE 'M8668  '.           46600002
               10  FILLER           PIC X(7) VALUE 'M8669  '.           46610002
               10  FILLER           PIC X(7) VALUE 'M868X0 '.           46620002
               10  FILLER           PIC X(7) VALUE 'M868X1 '.           46630002
               10  FILLER           PIC X(7) VALUE 'M868X2 '.           46640002
               10  FILLER           PIC X(7) VALUE 'M868X3 '.           46650002
               10  FILLER           PIC X(7) VALUE 'M868X4 '.           46660002
               10  FILLER           PIC X(7) VALUE 'M868X5 '.           46670002
               10  FILLER           PIC X(7) VALUE 'M868X6 '.           46680002
               10  FILLER           PIC X(7) VALUE 'M868X7 '.           46690002
               10  FILLER           PIC X(7) VALUE 'M868X8 '.           46700002
               10  FILLER           PIC X(7) VALUE 'M869   '.           46710002
           05  FILLER     REDEFINES CAT16-TABLE-DATA.                   46720002
               10  CAT16-DATA       OCCURS 147 TIMES                    46730002
                                    ASCENDING KEY IS CAT16-CODE         46740002
                                    INDEXED BY IX-CAT16.                46750002
                   15  CAT16-CODE   PIC X(7).                           46760002
                                                                        46770002
      ****************************************************************  46780002
      * POISONING                                                    *  46790002
      ****************************************************************  46800002
       01 CAT17-TABLE.                                                  46810002
           05  CAT17-TABLE-DATA.                                        46820002
               10  FILLER           PIC X(7) VALUE 'T391X1A'.           46830002
               10  FILLER           PIC X(7) VALUE 'T391X2A'.           46840002
               10  FILLER           PIC X(7) VALUE 'T391X3A'.           46850002
               10  FILLER           PIC X(7) VALUE 'T391X4A'.           46860002
               10  FILLER           PIC X(7) VALUE 'T400X1A'.           46870002
               10  FILLER           PIC X(7) VALUE 'T400X2A'.           46880002
               10  FILLER           PIC X(7) VALUE 'T400X3A'.           46890002
               10  FILLER           PIC X(7) VALUE 'T400X4A'.           46900002
               10  FILLER           PIC X(7) VALUE 'T401X1A'.           46910002
               10  FILLER           PIC X(7) VALUE 'T401X2A'.           46920002
               10  FILLER           PIC X(7) VALUE 'T401X3A'.           46930002
               10  FILLER           PIC X(7) VALUE 'T401X4A'.           46940002
               10  FILLER           PIC X(7) VALUE 'T402X1A'.           46950002
               10  FILLER           PIC X(7) VALUE 'T402X2A'.           46960002
               10  FILLER           PIC X(7) VALUE 'T402X3A'.           46970002
               10  FILLER           PIC X(7) VALUE 'T402X4A'.           46980002
               10  FILLER           PIC X(7) VALUE 'T403X1A'.           46990002
               10  FILLER           PIC X(7) VALUE 'T403X2A'.           47000002
               10  FILLER           PIC X(7) VALUE 'T403X3A'.           47010002
               10  FILLER           PIC X(7) VALUE 'T403X4A'.           47020002
               10  FILLER           PIC X(7) VALUE 'T404X1A'.           47030002
               10  FILLER           PIC X(7) VALUE 'T404X2A'.           47040002
               10  FILLER           PIC X(7) VALUE 'T404X3A'.           47050002
               10  FILLER           PIC X(7) VALUE 'T404X4A'.           47060002
               10  FILLER           PIC X(7) VALUE 'T40601A'.           47070002
               10  FILLER           PIC X(7) VALUE 'T40602A'.           47080002
               10  FILLER           PIC X(7) VALUE 'T40603A'.           47090002
               10  FILLER           PIC X(7) VALUE 'T40604A'.           47100002
               10  FILLER           PIC X(7) VALUE 'T40691A'.           47110002
               10  FILLER           PIC X(7) VALUE 'T40692A'.           47120002
               10  FILLER           PIC X(7) VALUE 'T40693A'.           47130002
               10  FILLER           PIC X(7) VALUE 'T40694A'.           47140002
               10  FILLER           PIC X(7) VALUE 'T407X1A'.           47150002
               10  FILLER           PIC X(7) VALUE 'T407X2A'.           47160002
               10  FILLER           PIC X(7) VALUE 'T407X3A'.           47170002
               10  FILLER           PIC X(7) VALUE 'T407X4A'.           47180002
               10  FILLER           PIC X(7) VALUE 'T408X1A'.           47190002
               10  FILLER           PIC X(7) VALUE 'T408X2A'.           47200002
               10  FILLER           PIC X(7) VALUE 'T408X3A'.           47210002
               10  FILLER           PIC X(7) VALUE 'T408X4A'.           47220002
               10  FILLER           PIC X(7) VALUE 'T40901A'.           47230002
               10  FILLER           PIC X(7) VALUE 'T40902A'.           47240002
               10  FILLER           PIC X(7) VALUE 'T40903A'.           47250002
               10  FILLER           PIC X(7) VALUE 'T40904A'.           47260002
               10  FILLER           PIC X(7) VALUE 'T40991A'.           47270002
               10  FILLER           PIC X(7) VALUE 'T40992A'.           47280002
               10  FILLER           PIC X(7) VALUE 'T40993A'.           47290002
               10  FILLER           PIC X(7) VALUE 'T40994A'.           47300002
               10  FILLER           PIC X(7) VALUE 'T410X1A'.           47310002
               10  FILLER           PIC X(7) VALUE 'T410X2A'.           47320002
               10  FILLER           PIC X(7) VALUE 'T410X3A'.           47330002
               10  FILLER           PIC X(7) VALUE 'T410X4A'.           47340002
               10  FILLER           PIC X(7) VALUE 'T411X1A'.           47350002
               10  FILLER           PIC X(7) VALUE 'T411X2A'.           47360002
               10  FILLER           PIC X(7) VALUE 'T411X3A'.           47370002
               10  FILLER           PIC X(7) VALUE 'T411X4A'.           47380002
               10  FILLER           PIC X(7) VALUE 'T41201A'.           47390002
               10  FILLER           PIC X(7) VALUE 'T41202A'.           47400002
               10  FILLER           PIC X(7) VALUE 'T41203A'.           47410002
               10  FILLER           PIC X(7) VALUE 'T41204A'.           47420002
               10  FILLER           PIC X(7) VALUE 'T41291A'.           47430002
               10  FILLER           PIC X(7) VALUE 'T41292A'.           47440002
               10  FILLER           PIC X(7) VALUE 'T41293A'.           47450002
               10  FILLER           PIC X(7) VALUE 'T41294A'.           47460002
               10  FILLER           PIC X(7) VALUE 'T413X1A'.           47470002
               10  FILLER           PIC X(7) VALUE 'T413X2A'.           47480002
               10  FILLER           PIC X(7) VALUE 'T413X3A'.           47490002
               10  FILLER           PIC X(7) VALUE 'T413X4A'.           47500002
               10  FILLER           PIC X(7) VALUE 'T4141XA'.           47510002
               10  FILLER           PIC X(7) VALUE 'T4142XA'.           47520002
               10  FILLER           PIC X(7) VALUE 'T4143XA'.           47530002
               10  FILLER           PIC X(7) VALUE 'T4144XA'.           47540002
               10  FILLER           PIC X(7) VALUE 'T423X1A'.           47550002
               10  FILLER           PIC X(7) VALUE 'T423X2A'.           47560002
               10  FILLER           PIC X(7) VALUE 'T423X3A'.           47570002
               10  FILLER           PIC X(7) VALUE 'T423X4A'.           47580002
               10  FILLER           PIC X(7) VALUE 'T424X1A'.           47590002
               10  FILLER           PIC X(7) VALUE 'T424X2A'.           47600002
               10  FILLER           PIC X(7) VALUE 'T424X3A'.           47610002
               10  FILLER           PIC X(7) VALUE 'T424X4A'.           47620002
               10  FILLER           PIC X(7) VALUE 'T426X1A'.           47630002
               10  FILLER           PIC X(7) VALUE 'T426X2A'.           47640002
               10  FILLER           PIC X(7) VALUE 'T426X3A'.           47650002
               10  FILLER           PIC X(7) VALUE 'T426X4A'.           47660002
               10  FILLER           PIC X(7) VALUE 'T4271XA'.           47670002
               10  FILLER           PIC X(7) VALUE 'T4272XA'.           47680002
               10  FILLER           PIC X(7) VALUE 'T4273XA'.           47690002
               10  FILLER           PIC X(7) VALUE 'T4274XA'.           47700002
               10  FILLER           PIC X(7) VALUE 'T428X1A'.           47710002
               10  FILLER           PIC X(7) VALUE 'T428X2A'.           47720002
               10  FILLER           PIC X(7) VALUE 'T428X3A'.           47730002
               10  FILLER           PIC X(7) VALUE 'T428X4A'.           47740002
               10  FILLER           PIC X(7) VALUE 'T43011A'.           47750002
               10  FILLER           PIC X(7) VALUE 'T43012A'.           47760002
               10  FILLER           PIC X(7) VALUE 'T43013A'.           47770002
               10  FILLER           PIC X(7) VALUE 'T43014A'.           47780002
               10  FILLER           PIC X(7) VALUE 'T43021A'.           47790002
               10  FILLER           PIC X(7) VALUE 'T43022A'.           47800002
               10  FILLER           PIC X(7) VALUE 'T43023A'.           47810002
               10  FILLER           PIC X(7) VALUE 'T43024A'.           47820002
               10  FILLER           PIC X(7) VALUE 'T431X1A'.           47830002
               10  FILLER           PIC X(7) VALUE 'T431X2A'.           47840002
               10  FILLER           PIC X(7) VALUE 'T431X3A'.           47850002
               10  FILLER           PIC X(7) VALUE 'T431X4A'.           47860002
               10  FILLER           PIC X(7) VALUE 'T43201A'.           47870002
               10  FILLER           PIC X(7) VALUE 'T43202A'.           47880002
               10  FILLER           PIC X(7) VALUE 'T43203A'.           47890002
               10  FILLER           PIC X(7) VALUE 'T43204A'.           47900002
               10  FILLER           PIC X(7) VALUE 'T43211A'.           47910002
               10  FILLER           PIC X(7) VALUE 'T43212A'.           47920002
               10  FILLER           PIC X(7) VALUE 'T43213A'.           47930002
               10  FILLER           PIC X(7) VALUE 'T43214A'.           47940002
               10  FILLER           PIC X(7) VALUE 'T43221A'.           47950002
               10  FILLER           PIC X(7) VALUE 'T43222A'.           47960002
               10  FILLER           PIC X(7) VALUE 'T43223A'.           47970002
               10  FILLER           PIC X(7) VALUE 'T43224A'.           47980002
               10  FILLER           PIC X(7) VALUE 'T43291A'.           47990002
               10  FILLER           PIC X(7) VALUE 'T43292A'.           48000002
               10  FILLER           PIC X(7) VALUE 'T43293A'.           48010002
               10  FILLER           PIC X(7) VALUE 'T43294A'.           48020002
               10  FILLER           PIC X(7) VALUE 'T433X1A'.           48030002
               10  FILLER           PIC X(7) VALUE 'T433X2A'.           48040002
               10  FILLER           PIC X(7) VALUE 'T433X3A'.           48050002
               10  FILLER           PIC X(7) VALUE 'T433X4A'.           48060002
               10  FILLER           PIC X(7) VALUE 'T434X1A'.           48070002
               10  FILLER           PIC X(7) VALUE 'T434X2A'.           48080002
               10  FILLER           PIC X(7) VALUE 'T434X3A'.           48090002
               10  FILLER           PIC X(7) VALUE 'T434X4A'.           48100002
               10  FILLER           PIC X(7) VALUE 'T43501A'.           48110002
               10  FILLER           PIC X(7) VALUE 'T43502A'.           48120002
               10  FILLER           PIC X(7) VALUE 'T43503A'.           48130002
               10  FILLER           PIC X(7) VALUE 'T43504A'.           48140002
               10  FILLER           PIC X(7) VALUE 'T43591A'.           48150002
               10  FILLER           PIC X(7) VALUE 'T43592A'.           48160002
               10  FILLER           PIC X(7) VALUE 'T43593A'.           48170002
               10  FILLER           PIC X(7) VALUE 'T43594A'.           48180002
               10  FILLER           PIC X(7) VALUE 'T43601A'.           48190002
               10  FILLER           PIC X(7) VALUE 'T43602A'.           48200002
               10  FILLER           PIC X(7) VALUE 'T43603A'.           48210002
               10  FILLER           PIC X(7) VALUE 'T43604A'.           48220002
               10  FILLER           PIC X(7) VALUE 'T43611A'.           48230002
               10  FILLER           PIC X(7) VALUE 'T43612A'.           48240002
               10  FILLER           PIC X(7) VALUE 'T43613A'.           48250002
               10  FILLER           PIC X(7) VALUE 'T43614A'.           48260002
               10  FILLER           PIC X(7) VALUE 'T43621A'.           48270002
               10  FILLER           PIC X(7) VALUE 'T43622A'.           48280002
               10  FILLER           PIC X(7) VALUE 'T43623A'.           48290002
               10  FILLER           PIC X(7) VALUE 'T43624A'.           48300002
               10  FILLER           PIC X(7) VALUE 'T43631A'.           48310002
               10  FILLER           PIC X(7) VALUE 'T43632A'.           48320002
               10  FILLER           PIC X(7) VALUE 'T43633A'.           48330002
               10  FILLER           PIC X(7) VALUE 'T43634A'.           48340002
               10  FILLER           PIC X(7) VALUE 'T43641A'.           48350002
               10  FILLER           PIC X(7) VALUE 'T43642A'.           48360002
               10  FILLER           PIC X(7) VALUE 'T43643A'.           48370002
               10  FILLER           PIC X(7) VALUE 'T43644A'.           48380002
               10  FILLER           PIC X(7) VALUE 'T43691A'.           48390002
               10  FILLER           PIC X(7) VALUE 'T43692A'.           48400002
               10  FILLER           PIC X(7) VALUE 'T43693A'.           48410002
               10  FILLER           PIC X(7) VALUE 'T43694A'.           48420002
               10  FILLER           PIC X(7) VALUE 'T438X1A'.           48430002
               10  FILLER           PIC X(7) VALUE 'T438X2A'.           48440002
               10  FILLER           PIC X(7) VALUE 'T438X3A'.           48450002
               10  FILLER           PIC X(7) VALUE 'T438X4A'.           48460002
               10  FILLER           PIC X(7) VALUE 'T4391XA'.           48470002
               10  FILLER           PIC X(7) VALUE 'T4392XA'.           48480002
               10  FILLER           PIC X(7) VALUE 'T4393XA'.           48490002
               10  FILLER           PIC X(7) VALUE 'T4394XA'.           48500002
               10  FILLER           PIC X(7) VALUE 'T505X1A'.           48510002
               10  FILLER           PIC X(7) VALUE 'T505X2A'.           48520002
               10  FILLER           PIC X(7) VALUE 'T505X3A'.           48530002
               10  FILLER           PIC X(7) VALUE 'T505X4A'.           48540002
               10  FILLER           PIC X(7) VALUE 'T510X1A'.           48550002
               10  FILLER           PIC X(7) VALUE 'T510X2A'.           48560002
               10  FILLER           PIC X(7) VALUE 'T510X3A'.           48570002
               10  FILLER           PIC X(7) VALUE 'T510X4A'.           48580002
               10  FILLER           PIC X(7) VALUE 'T511X1A'.           48590002
               10  FILLER           PIC X(7) VALUE 'T511X2A'.           48600002
               10  FILLER           PIC X(7) VALUE 'T511X3A'.           48610002
               10  FILLER           PIC X(7) VALUE 'T511X4A'.           48620002
               10  FILLER           PIC X(7) VALUE 'T512X1A'.           48630002
               10  FILLER           PIC X(7) VALUE 'T512X2A'.           48640002
               10  FILLER           PIC X(7) VALUE 'T512X3A'.           48650002
               10  FILLER           PIC X(7) VALUE 'T512X4A'.           48660002
               10  FILLER           PIC X(7) VALUE 'T513X1A'.           48670002
               10  FILLER           PIC X(7) VALUE 'T513X2A'.           48680002
               10  FILLER           PIC X(7) VALUE 'T513X3A'.           48690002
               10  FILLER           PIC X(7) VALUE 'T513X4A'.           48700002
               10  FILLER           PIC X(7) VALUE 'T518X1A'.           48710002
               10  FILLER           PIC X(7) VALUE 'T518X2A'.           48720002
               10  FILLER           PIC X(7) VALUE 'T518X3A'.           48730002
               10  FILLER           PIC X(7) VALUE 'T518X4A'.           48740002
               10  FILLER           PIC X(7) VALUE 'T5191XA'.           48750002
               10  FILLER           PIC X(7) VALUE 'T5192XA'.           48760002
               10  FILLER           PIC X(7) VALUE 'T5193XA'.           48770002
               10  FILLER           PIC X(7) VALUE 'T5194XA'.           48780002
               10  FILLER           PIC X(7) VALUE 'T5391XA'.           48790002
               10  FILLER           PIC X(7) VALUE 'T5392XA'.           48800002
               10  FILLER           PIC X(7) VALUE 'T5393XA'.           48810002
               10  FILLER           PIC X(7) VALUE 'T5394XA'.           48820002
               10  FILLER           PIC X(7) VALUE 'T540X1A'.           48830002
               10  FILLER           PIC X(7) VALUE 'T540X2A'.           48840002
               10  FILLER           PIC X(7) VALUE 'T540X3A'.           48850002
               10  FILLER           PIC X(7) VALUE 'T540X4A'.           48860002
               10  FILLER           PIC X(7) VALUE 'T541X1A'.           48870002
               10  FILLER           PIC X(7) VALUE 'T541X2A'.           48880002
               10  FILLER           PIC X(7) VALUE 'T541X3A'.           48890002
               10  FILLER           PIC X(7) VALUE 'T541X4A'.           48900002
               10  FILLER           PIC X(7) VALUE 'T542X1A'.           48910002
               10  FILLER           PIC X(7) VALUE 'T542X2A'.           48920002
               10  FILLER           PIC X(7) VALUE 'T542X3A'.           48930002
               10  FILLER           PIC X(7) VALUE 'T542X4A'.           48940002
               10  FILLER           PIC X(7) VALUE 'T543X1A'.           48950002
               10  FILLER           PIC X(7) VALUE 'T543X2A'.           48960002
               10  FILLER           PIC X(7) VALUE 'T543X3A'.           48970002
               10  FILLER           PIC X(7) VALUE 'T543X4A'.           48980002
               10  FILLER           PIC X(7) VALUE 'T5491XA'.           48990002
               10  FILLER           PIC X(7) VALUE 'T5492XA'.           49000002
               10  FILLER           PIC X(7) VALUE 'T5493XA'.           49010002
               10  FILLER           PIC X(7) VALUE 'T5494XA'.           49020002
               10  FILLER           PIC X(7) VALUE 'T550X1A'.           49030002
               10  FILLER           PIC X(7) VALUE 'T550X2A'.           49040002
               10  FILLER           PIC X(7) VALUE 'T550X3A'.           49050002
               10  FILLER           PIC X(7) VALUE 'T550X4A'.           49060002
               10  FILLER           PIC X(7) VALUE 'T551X1A'.           49070002
               10  FILLER           PIC X(7) VALUE 'T551X2A'.           49080002
               10  FILLER           PIC X(7) VALUE 'T551X3A'.           49090002
               10  FILLER           PIC X(7) VALUE 'T551X4A'.           49100002
               10  FILLER           PIC X(7) VALUE 'T560X1A'.           49110002
               10  FILLER           PIC X(7) VALUE 'T560X2A'.           49120002
               10  FILLER           PIC X(7) VALUE 'T560X3A'.           49130002
               10  FILLER           PIC X(7) VALUE 'T560X4A'.           49140002
               10  FILLER           PIC X(7) VALUE 'T571X1A'.           49150002
               10  FILLER           PIC X(7) VALUE 'T571X2A'.           49160002
               10  FILLER           PIC X(7) VALUE 'T571X3A'.           49170002
               10  FILLER           PIC X(7) VALUE 'T571X4A'.           49180002
               10  FILLER           PIC X(7) VALUE 'T5801XA'.           49190002
               10  FILLER           PIC X(7) VALUE 'T5802XA'.           49200002
               10  FILLER           PIC X(7) VALUE 'T5803XA'.           49210002
               10  FILLER           PIC X(7) VALUE 'T5804XA'.           49220002
               10  FILLER           PIC X(7) VALUE 'T5811XA'.           49230002
               10  FILLER           PIC X(7) VALUE 'T5812XA'.           49240002
               10  FILLER           PIC X(7) VALUE 'T5813XA'.           49250002
               10  FILLER           PIC X(7) VALUE 'T5814XA'.           49260002
               10  FILLER           PIC X(7) VALUE 'T582X1A'.           49270002
               10  FILLER           PIC X(7) VALUE 'T582X2A'.           49280002
               10  FILLER           PIC X(7) VALUE 'T582X3A'.           49290002
               10  FILLER           PIC X(7) VALUE 'T582X4A'.           49300002
               10  FILLER           PIC X(7) VALUE 'T588X1A'.           49310002
               10  FILLER           PIC X(7) VALUE 'T588X2A'.           49320002
               10  FILLER           PIC X(7) VALUE 'T588X3A'.           49330002
               10  FILLER           PIC X(7) VALUE 'T588X4A'.           49340002
               10  FILLER           PIC X(7) VALUE 'T5891XA'.           49350002
               10  FILLER           PIC X(7) VALUE 'T5892XA'.           49360002
               10  FILLER           PIC X(7) VALUE 'T5893XA'.           49370002
               10  FILLER           PIC X(7) VALUE 'T5894XA'.           49380002
               10  FILLER           PIC X(7) VALUE 'T600X1A'.           49390002
               10  FILLER           PIC X(7) VALUE 'T600X2A'.           49400002
               10  FILLER           PIC X(7) VALUE 'T600X3A'.           49410002
               10  FILLER           PIC X(7) VALUE 'T600X4A'.           49420002
               10  FILLER           PIC X(7) VALUE 'T601X1A'.           49430002
               10  FILLER           PIC X(7) VALUE 'T601X2A'.           49440002
               10  FILLER           PIC X(7) VALUE 'T601X3A'.           49450002
               10  FILLER           PIC X(7) VALUE 'T601X4A'.           49460002
               10  FILLER           PIC X(7) VALUE 'T602X1A'.           49470002
               10  FILLER           PIC X(7) VALUE 'T602X2A'.           49480002
               10  FILLER           PIC X(7) VALUE 'T602X3A'.           49490002
               10  FILLER           PIC X(7) VALUE 'T602X4A'.           49500002
               10  FILLER           PIC X(7) VALUE 'T604X1A'.           49510002
               10  FILLER           PIC X(7) VALUE 'T604X2A'.           49520002
               10  FILLER           PIC X(7) VALUE 'T604X3A'.           49530002
               10  FILLER           PIC X(7) VALUE 'T604X4A'.           49540002
               10  FILLER           PIC X(7) VALUE 'T608X1A'.           49550002
               10  FILLER           PIC X(7) VALUE 'T608X2A'.           49560002
               10  FILLER           PIC X(7) VALUE 'T608X3A'.           49570002
               10  FILLER           PIC X(7) VALUE 'T608X4A'.           49580002
               10  FILLER           PIC X(7) VALUE 'T6091XA'.           49590002
               10  FILLER           PIC X(7) VALUE 'T6092XA'.           49600002
               10  FILLER           PIC X(7) VALUE 'T6093XA'.           49610002
               10  FILLER           PIC X(7) VALUE 'T6094XA'.           49620002
               10  FILLER           PIC X(7) VALUE 'T63001A'.           49630002
               10  FILLER           PIC X(7) VALUE 'T63002A'.           49640002
               10  FILLER           PIC X(7) VALUE 'T63003A'.           49650002
               10  FILLER           PIC X(7) VALUE 'T63004A'.           49660002
               10  FILLER           PIC X(7) VALUE 'T63011A'.           49670002
               10  FILLER           PIC X(7) VALUE 'T63012A'.           49680002
               10  FILLER           PIC X(7) VALUE 'T63013A'.           49690002
               10  FILLER           PIC X(7) VALUE 'T63014A'.           49700002
               10  FILLER           PIC X(7) VALUE 'T63021A'.           49710002
               10  FILLER           PIC X(7) VALUE 'T63022A'.           49720002
               10  FILLER           PIC X(7) VALUE 'T63023A'.           49730002
               10  FILLER           PIC X(7) VALUE 'T63024A'.           49740002
               10  FILLER           PIC X(7) VALUE 'T63031A'.           49750002
               10  FILLER           PIC X(7) VALUE 'T63032A'.           49760002
               10  FILLER           PIC X(7) VALUE 'T63033A'.           49770002
               10  FILLER           PIC X(7) VALUE 'T63034A'.           49780002
               10  FILLER           PIC X(7) VALUE 'T63041A'.           49790002
               10  FILLER           PIC X(7) VALUE 'T63042A'.           49800002
               10  FILLER           PIC X(7) VALUE 'T63043A'.           49810002
               10  FILLER           PIC X(7) VALUE 'T63044A'.           49820002
               10  FILLER           PIC X(7) VALUE 'T63061A'.           49830002
               10  FILLER           PIC X(7) VALUE 'T63062A'.           49840002
               10  FILLER           PIC X(7) VALUE 'T63063A'.           49850002
               10  FILLER           PIC X(7) VALUE 'T63064A'.           49860002
               10  FILLER           PIC X(7) VALUE 'T63071A'.           49870002
               10  FILLER           PIC X(7) VALUE 'T63072A'.           49880002
               10  FILLER           PIC X(7) VALUE 'T63073A'.           49890002
               10  FILLER           PIC X(7) VALUE 'T63074A'.           49900002
               10  FILLER           PIC X(7) VALUE 'T63081A'.           49910002
               10  FILLER           PIC X(7) VALUE 'T63082A'.           49920002
               10  FILLER           PIC X(7) VALUE 'T63083A'.           49930002
               10  FILLER           PIC X(7) VALUE 'T63084A'.           49940002
               10  FILLER           PIC X(7) VALUE 'T63091A'.           49950002
               10  FILLER           PIC X(7) VALUE 'T63092A'.           49960002
               10  FILLER           PIC X(7) VALUE 'T63093A'.           49970002
               10  FILLER           PIC X(7) VALUE 'T63094A'.           49980002
               10  FILLER           PIC X(7) VALUE 'T63111A'.           49990002
               10  FILLER           PIC X(7) VALUE 'T63112A'.           50000002
               10  FILLER           PIC X(7) VALUE 'T63113A'.           50010002
               10  FILLER           PIC X(7) VALUE 'T63114A'.           50020002
               10  FILLER           PIC X(7) VALUE 'T63121A'.           50030002
               10  FILLER           PIC X(7) VALUE 'T63122A'.           50040002
               10  FILLER           PIC X(7) VALUE 'T63123A'.           50050002
               10  FILLER           PIC X(7) VALUE 'T63124A'.           50060002
               10  FILLER           PIC X(7) VALUE 'T63191A'.           50070002
               10  FILLER           PIC X(7) VALUE 'T63192A'.           50080002
               10  FILLER           PIC X(7) VALUE 'T63193A'.           50090002
               10  FILLER           PIC X(7) VALUE 'T63194A'.           50100002
               10  FILLER           PIC X(7) VALUE 'T632X1A'.           50110002
               10  FILLER           PIC X(7) VALUE 'T632X2A'.           50120002
               10  FILLER           PIC X(7) VALUE 'T632X3A'.           50130002
               10  FILLER           PIC X(7) VALUE 'T632X4A'.           50140002
               10  FILLER           PIC X(7) VALUE 'T63301A'.           50150002
               10  FILLER           PIC X(7) VALUE 'T63302A'.           50160002
               10  FILLER           PIC X(7) VALUE 'T63303A'.           50170002
               10  FILLER           PIC X(7) VALUE 'T63304A'.           50180002
               10  FILLER           PIC X(7) VALUE 'T63311A'.           50190002
               10  FILLER           PIC X(7) VALUE 'T63312A'.           50200002
               10  FILLER           PIC X(7) VALUE 'T63313A'.           50210002
               10  FILLER           PIC X(7) VALUE 'T63314A'.           50220002
               10  FILLER           PIC X(7) VALUE 'T63321A'.           50230002
               10  FILLER           PIC X(7) VALUE 'T63322A'.           50240002
               10  FILLER           PIC X(7) VALUE 'T63323A'.           50250002
               10  FILLER           PIC X(7) VALUE 'T63324A'.           50260002
               10  FILLER           PIC X(7) VALUE 'T63331A'.           50270002
               10  FILLER           PIC X(7) VALUE 'T63332A'.           50280002
               10  FILLER           PIC X(7) VALUE 'T63333A'.           50290002
               10  FILLER           PIC X(7) VALUE 'T63334A'.           50300002
               10  FILLER           PIC X(7) VALUE 'T63391A'.           50310002
               10  FILLER           PIC X(7) VALUE 'T63392A'.           50320002
               10  FILLER           PIC X(7) VALUE 'T63393A'.           50330002
               10  FILLER           PIC X(7) VALUE 'T63394A'.           50340002
               10  FILLER           PIC X(7) VALUE 'T63411A'.           50350002
               10  FILLER           PIC X(7) VALUE 'T63412A'.           50360002
               10  FILLER           PIC X(7) VALUE 'T63413A'.           50370002
               10  FILLER           PIC X(7) VALUE 'T63414A'.           50380002
               10  FILLER           PIC X(7) VALUE 'T63421A'.           50390002
               10  FILLER           PIC X(7) VALUE 'T63422A'.           50400002
               10  FILLER           PIC X(7) VALUE 'T63423A'.           50410002
               10  FILLER           PIC X(7) VALUE 'T63424A'.           50420002
               10  FILLER           PIC X(7) VALUE 'T63431A'.           50430002
               10  FILLER           PIC X(7) VALUE 'T63432A'.           50440002
               10  FILLER           PIC X(7) VALUE 'T63433A'.           50450002
               10  FILLER           PIC X(7) VALUE 'T63434A'.           50460002
               10  FILLER           PIC X(7) VALUE 'T63441A'.           50470002
               10  FILLER           PIC X(7) VALUE 'T63442A'.           50480002
               10  FILLER           PIC X(7) VALUE 'T63443A'.           50490002
               10  FILLER           PIC X(7) VALUE 'T63444A'.           50500002
               10  FILLER           PIC X(7) VALUE 'T63451A'.           50510002
               10  FILLER           PIC X(7) VALUE 'T63452A'.           50520002
               10  FILLER           PIC X(7) VALUE 'T63453A'.           50530002
               10  FILLER           PIC X(7) VALUE 'T63454A'.           50540002
               10  FILLER           PIC X(7) VALUE 'T63461A'.           50550002
               10  FILLER           PIC X(7) VALUE 'T63462A'.           50560002
               10  FILLER           PIC X(7) VALUE 'T63463A'.           50570002
               10  FILLER           PIC X(7) VALUE 'T63464A'.           50580002
               10  FILLER           PIC X(7) VALUE 'T63481A'.           50590002
               10  FILLER           PIC X(7) VALUE 'T63482A'.           50600002
               10  FILLER           PIC X(7) VALUE 'T63483A'.           50610002
               10  FILLER           PIC X(7) VALUE 'T63484A'.           50620002
               10  FILLER           PIC X(7) VALUE 'T63511A'.           50630002
               10  FILLER           PIC X(7) VALUE 'T63512A'.           50640002
               10  FILLER           PIC X(7) VALUE 'T63513A'.           50650002
               10  FILLER           PIC X(7) VALUE 'T63514A'.           50660002
               10  FILLER           PIC X(7) VALUE 'T63591A'.           50670002
               10  FILLER           PIC X(7) VALUE 'T63592A'.           50680002
               10  FILLER           PIC X(7) VALUE 'T63593A'.           50690002
               10  FILLER           PIC X(7) VALUE 'T63594A'.           50700002
               10  FILLER           PIC X(7) VALUE 'T63611A'.           50710002
               10  FILLER           PIC X(7) VALUE 'T63612A'.           50720002
               10  FILLER           PIC X(7) VALUE 'T63613A'.           50730002
               10  FILLER           PIC X(7) VALUE 'T63614A'.           50740002
               10  FILLER           PIC X(7) VALUE 'T63621A'.           50750002
               10  FILLER           PIC X(7) VALUE 'T63622A'.           50760002
               10  FILLER           PIC X(7) VALUE 'T63623A'.           50770002
               10  FILLER           PIC X(7) VALUE 'T63624A'.           50780002
               10  FILLER           PIC X(7) VALUE 'T63631A'.           50790002
               10  FILLER           PIC X(7) VALUE 'T63632A'.           50800002
               10  FILLER           PIC X(7) VALUE 'T63633A'.           50810002
               10  FILLER           PIC X(7) VALUE 'T63634A'.           50820002
               10  FILLER           PIC X(7) VALUE 'T63691A'.           50830002
               10  FILLER           PIC X(7) VALUE 'T63692A'.           50840002
               10  FILLER           PIC X(7) VALUE 'T63693A'.           50850002
               10  FILLER           PIC X(7) VALUE 'T63694A'.           50860002
               10  FILLER           PIC X(7) VALUE 'T63711A'.           50870002
               10  FILLER           PIC X(7) VALUE 'T63712A'.           50880002
               10  FILLER           PIC X(7) VALUE 'T63713A'.           50890002
               10  FILLER           PIC X(7) VALUE 'T63714A'.           50900002
               10  FILLER           PIC X(7) VALUE 'T63791A'.           50910002
               10  FILLER           PIC X(7) VALUE 'T63792A'.           50920002
               10  FILLER           PIC X(7) VALUE 'T63793A'.           50930002
               10  FILLER           PIC X(7) VALUE 'T63794A'.           50940002
               10  FILLER           PIC X(7) VALUE 'T63811A'.           50950002
               10  FILLER           PIC X(7) VALUE 'T63812A'.           50960002
               10  FILLER           PIC X(7) VALUE 'T63813A'.           50970002
               10  FILLER           PIC X(7) VALUE 'T63814A'.           50980002
               10  FILLER           PIC X(7) VALUE 'T63821A'.           50990002
               10  FILLER           PIC X(7) VALUE 'T63822A'.           51000002
               10  FILLER           PIC X(7) VALUE 'T63823A'.           51010002
               10  FILLER           PIC X(7) VALUE 'T63824A'.           51020002
               10  FILLER           PIC X(7) VALUE 'T63831A'.           51030002
               10  FILLER           PIC X(7) VALUE 'T63832A'.           51040002
               10  FILLER           PIC X(7) VALUE 'T63833A'.           51050002
               10  FILLER           PIC X(7) VALUE 'T63834A'.           51060002
               10  FILLER           PIC X(7) VALUE 'T63891A'.           51070002
               10  FILLER           PIC X(7) VALUE 'T63892A'.           51080002
               10  FILLER           PIC X(7) VALUE 'T63893A'.           51090002
               10  FILLER           PIC X(7) VALUE 'T63894A'.           51100002
               10  FILLER           PIC X(7) VALUE 'T6391XA'.           51110002
               10  FILLER           PIC X(7) VALUE 'T6392XA'.           51120002
               10  FILLER           PIC X(7) VALUE 'T6393XA'.           51130002
               10  FILLER           PIC X(7) VALUE 'T6394XA'.           51140002
               10  FILLER           PIC X(7) VALUE 'T6401XA'.           51150002
               10  FILLER           PIC X(7) VALUE 'T6402XA'.           51160002
               10  FILLER           PIC X(7) VALUE 'T6403XA'.           51170002
               10  FILLER           PIC X(7) VALUE 'T6404XA'.           51180002
               10  FILLER           PIC X(7) VALUE 'T6481XA'.           51190002
               10  FILLER           PIC X(7) VALUE 'T6482XA'.           51200002
               10  FILLER           PIC X(7) VALUE 'T6483XA'.           51210002
               10  FILLER           PIC X(7) VALUE 'T6484XA'.           51220002
               10  FILLER           PIC X(7) VALUE 'T650X1A'.           51230002
               10  FILLER           PIC X(7) VALUE 'T650X2A'.           51240002
               10  FILLER           PIC X(7) VALUE 'T650X3A'.           51250002
               10  FILLER           PIC X(7) VALUE 'T650X4A'.           51260002
               10  FILLER           PIC X(7) VALUE 'T651X1A'.           51261002
               10  FILLER           PIC X(7) VALUE 'T651X2A'.           51262002
               10  FILLER           PIC X(7) VALUE 'T651X3A'.           51263002
               10  FILLER           PIC X(7) VALUE 'T651X4A'.           51264002
           05  FILLER     REDEFINES CAT17-TABLE-DATA.                   51270002
               10  CAT17-DATA       OCCURS 448 TIMES                    51280002
                                    ASCENDING KEY IS CAT17-CODE         51290002
                                    INDEXED BY IX-CAT17.                51300002
                   15  CAT17-CODE   PIC X(7).                           51310002
                                                                        51320002
