         TITLE 'IEFJSREQ-SUBSYSTEM REQUEST ROUTER                    '  00001000
IEFJSREQ CSECT ,                                                   0001 00002000
@MAINENT DS    0H                                                  0001 00003000
         USING *,@15                                               0001 00004000
         B     @PROLOG                                             0001 00005000
         DC    AL1(16)                                             0001 00006000
         DC    C'IEFJSREQ  72.357'                                 0001 00007000
         DROP  @15                                                      00008000
@PROLOG  STM   @14,@12,12(@13)                                     0001 00009000
         BALR  @12,0                                               0001 00010000
@PSTART  DS    0H                                                  0001 00011000
         USING @PSTART,@12                                         0001 00012000
JSCBDISP EQU 188                                                        00013000
JSCBAOS1 EQU  72                                                        00014000
JSCBAOS2 EQU 192                                                        00015000
*   PARMPTR=R1;                     /* SAVE ADDRESS OF PARAMETER LIST*/ 00016000
         LR    PARMPTR,R1                                          0042 00017000
*   IF SSOBPTR=0 THEN                                              0043 00018000
         ICM   @02,7,SSOBPTR(PARMPTR)                              0043 00019000
         BNZ   @RF00043                                            0043 00020000
*     RETURN CODE(SSRTDIST);        /* IF THE SSOB PTR IS NOT      0044 00021000
*                                      POSITIVE,RETURN TO THE CALLER    00022000
*                                      WITH A DISASTROUS ERROR CODE  */ 00023000
*                                                                  0044 00024000
         LA    @15,16                                              0044 00025000
         L     @14,12(,@13)                                        0044 00026000
         LM    @00,@12,20(@13)                                     0044 00027000
         BR    @14                                                 0044 00028000
*   /*****************************************************************/ 00029000
*   /*                                                               */ 00030000
*   /* THIS SECTION OF CODE DETERMINES IF THE SSIB PTR IN THE SSOB IS*/ 00031000
*   /* ZERO. IF IT IS, THE SSIB POINTED TO BY THE ACTIVE JSCB IS USED*/ 00032000
*   /* IF IT IS NOT ZERO.                                            */ 00033000
*   /*                                                               */ 00034000
*   /*****************************************************************/ 00035000
*                                                                  0045 00036000
*   IF SSOBSSIB=0 THEN                                             0045 00037000
@RF00043 SR    @02,@02                                             0045 00038000
         SR    @15,@15                                             0045 00039000
         ICM   @15,7,SSOBPTR(PARMPTR)                              0045 00040000
         C     @02,SSOBSSIB(,@15)                                  0045 00041000
         BNE   @RF00045                                            0045 00042000
*     DO;                           /* IF THE SSIB PTR IN THE SSOB IS   00043000
*                                      ZERO,USE THE SSIB POINTED TO     00044000
*                                      BY THE ACTIVE JSCB IF IT IS 0046 00045000
*                                      NOT ZERO.                     */ 00046000
*       R1=JSCBACT;                 /* GET ADDR OF ACTIVE JSCB       */ 00047000
         L     @15,CVTPTR                                          0047 00048000
         L     @15,CVTTCBP(,@15)                                   0047 00049000
         L     @15,CURRTCB(,@15)                                   0047 00050000
         L     @15,TCBJSCB(,@15)                                   0047 00051000
         L     R1,JSCBACT(,@15)                                    0047 00052000
*       RESPECIFY                                                  0048 00053000
*         IEZJSCB BASED(R1);                                       0048 00054000
*       IF JSCBSSIB=0 THEN                                         0049 00055000
         C     @02,JSCBSSIB(,R1)                                   0049 00056000
         BNE   @RF00049                                            0049 00057000
*         RETURN CODE(SSRTDIST);    /* IF THE SSIB PTR IN THE ACTIVE    00058000
*                                      JSCB IS ALSO ZERO, RETURN TO     00059000
*                                      THE CALLER WITH A DISASTROUS     00060000
*                                      ERROR CODE                    */ 00061000
         LA    @15,16                                              0050 00062000
         L     @14,12(,@13)                                        0050 00063000
         LM    @00,@12,20(@13)                                     0050 00064000
         BR    @14                                                 0050 00065000
*       SSOBSSIB=JSCBSSIB;          /* IF ITS NOT ZERO, USE IT       */ 00066000
@RF00049 SR    @02,@02                                             0051 00067000
         ICM   @02,7,SSOBPTR(PARMPTR)                              0051 00068000
         MVC   SSOBSSIB(4,@02),JSCBSSIB(R1)                        0051 00069000
*     END;                                                         0052 00070000
*   RESPECIFY                                                      0053 00071000
*     R1 UNRSTD;                                                   0053 00072000
*                                                                  0053 00073000
@RF00045 DS    0H                                                  0054 00074000
*   /*****************************************************************/ 00075000
*   /*                                                               */ 00076000
*   /* THIS SECTION OF CODE VALIDITY CHECKS THE SSOB AND AND SSIB    */ 00077000
*   /* LENGTHS AND BLOCK IDS. IF THEY ARE INVALID, CONTROL IS        */ 00078000
*   /* RETURNED TO THE CALLER PASSING BACK A RETURN CODE INDICATING A*/ 00079000
*   /* BAD SSOB/SSIB LENGTH/FORMAT.                                  */ 00080000
*   /*                                                               */ 00081000
*   /*****************************************************************/ 00082000
*                                                                  0054 00083000
*   IF(SSOBLEN^=LENGTH(SSOB))|(SSOBID^=SSOBIDD)THEN                0054 00084000
         SR    @02,@02                                             0054 00085000
         ICM   @02,7,SSOBPTR(PARMPTR)                              0054 00086000
         CLC   SSOBLEN(2,@02),@CH00774                             0054 00087000
         BNE   @RT00054                                            0054 00088000
         CLC   SSOBID(4,@02),SSOBIDD                               0054 00089000
         BE    @RF00054                                            0054 00090000
@RT00054 DS    0H                                                  0055 00091000
*     RETURN CODE(SSRTLERR);        /* IF THE BLOCK ID AND LENGTH OF    00092000
*                                      THE SSOB ARE NOT VALID RETURN    00093000
*                                      TO CALLER WITH BAD SSOB     0055 00094000
*                                      FORMAT/LENGTH RETURN CODE.    */ 00095000
         LA    @15,20                                              0055 00096000
         L     @14,12(,@13)                                        0055 00097000
         LM    @00,@12,20(@13)                                     0055 00098000
         BR    @14                                                 0055 00099000
*   IF(SSIBLEN^=LENGTH(SSIB))|(SSIBID^=SSIBIDD)THEN                0056 00100000
@RF00054 SR    @02,@02                                             0056 00101000
         ICM   @02,7,SSOBPTR(PARMPTR)                              0056 00102000
         L     @02,SSOBSSIB(,@02)                                  0056 00103000
         CLC   SSIBLEN(2,@02),@CH01357                             0056 00104000
         BNE   @RT00056                                            0056 00105000
         CLC   SSIBID(4,@02),SSIBIDD                               0056 00106000
         BE    @RF00056                                            0056 00107000
@RT00056 DS    0H                                                  0057 00108000
*     RETURN CODE(SSRTLERR);        /* IF THE BLOCK ID AND LENGTH OF    00109000
*                                      THE SSIB ARE NOT VALID, RETURN   00110000
*                                      TO THE CALLER WITH A BAD SSIB    00111000
*                                      FORMAT/LENGTH RETURN CODE.    */ 00112000
*                                                                  0057 00113000
         LA    @15,20                                              0057 00114000
         L     @14,12(,@13)                                        0057 00115000
         LM    @00,@12,20(@13)                                     0057 00116000
         BR    @14                                                 0057 00117000
*   /*****************************************************************/ 00118000
*   /*                                                               */ 00119000
*   /* THIS SECTION OF CODE DETERMINES IF THE SUBSYSTEM NAME         */ 00120000
*   /* SPECIFIED IN THE SSIB IS THE NAME OF A SYSGENED SUBSYSTEM. IF */ 00121000
*   /* IT IS NOT, RETURN TO THE CALLER WITH A RETURN CODE            */ 00122000
*   /* OF(SSRTNOSS).                                                 */ 00123000
*   /*                                                               */ 00124000
*   /*****************************************************************/ 00125000
*                                                                  0058 00126000
*   RESPECIFY                                                      0058 00127000
*     SSCVTPTR RSTD;                                               0058 00128000
@RF00056 DS    0H                                                  0059 00129000
*   SSCVTPTR=JESSSCT;               /* GET ADDR OF THE FIRST SSCVT   */ 00130000
         L     @01,CVTPTR                                          0059 00131000
         L     @01,CVTJESCT(,@01)                                  0059 00132000
         L     SSCVTPTR,JESSSCT(,@01)                              0059 00133000
*BGNLOOP1:                                                         0060 00134000
*   DO WHILE SSCVTPTR^=0;           /* SCAN THE SSCVT CHAIN UNTIL A     00135000
*                                      MATCHING SUBSYSTEM NAME IS  0060 00136000
*                                      FOUND OR UNTIL THE END OF THE    00137000
*                                      SSCVT CHAIN HAS BEEN REACHED  */ 00138000
BGNLOOP1 B     @DE00060                                            0060 00139000
@DL00060 DS    0H                                                  0061 00140000
*BGNLOOP2:                                                         0061 00141000
*     IF SSCTSNAM=SSIBSSNM THEN                                    0061 00142000
BGNLOOP2 SR    @01,@01                                             0061 00143000
         ICM   @01,7,SSOBPTR(PARMPTR)                              0061 00144000
         L     @01,SSOBSSIB(,@01)                                  0061 00145000
         CLC   SSCTSNAM(4,SSCVTPTR),SSIBSSNM(@01)                  0061 00146000
         BNE   @RF00061                                            0061 00147000
*       DO;                         /* IF A MATCHING NAME IS       0062 00148000
*                                      FOUND,CHECK FOR A NON-ZERO  0062 00149000
*                                      SSVT POINTER.                 */ 00150000
*         IF SSCTSSVT=0 THEN                                       0063 00151000
         ICM   @15,15,SSCTSSVT(SSCVTPTR)                           0063 00152000
         BNZ   @RF00063                                            0063 00153000
*           RETURN CODE(SSRTNTUP);  /* IF THERE IS NO SSVT RETURN TO    00154000
*                                      THE CALLER INDICATING THE   0064 00155000
*                                      SUBSYSTEM IS NOT ACTIVE       */ 00156000
         LA    @15,8                                               0064 00157000
         L     @14,12(,@13)                                        0064 00158000
         LM    @00,@12,20(@13)                                     0064 00159000
         BR    @14                                                 0064 00160000
*         IF(SSOBFUNC>255)|(SSOBFUNC<0)|(SSVTFCOD(SSOBFUNC)=0)THEN 0065 00161000
@RF00063 SR    @01,@01                                             0065 00162000
         ICM   @01,7,SSOBPTR(PARMPTR)                              0065 00163000
         LH    @15,SSOBFUNC(,@01)                                  0065 00164000
         CH    @15,@CH01352                                        0065 00165000
         BH    @RT00065                                            0065 00166000
         SR    @14,@14                                             0065 00167000
         CR    @15,@14                                             0065 00168000
         BL    @RT00065                                            0065 00169000
         L     @01,SSCTSSVT(,SSCVTPTR)                             0065 00170000
         SR    @00,@00                                             0065 00171000
         IC    @00,SSVTFCOD-1(@15,@01)                             0065 00172000
         CR    @14,@00                                             0065 00173000
         BNE   @RF00065                                            0065 00174000
@RT00065 DS    0H                                                  0066 00175000
*           RETURN CODE(SSRTNSUP);  /* IF THE SUBSYSTEM DOES NOT   0066 00176000
*                                      PERFORM THE REQUESTED       0066 00177000
*                                      FUNCTION,RETURN TO THE CALLER    00178000
*                                      WITH A CODE OF (SSRTNSUP).    */ 00179000
         LA    @15,4                                               0066 00180000
         L     @14,12(,@13)                                        0066 00181000
         LM    @00,@12,20(@13)                                     0066 00182000
         BR    @14                                                 0066 00183000
*         IF SSVTFCOD(SSOBFUNC)>SSVTFNUM THEN                      0067 00184000
@RF00065 SR    @01,@01                                             0067 00185000
         ICM   @01,7,SSOBPTR(PARMPTR)                              0067 00186000
         LH    @01,SSOBFUNC(,@01)                                  0067 00187000
         L     @15,SSCTSSVT(,SSCVTPTR)                             0067 00188000
         SR    @14,@14                                             0067 00189000
         IC    @14,SSVTFCOD-1(@01,@15)                             0067 00190000
         CH    @14,SSVTFNUM(,@15)                                  0067 00191000
         BNH   @RF00067                                            0067 00192000
*           RETURN CODE(SSRTDIST);  /* IF THE INDEX TO THE PTR TO THE   00193000
*                                      FUNCTIONAL ROUTINE IS GREATER    00194000
*                                      THAN THE # OF FUNCTIONS     0068 00195000
*                                      SUPPORTED RETURN TO THE CALLER   00196000
*                                      WITH A RETURN CODE OF       0068 00197000
*                                      (SSRTDIST)                    */ 00198000
         LA    @15,16                                              0068 00199000
         L     @14,12(,@13)                                        0068 00200000
         LM    @00,@12,20(@13)                                     0068 00201000
         BR    @14                                                 0068 00202000
*         RESPECIFY                                                0069 00203000
*           R15 RSTD;                                              0069 00204000
@RF00067 DS    0H                                                  0070 00205000
*         R15=SSVTFRTN(SSVTFCOD(SSOBFUNC));/* GET ADDR OF FUNCTIONAL    00206000
*                                      RTN                           */ 00207000
         SR    @14,@14                                             0070 00208000
         ICM   @14,7,SSOBPTR(PARMPTR)                              0070 00209000
         LH    @01,SSOBFUNC(,@14)                                  0070 00210000
         L     @11,SSCTSSVT(,SSCVTPTR)                             0070 00211000
         SR    @10,@10                                             0070 00212000
         IC    @10,SSVTFCOD-1(@01,@11)                             0070 00213000
         SLA   @10,2                                               0070 00214000
         L     R15,SSVTFRTN-4(@10,@11)                             0070 00215000
*         RESPECIFY                                                0071 00216000
*           R15 UNRSTD;                                            0071 00217000
*         RESPECIFY                                                0072 00218000
*          (R0,                                                    0072 00219000
*           R1)RSTD;                                               0072 00220000
*         R0=SSCVTPTR;              /* PUT ADDR OF SSCVT IN REG 0    */ 00221000
         LR    R0,SSCVTPTR                                         0073 00222000
*         R1=SSOBPTR;               /* PUT SSOB PTR IN REG 1         */ 00223000
         LR    R1,@14                                              0074 00224000
*         RESPECIFY                                                0075 00225000
*          (R0,                                                    0075 00226000
*           R1)UNRSTD;                                             0075 00227000
*                                                                  0075 00228000
*         /***********************************************************/ 00229000
*         /*                                                         */ 00230000
*         /* THE EXIT FROM THIS MODULE TO THE FUNCTIONAL ROUTINE IS  */ 00231000
*         /* TAKEN THIS WAY BECAUSE THIS MODULE DOES NOT HAVE A      */ 00232000
*         /* REGISTER SAVE AREA AND THE FUNCTIONAL ROUTINE DOES A    */ 00233000
*         /* STORE MULTIPLE TO SAVE THE CALLER'S REGISTERS.          */ 00234000
*         /*                                                         */ 00235000
*         /***********************************************************/ 00236000
*                                                                  0076 00237000
*         GEN;                                                     0076 00238000
   L    14,12(13)                 PICK CALLERS RETURN ADDR              00239000
   LM   2,12,28(13)               RESTORE REGS 2-12                     00240000
   BR   15                       GO TO THE FUNCTIONAL ROUTINE           00241000
*ENDLOOP2:                                                         0077 00242000
*       END;                                                       0077 00243000
ENDLOOP2 DS    0H                                                  0078 00244000
*     SSCVTPTR=SSCTSCTA;            /* GET PTR TO NEXT SSCVT         */ 00245000
@RF00061 L     @15,SSCTSCTA(,SSCVTPTR)                             0078 00246000
         LR    SSCVTPTR,@15                                        0078 00247000
*ENDLOOP1:                                                         0079 00248000
*   END;                                                           0079 00249000
ENDLOOP1 DS    0H                                                  0079 00250000
@DE00060 LTR   SSCVTPTR,SSCVTPTR                                   0079 00251000
         BNZ   @DL00060                                            0079 00252000
*   RETURN CODE(SSRTNOSS);          /* RETURN TO THE CALLER        0080 00253000
*                                      INDICATING THE SUBSYSTEM    0080 00254000
*                                      SPECIFIED IN THE SSIB DOES NOT   00255000
*                                      EXIST.                        */ 00256000
         LA    @15,12                                              0080 00257000
         L     @14,12(,@13)                                        0080 00258000
         LM    @00,@12,20(@13)                                     0080 00259000
         BR    @14                                                 0080 00260000
*   END IEFJSREQ                                                   0081 00261000
*                                                                  0081 00262000
*/* THE FOLLOWING INCLUDE STATEMENTS WERE FOUND IN THIS PROGRAM.     */ 00263000
*/*%INCLUDE SYSLIB  (CVT     )                                       */ 00264000
*/*%INCLUDE SYSLIB  (IEFJESCT)                                       */ 00265000
*/*%INCLUDE SYSLIB  (IEFJSSOB)                                       */ 00266000
*/*%INCLUDE SYSLIB  (IEFJSSIB)                                       */ 00267000
*/*%INCLUDE SYSLIB  (IEFJSCVT)                                       */ 00268000
*/*%INCLUDE SYSLIB  (IEFJSSVT)                                       */ 00269000
*/*%INCLUDE SYSLIB  (IKJTCB  )                                       */ 00270000
*/*%INCLUDE SYSLIB  (IEZJSCB )                                       */ 00271000
*                                                                  0081 00272000
*       ;                                                          0081 00273000
@EL00001 DS    0H                                                  0081 00274000
@EF00001 DS    0H                                                  0081 00275000
@ER00001 LM    @14,@12,12(@13)                                     0081 00276000
         BR    @14                                                 0081 00277000
@DATA    DS    0H                                                       00278000
@CH00774 DC    H'20'                                                    00279000
@CH01357 DC    H'36'                                                    00280000
@CH01352 DC    H'255'                                                   00281000
@DATD    DSECT                                                          00282000
         DS    0F                                                       00283000
IEFJSREQ CSECT                                                          00284000
         DS    0F                                                       00285000
@DATD    DSECT                                                          00286000
         DS    0D                                                       00287000
@ENDDATD EQU   *                                                        00288000
IEFJSREQ CSECT                                                          00289000
         DS    0F                                                       00290000
@SIZDATD DC    AL1(0)                                                   00291000
         DC    AL3(@ENDDATD-@DATD)                                      00292000
         DS    0D                                                       00293000
SSOBIDD  DC    CL4'SSOB'                                                00294000
SSIBIDD  DC    CL4'SSIB'                                                00295000
PATCH    DC    CL52' '                                                  00296000
@00      EQU   00                      EQUATES FOR REGISTERS 0-15       00297000
@01      EQU   01                                                       00298000
@02      EQU   02                                                       00299000
@03      EQU   03                                                       00300000
@04      EQU   04                                                       00301000
@05      EQU   05                                                       00302000
@06      EQU   06                                                       00303000
@07      EQU   07                                                       00304000
@08      EQU   08                                                       00305000
@09      EQU   09                                                       00306000
@10      EQU   10                                                       00307000
@11      EQU   11                                                       00308000
@12      EQU   12                                                       00309000
@13      EQU   13                                                       00310000
@14      EQU   14                                                       00311000
@15      EQU   15                                                       00312000
R0       EQU   @00                                                      00313000
R1       EQU   @01                                                      00314000
SSCVTPTR EQU   @02                                                      00315000
PARMPTR  EQU   @03                                                      00316000
R15      EQU   @15                                                      00317000
CVTPTR   EQU   16                                                       00318000
PARMAREA EQU   0                                                        00319000
SSOBPTR  EQU   PARMAREA+1                                               00320000
CVTMAP   EQU   0                                                        00321000
CVTTCBP  EQU   CVTMAP                                                   00322000
CVTDAR   EQU   CVTMAP+72                                                00323000
CVTFLGS1 EQU   CVTDAR                                                   00324000
CVTDCB   EQU   CVTMAP+116                                               00325000
CVTOPTA  EQU   CVTMAP+182                                               00326000
CVTOPTB  EQU   CVTMAP+183                                               00327000
CVTTSCVT EQU   CVTMAP+228                                               00328000
CVTTSFLG EQU   CVTTSCVT                                                 00329000
CVTGTF   EQU   CVTMAP+236                                               00330000
CVTGTFST EQU   CVTGTF                                                   00331000
CVTGTFS  EQU   CVTGTFST                                                 00332000
CVTSTATE EQU   CVTGTFST                                                 00333000
CVTTMODE EQU   CVTGTFST                                                 00334000
CVTFORM  EQU   CVTGTFST                                                 00335000
CVTUSR   EQU   CVTGTFST                                                 00336000
CVTAQAVT EQU   CVTMAP+240                                               00337000
CVTTCMFG EQU   CVTAQAVT                                                 00338000
CVTTATA  EQU   CVTMAP+244                                               00339000
CVTATER  EQU   CVTMAP+248                                               00340000
CVTEXT1  EQU   CVTMAP+252                                               00341000
CVTPURG  EQU   CVTMAP+260                                               00342000
CVTQMSG  EQU   CVTMAP+268                                               00343000
CVTDMSR  EQU   CVTMAP+272                                               00344000
CVTJESCT EQU   CVTMAP+296                                               00345000
CVTAPF   EQU   CVTMAP+324                                               00346000
CVTEXT2  EQU   CVTMAP+328                                               00347000
CVTHJES  EQU   CVTMAP+332                                               00348000
CVTPGSIA EQU   CVTMAP+348                                               00349000
CVTA1F1  EQU   CVTMAP+356                                               00350000
CVTSYSK  EQU   CVTMAP+357                                               00351000
CVTATMCT EQU   CVTMAP+388                                               00352000
CVTXTNT1 EQU   0                                                        00353000
CVTXTNT2 EQU   0                                                        00354000
CVTDSSV  EQU   CVTXTNT2                                                 00355000
CVTRSV90 EQU   CVTXTNT2+5                                               00356000
CVTQID   EQU   CVTXTNT2+24                                              00357000
CVTRV400 EQU   CVTXTNT2+52                                              00358000
CVTRV409 EQU   CVTXTNT2+53                                              00359000
CVTATCVT EQU   CVTXTNT2+64                                              00360000
CVTRV429 EQU   CVTXTNT2+84                                              00361000
CVTRV438 EQU   CVTXTNT2+85                                              00362000
CVTRV457 EQU   CVTXTNT2+112                                             00363000
CVTRV466 EQU   CVTXTNT2+113                                             00364000
CVTFIX   EQU   0                                                        00365000
CVTRELNO EQU   CVTFIX+252                                               00366000
JESCT    EQU   0                                                        00367000
JESWAA   EQU   JESCT+8                                                  00368000
JESSSREQ EQU   JESCT+20                                                 00369000
JESSSCT  EQU   JESCT+24                                                 00370000
SSOB     EQU   0                                                        00371000
SSOBID   EQU   SSOB                                                     00372000
SSOBLEN  EQU   SSOB+4                                                   00373000
SSOBFUNC EQU   SSOB+6                                                   00374000
SSOBSSIB EQU   SSOB+8                                                   00375000
SSIB     EQU   0                                                        00376000
SSIBID   EQU   SSIB                                                     00377000
SSIBLEN  EQU   SSIB+4                                                   00378000
SSIBFLG1 EQU   SSIB+6                                                   00379000
SSIBSSNM EQU   SSIB+8                                                   00380000
SSCT     EQU   0                                                        00381000
SSCTSCTA EQU   SSCT+4                                                   00382000
SSCTSNAM EQU   SSCT+8                                                   00383000
SSCTSSVT EQU   SSCT+16                                                  00384000
SSVT     EQU   0                                                        00385000
SSVTFSIZ EQU   SSVT                                                     00386000
SSVTFNUM EQU   SSVTFSIZ+2                                               00387000
SSVTFCOD EQU   SSVTFSIZ+4                                               00388000
SSVTFRTN EQU   SSVT+260                                                 00389000
TCBFIX   EQU   0                                                        00390000
TCBFRS   EQU   TCBFIX                                                   00391000
TCB      EQU   0                                                        00392000
TCBPIE   EQU   TCB+4                                                    00393000
TCBPMASK EQU   TCBPIE                                                   00394000
TCBCMP   EQU   TCB+16                                                   00395000
TCBCMPF  EQU   TCBCMP                                                   00396000
TCBCPP   EQU   TCBCMPF                                                  00397000
TCBSTCC  EQU   TCBCMPF                                                  00398000
TCBCDBL  EQU   TCBCMPF                                                  00399000
TCBCWTO  EQU   TCBCMPF                                                  00400000
TCBCIND  EQU   TCBCMPF                                                  00401000
TCBCMSG  EQU   TCBCMPF                                                  00402000
TCBTRN   EQU   TCB+20                                                   00403000
TCBABF   EQU   TCBTRN                                                   00404000
TCBMSS   EQU   TCB+24                                                   00405000
TCBPKF   EQU   TCB+28                                                   00406000
TCBFLGS  EQU   TCB+29                                                   00407000
TCBFLGS1 EQU   TCBFLGS                                                  00408000
TCBFLGS2 EQU   TCBFLGS+1                                                00409000
TCBFLGS3 EQU   TCBFLGS+2                                                00410000
TCBFLGS4 EQU   TCBFLGS+3                                                00411000
TCBFLGS5 EQU   TCBFLGS+4                                                00412000
TCBABWF  EQU   TCBFLGS5                                                 00413000
TCBJPQ   EQU   TCB+44                                                   00414000
TCBPURGE EQU   TCBJPQ                                                   00415000
TCBGRS   EQU   TCB+48                                                   00416000
TCBFSA   EQU   TCB+112                                                  00417000
TCBTME   EQU   TCB+120                                                  00418000
TCBJSTCB EQU   TCB+124                                                  00419000
TCBTSFLG EQU   TCB+148                                                  00420000
TCBTSTSK EQU   TCBTSFLG                                                 00421000
TCBSTAB  EQU   TCB+160                                                  00422000
TCBNSTAE EQU   TCBSTAB                                                  00423000
TCBTCT   EQU   TCB+164                                                  00424000
TCBTCTGF EQU   TCBTCT                                                   00425000
TCBSCNDY EQU   TCB+172                                                  00426000
TCBNDSP  EQU   TCBSCNDY                                                 00427000
TCBNDSP1 EQU   TCBNDSP+1                                                00428000
TCBNDSP2 EQU   TCBNDSP+2                                                00429000
TCBNDSP3 EQU   TCBNDSP+3                                                00430000
TCBJSCB  EQU   TCB+180                                                  00431000
TCBRECDE EQU   TCBJSCB                                                  00432000
TCBEXT1  EQU   TCB+196                                                  00433000
TCBBITS  EQU   TCB+200                                                  00434000
TCBNDSP4 EQU   TCBBITS                                                  00435000
TCBNDSP5 EQU   TCBBITS+1                                                00436000
TCBFLGS6 EQU   TCBBITS+2                                                00437000
TCBFLGS7 EQU   TCBBITS+3                                                00438000
TCBDAR   EQU   TCB+204                                                  00439000
TCBDARC  EQU   TCBDAR                                                   00440000
TCBEXT2  EQU   TCB+208                                                  00441000
TCBFOE   EQU   TCB+244                                                  00442000
TCBESTAE EQU   TCB+264                                                  00443000
TCBESTRM EQU   TCBESTAE+1                                               00444000
TCBFBYT1 EQU   TCB+276                                                  00445000
TCBFBYT2 EQU   TCB+277                                                  00446000
TCBRV124 EQU   TCB+278                                                  00447000
TCBRV133 EQU   TCB+279                                                  00448000
TCBXTNT2 EQU   0                                                        00449000
TCBGTF   EQU   TCBXTNT2                                                 00450000
TCBTFLG  EQU   TCBGTF                                                   00451000
TCBRV146 EQU   TCBXTNT2+28                                              00452000
TCBRV155 EQU   TCBXTNT2+29                                              00453000
TCBRV164 EQU   TCBXTNT2+30                                              00454000
TCBRV173 EQU   TCBXTNT2+31                                              00455000
IEZJSCB  EQU   0                                                        00456000
JSCBSEC1 EQU   IEZJSCB+188                                              00457000
JSCHPCE  EQU   JSCBSEC1+4                                               00458000
JSCBDCB  EQU   JSCBSEC1+36                                              00459000
JSCBOPTS EQU   JSCBSEC1+48                                              00460000
JSCBSWT1 EQU   JSCBSEC1+55                                              00461000
JSCBWTP  EQU   JSCBSEC1+64                                              00462000
JSCBWTFG EQU   JSCBWTP                                                  00463000
JSCBEND1 EQU   IEZJSCB+260                                              00464000
NXTCUR   EQU   0                                                        00465000
CURRTCB  EQU   NXTCUR+4                                                 00466000
RTNPTR   EQU   0                                                        00467000
SSREQ    EQU   0                                                        00468000
SWAMGR   EQU   0                                                        00469000
CVTS01   EQU   CVTPGSIA                                                 00470000
CVTLPDIA EQU   CVTS01+12                                                00471000
CVTDIRST EQU   CVTLPDIA                                                 00472000
CVTSLIDA EQU   CVTS01+24                                                00473000
CVTCTLFG EQU   CVTS01+50                                                00474000
CVTRV100 EQU   CVTS01+116                                               00475000
CVTRV109 EQU   CVTS01+117                                               00476000
CVTRV118 EQU   CVTS01+118                                               00477000
CVTRV127 EQU   CVTS01+119                                               00478000
CVTRV157 EQU   CVTS01+376                                               00479000
CVTRV166 EQU   CVTS01+377                                               00480000
CVTRV175 EQU   CVTS01+378                                               00481000
CVTRV184 EQU   CVTS01+379                                               00482000
CVTRV210 EQU   CVTS01+424                                               00483000
CVTRV219 EQU   CVTS01+425                                               00484000
CVTRV228 EQU   CVTS01+426                                               00485000
CVTRV237 EQU   CVTS01+427                                               00486000
CVTMFRTR EQU   CVTS01+452                                               00487000
CVTRV262 EQU   CVTS01+468                                               00488000
CVTRV271 EQU   CVTS01+469                                               00489000
CVTRV280 EQU   CVTS01+470                                               00490000
CVTRV289 EQU   CVTS01+471                                               00491000
JSCBSEC2 EQU   JSCBEND1                                                 00492000
JSCBSEC3 EQU   JSCBEND1                                                 00493000
JSCBJCT  EQU   JSCBSEC3                                                 00494000
JSCBJCTA EQU   JSCBJCT+1                                                00495000
JSCBJNL  EQU   JSCBSEC3+28                                              00496000
JSCBJJSB EQU   JSCBJNL                                                  00497000
JSCBSUB  EQU   JSCBSEC3+40                                              00498000
JSCBSSIB EQU   JSCBSEC3+56                                              00499000
JSCSCT   EQU   JSCBSEC3+68                                              00500000
JSCBACT  EQU   JSCBSEC3+88                                              00501000
JSCRSV35 EQU   JSCBSEC3+96                                              00502000
JSCRSV36 EQU   JSCRSV35                                                 00503000
JSCRSV37 EQU   JSCRSV35+2                                               00504000
JSCRSV45 EQU   JSCBSEC3+112                                             00505000
JSCRSV46 EQU   JSCRSV45                                                 00506000
JSCRSV47 EQU   JSCRSV45+2                                               00507000
         AGO   .@UNREFD                START UNREFERENCED COMPONENTS    00508000
JSCBEND3 EQU   JSCBSEC3+120                                             00509000
JSCRSV52 EQU   JSCBSEC3+116                                             00510000
JSCRSV51 EQU   JSCRSV47+1                                               00511000
JSCRSV50 EQU   JSCRSV47                                                 00512000
JSCRSV49 EQU   JSCRSV46+1                                               00513000
JSCRSV48 EQU   JSCRSV46                                                 00514000
JSCRSV44 EQU   JSCBSEC3+108                                             00515000
JSCRSV43 EQU   JSCBSEC3+104                                             00516000
JSCRSV42 EQU   JSCBSEC3+100                                             00517000
JSCRSV41 EQU   JSCRSV37+1                                               00518000
JSCRSV40 EQU   JSCRSV37                                                 00519000
JSCRSV39 EQU   JSCRSV36+1                                               00520000
JSCRSV38 EQU   JSCRSV36                                                 00521000
JSCRSV34 EQU   JSCBSEC3+92                                              00522000
JSCBSWSP EQU   JSCBSEC3+87                                              00523000
JSCRSV33 EQU   JSCBSEC3+86                                              00524000
JSCDDNUM EQU   JSCBSEC3+84                                              00525000
JSCRSV53 EQU   JSCBSEC3+82                                              00526000
JSCDDNNO EQU   JSCBSEC3+80                                              00527000
JSCBVATA EQU   JSCBSEC3+76                                              00528000
JSCTMCOR EQU   JSCBSEC3+72                                              00529000
JSCSCTP  EQU   JSCSCT+1                                                 00530000
JSCRSV55 EQU   JSCSCT                                                   00531000
JSCRSV54 EQU   JSCBSEC3+64                                              00532000
JSCDSABQ EQU   JSCBSEC3+60                                              00533000
JSCRSV30 EQU   JSCBSEC3+52                                              00534000
JSCRSV29 EQU   JSCBSEC3+48                                              00535000
JSCRSV28 EQU   JSCBSEC3+46                                              00536000
JSCBSONO EQU   JSCBSEC3+44                                              00537000
JSCBSUBA EQU   JSCBSUB+1                                                00538000
JSCRSV31 EQU   JSCBSUB                                                  00539000
JSCBSMLR EQU   JSCBSEC3+36                                              00540000
JSCBJNLR EQU   JSCBSEC3+32                                              00541000
JSCBJNLA EQU   JSCBJNL+1                                                00542000
JSCBJSBT EQU   JSCBJJSB                                                 00543000
JSCBJSBX EQU   JSCBJJSB                                                 00544000
JSCBJSBA EQU   JSCBJJSB                                                 00545000
JSCBJSBI EQU   JSCBJJSB                                                 00546000
@NM00013 EQU   JSCBJJSB                                                 00547000
JSCBJNLE EQU   JSCBJJSB                                                 00548000
JSCBJNLF EQU   JSCBJJSB                                                 00549000
JSCBJNLN EQU   JSCBJJSB                                                 00550000
@NM00012 EQU   JSCBSEC3+24                                              00551000
JSCRSV27 EQU   JSCBSEC3+20                                              00552000
JSCRSV26 EQU   JSCBSEC3+16                                              00553000
JSCBIECB EQU   JSCBSEC3+12                                              00554000
JSCRSV25 EQU   JSCBSEC3+10                                              00555000
JSCBTJID EQU   JSCBSEC3+8                                               00556000
JSCBPSCB EQU   JSCBSEC3+4                                               00557000
JSCJCTP  EQU   JSCBJCTA                                                 00558000
JSCRSV24 EQU   JSCBJCT                                                  00559000
JSCBEND2 EQU   JSCBSEC2                                                 00560000
CVTRV512 EQU   CVTS01+608                                               00561000
CVTRV511 EQU   CVTS01+604                                               00562000
CVTRV510 EQU   CVTS01+600                                               00563000
CVTRV509 EQU   CVTS01+596                                               00564000
CVTRV508 EQU   CVTS01+592                                               00565000
CVTRV507 EQU   CVTS01+588                                               00566000
CVTRV506 EQU   CVTS01+584                                               00567000
CVTRV505 EQU   CVTS01+580                                               00568000
CVTRV504 EQU   CVTS01+576                                               00569000
CVTRV503 EQU   CVTS01+572                                               00570000
CVTRV502 EQU   CVTS01+568                                               00571000
CVTRV501 EQU   CVTS01+564                                               00572000
CVTRV500 EQU   CVTS01+560                                               00573000
CVTRV499 EQU   CVTS01+556                                               00574000
CVTRV498 EQU   CVTS01+552                                               00575000
CVTRV497 EQU   CVTS01+548                                               00576000
CVTRV496 EQU   CVTS01+544                                               00577000
CVTRV495 EQU   CVTS01+540                                               00578000
CVTSTPRS EQU   CVTS01+536                                               00579000
CVT0PT02 EQU   CVTS01+532                                               00580000
CVTDARCM EQU   CVTS01+528                                               00581000
CVTIRECM EQU   CVTS01+524                                               00582000
CVTJRECM EQU   CVTS01+520                                               00583000
CVTVEMS0 EQU   CVTS01+516                                               00584000
CVTSPFRR EQU   CVTS01+512                                               00585000
CVTRLSTG EQU   CVTS01+508                                               00586000
CVT0TC0A EQU   CVTS01+504                                               00587000
CVTGMBR  EQU   CVTS01+500                                               00588000
CVTLFRM  EQU   CVTS01+496                                               00589000
CVTRMBR  EQU   CVTS01+492                                               00590000
CVTVIOP  EQU   CVTS01+488                                               00591000
CVTRV307 EQU   CVTS01+486                                               00592000
CVTRV306 EQU   CVTS01+484                                               00593000
CVTRV305 EQU   CVTS01+482                                               00594000
CVTRV304 EQU   CVTS01+480                                               00595000
CVTRV303 EQU   CVTS01+478                                               00596000
CVTRV302 EQU   CVTS01+476                                               00597000
CVTRV301 EQU   CVTS01+475                                               00598000
CVTRV300 EQU   CVTS01+474                                               00599000
CVTRV299 EQU   CVTS01+473                                               00600000
CVTRV298 EQU   CVTS01+472                                               00601000
CVTRV297 EQU   CVTRV289                                                 00602000
CVTRV296 EQU   CVTRV289                                                 00603000
CVTRV295 EQU   CVTRV289                                                 00604000
CVTRV294 EQU   CVTRV289                                                 00605000
CVTRV293 EQU   CVTRV289                                                 00606000
CVTRV292 EQU   CVTRV289                                                 00607000
CVTRV291 EQU   CVTRV289                                                 00608000
CVTRV290 EQU   CVTRV289                                                 00609000
CVTRV288 EQU   CVTRV280                                                 00610000
CVTRV287 EQU   CVTRV280                                                 00611000
CVTRV286 EQU   CVTRV280                                                 00612000
CVTRV285 EQU   CVTRV280                                                 00613000
CVTRV284 EQU   CVTRV280                                                 00614000
CVTRV283 EQU   CVTRV280                                                 00615000
CVTRV282 EQU   CVTRV280                                                 00616000
CVTRV281 EQU   CVTRV280                                                 00617000
CVTRV279 EQU   CVTRV271                                                 00618000
CVTRV278 EQU   CVTRV271                                                 00619000
CVTRV277 EQU   CVTRV271                                                 00620000
CVTRV276 EQU   CVTRV271                                                 00621000
CVTRV275 EQU   CVTRV271                                                 00622000
CVTRV274 EQU   CVTRV271                                                 00623000
CVTRV273 EQU   CVTRV271                                                 00624000
CVTRV272 EQU   CVTRV271                                                 00625000
CVTRV270 EQU   CVTRV262                                                 00626000
CVTRV269 EQU   CVTRV262                                                 00627000
CVTRV268 EQU   CVTRV262                                                 00628000
CVTRV267 EQU   CVTRV262                                                 00629000
CVTRV266 EQU   CVTRV262                                                 00630000
CVTRV265 EQU   CVTRV262                                                 00631000
CVTRV264 EQU   CVTRV262                                                 00632000
CVTRV263 EQU   CVTRV262                                                 00633000
CVTVFP   EQU   CVTS01+464                                               00634000
CVTVSI   EQU   CVTS01+460                                               00635000
CVTVPSIB EQU   CVTS01+456                                               00636000
CVTMFACT EQU   CVTMFRTR                                                 00637000
CVTMFCTL EQU   CVTS01+448                                               00638000
CVTPVBP  EQU   CVTS01+444                                               00639000
CVTPWI   EQU   CVTS01+440                                               00640000
CVTRV254 EQU   CVTS01+438                                               00641000
CVTRV253 EQU   CVTS01+436                                               00642000
CVTRV252 EQU   CVTS01+434                                               00643000
CVTRV251 EQU   CVTS01+433                                               00644000
CVTRV250 EQU   CVTS01+432                                               00645000
CVTRV249 EQU   CVTS01+431                                               00646000
CVTRV248 EQU   CVTS01+430                                               00647000
CVTRV247 EQU   CVTS01+429                                               00648000
CVTRV246 EQU   CVTS01+428                                               00649000
CVTRV245 EQU   CVTRV237                                                 00650000
CVTRV244 EQU   CVTRV237                                                 00651000
CVTRV243 EQU   CVTRV237                                                 00652000
CVTRV242 EQU   CVTRV237                                                 00653000
CVTRV241 EQU   CVTRV237                                                 00654000
CVTRV240 EQU   CVTRV237                                                 00655000
CVTRV239 EQU   CVTRV237                                                 00656000
CVTRV238 EQU   CVTRV237                                                 00657000
CVTRV236 EQU   CVTRV228                                                 00658000
CVTRV235 EQU   CVTRV228                                                 00659000
CVTRV234 EQU   CVTRV228                                                 00660000
CVTRV233 EQU   CVTRV228                                                 00661000
CVTRV232 EQU   CVTRV228                                                 00662000
CVTRV231 EQU   CVTRV228                                                 00663000
CVTRV230 EQU   CVTRV228                                                 00664000
CVTRV229 EQU   CVTRV228                                                 00665000
CVTRV227 EQU   CVTRV219                                                 00666000
CVTRV226 EQU   CVTRV219                                                 00667000
CVTRV225 EQU   CVTRV219                                                 00668000
CVTRV224 EQU   CVTRV219                                                 00669000
CVTRV223 EQU   CVTRV219                                                 00670000
CVTRV222 EQU   CVTRV219                                                 00671000
CVTRV221 EQU   CVTRV219                                                 00672000
CVTRV220 EQU   CVTRV219                                                 00673000
CVTRV218 EQU   CVTRV210                                                 00674000
CVTRV217 EQU   CVTRV210                                                 00675000
CVTRV216 EQU   CVTRV210                                                 00676000
CVTRV215 EQU   CVTRV210                                                 00677000
CVTRV214 EQU   CVTRV210                                                 00678000
CVTRV213 EQU   CVTRV210                                                 00679000
CVTRV212 EQU   CVTRV210                                                 00680000
CVTRV211 EQU   CVTRV210                                                 00681000
CVTLCCAT EQU   CVTS01+420                                               00682000
CVTPCCAT EQU   CVTS01+416                                               00683000
CVTIPCRP EQU   CVTS01+412                                               00684000
CVTIPCRI EQU   CVTS01+408                                               00685000
CVTIPCDS EQU   CVTS01+404                                               00686000
CVTAIDVT EQU   CVTS01+400                                               00687000
CVTSSAP  EQU   CVTS01+396                                               00688000
CVTRV202 EQU   CVTS01+394                                               00689000
CVTRV201 EQU   CVTS01+392                                               00690000
CVTRV200 EQU   CVTS01+390                                               00691000
CVTRV199 EQU   CVTS01+388                                               00692000
CVTRV198 EQU   CVTS01+386                                               00693000
CVTRV197 EQU   CVTS01+384                                               00694000
CVTRV196 EQU   CVTS01+383                                               00695000
CVTRV195 EQU   CVTS01+382                                               00696000
CVTRV194 EQU   CVTS01+381                                               00697000
CVTRV193 EQU   CVTS01+380                                               00698000
CVTRV192 EQU   CVTRV184                                                 00699000
CVTRV191 EQU   CVTRV184                                                 00700000
CVTRV190 EQU   CVTRV184                                                 00701000
CVTRV189 EQU   CVTRV184                                                 00702000
CVTRV188 EQU   CVTRV184                                                 00703000
CVTRV187 EQU   CVTRV184                                                 00704000
CVTRV186 EQU   CVTRV184                                                 00705000
CVTRV185 EQU   CVTRV184                                                 00706000
CVTRV183 EQU   CVTRV175                                                 00707000
CVTRV182 EQU   CVTRV175                                                 00708000
CVTRV181 EQU   CVTRV175                                                 00709000
CVTRV180 EQU   CVTRV175                                                 00710000
CVTRV179 EQU   CVTRV175                                                 00711000
CVTRV178 EQU   CVTRV175                                                 00712000
CVTRV177 EQU   CVTRV175                                                 00713000
CVTRV176 EQU   CVTRV175                                                 00714000
CVTRV174 EQU   CVTRV166                                                 00715000
CVTRV173 EQU   CVTRV166                                                 00716000
CVTRV172 EQU   CVTRV166                                                 00717000
CVTRV171 EQU   CVTRV166                                                 00718000
CVTRV170 EQU   CVTRV166                                                 00719000
CVTRV169 EQU   CVTRV166                                                 00720000
CVTRV168 EQU   CVTRV166                                                 00721000
CVTRV167 EQU   CVTRV166                                                 00722000
CVTRV165 EQU   CVTRV157                                                 00723000
CVTRV164 EQU   CVTRV157                                                 00724000
CVTRV163 EQU   CVTRV157                                                 00725000
CVTRV162 EQU   CVTRV157                                                 00726000
CVTRV161 EQU   CVTRV157                                                 00727000
CVTRV160 EQU   CVTRV157                                                 00728000
CVTRV159 EQU   CVTRV157                                                 00729000
CVTRV158 EQU   CVTRV157                                                 00730000
CVTRV156 EQU   CVTS01+372                                               00731000
CVTRSTWD EQU   CVTS01+368                                               00732000
CVTSPOST EQU   CVTS01+364                                               00733000
CVTIOBP  EQU   CVTS01+360                                               00734000
CVTASMVT EQU   CVTS01+356                                               00735000
CVTRECRQ EQU   CVTS01+352                                               00736000
CVTWSAC  EQU   CVTS01+348                                               00737000
CVTWSAG  EQU   CVTS01+344                                               00738000
CVTWSAL  EQU   CVTS01+340                                               00739000
CVTSPSA  EQU   CVTS01+336                                               00740000
CVTGLMN  EQU   CVTS01+332                                               00741000
CVTVEAC0 EQU   CVTS01+328                                               00742000
CVT062R1 EQU   CVTS01+324                                               00743000
CVTRPOST EQU   CVTS01+320                                               00744000
CVTDQIQE EQU   CVTS01+316                                               00745000
CVTCSD   EQU   CVTS01+312                                               00746000
CVTLKRMA EQU   CVTS01+308                                               00747000
CVTRSPIE EQU   CVTS01+304                                               00748000
CVTRENQ  EQU   CVTS01+300                                               00749000
CVTLQCB  EQU   CVTS01+296                                               00750000
CVTFQCB  EQU   CVTS01+292                                               00751000
CVTQCS01 EQU   CVTS01+288                                               00752000
CVTAPFT  EQU   CVTS01+284                                               00753000
CVTPARRL EQU   CVTS01+280                                               00754000
CVTVWAIT EQU   CVTS01+276                                               00755000
CVTGSPL  EQU   CVTS01+272                                               00756000
CVTLSMQ  EQU   CVTS01+268                                               00757000
CVTGSMQ  EQU   CVTS01+264                                               00758000
CVTEXPRO EQU   CVTS01+260                                               00759000
CVTOPCTP EQU   CVTS01+256                                               00760000
CVTSIC   EQU   CVTS01+252                                               00761000
CVTTPIOS EQU   CVTS01+248                                               00762000
CVTRTMS  EQU   CVTS01+244                                               00763000
CVTSDBF  EQU   CVTS01+240                                               00764000
CVTSCBP  EQU   CVTS01+236                                               00765000
CVTSDMP  EQU   CVTS01+232                                               00766000
CVTSV60  EQU   CVTS01+228                                               00767000
CVTRTMCT EQU   CVTS01+224                                               00768000
CVTASCBL EQU   CVTS01+220                                               00769000
CVTASCBH EQU   CVTS01+216                                               00770000
CVTGDA   EQU   CVTS01+212                                               00771000
CVTASVT  EQU   CVTS01+208                                               00772000
CVTVVMDI EQU   CVTS01+204                                               00773000
CVTAQTOP EQU   CVTS01+200                                               00774000
CVTIOSCS EQU   CVTS01+196                                               00775000
CVTSDRM  EQU   CVTS01+192                                               00776000
CVTOPTE  EQU   CVTS01+188                                               00777000
CVTSTXU  EQU   CVTS01+184                                               00778000
CVTQUIS  EQU   CVTS01+180                                               00779000
CVTQREC  EQU   CVTS01+176                                               00780000
CVTS1EE  EQU   CVTS01+172                                               00781000
CVTFRAS  EQU   CVTS01+168                                               00782000
CVTQSAS  EQU   CVTS01+164                                               00783000
CVTCRAS  EQU   CVTS01+160                                               00784000
CVTCRMN  EQU   CVTS01+156                                               00785000
CVTDELCP EQU   CVTS01+152                                               00786000
CVTFRECL EQU   CVTS01+148                                               00787000
CVTGETCL EQU   CVTS01+144                                               00788000
CVTBLDCP EQU   CVTS01+140                                               00789000
CVTAUTHL EQU   CVTS01+136                                               00790000
CVTRV146 EQU   CVTS01+134                                               00791000
CVTRV145 EQU   CVTS01+132                                               00792000
CVTRV144 EQU   CVTS01+130                                               00793000
CVTRV143 EQU   CVTS01+128                                               00794000
CVTRV142 EQU   CVTS01+126                                               00795000
CVTRV141 EQU   CVTS01+125                                               00796000
CVTRV140 EQU   CVTS01+124                                               00797000
CVTRV139 EQU   CVTS01+123                                               00798000
CVTDSSAC EQU   CVTS01+122                                               00799000
CVTMAXMP EQU   CVTS01+121                                               00800000
CVTIOSPL EQU   CVTS01+120                                               00801000
CVTRV135 EQU   CVTRV127                                                 00802000
CVTRV134 EQU   CVTRV127                                                 00803000
CVTRV133 EQU   CVTRV127                                                 00804000
CVTRV132 EQU   CVTRV127                                                 00805000
CVTRV131 EQU   CVTRV127                                                 00806000
CVTRV130 EQU   CVTRV127                                                 00807000
CVTRV129 EQU   CVTRV127                                                 00808000
CVTRV128 EQU   CVTRV127                                                 00809000
CVTRV126 EQU   CVTRV118                                                 00810000
CVTRV125 EQU   CVTRV118                                                 00811000
CVTRV124 EQU   CVTRV118                                                 00812000
CVTRV123 EQU   CVTRV118                                                 00813000
CVTRV122 EQU   CVTRV118                                                 00814000
CVTRV121 EQU   CVTRV118                                                 00815000
CVTRV120 EQU   CVTRV118                                                 00816000
CVTRV119 EQU   CVTRV118                                                 00817000
CVTRV117 EQU   CVTRV109                                                 00818000
CVTRV116 EQU   CVTRV109                                                 00819000
CVTRV115 EQU   CVTRV109                                                 00820000
CVTRV114 EQU   CVTRV109                                                 00821000
CVTRV113 EQU   CVTRV109                                                 00822000
CVTRV112 EQU   CVTRV109                                                 00823000
CVTRV111 EQU   CVTRV109                                                 00824000
CVTRV110 EQU   CVTRV109                                                 00825000
CVTRV108 EQU   CVTRV100                                                 00826000
CVTRV107 EQU   CVTRV100                                                 00827000
CVTRV106 EQU   CVTRV100                                                 00828000
CVTRV105 EQU   CVTRV100                                                 00829000
CVTRV104 EQU   CVTRV100                                                 00830000
CVTRV103 EQU   CVTRV100                                                 00831000
CVTRV102 EQU   CVTRV100                                                 00832000
CVTRV101 EQU   CVTRV100                                                 00833000
CVTCSPIE EQU   CVTS01+112                                               00834000
CVTSMFEX EQU   CVTS01+108                                               00835000
CVTOLT0A EQU   CVTS01+104                                               00836000
CVTSRBRT EQU   CVTS01+100                                               00837000
CVTRSV82 EQU   CVTS01+98                                                00838000
CVTRSV81 EQU   CVTS01+96                                                00839000
CVTSYSWT EQU   CVTS01+92                                                00840000
CVTRV327 EQU   CVTS01+88                                                00841000
CVTRV326 EQU   CVTS01+84                                                00842000
CVTRV325 EQU   CVTS01+80                                                00843000
CVTRV324 EQU   CVTS01+76                                                00844000
CVT0VL01 EQU   CVTS01+72                                                00845000
CVTSHRVM EQU   CVTS01+68                                                00846000
CVTRV332 EQU   CVTS01+64                                                00847000
CVTTAS   EQU   CVTS01+60                                                00848000
CVTRSCN  EQU   CVTS01+56                                                00849000
CVTTRAC2 EQU   CVTS01+54                                                00850000
CVTTRACE EQU   CVTS01+52                                                00851000
CVTAPG   EQU   CVTS01+51                                                00852000
CVTSDTRC EQU   CVTCTLFG                                                 00853000
CVTGTRCE EQU   CVTCTLFG                                                 00854000
CVTRSV80 EQU   CVTCTLFG                                                 00855000
CVTRSV79 EQU   CVTCTLFG                                                 00856000
CVTDSTAT EQU   CVTCTLFG                                                 00857000
CVTRSV78 EQU   CVTCTLFG                                                 00858000
CVTRV333 EQU   CVTCTLFG                                                 00859000
CVTRV323 EQU   CVTCTLFG                                                 00860000
CVTSPVLK EQU   CVTS01+49                                                00861000
CVTRSV77 EQU   CVTS01+48                                                00862000
CVTRV331 EQU   CVTS01+44                                                00863000
CVTRV330 EQU   CVTS01+40                                                00864000
CVTRV329 EQU   CVTS01+36                                                00865000
CVTRV328 EQU   CVTS01+32                                                00866000
CVTRV322 EQU   CVTS01+28                                                00867000
CVTSLID  EQU   CVTSLIDA+1                                               00868000
CVTSYLK  EQU   CVTSLIDA                                                 00869000
CVTRV321 EQU   CVTS01+20                                                00870000
CVTRV320 EQU   CVTS01+16                                                00871000
CVTLPDIR EQU   CVTLPDIA+1                                               00872000
CVTRSV69 EQU   CVTDIRST                                                 00873000
CVTRSV68 EQU   CVTDIRST                                                 00874000
CVTRSV67 EQU   CVTDIRST                                                 00875000
CVTRSV66 EQU   CVTDIRST                                                 00876000
CVTRSV65 EQU   CVTDIRST                                                 00877000
CVTRSV64 EQU   CVTDIRST                                                 00878000
CVTRSV63 EQU   CVTDIRST                                                 00879000
CVTDICOM EQU   CVTDIRST                                                 00880000
CVTPVTP  EQU   CVTS01+8                                                 00881000
CVTLPDSR EQU   CVTS01+4                                                 00882000
CVTRSVA2 EQU   CVTS01                                                   00883000
@NM00014 EQU   NXTCUR                                                   00884000
JSCBCSCB EQU   JSCBSEC1+68                                              00885000
JSCBPMG  EQU   JSCBWTP+2                                                00886000
JSCBWTSP EQU   JSCBWTP+1                                                00887000
JSCRSV23 EQU   JSCBWTFG                                                 00888000
JSCRSV22 EQU   JSCBWTFG                                                 00889000
JSCRSV21 EQU   JSCBWTFG                                                 00890000
JSCRSV20 EQU   JSCBWTFG                                                 00891000
JSCRSV19 EQU   JSCBWTFG                                                 00892000
JSCRSV18 EQU   JSCBWTFG                                                 00893000
JSCBRET  EQU   JSCBWTFG                                                 00894000
JSCBIOFG EQU   JSCBWTFG                                                 00895000
@NM00011 EQU   JSCBSEC1+60                                              00896000
JSCBQMPI EQU   JSCBSEC1+56                                              00897000
JSCBPMSG EQU   JSCBSWT1                                                 00898000
JSCRSV16 EQU   JSCBSWT1                                                 00899000
JSCRSV15 EQU   JSCBSWT1                                                 00900000
JSCRSV14 EQU   JSCBSWT1                                                 00901000
JSCRSV13 EQU   JSCBSWT1                                                 00902000
JSCRSV12 EQU   JSCBSWT1                                                 00903000
JSCRSV11 EQU   JSCBSWT1                                                 00904000
JSCBPASS EQU   JSCBSWT1                                                 00905000
JSCBTTTR EQU   JSCBSEC1+52                                              00906000
JSCRSV10 EQU   JSCBSEC1+49                                              00907000
JSCBAUTH EQU   JSCBOPTS                                                 00908000
JSCSIOTS EQU   JSCBOPTS                                                 00909000
JSCRSV08 EQU   JSCBOPTS                                                 00910000
JSCRSV07 EQU   JSCBOPTS                                                 00911000
JSCRSV06 EQU   JSCBOPTS                                                 00912000
JSCBLONG EQU   JSCBOPTS                                                 00913000
JSCRSV05 EQU   JSCBOPTS                                                 00914000
JSCRSV04 EQU   JSCBOPTS                                                 00915000
JSCBSECB EQU   JSCBSEC1+44                                              00916000
JSCRSV03 EQU   JSCBSEC1+41                                              00917000
JSCBSTEP EQU   JSCBSEC1+40                                              00918000
JSCBDCBA EQU   JSCBDCB+1                                                00919000
JSCRSV02 EQU   JSCBDCB                                                  00920000
JSCBID   EQU   JSCBSEC1+32                                              00921000
JSCBDBTB EQU   JSCBSEC1+28                                              00922000
JSCBIJSC EQU   JSCBSEC1+24                                              00923000
JSCBTCBP EQU   JSCBSEC1+20                                              00924000
JSCBPCC  EQU   JSCBSEC1+16                                              00925000
JSCBTCP  EQU   JSCBSEC1+12                                              00926000
JSCBSHR  EQU   JSCBSEC1+8                                               00927000
JSCHPCEA EQU   JSCHPCE+1                                                00928000
JSCRSV32 EQU   JSCHPCE                                                  00929000
JSCRSV01 EQU   JSCBSEC1                                                 00930000
@NM00010 EQU   IEZJSCB                                                  00931000
@NM00009 EQU   TCBXTNT2+32                                              00932000
TCBRV181 EQU   TCBRV173                                                 00933000
TCBRV180 EQU   TCBRV173                                                 00934000
TCBRV179 EQU   TCBRV173                                                 00935000
TCBRV178 EQU   TCBRV173                                                 00936000
TCBRV177 EQU   TCBRV173                                                 00937000
TCBRV176 EQU   TCBRV173                                                 00938000
TCBRV175 EQU   TCBRV173                                                 00939000
TCBRV174 EQU   TCBRV173                                                 00940000
TCBRV172 EQU   TCBRV164                                                 00941000
TCBRV171 EQU   TCBRV164                                                 00942000
TCBRV170 EQU   TCBRV164                                                 00943000
TCBRV169 EQU   TCBRV164                                                 00944000
TCBRV168 EQU   TCBRV164                                                 00945000
TCBRV167 EQU   TCBRV164                                                 00946000
TCBRV166 EQU   TCBRV164                                                 00947000
TCBRV165 EQU   TCBRV164                                                 00948000
TCBRV163 EQU   TCBRV155                                                 00949000
TCBRV162 EQU   TCBRV155                                                 00950000
TCBRV161 EQU   TCBRV155                                                 00951000
TCBRV160 EQU   TCBRV155                                                 00952000
TCBRV159 EQU   TCBRV155                                                 00953000
TCBRV158 EQU   TCBRV155                                                 00954000
TCBRV157 EQU   TCBRV155                                                 00955000
TCBRV156 EQU   TCBRV155                                                 00956000
TCBRV154 EQU   TCBRV146                                                 00957000
TCBRV153 EQU   TCBRV146                                                 00958000
TCBRV152 EQU   TCBRV146                                                 00959000
TCBRV151 EQU   TCBRV146                                                 00960000
TCBRV150 EQU   TCBRV146                                                 00961000
TCBRV149 EQU   TCBRV146                                                 00962000
TCBRV148 EQU   TCBRV146                                                 00963000
TCBRV147 EQU   TCBRV146                                                 00964000
TCBRV145 EQU   TCBXTNT2+26                                              00965000
TCBRV144 EQU   TCBXTNT2+24                                              00966000
TCBRV143 EQU   TCBXTNT2+20                                              00967000
TCBRV142 EQU   TCBXTNT2+16                                              00968000
TCBRSV49 EQU   TCBXTNT2+12                                              00969000
TCBRSV48 EQU   TCBXTNT2+8                                               00970000
TCBRCMP  EQU   TCBXTNT2+5                                               00971000
TCBRSVAB EQU   TCBXTNT2+4                                               00972000
TCBGTFA  EQU   TCBGTF+1                                                 00973000
TCBRSV47 EQU   TCBTFLG                                                  00974000
TCBRSV46 EQU   TCBTFLG                                                  00975000
TCBRSV45 EQU   TCBTFLG                                                  00976000
TCBRSV44 EQU   TCBTFLG                                                  00977000
TCBRSV43 EQU   TCBTFLG                                                  00978000
TCBDSPIT EQU   TCBTFLG                                                  00979000
TCBERRTN EQU   TCBTFLG                                                  00980000
TCBASYNC EQU   TCBTFLG                                                  00981000
@NM00008 EQU   TCB+296                                                  00982000
TCBRV185 EQU   TCB+292                                                  00983000
TCBRV184 EQU   TCB+288                                                  00984000
TCBRV183 EQU   TCB+284                                                  00985000
TCBRV182 EQU   TCB+280                                                  00986000
TCBRV141 EQU   TCBRV133                                                 00987000
TCBRV140 EQU   TCBRV133                                                 00988000
TCBRV139 EQU   TCBRV133                                                 00989000
TCBRV138 EQU   TCBRV133                                                 00990000
TCBRV137 EQU   TCBRV133                                                 00991000
TCBRV136 EQU   TCBRV133                                                 00992000
TCBRV135 EQU   TCBRV133                                                 00993000
TCBRV134 EQU   TCBRV133                                                 00994000
TCBRV132 EQU   TCBRV124                                                 00995000
TCBRV131 EQU   TCBRV124                                                 00996000
TCBRV130 EQU   TCBRV124                                                 00997000
TCBRV129 EQU   TCBRV124                                                 00998000
TCBRV128 EQU   TCBRV124                                                 00999000
TCBRV127 EQU   TCBRV124                                                 01000000
TCBRV126 EQU   TCBRV124                                                 01001000
TCBRV125 EQU   TCBRV124                                                 01002000
TCBRV123 EQU   TCBFBYT2                                                 01003000
TCBRV122 EQU   TCBFBYT2                                                 01004000
TCBRV121 EQU   TCBFBYT2                                                 01005000
TCBSSSYN EQU   TCBFBYT2                                                 01006000
TCBFPRAP EQU   TCBFBYT2                                                 01007000
TCBFDW   EQU   TCBFBYT2                                                 01008000
TCBFMW   EQU   TCBFBYT2                                                 01009000
TCBCNCB  EQU   TCBFBYT2                                                 01010000
TCBLLH   EQU   TCBFBYT1                                                 01011000
TCBRV113 EQU   TCBFBYT1                                                 01012000
TCBEOT   EQU   TCBFBYT1                                                 01013000
TCBRTM2  EQU   TCBFBYT1                                                 01014000
TCBPGNLY EQU   TCBFBYT1                                                 01015000
TCBNDIOS EQU   TCBFBYT1                                                 01016000
TCBACTIV EQU   TCBFBYT1                                                 01017000
TCBEOTFM EQU   TCBFBYT1                                                 01018000
TCBAFFN  EQU   TCB+274                                                  01019000
TCBCCPVI EQU   TCB+272                                                  01020000
TCBRV103 EQU   TCB+268                                                  01021000
TCBMODE  EQU   TCBESTAE+3                                               01022000
TCBERTYP EQU   TCBESTAE+2                                               01023000
TCBRV314 EQU   TCBESTRM                                                 01024000
TCBRV313 EQU   TCBESTRM                                                 01025000
TCBRV312 EQU   TCBESTRM                                                 01026000
TCBRV311 EQU   TCBESTRM                                                 01027000
TCBRV310 EQU   TCBESTRM                                                 01028000
TCBRV309 EQU   TCBESTRM                                                 01029000
TCBRV308 EQU   TCBESTRM                                                 01030000
TCBETERM EQU   TCBESTRM                                                 01031000
TCBSCBKY EQU   TCBESTAE                                                 01032000
TCBRTM12 EQU   TCB+260                                                  01033000
TCBTCBID EQU   TCB+256                                                  01034000
TCBRSV96 EQU   TCB+252                                                  01035000
TCBSWA   EQU   TCB+248                                                  01036000
TCBFOEA  EQU   TCBFOE+1                                                 01037000
TCBRSV42 EQU   TCBFOE                                                   01038000
TCBRV306 EQU   TCB+240                                                  01039000
TCBRSV41 EQU   TCB+239                                                  01040000
TCBTID   EQU   TCB+238                                                  01041000
TCBRSVAA EQU   TCB+237                                                  01042000
TCBABCUR EQU   TCB+236                                                  01043000
TCBTMSAV EQU   TCB+232                                                  01044000
TCBIOTIM EQU   TCB+228                                                  01045000
TCBRTWA  EQU   TCB+224                                                  01046000
TCBBACK  EQU   TCB+220                                                  01047000
TCBTIRB  EQU   TCB+216                                                  01048000
TCBAECB  EQU   TCB+212                                                  01049000
TCBEXT2A EQU   TCBEXT2+1                                                01050000
TCBRSV39 EQU   TCBEXT2                                                  01051000
TCBSTMCT EQU   TCB+207                                                  01052000
TCBSYSCT EQU   TCB+206                                                  01053000
TCBRSV37 EQU   TCB+205                                                  01054000
TCBEXSVC EQU   TCBDAR                                                   01055000
TCBRSV36 EQU   TCBDAR                                                   01056000
TCBDARWT EQU   TCBDAR                                                   01057000
TCBDARO  EQU   TCBDAR                                                   01058000
TCBDARMC EQU   TCBDARC                                                  01059000
TCBDARD  EQU   TCBDAR                                                   01060000
TCBDARS  EQU   TCBDAR                                                   01061000
TCBDARP  EQU   TCBDAR                                                   01062000
TCBGTOFM EQU   TCBFLGS7                                                 01063000
TCBADMP  EQU   TCBFLGS7                                                 01064000
TCBRSTSK EQU   TCBFLGS7                                                 01065000
TCBRSV35 EQU   TCBFLGS7                                                 01066000
TCBSTACK EQU   TCBFLGS7                                                 01067000
TCBRSV34 EQU   TCBFLGS7                                                 01068000
TCBRSV33 EQU   TCBFLGS7                                                 01069000
TCBGPECB EQU   TCBFLGS7                                                 01070000
TCBNTJS  EQU   TCBFLGS6                                                 01071000
TCBAPG   EQU   TCBFLGS6                                                 01072000
TCBMIGR  EQU   TCBFLGS6                                                 01073000
TCBRV303 EQU   TCBFLGS6                                                 01074000
TCBSPVLK EQU   TCBFLGS6                                                 01075000
TCBCPU   EQU   TCBFLGS6                                                 01076000
TCBPIE17 EQU   TCBFLGS6                                                 01077000
TCBRV    EQU   TCBFLGS6                                                 01078000
TCBRSV79 EQU   TCBNDSP5                                                 01079000
TCBRSV78 EQU   TCBNDSP5                                                 01080000
TCBRSV77 EQU   TCBNDSP5                                                 01081000
TCBRSV76 EQU   TCBNDSP5                                                 01082000
TCBRSV75 EQU   TCBNDSP5                                                 01083000
TCBRSV74 EQU   TCBNDSP5                                                 01084000
TCBRSV95 EQU   TCBNDSP5                                                 01085000
TCBRSV94 EQU   TCBNDSP5                                                 01086000
TCBRSV93 EQU   TCBNDSP4                                                 01087000
TCBRSV92 EQU   TCBNDSP4                                                 01088000
TCBRSV91 EQU   TCBNDSP4                                                 01089000
TCBRSV90 EQU   TCBNDSP4                                                 01090000
TCBRSV89 EQU   TCBNDSP4                                                 01091000
TCBRSV88 EQU   TCBNDSP4                                                 01092000
TCBRSV87 EQU   TCBNDSP4                                                 01093000
TCBRSV86 EQU   TCBNDSP4                                                 01094000
TCBEXT1A EQU   TCBEXT1+1                                                01095000
TCBRSV32 EQU   TCBEXT1                                                  01096000
TCBRSV30 EQU   TCB+192                                                  01097000
TCBIOBRC EQU   TCB+188                                                  01098000
TCBDDWTC EQU   TCB+186                                                  01099000
TCBDDEXC EQU   TCB+184                                                  01100000
TCBJSCBB EQU   TCBJSCB+1                                                01101000
@NM00007 EQU   TCBRECDE                                                 01102000
TCBREC   EQU   TCBRECDE                                                 01103000
TCBMDIDS EQU   TCB+176                                                  01104000
TCBRSV28 EQU   TCBNDSP3                                                 01105000
TCBRSV27 EQU   TCBNDSP3                                                 01106000
TCBRSV26 EQU   TCBNDSP3                                                 01107000
TCBRSV25 EQU   TCBNDSP3                                                 01108000
TCBRSV24 EQU   TCBNDSP3                                                 01109000
TCBSRBND EQU   TCBNDSP3                                                 01110000
TCBRV302 EQU   TCBNDSP3                                                 01111000
TCBLJSND EQU   TCBNDSP3                                                 01112000
TCBABE   EQU   TCBNDSP2                                                 01113000
TCBDSS   EQU   TCBNDSP2                                                 01114000
TCBOWAIT EQU   TCBNDSP2                                                 01115000
TCBIWAIT EQU   TCBNDSP2                                                 01116000
TCBNDTS  EQU   TCBNDSP2                                                 01117000
TCBNDSVC EQU   TCBNDSP2                                                 01118000
TCBSTPP  EQU   TCBNDSP2                                                 01119000
TCBABD   EQU   TCBNDSP2                                                 01120000
TCBRSV22 EQU   TCBNDSP1                                                 01121000
TCBPIEND EQU   TCBNDSP1                                                 01122000
TCBTPSP  EQU   TCBNDSP1                                                 01123000
TCBDDRND EQU   TCBNDSP1                                                 01124000
TCBRSPND EQU   TCBNDSP1                                                 01125000
TCBRSTND EQU   TCBNDSP1                                                 01126000
TCBDARPN EQU   TCBNDSP1                                                 01127000
TCBDARTN EQU   TCBNDSP1                                                 01128000
TCBNDSP0 EQU   TCBNDSP                                                  01129000
TCBUSER  EQU   TCB+168                                                  01130000
TCBTCTB  EQU   TCBTCT+1                                                 01131000
TCBRSV9C EQU   TCBTCTGF                                                 01132000
TCBRSV9B EQU   TCBTCTGF                                                 01133000
TCBRSV9A EQU   TCBTCTGF                                                 01134000
TCBRSV99 EQU   TCBTCTGF                                                 01135000
TCBRSV98 EQU   TCBTCTGF                                                 01136000
TCBRSV97 EQU   TCBTCTGF                                                 01137000
TCBRSV20 EQU   TCBTCTGF                                                 01138000
TCBSMFGF EQU   TCBTCTGF                                                 01139000
TCBSTABB EQU   TCBSTAB+1                                                01140000
TCBSTCUR EQU   TCBNSTAE                                                 01141000
TCBRV301 EQU   TCBNSTAE                                                 01142000
TCBSYNCH EQU   TCBNSTAE                                                 01143000
TCBHALT  EQU   TCBNSTAE                                                 01144000
TCBPPSUP EQU   TCBNSTAE                                                 01145000
TCB33E   EQU   TCBNSTAE                                                 01146000
TCBQUIES EQU   TCBNSTAE                                                 01147000
TCBSTABE EQU   TCBNSTAE                                                 01148000
TCBAQE   EQU   TCB+156                                                  01149000
TCBPQE   EQU   TCB+152                                                  01150000
TCBTSDP  EQU   TCB+151                                                  01151000
TCBTSLP  EQU   TCB+150                                                  01152000
TCBSTPCT EQU   TCB+149                                                  01153000
TCBCPUBN EQU   TCBTSFLG                                                 01154000
TCBDYDSP EQU   TCBTSFLG                                                 01155000
TCBRSV18 EQU   TCBTSFLG                                                 01156000
TCBRSV17 EQU   TCBTSFLG                                                 01157000
TCBTIOTG EQU   TCBTSFLG                                                 01158000
TCBATT   EQU   TCBTSFLG                                                 01159000
TCBSTPPR EQU   TCBTSFLG                                                 01160000
TCBRV300 EQU   TCBTSTSK                                                 01161000
TCBECB   EQU   TCB+144                                                  01162000
TCBIQE   EQU   TCB+140                                                  01163000
TCBLTC   EQU   TCB+136                                                  01164000
TCBOTC   EQU   TCB+132                                                  01165000
TCBNTC   EQU   TCB+128                                                  01166000
TCBJSTCA EQU   TCBJSTCB+1                                               01167000
TCBRSV16 EQU   TCBJSTCB                                                 01168000
TCBTQET  EQU   TCBTME                                                   01169000
TCBTCB   EQU   TCB+116                                                  01170000
TCBFSAB  EQU   TCBFSA+1                                                 01171000
TCBQEL   EQU   TCBFSA                                                   01172000
TCBGRS15 EQU   TCBGRS+60                                                01173000
TCBGRS14 EQU   TCBGRS+56                                                01174000
TCBGRS13 EQU   TCBGRS+52                                                01175000
TCBGRS12 EQU   TCBGRS+48                                                01176000
TCBGRS11 EQU   TCBGRS+44                                                01177000
TCBGRS10 EQU   TCBGRS+40                                                01178000
TCBGRS9  EQU   TCBGRS+36                                                01179000
TCBGRS8  EQU   TCBGRS+32                                                01180000
TCBGRS7  EQU   TCBGRS+28                                                01181000
TCBGRS6  EQU   TCBGRS+24                                                01182000
TCBGRS5  EQU   TCBGRS+20                                                01183000
TCBGRS4  EQU   TCBGRS+16                                                01184000
TCBGRS3  EQU   TCBGRS+12                                                01185000
TCBGRS2  EQU   TCBGRS+8                                                 01186000
TCBGRS1  EQU   TCBGRS+4                                                 01187000
TCBGRS0  EQU   TCBGRS                                                   01188000
TCBJPQB  EQU   TCBJPQ+1                                                 01189000
TCBRSV15 EQU   TCBPURGE                                                 01190000
TCBRSV14 EQU   TCBPURGE                                                 01191000
TCBRSV13 EQU   TCBPURGE                                                 01192000
TCBRSV12 EQU   TCBPURGE                                                 01193000
TCBRSV11 EQU   TCBPURGE                                                 01194000
TCBRSV10 EQU   TCBPURGE                                                 01195000
TCBRSV09 EQU   TCBPURGE                                                 01196000
TCBJPQF  EQU   TCBPURGE                                                 01197000
TCBJLB   EQU   TCB+40                                                   01198000
TCBLLS   EQU   TCB+36                                                   01199000
TCBDSP   EQU   TCB+35                                                   01200000
TCBLMP   EQU   TCB+34                                                   01201000
TCBPNDSP EQU   TCBFLGS5                                                 01202000
TCBFCD1  EQU   TCBFLGS5                                                 01203000
TCBSTP   EQU   TCBFLGS5                                                 01204000
TCBSYS   EQU   TCBFLGS5                                                 01205000
TCBANDSP EQU   TCBFLGS5                                                 01206000
TCBPAGE  EQU   TCBFLGS5                                                 01207000
TCBUXNDF EQU   TCBABWF                                                  01208000
TCBFC    EQU   TCBFLGS5                                                 01209000
TCBONDSP EQU   TCBFLGS4                                                 01210000
TCBMPCND EQU   TCBFLGS4                                                 01211000
TCBMPCVQ EQU   TCBFLGS4                                                 01212000
TCBUXNDV EQU   TCBFLGS4                                                 01213000
TCBHNDSP EQU   TCBFLGS4                                                 01214000
TCBRQENA EQU   TCBFLGS4                                                 01215000
TCBSER   EQU   TCBFLGS4                                                 01216000
TCBNDUMP EQU   TCBFLGS4                                                 01217000
TCBDWSTA EQU   TCBFLGS3                                                 01218000
TCBRSV08 EQU   TCBFLGS3                                                 01219000
TCBRSV07 EQU   TCBFLGS3                                                 01220000
TCBRSV06 EQU   TCBFLGS3                                                 01221000
TCBABGM  EQU   TCBFLGS3                                                 01222000
TCBABTRM EQU   TCBFLGS3                                                 01223000
TCBADINP EQU   TCBFLGS3                                                 01224000
TCBFSM   EQU   TCBFLGS3                                                 01225000
TCBFTS   EQU   TCBFLGS2                                                 01226000
TCBFETXR EQU   TCBFLGS2                                                 01227000
TCBFDSOP EQU   TCBFLGS2                                                 01228000
TCBFJMC  EQU   TCBFLGS2                                                 01229000
TCBFSMC  EQU   TCBFLGS2                                                 01230000
TCBFABOP EQU   TCBFLGS2                                                 01231000
TCBFSTI  EQU   TCBFLGS2                                                 01232000
TCBFOINP EQU   TCBFLGS2                                                 01233000
TCBFX    EQU   TCBFLGS1                                                 01234000
TCBFS    EQU   TCBFLGS1                                                 01235000
TCBFT    EQU   TCBFLGS1                                                 01236000
TCBPDUMP EQU   TCBFLGS1                                                 01237000
TCBRSV04 EQU   TCBFLGS1                                                 01238000
TCBFERA  EQU   TCBFLGS1                                                 01239000
TCBFE    EQU   TCBFLGS1                                                 01240000
TCBFA    EQU   TCBFLGS1                                                 01241000
TCBZERO  EQU   TCBPKF                                                   01242000
TCBFLAG  EQU   TCBPKF                                                   01243000
TCBMSSB  EQU   TCBMSS+1                                                 01244000
TCBRSV03 EQU   TCBMSS                                                   01245000
TCBTRNB  EQU   TCBTRN+1                                                 01246000
TCBRSV02 EQU   TCBABF                                                   01247000
TCBOLTEP EQU   TCBABF                                                   01248000
TCBTCP   EQU   TCBABF                                                   01249000
TCBTCPP  EQU   TCBABF                                                   01250000
TCBRSV01 EQU   TCBABF                                                   01251000
TCBGRPH  EQU   TCBABF                                                   01252000
TCBNOCHK EQU   TCBABF                                                   01253000
TCBMOD91 EQU   TCBABF                                                   01254000
TCBCMPC  EQU   TCBCMP+1                                                 01255000
TCBRV318 EQU   TCBCMSG                                                  01256000
TCBRV317 EQU   TCBCIND                                                  01257000
TCBRV316 EQU   TCBCWTO                                                  01258000
TCBCASID EQU   TCBCDBL                                                  01259000
TCBNOCC  EQU   TCBSTCC                                                  01260000
TCBDMPO  EQU   TCBCPP                                                   01261000
TCBCSTEP EQU   TCBCMPF                                                  01262000
TCBCREQ  EQU   TCBCMPF                                                  01263000
TCBTIO   EQU   TCB+12                                                   01264000
TCBDEB   EQU   TCB+8                                                    01265000
TCBPIEA  EQU   TCBPIE+1                                                 01266000
TCBPM    EQU   TCBPMASK                                                 01267000
@NM00006 EQU   TCBPMASK                                                 01268000
TCBRBP   EQU   TCB                                                      01269000
TCBFRS6  EQU   TCBFRS+24                                                01270000
TCBFRS4  EQU   TCBFRS+16                                                01271000
TCBFRS2  EQU   TCBFRS+8                                                 01272000
TCBFRS0  EQU   TCBFRS                                                   01273000
SSVTRSV1 EQU   SSVTFSIZ                                                 01274000
SSCTSUSE EQU   SSCT+20                                                  01275000
SSCTRSV1 EQU   SSCT+13                                                  01276000
SSCTFLG1 EQU   SSCT+12                                                  01277000
SSCTID   EQU   SSCT                                                     01278000
SSIBSUSE EQU   SSIB+32                                                  01279000
SSIBRSV1 EQU   SSIB+28                                                  01280000
SSIBDEST EQU   SSIB+20                                                  01281000
SSIBJBID EQU   SSIB+12                                                  01282000
SSIBRESV EQU   SSIB+7                                                   01283000
@NM00005 EQU   SSIBFLG1                                                 01284000
SSIBPJES EQU   SSIBFLG1                                                 01285000
SSOBINDV EQU   SSOB+16                                                  01286000
SSOBRETN EQU   SSOB+12                                                  01287000
JESPJESN EQU   JESCT+28                                                 01288000
JESRESQM EQU   JESCT+16                                                 01289000
JESQMGR  EQU   JESCT+12                                                 01290000
JESUNITS EQU   JESCT+4                                                  01291000
@NM00004 EQU   JESCT                                                    01292000
CVTLEVL  EQU   CVTRELNO+2                                               01293000
CVTNUMB  EQU   CVTRELNO                                                 01294000
CVTMDL   EQU   CVTFIX+250                                               01295000
@NM00003 EQU   CVTFIX+248                                               01296000
@NM00002 EQU   CVTFIX                                                   01297000
CVTRV482 EQU   CVTXTNT2+128                                             01298000
CVTRV481 EQU   CVTXTNT2+124                                             01299000
CVTRV480 EQU   CVTXTNT2+120                                             01300000
CVTRV479 EQU   CVTXTNT2+118                                             01301000
CVTRV478 EQU   CVTXTNT2+117                                             01302000
CVTRV477 EQU   CVTXTNT2+116                                             01303000
CVTRV476 EQU   CVTXTNT2+115                                             01304000
CVTRV475 EQU   CVTXTNT2+114                                             01305000
CVTRV474 EQU   CVTRV466                                                 01306000
CVTRV473 EQU   CVTRV466                                                 01307000
CVTRV472 EQU   CVTRV466                                                 01308000
CVTRV471 EQU   CVTRV466                                                 01309000
CVTRV470 EQU   CVTRV466                                                 01310000
CVTRV469 EQU   CVTRV466                                                 01311000
CVTRV468 EQU   CVTRV466                                                 01312000
CVTRV467 EQU   CVTRV466                                                 01313000
CVTRV465 EQU   CVTRV457                                                 01314000
CVTRV464 EQU   CVTRV457                                                 01315000
CVTRV463 EQU   CVTRV457                                                 01316000
CVTRV462 EQU   CVTRV457                                                 01317000
CVTRV461 EQU   CVTRV457                                                 01318000
CVTRV460 EQU   CVTRV457                                                 01319000
CVTRV459 EQU   CVTRV457                                                 01320000
CVTRV458 EQU   CVTRV457                                                 01321000
CVTRV456 EQU   CVTXTNT2+108                                             01322000
CVTRV455 EQU   CVTXTNT2+104                                             01323000
CVTRV454 EQU   CVTXTNT2+100                                             01324000
CVTRV453 EQU   CVTXTNT2+96                                              01325000
CVTRV452 EQU   CVTXTNT2+94                                              01326000
CVTRV451 EQU   CVTXTNT2+92                                              01327000
CVTRV450 EQU   CVTXTNT2+90                                              01328000
CVTRV449 EQU   CVTXTNT2+88                                              01329000
CVTRV448 EQU   CVTXTNT2+87                                              01330000
CVTRV447 EQU   CVTXTNT2+86                                              01331000
CVTRV446 EQU   CVTRV438                                                 01332000
CVTRV445 EQU   CVTRV438                                                 01333000
CVTRV444 EQU   CVTRV438                                                 01334000
CVTRV443 EQU   CVTRV438                                                 01335000
CVTRV442 EQU   CVTRV438                                                 01336000
CVTRV441 EQU   CVTRV438                                                 01337000
CVTRV440 EQU   CVTRV438                                                 01338000
CVTRV439 EQU   CVTRV438                                                 01339000
CVTRV437 EQU   CVTRV429                                                 01340000
CVTRV436 EQU   CVTRV429                                                 01341000
CVTRV435 EQU   CVTRV429                                                 01342000
CVTRV434 EQU   CVTRV429                                                 01343000
CVTRV433 EQU   CVTRV429                                                 01344000
CVTRV432 EQU   CVTRV429                                                 01345000
CVTRV431 EQU   CVTRV429                                                 01346000
CVTRV430 EQU   CVTRV429                                                 01347000
CVTRV428 EQU   CVTXTNT2+80                                              01348000
CVTRV427 EQU   CVTXTNT2+76                                              01349000
CVTRV426 EQU   CVTXTNT2+72                                              01350000
CVTRV425 EQU   CVTXTNT2+68                                              01351000
CVTATACT EQU   CVTATCVT                                                 01352000
CVTRV423 EQU   CVTXTNT2+62                                              01353000
CVTRV422 EQU   CVTXTNT2+60                                              01354000
CVTRV421 EQU   CVTXTNT2+58                                              01355000
CVTRV420 EQU   CVTXTNT2+56                                              01356000
CVTRV419 EQU   CVTXTNT2+55                                              01357000
CVTRV418 EQU   CVTXTNT2+54                                              01358000
CVTRV417 EQU   CVTRV409                                                 01359000
CVTRV416 EQU   CVTRV409                                                 01360000
CVTRV415 EQU   CVTRV409                                                 01361000
CVTRV414 EQU   CVTRV409                                                 01362000
CVTRV413 EQU   CVTRV409                                                 01363000
CVTRV412 EQU   CVTRV409                                                 01364000
CVTRV411 EQU   CVTRV409                                                 01365000
CVTRV410 EQU   CVTRV409                                                 01366000
CVTRV408 EQU   CVTRV400                                                 01367000
CVTRV407 EQU   CVTRV400                                                 01368000
CVTRV406 EQU   CVTRV400                                                 01369000
CVTRV405 EQU   CVTRV400                                                 01370000
CVTRV404 EQU   CVTRV400                                                 01371000
CVTRV403 EQU   CVTRV400                                                 01372000
CVTRV402 EQU   CVTRV400                                                 01373000
CVTRV401 EQU   CVTRV400                                                 01374000
CVTRSVA1 EQU   CVTXTNT2+48                                              01375000
CVTRSVA0 EQU   CVTXTNT2+44                                              01376000
CVTRSV99 EQU   CVTXTNT2+40                                              01377000
CVTRSV98 EQU   CVTXTNT2+36                                              01378000
CVTRSV97 EQU   CVTXTNT2+34                                              01379000
CVTRSV96 EQU   CVTXTNT2+32                                              01380000
CVTOLTEP EQU   CVTXTNT2+28                                              01381000
CVTQIDA  EQU   CVTQID+1                                                 01382000
CVTRSV95 EQU   CVTQID                                                   01383000
CVTRSV94 EQU   CVTXTNT2+20                                              01384000
CVTRSV93 EQU   CVTXTNT2+16                                              01385000
CVTRSV92 EQU   CVTXTNT2+12                                              01386000
CVTDEBVR EQU   CVTXTNT2+8                                               01387000
CVTRSV91 EQU   CVTXTNT2+6                                               01388000
CVTRSV9H EQU   CVTRSV90                                                 01389000
CVTRSV9G EQU   CVTRSV90                                                 01390000
CVTRSV9F EQU   CVTRSV90                                                 01391000
CVTRSV9E EQU   CVTRSV90                                                 01392000
CVTRSV9D EQU   CVTRSV90                                                 01393000
CVTRSV9C EQU   CVTRSV90                                                 01394000
CVTRSV9B EQU   CVTRSV90                                                 01395000
CVTRSV9A EQU   CVTRSV90                                                 01396000
CVTNUCLS EQU   CVTXTNT2+4                                               01397000
CVTDSSVA EQU   CVTDSSV+1                                                01398000
CVTRSV89 EQU   CVTDSSV                                                  01399000
CVTRSV88 EQU   CVTXTNT1+8                                               01400000
CVTRSV87 EQU   CVTXTNT1+4                                               01401000
CVTFACHN EQU   CVTXTNT1                                                 01402000
CVTRV488 EQU   CVTMAP+412                                               01403000
CVTRV487 EQU   CVTMAP+408                                               01404000
CVTRV486 EQU   CVTMAP+404                                               01405000
CVTRV485 EQU   CVTMAP+400                                               01406000
CVTRV484 EQU   CVTMAP+396                                               01407000
CVTRV483 EQU   CVTMAP+392                                               01408000
CVTATMCA EQU   CVTATMCT+1                                               01409000
CVTATMST EQU   CVTATMCT                                                 01410000
CVTRSV61 EQU   CVTMAP+384                                               01411000
CVTRSV60 EQU   CVTMAP+380                                               01412000
CVTSTOA  EQU   CVTMAP+376                                               01413000
CVTRSV58 EQU   CVTMAP+374                                               01414000
CVTRSV57 EQU   CVTMAP+372                                               01415000
CVTDDCE  EQU   CVTMAP+368                                               01416000
CVTPNWFR EQU   CVTMAP+364                                               01417000
CVTSMF   EQU   CVTMAP+360                                               01418000
CVTSULK  EQU   CVTMAP+358                                               01419000
CVTSLKO  EQU   CVTSYSK                                                  01420000
CVTSLKP  EQU   CVTSYSK                                                  01421000
CVTSLKQ  EQU   CVTSYSK                                                  01422000
CVTSLKR  EQU   CVTSYSK                                                  01423000
CVTRSV56 EQU   CVTSYSK                                                  01424000
CVTRSV55 EQU   CVTSYSK                                                  01425000
CVTRSV54 EQU   CVTSYSK                                                  01426000
CVTRSV53 EQU   CVTSYSK                                                  01427000
CVTRSV52 EQU   CVTA1F1                                                  01428000
CVTRSV51 EQU   CVTA1F1                                                  01429000
CVTRSV50 EQU   CVTA1F1                                                  01430000
CVTRSV49 EQU   CVTA1F1                                                  01431000
CVTRSV48 EQU   CVTA1F1                                                  01432000
CVTRSV47 EQU   CVTA1F1                                                  01433000
CVTSRSW  EQU   CVTA1F1                                                  01434000
CVTPFSW  EQU   CVTA1F1                                                  01435000
CVTPCVT  EQU   CVTMAP+352                                               01436000
CVTRSV46 EQU   CVTMAP+344                                               01437000
CVTRSV45 EQU   CVTMAP+340                                               01438000
CVTRSV44 EQU   CVTMAP+338                                               01439000
CVTRSV43 EQU   CVTMAP+336                                               01440000
CVTHJESA EQU   CVTHJES+1                                                01441000
CVTRSV42 EQU   CVTHJES                                                  01442000
CVTEXT2A EQU   CVTEXT2+1                                                01443000
CVTRSV41 EQU   CVTEXT2                                                  01444000
CVTAPFA  EQU   CVTAPF+1                                                 01445000
CVTRSV40 EQU   CVTAPF                                                   01446000
CVTINTLA EQU   CVTMAP+320                                               01447000
CVTERPV  EQU   CVTMAP+316                                               01448000
CVTEORM  EQU   CVTMAP+312                                               01449000
CVTMCHPR EQU   CVTMAP+308                                               01450000
CVTTZ    EQU   CVTMAP+304                                               01451000
CVTJEPS  EQU   CVTMAP+300                                               01452000
CVTMODE  EQU   CVTMAP+292                                               01453000
CVTPTRV  EQU   CVTMAP+288                                               01454000
CVTREAL  EQU   CVTMAP+284                                               01455000
CVTRSV39 EQU   CVTMAP+280                                               01456000
CVTRSV38 EQU   CVTMAP+276                                               01457000
CVTDMSRA EQU   CVTDMSR+1                                                01458000
CVTRSV37 EQU   CVTDMSR                                                  01459000
CVTQMSGA EQU   CVTQMSG+1                                                01460000
CVTRSV36 EQU   CVTQMSG                                                  01461000
CVTAMFF  EQU   CVTMAP+264                                               01462000
CVTPURGA EQU   CVTPURG+1                                                01463000
CVTRSV35 EQU   CVTPURG                                                  01464000
CVTCBSP  EQU   CVTMAP+256                                               01465000
CVTATERA EQU   CVTATER+1                                                01466000
CVTSYST  EQU   CVTATER                                                  01467000
CVTTAT   EQU   CVTTATA+1                                                01468000
CVTTSKS  EQU   CVTTATA                                                  01469000
CVTAQAVB EQU   CVTAQAVT+1                                               01470000
CVTRSV34 EQU   CVTTCMFG                                                 01471000
CVTRSV33 EQU   CVTTCMFG                                                 01472000
CVTRSV32 EQU   CVTTCMFG                                                 01473000
CVTRSV31 EQU   CVTTCMFG                                                 01474000
CVTRSV30 EQU   CVTTCMFG                                                 01475000
CVTRSV29 EQU   CVTTCMFG                                                 01476000
CVTRSV28 EQU   CVTTCMFG                                                 01477000
CVTTCRDY EQU   CVTTCMFG                                                 01478000
CVTGTFA  EQU   CVTGTF+1                                                 01479000
CVTRSV27 EQU   CVTGTFST                                                 01480000
CVTRSV26 EQU   CVTGTFST                                                 01481000
CVTRV319 EQU   CVTUSR                                                   01482000
CVTRV318 EQU   CVTFORM                                                  01483000
CVTRV317 EQU   CVTTMODE                                                 01484000
CVTRV316 EQU   CVTSTATE                                                 01485000
CVTRV315 EQU   CVTGTFS                                                  01486000
CVTGTFAV EQU   CVTGTFS                                                  01487000
CVT0SCR1 EQU   CVTMAP+232                                               01488000
CVTTSCVB EQU   CVTTSCVT+1                                               01489000
CVTRSV25 EQU   CVTTSFLG                                                 01490000
CVTRSV24 EQU   CVTTSFLG                                                 01491000
CVTRSV23 EQU   CVTTSFLG                                                 01492000
CVTRSV22 EQU   CVTTSFLG                                                 01493000
CVTRSV21 EQU   CVTTSFLG                                                 01494000
CVTRSV20 EQU   CVTTSFLG                                                 01495000
CVTRSV19 EQU   CVTTSFLG                                                 01496000
CVTTSRDY EQU   CVTTSFLG                                                 01497000
CVTRMS   EQU   CVTMAP+224                                               01498000
CVTPATCH EQU   CVTMAP+220                                               01499000
CVTTSCE  EQU   CVTMAP+216                                               01500000
CVTLNKSC EQU   CVTMAP+214                                               01501000
CVTQABST EQU   CVTMAP+212                                               01502000
CVTMDLDS EQU   CVTMAP+208                                               01503000
CVTUSER  EQU   CVTMAP+204                                               01504000
CVTABEND EQU   CVTMAP+200                                               01505000
CVTSMCA  EQU   CVTMAP+196                                               01506000
CVTRSV18 EQU   CVTMAP+192                                               01507000
CVTQLPAQ EQU   CVTMAP+188                                               01508000
CVTQCDSR EQU   CVTMAP+184                                               01509000
CVTRSV17 EQU   CVTOPTB                                                  01510000
CVTRSV16 EQU   CVTOPTB                                                  01511000
CVTFP    EQU   CVTOPTB                                                  01512000
CVTAPTHR EQU   CVTOPTB                                                  01513000
CVTNLOG  EQU   CVTOPTB                                                  01514000
CVTTOD   EQU   CVTOPTB                                                  01515000
CVTCTIMS EQU   CVTOPTB                                                  01516000
CVTPROT  EQU   CVTOPTB                                                  01517000
CVTXPFP  EQU   CVTOPTA                                                  01518000
CVTASCII EQU   CVTOPTA                                                  01519000
CVTRSV13 EQU   CVTOPTA                                                  01520000
CVTRSV12 EQU   CVTOPTA                                                  01521000
CVTNIP   EQU   CVTOPTA                                                  01522000
CVTDDR   EQU   CVTOPTA                                                  01523000
CVTAPR   EQU   CVTOPTA                                                  01524000
CVTCCH   EQU   CVTOPTA                                                  01525000
CVTSNCTR EQU   CVTMAP+180                                               01526000
CVTQMWR  EQU   CVTMAP+176                                               01527000
CVTQOCR  EQU   CVTMAP+172                                               01528000
CVT1EF00 EQU   CVTMAP+168                                               01529000
CVTMZ00  EQU   CVTMAP+164                                               01530000
CVTHEAD  EQU   CVTMAP+160                                               01531000
CVTRSV11 EQU   CVTMAP+156                                               01532000
CVT0PT01 EQU   CVTMAP+152                                               01533000
CVTMSER  EQU   CVTMAP+148                                               01534000
CVTIERLC EQU   CVTMAP+144                                               01535000
CVTILCH  EQU   CVTMAP+140                                               01536000
CVT0DS   EQU   CVTMAP+136                                               01537000
CVTFBOSV EQU   CVTMAP+132                                               01538000
CVTNUCB  EQU   CVTMAP+128                                               01539000
CVTIXAVL EQU   CVTMAP+124                                               01540000
CVTIOQET EQU   CVTMAP+120                                               01541000
CVTDCBA  EQU   CVTMAP+117                                               01542000
CVTMVS2  EQU   CVTDCB                                                   01543000
CVT6DAT  EQU   CVTDCB                                                   01544000
CVT4MPS  EQU   CVTDCB                                                   01545000
CVTRSV09 EQU   CVTDCB                                                   01546000
CVT4MS1  EQU   CVTDCB                                                   01547000
CVT2SPS  EQU   CVTDCB                                                   01548000
CVT1SSS  EQU   CVTDCB                                                   01549000
CVTRSV08 EQU   CVTDCB                                                   01550000
CVTSTB   EQU   CVTMAP+112                                               01551000
CVTQTD00 EQU   CVTMAP+108                                               01552000
CVTQTE00 EQU   CVTMAP+104                                               01553000
CVTCUCB  EQU   CVTMAP+100                                               01554000
CVTSJQ   EQU   CVTMAP+96                                                01555000
CVTPBLDL EQU   CVTMAP+92                                                01556000
CVTTPC   EQU   CVTMAP+88                                                01557000
CVTSVDCB EQU   CVTMAP+84                                                01558000
CVTBRET  EQU   CVTMAP+82                                                01559000
CVTEXIT  EQU   CVTMAP+80                                                01560000
CVT0FN00 EQU   CVTMAP+76                                                01561000
CVTDARA  EQU   CVTDAR+1                                                 01562000
CVTRSV07 EQU   CVTFLGS1                                                 01563000
CVTRSV06 EQU   CVTFLGS1                                                 01564000
CVTRSV05 EQU   CVTFLGS1                                                 01565000
CVTRSV04 EQU   CVTFLGS1                                                 01566000
CVTRSV03 EQU   CVTFLGS1                                                 01567000
CVTRSV02 EQU   CVTFLGS1                                                 01568000
CVTRSV01 EQU   CVTFLGS1                                                 01569000
CVTDMPLK EQU   CVTFLGS1                                                 01570000
CVTXITP  EQU   CVTMAP+68                                                01571000
CVTZDTAB EQU   CVTMAP+64                                                01572000
CVTMSLT  EQU   CVTMAP+60                                                01573000
CVTDATE  EQU   CVTMAP+56                                                01574000
CVTBTERM EQU   CVTMAP+52                                                01575000
CVTSYSAD EQU   CVTMAP+48                                                01576000
CVTXTLER EQU   CVTMAP+44                                                01577000
CVTILK2  EQU   CVTMAP+40                                                01578000
CVTILK1  EQU   CVTMAP+36                                                01579000
CVTPRLTV EQU   CVTMAP+32                                                01580000
CVTPCNVT EQU   CVTMAP+28                                                01581000
CVT0VL00 EQU   CVTMAP+24                                                01582000
CVTXAPG  EQU   CVTMAP+20                                                01583000
CVTBUF   EQU   CVTMAP+16                                                01584000
CVTJOB   EQU   CVTMAP+12                                                01585000
CVTLINK  EQU   CVTMAP+8                                                 01586000
CVT0EF00 EQU   CVTMAP+4                                                 01587000
CVT      EQU   CVTMAP                                                   01588000
@NM00001 EQU   PARMAREA                                                 01589000
.@UNREFD ANOP                          END UNREFERENCED COMPONENTS      01590000
@ENDDATA EQU   *                                                        01591000
         END   IEFJSREQ                                                 01592000
