         TITLE 'ISTINMAD--ADELETE SERVICE ROUTINE                      *00001000
                        '                                               00002000
ISTINMAD CSECT ,                                                   0001 00003000
ISTINCAD DS    0H                                                  0001 00004000
         ENTRY ISTINCAD                                                 00005000
@MAINENT DS    0H                                                  0001 00006000
         USING *,@15                                               0001 00007000
         B     @PROLOG                                             0001 00008000
         DC    AL2(@EP00001-@MAINENT)                                   00009000
         DC    AL1(16)                                             0001 00010000
         DC    C'ISTINMAD  75.130'                                 0001 00011000
         DROP  @15                                                      00012000
@PROLOG  STM   @14,@12,12(@13)                                     0001 00013000
         BALR  @12,0                                               0001 00014000
@PSTART  DS    0H                                                  0001 00015000
         USING @PSTART,@12                                         0001 00016000
         ST    @13,@SA00001+4                                      0001 00017000
         LA    @14,@SA00001                                        0001 00018000
         ST    @14,8(,@13)                                         0001 00019000
         LR    @13,@14                                             0001 00020000
         AH    @15,4(,@15)                                         0001 00021000
         BR    @15                                                 0001 00022000
@EP00001 DS    0H                                                  0002 00023000
*   LDPRMPR4=R1;                    /* ESTABLISH PTR TO PARM LIST    */ 00024000
         LR    LDPRMPR4,R1                                         0037 00025000
*   IF LDPFX='1'B THEN              /* WAS MODULE PGFIX'D            */ 00026000
         TM    LDPFX(LDPRMPR4),B'10000000'                         0038 00027000
         BNO   @RF00038                                            0038 00028000
*     DO;                           /* YES                           */ 00029000
*/********************************************************************/ 00030000
*/*   IEAQCDSR--SEARCHES THE ACTIVE LINK PACK AREA QUEUE FOR A       */ 00031000
*/*              SPECIFIC MODULE.                                    */ 00032000
*/*     INPUT:                                                       */ 00033000
*/*       R8 = ADDRESS OF ACTIVE LPA QUEUE                           */ 00034000
*/*       R9 = ADDRESS OF EPNAME OF MODULE                           */ 00035000
*/*       R0-R7,R10-R13,R15 = IRRELEVANT                             */ 00036000
*/*       R14 = CALLER'S RETURN ADDRESS                              */ 00037000
*/*     OUTPUT:                                                      */ 00038000
*/*       1) RETURN TO CALLER VIA BR 14    --  CDE FOUND             */ 00039000
*/*         R0 = FIRST 4 CHARACTERS OF ENTRY POINT NAME              */ 00040000
*/*         R1 = LAST 4 CHARACTERS OF ENTRY POINT NAME               */ 00041000
*/*         R2-R10,R12-R14 = UNCHANGED                               */ 00042000
*/*         R11 = ADDRESS OF CDE                                     */ 00043000
*/*         R15 = UNPREDICTABLE                                      */ 00044000
*/*       2) RETURN TO CALLER VIA BR 14+4  --  CDE NOT FOUND         */ 00045000
*/*         R0 = FIRST 4 CHARACTERS OF ENTRY POINT NAME              */ 00046000
*/*         R1 = LAST 4 CHARACTERS OF ENTRY POINT NAME               */ 00047000
*/*         R2-R10,R12-R14 = UNCHANGED                               */ 00048000
*/*         R11 = X'00000000'                                        */ 00049000
*/*         R15 = UNPREDICTABLE                                      */ 00050000
*/********************************************************************/ 00051000
*                                                                  0040 00052000
*       RESPECIFY                                                  0040 00053000
*        (SWITCH,                                                  0040 00054000
*         R8,                                                      0040 00055000
*         R9,                                                      0040 00056000
*         CDENTPTR) RSTD;                                          0040 00057000
*       SWITCH=0;                   /* INIT SWITCH                   */ 00058000
         SLR   SWITCH,SWITCH                                       0041 00059000
*       R8=CVTQLPAQ;                /* ADDR OF FIRST CDE ON ACTIVE 0042 00060000
*                                      LPA QUEUE                     */ 00061000
         L     @10,CVTPTR                                          0042 00062000
         L     R8,CVTQLPAQ(,@10)                                   0042 00063000
*       R9=ADDR(LDPMBR);            /* ADDR OF ENTRY POINT NAME      */ 00064000
         LR    R9,LDPRMPR4                                         0043 00065000
*       CALL IEAQCDSR;              /* CALL ACTIVE LPA QUEUE SEARCH     00066000
*                                      ROUTINE                       */ 00067000
         L     @15,CVTQCDSR(,@10)                                  0044 00068000
         BALR  @14,@15                                             0044 00069000
*       RESPECIFY                                                  0045 00070000
*        (R8,                                                      0045 00071000
*         R9) UNRSTD;                                              0045 00072000
*       GEN SETS(SWITCH);                                          0046 00073000
         LA    SWITCH,1                 IF CDE FOUND - SWITCH IS SET    00074000
*       IF SWITCH=1 THEN            /* WAS CDE FOUND                 */ 00075000
         C     SWITCH,@CF00050                                     0047 00076000
         BNE   @RF00047                                            0047 00077000
*         DO;                       /* YES                           */ 00078000
*           IF CDMIN='1'B THEN      /* IS THIS A MINOR CDE           */ 00079000
         TM    CDMIN(CDENTPTR),B'00000100'                         0049 00080000
         BNO   @RF00049                                            0049 00081000
*             CDENTPTR=CDXLMJP;     /* YES - ADDR OF MAJOR CDE       */ 00082000
         L     CDENTPTR,CDXLMJP(,CDENTPTR)                         0050 00083000
*           EPADDR=XTLMSBAA;        /* LOAD MOD BEGIN                */ 00084000
@RF00049 L     @10,XTLSTPTR(,CDENTPTR)                             0051 00085000
         L     @15,XTLMSBAA(,@10)                                  0051 00086000
         LR    EPADDR,@15                                          0051 00087000
*           ENDADDR=XTLMSBAA+XTLMSBLA;/* COMPUTE END ADDR OF LOAD MOD*/ 00088000
         AL    @15,XTLMSBLA(,@10)                                  0052 00089000
         LR    ENDADDR,@15                                         0052 00090000
*           RESPECIFY                                              0053 00091000
*             CDENTPTR UNRSTD;                                     0053 00092000
*         END;                                                     0054 00093000
*       ELSE                                                       0055 00094000
*         DO;                       /* NO - CDE WAS NOT FOUND        */ 00095000
         B     @RC00047                                            0055 00096000
@RF00047 DS    0H                                                  0056 00097000
*/********************************************************************/ 00098000
*/*   IEAVVMSR--SEARCHES THE LINK PACK AREA DIRECTORY FOR A SPECIFIC */ 00099000
*/*              MODULE.                                             */ 00100000
*/*     INPUT:                                                       */ 00101000
*/*       R0 = FIRST 4 CHARACTERS OF ENTRY POINT NAME                */ 00102000
*/*       R1 = LAST 4 CHARACTERS OF ENTRY POINT NAME                 */ 00103000
*/*       R3 = CVT ADDRESS                                           */ 00104000
*/*       R2,R4-R13,R15 = IRRELEVANT                                 */ 00105000
*/*       R14 = CALLER'S RETURN ADDRESS                              */ 00106000
*/*     OUTPUT:                                                      */ 00107000
*/*       1) RETURN TO CALLER VIA BR 14    --  LPDE FOUND            */ 00108000
*/*         R0 = ADDRESS OF LPDE                                     */ 00109000
*/*         R1-R5,R10-R15 = UNCHANGED                                */ 00110000
*/*         R6-R9 = UNPREDICTABLE                                    */ 00111000
*/*       2) RETURN TO CALLER VIA BR 14+4  --  LPDE NOT FOUND        */ 00112000
*/*         R0-R5,R7,R10-R15 = UNCHANGED                             */ 00113000
*/*         R6 = ADDRESS COLKBASE                                    */ 00114000
*/*         R8-R9 = UNPREDICATABLE                                   */ 00115000
*/********************************************************************/ 00116000
*                                                                  0056 00117000
*           MINORSW=0;              /* INDICATE FIRST SEARCH         */ 00118000
         MVI   MINORSW,X'00'                                       0056 00119000
*           GEN;                                                   0057 00120000
         LM  R0,R1,LDPMBR(LDPRMPR4)      MODULE NAME IN EBCDIC          00121000
*           RESPECIFY                                              0058 00122000
*             R3 RSTD;                                             0058 00123000
*GETMAJOR:                                                         0059 00124000
*           R3=CVTPTR;              /* GET CVTPTR FOR INTERFACE      */ 00125000
GETMAJOR L     @15,CVTPTR                                          0059 00126000
         LR    R3,@15                                              0059 00127000
*           SWITCH=0;               /* RESET SWITCH                  */ 00128000
         SLR   SWITCH,SWITCH                                       0060 00129000
*           CALL IEAVVMSR;          /* CALL TO LPA DIRECT SEARCH     */ 00130000
         L     @15,CVTLPDSR(,@15)                                  0061 00131000
         BALR  @14,@15                                             0061 00132000
*           GEN SETS(SWITCH);                                      0062 00133000
         LA    SWITCH,1                  IF LPDE FOUND - SWITCH IS SET  00134000
*           RESPECIFY                                              0063 00135000
*             R3 UNRSTD;                                           0063 00136000
*           IF SWITCH=1 THEN        /* WAS LPDE FOUND                */ 00137000
         C     SWITCH,@CF00050                                     0064 00138000
         BNE   @RF00064                                            0064 00139000
*             DO;                   /* YES                           */ 00140000
*               RESPECIFY                                          0066 00141000
*                 LPDEPTR RSTD;                                    0066 00142000
*               LPDEPTR=R0;         /* SET UP POINTER TO LPDE        */ 00143000
         LR    LPDEPTR,R0                                          0067 00144000
*               IF MINORSW=0 THEN   /* IS THIS THE FIRST SEARCH      */ 00145000
         CLI   MINORSW,0                                           0068 00146000
         BNE   @RF00068                                            0068 00147000
*                 DO;               /* YES - DETERMINE IF A MINOR    */ 00148000
*                   IF LPDEMIN='1'B THEN/* IS THIS A MINOR LPDE      */ 00149000
         TM    LPDEMIN(LPDEPTR),B'00000100'                        0070 00150000
         BNO   @RF00070                                            0070 00151000
*                     DO;           /* YES - SET UP TO GET MAJOR     */ 00152000
*                       MINORSW=1;  /* INDICATE SEARCH FOR MAJOR     */ 00153000
         MVI   MINORSW,X'01'                                       0072 00154000
*                       GEN REFS(LPDEPTR);                         0073 00155000
         LM    R0,R1,LPDEMJNM(LPDEPTR)           MAJOR LPDE NAME        00156000
*                       GOTO GETMAJOR;/* SET UP TO CALL IEAQCDSR     */ 00157000
         B     GETMAJOR                                            0074 00158000
*                     END;                                         0075 00159000
*                 END;                                             0076 00160000
@RF00070 DS    0H                                                  0077 00161000
*               EPADDR=LPDEXTAD;    /* ADDR OF LOAD MODULE           */ 00162000
@RF00068 L     @11,LPDEXTAD(,LPDEPTR)                              0077 00163000
         LR    EPADDR,@11                                          0077 00164000
*               ENDADDR=LPDEXTAD+LPDEXTLN;/* END ADDR OF LOAD MODULE */ 00165000
         AL    @11,LPDEXTLN(,LPDEPTR)                              0078 00166000
         LR    ENDADDR,@11                                         0078 00167000
*               RESPECIFY                                          0079 00168000
*                 LPDEPTR UNRSTD;                                  0079 00169000
*             END;                                                 0080 00170000
*           ELSE                                                   0081 00171000
*             DO;                   /* NO - LPDE WAS NOT FOUND       */ 00172000
         B     @RC00064                                            0081 00173000
@RF00064 DS    0H                                                  0082 00174000
*               EPADDR=0;           /* INIT TO 0 INCASE MOD NOT FOUND   00175000
*                                      - PREVENT PGFREE              */ 00176000
         SLR   EPADDR,EPADDR                                       0082 00177000
*               RESPECIFY                                          0083 00178000
*                (CDENTPTR,                                        0083 00179000
*                 LLEPTR) RSTD;                                    0083 00180000
*               LLEPTR=TCBLLS;      /* LLE ADDR FROM TCBLLS          */ 00181000
         L     @15,CVTPTR                                          0084 00182000
         L     @15,CVTTCBP(,@15)                                   0084 00183000
         L     @15,TCBPTR(,@15)                                    0084 00184000
         L     LLEPTR,TCBLLS(,@15)                                 0084 00185000
*               CDENTPTR=LLECDPT;   /* CDE FOR THIS LLE              */ 00186000
         L     CDENTPTR,LLECDPT(,LLEPTR)                           0085 00187000
*               DO I=1 BY 1 WHILE(LLEPTR^=0);/* SEARCH FOR LLE FOR 0086 00188000
*                                      THIS MOD                      */ 00189000
         LA    I,1                                                 0086 00190000
         B     @DE00086                                            0086 00191000
@DL00086 DS    0H                                                  0087 00192000
*                 IF LDPMBR=CDNAME THEN/* IS THIS THE RIGHT LLE      */ 00193000
         CLC   LDPMBR(8,LDPRMPR4),CDNAME(CDENTPTR)                 0087 00194000
         BNE   @RF00087                                            0087 00195000
*                   DO;             /* YES                           */ 00196000
*                     IF CDMIN='1'B THEN/* IS THIS A MINOR CDE       */ 00197000
         TM    CDMIN(CDENTPTR),B'00000100'                         0089 00198000
         BNO   @RF00089                                            0089 00199000
*                       CDENTPTR=CDXLMJP;/* YES - ADDR OF MAJOR CDE  */ 00200000
         L     CDENTPTR,CDXLMJP(,CDENTPTR)                         0090 00201000
*                     EPADDR=XTLMSBAA;/* ADDR OF LOAD MODULE         */ 00202000
@RF00089 L     @02,XTLSTPTR(,CDENTPTR)                             0091 00203000
         L     @15,XTLMSBAA(,@02)                                  0091 00204000
         LR    EPADDR,@15                                          0091 00205000
*                     ENDADDR=XTLMSBAA+XTLMSBLA;/* END ADDR OF LOAD     00206000
*                                      MODULE                        */ 00207000
         AL    @15,XTLMSBLA(,@02)                                  0092 00208000
         LR    ENDADDR,@15                                         0092 00209000
*                     LLEPTR=0;     /* SETUP FOR EXIT FROM LOOP      */ 00210000
         SLR   LLEPTR,LLEPTR                                       0093 00211000
*                   END;                                           0094 00212000
*                 ELSE                                             0095 00213000
*                   DO;             /* NO - THIS IS NOT THE LLE      */ 00214000
         B     @RC00087                                            0095 00215000
@RF00087 DS    0H                                                  0096 00216000
*                     LLEPTR=LLECHN;/* ADDR OF NEXT LLE TO TEST      */ 00217000
         L     LLEPTR,LLECHN(,LLEPTR)                              0096 00218000
*                     CDENTPTR=LLECDPT;/* CDE FOR THIS LLE           */ 00219000
         L     CDENTPTR,LLECDPT(,LLEPTR)                           0097 00220000
*                   END;                                           0098 00221000
*               END;                                               0099 00222000
@RC00087 AL    I,@CF00050                                          0099 00223000
@DE00086 LTR   LLEPTR,LLEPTR                                       0099 00224000
         BNZ   @DL00086                                            0099 00225000
*               RESPECIFY                                          0100 00226000
*                (CDENTPTR,                                        0100 00227000
*                 LLEPTR) UNRSTD;                                  0100 00228000
*             END;                                                 0101 00229000
*           IF EPADDR^=0 THEN       /* IS MODULE ADDR ZERO           */ 00230000
@RC00064 LTR   EPADDR,EPADDR                                       0102 00231000
         BZ    @RF00102                                            0102 00232000
*             DO;                   /* PREPARE TO DO A PAGEFREE      */ 00233000
*/********************************************************************/ 00234000
*/*   PGFREE--UNFIXES THE REAL FRAMES FIXED BY PGFIX REQUESTS,       */ 00235000
*/*            MAKING THEM PAGEABLE.                                 */ 00236000
*/*     INPUT:                                                       */ 00237000
*/*       R - AS WRITTEN, REGISTER FORM                              */ 00238000
*/*       A - START ADDRESS OF VIRTUAL AREA TO BE FIXED              */ 00239000
*/*       EA - ENDING ADDRESS OF VIRTUAL AREA TO BE FIXED            */ 00240000
*/*     OUTPUT:                                                      */ 00241000
*/*       R0-R1 = UNPREDICTABLE                                      */ 00242000
*/*       R2-R14 = UNCHANGED                                         */ 00243000
*/*       REG15 = RETURN CODE: NOT CHECKED                           */ 00244000
*/********************************************************************/ 00245000
*                                                                  0104 00246000
*               GEN REFS(EPADDR,ENDADDR);                          0104 00247000
         PGFREE R,A=(EPADDR),EA=(ENDADDR)                               00248000
*             END;                                                 0105 00249000
*         END;                                                     0106 00250000
@RF00102 DS    0H                                                  0107 00251000
*     END;                                                         0107 00252000
*                                                                  0107 00253000
@RC00047 DS    0H                                                  0108 00254000
*/********************************************************************/ 00255000
*/*   DELETE--CAUSES THE CONTROL PROGRAM TO DECREASE BY 1 THE        */ 00256000
*/*            RESPONSIBILITY COUNT FOR THE DESIGNATED LOAD MODULE.  */ 00257000
*/*            WHEN THE RESPONSIBILITY COUNT BECOMES 0, THE STORAGE  */ 00258000
*/*            OCCUPIED BY THE LOAD MODULE IS RELEASED.              */ 00259000
*/*     INPUT:                                                       */ 00260000
*/*       EPLOC - ADDRESS OF ENTRY POINT NAME OF LOAD MODULE         */ 00261000
*/*     OUTPUT:                                                      */ 00262000
*/*       REGISTERS AT EXIT                                          */ 00263000
*/*       REG15 = RETURN CODE: NOT CHECKED                           */ 00264000
*/********************************************************************/ 00265000
*                                                                  0108 00266000
*   EPADDR=ADDR(LDPMBR);            /* GET ADDR OF MODULE NAME       */ 00267000
@RF00038 LR    EPADDR,LDPRMPR4                                     0108 00268000
*   GEN REFS(EPADDR);                                              0109 00269000
         DELETE EPLOC=(EPADDR)                                          00270000
*   END ISTINMAD                                                   0110 00271000
*/* THE FOLLOWING INCLUDE STATEMENTS WERE FOUND IN THIS PROGRAM.      * 00272000
*/*%INCLUDE SYSLIB  (IHACDE  )                                        * 00273000
*/*%INCLUDE SYSLIB  (CVT     )                                        * 00274000
*/*%INCLUDE SYSLIB  (IHALPDE )                                        * 00275000
*/*%INCLUDE SYSLIB  (IHALLE  )                                        * 00276000
*/*%INCLUDE SYSLIB  (IKJTCB  )                                        * 00277000
*/*%INCLUDE SYSLIB  (IHAXTLST)                                        * 00278000
*;                                                                 0110 00279000
@EL00001 L     @13,4(,@13)                                         0110 00280000
@EF00001 DS    0H                                                  0110 00281000
@ER00001 LM    @14,@12,12(@13)                                     0110 00282000
         BR    @14                                                 0110 00283000
@DATA    DS    0H                                                       00284000
         DS    0F                                                       00285000
@SA00001 DS    18F                                                      00286000
         DS    0F                                                       00287000
@CF00050 DC    F'1'                                                     00288000
         DS    0D                                                       00289000
MINORSW  DS    BL1                                                      00290000
@00      EQU   00                      EQUATES FOR REGISTERS 0-15       00291000
@01      EQU   01                                                       00292000
@02      EQU   02                                                       00293000
@03      EQU   03                                                       00294000
@04      EQU   04                                                       00295000
@05      EQU   05                                                       00296000
@06      EQU   06                                                       00297000
@07      EQU   07                                                       00298000
@08      EQU   08                                                       00299000
@09      EQU   09                                                       00300000
@10      EQU   10                                                       00301000
@11      EQU   11                                                       00302000
@12      EQU   12                                                       00303000
@13      EQU   13                                                       00304000
@14      EQU   14                                                       00305000
@15      EQU   15                                                       00306000
I        EQU   @03                                                      00307000
CDENTPTR EQU   @11                                                      00308000
LDPRMPTR EQU   @01                                                      00309000
LPDEPTR  EQU   @10                                                      00310000
LLEPTR   EQU   @10                                                      00311000
R0       EQU   @00                                                      00312000
R1       EQU   @01                                                      00313000
R3       EQU   @03                                                      00314000
LDPRMPR4 EQU   @04                                                      00315000
SWITCH   EQU   @05                                                      00316000
EPADDR   EQU   @06                                                      00317000
ENDADDR  EQU   @07                                                      00318000
R8       EQU   @08                                                      00319000
R9       EQU   @09                                                      00320000
CVTPTR   EQU   16                                                       00321000
CDENTRY  EQU   0                                                        00322000
CDNAME   EQU   CDENTRY+8                                                00323000
CDXLMJP  EQU   CDENTRY+20                                               00324000
CDATTR   EQU   CDENTRY+28                                               00325000
CDMIN    EQU   CDATTR                                                   00326000
CDATTR2  EQU   CDENTRY+29                                               00327000
CVTMAP   EQU   0                                                        00328000
CVTTCBP  EQU   CVTMAP                                                   00329000
CVTDAR   EQU   CVTMAP+72                                                00330000
CVTFLGS1 EQU   CVTDAR                                                   00331000
CVTDCB   EQU   CVTMAP+116                                               00332000
CVTIERLC EQU   CVTMAP+144                                               00333000
CVTOPTA  EQU   CVTMAP+182                                               00334000
CVTOPTB  EQU   CVTMAP+183                                               00335000
CVTQCDSR EQU   CVTMAP+184                                               00336000
CVTQLPAQ EQU   CVTMAP+188                                               00337000
CVTGTF   EQU   CVTMAP+236                                               00338000
CVTGTFST EQU   CVTGTF                                                   00339000
CVTGTFS  EQU   CVTGTFST                                                 00340000
CVTSTATE EQU   CVTGTFST                                                 00341000
CVTTMODE EQU   CVTGTFST                                                 00342000
CVTFORM  EQU   CVTGTFST                                                 00343000
CVTAQAVT EQU   CVTMAP+240                                               00344000
CVTTCMFG EQU   CVTAQAVT                                                 00345000
CVTVOLM2 EQU   CVTMAP+244                                               00346000
CVTTATA  EQU   CVTVOLM2                                                 00347000
CVTTSKS  EQU   CVTTATA                                                  00348000
CVTVOLF2 EQU   CVTTSKS                                                  00349000
CVTTAT   EQU   CVTTATA+1                                                00350000
CVTATER  EQU   CVTMAP+248                                               00351000
CVTEXT1  EQU   CVTMAP+252                                               00352000
CVTPURG  EQU   CVTMAP+260                                               00353000
CVTQMSG  EQU   CVTMAP+268                                               00354000
CVTDMSR  EQU   CVTMAP+272                                               00355000
CVTERPV  EQU   CVTMAP+316                                               00356000
CVTINTLA EQU   CVTMAP+320                                               00357000
CVTAPF   EQU   CVTMAP+324                                               00358000
CVTEXT2  EQU   CVTMAP+328                                               00359000
CVTHJES  EQU   CVTMAP+332                                               00360000
CVTPGSIA EQU   CVTMAP+348                                               00361000
CVTA1F1  EQU   CVTMAP+356                                               00362000
CVTSYSK  EQU   CVTMAP+357                                               00363000
CVTVOLM1 EQU   CVTMAP+380                                               00364000
CVTVOLF1 EQU   CVTVOLM1                                                 00365000
CVTATMCT EQU   CVTMAP+388                                               00366000
CVTXTNT1 EQU   0                                                        00367000
CVTXTNT2 EQU   0                                                        00368000
CVTDSSV  EQU   CVTXTNT2                                                 00369000
CVTFLGBT EQU   CVTXTNT2+5                                               00370000
CVTQID   EQU   CVTXTNT2+24                                              00371000
CVTSHS   EQU   CVTXTNT2+40                                              00372000
CVTRV400 EQU   CVTXTNT2+52                                              00373000
CVTRV409 EQU   CVTXTNT2+53                                              00374000
CVTATCVT EQU   CVTXTNT2+64                                              00375000
CVTRV429 EQU   CVTXTNT2+84                                              00376000
CVTRV438 EQU   CVTXTNT2+85                                              00377000
CVTRV457 EQU   CVTXTNT2+112                                             00378000
CVTRV466 EQU   CVTXTNT2+113                                             00379000
CVTFIX   EQU   0                                                        00380000
CVTRELNO EQU   CVTFIX+252                                               00381000
ISTLDPRM EQU   0                                                        00382000
LDPMBR   EQU   ISTLDPRM                                                 00383000
LDPFG    EQU   ISTLDPRM+20                                              00384000
LDPFX    EQU   LDPFG                                                    00385000
LDPFB2   EQU   ISTLDPRM+21                                              00386000
LPDE     EQU   0                                                        00387000
LPDEATTR EQU   LPDE+28                                                  00388000
LPDEMIN  EQU   LPDEATTR                                                 00389000
LPDEATT2 EQU   LPDE+29                                                  00390000
LPDEMJNM EQU   LPDE+32                                                  00391000
LPDEXTLN EQU   LPDEMJNM                                                 00392000
LPDEXTAD EQU   LPDEMJNM+4                                               00393000
LLE      EQU   0                                                        00394000
LLECHN   EQU   LLE                                                      00395000
LLECDPT  EQU   LLE+4                                                    00396000
TCBFIX   EQU   0                                                        00397000
TCBFRS   EQU   TCBFIX                                                   00398000
TCB      EQU   0                                                        00399000
TCBPIE   EQU   TCB+4                                                    00400000
TCBPMASK EQU   TCBPIE                                                   00401000
TCBCMP   EQU   TCB+16                                                   00402000
TCBCMPF  EQU   TCBCMP                                                   00403000
TCBCPP   EQU   TCBCMPF                                                  00404000
TCBSTCC  EQU   TCBCMPF                                                  00405000
TCBCDBL  EQU   TCBCMPF                                                  00406000
TCBCWTO  EQU   TCBCMPF                                                  00407000
TCBCIND  EQU   TCBCMPF                                                  00408000
TCBCMSG  EQU   TCBCMPF                                                  00409000
TCBTRN   EQU   TCB+20                                                   00410000
TCBABF   EQU   TCBTRN                                                   00411000
TCBMSS   EQU   TCB+24                                                   00412000
TCBPKF   EQU   TCB+28                                                   00413000
TCBFLGS  EQU   TCB+29                                                   00414000
TCBFLGS1 EQU   TCBFLGS                                                  00415000
TCBFLGS2 EQU   TCBFLGS+1                                                00416000
TCBFLGS3 EQU   TCBFLGS+2                                                00417000
TCBFLGS4 EQU   TCBFLGS+3                                                00418000
TCBFLGS5 EQU   TCBFLGS+4                                                00419000
TCBABWF  EQU   TCBFLGS5                                                 00420000
TCBLLS   EQU   TCB+36                                                   00421000
TCBJPQ   EQU   TCB+44                                                   00422000
TCBPURGE EQU   TCBJPQ                                                   00423000
TCBGRS   EQU   TCB+48                                                   00424000
TCBFSA   EQU   TCB+112                                                  00425000
TCBTME   EQU   TCB+120                                                  00426000
TCBJSTCB EQU   TCB+124                                                  00427000
TCBTSFLG EQU   TCB+148                                                  00428000
TCBTSTSK EQU   TCBTSFLG                                                 00429000
TCBSTAB  EQU   TCB+160                                                  00430000
TCBNSTAE EQU   TCBSTAB                                                  00431000
TCBTCT   EQU   TCB+164                                                  00432000
TCBTCTGF EQU   TCBTCT                                                   00433000
TCBSCNDY EQU   TCB+172                                                  00434000
TCBNDSP  EQU   TCBSCNDY                                                 00435000
TCBNDSP1 EQU   TCBNDSP+1                                                00436000
TCBNDSP2 EQU   TCBNDSP+2                                                00437000
TCBNDSP3 EQU   TCBNDSP+3                                                00438000
TCBJSCB  EQU   TCB+180                                                  00439000
TCBRECDE EQU   TCBJSCB                                                  00440000
TCBEXT1  EQU   TCB+196                                                  00441000
TCBBITS  EQU   TCB+200                                                  00442000
TCBNDSP4 EQU   TCBBITS                                                  00443000
TCBNDSP5 EQU   TCBBITS+1                                                00444000
TCBFLGS6 EQU   TCBBITS+2                                                00445000
TCBFLGS7 EQU   TCBBITS+3                                                00446000
TCBDAR   EQU   TCB+204                                                  00447000
TCBDARC  EQU   TCBDAR                                                   00448000
TCBEXT2  EQU   TCB+208                                                  00449000
TCBFOE   EQU   TCB+244                                                  00450000
TCBESTAE EQU   TCB+264                                                  00451000
TCBESTRM EQU   TCBESTAE+1                                               00452000
TCBFBYT1 EQU   TCB+276                                                  00453000
TCBFBYT2 EQU   TCB+277                                                  00454000
TCBFBYT3 EQU   TCB+278                                                  00455000
TCBRV133 EQU   TCB+279                                                  00456000
TCBXTNT2 EQU   0                                                        00457000
TCBGTF   EQU   TCBXTNT2                                                 00458000
TCBTFLG  EQU   TCBGTF                                                   00459000
TCBRV146 EQU   TCBXTNT2+28                                              00460000
TCBRV155 EQU   TCBXTNT2+29                                              00461000
TCBRV164 EQU   TCBXTNT2+30                                              00462000
TCBRV173 EQU   TCBXTNT2+31                                              00463000
XTLST    EQU   0                                                        00464000
XTLMSBLA EQU   XTLST+8                                                  00465000
XTLMSBAA EQU   XTLST+12                                                 00466000
IEAQCDSR EQU   0                                                        00467000
IEAVVMSR EQU   0                                                        00468000
PTRSTCB  EQU   0                                                        00469000
CURTCBP  EQU   PTRSTCB+4                                                00470000
CVTS01   EQU   CVTPGSIA                                                 00471000
CVTLPDSR EQU   CVTS01+4                                                 00472000
CVTLPDIA EQU   CVTS01+12                                                00473000
CVTDIRST EQU   CVTLPDIA                                                 00474000
CVTSLIDA EQU   CVTS01+24                                                00475000
CVTCTLFG EQU   CVTS01+50                                                00476000
CVTRV210 EQU   CVTS01+424                                               00477000
CVTRV219 EQU   CVTS01+425                                               00478000
CVTRV228 EQU   CVTS01+426                                               00479000
CVTRV237 EQU   CVTS01+427                                               00480000
CVTMFRTR EQU   CVTS01+452                                               00481000
CVTRV262 EQU   CVTS01+468                                               00482000
CVTRV271 EQU   CVTS01+469                                               00483000
CVTRV280 EQU   CVTS01+470                                               00484000
CVTRV289 EQU   CVTS01+471                                               00485000
CVTGSDA  EQU   CVTS01+600                                               00486000
TCBPTR   EQU   CURTCBP                                                  00487000
XTLSTPTR EQU   CDXLMJP                                                  00488000
         AGO   .@UNREFD                START UNREFERENCED COMPONENTS    00489000
CVTRV628 EQU   CVTS01+728                                               00490000
CVTRV627 EQU   CVTS01+724                                               00491000
CVTRV626 EQU   CVTS01+720                                               00492000
CVTRV625 EQU   CVTS01+716                                               00493000
CVTRV624 EQU   CVTS01+712                                               00494000
CVTRV623 EQU   CVTS01+708                                               00495000
CVTRV622 EQU   CVTS01+704                                               00496000
CVTRV621 EQU   CVTS01+700                                               00497000
CVTRV620 EQU   CVTS01+696                                               00498000
CVTRV619 EQU   CVTS01+692                                               00499000
CVTRV618 EQU   CVTS01+688                                               00500000
CVTRV617 EQU   CVTS01+684                                               00501000
CVTRV616 EQU   CVTS01+680                                               00502000
CVTRV615 EQU   CVTS01+676                                               00503000
CVTRV614 EQU   CVTS01+672                                               00504000
CVTRV613 EQU   CVTS01+668                                               00505000
CVTRV612 EQU   CVTS01+664                                               00506000
CVTRV611 EQU   CVTS01+660                                               00507000
CVTEVERM EQU   CVTS01+656                                               00508000
CVTIRM   EQU   CVTS01+652                                               00509000
CVTCGK   EQU   CVTS01+648                                               00510000
CVTRAC   EQU   CVTS01+644                                               00511000
CVTRV606 EQU   CVTS01+640                                               00512000
CVTRV605 EQU   CVTS01+636                                               00513000
CVTRV604 EQU   CVTS01+632                                               00514000
CVTEFF02 EQU   CVTS01+628                                               00515000
CVTCBBR  EQU   CVTS01+624                                               00516000
CVTSSCR  EQU   CVTS01+620                                               00517000
CVTEVENT EQU   CVTS01+616                                               00518000
CVTCRCA  EQU   CVTS01+612                                               00519000
CVTTPIO  EQU   CVTS01+608                                               00520000
CVTADV   EQU   CVTS01+604                                               00521000
CVTGSDAB EQU   CVTGSDA                                                  00522000
CVTQV3   EQU   CVTS01+596                                               00523000
CVTQV2   EQU   CVTS01+592                                               00524000
CVTQV1   EQU   CVTS01+588                                               00525000
CVTRPT   EQU   CVTS01+584                                               00526000
CVTSSRB  EQU   CVTS01+580                                               00527000
CVTCSDRL EQU   CVTS01+576                                               00528000
CVTEXP1  EQU   CVTS01+572                                               00529000
CVTRMPMT EQU   CVTS01+568                                               00530000
CVTRMPTT EQU   CVTS01+564                                               00531000
CVTVPSA  EQU   CVTS01+560                                               00532000
CVTVSTOP EQU   CVTS01+556                                               00533000
CVTGTFR8 EQU   CVTS01+552                                               00534000
CVTQUIT  EQU   CVTS01+548                                               00535000
CVTVACR  EQU   CVTS01+544                                               00536000
CVTWTCB  EQU   CVTS01+540                                               00537000
CVTSTPRS EQU   CVTS01+536                                               00538000
CVT0PT02 EQU   CVTS01+532                                               00539000
CVTDARCM EQU   CVTS01+528                                               00540000
CVTIRECM EQU   CVTS01+524                                               00541000
CVTJRECM EQU   CVTS01+520                                               00542000
CVTVEMS0 EQU   CVTS01+516                                               00543000
CVTSPFRR EQU   CVTS01+512                                               00544000
CVTRLSTG EQU   CVTS01+508                                               00545000
CVT0TC0A EQU   CVTS01+504                                               00546000
CVTGMBR  EQU   CVTS01+500                                               00547000
CVTLFRM  EQU   CVTS01+496                                               00548000
CVTRMBR  EQU   CVTS01+492                                               00549000
CVTVIOP  EQU   CVTS01+488                                               00550000
CVTRV307 EQU   CVTS01+486                                               00551000
CVTRV306 EQU   CVTS01+484                                               00552000
CVTRV305 EQU   CVTS01+482                                               00553000
CVTRV304 EQU   CVTS01+480                                               00554000
CVTRV303 EQU   CVTS01+478                                               00555000
CVTRV302 EQU   CVTS01+476                                               00556000
CVTTRCA  EQU   CVTS01+472                                               00557000
CVTRV297 EQU   CVTRV289                                                 00558000
CVTRV296 EQU   CVTRV289                                                 00559000
CVTRV295 EQU   CVTRV289                                                 00560000
CVTRV294 EQU   CVTRV289                                                 00561000
CVTRV293 EQU   CVTRV289                                                 00562000
CVTRV292 EQU   CVTRV289                                                 00563000
CVTRV291 EQU   CVTRV289                                                 00564000
CVTRV290 EQU   CVTRV289                                                 00565000
CVTRV288 EQU   CVTRV280                                                 00566000
CVTRV287 EQU   CVTRV280                                                 00567000
CVTRV286 EQU   CVTRV280                                                 00568000
CVTRV285 EQU   CVTRV280                                                 00569000
CVTRV284 EQU   CVTRV280                                                 00570000
CVTRV283 EQU   CVTRV280                                                 00571000
CVTRV282 EQU   CVTRV280                                                 00572000
CVTRV281 EQU   CVTRV280                                                 00573000
CVTRV279 EQU   CVTRV271                                                 00574000
CVTRV278 EQU   CVTRV271                                                 00575000
CVTRV277 EQU   CVTRV271                                                 00576000
CVTRV276 EQU   CVTRV271                                                 00577000
CVTRV275 EQU   CVTRV271                                                 00578000
CVTRV274 EQU   CVTRV271                                                 00579000
CVTRV273 EQU   CVTRV271                                                 00580000
CVTRV272 EQU   CVTRV271                                                 00581000
CVTRV270 EQU   CVTRV262                                                 00582000
CVTRV269 EQU   CVTRV262                                                 00583000
CVTRV268 EQU   CVTRV262                                                 00584000
CVTRV267 EQU   CVTRV262                                                 00585000
CVTRV266 EQU   CVTRV262                                                 00586000
CVTRV265 EQU   CVTRV262                                                 00587000
CVTRV264 EQU   CVTRV262                                                 00588000
CVTRV263 EQU   CVTRV262                                                 00589000
CVTVFP   EQU   CVTS01+464                                               00590000
CVTVSI   EQU   CVTS01+460                                               00591000
CVTVPSIB EQU   CVTS01+456                                               00592000
CVTMFACT EQU   CVTMFRTR                                                 00593000
CVTMFCTL EQU   CVTS01+448                                               00594000
CVTPVBP  EQU   CVTS01+444                                               00595000
CVTPWI   EQU   CVTS01+440                                               00596000
CVTRV254 EQU   CVTS01+438                                               00597000
CVTRV253 EQU   CVTS01+436                                               00598000
CVTRV252 EQU   CVTS01+434                                               00599000
CVTRV251 EQU   CVTS01+433                                               00600000
CVTRV250 EQU   CVTS01+432                                               00601000
CVTRV249 EQU   CVTS01+431                                               00602000
CVTRV248 EQU   CVTS01+430                                               00603000
CVTRV247 EQU   CVTS01+429                                               00604000
CVTRV246 EQU   CVTS01+428                                               00605000
CVTRV245 EQU   CVTRV237                                                 00606000
CVTRV244 EQU   CVTRV237                                                 00607000
CVTRV243 EQU   CVTRV237                                                 00608000
CVTRV242 EQU   CVTRV237                                                 00609000
CVTRV241 EQU   CVTRV237                                                 00610000
CVTRV240 EQU   CVTRV237                                                 00611000
CVTRV239 EQU   CVTRV237                                                 00612000
CVTRV238 EQU   CVTRV237                                                 00613000
CVTRV236 EQU   CVTRV228                                                 00614000
CVTRV235 EQU   CVTRV228                                                 00615000
CVTRV234 EQU   CVTRV228                                                 00616000
CVTRV233 EQU   CVTRV228                                                 00617000
CVTRV232 EQU   CVTRV228                                                 00618000
CVTRV231 EQU   CVTRV228                                                 00619000
CVTRV230 EQU   CVTRV228                                                 00620000
CVTRV229 EQU   CVTRV228                                                 00621000
CVTRV227 EQU   CVTRV219                                                 00622000
CVTRV226 EQU   CVTRV219                                                 00623000
CVTRV225 EQU   CVTRV219                                                 00624000
CVTRV224 EQU   CVTRV219                                                 00625000
CVTRV223 EQU   CVTRV219                                                 00626000
CVTRV222 EQU   CVTRV219                                                 00627000
CVTRV221 EQU   CVTRV219                                                 00628000
CVTRV220 EQU   CVTRV219                                                 00629000
CVTRV218 EQU   CVTRV210                                                 00630000
CVTRV217 EQU   CVTRV210                                                 00631000
CVTRV216 EQU   CVTRV210                                                 00632000
CVTRV215 EQU   CVTRV210                                                 00633000
CVTRV214 EQU   CVTRV210                                                 00634000
CVTRV213 EQU   CVTRV210                                                 00635000
CVTRV212 EQU   CVTRV210                                                 00636000
CVTRV211 EQU   CVTRV210                                                 00637000
CVTLCCAT EQU   CVTS01+420                                               00638000
CVTPCCAT EQU   CVTS01+416                                               00639000
CVTIPCRP EQU   CVTS01+412                                               00640000
CVTIPCRI EQU   CVTS01+408                                               00641000
CVTIPCDS EQU   CVTS01+404                                               00642000
CVTAIDVT EQU   CVTS01+400                                               00643000
CVTSSAP  EQU   CVTS01+396                                               00644000
CVTEHCIR EQU   CVTS01+392                                               00645000
CVTEHDEF EQU   CVTS01+388                                               00646000
CVTDAIR  EQU   CVTS01+384                                               00647000
CVTPERFM EQU   CVTS01+380                                               00648000
CVT044R2 EQU   CVTS01+376                                               00649000
CVTFETCH EQU   CVTS01+372                                               00650000
CVTRSTWD EQU   CVTS01+368                                               00651000
CVTSPOST EQU   CVTS01+364                                               00652000
CVTIOBP  EQU   CVTS01+360                                               00653000
CVTASMVT EQU   CVTS01+356                                               00654000
CVTRECRQ EQU   CVTS01+352                                               00655000
CVTWSAC  EQU   CVTS01+348                                               00656000
CVTRV149 EQU   CVTS01+344                                               00657000
CVTWSAL  EQU   CVTS01+340                                               00658000
CVTSPSA  EQU   CVTS01+336                                               00659000
CVTGLMN  EQU   CVTS01+332                                               00660000
CVTVEAC0 EQU   CVTS01+328                                               00661000
CVT062R1 EQU   CVTS01+324                                               00662000
CVTRPOST EQU   CVTS01+320                                               00663000
CVTDQIQE EQU   CVTS01+316                                               00664000
CVTCSD   EQU   CVTS01+312                                               00665000
CVTLKRMA EQU   CVTS01+308                                               00666000
CVTRSPIE EQU   CVTS01+304                                               00667000
CVTRENQ  EQU   CVTS01+300                                               00668000
CVTLQCB  EQU   CVTS01+296                                               00669000
CVTFQCB  EQU   CVTS01+292                                               00670000
CVTQCS01 EQU   CVTS01+288                                               00671000
CVTAPFT  EQU   CVTS01+284                                               00672000
CVTPARRL EQU   CVTS01+280                                               00673000
CVTVWAIT EQU   CVTS01+276                                               00674000
CVTGSPL  EQU   CVTS01+272                                               00675000
CVTLSMQ  EQU   CVTS01+268                                               00676000
CVTGSMQ  EQU   CVTS01+264                                               00677000
CVTEXPRO EQU   CVTS01+260                                               00678000
CVTOPCTP EQU   CVTS01+256                                               00679000
CVTSIC   EQU   CVTS01+252                                               00680000
CVTTPIOS EQU   CVTS01+248                                               00681000
CVTRTMS  EQU   CVTS01+244                                               00682000
CVTSDBF  EQU   CVTS01+240                                               00683000
CVTSCBP  EQU   CVTS01+236                                               00684000
CVTSDMP  EQU   CVTS01+232                                               00685000
CVTSV60  EQU   CVTS01+228                                               00686000
CVTRTMCT EQU   CVTS01+224                                               00687000
CVTASCBL EQU   CVTS01+220                                               00688000
CVTASCBH EQU   CVTS01+216                                               00689000
CVTGDA   EQU   CVTS01+212                                               00690000
CVTASVT  EQU   CVTS01+208                                               00691000
CVTVVMDI EQU   CVTS01+204                                               00692000
CVTAQTOP EQU   CVTS01+200                                               00693000
CVTIOSCS EQU   CVTS01+196                                               00694000
CVTSDRM  EQU   CVTS01+192                                               00695000
CVTOPTE  EQU   CVTS01+188                                               00696000
CVTSTXU  EQU   CVTS01+184                                               00697000
CVTQUIS  EQU   CVTS01+180                                               00698000
CVTPARS  EQU   CVTS01+176                                               00699000
CVTS1EE  EQU   CVTS01+172                                               00700000
CVTFRAS  EQU   CVTS01+168                                               00701000
CVTQSAS  EQU   CVTS01+164                                               00702000
CVTCRAS  EQU   CVTS01+160                                               00703000
CVTCRMN  EQU   CVTS01+156                                               00704000
CVTDELCP EQU   CVTS01+152                                               00705000
CVTFRECL EQU   CVTS01+148                                               00706000
CVTGETCL EQU   CVTS01+144                                               00707000
CVTBLDCP EQU   CVTS01+140                                               00708000
CVTAUTHL EQU   CVTS01+136                                               00709000
CVTSCAN  EQU   CVTS01+132                                               00710000
CVTRV144 EQU   CVTS01+130                                               00711000
CVTMAXMP EQU   CVTS01+128                                               00712000
CVTSTCK  EQU   CVTS01+124                                               00713000
CVTRV139 EQU   CVTS01+123                                               00714000
CVTDSSAC EQU   CVTS01+122                                               00715000
CVTRV513 EQU   CVTS01+121                                               00716000
CVTIOSPL EQU   CVTS01+120                                               00717000
CVTPTGT  EQU   CVTS01+116                                               00718000
CVTCSPIE EQU   CVTS01+112                                               00719000
CVTSMFEX EQU   CVTS01+108                                               00720000
CVTOLT0A EQU   CVTS01+104                                               00721000
CVTSRBRT EQU   CVTS01+100                                               00722000
CVTPUTL  EQU   CVTS01+96                                                00723000
CVTRV519 EQU   CVTS01+92                                                00724000
CVTRV327 EQU   CVTS01+88                                                00725000
CVTRV326 EQU   CVTS01+84                                                00726000
CVTRV325 EQU   CVTS01+80                                                00727000
CVTRV324 EQU   CVTS01+76                                                00728000
CVT0VL01 EQU   CVTS01+72                                                00729000
CVTSHRVM EQU   CVTS01+68                                                00730000
CVTRV332 EQU   CVTS01+64                                                00731000
CVTTAS   EQU   CVTS01+60                                                00732000
CVTRSCN  EQU   CVTS01+56                                                00733000
CVTTRAC2 EQU   CVTS01+54                                                00734000
CVTTRACE EQU   CVTS01+52                                                00735000
CVTAPG   EQU   CVTS01+51                                                00736000
CVTSDTRC EQU   CVTCTLFG                                                 00737000
CVTGTRCE EQU   CVTCTLFG                                                 00738000
CVTNOMP  EQU   CVTCTLFG                                                 00739000
CVTRSV79 EQU   CVTCTLFG                                                 00740000
CVTDSTAT EQU   CVTCTLFG                                                 00741000
CVTRSV78 EQU   CVTCTLFG                                                 00742000
CVTRV333 EQU   CVTCTLFG                                                 00743000
CVTRV323 EQU   CVTCTLFG                                                 00744000
CVTSPVLK EQU   CVTS01+49                                                00745000
CVTRSV77 EQU   CVTS01+48                                                00746000
CVTRV331 EQU   CVTS01+44                                                00747000
CVTRV330 EQU   CVTS01+40                                                00748000
CVTRV329 EQU   CVTS01+36                                                00749000
CVTRV328 EQU   CVTS01+32                                                00750000
CVTRV322 EQU   CVTS01+28                                                00751000
CVTSLID  EQU   CVTSLIDA+1                                               00752000
CVTSYLK  EQU   CVTSLIDA                                                 00753000
CVTRV321 EQU   CVTS01+20                                                00754000
CVTRV320 EQU   CVTS01+16                                                00755000
CVTLPDIR EQU   CVTLPDIA+1                                               00756000
CVTRSV69 EQU   CVTDIRST                                                 00757000
CVTRSV68 EQU   CVTDIRST                                                 00758000
CVTRSV67 EQU   CVTDIRST                                                 00759000
CVTRSV66 EQU   CVTDIRST                                                 00760000
CVTRSV65 EQU   CVTDIRST                                                 00761000
CVTRSV64 EQU   CVTDIRST                                                 00762000
CVTRSV63 EQU   CVTDIRST                                                 00763000
CVTDICOM EQU   CVTDIRST                                                 00764000
CVTPVTP  EQU   CVTS01+8                                                 00765000
CVTGETL  EQU   CVTS01                                                   00766000
NEWTCBP  EQU   PTRSTCB                                                  00767000
XTLMSBAD EQU   XTLMSBAA+1                                               00768000
@NM00017 EQU   XTLMSBAA                                                 00769000
XTLMSBLN EQU   XTLMSBLA+1                                               00770000
@NM00016 EQU   XTLMSBLA                                                 00771000
XTLNRFAC EQU   XTLST+4                                                  00772000
XTLLNTH  EQU   XTLST                                                    00773000
@NM00015 EQU   TCBXTNT2+32                                              00774000
TCBRV181 EQU   TCBRV173                                                 00775000
TCBRV180 EQU   TCBRV173                                                 00776000
TCBRV179 EQU   TCBRV173                                                 00777000
TCBRV178 EQU   TCBRV173                                                 00778000
TCBRV177 EQU   TCBRV173                                                 00779000
TCBRV176 EQU   TCBRV173                                                 00780000
TCBRV175 EQU   TCBRV173                                                 00781000
TCBRV174 EQU   TCBRV173                                                 00782000
TCBRV172 EQU   TCBRV164                                                 00783000
TCBRV171 EQU   TCBRV164                                                 00784000
TCBRV170 EQU   TCBRV164                                                 00785000
TCBRV169 EQU   TCBRV164                                                 00786000
TCBRV168 EQU   TCBRV164                                                 00787000
TCBRV167 EQU   TCBRV164                                                 00788000
TCBRV166 EQU   TCBRV164                                                 00789000
TCBRV165 EQU   TCBRV164                                                 00790000
TCBRV163 EQU   TCBRV155                                                 00791000
TCBRV162 EQU   TCBRV155                                                 00792000
TCBRV161 EQU   TCBRV155                                                 00793000
TCBRV160 EQU   TCBRV155                                                 00794000
TCBRV159 EQU   TCBRV155                                                 00795000
TCBRV158 EQU   TCBRV155                                                 00796000
TCBRV157 EQU   TCBRV155                                                 00797000
TCBRV156 EQU   TCBRV155                                                 00798000
TCBRV154 EQU   TCBRV146                                                 00799000
TCBRV153 EQU   TCBRV146                                                 00800000
TCBRV152 EQU   TCBRV146                                                 00801000
TCBRV151 EQU   TCBRV146                                                 00802000
TCBRV150 EQU   TCBRV146                                                 00803000
TCBRV149 EQU   TCBRV146                                                 00804000
TCBRV148 EQU   TCBRV146                                                 00805000
TCBRV147 EQU   TCBRV146                                                 00806000
TCBRV145 EQU   TCBXTNT2+26                                              00807000
TCBRV144 EQU   TCBXTNT2+24                                              00808000
TCBRV143 EQU   TCBXTNT2+20                                              00809000
TCBRV142 EQU   TCBXTNT2+16                                              00810000
TCBRSV49 EQU   TCBXTNT2+12                                              00811000
TCBEVENT EQU   TCBXTNT2+8                                               00812000
TCBRCMP  EQU   TCBXTNT2+5                                               00813000
TCBRSVAB EQU   TCBXTNT2+4                                               00814000
TCBGTFA  EQU   TCBGTF+1                                                 00815000
TCBRSV47 EQU   TCBTFLG                                                  00816000
TCBRSV46 EQU   TCBTFLG                                                  00817000
TCBRSV45 EQU   TCBTFLG                                                  00818000
TCBRSV44 EQU   TCBTFLG                                                  00819000
TCBRSV43 EQU   TCBTFLG                                                  00820000
TCBDSPIT EQU   TCBTFLG                                                  00821000
TCBERRTN EQU   TCBTFLG                                                  00822000
TCBASYNC EQU   TCBTFLG                                                  00823000
@NM00014 EQU   TCB+296                                                  00824000
TCBSVCA2 EQU   TCB+292                                                  00825000
TCBSWASA EQU   TCB+288                                                  00826000
TCBDBTB  EQU   TCB+284                                                  00827000
TCBRPT   EQU   TCB+280                                                  00828000
TCBRV141 EQU   TCBRV133                                                 00829000
TCBRV140 EQU   TCBRV133                                                 00830000
TCBRV139 EQU   TCBRV133                                                 00831000
TCBRV138 EQU   TCBRV133                                                 00832000
TCBRV137 EQU   TCBRV133                                                 00833000
TCBRV136 EQU   TCBRV133                                                 00834000
TCBRV135 EQU   TCBRV133                                                 00835000
TCBRV134 EQU   TCBRV133                                                 00836000
TCBRV132 EQU   TCBFBYT3                                                 00837000
TCBRV131 EQU   TCBFBYT3                                                 00838000
TCBRV130 EQU   TCBFBYT3                                                 00839000
TCBRV129 EQU   TCBFBYT3                                                 00840000
TCBRV128 EQU   TCBFBYT3                                                 00841000
TCBRV127 EQU   TCBFBYT3                                                 00842000
TCBRCEX  EQU   TCBFBYT3                                                 00843000
TCBCPAT  EQU   TCBFBYT3                                                 00844000
TCBRV123 EQU   TCBFBYT2                                                 00845000
TCBRV122 EQU   TCBFBYT2                                                 00846000
TCBECBNV EQU   TCBFBYT2                                                 00847000
TCBSSSYN EQU   TCBFBYT2                                                 00848000
TCBFPRAP EQU   TCBFBYT2                                                 00849000
TCBFDW   EQU   TCBFBYT2                                                 00850000
TCBFMW   EQU   TCBFBYT2                                                 00851000
TCBCNCB  EQU   TCBFBYT2                                                 00852000
TCBLLH   EQU   TCBFBYT1                                                 00853000
TCBRV113 EQU   TCBFBYT1                                                 00854000
TCBEOT   EQU   TCBFBYT1                                                 00855000
TCBRTM2  EQU   TCBFBYT1                                                 00856000
TCBPGNLY EQU   TCBFBYT1                                                 00857000
TCBNDIOS EQU   TCBFBYT1                                                 00858000
TCBACTIV EQU   TCBFBYT1                                                 00859000
TCBEOTFM EQU   TCBFBYT1                                                 00860000
TCBAFFN  EQU   TCB+274                                                  00861000
TCBCCPVI EQU   TCB+272                                                  00862000
TCBUKYSP EQU   TCB+268                                                  00863000
TCBMODE  EQU   TCBESTAE+3                                               00864000
TCBERTYP EQU   TCBESTAE+2                                               00865000
TCBRV314 EQU   TCBESTRM                                                 00866000
TCBRV313 EQU   TCBESTRM                                                 00867000
TCBRV312 EQU   TCBESTRM                                                 00868000
TCBRV311 EQU   TCBESTRM                                                 00869000
TCBRV310 EQU   TCBESTRM                                                 00870000
TCBRV309 EQU   TCBESTRM                                                 00871000
TCBRV308 EQU   TCBESTRM                                                 00872000
TCBETERM EQU   TCBESTRM                                                 00873000
TCBSCBKY EQU   TCBESTAE                                                 00874000
TCBRTM12 EQU   TCB+260                                                  00875000
TCBTCBID EQU   TCB+256                                                  00876000
TCBRSV96 EQU   TCB+252                                                  00877000
TCBSWA   EQU   TCB+248                                                  00878000
TCBFOEA  EQU   TCBFOE+1                                                 00879000
TCBRSV42 EQU   TCBFOE                                                   00880000
TCBRV306 EQU   TCB+240                                                  00881000
TCBRSV41 EQU   TCB+239                                                  00882000
TCBTID   EQU   TCB+238                                                  00883000
TCBRSVAA EQU   TCB+237                                                  00884000
TCBABCUR EQU   TCB+236                                                  00885000
TCBTMSAV EQU   TCB+232                                                  00886000
TCBIOTIM EQU   TCB+228                                                  00887000
TCBRTWA  EQU   TCB+224                                                  00888000
TCBBACK  EQU   TCB+220                                                  00889000
TCBTIRB  EQU   TCB+216                                                  00890000
TCBAECB  EQU   TCB+212                                                  00891000
TCBEXT2A EQU   TCBEXT2+1                                                00892000
TCBRSV39 EQU   TCBEXT2                                                  00893000
TCBSTMCT EQU   TCB+207                                                  00894000
TCBSYSCT EQU   TCB+206                                                  00895000
TCBRSV37 EQU   TCB+205                                                  00896000
TCBEXSVC EQU   TCBDAR                                                   00897000
TCBDARMS EQU   TCBDAR                                                   00898000
TCBDARWT EQU   TCBDAR                                                   00899000
TCBDARO  EQU   TCBDAR                                                   00900000
TCBDARMC EQU   TCBDARC                                                  00901000
TCBDARD  EQU   TCBDAR                                                   00902000
TCBDARS  EQU   TCBDAR                                                   00903000
TCBDARP  EQU   TCBDAR                                                   00904000
TCBGTOFM EQU   TCBFLGS7                                                 00905000
TCBADMP  EQU   TCBFLGS7                                                 00906000
TCBRSTSK EQU   TCBFLGS7                                                 00907000
TCBSVCS  EQU   TCBFLGS7                                                 00908000
TCBSTACK EQU   TCBFLGS7                                                 00909000
TCBRSV34 EQU   TCBFLGS7                                                 00910000
TCBRSV33 EQU   TCBFLGS7                                                 00911000
TCBGPECB EQU   TCBFLGS7                                                 00912000
TCBNTJS  EQU   TCBFLGS6                                                 00913000
TCBAPG   EQU   TCBFLGS6                                                 00914000
TCBMIGR  EQU   TCBFLGS6                                                 00915000
TCBRV303 EQU   TCBFLGS6                                                 00916000
TCBSPVLK EQU   TCBFLGS6                                                 00917000
TCBCPU   EQU   TCBFLGS6                                                 00918000
TCBPIE17 EQU   TCBFLGS6                                                 00919000
TCBRV    EQU   TCBFLGS6                                                 00920000
TCBRSV79 EQU   TCBNDSP5                                                 00921000
TCBRSV78 EQU   TCBNDSP5                                                 00922000
TCBRSV77 EQU   TCBNDSP5                                                 00923000
TCBRSV76 EQU   TCBNDSP5                                                 00924000
TCBRSV75 EQU   TCBNDSP5                                                 00925000
TCBRSV74 EQU   TCBNDSP5                                                 00926000
TCBRSV95 EQU   TCBNDSP5                                                 00927000
TCBRSV94 EQU   TCBNDSP5                                                 00928000
TCBRSV93 EQU   TCBNDSP4                                                 00929000
TCBRSV92 EQU   TCBNDSP4                                                 00930000
TCBRSV91 EQU   TCBNDSP4                                                 00931000
TCBRSV90 EQU   TCBNDSP4                                                 00932000
TCBRSV89 EQU   TCBNDSP4                                                 00933000
TCBRSV88 EQU   TCBNDSP4                                                 00934000
TCBRSV87 EQU   TCBNDSP4                                                 00935000
TCBRSV86 EQU   TCBNDSP4                                                 00936000
TCBEXT1A EQU   TCBEXT1+1                                                00937000
TCBRSV32 EQU   TCBEXT1                                                  00938000
TCBEXCPD EQU   TCB+192                                                  00939000
TCBIOBRC EQU   TCB+188                                                  00940000
TCBDDWTC EQU   TCB+186                                                  00941000
TCBDDEXC EQU   TCB+184                                                  00942000
TCBJSCBB EQU   TCBJSCB+1                                                00943000
@NM00013 EQU   TCBRECDE                                                 00944000
TCBREC   EQU   TCBRECDE                                                 00945000
TCBMDIDS EQU   TCB+176                                                  00946000
TCBNDINT EQU   TCBNDSP3                                                 00947000
TCBRSV27 EQU   TCBNDSP3                                                 00948000
TCBRSV26 EQU   TCBNDSP3                                                 00949000
TCBRSV25 EQU   TCBNDSP3                                                 00950000
TCBRSV24 EQU   TCBNDSP3                                                 00951000
TCBSRBND EQU   TCBNDSP3                                                 00952000
TCBRV302 EQU   TCBNDSP3                                                 00953000
TCBLJSND EQU   TCBNDSP3                                                 00954000
TCBABE   EQU   TCBNDSP2                                                 00955000
TCBDSS   EQU   TCBNDSP2                                                 00956000
TCBOWAIT EQU   TCBNDSP2                                                 00957000
TCBIWAIT EQU   TCBNDSP2                                                 00958000
TCBNDTS  EQU   TCBNDSP2                                                 00959000
TCBNDSVC EQU   TCBNDSP2                                                 00960000
TCBSTPP  EQU   TCBNDSP2                                                 00961000
TCBABD   EQU   TCBNDSP2                                                 00962000
TCBRSV22 EQU   TCBNDSP1                                                 00963000
TCBPIEND EQU   TCBNDSP1                                                 00964000
TCBTPSP  EQU   TCBNDSP1                                                 00965000
TCBDDRND EQU   TCBNDSP1                                                 00966000
TCBRSPND EQU   TCBNDSP1                                                 00967000
TCBRSTND EQU   TCBNDSP1                                                 00968000
TCBDARPN EQU   TCBNDSP1                                                 00969000
TCBDARTN EQU   TCBNDSP1                                                 00970000
TCBNDSP0 EQU   TCBNDSP                                                  00971000
TCBUSER  EQU   TCB+168                                                  00972000
TCBTCTB  EQU   TCBTCT+1                                                 00973000
TCBRSV9C EQU   TCBTCTGF                                                 00974000
TCBRSV9B EQU   TCBTCTGF                                                 00975000
TCBRSV9A EQU   TCBTCTGF                                                 00976000
TCBRSV99 EQU   TCBTCTGF                                                 00977000
TCBRSV98 EQU   TCBTCTGF                                                 00978000
TCBRSV97 EQU   TCBTCTGF                                                 00979000
TCBRSV20 EQU   TCBTCTGF                                                 00980000
TCBSMFGF EQU   TCBTCTGF                                                 00981000
TCBSTABB EQU   TCBSTAB+1                                                00982000
TCBSTCUR EQU   TCBNSTAE                                                 00983000
TCBRV301 EQU   TCBNSTAE                                                 00984000
TCBSYNCH EQU   TCBNSTAE                                                 00985000
TCBHALT  EQU   TCBNSTAE                                                 00986000
TCBPPSUP EQU   TCBNSTAE                                                 00987000
TCB33E   EQU   TCBNSTAE                                                 00988000
TCBQUIES EQU   TCBNSTAE                                                 00989000
TCBSTABE EQU   TCBNSTAE                                                 00990000
TCBAQE   EQU   TCB+156                                                  00991000
TCBPQE   EQU   TCB+152                                                  00992000
TCBTSDP  EQU   TCB+151                                                  00993000
TCBTSLP  EQU   TCB+150                                                  00994000
TCBSTPCT EQU   TCB+149                                                  00995000
TCBCPUBN EQU   TCBTSFLG                                                 00996000
TCBDYDSP EQU   TCBTSFLG                                                 00997000
TCBRSV18 EQU   TCBTSFLG                                                 00998000
TCBRSV17 EQU   TCBTSFLG                                                 00999000
TCBTIOTG EQU   TCBTSFLG                                                 01000000
TCBATT   EQU   TCBTSFLG                                                 01001000
TCBSTPPR EQU   TCBTSFLG                                                 01002000
TCBRV300 EQU   TCBTSTSK                                                 01003000
TCBECB   EQU   TCB+144                                                  01004000
TCBIQE   EQU   TCB+140                                                  01005000
TCBLTC   EQU   TCB+136                                                  01006000
TCBOTC   EQU   TCB+132                                                  01007000
TCBNTC   EQU   TCB+128                                                  01008000
TCBJSTCA EQU   TCBJSTCB+1                                               01009000
TCBRSV16 EQU   TCBJSTCB                                                 01010000
TCBTQET  EQU   TCBTME                                                   01011000
TCBTCB   EQU   TCB+116                                                  01012000
TCBFSAB  EQU   TCBFSA+1                                                 01013000
TCBQEL   EQU   TCBFSA                                                   01014000
TCBGRS15 EQU   TCBGRS+60                                                01015000
TCBGRS14 EQU   TCBGRS+56                                                01016000
TCBGRS13 EQU   TCBGRS+52                                                01017000
TCBGRS12 EQU   TCBGRS+48                                                01018000
TCBGRS11 EQU   TCBGRS+44                                                01019000
TCBGRS10 EQU   TCBGRS+40                                                01020000
TCBGRS9  EQU   TCBGRS+36                                                01021000
TCBGRS8  EQU   TCBGRS+32                                                01022000
TCBGRS7  EQU   TCBGRS+28                                                01023000
TCBGRS6  EQU   TCBGRS+24                                                01024000
TCBGRS5  EQU   TCBGRS+20                                                01025000
TCBGRS4  EQU   TCBGRS+16                                                01026000
TCBGRS3  EQU   TCBGRS+12                                                01027000
TCBGRS2  EQU   TCBGRS+8                                                 01028000
TCBGRS1  EQU   TCBGRS+4                                                 01029000
TCBGRS0  EQU   TCBGRS                                                   01030000
TCBJPQB  EQU   TCBJPQ+1                                                 01031000
TCBRSV15 EQU   TCBPURGE                                                 01032000
TCBRSV14 EQU   TCBPURGE                                                 01033000
TCBRSV13 EQU   TCBPURGE                                                 01034000
TCBRSV12 EQU   TCBPURGE                                                 01035000
TCBRSV11 EQU   TCBPURGE                                                 01036000
TCBRSV10 EQU   TCBPURGE                                                 01037000
TCBRSV09 EQU   TCBPURGE                                                 01038000
TCBJPQF  EQU   TCBPURGE                                                 01039000
TCBJLB   EQU   TCB+40                                                   01040000
TCBDSP   EQU   TCB+35                                                   01041000
TCBLMP   EQU   TCB+34                                                   01042000
TCBPNDSP EQU   TCBFLGS5                                                 01043000
TCBFCD1  EQU   TCBFLGS5                                                 01044000
TCBSTP   EQU   TCBFLGS5                                                 01045000
TCBSYS   EQU   TCBFLGS5                                                 01046000
TCBANDSP EQU   TCBFLGS5                                                 01047000
TCBPAGE  EQU   TCBFLGS5                                                 01048000
TCBUXNDF EQU   TCBABWF                                                  01049000
TCBFC    EQU   TCBFLGS5                                                 01050000
TCBONDSP EQU   TCBFLGS4                                                 01051000
TCBMPCND EQU   TCBFLGS4                                                 01052000
TCBMPCVQ EQU   TCBFLGS4                                                 01053000
TCBUXNDV EQU   TCBFLGS4                                                 01054000
TCBHNDSP EQU   TCBFLGS4                                                 01055000
TCBRQENA EQU   TCBFLGS4                                                 01056000
TCBSER   EQU   TCBFLGS4                                                 01057000
TCBNDUMP EQU   TCBFLGS4                                                 01058000
TCBDWSTA EQU   TCBFLGS3                                                 01059000
TCBRSV08 EQU   TCBFLGS3                                                 01060000
TCBRSV07 EQU   TCBFLGS3                                                 01061000
TCBRSV06 EQU   TCBFLGS3                                                 01062000
TCBABGM  EQU   TCBFLGS3                                                 01063000
TCBABTRM EQU   TCBFLGS3                                                 01064000
TCBADINP EQU   TCBFLGS3                                                 01065000
TCBFSM   EQU   TCBFLGS3                                                 01066000
TCBFTS   EQU   TCBFLGS2                                                 01067000
TCBFETXR EQU   TCBFLGS2                                                 01068000
TCBFDSOP EQU   TCBFLGS2                                                 01069000
TCBFJMC  EQU   TCBFLGS2                                                 01070000
TCBFSMC  EQU   TCBFLGS2                                                 01071000
TCBFABOP EQU   TCBFLGS2                                                 01072000
TCBFSTI  EQU   TCBFLGS2                                                 01073000
TCBFOINP EQU   TCBFLGS2                                                 01074000
TCBFX    EQU   TCBFLGS1                                                 01075000
TCBFS    EQU   TCBFLGS1                                                 01076000
TCBFT    EQU   TCBFLGS1                                                 01077000
TCBPDUMP EQU   TCBFLGS1                                                 01078000
TCBRSV04 EQU   TCBFLGS1                                                 01079000
TCBFERA  EQU   TCBFLGS1                                                 01080000
TCBFE    EQU   TCBFLGS1                                                 01081000
TCBFA    EQU   TCBFLGS1                                                 01082000
TCBZERO  EQU   TCBPKF                                                   01083000
TCBFLAG  EQU   TCBPKF                                                   01084000
TCBMSSB  EQU   TCBMSS+1                                                 01085000
TCBRSV03 EQU   TCBMSS                                                   01086000
TCBTRNB  EQU   TCBTRN+1                                                 01087000
TCBRSV02 EQU   TCBABF                                                   01088000
TCBOLTEP EQU   TCBABF                                                   01089000
TCBTCP   EQU   TCBABF                                                   01090000
TCBTCPP  EQU   TCBABF                                                   01091000
TCBRSV01 EQU   TCBABF                                                   01092000
TCBGRPH  EQU   TCBABF                                                   01093000
TCBNOCHK EQU   TCBABF                                                   01094000
TCBMOD91 EQU   TCBABF                                                   01095000
TCBCMPC  EQU   TCBCMP+1                                                 01096000
TCBRV318 EQU   TCBCMSG                                                  01097000
TCBRV317 EQU   TCBCIND                                                  01098000
TCBRV316 EQU   TCBCWTO                                                  01099000
TCBCASID EQU   TCBCDBL                                                  01100000
TCBNOCC  EQU   TCBSTCC                                                  01101000
TCBDMPO  EQU   TCBCPP                                                   01102000
TCBCSTEP EQU   TCBCMPF                                                  01103000
TCBCREQ  EQU   TCBCMPF                                                  01104000
TCBTIO   EQU   TCB+12                                                   01105000
TCBDEB   EQU   TCB+8                                                    01106000
TCBPIEA  EQU   TCBPIE+1                                                 01107000
TCBPM    EQU   TCBPMASK                                                 01108000
@NM00012 EQU   TCBPMASK                                                 01109000
TCBRBP   EQU   TCB                                                      01110000
TCBFRS6  EQU   TCBFRS+24                                                01111000
TCBFRS4  EQU   TCBFRS+16                                                01112000
TCBFRS2  EQU   TCBFRS+8                                                 01113000
TCBFRS0  EQU   TCBFRS                                                   01114000
LLESYSCT EQU   LLE+10                                                   01115000
LLECOUNT EQU   LLE+8                                                    01116000
LPDEATT3 EQU   LPDE+30                                                  01117000
LPDEAUTH EQU   LPDEATT2                                                 01118000
LPDESYSL EQU   LPDEATT2                                                 01119000
@NM00011 EQU   LPDEATT2                                                 01120000
@NM00010 EQU   LPDEATT2                                                 01121000
LPDERLC  EQU   LPDEATT2                                                 01122000
LPDEXLE  EQU   LPDEATT2                                                 01123000
@NM00009 EQU   LPDEATT2                                                 01124000
LPDENLR  EQU   LPDEATTR                                                 01125000
@NM00008 EQU   LPDEATTR                                                 01126000
@NM00007 EQU   LPDEATTR                                                 01127000
LPDESER  EQU   LPDEATTR                                                 01128000
LPDEREN  EQU   LPDEATTR                                                 01129000
@NM00006 EQU   LPDEATTR                                                 01130000
LPDENIP  EQU   LPDEATTR                                                 01131000
@NM00005 EQU   LPDE+26                                                  01132000
LPDEUSE  EQU   LPDE+24                                                  01133000
LPDEXLP  EQU   LPDE+20                                                  01134000
LPDENTP  EQU   LPDE+16                                                  01135000
LPDENAME EQU   LPDE+8                                                   01136000
LPDERBP  EQU   LPDE+4                                                   01137000
LPDECHN  EQU   LPDE                                                     01138000
LDPTCEP  EQU   ISTLDPRM+24                                              01139000
LDPRSV02 EQU   ISTLDPRM+22                                              01140000
LDPRSV01 EQU   LDPFB2                                                   01141000
LDPACTIF EQU   LDPFB2                                                   01142000
LDPATACH EQU   LDPFB2                                                   01143000
LDPFLAST EQU   LDPFB2                                                   01144000
LDPRSV03 EQU   LDPFG                                                    01145000
LDPPB    EQU   LDPFG                                                    01146000
LDPDCBA  EQU   ISTLDPRM+16                                              01147000
LDPPDS   EQU   ISTLDPRM+8                                               01148000
CVTLEVL  EQU   CVTRELNO+2                                               01149000
CVTNUMB  EQU   CVTRELNO                                                 01150000
CVTMDL   EQU   CVTFIX+250                                               01151000
@NM00004 EQU   CVTFIX+248                                               01152000
@NM00003 EQU   CVTFIX                                                   01153000
CVTRV482 EQU   CVTXTNT2+128                                             01154000
CVTRV481 EQU   CVTXTNT2+124                                             01155000
CVTRV480 EQU   CVTXTNT2+120                                             01156000
CVTRV479 EQU   CVTXTNT2+118                                             01157000
CVTRV478 EQU   CVTXTNT2+117                                             01158000
CVTRV477 EQU   CVTXTNT2+116                                             01159000
CVTRV476 EQU   CVTXTNT2+115                                             01160000
CVTRV475 EQU   CVTXTNT2+114                                             01161000
CVTRV474 EQU   CVTRV466                                                 01162000
CVTRV473 EQU   CVTRV466                                                 01163000
CVTRV472 EQU   CVTRV466                                                 01164000
CVTRV471 EQU   CVTRV466                                                 01165000
CVTRV470 EQU   CVTRV466                                                 01166000
CVTRV469 EQU   CVTRV466                                                 01167000
CVTRV468 EQU   CVTRV466                                                 01168000
CVTRV467 EQU   CVTRV466                                                 01169000
CVTRV465 EQU   CVTRV457                                                 01170000
CVTRV464 EQU   CVTRV457                                                 01171000
CVTRV463 EQU   CVTRV457                                                 01172000
CVTRV462 EQU   CVTRV457                                                 01173000
CVTRV461 EQU   CVTRV457                                                 01174000
CVTRV460 EQU   CVTRV457                                                 01175000
CVTRV459 EQU   CVTRV457                                                 01176000
CVTRV458 EQU   CVTRV457                                                 01177000
CVTRV456 EQU   CVTXTNT2+108                                             01178000
CVTRV455 EQU   CVTXTNT2+104                                             01179000
CVTRV454 EQU   CVTXTNT2+100                                             01180000
CVTRV453 EQU   CVTXTNT2+96                                              01181000
CVTRV452 EQU   CVTXTNT2+94                                              01182000
CVTRV451 EQU   CVTXTNT2+92                                              01183000
CVTRV450 EQU   CVTXTNT2+90                                              01184000
CVTRV449 EQU   CVTXTNT2+88                                              01185000
CVTRV448 EQU   CVTXTNT2+87                                              01186000
CVTRV447 EQU   CVTXTNT2+86                                              01187000
CVTRV446 EQU   CVTRV438                                                 01188000
CVTRV445 EQU   CVTRV438                                                 01189000
CVTRV444 EQU   CVTRV438                                                 01190000
CVTRV443 EQU   CVTRV438                                                 01191000
CVTRV442 EQU   CVTRV438                                                 01192000
CVTRV441 EQU   CVTRV438                                                 01193000
CVTRV440 EQU   CVTRV438                                                 01194000
CVTRV439 EQU   CVTRV438                                                 01195000
CVTRV437 EQU   CVTRV429                                                 01196000
CVTRV436 EQU   CVTRV429                                                 01197000
CVTRV435 EQU   CVTRV429                                                 01198000
CVTRV434 EQU   CVTRV429                                                 01199000
CVTRV433 EQU   CVTRV429                                                 01200000
CVTRV432 EQU   CVTRV429                                                 01201000
CVTRV431 EQU   CVTRV429                                                 01202000
CVTRV430 EQU   CVTRV429                                                 01203000
CVTRV428 EQU   CVTXTNT2+80                                              01204000
CVTRV427 EQU   CVTXTNT2+76                                              01205000
CVTRV426 EQU   CVTXTNT2+72                                              01206000
CVTRV425 EQU   CVTXTNT2+68                                              01207000
CVTATACT EQU   CVTATCVT                                                 01208000
CVTRV423 EQU   CVTXTNT2+62                                              01209000
CVTRV422 EQU   CVTXTNT2+60                                              01210000
CVTRV421 EQU   CVTXTNT2+58                                              01211000
CVTRV420 EQU   CVTXTNT2+56                                              01212000
CVTRV419 EQU   CVTXTNT2+55                                              01213000
CVTRV418 EQU   CVTXTNT2+54                                              01214000
CVTRV417 EQU   CVTRV409                                                 01215000
CVTRV416 EQU   CVTRV409                                                 01216000
CVTRV415 EQU   CVTRV409                                                 01217000
CVTRV414 EQU   CVTRV409                                                 01218000
CVTRV413 EQU   CVTRV409                                                 01219000
CVTRV412 EQU   CVTRV409                                                 01220000
CVTRV411 EQU   CVTRV409                                                 01221000
CVTRV410 EQU   CVTRV409                                                 01222000
CVTRV408 EQU   CVTRV400                                                 01223000
CVTRV407 EQU   CVTRV400                                                 01224000
CVTRV406 EQU   CVTRV400                                                 01225000
CVTRV405 EQU   CVTRV400                                                 01226000
CVTRV404 EQU   CVTRV400                                                 01227000
CVTRV403 EQU   CVTRV400                                                 01228000
CVTRV402 EQU   CVTRV400                                                 01229000
CVTRV401 EQU   CVTRV400                                                 01230000
CVTICB   EQU   CVTXTNT2+48                                              01231000
CVTSKTA  EQU   CVTXTNT2+44                                              01232000
CVTSHSB  EQU   CVTSHS                                                   01233000
CVTRSV98 EQU   CVTXTNT2+36                                              01234000
CVTRSV97 EQU   CVTXTNT2+34                                              01235000
CVTRSV96 EQU   CVTXTNT2+32                                              01236000
CVTOLTEP EQU   CVTXTNT2+28                                              01237000
CVTQIDA  EQU   CVTQID+1                                                 01238000
CVTRSV95 EQU   CVTQID                                                   01239000
CVTRSV94 EQU   CVTXTNT2+20                                              01240000
CVTRSV93 EQU   CVTXTNT2+16                                              01241000
CVTRSV92 EQU   CVTXTNT2+12                                              01242000
CVTDEBVR EQU   CVTXTNT2+8                                               01243000
CVTRSV91 EQU   CVTXTNT2+6                                               01244000
CVTRSV9H EQU   CVTFLGBT                                                 01245000
CVTRSV9G EQU   CVTFLGBT                                                 01246000
CVTRSV9F EQU   CVTFLGBT                                                 01247000
CVTRSV9E EQU   CVTFLGBT                                                 01248000
CVTRSV9D EQU   CVTFLGBT                                                 01249000
CVTRSV9C EQU   CVTFLGBT                                                 01250000
CVTVME   EQU   CVTFLGBT                                                 01251000
CVTNPE   EQU   CVTFLGBT                                                 01252000
CVTNUCLS EQU   CVTXTNT2+4                                               01253000
CVTDSSVA EQU   CVTDSSV+1                                                01254000
CVTRSV89 EQU   CVTDSSV                                                  01255000
CVTRSV88 EQU   CVTXTNT1+8                                               01256000
CVTRSV87 EQU   CVTXTNT1+4                                               01257000
CVTFACHN EQU   CVTXTNT1                                                 01258000
CVTRV488 EQU   CVTMAP+412                                               01259000
CVTRV487 EQU   CVTMAP+408                                               01260000
CVTRV486 EQU   CVTMAP+404                                               01261000
CVTRV485 EQU   CVTMAP+400                                               01262000
CVTACTAP EQU   CVTMAP+396                                               01263000
CVTAUTH  EQU   CVTMAP+392                                               01264000
CVTATMCA EQU   CVTATMCT+1                                               01265000
CVTATMST EQU   CVTATMCT                                                 01266000
CVTRSV61 EQU   CVTMAP+384                                               01267000
CVTVOLT1 EQU   CVTVOLM1+1                                               01268000
CVTVOLI1 EQU   CVTVOLF1                                                 01269000
CVTSTOA  EQU   CVTMAP+376                                               01270000
CVTRSV58 EQU   CVTMAP+374                                               01271000
CVTRSV57 EQU   CVTMAP+372                                               01272000
CVTDDCE  EQU   CVTMAP+368                                               01273000
CVTPNWFR EQU   CVTMAP+364                                               01274000
CVTSMF   EQU   CVTMAP+360                                               01275000
CVTSULK  EQU   CVTMAP+358                                               01276000
CVTSLKO  EQU   CVTSYSK                                                  01277000
CVTSLKP  EQU   CVTSYSK                                                  01278000
CVTSLKQ  EQU   CVTSYSK                                                  01279000
CVTSLKR  EQU   CVTSYSK                                                  01280000
CVTRSV56 EQU   CVTSYSK                                                  01281000
CVTRSV55 EQU   CVTSYSK                                                  01282000
CVTRSV54 EQU   CVTSYSK                                                  01283000
CVTRSV53 EQU   CVTSYSK                                                  01284000
CVTRSV52 EQU   CVTA1F1                                                  01285000
CVTRSV51 EQU   CVTA1F1                                                  01286000
CVTRSV50 EQU   CVTA1F1                                                  01287000
CVTRSV49 EQU   CVTA1F1                                                  01288000
CVTRSV48 EQU   CVTA1F1                                                  01289000
CVTRSV47 EQU   CVTA1F1                                                  01290000
CVTSRSW  EQU   CVTA1F1                                                  01291000
CVTPFSW  EQU   CVTA1F1                                                  01292000
CVTPCVT  EQU   CVTMAP+352                                               01293000
CVTRSV46 EQU   CVTMAP+344                                               01294000
CVTRSV45 EQU   CVTMAP+340                                               01295000
CVTRSV44 EQU   CVTMAP+338                                               01296000
CVTRSV43 EQU   CVTMAP+336                                               01297000
CVTHJESA EQU   CVTHJES+1                                                01298000
CVTRSV42 EQU   CVTHJES                                                  01299000
CVTEXT2A EQU   CVTEXT2+1                                                01300000
CVTRSV41 EQU   CVTEXT2                                                  01301000
CVTAPFA  EQU   CVTAPF+1                                                 01302000
CVTRSV40 EQU   CVTAPF                                                   01303000
CVTRV518 EQU   CVTINTLA                                                 01304000
CVTRV517 EQU   CVTERPV                                                  01305000
CVTEORM  EQU   CVTMAP+312                                               01306000
CVTMCHPR EQU   CVTMAP+308                                               01307000
CVTTZ    EQU   CVTMAP+304                                               01308000
CVTJEPS  EQU   CVTMAP+300                                               01309000
CVTJESCT EQU   CVTMAP+296                                               01310000
CVTMODE  EQU   CVTMAP+292                                               01311000
CVTPTRV  EQU   CVTMAP+288                                               01312000
CVTREAL  EQU   CVTMAP+284                                               01313000
CVTRSV39 EQU   CVTMAP+280                                               01314000
CVTRSV38 EQU   CVTMAP+276                                               01315000
CVTDMSRA EQU   CVTDMSR+1                                                01316000
CVTRSV37 EQU   CVTDMSR                                                  01317000
CVTQMSGA EQU   CVTQMSG+1                                                01318000
CVTRSV36 EQU   CVTQMSG                                                  01319000
CVTAMFF  EQU   CVTMAP+264                                               01320000
CVTPURGA EQU   CVTPURG+1                                                01321000
CVTRSV35 EQU   CVTPURG                                                  01322000
CVTCBSP  EQU   CVTMAP+256                                               01323000
CVTATERA EQU   CVTATER+1                                                01324000
CVTSYST  EQU   CVTATER                                                  01325000
CVTVOLT2 EQU   CVTTAT                                                   01326000
CVTVOLI2 EQU   CVTVOLF2                                                 01327000
CVTAQAVB EQU   CVTAQAVT+1                                               01328000
CVTRSV34 EQU   CVTTCMFG                                                 01329000
CVTRSV33 EQU   CVTTCMFG                                                 01330000
CVTRSV32 EQU   CVTTCMFG                                                 01331000
CVTRSV31 EQU   CVTTCMFG                                                 01332000
CVTRSV30 EQU   CVTTCMFG                                                 01333000
CVTRSV29 EQU   CVTTCMFG                                                 01334000
CVTRSV28 EQU   CVTTCMFG                                                 01335000
CVTTCRDY EQU   CVTTCMFG                                                 01336000
CVTGTFA  EQU   CVTGTF+1                                                 01337000
CVTRSV27 EQU   CVTGTFST                                                 01338000
CVTRNIO  EQU   CVTGTFST                                                 01339000
CVTUSR   EQU   CVTGTFST                                                 01340000
CVTRV318 EQU   CVTFORM                                                  01341000
CVTRV317 EQU   CVTTMODE                                                 01342000
CVTRV316 EQU   CVTSTATE                                                 01343000
CVTRV315 EQU   CVTGTFS                                                  01344000
CVTGTFAV EQU   CVTGTFS                                                  01345000
CVT0SCR1 EQU   CVTMAP+232                                               01346000
CVTRV515 EQU   CVTMAP+228                                               01347000
CVTRMS   EQU   CVTMAP+224                                               01348000
CVTPATCH EQU   CVTMAP+220                                               01349000
CVTTSCE  EQU   CVTMAP+216                                               01350000
CVTLNKSC EQU   CVTMAP+214                                               01351000
CVTQABST EQU   CVTMAP+212                                               01352000
CVTMDLDS EQU   CVTMAP+208                                               01353000
CVTUSER  EQU   CVTMAP+204                                               01354000
CVTABEND EQU   CVTMAP+200                                               01355000
CVTSMCA  EQU   CVTMAP+196                                               01356000
CVTRSV18 EQU   CVTMAP+192                                               01357000
CVTRSV17 EQU   CVTOPTB                                                  01358000
CVTRSV16 EQU   CVTOPTB                                                  01359000
CVTFP    EQU   CVTOPTB                                                  01360000
CVTAPTHR EQU   CVTOPTB                                                  01361000
CVTNLOG  EQU   CVTOPTB                                                  01362000
CVTTOD   EQU   CVTOPTB                                                  01363000
CVTCTIMS EQU   CVTOPTB                                                  01364000
CVTPROT  EQU   CVTOPTB                                                  01365000
CVTXPFP  EQU   CVTOPTA                                                  01366000
CVTASCII EQU   CVTOPTA                                                  01367000
CVTRSV13 EQU   CVTOPTA                                                  01368000
CVTRSV12 EQU   CVTOPTA                                                  01369000
CVTNIP   EQU   CVTOPTA                                                  01370000
CVTDDR   EQU   CVTOPTA                                                  01371000
CVTAPR   EQU   CVTOPTA                                                  01372000
CVTCCH   EQU   CVTOPTA                                                  01373000
CVTSNCTR EQU   CVTMAP+180                                               01374000
CVTQMWR  EQU   CVTMAP+176                                               01375000
CVTQOCR  EQU   CVTMAP+172                                               01376000
CVT1EF00 EQU   CVTMAP+168                                               01377000
CVTMZ00  EQU   CVTMAP+164                                               01378000
CVTHEAD  EQU   CVTMAP+160                                               01379000
CVTRSV11 EQU   CVTMAP+156                                               01380000
CVT0PT01 EQU   CVTMAP+152                                               01381000
CVTMSER  EQU   CVTMAP+148                                               01382000
CVTRV516 EQU   CVTIERLC                                                 01383000
CVTILCH  EQU   CVTMAP+140                                               01384000
CVT0DS   EQU   CVTMAP+136                                               01385000
CVTFBOSV EQU   CVTMAP+132                                               01386000
CVTNUCB  EQU   CVTMAP+128                                               01387000
CVTIXAVL EQU   CVTMAP+124                                               01388000
CVTIOQET EQU   CVTMAP+120                                               01389000
CVTDCBA  EQU   CVTMAP+117                                               01390000
CVTMVS2  EQU   CVTDCB                                                   01391000
CVT6DAT  EQU   CVTDCB                                                   01392000
CVT4MPS  EQU   CVTDCB                                                   01393000
CVTRSV09 EQU   CVTDCB                                                   01394000
CVT4MS1  EQU   CVTDCB                                                   01395000
CVT2SPS  EQU   CVTDCB                                                   01396000
CVT1SSS  EQU   CVTDCB                                                   01397000
CVTRSV08 EQU   CVTDCB                                                   01398000
CVTSTB   EQU   CVTMAP+112                                               01399000
CVTQTD00 EQU   CVTMAP+108                                               01400000
CVTQTE00 EQU   CVTMAP+104                                               01401000
CVTCUCB  EQU   CVTMAP+100                                               01402000
CVTSJQ   EQU   CVTMAP+96                                                01403000
CVTPBLDL EQU   CVTMAP+92                                                01404000
CVTTPC   EQU   CVTMAP+88                                                01405000
CVTSVDCB EQU   CVTMAP+84                                                01406000
CVTBRET  EQU   CVTMAP+82                                                01407000
CVTEXIT  EQU   CVTMAP+80                                                01408000
CVT0FN00 EQU   CVTMAP+76                                                01409000
CVTDARA  EQU   CVTDAR+1                                                 01410000
CVTRSV07 EQU   CVTFLGS1                                                 01411000
CVTRSV06 EQU   CVTFLGS1                                                 01412000
CVTRSV05 EQU   CVTFLGS1                                                 01413000
CVTRSV04 EQU   CVTFLGS1                                                 01414000
CVTRSV03 EQU   CVTFLGS1                                                 01415000
CVTRSV02 EQU   CVTFLGS1                                                 01416000
CVTRSV01 EQU   CVTFLGS1                                                 01417000
CVTDMPLK EQU   CVTFLGS1                                                 01418000
CVTXITP  EQU   CVTMAP+68                                                01419000
CVTZDTAB EQU   CVTMAP+64                                                01420000
CVTMSLT  EQU   CVTMAP+60                                                01421000
CVTDATE  EQU   CVTMAP+56                                                01422000
CVTBTERM EQU   CVTMAP+52                                                01423000
CVTSYSAD EQU   CVTMAP+48                                                01424000
CVTXTLER EQU   CVTMAP+44                                                01425000
CVTILK2  EQU   CVTMAP+40                                                01426000
CVTILK1  EQU   CVTMAP+36                                                01427000
CVTPRLTV EQU   CVTMAP+32                                                01428000
CVTPCNVT EQU   CVTMAP+28                                                01429000
CVT0VL00 EQU   CVTMAP+24                                                01430000
CVTXAPG  EQU   CVTMAP+20                                                01431000
CVTBUF   EQU   CVTMAP+16                                                01432000
CVTJOB   EQU   CVTMAP+12                                                01433000
CVTLINK  EQU   CVTMAP+8                                                 01434000
CVT0EF00 EQU   CVTMAP+4                                                 01435000
CVT      EQU   CVTMAP                                                   01436000
CDATTR3  EQU   CDENTRY+30                                               01437000
CDAUTH   EQU   CDATTR2                                                  01438000
CDSYSLIB EQU   CDATTR2                                                  01439000
CDOLY    EQU   CDATTR2                                                  01440000
@NM00002 EQU   CDATTR2                                                  01441000
CDRLC    EQU   CDATTR2                                                  01442000
CDXLE    EQU   CDATTR2                                                  01443000
CDREL    EQU   CDATTR2                                                  01444000
CDSPZ    EQU   CDATTR2                                                  01445000
CDNLR    EQU   CDATTR                                                   01446000
CDJPA    EQU   CDATTR                                                   01447000
CDNFN    EQU   CDATTR                                                   01448000
CDSER    EQU   CDATTR                                                   01449000
CDREN    EQU   CDATTR                                                   01450000
CDNIC    EQU   CDATTR                                                   01451000
CDNIP    EQU   CDATTR                                                   01452000
@NM00001 EQU   CDENTRY+26                                               01453000
CDUSE    EQU   CDENTRY+24                                               01454000
CDENTPT  EQU   CDENTRY+16                                               01455000
CDRRBP   EQU   CDENTRY+4                                                01456000
CDCHAIN  EQU   CDENTRY                                                  01457000
.@UNREFD ANOP                          END UNREFERENCED COMPONENTS      01458000
@ENDDATA EQU   *                                                        01459000
         END   ISTINMAD,(C'PLS0236',0603,75130)                         01460000
