SVTM TITLE 'ISTNMCCF-CLUSTER START CTL INBOUND FAILURE PROC *00001000 ' 00002000 ISTNMCCF CSECT , 0001 00003000 @MAINENT DS 0H 0001 00004000 USING *,@15 0001 00005000 B @PROLOG 0001 00006000 DC AL1(16) 0001 00007000 DC C'ISTNMCCF 75.130' 0001 00008000 DROP @15 00009000 @PROLOG BALR @12,0 0001 00010000 @PSTART DS 0H 0001 00011000 USING @PSTART,@12 0001 00012000 * /* MAINTAIN REENTRANCY */ 0382 00013000 */* CODE FOR ISTNMCCF BEGINS HERE */ 0382 00014000 */********************************************************************* 00015000 */* ISTNMCCF IST THE START CONTROL INBOUND FAILURE PROCEDURE FOR * 00016000 */* THE CLUSTER CONTROL LAYER. IT ISSUES A TPMSG TO TELL THE OPERATOR * 00017000 */* WHICH NODE THE INVITE PERPETUAL FAILED FOR AND TPEXITS. * 00018000 */********************************************************************* 00019000 */* UPDATE CRA/CRR PTRS */ 0382 00020000 * DO; 0382 00021000 */*** CRRMAINT PROCNM(ISTNMCCF)COMP(CS)FUNC(SUB) ***/ 0383 00022000 * DCL CMZK0005 PTR(31) REG(1); 0383 00023000 * RFY (CMZK0005) RSTD; 0384 00024000 * 0384 00025000 */* ATBUILD (ISTRPH,ISTCRA,ISTPFCRR,ISTCSCRR) */ 0385 00026000 */* END OF ATBUILD */ 0385 00027000 * /*** SET ENTERED BIT FOR THIS PROCEDURE ***/ 0385 00028000 *CMZK0005->RPHCRR->CRACRR->NNMCCF = '1'B; 0385 00029000 L @15,RPHCRR(,CMZK0005) 0385 00030000 L @15,CRACRR(,@15) 0385 00031000 OI NNMCCF(@15),B'00010000' 0385 00032000 * /*** CLEAR AND SET CURRENT PROCEDURE BIT ***/ 0386 00033000 *CMZK0005->RPHCRR->CRACRR->CSCCRT = '0'B; 0386 00034000 MVI CSCCRT+1(@15),X'00' 0386 00035000 MVI CSCCRT(@15),B'00000000' 0386 00036000 *CMZK0005->RPHCRR->CRACRR->CNMCCF = '1'B; 0387 00037000 OI CNMCCF(@15),B'00010000' 0387 00038000 * END; 0388 00039000 *RPHSVPTR=RPHPTR; /* SAVE PTR TO RPH */ 0389 00040000 LR RPHSVPTR,RPHPTR 0389 00041000 *MYCRAPTR=ADDR(CRAPROCR); /* GET @ CRAPROCR FOR COMPILER */ 0390 00042000 L MYCRAPTR,RPHCRR(,RPHSVPTR) 0390 00043000 LA MYCRAPTR,CRAPROCR(,MYCRAPTR) 0390 00044000 *CCFSVPTR=ADDR(MYCRAPTR->CSCREGSV); /* SET UP SAVE AREA PTR FOR TPMSG * 00045000 LA CCFSVPTR,CSCREGSV(,MYCRAPTR) 0391 00046000 */*TPMSG MSGID('852I')MSG((ADDR(RPRNAME)))PLAREA(MYCRAPTR->CSCPLIST)*/ 00047000 * 0392 00048000 * DO; 0392 00049000 * DCL REG1007 REG(1) PTR; 0393 00050000 * RFY (REG1007) RSTD; 0394 00051000 * 0394 00052000 * RFY (EMCR13) RSTD; 0395 00053000 * DCL 1 * BASED(REG1007), 0396 00054000 * 2 CMZID007 PTR(31), 0396 00055000 * 2 *, 0396 00056000 * 3 CMZRL007 PTR(8), 0396 00057000 * 3 CMZRA007 PTR(24) BDY(BYTE), 0396 00058000 * 2 CMZEA007 PTR(31), 0396 00059000 * 2 CMZVP007 PTR(31); 0396 00060000 * 0396 00061000 */*XREGSET PID('PLAREA')PPARM(MYCRAPTR->CSCPLIST)RREG(,REG1007)*/ 0397 00062000 * DO; 0397 00063000 * REG1007=ADDR(MYCRAPTR->CSCPLIST); /*SET RREG SYMBOL TO ADDRESS*/ 00064000 LA REG1007,CSCPLIST(,MYCRAPTR) 0398 00065000 * /*OF PPARM OPERAND */ 00066000 * END; /* XREGSET */ 0399 00067000 * CMZID007 = 0; 0400 00068000 SLR @15,@15 0400 00069000 ST @15,CMZID007(,REG1007) 0400 00070000 * CMZRL007 = 0; 0401 00071000 MVI CMZRL007(REG1007),X'00' 0401 00072000 * CMZRA007 = 0; 0402 00073000 STCM @15,7,CMZRA007(REG1007) 0402 00074000 * CMZEA007 = 0; 0403 00075000 ST @15,CMZEA007(,REG1007) 0403 00076000 * CMZVP007 = 0; 0404 00077000 ST @15,CMZVP007(,REG1007) 0404 00078000 * DCL CMZAA007 CHAR(4) INIT('852I'); 0405 00079000 * CMZID007 = ADDR(CMZAA007); 0406 00080000 LA @00,CMZAA007 0406 00081000 ST @00,CMZID007(,REG1007) 0406 00082000 * CMZVP007 = ADDR(RPRNAME); 0407 00083000 L @15,RPHMAJCB-1(,RPHSVPTR) 0407 00084000 LA @15,0(,@15) 0407 00085000 L @15,FMCDNCBA(,@15) 0407 00086000 L @00,NCBRDTE(,@15) 0407 00087000 ST @00,CMZVP007(,REG1007) 0407 00088000 * DCL CMZSA007 (18) PTR(31) BASED(EMCR13); 0408 00089000 * DCL CMZZO007 (1) FIXED(31) INIT(0); 0409 00090000 * CMZSA007(5) = CMZZO007; 0410 00091000 * 0410 00092000 L @00,CMZZO007 0410 00093000 ST @00,CMZSA007+16(,EMCR13) 0410 00094000 * DCL REG15007 REG(15) PTR; 0411 00095000 * RFY REG15007 RSTD; 0412 00096000 * 0412 00097000 * DO; /* LISATCVT CVTBASE(PAGEABLE,(REG15007)) */ 0413 00098000 * 0413 00099000 * RFY ISTDYPAB; 0414 00100000 * RFY ISTATCVT; 0415 00101000 * REG15007 = ATCLCPTR; /*SET UP ATCVT POINTER*/ 0416 00102000 L REG15007,ATCLCPTR 0416 00103000 * END; /*LISATCVT*/ 0417 00104000 * DCL CMTA007 BASED(REG15007) ENTRY VALUERANGE(*); 0418 00105000 * REG15007 = REG15007->ATCMSGP; 0419 00106000 L REG15007,ATCMSGP(,REG15007) 0419 00107000 * CALL CMTA007; 0420 00108000 BALR @14,@15 0420 00109000 * RESPECIFY (REG1007,REG15007) UNRESTRICTED; 0421 00110000 * 0421 00111000 * RFY (EMCR13) UNRSTD; 0422 00112000 * END; 0423 00113000 *RPHPTR=RPHSVPTR; /* SET REG 1 PT TO RPH */ 0424 00114000 LR RPHPTR,RPHSVPTR 0424 00115000 */* TPEXIT NORM */ 0425 00116000 * DO; 0425 00117000 * 0425 00118000 * DCL GPR00F FIXED(31) REG(00); 0426 00119000 * DCL GPR00P PTR(31) REG(00); 0427 00120000 * DCL GPR15F FIXED(31) REG(15); 0428 00121000 * DCL GPR15P PTR(31) REG(15); 0429 00122000 * RESPECIFY GPR15P RSTD; 0430 00123000 * 0430 00124000 */* ATBUILD (ISTPAB,ISTDYPAB,ISTATCVT) */ 0431 00125000 * /* DYNAMIC PAB 1K633 */ 0431 00126000 * /* 1K0997 JAN 20, 1973 MB */ 0431 00127000 * /* 1K1142 MAR 03, 1973 MB */ 0431 00128000 * DCL 1 ISTDYPAB BDY(DWORD) BASED, /* LEVEL 1 DECLARE 1K633 */ 0431 00129000 * 2 DYPTYPE CHAR(1), /* CONTROL BLOCK TYPE CODE 1K633 */ 0431 00130000 * 2 DYPLNGTH PTR(8), /* CONTROL BLOCK LENGTH (BYTES) 1K633 */ 00131000 * 2 DYPFLGS CHAR(2), /* FLAGS 1K633 */ 0431 00132000 * 2 DYPCHAIN PTR(31), /* CHAIN POINTER 1K633 */ 0431 00133000 * 2 DYPTSKID PTR(31), /* TASKID OR PTR TO PSS TABLES 1K633 */ 00134000 * 2 DYPRSV01 PTR(31), /* RESERVED TO PRESERVE ALIGNMENT 0431 00135000 * 1K0997 */ 00136000 * 2 DYPPAB CHAR(LENGTH(ISTPAB)) BDY(DWORD); /* LENGTH OF 1K0997 00137000 * PAB */ 00138000 *DCL DYTYP BIT(8) CONSTANT ('11'X); /* TYPE 1K1142 */ 00139000 */* REVISIONS 011 04/25/75 * 00140000 *DCL ATCLCPTR PTR LOCATION(1032); /* POINTER TO ATCVT * 00141000 *DCL 1 ISTATCVT BDY(DWORD) BASED, 0434 00142000 * 2 ATCCOM BDY(WORD), /* SYSTEM INDEPENDENT FIELDS * 00143000 * 3 ATCSTAT CHAR(4), /* VTAM STATUS INDICATORS * 00144000 * 4 ATCSTAT1 CHAR(1), /* VTAM STATUS BYTE 1 * 00145000 * 5 ATCSTART BIT(1), /* VTAM IS STARTING * 00146000 * 5 ATCACTIV BIT(1), /* VTAM IS ACTIVE * 00147000 * 5 ATCSNHLT BIT(1), /* VTAM SESSION HALT * 00148000 * 5 ATCQKHLT BIT(1), /* VTAM QUICK HALT * 00149000 * 5 ATCNETSL BIT(1), /* NETSOL=YES SPECIFIED ON CMD * 00150000 * 5 ATCINHLT BIT(1), /* INTERNAL VTAM HALT QUICK * 00151000 * 5 * BIT(2), /* RESERVED * 00152000 * 4 ATCSTFLG BIT(8), /* STORAGE MANAGEMENT FLAGS * 00153000 * 5 ATCHSDMF BIT(1), /* SYSTEM SLOW DOWN FLAG * 00154000 * 4 ATCPOFLG BIT(8), /* PROGRAM OPERATOR * 00155000 * /* INTERFACE FLAGS * 00156000 * 5 ATCPOUNS BIT(1), /* APPLICATION AUTHORIZED TO * 00157000 * /* RECEIVE UNSOLICITED MESSAGES* 00158000 * /* 1 = YES * 00159000 * 5 * BIT(7), /* RESERVED * 00160000 * 4 ATCSTAT4 CHAR(1), /* VTAM STATUS BYTE 4 * 00161000 * 5 ATCPRTAT BIT(1), /* 1 = TRACE PRINT ACTIVE, 0434 00162000 * 0 = NOT ACTIVE * 00163000 * 5 ATCTPRT BIT(1), /* WHEN 1, TPRINT IN PROCESS * 00164000 * 5 ATCMTST BIT(1), /* WHEN 1, MODIFY TEST IN 0434 00165000 * PROCESS * 00166000 * 5 ATCNCSD BIT(1), /* NCS QUIESCED DURING HALT * 00167000 * 5 ATCRSV04 BIT(4), /* RESERVED * 00168000 * 3 ATCAPI PTR(31), /* ADDR OF API ROUTINE * 00169000 * 3 ATCDCFRR PTR(31), /* POINTER TO FRR OF CONTROL 00170000 * LAYER,INITIALIZED BY OPENDST* 00171000 * 3 ATCRDT PTR(31), /* POINTER TO FIRST RDT * 00172000 * 3 ATCSRT PTR(31), /* POINTER TO SRT DIRECTORY * 00173000 * 3 ATCASCHD PTR(31), /* POINTER TO AP SCHEDULER * 00174000 * 3 ATCECMOD CHAR(4), /* ECB FOR MODIFY COMMAND PROC.* 00175000 * 3 ATCMODQ PTR(31), /* POINTER FOR OUTPUT QUEUE * 00176000 * /* FOR MODIFY COMMAND * 00177000 * 3 ATCECHLT CHAR(4), /* ECB FOR HALT COMMAND * 00178000 * 3 ATCHALTQ PTR(31), /* POINTER TO OUTPUT QUEUE * 00179000 * /* FOR HALT COMMAND * 00180000 * 3 ATCECVRY CHAR(4), /* ECB FOR VARY COMMAND PROC. * 00181000 * 3 ATCVARYQ PTR(31), /* POINTER TO OUTPUT QUEUE * 00182000 * /* FOR VARY COMMAND * 00183000 * 3 ATCECDSP CHAR(4), /* ECB FOR DISPLAY COMMAND * 00184000 * 3 ATCDSPLQ PTR(31), /* POINTER TO OUTPUT QUEUE * 00185000 * /* FOR DISPLAY COMMAND * 00186000 * 3 ATCOCHA PTR(31), /* POINTER TO OCT HEADER * 00187000 * 3 ATCECSES CHAR(4), /* ECB TO HALT SESSION MODE * 00188000 * 3 ATCECVRQ CHAR(4), /* ERP ECB FOR VARY REQ. INFO. * 00189000 * /* REQUEST NOTIFICATION * 00190000 * 3 ATCVPARM PTR(31), /* ADDR OF VARY PARAMETERS * 00191000 * 3 ATCECOPC CHAR(4), /* ECB TOINDICATE OPERATOR * 00192000 * /* CONTROL PROCESSING COMPLETE * 00193000 * 3 ATCECNET CHAR(4), /* ERP ECB FOR NETWORK * 00194000 * /* CONFIGURATION REQUEST * 00195000 * 3 ATCECPRM PTR(31), /* POINTER TO QAB FOR ERP'S * 00196000 * /* ECB PARAMETERS * 00197000 * 3 ATCHLTMS PTR(31), /* POINTER TO HALT COMMAND * 00198000 * /* OR HALT RETURN MESSAGE * 00199000 * 3 ATCFSB PTR(31), /* PTR TO FEEDBACK STATUS * 00200000 * /* BLOCK * 00201000 * 3 ATCFRSCH PTR(31), /* POINTER TO FEEDBACK * 00202000 * /* ROUTINE SCHEDULER * 00203000 * 3 ATCRDTH PTR(31), /* POINTER RDT HEADER * 00204000 * 3 ATCACCTA PTR(31), /* POINTER TO INSTALLATION * 00205000 * /* ACCOUNTING ROUTINE * 00206000 * 3 ATCAUTHA PTR(31), /* POINTER TO INSTALLATION * 00207000 * /* AUTHORISATION ROUTINE * 00208000 * 3 ATCPTCHA PTR(31), /* PTR TO VTAM PATCH AREA * 00209000 * 3 ATCCONFT PTR(31), /* POINTER TO VTAM * 00210000 * /* CONFIGURATION TABLE * 00211000 * 3 ATCFDVT PTR(31), /* PTR TO FIRST DVT FOR O/C * 00212000 * 3 ATCFEPT PTR(31), /* PTR TO FIRST EPT FOR O/C * 00213000 * 3 ATCDVTPT PTR(31), /* ADDR OF LOAD MOD FOR * 00214000 * /* TYPE=VTAM TRACING * 00215000 * 3 ATCBPDA PTR(31), /* PTR TO BUFFER POOL DIRECTORY* 00216000 * 3 ATCADD PTR(31), /* POINTER TO ADD PROCEDURE * 00217000 * 3 ATCREMOV PTR(31), /* POINTER TO REMOVE PROCEDURE * 00218000 * 3 ATCIOTRC PTR(31), /* POINTER TO I/O TRACE * 00219000 * /* PROCEDURE * 00220000 * 4 ATCTHTRC PTR(31), /* ADDR OF TH TRACE ROUTINE * 00221000 * 5 ATCTPBUF PTR(31), /* TPIOS BUFFER TRACE(ISTRARTP)* 00222000 * 3 ATCBFTRC PTR(31), /* PTR TO BUFFER TRACE * 00223000 * /* PROCEDURE * 00224000 * 3 ATCFBRPH PTR(31), /* ADDR OF FEEDBACK PROC RPH * 00225000 * 3 ATCBLDLA PTR(31), /* ADDR OF BLDL ROUTINE * 00226000 * 3 ATCALOAD PTR(31), /* ADDR OF ALOAD ROUTINE * 00227000 * 3 ATCREADA PTR(31), /* ADDR OF SOURCE READ ROUTINE * 00228000 * 3 ATCGTSTR PTR(31), /* ADDR OF GETSTOR ROUTINE * 00229000 * 3 ATCFRSTR PTR(31), /* ADDR OF FREESTOR ROUTINE * 00230000 * 3 ATCSTMA PTR(31), /* ADDR OF SM INITIALIZATION * 00231000 * /* ROUTINE * 00232000 * 3 ATCACDA PTR(31), /* ADDR OF FIRST ACDEB * 00233000 * 3 ATCSMRQ PTR(31), /* ADDR OF REQUEST STORAGE * 00234000 * /* ROUTINE * 00235000 * 3 ATCSMQU PTR(31), /* ADDR OF QUEUE REQUEST RTNE 00236000 * - DOS ONLY * 00237000 * 3 ATCSMRS PTR(31), /* ADDR OF RELEASE STORAGE * 00238000 * /* ROUTINE * 00239000 * 3 ATCSMRC PTR(31), /* ADDR OF RECOVER STORAGE * 00240000 * /* ROUTINE - DOS ONLY * 00241000 * 3 ATCSMBQ PTR(31), /* PTR TO Q'ED REQ. SMS RTN. * 00242000 * 3 ATCFIRA PTR(31), /* ADDR OF FEEDBACK INITIATION * 00243000 * /* RPH * 00244000 * 3 ATCSRTAD PTR(31), /* PTR TO SRTADD ROUTINE * 00245000 * 3 ATCSRTDF PTR(31), /* PTR TO SRTDELE ROUTN * 00246000 * 3 ATCDCC60 PTR(31), /* PTR TO ISTDCC60 - CTL. LAYER 00247000 * MOVE TO USER AREA * 00248000 * 3 ATCDCC61 PTR(31), /* PTR TO ISTDCC61 - CTL. LAYER 00249000 * MOVE FIXED TO PAGABLE * 00250000 */* BEGIN 'ANY' DVT * 00251000 * 3 ATCNERST PTR(31), /* PTR TO ISTDCC00 - REQUEST-ST* 00252000 * 3 ATCNERCV PTR(31), /* PTR TO ISTRCC21-RECEIVE OB * 00253000 * 3 ATCNERNE PTR(31), /* PTR TO ISTDCC25 - READ-ANY * 00254000 * 3 ATCNERFN PTR(31), /* PTR TO ISTDCC02 - REQUEST-FN * 00255000 */* END 'ANY' DVT * 00256000 * 3 ATCAPOST PTR(31), /* PTR TO VTAM POST ROUTINE * 00257000 * 3 ATCVTMID CHAR(2), /* HOST MAJOR NODE I.D. * 00258000 * 3 ATCRSV11 CHAR(2), /* RESERVED * 00259000 * 3 ATCRCC63 PTR(31), /* HSKPANYQ POINTER * 00260000 * 3 ATCRCC26 PTR(31), /* SEND RESPONSE POINTER * 00261000 * 3 ATCRCC65 PTR(31), /* SET RPL POINTER * 00262000 * 3 ATCNESAL PTR(31), /* PTR TO ISTDCC24 - SOLICIT-ALL* 00263000 * 3 ATCNERAP PTR(31), /* PTR TO ISTDCC85 - READ ANY 00264000 * PURGE * 00265000 * 3 ATCACTRM FIXED(15), /* COUNT OF ACTIVE TERMINALS * 00266000 * 3 ATCCIDM BIT(16), /* CID MASK * 00267000 * 3 ATCMSGSP BIT(8), /* RESERVED FOR MESAGE SURPRESSION * 00268000 * 2 ATCMAXID PTR(8), /* MAXIMUM NUMBER OF MAJOR NODES, 0 = 00269000 * NUMBER OF ENTRIES IN THE MNT * 00270000 * 2 ATCRSV16 CHAR(2), /* NOT USED * 00271000 * 2 ATCMNT PTR(31), /*PTR TO MAJOR NODE TABLE -SET BY SYS. 00272000 * DEF. REF. BY ISTSDCCB (CBDEF), 0434 00273000 * ISTSDCCI (CINDEXY) * 00274000 * 2 ATCCDADD PTR(31), /*PTR TO CIDADD ROUTINE ISTSDCCA 0434 00275000 * REF. BY CIDCTL MACRO * 00276000 * 2 ATCCDDEL PTR(31), /*PTR TO CIDDEL ROUTINE ISTSDCCD 0434 00277000 * REF. BY CIDCTL MACRO * 00278000 * 2 ATCCDFND PTR(31), /*PTR TO CIDFND ROUTINE IATSDCCF 0434 00279000 * REF. BY CIDCTL MACRO * 00280000 * 2 ATCESC01 PTR(31), /*PTR TO ESC01 * 00281000 * 2 ATCESC02 PTR(31), /*PTR TO ESC02 * 00282000 * 2 ATCCSMR PTR(31), /* PTR TO CONNECTION SERVICES * 00283000 * /* MASTER ROUTINE * 00284000 * 3 ATCCSMA PTR(31), /* PTR TO CONNECTION SERVICES 0434 00285000 * MASTER ROUTINE * 00286000 * 2 ATCOCRT PTR(31), /* PTR TO OPEN/CLOSE ROUTINE * 00287000 * 2 ATCUEP PTR(31), /* POINTER TO USER EXIT * 00288000 * 2 ATCSHRTN CHAR(8), /* NAME OF VTAM SHARED RTN * 00289000 * /* TO BE LOADED * 00290000 * 2 ATCSHRFG BIT(8), /* ATTRIBUTE FLAGS * 00291000 * 3 ATCLAST BIT(1), /* INDICATE HTIS IS LAST MODULE * 00292000 * 2 ATCXRANG CHAR(1), /* NUMBER OT BITS IN X-VALUE 0434 00293000 * PORTION OF CID * 00294000 * 2 ATCSAF CHAR(2), /* SUB AREA ADDRESS FIELD * 00295000 * 2 ATCEPA PTR(31), /* ENTRY POINT ADDR OF LOADED * 00296000 * 2 ATCALERT PTR(31), /* POINTER TO ALERT-ROUTINE 0434 00297000 * ISTSDCAL * 00298000 * 2 ATCDVLOD PTR(31), /* PTR TO ISTSDCOD * 00299000 * 2 ATCTRCPT PTR(31), /* POINTER TO TRACE PARM LIST * 00300000 * 2 ATCDVT PTR(31), /* POINTER TO FIRST DVT ON CHAIN * 00301000 * 2 ATCEPT PTR(31), /* POINTER TO FIRST EPT ON CHAIN * 00302000 * 2 ATCMSGP PTR(31), /* POINTER TO TPMSG PROCESSOR * 00303000 * 2 ATCMSGM PTR(31), /* POINTER TO TPMSG - MESSAGE 0434 00304000 * CSECT * 00305000 * 2 ATCTRPAB PTR(31), /* ADDRESS OF TRACE WRITER PAB * 00306000 * 2 ATCVTLOD PTR(31), /* ADDR OF VTAM LOAD LIST * 00307000 * 2 ATCECPRT CHAR(4), /* ECB FOR TRACE FILE PRINT * 00308000 * 2 ATCZDVTB PTR(31), /* ADDRESS OF ISTZCFBI * 00309000 * 2 ATCECTLP CHAR(4), /* TOLTEP ECB * 00310000 * 2 ATCRVCHS CHAR(8), /* RESERVED * 00311000 * 2 ATCCRME PTR(31), /* VARY PSS CONTROL MECHANISM * 00312000 * 2 ATCHPGM, /* BUFFER INFORMATION */ 00313000 * 3 ATCHBFNO FIXED(15), /* NUMBER OF BUFFS FOR CHANNEL */ 00314000 * 3 ATCHBSIZ FIXED(15), /* BUFFER SIZE IN BYTES */ 00315000 * 2 ATCDEBCH PTR(31), /* CLOSE DEB CHAIN PTR */ 00316000 * 2 ATCTODVT PTR(31), /* THE TOLTEP DVT PTR POINTED 0434 00317000 * TO BY 3RD WORD OF PAB */ 00318000 * 2 ATCADEL PTR(31), /* A DELETE ROUTINE ADDRESS */ 00319000 * 2 ATCCDPTR PTR(31), /* PTR TO ISTOCCCD - DOS ONLY */ 00320000 * 2 ATCLDNCS PTR(31), /* PTR TO NCSPL FOR LOAD/DUMP */ 00321000 * 2 ATCLDECB BIT(32), /* ECB FOR LOAD/DUMP SUBTASK */ 00322000 * 2 ATCRSV99 CHAR(32), /* RESERVED FOR LATER POINTERS */ 00323000 * 2 ATCAP33 PTR(31), /* PTR TO ISTAPC33 */ 00324000 * 2 ATCAP35 PTR(31), /* PTR TO ISTAPC35 */ 00325000 * 2 ATCAP36 PTR(31), /* PTR TO ISTAPC36 */ 00326000 * 2 ATCDVTLK CHAR(LENGTH(ISTLOK)), /* LOCK WORD FOR DVT LOCK */ 00327000 * 2 ATCCDFIN PTR(31), /* POINTER TO ISTSDCRR */ 00328000 * 2 ATCCDFDN PTR(31), /* POINTER TO ISTSDCCN */ 00329000 * 2 ATCVOCLK CHAR(LENGTH(ISTLOK)), /* VOCLOCK LOCK */ 00330000 * 2 ATCRDTLK CHAR(LENGTH(ISTLOK)), /* RDTLOCK LOCK */ 00331000 * 2 ATCRSV97 PTR(31), /* DWORD ALIGNMENT */ 00332000 * 2 ATCVPAB1 CHAR(LENGTH(ISTDYPAB)) BDY(DWORD), /* PAB FOR VARY 00333000 * UNDER PSS CONTROL */ 00334000 * 2 ATCPGPAB CHAR(LENGTH(ISTDYPAB)) BDY(DWORD), /* ERP PAB FOR 00335000 * PURGE */ 00336000 * 2 ATCDLRPB CHAR(LENGTH(ISTDYPAB)) BDY(DWORD), /* DUMP LOAD & 00337000 * RESTART PAB */ 00338000 * 2 ATCCCLAD PTR(31), /* ADDRESS OF VARY ERP (ISTINCCL)*/ 00339000 * 2 ATCCDLAD PTR(31), /* ADDRESS OF VARY DUMP,LD RSTRT 00340000 * (ISTINCDL) */ 00341000 * 2 ATCOCCOB PTR(31), /* ADDRESS ISTOCCOB */ 00342000 * 2 ATCOCCCB PTR(31), /* ADDRESS ISTOCCCB */ 00343000 * 2 ATCTIPAB CHAR(LENGTH(ISTDYPAB)) BDY(DWORD), /* A PAB 0434 00344000 * FOR ISTOLTP */ 00345000 * 2 ATCTCIPB CHAR(LENGTH(ISTDYPAB)) BDY(DWORD), /* A PAB 0434 00346000 * FOR TOLTEP CLIP */ 00347000 * 2 ATCVTIPB CHAR(LENGTH(ISTDYPAB)) BDY(DWORD), /* A PAB 0434 00348000 * FOR TOLTEP-VTAM INTERFACE*/ 00349000 * 2 ATCTCLOM PTR(31), /* ADDR TOLTEP CLOP PROC */ 00350000 * 2 ATCTCLIM PTR(31), /* ADDR TOLTEP CLIP PROC */ 00351000 * 2 ATCVTINM PTR(31), /* ADDR TOLTEP-VTAM INTF PROC */ 00352000 * 2 ATCTACB PTR(31), /* TOLTEP ACB */ 00353000 * 2 ATCRSV10 CHAR(LENGTH(ISTDYPAB)) BDY(DWORD), /* RESERVED */ 00354000 * 2 ATCPTR00 CHAR(LENGTH(ISTDYPAB)) BDY(DWORD), /* A PAB */ 00355000 * 2 ATCCFEAD PTR(31), /* ADDR OF ISTINCFE */ 00356000 * 2 ATCVLCNT CHAR(4) BDY(HWORD), /* VARY DEVICE ONLINE COUNTS*/ 00357000 * 3 ATCRNCNT PTR(16), /* 370X COUNT */ 00358000 * 3 ATCLCLCT PTR(16), /* 3270 COUNT */ 00359000 * 2 ATCS49XI PTR(31), /* ADDRESS OF ISTPICXI */ 00360000 * 2 ATCS49XL PTR(31), /* ADDRESS OF ISTPICXL */ 00361000 * 2 ATCPODVT PTR(31), /* PTR TO PROGRAM OPERATOR DVT*/ 00362000 * 2 ATCPOIA PTR(31), /* PTR TO PROGRAM OPERATOR */ 00363000 * /* INTERFACE AREA */ 00364000 * 2 ATCSOPD CHAR(8) BDY(WORD), /* SESSION CONTROL */ 00365000 * 3 ATCSEC01 PTR(31), /* OUTBOUND PROCESSING */ 00366000 * 3 ATCSEC10 PTR(31), /* DVT */ 00367000 * 2 ATCSIPD CHAR(12) BDY(WORD),/* SESSION CONTROL */ 00368000 * 3 ATCSEC21 PTR(31), /* INBOUND PROCESSING */ 00369000 * 3 ATCSEC30 PTR(31), /* FEEDBACK */ 00370000 * 3 ATCSEC40 PTR(31), /* DVT */ 00371000 * 2 ATCSECST CHAR(4) BDY(WORD),/* SESSION CONTROLSESS TERM */ 00372000 * 3 ATCSEC51 PTR(31), /* RECOVERY DVT */ 00373000 * 2 ATCNMCTR FIXED(15), /* NAME COUNTER */ 00374000 * 2 * FIXED(15), /* RESERVED */ 00375000 * 2 ATCSRTAB PTR(31), /* SEARCH LOGON MODE TABLE */ 00376000 * /* RTN ADDRESS (ISTINCSH) */ 00377000 * 2 ATCUSSPT PTR(31), /* DEFAULT USS DEFINITION */ 00378000 * /* TABLE ADDRESS (ISTINCDT) */ 00379000 * 2 ATCMODTB PTR(31), /* DEFAULT SYSTEM LOGON MODE */ 00380000 * /* TABLE ADDRESS (ISTINCLM) */ 00381000 * 2 ATCINCW3 PTR(31), /* ADDRESS OF ISTINCW3 */ 00382000 * 2 ATCIOECB PTR(31), /* ECB USED BY IOS - */ 00383000 * /* POINTED TO BY IOBECBPT */ 00384000 * 2 ATCVDPAB CHAR(LENGTH(ISTDYPAB)) BDY(DWORD), 0434 00385000 * /* SSCP COMMAND PROCESSING PAB */ 00386000 * 2 ATCVFPAB CHAR(LENGTH(ISTDYPAB)) BDY(DWORD), 0434 00387000 * /* SSCP FRONT END PAB */ 00388000 * 2 ATCVDLOK CHAR(LENGTH(ISTLOK)), /* SSCP SERIALIZATION LOCK */ 00389000 */* END OF COMMON AREA */ 00390000 */* VS1/VS2 COMMON CODE. */ 00391000 * 2 ATCRSVBB PTR(31), /* RESERVED * 00392000 * 2 ATCAOSM BDY(DWORD), 0434 00393000 */* * 00394000 * 3 ATCSRBRT PTR(31), /* POINTER TO ROUTINE UNDER * 00395000 * /* SRB CONTROL * 00396000 * 3 ATCGSRBQ PTR(31), /* READY QUEUE FOR GLOBAL SRB'S* 00397000 * 4 ATCGSRBG BIT(8), /* READY QUEUE GATE BYTE * 00398000 * 5 ATCGSRBF BIT(1), /* READY QUEUE GATE BIT * 00399000 * 3 ATCPRPH PTR(31), /* PTR TO PREALLOCATED RPH * 00400000 * 3 ATCCMTCB PTR(31), /* PTR TO COMMUNICATIONS TASK * 00401000 * /* TCB * 00402000 * 3 ATCAP11 PTR(31), /* PTR TO ISTAPC11 * 00403000 * 3 ATCAP12 PTR(31), /* PTR TO ISTAPC12 * 00404000 * 3 ATCAP31 PTR(31), /* PTR TO ISTAPC31 * 00405000 * 3 ATCAP32 PTR(31), /* PTR TO ISTAPC32 * 00406000 * 3 ATCAP34 PTR(31), /* PTR TO ISTAPC34 * 00407000 * 3 ATCAP52 PTR(31), /* PTR TO ISTAPC52 * 00408000 * 3 ATCAP53 PTR(31), /* PTR TO ISTAPC53 * 00409000 * 3 ATCAP54 PTR(31), /* PTR TO ISTAPC54 * 00410000 * 3 ATCAP57 PTR(31), /* PTR TO ISTAPC57 * 00411000 * 3 ATCAP58 PTR(31), /* PTR TO ISTAPC58 * 00412000 * 3 ATCAP61 PTR(31), /* PTR TO ISTAPC61 * 00413000 * 3 ATCAP63 PTR(31), /* PTR TO ISTAPC63 * 00414000 * 3 ATCAP64 PTR(31), /* PTR TO ISTAPC64 * 00415000 * 3 ATCZFSVT PTR(31), /* TPIOS FIXED SRVICES VCTR TAB* 00416000 * 3 ATCZPSVT PTR(31), /* TPIOS PAGBL SRVCES VCTR TABL* 00417000 * 3 ATCICNCB PTR(31), /* HEAD OF ICNCB QUEUE * 00418000 * 3 ATCZDVT1 PTR(31), /* TPIOS SLODWN RECOVRY PRCSR * 00419000 * 3 ATCZDVT3 PTR(31), /* 370X FEEDBACK STAT CNTRL RTR* 00420000 * 3 ATCZDVT4 PTR(31), /* OPERATOR MESSAGE SCHEDULER * 00421000 * 3 ATCZDVT6 PTR(31), /* DIALOGUE SCHEDULER (INBOUND)* 00422000 * 3 ATCAP65 PTR(31), /* PTR TO ISTAPC65 */ 00423000 * 3 ATCICAPP CHAR(20) BDY(WORD), /* 3705 APPENDAGE VECTOR * 00424000 * 4 ATCCDRPH PTR(31), /* ADDR CLOSE DEB RPH 0434 00425000 * (DUMMY EOA APP.) */ 00426000 * 4 ATCZSIOA PTR(31), /* ADDR 3705 SIO APPENDAGE */ 00427000 * 4 ATCCDTCB PTR(31), /* VTAM TCB (DUMMY PCI APP.) */ 00428000 * 4 ATCZCEA PTR(31), /* ADDR 3705 CHANNEL END 0434 00429000 * APPENDAGE */ 00430000 * 4 ATCZAEA PTR(31), /* ADDR 3705 CHANNEL END 0434 00431000 * APPENDAGE */ 00432000 * 3 ATCLDAPP CHAR(20) BDY(WORD), /* LOCAL 3270 APPENDAGE 00433000 * VECTOR */ 00434000 * 4 ATCCDTID PTR(31), /* TASK ID OF VTAM 0434 00435000 * (DUMP EOE) */ 00436000 * 4 ATCSMFRR PTR(31), /* ADDR OF SMS FRR 0434 00437000 * (DUMMY SIOA) */ 00438000 * 4 ATCRSV17 PTR(31), /* RESERVED FOR ALIGNMENT */ 00439000 * 4 ATCZLCEA PTR(31), /* ADDR 3270 CHANNEL END 0434 00440000 * APPENDAGE */ 00441000 * 4 ATCZLAEA PTR(31), /* ADDR 3270 CHANNEL END 0434 00442000 * APPENDAGE */ 00443000 * 3 ATCDAPVT CHAR(24) BDY(WORD), /* DUMMY APPENDAGE 0434 00444000 * VECTOR TABLE FOR LOAD/DVMMY*/ 00445000 * 4 ATCDEOEA PTR(31), /* ADDRESS OF DUMMY END 0434 00446000 * OF EXTENT APPENDAGE */ 00447000 * 4 ATCDSIOA PTR(31), /* ADDRESS OF DUMMY END 0434 00448000 * OF SIO APPENDAGE */ 00449000 * 4 ATCDPCIA PTR(31), /* ADDRESS OF DUMMY PCI 0434 00450000 * APPENDAGE */ 00451000 * 4 ATCDCEA PTR(31), /* ADDRESS OF CHANNEL END 0434 00452000 * APPENDAGE */ 00453000 * 4 ATCDXCEA PTR(31), /* ADDRESS OF ABNORMAL 0434 00454000 * END APPENDAGE */ 00455000 * 4 ATCDAPDG CHAR(2), /* DUMMY APPENDAGE */ 00456000 * 4 ATCRSV56 CHAR(2), /* RESERVED */ 00457000 * 3 ATCZDVT7 PTR(31), /* ADDR OF RESET CLEANUP 0434 00458000 * (PHASE 1) * 00459000 * 3 ATCZDVT8 PTR(31), /* 3270 LOCAL TEST AND CTL 0434 00460000 * FEEDBACK ROUTER */ 00461000 * 3 ATCZDVT9 PTR(31), /* ADDRESS OF ISTZDFKA */ 00462000 * 3 ATCZDVTA PTR(31), /* ADDRESS OF ISTZCFIA */ 00463000 * 3 ATCZDVTX PTR(31), /* ADDRESS OF TRUNK LINE 0434 00464000 * DEACTIVATE ROUTINE */ 00465000 * 3 ATCZLPVT PTR(31), /* ADDRESS OF ISTZPSVA */ 00466000 * 3 ATCZLFVT PTR(31), /* TPIOS 3270 LOCAL FIXED 0434 00467000 * SERVICES VECTOR TABLE */ 00468000 * 3 ATCZPAB1 CHAR(LENGTH(ISTDYPAB)) BDY(DWORD), /* PAB FOR 00469000 * TEST AND CTL FEEDBACK ROUTER* 00470000 * 3 ATCZPAB2 CHAR(LENGTH(ISTDYPAB)) BDY(DWORD), /* 370X 0434 00471000 * STATUS AND FEEDBACK ROUTER 00472000 * DYNAMIC PAB */ 00473000 * 3 ATCAP51 PTR(31), /* PTR TO ISTAPC51 */ 00474000 * 3 ATCZDFJ0 PTR(31), /* ADDR OF ISTZDFJ0 */ 00475000 * 3 ATCAP37 PTR(31), /* PTR TO ISTAPC37 */ 00476000 * 3 ATCAP38 PTR(31), /* PTR TO ISTAPC38 */ 00477000 * 3 ATCRPT11 PTR(31), /* RESERVED */ 00478000 * 3 ATCRPT12 PTR(31), /* RESERVED */ 00479000 * 3 ATCRPT13 PTR(31), /* RESERVED */ 00480000 * 3 ATCRPT14 PTR(31), /* RESERVED */ 00481000 * 3 ATCRPT15 PTR(31), /* RESERVED */ 00482000 * 3 ATCRPT16 PTR(31), /* RESERVED */ 00483000 * 3 ATCRPT17 PTR(31), /* RESERVED */ 00484000 * 3 ATCRPT18 PTR(31), /* RESERVED */ 00485000 * 3 ATCRPT19 PTR(31), /* RESERVED */ 00486000 * 3 ATCRPT20 PTR(31), /* RESERVED */ 00487000 * 3 ATCRPT21 PTR(31), /* RESERVED */ 00488000 * 3 ATCRPT22 PTR(31), /* RESERVED */ 00489000 * 3 ATCRPT23 PTR(31), /* RESERVED */ 00490000 * 3 ATCRPT24 PTR(31), /* RESERVED */ 00491000 * 3 ATCRPT25 PTR(31), /* RESERVED */ 00492000 * 3 ATCRPT26 PTR(31), /* RESERVED */ 00493000 * 3 ATCRPT27 PTR(31), /* RESERVED */ 00494000 * 3 ATCRPT28 PTR(31), /* RESERVED */ 00495000 * 3 ATCRPT29 PTR(31), /* RESERVED */ 00496000 * 3 ATCRPT30 PTR(31), /* RESERVED */ 00497000 * 3 ATCRPT31 PTR(31), /* RESERVED */ 00498000 * 3 ATCRPT32 PTR(31), /* RESERVED */ 00499000 * 3 ATCRPT33 PTR(31), /* RESERVED */ 00500000 * 3 ATCRPT34 PTR(31), /* RESERVED */ 00501000 * 3 ATCRPT35 PTR(31), /* RESERVED */ 00502000 * 3 ATCRPT36 PTR(31), /* RESERVED */ 00503000 * 3 ATCRPT37 PTR(31), /* RESERVED */ 00504000 * 3 ATCRPT38 PTR(31), /* RESERVED */ 00505000 * 3 ATCRPT39 PTR(31), /* RESERVED */ 00506000 * 3 ATCRPT40 PTR(31), /* RESERVED */ 00507000 */* END OF VS1/VS2 COMMON CODE. */ 00508000 */* START OF VS2 UNIQUE CODE. */ 00509000 * 3 ATCVTFLG BIT(32), 0434 00510000 * 4 ATCVTACT BIT(1), /* VTT ACTIVE */ 00511000 * 4 * BIT(31), /* RESERVED */ 00512000 * 3 ATCHLTCB PTR(31), /* ECB FOR HALTING VTAM */ 00513000 * 3 ATCATA10 PTR(31), /* PTR TO ISTATM10 */ 00514000 * 3 ATCZLAAB PTR(31), /* PTR TO ISTZLFAB */ 00515000 * 3 ATCCACXA PTR(31), /* PTR TO ISTCFCXA */ 00516000 * 3 ATCSMARA PTR(31), /* PTR TO ISTORFRA */ 00517000 * 3 ATCSMAID PTR(31), /* PTR TO ISTORFID */ 00518000 * 3 ATCTPWQA PTR(31), /* WAIT Q ANCHOR FOR TPIOS */ 00519000 * 3 ATCSMAPR PTR(31), /* PTR TO ISTORFPR */ 00520000 * 3 ATCSMABF PTR(31), /* PTR TO ISTORFBF */ 00521000 * 3 ATCPSTA PTR(31), /* ACTIVE PST QUEUE */ 00522000 * 3 ATCTRMBP CHAR(LENGTH(ISTDYPAB)) BDY(DWORD), 0434 00523000 * /* PAB FOR VTAM TERM TASK */ 00524000 * 3 ATCTPSPB CHAR(LENGTH(ISTDYPAB)) BDY(DWORD), 0434 00525000 * /* PAB FOR TPIOS */ 00526000 * 3 ATCAP23 PTR(31), /* PTR TO ISTAPC23 */ 00527000 * 3 ATCAPC25 PTR(31), /* PTR TO ISTAPC25 */ 00528000 * 3 ATCAP41 PTR(31), /* PTR TO ISTAPC41 */ 00529000 * 3 ATCRCFY0 PTR(31), /* PTR TO ISTRCFY0 */ 00530000 * 3 ATCAP55 PTR(31), /* PTR TO ISTAPC55 */ 00531000 * 3 ATCAP56 PTR(31), /* PTR TO ISTAPC56 */ 00532000 * 3 ATCAPC59 PTR(31), /* PTR TO ISTAPC59 */ 00533000 * 3 ATCAP62 PTR(31), /* PTR TO ISTAPC62 */ 00534000 * 3 ATCAP66 PTR(31), /* PTR TO ISTAPC66 */ 00535000 * 3 ATCAP69 PTR(31), /* PTR TO ISTAPM69 */ 00536000 * 3 ATCAP82 PTR(31), /* PTR TO ISTAPC82 */ 00537000 * 3 ATCAP83 PTR(31), /* PTR TO ISTAPC83 */ 00538000 * 3 ATCAP84 PTR(31), /* PTR TO ISTAPC84 */ 00539000 * 3 ATCAP85 PTR(31), /* PTR TO ISTAPC85 */ 00540000 * 3 ATCAP86 PTR(31), /* PTR TO ISTAPC86 */ 00541000 * 3 ATCASCB PTR(31), /* PTR TO VTAM ASCB */ 00542000 * 3 ATCMPLTA PTR(31), /* PTR TO MPST LIST TABLE */ 00543000 * 3 ATCZR01 PTR(31), /* PTR TO ISTZRM01 */ 00544000 * 3 ATCAICTN PTR(31), /* PTR TO ISTAICTN */ 00545000 * 3 ATCTPCP0 PTR(31), /* PTR TO ISTZFSAV */ 00546000 * 3 ATCTPCP1 PTR(31), /* PTR TO ISTZ19SV */ 00547000 * 3 ATCZFLAG BIT(8), /* FLAG BYTE */ 00548000 * 4 ATCZF001 BIT(1), /* MDR RECORDING SUSPENDED */ 00549000 * 4 ATCRSV66 BIT(7), /* RESERVED */ 00550000 * 3 ATCRSV75 BIT(8), /* RESERVED */ 00551000 * 3 ATCSRBCT FIXED(16), /* COUNT OF PREALLOCATED SRB'S*/ 00552000 * 3 ATCCRACT FIXED(16), /* COUNT OF PREALLOCATED CRA'S*/ 00553000 * 3 ATCRPLCT FIXED(16), /* COUNT OF PREALLOCATED CRPL */ 00554000 * 3 ATCTPMPB CHAR(LENGTH(ISTDYPAB)) BDY(DWORD), /*TP MSG PAB 00555000 * FOR VS2 */ 00556000 * 3 ATCTPMMI PTR(31), /* PTR TO ISTCFMMI - MSG ISSUER 00557000 * FOR SRB MODE ROUTINES */ 00558000 * 3 ATCVIOPM PTR(31), /* PTR TO ISTVIOPM */ 00559000 * 2 ATCAOS CHAR(0) BDY(WORD); /* VS2 ONLY FIELDS */ 00560000 */* END OF ATBUILD */ 0435 00561000 * 0435 00562000 * DO; /* LISATCVT CVTBASE(PAGEABLE,(GPR15P)) */ 0435 00563000 * GPR15P = ATCLCPTR; /*SET UP ATCVT POINTER*/ 0436 00564000 L GPR15P,ATCLCPTR 0436 00565000 * END; /*LISATCVT*/ 0437 00566000 * RESPECIFY GPR00F RSTD; 0438 00567000 * GPR00F=4; /* SET PARAMETER REGISTER TO 4 */ 0439 00568000 LA GPR00F,4 0439 00569000 * GPR15P=GPR15P->ATCAP31; 0440 00570000 L GPR15P,ATCAP31(,GPR15P) 0440 00571000 * DCL FMZL0016 BASED(GPR15P) LABEL VALUERANGE(*); 0441 00572000 * CALL FMZL0016; 0442 00573000 BALR @14,@15 0442 00574000 * RESPECIFY (GPR00F,GPR15P) UNRSTD; 0443 00575000 * END; /***** END OF TPEXIT *****/ 0444 00576000 * 0444 00577000 */* TPEPILOG */ 0445 00578000 * GEN (PRINT OFF); 0445 00579000 * 0445 00580000 * 0445 00581000 PRINT OFF 00582000 * DECLARE 0446 00583000 * EMCR0 PTR REG(0), 0446 00584000 * EMCR1 PTR REG(1), 0446 00585000 * EMCR2 PTR REG(2), 0446 00586000 * EMCR3 PTR REG(3), 0446 00587000 * EMCR4 PTR REG(4), 0446 00588000 * EMCR5 PTR REG(5), 0446 00589000 * EMCR6 PTR REG(6), 0446 00590000 * EMCR7 PTR REG(7), 0446 00591000 * EMCR8 PTR REG(8), 0446 00592000 * EMCR9 PTR REG(9), 0446 00593000 * EMCR10 PTR REG(10), 0446 00594000 * EMCR11 PTR REG(11), 0446 00595000 * EMCR12 PTR REG(12), 0446 00596000 * EMCR13 PTR REG(13), 0446 00597000 * EMCR14 PTR REG(14), 0446 00598000 * EMCR15 PTR REG(15); 0446 00599000 * GEN (PRINT ON); 0447 00600000 PRINT ON 00601000 */* END OF TPEPILOG */ / 00602000 *@DL31HHG*/ 0448 00603000 *END ISTNMCCF 0448 00604000 */* THE FOLLOWING INCLUDE STATEMENTS WERE FOUND IN THIS PROGRAM. * 00605000 */*%INCLUDE SYSLIB (CVT ) * 00606000 *; 0448 00607000 @EL00001 DS 0H 0448 00608000 @EF00001 DS 0H 0448 00609000 @ER00001 BR @14 0448 00610000 @DATA DS 0H 00611000 @DATD DSECT 00612000 DS 0F 00613000 ISTNMCCF CSECT 00614000 DS 0F 00615000 @DATD DSECT 00616000 DS 0D 00617000 CVTPTR DS A 00618000 FMCBPTR DS A 00619000 DNCBPTR DS A 00620000 LCPBPTR DS A 00621000 ORG *+1-(*-@DATD)/(*-@DATD) INSURE DSECT DATA 00622000 @ENDDATD EQU * 00623000 ISTNMCCF CSECT 00624000 DS 0F 00625000 @SIZDATD DC AL1(0) 00626000 DC AL3(@ENDDATD-@DATD) 00627000 DS 0D 00628000 CMZAA007 DC CL4'852I' 00629000 CMZZO007 DC F'0' 00630000 @00 EQU 00 EQUATES FOR REGISTERS 0-15 00631000 @01 EQU 01 00632000 @02 EQU 02 00633000 @03 EQU 03 00634000 @04 EQU 04 00635000 @05 EQU 05 00636000 @06 EQU 06 00637000 @07 EQU 07 00638000 @08 EQU 08 00639000 @09 EQU 09 00640000 @10 EQU 10 00641000 @11 EQU 11 00642000 @12 EQU 12 00643000 @13 EQU 13 00644000 @14 EQU 14 00645000 @15 EQU 15 00646000 RPHPTR EQU @01 00647000 RPHSVPTR EQU @09 00648000 CCFSVPTR EQU @13 00649000 MYCRAPTR EQU @08 00650000 CMZK0005 EQU @01 00651000 REG1007 EQU @01 00652000 EMCR13 EQU @13 00653000 REG15007 EQU @15 00654000 GPR00F EQU @00 00655000 GPR15P EQU @15 00656000 EMCR0 EQU @00 00657000 EMCR1 EQU @01 00658000 EMCR10 EQU @10 00659000 EMCR11 EQU @11 00660000 EMCR12 EQU @12 00661000 EMCR14 EQU @14 00662000 EMCR15 EQU @15 00663000 EMCR2 EQU @02 00664000 EMCR3 EQU @03 00665000 EMCR4 EQU @04 00666000 EMCR5 EQU @05 00667000 EMCR6 EQU @06 00668000 EMCR7 EQU @07 00669000 EMCR8 EQU @08 00670000 EMCR9 EQU @09 00671000 GPR00P EQU @00 00672000 GPR15F EQU @15 00673000 ATCLCPTR EQU 1032 00674000 CVTMAP EQU 0 00675000 CVTDAR EQU CVTMAP+72 00676000 CVTFLGS1 EQU CVTDAR 00677000 CVTDCB EQU CVTMAP+116 00678000 CVTIERLC EQU CVTMAP+144 00679000 CVTOPTA EQU CVTMAP+182 00680000 CVTOPTB EQU CVTMAP+183 00681000 CVTGTF EQU CVTMAP+236 00682000 CVTGTFST EQU CVTGTF 00683000 CVTGTFS EQU CVTGTFST 00684000 CVTSTATE EQU CVTGTFST 00685000 CVTTMODE EQU CVTGTFST 00686000 CVTFORM EQU CVTGTFST 00687000 CVTAQAVT EQU CVTMAP+240 00688000 CVTTCMFG EQU CVTAQAVT 00689000 CVTVOLM2 EQU CVTMAP+244 00690000 CVTTATA EQU CVTVOLM2 00691000 CVTTSKS EQU CVTTATA 00692000 CVTVOLF2 EQU CVTTSKS 00693000 CVTTAT EQU CVTTATA+1 00694000 CVTATER EQU CVTMAP+248 00695000 CVTEXT1 EQU CVTMAP+252 00696000 CVTPURG EQU CVTMAP+260 00697000 CVTQMSG EQU CVTMAP+268 00698000 CVTDMSR EQU CVTMAP+272 00699000 CVTERPV EQU CVTMAP+316 00700000 CVTINTLA EQU CVTMAP+320 00701000 CVTAPF EQU CVTMAP+324 00702000 CVTEXT2 EQU CVTMAP+328 00703000 CVTHJES EQU CVTMAP+332 00704000 CVTPGSIA EQU CVTMAP+348 00705000 CVTA1F1 EQU CVTMAP+356 00706000 CVTSYSK EQU CVTMAP+357 00707000 CVTVOLM1 EQU CVTMAP+380 00708000 CVTVOLF1 EQU CVTVOLM1 00709000 CVTATMCT EQU CVTMAP+388 00710000 CVTXTNT1 EQU 0 00711000 CVTXTNT2 EQU 0 00712000 CVTDSSV EQU CVTXTNT2 00713000 CVTFLGBT EQU CVTXTNT2+5 00714000 CVTQID EQU CVTXTNT2+24 00715000 CVTSHS EQU CVTXTNT2+40 00716000 CVTRV400 EQU CVTXTNT2+52 00717000 CVTRV409 EQU CVTXTNT2+53 00718000 CVTATCVT EQU CVTXTNT2+64 00719000 CVTRV429 EQU CVTXTNT2+84 00720000 CVTRV438 EQU CVTXTNT2+85 00721000 CVTRV457 EQU CVTXTNT2+112 00722000 CVTRV466 EQU CVTXTNT2+113 00723000 CVTFIX EQU 0 00724000 CVTRELNO EQU CVTFIX+252 00725000 ISTRPH EQU 0 00726000 RPHFLAGS EQU ISTRPH+2 00727000 RPHAPTYP EQU RPHFLAGS 00728000 RPHFSTLC EQU RPHFLAGS 00729000 RPHFLGB EQU ISTRPH+3 00730000 RPHRPHA EQU ISTRPH+4 00731000 RPHTSKID EQU ISTRPH+8 00732000 RPHRESMA EQU ISTRPH+16 00733000 RPHWPFLG EQU RPHRESMA 00734000 RPHMAJCB EQU ISTRPH+21 00735000 RPHWEA EQU ISTRPH+24 00736000 RPHCSPA EQU RPHWEA 00737000 RPHSRPRM EQU ISTRPH+28 00738000 RPHCRR EQU ISTRPH+32 00739000 RPHPABQA EQU ISTRPH+36 00740000 RPHWORK EQU ISTRPH+40 00741000 RPHSAVE1 EQU RPHWORK 00742000 RPHSBITS EQU RPHSAVE1+1 00743000 ISTPAB EQU 0 00744000 PABWQCHN EQU ISTPAB 00745000 PABWEQA EQU PABWQCHN 00746000 PABCHAIN EQU PABWQCHN+4 00747000 PABRPHFG EQU ISTPAB+12 00748000 PABFLAGS EQU PABRPHFG 00749000 PABERLCK EQU PABFLAGS 00750000 PABERRLK EQU PABERLCK 00751000 ISTLOK EQU 0 00752000 LOKCHN EQU ISTLOK+1 00753000 LOKCHNG EQU LOKCHN 00754000 @NM00007 EQU LOKCHNG+2 00755000 ISTDEVCH EQU 0 00756000 DEVSHCH EQU ISTDEVCH 00757000 DEVCHAR EQU DEVSHCH 00758000 DEVTCODE EQU ISTDEVCH+1 00759000 DEVFLAGS EQU ISTDEVCH+3 00760000 DEVFCCTL EQU DEVFLAGS 00761000 DEVCHAR3 EQU DEVFLAGS 00762000 ISTPROCD EQU 0 00763000 PROPROC EQU ISTPROCD 00764000 PROPROC1 EQU PROPROC 00765000 PROPROC2 EQU PROPROC+1 00766000 PROPROC3 EQU PROPROC+2 00767000 PROPROC4 EQU PROPROC+3 00768000 PROPROCS EQU 0 00769000 PROSETMS EQU PROPROCS+1 00770000 PROSETM2 EQU PROSETMS 00771000 PROSETM3 EQU PROSETMS+1 00772000 PROSETM4 EQU PROSETMS+2 00773000 ISTFMCB EQU 0 00774000 FMCDNCBA EQU ISTFMCB+16 00775000 FMCSTAT EQU ISTFMCB+28 00776000 FMCSTAT1 EQU ISTFMCB+29 00777000 FMCCMDFL EQU ISTFMCB+31 00778000 FMCCMPS1 EQU ISTFMCB+36 00779000 FMCSIPA EQU ISTFMCB+148 00780000 FMCNXOSQ EQU ISTFMCB+152 00781000 FMCNXCFM EQU FMCNXOSQ 00782000 FMCNXOSC EQU FMCNXOSQ+2 00783000 FMCSSTAT EQU ISTFMCB+159 00784000 FMCPACE EQU ISTFMCB+160 00785000 FMCPACEN EQU FMCPACE 00786000 FMCPACEM EQU FMCPACE+1 00787000 FMCPACPC EQU FMCPACE+2 00788000 FMCCVAL EQU FMCPACE+3 00789000 FMCOBCE EQU FMCCVAL 00790000 FMCCLEXT EQU ISTFMCB+164 00791000 FMCRPLA EQU FMCCLEXT 00792000 FMCFBA EQU FMCCLEXT+4 00793000 FMCCMPS2 EQU FMCCLEXT+16 00794000 FMCFLGA EQU FMCCMPS2 00795000 FMCFLGCL EQU FMCCMPS2+1 00796000 FMCPSCMD EQU FMCCMPS2+2 00797000 FMCPSTAT EQU FMCCMPS2+3 00798000 FMCSTAT2 EQU ISTFMCB+186 00799000 FMCMODEB EQU ISTFMCB+189 00800000 FMCCLSEQ EQU ISTFMCB+190 00801000 FMCRRESP EQU ISTFMCB+195 00802000 FMCSSEGQ EQU ISTFMCB+200 00803000 FMCFBAS EQU ISTFMCB+216 00804000 FMCZV002 EQU FMCFBAS 00805000 FMCSNCTL EQU ISTFMCB+224 00806000 FMCSCFLG EQU FMCSNCTL 00807000 FMCVS1 EQU ISTFMCB+232 00808000 FMCZFLAG EQU FMCVS1 00809000 FMCZF006 EQU FMCZFLAG 00810000 FMCLBXM EQU FMCVS1+12 00811000 FMCSHEAQ EQU FMCLBXM 00812000 FMCLCPBQ EQU FMCVS1+16 00813000 FMCLCPAQ EQU FMCVS1+20 00814000 FMCSEQ1 EQU FMCVS1+34 00815000 FMCZFLG2 EQU FMCVS1+35 00816000 FMCCVFLG EQU FMCVS1+44 00817000 FMCFLAG EQU 0 00818000 FMCFLGB EQU FMCFLAG 00819000 ISTNCB EQU 0 00820000 NCBRDTE EQU ISTNCB+4 00821000 NCBFLAGS EQU ISTNCB+24 00822000 NCBFRAS EQU NCBFLAGS+1 00823000 NCBFTRIO EQU NCBFRAS 00824000 NCBFLAG1 EQU NCBFLAGS+2 00825000 ISTDNCB EQU 0 00826000 DNCOS EQU ISTDNCB+56 00827000 DNCZFLGS EQU DNCOS 00828000 DNCBSCED EQU DNCOS+2 00829000 ISTHCNCB EQU 0 00830000 ISTRPRE EQU 0 00831000 RPRNAME EQU ISTRPRE 00832000 RPRCOMID EQU ISTRPRE+8 00833000 RPRFLAGA EQU ISTRPRE+21 00834000 RPRFLAGB EQU ISTRPRE+22 00835000 RPRCAUSE EQU ISTRPRE+23 00836000 RPRFLAGD EQU ISTRPRE+61 00837000 RPRFLAGC EQU ISTRPRE+62 00838000 ISTRCPRE EQU 0 00839000 RCPPMODE EQU ISTRCPRE+91 00840000 RCPLGNIN EQU ISTRCPRE+92 00841000 ISTRDT EQU 0 00842000 RDTPLEN EQU ISTRDT+72 00843000 RDTPRIOR EQU RDTPLEN 00844000 RDTFLAGB EQU ISTRDT+91 00845000 RDTVYRPH EQU ISTRDT+108 00846000 RDTSTCNT EQU ISTRDT+112 00847000 ISTRAP EQU 0 00848000 RAPFLG EQU ISTRAP+108 00849000 RAPFLGB EQU ISTRAP+109 00850000 RAPFLGC EQU ISTRAP+110 00851000 ISTRLC EQU 0 00852000 RLCADR EQU ISTRLC+72 00853000 RLCFLAG EQU RLCADR 00854000 ISTRRN EQU 0 00855000 RRNADR EQU ISTRRN+136 00856000 RRNFLAG EQU RRNADR 00857000 RRNUCBAD EQU RRNADR+1 00858000 RRNRDF EQU ISTRRN+172 00859000 RRNRDFA EQU RRNRDF 00860000 RRNRDFB EQU RRNRDF+1 00861000 RRNCMF EQU ISTRRN+176 00862000 RRNCMFA EQU RRNCMF 00863000 RRNCMFB EQU RRNCMF+1 00864000 RRNCMFC EQU RRNCMF+2 00865000 RRNCMFD EQU RRNCMF+3 00866000 RRNNMDPD EQU ISTRRN+192 00867000 RRNHPRE EQU ISTRRN+216 00868000 ISTRGP EQU 0 00869000 RGPFLG EQU ISTRGP+72 00870000 ISTRLN EQU 0 00871000 RLNADR EQU ISTRLN+72 00872000 RLNFLAG EQU RLNADR 00873000 RLNUCBAD EQU RLNADR+1 00874000 RLNSTAT1 EQU ISTRLN+86 00875000 RLNSTAT2 EQU ISTRLN+87 00876000 RLNRDF EQU ISTRLN+88 00877000 RLNRDFA EQU RLNRDF 00878000 RLNRACNT EQU RLNRDFA 00879000 RLNRDFB EQU RLNRDF+1 00880000 RLNCRFLG EQU ISTRLN+102 00881000 RLNLSCMD EQU RLNCRFLG 00882000 ISTRPT EQU 0 00883000 RPTLNCID EQU ISTRPT+116 00884000 RPTDITT EQU ISTRPT+128 00885000 RPTFLAG1 EQU ISTRPT+140 00886000 ISTRCL EQU 0 00887000 RCLADR EQU ISTRCL+72 00888000 RCLFLAG EQU RCLADR 00889000 ISTRTR EQU 0 00890000 RTRADR EQU ISTRTR+124 00891000 RTRFLAG EQU RTRADR 00892000 RTRRDFA EQU ISTRTR+136 00893000 RTRRAALL EQU RTRRDFA 00894000 RTRRDFB EQU ISTRTR+137 00895000 RTRRDFC EQU ISTRTR+138 00896000 RTRRDFD EQU ISTRTR+139 00897000 RTRRDFE EQU ISTRTR+140 00898000 RTRRDFF EQU ISTRTR+141 00899000 RTRCRFLG EQU ISTRTR+143 00900000 RTRLSCMD EQU RTRCRFLG 00901000 RTRBSCID EQU ISTRTR+188 00902000 ISTRIN EQU 0 00903000 RINDFD EQU ISTRIN+124 00904000 RINREMPO EQU RINDFD 00905000 RINNODEF EQU RINDFD 00906000 RINLDISC EQU RINDFD 00907000 RINNODID EQU ISTRIN+125 00908000 RINRLDAF EQU ISTRIN+126 00909000 RINREMOT EQU ISTRIN+128 00910000 RINVPAB EQU ISTRIN+132 00911000 RINRPHCN EQU ISTRIN+136 00912000 RINNCSPL EQU ISTRIN+140 00913000 RINCNCNT EQU ISTRIN+144 00914000 ISTRDS EQU 0 00915000 ISTDOT EQU 0 00916000 ISTRCC EQU 0 00917000 RCCFLAG EQU ISTRCC+73 00918000 RCCFLAGB EQU ISTRCC+74 00919000 RCCSTAID EQU ISTRCC+78 00920000 RCCID48 EQU RCCSTAID+2 00921000 RCCCRFLG EQU ISTRCC+108 00922000 ISTRLU EQU 0 00923000 RLUFLAG EQU ISTRLU+125 00924000 RLUCRFLG EQU ISTRLU+126 00925000 RLUPACE EQU ISTRLU+132 00926000 RLUNCPPC EQU ISTRLU+134 00927000 RLUUSSTB EQU ISTRLU+140 00928000 RLUMODET EQU ISTRLU+152 00929000 ISTRPX EQU 0 00930000 ISTRLX EQU 0 00931000 RLXFLAGA EQU ISTRLX+76 00932000 ISTRSW EQU 0 00933000 ISTRDA EQU 0 00934000 RDAADR EQU ISTRDA+72 00935000 RDAFLAG EQU RDAADR 00936000 RDAUCBAD EQU RDAADR+1 00937000 ISTRLS EQU 0 00938000 ISTDNT EQU 0 00939000 ISTGNT EQU 0 00940000 ISTPAT EQU 0 00941000 PATFLAGA EQU ISTPAT+7 00942000 ISTPFCRR EQU 0 00943000 PFCCRR EQU ISTPFCRR 00944000 PFCCRRID EQU PFCCRR 00945000 PFCCRRLN EQU PFCCRR+2 00946000 PFCHDR EQU ISTPFCRR+4 00947000 PFCCRRO EQU PFCHDR 00948000 PFCFRRO EQU PFCHDR+4 00949000 ISTDCCRR EQU 0 00950000 CRRSPACE EQU ISTDCCRR+12 00951000 CRRSAREA EQU 0 00952000 CRRMAS EQU CRRSAREA+148 00953000 CRRMAS1 EQU CRRMAS 00954000 CRRMAS2 EQU CRRMAS+1 00955000 CRRMAS3 EQU CRRMAS+2 00956000 CRRMAS4 EQU CRRMAS+3 00957000 CRRRMAS1 EQU CRRMAS+4 00958000 CRRRMAS2 EQU CRRMAS+5 00959000 CRRRMAS3 EQU CRRMAS+6 00960000 CRRSMAS EQU CRRRMAS3 00961000 CRRATS EQU CRRSAREA+156 00962000 CRRATS1 EQU CRRATS 00963000 CRRATS2 EQU CRRATS+1 00964000 CRRATS3 EQU CRRATS+2 00965000 CRRATS4 EQU CRRATS+3 00966000 CRRRATS1 EQU CRRATS+4 00967000 CRRRATS2 EQU CRRATS+5 00968000 CRRRATS3 EQU CRRATS+6 00969000 CRRSATS EQU CRRRATS3 00970000 CRRFLGS1 EQU CRRSAREA+164 00971000 CRRFLGS2 EQU CRRSAREA+165 00972000 CRRFLGS3 EQU CRRSAREA+166 00973000 CRRFLGS4 EQU CRRSAREA+167 00974000 CRRFLGS EQU CRRSAREA+168 00975000 CRRRFLG1 EQU CRRSAREA+169 00976000 CRRRTYPE EQU CRRRFLG1 00977000 CRRFDBK1 EQU CRRSAREA+170 00978000 CRRFDB2 EQU CRRFDBK1+1 00979000 CRRFDB3 EQU CRRFDBK1+2 00980000 CRRFDBK2 EQU CRRSAREA+176 00981000 CRRDSB EQU CRRFDBK2 00982000 CRRESR EQU CRRFDBK2+2 00983000 CRRTRBUF EQU CRRSAREA+204 00984000 CRRBFLGS EQU CRRSAREA+280 00985000 ISTCSCRR EQU 0 00986000 CSCAUDIT EQU ISTCSCRR+16 00987000 CSCNTRD EQU CSCAUDIT 00988000 NNMCCF EQU CSCNTRD 00989000 CSCCRT EQU CSCAUDIT+2 00990000 CNMCCF EQU CSCCRT 00991000 CSCREGSV EQU ISTCSCRR+20 00992000 CSCPLIST EQU ISTCSCRR+92 00993000 ISTLCCW EQU 0 00994000 LCCWOP EQU ISTLCCW 00995000 LCCWRWOP EQU LCCWOP 00996000 LCCWCTL EQU LCCWRWOP 00997000 LCCWFLAG EQU ISTLCCW+1 00998000 LCCWLSI EQU LCCWFLAG 00999000 ISTLCPB EQU 0 01000000 LCPREQTG EQU ISTLCPB+2 01001000 LCPFLAGS EQU LCPREQTG 01002000 LCPZF001 EQU LCPFLAGS 01003000 LCPZRT02 EQU LCPZF001 01004000 LCPZF002 EQU LCPFLAGS 01005000 LCPZRT03 EQU LCPZF002 01006000 LCPZF003 EQU LCPFLAGS 01007000 LCPZRT04 EQU LCPZF003 01008000 LCPZF004 EQU LCPFLAGS 01009000 LCPZRT05 EQU LCPZF004 01010000 LCPZRT06 EQU LCPFLAGS 01011000 LCPZRT07 EQU LCPFLAGS 01012000 LCPMNRCD EQU LCPREQTG+1 01013000 LCPZRT08 EQU LCPMNRCD 01014000 LCPZRT09 EQU LCPMNRCD 01015000 LCPCHAIN EQU ISTLCPB+4 01016000 LCPCHAI1 EQU LCPCHAIN 01017000 LCPRUCNT EQU ISTLCPB+8 01018000 LCPFLAG2 EQU ISTLCPB+9 01019000 LCPTLBPI EQU LCPFLAG2 01020000 LCPFID0 EQU LCPFLAG2 01021000 LCPSEQ EQU ISTLCPB+10 01022000 LCPCID EQU ISTLCPB+16 01023000 LCPFDBA EQU ISTLCPB+24 01024000 LCPFLG1 EQU ISTLCPB+37 01025000 LCPFLCCW EQU ISTLCPB+40 01026000 LCPLCCW EQU ISTLCPB+48 01027000 LCPPABA EQU LCPLCCW+4 01028000 LCPRPHA EQU LCPPABA 01029000 ISTZSAVE EQU 0 01030000 ZSAZSVBC EQU ISTZSAVE 01031000 ZSAZSVMS EQU ZSAZSVBC 01032000 ISTCFCRR EQU 0 01033000 CFCAUDIT EQU ISTCFCRR 01034000 CFCNTRD EQU CFCAUDIT 01035000 CFCCRT EQU CFCAUDIT+1 01036000 ISTZCRR EQU 0 01037000 ZCRCRR EQU ISTZCRR 01038000 ZCRFLGS1 EQU ISTZCRR+12 01039000 ZCRFLGS2 EQU ISTZCRR+13 01040000 ZCRSWFLD EQU ISTZCRR+14 01041000 ZCRENDSH EQU ZCRSWFLD 01042000 ZCRNDLCP EQU ZCRSWFLD 01043000 ZCRRESET EQU ZCRSWFLD 01044000 ZCRFLGS3 EQU ISTZCRR+15 01045000 ZCRGENSW EQU ISTZCRR+16 01046000 ZCRPFLGS EQU ISTZCRR+17 01047000 ZCRIBPR EQU ISTZCRR+18 01048000 ZCRSCPSW EQU ISTZCRR+19 01049000 ZCRPARMS EQU ISTZCRR+24 01050000 ZCRFBPTR EQU ZCRPARMS 01051000 ZCRDFRDA EQU ZCRPARMS+10 01052000 ZCRPCOD1 EQU ZCRPARMS+12 01053000 ZCRPLSBF EQU ZCRPCOD1 01054000 ZCRPCOD2 EQU ZCRPARMS+13 01055000 ZCRSVRTN EQU ISTZCRR+56 01056000 ZCRWKARA EQU ISTZCRR+156 01057000 ZCRCIDSV EQU ISTZCRR+192 01058000 ZCRAUDIT EQU ISTZCRR+440 01059000 ZCRENTER EQU ZCRAUDIT+5 01060000 ZCRLCPB EQU ISTZCRR+480 01061000 ZCRRHRU EQU ZCRLCPB 01062000 ISTASCRR EQU 0 01063000 ASCFLAGS EQU ISTASCRR+16 01064000 ASCFLG1 EQU ASCFLAGS 01065000 ASCFLG2 EQU ASCFLAGS+2 01066000 ASCFLG3 EQU ASCFLAGS+4 01067000 ASCUSRGS EQU ISTASCRR+28 01068000 ISTAPCRR EQU 0 01069000 APCATFLG EQU ISTAPCRR+16 01070000 APCRFLG EQU ISTAPCRR+18 01071000 APCSAVE EQU ISTAPCRR+44 01072000 APCCOMF EQU ISTAPCRR+116 01073000 APCCOMF1 EQU APCCOMF 01074000 APC31FLG EQU ISTAPCRR+132 01075000 APC52FLG EQU ISTAPCRR+133 01076000 APC53FLG EQU ISTAPCRR+134 01077000 APC54FLG EQU ISTAPCRR+135 01078000 APC57FLG EQU ISTAPCRR+136 01079000 ISTCRA EQU 0 01080000 CRABASIC EQU ISTCRA 01081000 CRAHDR EQU CRABASIC 01082000 CRACRR EQU CRAHDR 01083000 CRALKACT EQU CRABASIC+8 01084000 CRAPROCR EQU ISTCRA+312 01085000 CRASVC EQU ISTCRA+848 01086000 CRABUFA EQU CRASVC+68 01087000 @NM00045 EQU 0 01088000 CMZID007 EQU @NM00045 01089000 @NM00046 EQU @NM00045+4 01090000 CMZRL007 EQU @NM00046 01091000 CMZRA007 EQU @NM00046+1 01092000 CMZEA007 EQU @NM00045+8 01093000 CMZVP007 EQU @NM00045+12 01094000 CMZSA007 EQU 0 01095000 ISTDYPAB EQU 0 01096000 ISTATCVT EQU 0 01097000 ATCCOM EQU ISTATCVT 01098000 ATCSTAT EQU ATCCOM 01099000 ATCSTAT1 EQU ATCSTAT 01100000 ATCSTFLG EQU ATCSTAT+1 01101000 ATCPOFLG EQU ATCSTAT+2 01102000 ATCSTAT4 EQU ATCSTAT+3 01103000 ATCIOTRC EQU ATCCOM+140 01104000 ATCTHTRC EQU ATCIOTRC 01105000 ATCCSMR EQU ISTATCVT+296 01106000 ATCSHRFG EQU ISTATCVT+316 01107000 ATCMSGP EQU ISTATCVT+344 01108000 ATCHPGM EQU ISTATCVT+384 01109000 ATCVLCNT EQU ISTATCVT+772 01110000 ATCSOPD EQU ISTATCVT+792 01111000 ATCSIPD EQU ISTATCVT+800 01112000 ATCSECST EQU ISTATCVT+812 01113000 ATCAOSM EQU ISTATCVT+912 01114000 ATCGSRBQ EQU ATCAOSM+4 01115000 ATCGSRBG EQU ATCGSRBQ 01116000 ATCAP31 EQU ATCAOSM+24 01117000 ATCICAPP EQU ATCAOSM+100 01118000 ATCLDAPP EQU ATCAOSM+120 01119000 ATCDAPVT EQU ATCAOSM+140 01120000 ATCVTFLG EQU ATCAOSM+392 01121000 ATCZFLAG EQU ATCAOSM+588 01122000 CMTA007 EQU 0 01123000 FMZL0016 EQU 0 01124000 CVTS01 EQU CVTPGSIA 01125000 CVTLPDIA EQU CVTS01+12 01126000 CVTDIRST EQU CVTLPDIA 01127000 CVTSLIDA EQU CVTS01+24 01128000 CVTCTLFG EQU CVTS01+50 01129000 CVTRV210 EQU CVTS01+424 01130000 CVTRV219 EQU CVTS01+425 01131000 CVTRV228 EQU CVTS01+426 01132000 CVTRV237 EQU CVTS01+427 01133000 CVTMFRTR EQU CVTS01+452 01134000 CVTRV262 EQU CVTS01+468 01135000 CVTRV271 EQU CVTS01+469 01136000 CVTRV280 EQU CVTS01+470 01137000 CVTRV289 EQU CVTS01+471 01138000 CVTGSDA EQU CVTS01+600 01139000 LCPZTIE EQU LCPCID 01140000 LCPZSNAM EQU LCPZTIE+8 01141000 RTRDNCBA EQU ISTRTR+40 01142000 AGO .@UNREFD START UNREFERENCED COMPONENTS 01143000 LCPZTRV4 EQU LCPZSNAM+4 01144000 LCPZTRV1 EQU LCPZSNAM 01145000 LCPZSNA EQU LCPZTIE+4 01146000 LCPZFMCA EQU LCPZTIE 01147000 CVTRV628 EQU CVTS01+728 01148000 CVTRV627 EQU CVTS01+724 01149000 CVTRV626 EQU CVTS01+720 01150000 CVTRV625 EQU CVTS01+716 01151000 CVTRV624 EQU CVTS01+712 01152000 CVTRV623 EQU CVTS01+708 01153000 CVTRV622 EQU CVTS01+704 01154000 CVTRV621 EQU CVTS01+700 01155000 CVTRV620 EQU CVTS01+696 01156000 CVTRV619 EQU CVTS01+692 01157000 CVTRV618 EQU CVTS01+688 01158000 CVTRV617 EQU CVTS01+684 01159000 CVTRV616 EQU CVTS01+680 01160000 CVTRV615 EQU CVTS01+676 01161000 CVTRV614 EQU CVTS01+672 01162000 CVTRV613 EQU CVTS01+668 01163000 CVTRV612 EQU CVTS01+664 01164000 CVTRV611 EQU CVTS01+660 01165000 CVTEVERM EQU CVTS01+656 01166000 CVTIRM EQU CVTS01+652 01167000 CVTCGK EQU CVTS01+648 01168000 CVTRAC EQU CVTS01+644 01169000 CVTRV606 EQU CVTS01+640 01170000 CVTRV605 EQU CVTS01+636 01171000 CVTRV604 EQU CVTS01+632 01172000 CVTEFF02 EQU CVTS01+628 01173000 CVTCBBR EQU CVTS01+624 01174000 CVTSSCR EQU CVTS01+620 01175000 CVTEVENT EQU CVTS01+616 01176000 CVTCRCA EQU CVTS01+612 01177000 CVTTPIO EQU CVTS01+608 01178000 CVTADV EQU CVTS01+604 01179000 CVTGSDAB EQU CVTGSDA 01180000 CVTQV3 EQU CVTS01+596 01181000 CVTQV2 EQU CVTS01+592 01182000 CVTQV1 EQU CVTS01+588 01183000 CVTRPT EQU CVTS01+584 01184000 CVTSSRB EQU CVTS01+580 01185000 CVTCSDRL EQU CVTS01+576 01186000 CVTEXP1 EQU CVTS01+572 01187000 CVTRMPMT EQU CVTS01+568 01188000 CVTRMPTT EQU CVTS01+564 01189000 CVTVPSA EQU CVTS01+560 01190000 CVTVSTOP EQU CVTS01+556 01191000 CVTGTFR8 EQU CVTS01+552 01192000 CVTQUIT EQU CVTS01+548 01193000 CVTVACR EQU CVTS01+544 01194000 CVTWTCB EQU CVTS01+540 01195000 CVTSTPRS EQU CVTS01+536 01196000 CVT0PT02 EQU CVTS01+532 01197000 CVTDARCM EQU CVTS01+528 01198000 CVTIRECM EQU CVTS01+524 01199000 CVTJRECM EQU CVTS01+520 01200000 CVTVEMS0 EQU CVTS01+516 01201000 CVTSPFRR EQU CVTS01+512 01202000 CVTRLSTG EQU CVTS01+508 01203000 CVT0TC0A EQU CVTS01+504 01204000 CVTGMBR EQU CVTS01+500 01205000 CVTLFRM EQU CVTS01+496 01206000 CVTRMBR EQU CVTS01+492 01207000 CVTVIOP EQU CVTS01+488 01208000 CVTRV307 EQU CVTS01+486 01209000 CVTRV306 EQU CVTS01+484 01210000 CVTRV305 EQU CVTS01+482 01211000 CVTRV304 EQU CVTS01+480 01212000 CVTRV303 EQU CVTS01+478 01213000 CVTRV302 EQU CVTS01+476 01214000 CVTTRCA EQU CVTS01+472 01215000 CVTRV297 EQU CVTRV289 01216000 CVTRV296 EQU CVTRV289 01217000 CVTRV295 EQU CVTRV289 01218000 CVTRV294 EQU CVTRV289 01219000 CVTRV293 EQU CVTRV289 01220000 CVTRV292 EQU CVTRV289 01221000 CVTRV291 EQU CVTRV289 01222000 CVTRV290 EQU CVTRV289 01223000 CVTRV288 EQU CVTRV280 01224000 CVTRV287 EQU CVTRV280 01225000 CVTRV286 EQU CVTRV280 01226000 CVTRV285 EQU CVTRV280 01227000 CVTRV284 EQU CVTRV280 01228000 CVTRV283 EQU CVTRV280 01229000 CVTRV282 EQU CVTRV280 01230000 CVTRV281 EQU CVTRV280 01231000 CVTRV279 EQU CVTRV271 01232000 CVTRV278 EQU CVTRV271 01233000 CVTRV277 EQU CVTRV271 01234000 CVTRV276 EQU CVTRV271 01235000 CVTRV275 EQU CVTRV271 01236000 CVTRV274 EQU CVTRV271 01237000 CVTRV273 EQU CVTRV271 01238000 CVTRV272 EQU CVTRV271 01239000 CVTRV270 EQU CVTRV262 01240000 CVTRV269 EQU CVTRV262 01241000 CVTRV268 EQU CVTRV262 01242000 CVTRV267 EQU CVTRV262 01243000 CVTRV266 EQU CVTRV262 01244000 CVTRV265 EQU CVTRV262 01245000 CVTRV264 EQU CVTRV262 01246000 CVTRV263 EQU CVTRV262 01247000 CVTVFP EQU CVTS01+464 01248000 CVTVSI EQU CVTS01+460 01249000 CVTVPSIB EQU CVTS01+456 01250000 CVTMFACT EQU CVTMFRTR 01251000 CVTMFCTL EQU CVTS01+448 01252000 CVTPVBP EQU CVTS01+444 01253000 CVTPWI EQU CVTS01+440 01254000 CVTRV254 EQU CVTS01+438 01255000 CVTRV253 EQU CVTS01+436 01256000 CVTRV252 EQU CVTS01+434 01257000 CVTRV251 EQU CVTS01+433 01258000 CVTRV250 EQU CVTS01+432 01259000 CVTRV249 EQU CVTS01+431 01260000 CVTRV248 EQU CVTS01+430 01261000 CVTRV247 EQU CVTS01+429 01262000 CVTRV246 EQU CVTS01+428 01263000 CVTRV245 EQU CVTRV237 01264000 CVTRV244 EQU CVTRV237 01265000 CVTRV243 EQU CVTRV237 01266000 CVTRV242 EQU CVTRV237 01267000 CVTRV241 EQU CVTRV237 01268000 CVTRV240 EQU CVTRV237 01269000 CVTRV239 EQU CVTRV237 01270000 CVTRV238 EQU CVTRV237 01271000 CVTRV236 EQU CVTRV228 01272000 CVTRV235 EQU CVTRV228 01273000 CVTRV234 EQU CVTRV228 01274000 CVTRV233 EQU CVTRV228 01275000 CVTRV232 EQU CVTRV228 01276000 CVTRV231 EQU CVTRV228 01277000 CVTRV230 EQU CVTRV228 01278000 CVTRV229 EQU CVTRV228 01279000 CVTRV227 EQU CVTRV219 01280000 CVTRV226 EQU CVTRV219 01281000 CVTRV225 EQU CVTRV219 01282000 CVTRV224 EQU CVTRV219 01283000 CVTRV223 EQU CVTRV219 01284000 CVTRV222 EQU CVTRV219 01285000 CVTRV221 EQU CVTRV219 01286000 CVTRV220 EQU CVTRV219 01287000 CVTRV218 EQU CVTRV210 01288000 CVTRV217 EQU CVTRV210 01289000 CVTRV216 EQU CVTRV210 01290000 CVTRV215 EQU CVTRV210 01291000 CVTRV214 EQU CVTRV210 01292000 CVTRV213 EQU CVTRV210 01293000 CVTRV212 EQU CVTRV210 01294000 CVTRV211 EQU CVTRV210 01295000 CVTLCCAT EQU CVTS01+420 01296000 CVTPCCAT EQU CVTS01+416 01297000 CVTIPCRP EQU CVTS01+412 01298000 CVTIPCRI EQU CVTS01+408 01299000 CVTIPCDS EQU CVTS01+404 01300000 CVTAIDVT EQU CVTS01+400 01301000 CVTSSAP EQU CVTS01+396 01302000 CVTEHCIR EQU CVTS01+392 01303000 CVTEHDEF EQU CVTS01+388 01304000 CVTDAIR EQU CVTS01+384 01305000 CVTPERFM EQU CVTS01+380 01306000 CVT044R2 EQU CVTS01+376 01307000 CVTFETCH EQU CVTS01+372 01308000 CVTRSTWD EQU CVTS01+368 01309000 CVTSPOST EQU CVTS01+364 01310000 CVTIOBP EQU CVTS01+360 01311000 CVTASMVT EQU CVTS01+356 01312000 CVTRECRQ EQU CVTS01+352 01313000 CVTWSAC EQU CVTS01+348 01314000 CVTRV149 EQU CVTS01+344 01315000 CVTWSAL EQU CVTS01+340 01316000 CVTSPSA EQU CVTS01+336 01317000 CVTGLMN EQU CVTS01+332 01318000 CVTVEAC0 EQU CVTS01+328 01319000 CVT062R1 EQU CVTS01+324 01320000 CVTRPOST EQU CVTS01+320 01321000 CVTDQIQE EQU CVTS01+316 01322000 CVTCSD EQU CVTS01+312 01323000 CVTLKRMA EQU CVTS01+308 01324000 CVTRSPIE EQU CVTS01+304 01325000 CVTRENQ EQU CVTS01+300 01326000 CVTLQCB EQU CVTS01+296 01327000 CVTFQCB EQU CVTS01+292 01328000 CVTQCS01 EQU CVTS01+288 01329000 CVTAPFT EQU CVTS01+284 01330000 CVTPARRL EQU CVTS01+280 01331000 CVTVWAIT EQU CVTS01+276 01332000 CVTGSPL EQU CVTS01+272 01333000 CVTLSMQ EQU CVTS01+268 01334000 CVTGSMQ EQU CVTS01+264 01335000 CVTEXPRO EQU CVTS01+260 01336000 CVTOPCTP EQU CVTS01+256 01337000 CVTSIC EQU CVTS01+252 01338000 CVTTPIOS EQU CVTS01+248 01339000 CVTRTMS EQU CVTS01+244 01340000 CVTSDBF EQU CVTS01+240 01341000 CVTSCBP EQU CVTS01+236 01342000 CVTSDMP EQU CVTS01+232 01343000 CVTSV60 EQU CVTS01+228 01344000 CVTRTMCT EQU CVTS01+224 01345000 CVTASCBL EQU CVTS01+220 01346000 CVTASCBH EQU CVTS01+216 01347000 CVTGDA EQU CVTS01+212 01348000 CVTASVT EQU CVTS01+208 01349000 CVTVVMDI EQU CVTS01+204 01350000 CVTAQTOP EQU CVTS01+200 01351000 CVTIOSCS EQU CVTS01+196 01352000 CVTSDRM EQU CVTS01+192 01353000 CVTOPTE EQU CVTS01+188 01354000 CVTSTXU EQU CVTS01+184 01355000 CVTQUIS EQU CVTS01+180 01356000 CVTPARS EQU CVTS01+176 01357000 CVTS1EE EQU CVTS01+172 01358000 CVTFRAS EQU CVTS01+168 01359000 CVTQSAS EQU CVTS01+164 01360000 CVTCRAS EQU CVTS01+160 01361000 CVTCRMN EQU CVTS01+156 01362000 CVTDELCP EQU CVTS01+152 01363000 CVTFRECL EQU CVTS01+148 01364000 CVTGETCL EQU CVTS01+144 01365000 CVTBLDCP EQU CVTS01+140 01366000 CVTAUTHL EQU CVTS01+136 01367000 CVTSCAN EQU CVTS01+132 01368000 CVTRV144 EQU CVTS01+130 01369000 CVTMAXMP EQU CVTS01+128 01370000 CVTSTCK EQU CVTS01+124 01371000 CVTRV139 EQU CVTS01+123 01372000 CVTDSSAC EQU CVTS01+122 01373000 CVTRV513 EQU CVTS01+121 01374000 CVTIOSPL EQU CVTS01+120 01375000 CVTPTGT EQU CVTS01+116 01376000 CVTCSPIE EQU CVTS01+112 01377000 CVTSMFEX EQU CVTS01+108 01378000 CVTOLT0A EQU CVTS01+104 01379000 CVTSRBRT EQU CVTS01+100 01380000 CVTPUTL EQU CVTS01+96 01381000 CVTRV519 EQU CVTS01+92 01382000 CVTRV327 EQU CVTS01+88 01383000 CVTRV326 EQU CVTS01+84 01384000 CVTRV325 EQU CVTS01+80 01385000 CVTRV324 EQU CVTS01+76 01386000 CVT0VL01 EQU CVTS01+72 01387000 CVTSHRVM EQU CVTS01+68 01388000 CVTRV332 EQU CVTS01+64 01389000 CVTTAS EQU CVTS01+60 01390000 CVTRSCN EQU CVTS01+56 01391000 CVTTRAC2 EQU CVTS01+54 01392000 CVTTRACE EQU CVTS01+52 01393000 CVTAPG EQU CVTS01+51 01394000 CVTSDTRC EQU CVTCTLFG 01395000 CVTGTRCE EQU CVTCTLFG 01396000 CVTNOMP EQU CVTCTLFG 01397000 CVTRSV79 EQU CVTCTLFG 01398000 CVTDSTAT EQU CVTCTLFG 01399000 CVTRSV78 EQU CVTCTLFG 01400000 CVTRV333 EQU CVTCTLFG 01401000 CVTRV323 EQU CVTCTLFG 01402000 CVTSPVLK EQU CVTS01+49 01403000 CVTRSV77 EQU CVTS01+48 01404000 CVTRV331 EQU CVTS01+44 01405000 CVTRV330 EQU CVTS01+40 01406000 CVTRV329 EQU CVTS01+36 01407000 CVTRV328 EQU CVTS01+32 01408000 CVTRV322 EQU CVTS01+28 01409000 CVTSLID EQU CVTSLIDA+1 01410000 CVTSYLK EQU CVTSLIDA 01411000 CVTRV321 EQU CVTS01+20 01412000 CVTRV320 EQU CVTS01+16 01413000 CVTLPDIR EQU CVTLPDIA+1 01414000 CVTRSV69 EQU CVTDIRST 01415000 CVTRSV68 EQU CVTDIRST 01416000 CVTRSV67 EQU CVTDIRST 01417000 CVTRSV66 EQU CVTDIRST 01418000 CVTRSV65 EQU CVTDIRST 01419000 CVTRSV64 EQU CVTDIRST 01420000 CVTRSV63 EQU CVTDIRST 01421000 CVTDICOM EQU CVTDIRST 01422000 CVTPVTP EQU CVTS01+8 01423000 CVTLPDSR EQU CVTS01+4 01424000 CVTGETL EQU CVTS01 01425000 ATCAOS EQU ISTATCVT+1552 01426000 ATCVIOPM EQU ATCAOSM+636 01427000 ATCTPMMI EQU ATCAOSM+632 01428000 ATCTPMPB EQU ATCAOSM+600 01429000 ATCRPLCT EQU ATCAOSM+594 01430000 ATCCRACT EQU ATCAOSM+592 01431000 ATCSRBCT EQU ATCAOSM+590 01432000 ATCRSV75 EQU ATCAOSM+589 01433000 ATCRSV66 EQU ATCZFLAG 01434000 ATCZF001 EQU ATCZFLAG 01435000 ATCTPCP1 EQU ATCAOSM+584 01436000 ATCTPCP0 EQU ATCAOSM+580 01437000 ATCAICTN EQU ATCAOSM+576 01438000 ATCZR01 EQU ATCAOSM+572 01439000 ATCMPLTA EQU ATCAOSM+568 01440000 ATCASCB EQU ATCAOSM+564 01441000 ATCAP86 EQU ATCAOSM+560 01442000 ATCAP85 EQU ATCAOSM+556 01443000 ATCAP84 EQU ATCAOSM+552 01444000 ATCAP83 EQU ATCAOSM+548 01445000 ATCAP82 EQU ATCAOSM+544 01446000 ATCAP69 EQU ATCAOSM+540 01447000 ATCAP66 EQU ATCAOSM+536 01448000 ATCAP62 EQU ATCAOSM+532 01449000 ATCAPC59 EQU ATCAOSM+528 01450000 ATCAP56 EQU ATCAOSM+524 01451000 ATCAP55 EQU ATCAOSM+520 01452000 ATCRCFY0 EQU ATCAOSM+516 01453000 ATCAP41 EQU ATCAOSM+512 01454000 ATCAPC25 EQU ATCAOSM+508 01455000 ATCAP23 EQU ATCAOSM+504 01456000 ATCTPSPB EQU ATCAOSM+472 01457000 ATCTRMBP EQU ATCAOSM+440 01458000 ATCPSTA EQU ATCAOSM+432 01459000 ATCSMABF EQU ATCAOSM+428 01460000 ATCSMAPR EQU ATCAOSM+424 01461000 ATCTPWQA EQU ATCAOSM+420 01462000 ATCSMAID EQU ATCAOSM+416 01463000 ATCSMARA EQU ATCAOSM+412 01464000 ATCCACXA EQU ATCAOSM+408 01465000 ATCZLAAB EQU ATCAOSM+404 01466000 ATCATA10 EQU ATCAOSM+400 01467000 ATCHLTCB EQU ATCAOSM+396 01468000 @NM00050 EQU ATCVTFLG 01469000 ATCVTACT EQU ATCVTFLG 01470000 ATCRPT40 EQU ATCAOSM+388 01471000 ATCRPT39 EQU ATCAOSM+384 01472000 ATCRPT38 EQU ATCAOSM+380 01473000 ATCRPT37 EQU ATCAOSM+376 01474000 ATCRPT36 EQU ATCAOSM+372 01475000 ATCRPT35 EQU ATCAOSM+368 01476000 ATCRPT34 EQU ATCAOSM+364 01477000 ATCRPT33 EQU ATCAOSM+360 01478000 ATCRPT32 EQU ATCAOSM+356 01479000 ATCRPT31 EQU ATCAOSM+352 01480000 ATCRPT30 EQU ATCAOSM+348 01481000 ATCRPT29 EQU ATCAOSM+344 01482000 ATCRPT28 EQU ATCAOSM+340 01483000 ATCRPT27 EQU ATCAOSM+336 01484000 ATCRPT26 EQU ATCAOSM+332 01485000 ATCRPT25 EQU ATCAOSM+328 01486000 ATCRPT24 EQU ATCAOSM+324 01487000 ATCRPT23 EQU ATCAOSM+320 01488000 ATCRPT22 EQU ATCAOSM+316 01489000 ATCRPT21 EQU ATCAOSM+312 01490000 ATCRPT20 EQU ATCAOSM+308 01491000 ATCRPT19 EQU ATCAOSM+304 01492000 ATCRPT18 EQU ATCAOSM+300 01493000 ATCRPT17 EQU ATCAOSM+296 01494000 ATCRPT16 EQU ATCAOSM+292 01495000 ATCRPT15 EQU ATCAOSM+288 01496000 ATCRPT14 EQU ATCAOSM+284 01497000 ATCRPT13 EQU ATCAOSM+280 01498000 ATCRPT12 EQU ATCAOSM+276 01499000 ATCRPT11 EQU ATCAOSM+272 01500000 ATCAP38 EQU ATCAOSM+268 01501000 ATCAP37 EQU ATCAOSM+264 01502000 ATCZDFJ0 EQU ATCAOSM+260 01503000 ATCAP51 EQU ATCAOSM+256 01504000 ATCZPAB2 EQU ATCAOSM+224 01505000 ATCZPAB1 EQU ATCAOSM+192 01506000 ATCZLFVT EQU ATCAOSM+188 01507000 ATCZLPVT EQU ATCAOSM+184 01508000 ATCZDVTX EQU ATCAOSM+180 01509000 ATCZDVTA EQU ATCAOSM+176 01510000 ATCZDVT9 EQU ATCAOSM+172 01511000 ATCZDVT8 EQU ATCAOSM+168 01512000 ATCZDVT7 EQU ATCAOSM+164 01513000 ATCRSV56 EQU ATCDAPVT+22 01514000 ATCDAPDG EQU ATCDAPVT+20 01515000 ATCDXCEA EQU ATCDAPVT+16 01516000 ATCDCEA EQU ATCDAPVT+12 01517000 ATCDPCIA EQU ATCDAPVT+8 01518000 ATCDSIOA EQU ATCDAPVT+4 01519000 ATCDEOEA EQU ATCDAPVT 01520000 ATCZLAEA EQU ATCLDAPP+16 01521000 ATCZLCEA EQU ATCLDAPP+12 01522000 ATCRSV17 EQU ATCLDAPP+8 01523000 ATCSMFRR EQU ATCLDAPP+4 01524000 ATCCDTID EQU ATCLDAPP 01525000 ATCZAEA EQU ATCICAPP+16 01526000 ATCZCEA EQU ATCICAPP+12 01527000 ATCCDTCB EQU ATCICAPP+8 01528000 ATCZSIOA EQU ATCICAPP+4 01529000 ATCCDRPH EQU ATCICAPP 01530000 ATCAP65 EQU ATCAOSM+96 01531000 ATCZDVT6 EQU ATCAOSM+92 01532000 ATCZDVT4 EQU ATCAOSM+88 01533000 ATCZDVT3 EQU ATCAOSM+84 01534000 ATCZDVT1 EQU ATCAOSM+80 01535000 ATCICNCB EQU ATCAOSM+76 01536000 ATCZPSVT EQU ATCAOSM+72 01537000 ATCZFSVT EQU ATCAOSM+68 01538000 ATCAP64 EQU ATCAOSM+64 01539000 ATCAP63 EQU ATCAOSM+60 01540000 ATCAP61 EQU ATCAOSM+56 01541000 ATCAP58 EQU ATCAOSM+52 01542000 ATCAP57 EQU ATCAOSM+48 01543000 ATCAP54 EQU ATCAOSM+44 01544000 ATCAP53 EQU ATCAOSM+40 01545000 ATCAP52 EQU ATCAOSM+36 01546000 ATCAP34 EQU ATCAOSM+32 01547000 ATCAP32 EQU ATCAOSM+28 01548000 ATCAP12 EQU ATCAOSM+20 01549000 ATCAP11 EQU ATCAOSM+16 01550000 ATCCMTCB EQU ATCAOSM+12 01551000 ATCPRPH EQU ATCAOSM+8 01552000 ATCGSRBF EQU ATCGSRBG 01553000 ATCSRBRT EQU ATCAOSM 01554000 ATCRSVBB EQU ISTATCVT+908 01555000 ATCVDLOK EQU ISTATCVT+904 01556000 ATCVFPAB EQU ISTATCVT+872 01557000 ATCVDPAB EQU ISTATCVT+840 01558000 ATCIOECB EQU ISTATCVT+836 01559000 ATCINCW3 EQU ISTATCVT+832 01560000 ATCMODTB EQU ISTATCVT+828 01561000 ATCUSSPT EQU ISTATCVT+824 01562000 ATCSRTAB EQU ISTATCVT+820 01563000 @NM00049 EQU ISTATCVT+818 01564000 ATCNMCTR EQU ISTATCVT+816 01565000 ATCSEC51 EQU ATCSECST 01566000 ATCSEC40 EQU ATCSIPD+8 01567000 ATCSEC30 EQU ATCSIPD+4 01568000 ATCSEC21 EQU ATCSIPD 01569000 ATCSEC10 EQU ATCSOPD+4 01570000 ATCSEC01 EQU ATCSOPD 01571000 ATCPOIA EQU ISTATCVT+788 01572000 ATCPODVT EQU ISTATCVT+784 01573000 ATCS49XL EQU ISTATCVT+780 01574000 ATCS49XI EQU ISTATCVT+776 01575000 ATCLCLCT EQU ATCVLCNT+2 01576000 ATCRNCNT EQU ATCVLCNT 01577000 ATCCFEAD EQU ISTATCVT+768 01578000 ATCPTR00 EQU ISTATCVT+736 01579000 ATCRSV10 EQU ISTATCVT+704 01580000 ATCTACB EQU ISTATCVT+700 01581000 ATCVTINM EQU ISTATCVT+696 01582000 ATCTCLIM EQU ISTATCVT+692 01583000 ATCTCLOM EQU ISTATCVT+688 01584000 ATCVTIPB EQU ISTATCVT+656 01585000 ATCTCIPB EQU ISTATCVT+624 01586000 ATCTIPAB EQU ISTATCVT+592 01587000 ATCOCCCB EQU ISTATCVT+588 01588000 ATCOCCOB EQU ISTATCVT+584 01589000 ATCCDLAD EQU ISTATCVT+580 01590000 ATCCCLAD EQU ISTATCVT+576 01591000 ATCDLRPB EQU ISTATCVT+544 01592000 ATCPGPAB EQU ISTATCVT+512 01593000 ATCVPAB1 EQU ISTATCVT+480 01594000 ATCRSV97 EQU ISTATCVT+476 01595000 ATCRDTLK EQU ISTATCVT+472 01596000 ATCVOCLK EQU ISTATCVT+468 01597000 ATCCDFDN EQU ISTATCVT+464 01598000 ATCCDFIN EQU ISTATCVT+460 01599000 ATCDVTLK EQU ISTATCVT+456 01600000 ATCAP36 EQU ISTATCVT+452 01601000 ATCAP35 EQU ISTATCVT+448 01602000 ATCAP33 EQU ISTATCVT+444 01603000 ATCRSV99 EQU ISTATCVT+412 01604000 ATCLDECB EQU ISTATCVT+408 01605000 ATCLDNCS EQU ISTATCVT+404 01606000 ATCCDPTR EQU ISTATCVT+400 01607000 ATCADEL EQU ISTATCVT+396 01608000 ATCTODVT EQU ISTATCVT+392 01609000 ATCDEBCH EQU ISTATCVT+388 01610000 ATCHBSIZ EQU ATCHPGM+2 01611000 ATCHBFNO EQU ATCHPGM 01612000 ATCCRME EQU ISTATCVT+380 01613000 ATCRVCHS EQU ISTATCVT+372 01614000 ATCECTLP EQU ISTATCVT+368 01615000 ATCZDVTB EQU ISTATCVT+364 01616000 ATCECPRT EQU ISTATCVT+360 01617000 ATCVTLOD EQU ISTATCVT+356 01618000 ATCTRPAB EQU ISTATCVT+352 01619000 ATCMSGM EQU ISTATCVT+348 01620000 ATCEPT EQU ISTATCVT+340 01621000 ATCDVT EQU ISTATCVT+336 01622000 ATCTRCPT EQU ISTATCVT+332 01623000 ATCDVLOD EQU ISTATCVT+328 01624000 ATCALERT EQU ISTATCVT+324 01625000 ATCEPA EQU ISTATCVT+320 01626000 ATCSAF EQU ISTATCVT+318 01627000 ATCXRANG EQU ISTATCVT+317 01628000 ATCLAST EQU ATCSHRFG 01629000 ATCSHRTN EQU ISTATCVT+308 01630000 ATCUEP EQU ISTATCVT+304 01631000 ATCOCRT EQU ISTATCVT+300 01632000 ATCCSMA EQU ATCCSMR 01633000 ATCESC02 EQU ISTATCVT+292 01634000 ATCESC01 EQU ISTATCVT+288 01635000 ATCCDFND EQU ISTATCVT+284 01636000 ATCCDDEL EQU ISTATCVT+280 01637000 ATCCDADD EQU ISTATCVT+276 01638000 ATCMNT EQU ISTATCVT+272 01639000 ATCRSV16 EQU ISTATCVT+270 01640000 ATCMAXID EQU ISTATCVT+269 01641000 ATCMSGSP EQU ATCCOM+268 01642000 ATCCIDM EQU ATCCOM+266 01643000 ATCACTRM EQU ATCCOM+264 01644000 ATCNERAP EQU ATCCOM+260 01645000 ATCNESAL EQU ATCCOM+256 01646000 ATCRCC65 EQU ATCCOM+252 01647000 ATCRCC26 EQU ATCCOM+248 01648000 ATCRCC63 EQU ATCCOM+244 01649000 ATCRSV11 EQU ATCCOM+242 01650000 ATCVTMID EQU ATCCOM+240 01651000 ATCAPOST EQU ATCCOM+236 01652000 ATCNERFN EQU ATCCOM+232 01653000 ATCNERNE EQU ATCCOM+228 01654000 ATCNERCV EQU ATCCOM+224 01655000 ATCNERST EQU ATCCOM+220 01656000 ATCDCC61 EQU ATCCOM+216 01657000 ATCDCC60 EQU ATCCOM+212 01658000 ATCSRTDF EQU ATCCOM+208 01659000 ATCSRTAD EQU ATCCOM+204 01660000 ATCFIRA EQU ATCCOM+200 01661000 ATCSMBQ EQU ATCCOM+196 01662000 ATCSMRC EQU ATCCOM+192 01663000 ATCSMRS EQU ATCCOM+188 01664000 ATCSMQU EQU ATCCOM+184 01665000 ATCSMRQ EQU ATCCOM+180 01666000 ATCACDA EQU ATCCOM+176 01667000 ATCSTMA EQU ATCCOM+172 01668000 ATCFRSTR EQU ATCCOM+168 01669000 ATCGTSTR EQU ATCCOM+164 01670000 ATCREADA EQU ATCCOM+160 01671000 ATCALOAD EQU ATCCOM+156 01672000 ATCBLDLA EQU ATCCOM+152 01673000 ATCFBRPH EQU ATCCOM+148 01674000 ATCBFTRC EQU ATCCOM+144 01675000 ATCTPBUF EQU ATCTHTRC 01676000 ATCREMOV EQU ATCCOM+136 01677000 ATCADD EQU ATCCOM+132 01678000 ATCBPDA EQU ATCCOM+128 01679000 ATCDVTPT EQU ATCCOM+124 01680000 ATCFEPT EQU ATCCOM+120 01681000 ATCFDVT EQU ATCCOM+116 01682000 ATCCONFT EQU ATCCOM+112 01683000 ATCPTCHA EQU ATCCOM+108 01684000 ATCAUTHA EQU ATCCOM+104 01685000 ATCACCTA EQU ATCCOM+100 01686000 ATCRDTH EQU ATCCOM+96 01687000 ATCFRSCH EQU ATCCOM+92 01688000 ATCFSB EQU ATCCOM+88 01689000 ATCHLTMS EQU ATCCOM+84 01690000 ATCECPRM EQU ATCCOM+80 01691000 ATCECNET EQU ATCCOM+76 01692000 ATCECOPC EQU ATCCOM+72 01693000 ATCVPARM EQU ATCCOM+68 01694000 ATCECVRQ EQU ATCCOM+64 01695000 ATCECSES EQU ATCCOM+60 01696000 ATCOCHA EQU ATCCOM+56 01697000 ATCDSPLQ EQU ATCCOM+52 01698000 ATCECDSP EQU ATCCOM+48 01699000 ATCVARYQ EQU ATCCOM+44 01700000 ATCECVRY EQU ATCCOM+40 01701000 ATCHALTQ EQU ATCCOM+36 01702000 ATCECHLT EQU ATCCOM+32 01703000 ATCMODQ EQU ATCCOM+28 01704000 ATCECMOD EQU ATCCOM+24 01705000 ATCASCHD EQU ATCCOM+20 01706000 ATCSRT EQU ATCCOM+16 01707000 ATCRDT EQU ATCCOM+12 01708000 ATCDCFRR EQU ATCCOM+8 01709000 ATCAPI EQU ATCCOM+4 01710000 ATCRSV04 EQU ATCSTAT4 01711000 ATCNCSD EQU ATCSTAT4 01712000 ATCMTST EQU ATCSTAT4 01713000 ATCTPRT EQU ATCSTAT4 01714000 ATCPRTAT EQU ATCSTAT4 01715000 @NM00048 EQU ATCPOFLG 01716000 ATCPOUNS EQU ATCPOFLG 01717000 ATCHSDMF EQU ATCSTFLG 01718000 @NM00047 EQU ATCSTAT1 01719000 ATCINHLT EQU ATCSTAT1 01720000 ATCNETSL EQU ATCSTAT1 01721000 ATCQKHLT EQU ATCSTAT1 01722000 ATCSNHLT EQU ATCSTAT1 01723000 ATCACTIV EQU ATCSTAT1 01724000 ATCSTART EQU ATCSTAT1 01725000 DYPPAB EQU ISTDYPAB+16 01726000 DYPRSV01 EQU ISTDYPAB+12 01727000 DYPTSKID EQU ISTDYPAB+8 01728000 DYPCHAIN EQU ISTDYPAB+4 01729000 DYPFLGS EQU ISTDYPAB+2 01730000 DYPLNGTH EQU ISTDYPAB+1 01731000 DYPTYPE EQU ISTDYPAB 01732000 CRACHAIN EQU ISTCRA+928 01733000 CRARSV02 EQU ISTCRA+924 01734000 CRARSV01 EQU ISTCRA+920 01735000 CRABFTBA EQU CRABUFA 01736000 CRAMASK EQU CRASVC+64 01737000 CRAHSIZ EQU CRASVC+60 01738000 CRAASCRR EQU CRASVC 01739000 CRAPSS EQU ISTCRA+160 01740000 CRARPH EQU ISTCRA+52 01741000 CRALAPTR EQU CRABASIC+48 01742000 CRAL9PTR EQU CRABASIC+44 01743000 CRAL8PTR EQU CRABASIC+40 01744000 CRAL7PTR EQU CRABASIC+36 01745000 CRAL6PTR EQU CRABASIC+32 01746000 CRAL5PTR EQU CRABASIC+28 01747000 CRAL4PTR EQU CRABASIC+24 01748000 CRAL3PTR EQU CRABASIC+20 01749000 CRAL2PTR EQU CRABASIC+16 01750000 CRAL1PTR EQU CRABASIC+12 01751000 CRALEV01 EQU CRALKACT+3 01752000 CRALEV02 EQU CRALKACT+3 01753000 CRALEV03 EQU CRALKACT+3 01754000 CRALEV04 EQU CRALKACT+3 01755000 CRALEV05 EQU CRALKACT+3 01756000 CRALEV06 EQU CRALKACT+3 01757000 CRALEV07 EQU CRALKACT+3 01758000 CRALEV08 EQU CRALKACT+3 01759000 CRALEV09 EQU CRALKACT+2 01760000 CRALEV10 EQU CRALKACT+2 01761000 CRALEV11 EQU CRALKACT+2 01762000 CRALEV12 EQU CRALKACT+2 01763000 CRALEV13 EQU CRALKACT+2 01764000 CRALEV14 EQU CRALKACT+2 01765000 CRALEV15 EQU CRALKACT+2 01766000 CRALEV16 EQU CRALKACT+2 01767000 CRALEV17 EQU CRALKACT+1 01768000 CRALEV18 EQU CRALKACT+1 01769000 CRALEV19 EQU CRALKACT+1 01770000 CRALEV20 EQU CRALKACT+1 01771000 CRALEV21 EQU CRALKACT+1 01772000 CRALEV22 EQU CRALKACT+1 01773000 CRALEV23 EQU CRALKACT+1 01774000 CRALEV24 EQU CRALKACT+1 01775000 CRALEV25 EQU CRALKACT 01776000 CRALEV26 EQU CRALKACT 01777000 CRALEV27 EQU CRALKACT 01778000 CRALEV28 EQU CRALKACT 01779000 CRALEV29 EQU CRALKACT 01780000 CRALEV30 EQU CRALKACT 01781000 CRALEV31 EQU CRALKACT 01782000 CRALEV32 EQU CRALKACT 01783000 CRAFRR EQU CRAHDR+4 01784000 @NM00044 EQU ISTAPCRR+137 01785000 @NM00043 EQU APC57FLG 01786000 APCNREL EQU APC57FLG 01787000 APCRECRA EQU APC57FLG 01788000 @NM00042 EQU APC54FLG 01789000 APCRLST EQU APC54FLG 01790000 APCPR153 EQU APC53FLG 01791000 @NM00041 EQU APC52FLG 01792000 APCWKF EQU APC52FLG 01793000 APCNWF EQU APC52FLG 01794000 APCRDQ EQU APC52FLG 01795000 APCQENQ EQU APC52FLG 01796000 APCSMSR EQU APC52FLG 01797000 APCCKRQ EQU APC52FLG 01798000 @NM00040 EQU APC31FLG 01799000 APCSORT EQU APC31FLG 01800000 APCRESCH EQU APC31FLG 01801000 APCTPXIT EQU APC31FLG 01802000 APCSWTWD EQU ISTAPCRR+128 01803000 APCSAV2 EQU ISTAPCRR+124 01804000 APCSAV1 EQU ISTAPCRR+120 01805000 APCRETCD EQU APCCOMF+2 01806000 @NM00039 EQU APCCOMF1+1 01807000 APCZLBER EQU APCCOMF1 01808000 APCEXIT EQU APCCOMF1 01809000 APCRELR EQU APCCOMF1 01810000 APCIRB2 EQU APCCOMF1 01811000 APCIRB1 EQU APCCOMF1 01812000 APCSMCR EQU APCCOMF1 01813000 APCUETSK EQU APCCOMF1 01814000 APCSSTSK EQU APCCOMF1 01815000 APCESTAL EQU APCSAVE 01816000 APCFRRPM EQU ISTAPCRR+40 01817000 APCQWFO EQU ISTAPCRR+36 01818000 APCPABSV EQU ISTAPCRR+32 01819000 APCRTRN EQU ISTAPCRR+28 01820000 APCTCBA EQU ISTAPCRR+24 01821000 APCPSTA EQU ISTAPCRR+20 01822000 @NM00038 EQU APCRFLG+1 01823000 APC31R EQU APCRFLG 01824000 APC58R EQU APCRFLG 01825000 APC57R EQU APCRFLG 01826000 APC56R EQU APCRFLG 01827000 APC54R EQU APCRFLG 01828000 APC53R EQU APCRFLG 01829000 APC52R EQU APCRFLG 01830000 APC51R EQU APCRFLG 01831000 @NM00037 EQU APCATFLG+1 01832000 APC31E EQU APCATFLG 01833000 APC58E EQU APCATFLG 01834000 APC57E EQU APCATFLG 01835000 APC56E EQU APCATFLG 01836000 APC54E EQU APCATFLG 01837000 APC53E EQU APCATFLG 01838000 APC52E EQU APCATFLG 01839000 APC51E EQU APCATFLG 01840000 APCHDRSV EQU ISTAPCRR 01841000 ASCPSREG EQU ISTASCRR+44 01842000 ASCUSR01 EQU ASCUSRGS+12 01843000 ASCUSR00 EQU ASCUSRGS+8 01844000 ASCUSR15 EQU ASCUSRGS+4 01845000 ASCUSR14 EQU ASCUSRGS 01846000 ASCETRYA EQU ISTASCRR+24 01847000 ASCKEY EQU ISTASCRR+23 01848000 ASCAUDIT EQU ASCFLG3 01849000 ASCFBDUD EQU ASCFLG3 01850000 ASCLLKF EQU ASCFLG3 01851000 ASCKEYF EQU ASCFLG3 01852000 ASCFBDAL EQU ASCFLG3 01853000 ASCFSRGT EQU ASCFLG3 01854000 ASCICR EQU ASCFLG2 01855000 ASCFSRIC EQU ASCFLG2 01856000 ASCFBDIC EQU ASCFLG2 01857000 ASCFBAIC EQU ASCFLG2 01858000 ASCPASTR EQU ASCFLG1 01859000 ASCFSR EQU ASCFLG1 01860000 ASCFBD EQU ASCFLG1 01861000 ASCFBA EQU ASCFLG1 01862000 ASCPFCRR EQU ISTASCRR 01863000 ZCRRU EQU ZCRRHRU+3 01864000 ZCRRH EQU ZCRRHRU 01865000 ZCRWORDA EQU ISTZCRR+477 01866000 ZCRCMNRC EQU ISTZCRR+476 01867000 ZCRRSV97 EQU ZCRENTER+18 01868000 ZCREIC2B EQU ZCRENTER+18 01869000 ZCREAC2B EQU ZCRENTER+18 01870000 ZCRELCAB EQU ZCRENTER+18 01871000 ZCREDCMF EQU ZCRENTER+18 01872000 ZCREBCIF EQU ZCRENTER+18 01873000 ZCREICSG EQU ZCRENTER+18 01874000 ZCREDCK0 EQU ZCRENTER+18 01875000 ZCRECFY0 EQU ZCRENTER+17 01876000 ZCREKCCB EQU ZCRENTER+17 01877000 ZCREDCNB EQU ZCRENTER+17 01878000 ZCREICOE EQU ZCRENTER+17 01879000 ZCREBCNB EQU ZCRENTER+17 01880000 ZCREBC0L EQU ZCRENTER+17 01881000 ZCREBCAL EQU ZCRENTER+17 01882000 ZCREDCQR EQU ZCRENTER+17 01883000 ZCREDCPR EQU ZCRENTER+16 01884000 ZCREBCSB EQU ZCRENTER+16 01885000 ZCREAC1R EQU ZCRENTER+16 01886000 ZCRECCCI EQU ZCRENTER+16 01887000 ZCRECCAI EQU ZCRENTER+16 01888000 ZCRECCBI EQU ZCRENTER+16 01889000 ZCREBCAR EQU ZCRENTER+16 01890000 ZCREBCDR EQU ZCRENTER+16 01891000 ZCREBCBR EQU ZCRENTER+15 01892000 ZCREDCXR EQU ZCRENTER+15 01893000 ZCREDCWB EQU ZCRENTER+15 01894000 ZCREDCWR EQU ZCRENTER+15 01895000 ZCREKCCN EQU ZCRENTER+15 01896000 ZCREKCBN EQU ZCRENTER+15 01897000 ZCREKCBB EQU ZCRENTER+15 01898000 ZCREJC0B EQU ZCRENTER+15 01899000 ZCREJCDB EQU ZCRENTER+14 01900000 ZCREJCCB EQU ZCRENTER+14 01901000 ZCREJCBB EQU ZCRENTER+14 01902000 ZCREJCAB EQU ZCRENTER+14 01903000 ZCREIC1B EQU ZCRENTER+14 01904000 ZCREIC0B EQU ZCRENTER+14 01905000 ZCREICX0 EQU ZCRENTER+14 01906000 ZCREICWB EQU ZCRENTER+14 01907000 ZCREICVB EQU ZCRENTER+13 01908000 ZCREICUB EQU ZCRENTER+13 01909000 ZCREICTB EQU ZCRENTER+13 01910000 ZCREICSC EQU ZCRENTER+13 01911000 ZCREICSB EQU ZCRENTER+13 01912000 ZCREICRB EQU ZCRENTER+13 01913000 ZCREICQB EQU ZCRENTER+13 01914000 ZCREICQA EQU ZCRENTER+13 01915000 ZCREICOB EQU ZCRENTER+12 01916000 ZCREICOA EQU ZCRENTER+12 01917000 ZCREICNB EQU ZCRENTER+12 01918000 ZCREICNA EQU ZCRENTER+12 01919000 ZCREICMB EQU ZCRENTER+12 01920000 ZCREICLB EQU ZCRENTER+12 01921000 ZCREICKG EQU ZCRENTER+12 01922000 ZCREICKE EQU ZCRENTER+12 01923000 ZCREICKB EQU ZCRENTER+11 01924000 ZCREICJB EQU ZCRENTER+11 01925000 ZCREICID EQU ZCRENTER+11 01926000 ZCREICIB EQU ZCRENTER+11 01927000 ZCREICHB EQU ZCRENTER+11 01928000 ZCREICGB EQU ZCRENTER+11 01929000 ZCREICEB EQU ZCRENTER+11 01930000 ZCREICDB EQU ZCRENTER+11 01931000 ZCREICCI EQU ZCRENTER+10 01932000 ZCREICCB EQU ZCRENTER+10 01933000 ZCREICBI EQU ZCRENTER+10 01934000 ZCREICBB EQU ZCRENTER+10 01935000 ZCREICAB EQU ZCRENTER+10 01936000 ZCREICAA EQU ZCRENTER+10 01937000 ZCREHCAN EQU ZCRENTER+10 01938000 ZCREGC0B EQU ZCRENTER+10 01939000 ZCREGC0A EQU ZCRENTER+9 01940000 ZCREGCLA EQU ZCRENTER+9 01941000 ZCREGCEB EQU ZCRENTER+9 01942000 ZCREGCDB EQU ZCRENTER+9 01943000 @NM00036 EQU ZCRENTER+9 01944000 ZCREGCBB EQU ZCRENTER+9 01945000 ZCREGCAB EQU ZCRENTER+9 01946000 ZCREFCEB EQU ZCRENTER+9 01947000 ZCREFCEA EQU ZCRENTER+8 01948000 ZCREECTA EQU ZCRENTER+8 01949000 ZCREECEA EQU ZCRENTER+8 01950000 ZCREECDA EQU ZCRENTER+8 01951000 ZCREECCB EQU ZCRENTER+8 01952000 ZCREECCA EQU ZCRENTER+8 01953000 ZCREECBB EQU ZCRENTER+8 01954000 ZCREECBA EQU ZCRENTER+8 01955000 ZCREDCMB EQU ZCRENTER+7 01956000 ZCREDCL0 EQU ZCRENTER+7 01957000 ZCREDCKB EQU ZCRENTER+7 01958000 ZCREDCKA EQU ZCRENTER+7 01959000 ZCREDCJ0 EQU ZCRENTER+7 01960000 ZCREDCI0 EQU ZCRENTER+7 01961000 ZCREDCH0 EQU ZCRENTER+7 01962000 ZCREDCF0 EQU ZCRENTER+7 01963000 ZCREDCE0 EQU ZCRENTER+6 01964000 ZCREDCD0 EQU ZCRENTER+6 01965000 ZCREDCC0 EQU ZCRENTER+6 01966000 ZCREDCB0 EQU ZCRENTER+6 01967000 ZCREDCA0 EQU ZCRENTER+6 01968000 ZCRECC2B EQU ZCRENTER+6 01969000 ZCRECC1B EQU ZCRENTER+6 01970000 ZCRECC1A EQU ZCRENTER+6 01971000 ZCRECC0B EQU ZCRENTER+5 01972000 ZCRECC0A EQU ZCRENTER+5 01973000 ZCREBC0B EQU ZCRENTER+5 01974000 ZCREBC0A EQU ZCRENTER+5 01975000 ZCREBCZ0 EQU ZCRENTER+5 01976000 ZCREBCY0 EQU ZCRENTER+5 01977000 ZCREBCX0 EQU ZCRENTER+5 01978000 ZCREBCXA EQU ZCRENTER+5 01979000 ZCREBCSC EQU ZCRENTER+4 01980000 ZCREBCRB EQU ZCRENTER+4 01981000 ZCREBCRA EQU ZCRENTER+4 01982000 ZCREBCQB EQU ZCRENTER+4 01983000 ZCREBCPB EQU ZCRENTER+4 01984000 ZCREBCOB EQU ZCRENTER+4 01985000 ZCREBCNE EQU ZCRENTER+4 01986000 ZCREBCND EQU ZCRENTER+4 01987000 ZCREBCMB EQU ZCRENTER+3 01988000 ZCREBCLB EQU ZCRENTER+3 01989000 ZCREBCLA EQU ZCRENTER+3 01990000 ZCREBCKB EQU ZCRENTER+3 01991000 ZCREBCKA EQU ZCRENTER+3 01992000 ZCREBCJB EQU ZCRENTER+3 01993000 ZCREBCJA EQU ZCRENTER+3 01994000 ZCREBCID EQU ZCRENTER+3 01995000 ZCREBCIB EQU ZCRENTER+2 01996000 ZCREBCIA EQU ZCRENTER+2 01997000 ZCREBCHB EQU ZCRENTER+2 01998000 ZCREBCHA EQU ZCRENTER+2 01999000 ZCREBCGB EQU ZCRENTER+2 02000000 ZCREBCGA EQU ZCRENTER+2 02001000 ZCREBCFB EQU ZCRENTER+2 02002000 ZCREBCFA EQU ZCRENTER+2 02003000 ZCREBCEB EQU ZCRENTER+1 02004000 ZCREBCDI EQU ZCRENTER+1 02005000 ZCREBCCB EQU ZCRENTER+1 02006000 ZCREBCBI EQU ZCRENTER+1 02007000 ZCREBCBB EQU ZCRENTER+1 02008000 ZCREBCBA EQU ZCRENTER+1 02009000 ZCREBCAM EQU ZCRENTER+1 02010000 ZCREBCAI EQU ZCRENTER+1 02011000 ZCREBCAG EQU ZCRENTER 02012000 ZCREBCAE EQU ZCRENTER 02013000 ZCREBCAB EQU ZCRENTER 02014000 ZCREBCAA EQU ZCRENTER 02015000 ZCREAC1B EQU ZCRENTER 02016000 ZCREAC0B EQU ZCRENTER 02017000 ZCREAC0A EQU ZCRENTER 02018000 ZCREAC1A EQU ZCRENTER 02019000 ZCRTNAME EQU ZCRAUDIT+1 02020000 ZCRTID EQU ZCRAUDIT 02021000 ZCRREMIC EQU ISTZCRR+436 02022000 ZCRSAVEZ EQU ISTZCRR+196 02023000 ZCRDAFSV EQU ZCRCIDSV+2 02024000 ZCRSAFSV EQU ZCRCIDSV 02025000 ZCRR13SV EQU ISTZCRR+188 02026000 ZCRR2SV EQU ISTZCRR+184 02027000 ZCROPCDE EQU ISTZCRR+183 02028000 ZCRPRMTC EQU ISTZCRR+182 02029000 ZCRRCDSV EQU ISTZCRR+181 02030000 ZCRAWQSW EQU ISTZCRR+180 02031000 ZCRTOPQ EQU ISTZCRR+180 02032000 ZCRLSTFB EQU ISTZCRR+180 02033000 ZCRXSCHD EQU ISTZCRR+180 02034000 ZCRNXTEL EQU ISTZCRR+180 02035000 ZCRSCANQ EQU ISTZCRR+180 02036000 ZCRMOREL EQU ISTZCRR+180 02037000 ZCRFBPRC EQU ISTZCRR+180 02038000 ZCRFSBSV EQU ISTZCRR+176 02039000 ZCRSVWK5 EQU ZCRWKARA+16 02040000 ZCRSVWK4 EQU ZCRWKARA+12 02041000 ZCRSVWK3 EQU ZCRWKARA+8 02042000 ZCRSVWK2 EQU ZCRWKARA+4 02043000 ZCRSVWK1 EQU ZCRWKARA 02044000 ZCRSVF25 EQU ZCRSVRTN+96 02045000 ZCRSVF24 EQU ZCRSVRTN+92 02046000 ZCRSVF23 EQU ZCRSVRTN+88 02047000 ZCRSVF22 EQU ZCRSVRTN+84 02048000 ZCRSVF21 EQU ZCRSVRTN+80 02049000 ZCRSVF20 EQU ZCRSVRTN+76 02050000 ZCRSVF19 EQU ZCRSVRTN+72 02051000 ZCRSVF18 EQU ZCRSVRTN+68 02052000 ZCRSVF17 EQU ZCRSVRTN+64 02053000 ZCRSVF16 EQU ZCRSVRTN+60 02054000 ZCRSVF15 EQU ZCRSVRTN+56 02055000 ZCRSVF14 EQU ZCRSVRTN+52 02056000 ZCRSVF13 EQU ZCRSVRTN+48 02057000 ZCRSVF12 EQU ZCRSVRTN+44 02058000 ZCRSVF11 EQU ZCRSVRTN+40 02059000 ZCRSVF10 EQU ZCRSVRTN+36 02060000 ZCRSVF9 EQU ZCRSVRTN+32 02061000 ZCRSVF8 EQU ZCRSVRTN+28 02062000 ZCRSVF7 EQU ZCRSVRTN+24 02063000 ZCRSVF6 EQU ZCRSVRTN+20 02064000 ZCRSVF5 EQU ZCRSVRTN+16 02065000 ZCRSVF4 EQU ZCRSVRTN+12 02066000 ZCRSVF3 EQU ZCRSVRTN+8 02067000 ZCRSVF2 EQU ZCRSVRTN+4 02068000 ZCRSVF1 EQU ZCRSVRTN 02069000 ZCRPVZB EQU ISTZCRR+52 02070000 ZCRZLB EQU ISTZCRR+48 02071000 ZCRBFPTR EQU ISTZCRR+44 02072000 ZCRCCWA EQU ISTZCRR+40 02073000 ZCRPSW EQU ZCRPARMS+15 02074000 ZCRPCHAR EQU ZCRPARMS+14 02075000 ZCRPRES2 EQU ZCRPCOD2 02076000 ZCRPMFGF EQU ZCRPCOD2 02077000 ZCRPFHDR EQU ZCRPCOD2 02078000 ZCRPPG2 EQU ZCRPCOD2 02079000 ZCRPRES EQU ZCRPCOD1 02080000 ZCRPCFTX EQU ZCRPCOD1 02081000 ZCRPBUF EQU ZCRPCOD1 02082000 ZCRPLSCB EQU ZCRPCOD1 02083000 ZCRPLSBQ EQU ZCRPLSBF 02084000 ZCRPFSB EQU ZCRPCOD1 02085000 ZCRPLNG EQU ZCRPCOD1 02086000 ZCRPPG EQU ZCRPCOD1 02087000 ZCRDTODA EQU ZCRDFRDA 02088000 ZCRMLNG EQU ZCRPARMS+8 02089000 ZCRTBPTR EQU ZCRPARMS+4 02090000 ZCRCBPTR EQU ZCRFBPTR 02091000 ZCRCRLCP EQU ISTZCRR+20 02092000 @NM00035 EQU ZCRSCPSW 02093000 ZCRSKIPT EQU ZCRSCPSW 02094000 ZCRFSBWE EQU ZCRSCPSW 02095000 ZCRPRCMP EQU ZCRSCPSW 02096000 ZCRLREQ EQU ZCRSCPSW 02097000 ZCRRJLCP EQU ZCRSCPSW 02098000 ZCRTPINV EQU ZCRSCPSW 02099000 ZCRTPEX EQU ZCRSCPSW 02100000 @NM00034 EQU ZCRIBPR 02101000 ZCR3270R EQU ZCRIBPR 02102000 ZCR3270 EQU ZCRIBPR 02103000 ZCRLCPFD EQU ZCRIBPR 02104000 ZCRLCPFR EQU ZCRIBPR 02105000 ZCRRELK EQU ZCRIBPR 02106000 ZCRERR EQU ZCRIBPR 02107000 ZCRNOBUF EQU ZCRIBPR 02108000 @NM00033 EQU ZCRPFLGS 02109000 ZCRQAHED EQU ZCRPFLGS 02110000 ZCRF1RES EQU ZCRGENSW 02111000 ZCRBRIS EQU ZCRGENSW 02112000 ZCRCLRBD EQU ZCRGENSW 02113000 ZCREXRES EQU ZCRGENSW 02114000 ZCRLCSYN EQU ZCRGENSW 02115000 ZCRRT06 EQU ZCRGENSW 02116000 ZCRTSW2 EQU ZCRGENSW 02117000 ZCRTSW1 EQU ZCRGENSW 02118000 ZCRINLCP EQU ZCRFLGS3 02119000 ZCRWRPTR EQU ZCRFLGS3 02120000 ZCRNOFRE EQU ZCRFLGS3 02121000 ZCREDRIV EQU ZCRFLGS3 02122000 ZCRDISC EQU ZCRFLGS3 02123000 ZCRTPDIS EQU ZCRFLGS3 02124000 ZCRTPCON EQU ZCRFLGS3 02125000 ZCRTIC EQU ZCRFLGS3 02126000 ZCRCNLXL EQU ZCRRESET 02127000 ZCRENDAN EQU ZCRSWFLD 02128000 ZCRENDXL EQU ZCRSWFLD 02129000 ZCRENDX EQU ZCRSWFLD 02130000 ZCROB1 EQU ZCRNDLCP 02131000 ZCRENDPR EQU ZCRSWFLD 02132000 ZCREXTYP EQU ZCRSWFLD 02133000 ZCRSLCP EQU ZCRENDSH 02134000 ZCRIF0E3 EQU ZCRFLGS2 02135000 ZCRIF0E2 EQU ZCRFLGS2 02136000 ZCRIF0E1 EQU ZCRFLGS2 02137000 ZCROB EQU ZCRFLGS2 02138000 ZCRFMSED EQU ZCRFLGS2 02139000 ZCRSHEDI EQU ZCRFLGS2 02140000 ZCRLOCAL EQU ZCRFLGS2 02141000 ZCRFEXIT EQU ZCRFLGS1 02142000 ZCRUNSOL EQU ZCRFLGS1 02143000 ZCRENDLP EQU ZCRFLGS1 02144000 ZCRNRMEX EQU ZCRFLGS1 02145000 ZCRWAIT EQU ZCRFLGS1 02146000 ZCRDEQSW EQU ZCRFLGS1 02147000 ZCRQUESW EQU ZCRFLGS1 02148000 ZCREXSW EQU ZCRFLGS1 02149000 ZCRFRRA EQU ISTZCRR+8 02150000 ZCRCHAIN EQU ISTZCRR+4 02151000 ZCRFLAG EQU ZCRCRR+3 02152000 ZCRLEN EQU ZCRCRR+1 02153000 ZCRID EQU ZCRCRR 02154000 CCFRSVD1 EQU CFCCRT 02155000 CCFCR2 EQU CFCCRT 02156000 CCFCRP EQU CFCCRT 02157000 CCFCR1 EQU CFCCRT 02158000 CCFCS2 EQU CFCCRT 02159000 CCFCS1 EQU CFCCRT 02160000 NCFRSVD EQU CFCNTRD 02161000 NCFCR2 EQU CFCNTRD 02162000 NCFCRP EQU CFCNTRD 02163000 NCFCR1 EQU CFCNTRD 02164000 NCFCS2 EQU CFCNTRD 02165000 NCFCS1 EQU CFCNTRD 02166000 ZSAZTRAC EQU ISTZSAVE+36 02167000 ZSAZSVVR EQU ISTZSAVE+12 02168000 ZSAZSVRR EQU ISTZSAVE+8 02169000 ZSAZSVFC EQU ISTZSAVE+4 02170000 ZSAZACTV EQU ZSAZSVMS 02171000 LCPFTYPE EQU LCPRPHA 02172000 LCPRSTQH EQU LCPLCCW 02173000 LCPCLREP EQU ISTLCPB+44 02174000 LCPUBFSB EQU LCPFLCCW 02175000 LCPRSV77 EQU ISTLCPB+39 02176000 LCPLCCWC EQU ISTLCPB+38 02177000 LCPRSV78 EQU LCPFLG1 02178000 LCPTRANS EQU LCPFLG1 02179000 LCPSTLB EQU LCPFLG1 02180000 LCPREDRV EQU LCPFLG1 02181000 LCPDIRPT EQU LCPFLG1 02182000 LCPINTER EQU LCPFLG1 02183000 LCPRESET EQU LCPFLG1 02184000 LCPSTYPE EQU ISTLCPB+36 02185000 LCPFSNCH EQU ISTLCPB+34 02186000 LCPFOSN EQU ISTLCPB+32 02187000 LCPTLBAD EQU ISTLCPB+28 02188000 LCPFDB2 EQU LCPFDBA+1 02189000 LCPFDB1 EQU LCPFDBA 02190000 LCPNXLCW EQU ISTLCPB+20 02191000 LCPDAF EQU LCPCID+2 02192000 LCPSAF EQU LCPCID 02193000 LCPLCCW1 EQU ISTLCPB+12 02194000 LCPRRCNT EQU LCPSEQ+1 02195000 LCPRRCCT EQU LCPSEQ 02196000 LCPATOP EQU LCPFLAG2 02197000 LCPFREE EQU LCPFLAG2 02198000 LCPDSTAT EQU LCPFLAG2 02199000 LCPEXRES EQU LCPFID0 02200000 LCPZRIMM EQU LCPTLBPI 02201000 LCPRSTRT EQU LCPFLAG2 02202000 LCPASYN EQU LCPFLAG2 02203000 LCPPRFLG EQU LCPFLAG2 02204000 LCPZMIRC EQU LCPRUCNT 02205000 LCPCHAI2 EQU LCPCHAIN+1 02206000 LCPCHNG EQU LCPCHAI1 02207000 LCPZRT0B EQU LCPMNRCD 02208000 LCPZRT0A EQU LCPMNRCD 02209000 LCPZRTL9 EQU LCPZRT09 02210000 LCPZRTL8 EQU LCPZRT08 02211000 LCPZRTL7 EQU LCPZRT07 02212000 LCPZRTL6 EQU LCPZRT06 02213000 LCPZRTL5 EQU LCPZRT05 02214000 LCPZRTL4 EQU LCPZRT04 02215000 LCPZRTL3 EQU LCPZRT03 02216000 LCPZRTL2 EQU LCPZRT02 02217000 LCPZRT01 EQU LCPFLAGS 02218000 LCPZRT00 EQU LCPFLAGS 02219000 LCPLNGTH EQU ISTLCPB+1 02220000 LCPTYPE EQU ISTLCPB 02221000 LCCWDATA EQU ISTLCCW+4 02222000 LCCWCNT EQU ISTLCCW+2 02223000 LCCWACI EQU LCCWFLAG 02224000 LCCWRFI EQU LCCWFLAG 02225000 LCCWPER EQU LCCWLSI 02226000 LCCWIDAT EQU LCCWFLAG 02227000 LCCWNTVC EQU LCCWFLAG 02228000 LCCWCKPT EQU LCCWFLAG 02229000 LCCWCC EQU LCCWFLAG 02230000 LCCWCD EQU LCCWFLAG 02231000 LCCWTYPE EQU LCCWCTL 02232000 LCCWMODE EQU LCCWCTL 02233000 LCCWSOP EQU LCCWRWOP 02234000 @NM00032 EQU LCCWRWOP 02235000 LCCWSD EQU LCCWOP 02236000 LCCWSI EQU LCCWOP 02237000 CSCRSV97 EQU ISTCSCRR+116 02238000 CSCRSV98 EQU ISTCSCRR+112 02239000 CSCRSV99 EQU ISTCSCRR+108 02240000 CCSRSVRD EQU CSCCRT+1 02241000 CNMCCZ EQU CSCCRT+1 02242000 CNMCCR EQU CSCCRT 02243000 CNMCCA EQU CSCCRT 02244000 CNMCCO EQU CSCCRT 02245000 CNMCCS EQU CSCCRT 02246000 CNMCCT EQU CSCCRT 02247000 CNMCCB EQU CSCCRT 02248000 CNMCCI EQU CSCCRT 02249000 NCSRSVRD EQU CSCNTRD+1 02250000 NNMCCZ EQU CSCNTRD+1 02251000 NNMCCR EQU CSCNTRD 02252000 NNMCCA EQU CSCNTRD 02253000 NNMCCO EQU CSCNTRD 02254000 NNMCCS EQU CSCNTRD 02255000 NNMCCT EQU CSCNTRD 02256000 NNMCCB EQU CSCNTRD 02257000 NNMCCI EQU CSCNTRD 02258000 CSCPRFX EQU ISTCSCRR 02259000 CRRRVPT5 EQU CRRSAREA+316 02260000 CRRRVPT4 EQU CRRSAREA+312 02261000 CRRRVPT3 EQU CRRSAREA+308 02262000 CRRRVPT2 EQU CRRSAREA+304 02263000 CRRRVPT1 EQU CRRSAREA+300 02264000 CRRRVCR2 EQU CRRSAREA+292 02265000 CRRRVCR1 EQU CRRSAREA+291 02266000 CRRXFNCD EQU CRRSAREA+290 02267000 CRRLDOCT EQU CRRSAREA+288 02268000 CRRBTLEN EQU CRRSAREA+284 02269000 CRRBLEN EQU CRRSAREA+282 02270000 CRRBRTCD EQU CRRSAREA+281 02271000 @NM00031 EQU CRRBFLGS 02272000 CRRBFLG1 EQU CRRBFLGS 02273000 CRRBLDAD EQU CRRSAREA+276 02274000 CRRBARAD EQU CRRSAREA+272 02275000 CRRRTN12 EQU CRRSAREA+268 02276000 CRRRTN11 EQU CRRSAREA+264 02277000 CRRRTN10 EQU CRRSAREA+260 02278000 CRRRTN9 EQU CRRSAREA+256 02279000 CRRRTN8 EQU CRRSAREA+252 02280000 CRRRTN7 EQU CRRSAREA+248 02281000 CRRRTN6 EQU CRRSAREA+244 02282000 CRRRTN5 EQU CRRSAREA+240 02283000 CRRRTN4 EQU CRRSAREA+236 02284000 CRRRTN3 EQU CRRSAREA+232 02285000 CRRRTN2 EQU CRRSAREA+228 02286000 CRRRTN1 EQU CRRSAREA+224 02287000 CRRRES1 EQU CRRSAREA+222 02288000 CRRLCNT EQU CRRSAREA+220 02289000 CRRATCVT EQU CRRSAREA+216 02290000 CRRVALCK EQU CRRSAREA+212 02291000 CRRARPL EQU CRRTRBUF+4 02292000 CRRBIND EQU CRRTRBUF+3 02293000 CRRTRRES EQU CRRTRBUF 02294000 CRRCLDO EQU CRRSAREA+200 02295000 CRRUECB EQU CRRSAREA+196 02296000 CRRLCPB EQU CRRSAREA+192 02297000 CRRCMDAD EQU CRRSAREA+188 02298000 CRRFMCB EQU CRRSAREA+184 02299000 CRRCLCCW EQU CRRSAREA+180 02300000 CRRESR2 EQU CRRESR+1 02301000 CRRESR1 EQU CRRESR 02302000 CRRDSB2 EQU CRRDSB+1 02303000 CRRDSB1 EQU CRRDSB 02304000 CRRDTACT EQU CRRSAREA+174 02305000 CRRRSV99 EQU CRRSAREA+173 02306000 CRRRDSOH EQU CRRFDB3 02307000 CRRRLG EQU CRRFDB3 02308000 CRRLGFRC EQU CRRFDB3 02309000 CRRRDEOT EQU CRRFDB3 02310000 CRRRDEOM EQU CRRFDB3 02311000 CRRRDEOB EQU CRRFDB3 02312000 CRRUNUSD EQU CRRFDB3 02313000 CRRUINPT EQU CRRFDB3 02314000 CRRSTSAV EQU CRRFDB2 02315000 CRRCUERR EQU CRRFDB2 02316000 CRRDLGFL EQU CRRFDB2 02317000 CRRIOERR EQU CRRFDB2 02318000 CRRDVUNS EQU CRRFDB2 02319000 CRRATND EQU CRRFDB2 02320000 CRRRVID EQU CRRFDB2 02321000 CRRERLK EQU CRRFDB2 02322000 CRRRTNCD EQU CRRFDBK1 02323000 CRRNSNA EQU CRRRTYPE 02324000 CRRDFSYN EQU CRRRTYPE 02325000 CRRRESP EQU CRRRTYPE 02326000 CRRDFASY EQU CRRRTYPE 02327000 CRRDBLCK EQU CRRRFLG1 02328000 CRRRPSBD EQU CRRRFLG1 02329000 CRRRPLOQ EQU CRRRFLG1 02330000 CRRRPLS EQU CRRRFLG1 02331000 CRRSW7 EQU CRRFLGS 02332000 CRRSW6 EQU CRRFLGS 02333000 CRRSW5 EQU CRRFLGS 02334000 CRRSW4 EQU CRRFLGS 02335000 CRRSW3 EQU CRRFLGS 02336000 CRRSW2 EQU CRRFLGS 02337000 CRRSW1 EQU CRRFLGS 02338000 CRRSW0 EQU CRRFLGS 02339000 CRRRSV04 EQU CRRFLGS4 02340000 CRRDLCCW EQU CRRFLGS3 02341000 CRRRESET EQU CRRFLGS3 02342000 CRRSUBBK EQU CRRFLGS3 02343000 CRRRSV08 EQU CRRFLGS3 02344000 CRRDEBQ EQU CRRFLGS3 02345000 CRRSTSPR EQU CRRFLGS3 02346000 CRRDREQ EQU CRRFLGS3 02347000 CRRDFDBK EQU CRRFLGS3 02348000 CRRDFSB EQU CRRFLGS2 02349000 CRRDPROC EQU CRRFLGS2 02350000 CRREXTS EQU CRRFLGS2 02351000 CRRELSRI EQU CRRFLGS2 02352000 CRRPOST EQU CRRFLGS2 02353000 CRRENDLW EQU CRRFLGS2 02354000 CRRPRGIP EQU CRRFLGS2 02355000 CRRDEXP EQU CRRFLGS2 02356000 CRRSOLRQ EQU CRRFLGS1 02357000 CRRREQP EQU CRRFLGS1 02358000 CRRCPROC EQU CRRFLGS1 02359000 CRRFINI EQU CRRFLGS1 02360000 CRRPREIO EQU CRRFLGS1 02361000 CRRINIO EQU CRRFLGS1 02362000 CRRFLDOS EQU CRRFLGS1 02363000 CRRDOCUR EQU CRRFLGS1 02364000 CRRRATS4 EQU CRRATS+7 02365000 @NM00030 EQU CRRSATS 02366000 CRRASC51 EQU CRRSATS 02367000 CRRASC40 EQU CRRSATS 02368000 CRRASC30 EQU CRRSATS 02369000 CRRASC21 EQU CRRSATS 02370000 CRRASC10 EQU CRRSATS 02371000 CRRASC01 EQU CRRSATS 02372000 @NM00029 EQU CRRRATS2 02373000 CRRPLIC EQU CRRRATS2 02374000 CRRRC81 EQU CRRRATS2 02375000 CRRRC80 EQU CRRRATS2 02376000 CRRRC65 EQU CRRRATS2 02377000 CRRRC63 EQU CRRRATS2 02378000 CRRRC55 EQU CRRRATS2 02379000 CRRRC54 EQU CRRRATS2 02380000 CRRRC53 EQU CRRRATS1 02381000 CRRRC52 EQU CRRRATS1 02382000 CRRRC51 EQU CRRRATS1 02383000 CRRRC30 EQU CRRRATS1 02384000 CRRRC26 EQU CRRRATS1 02385000 CRRRC23 EQU CRRRATS1 02386000 CRRRC22 EQU CRRRATS1 02387000 CRRRC21 EQU CRRRATS1 02388000 @NM00028 EQU CRRATS4 02389000 CRRC3X EQU CRRATS4 02390000 CRRC85 EQU CRRATS4 02391000 CRRC83 EQU CRRATS4 02392000 CRRC82 EQU CRRATS4 02393000 CRRC61 EQU CRRATS4 02394000 CRRC60 EQU CRRATS4 02395000 CRRC81 EQU CRRATS3 02396000 CRRC80 EQU CRRATS3 02397000 CRRC75 EQU CRRATS3 02398000 CRRC51 EQU CRRATS3 02399000 CRRC50 EQU CRRATS3 02400000 CRRC42 EQU CRRATS3 02401000 CRRC41 EQU CRRATS3 02402000 CRRC40 EQU CRRATS3 02403000 CRRC32 EQU CRRATS2 02404000 CRRC31 EQU CRRATS2 02405000 CRRC30 EQU CRRATS2 02406000 CRRC25 EQU CRRATS2 02407000 CRRC24 EQU CRRATS2 02408000 CRRC23 EQU CRRATS2 02409000 CRRC22 EQU CRRATS2 02410000 CRRC21 EQU CRRATS2 02411000 CRRC20 EQU CRRATS1 02412000 CRRC13 EQU CRRATS1 02413000 CRRC12 EQU CRRATS1 02414000 CRRC11 EQU CRRATS1 02415000 CRRC10 EQU CRRATS1 02416000 CRRC02 EQU CRRATS1 02417000 CRRC01 EQU CRRATS1 02418000 CRRC00 EQU CRRATS1 02419000 CRRRMAS4 EQU CRRMAS+7 02420000 @NM00027 EQU CRRSMAS 02421000 CRRMSC51 EQU CRRSMAS 02422000 CRRMSC40 EQU CRRSMAS 02423000 CRRMSC30 EQU CRRSMAS 02424000 CRRMSC21 EQU CRRSMAS 02425000 CRRMSC10 EQU CRRSMAS 02426000 CRRMSC01 EQU CRRSMAS 02427000 @NM00026 EQU CRRRMAS2 02428000 CRRRM81 EQU CRRRMAS2 02429000 CRRRM80 EQU CRRRMAS2 02430000 CRRRM65 EQU CRRRMAS2 02431000 CRRRM63 EQU CRRRMAS2 02432000 CRRRM55 EQU CRRRMAS2 02433000 CRRRM54 EQU CRRRMAS2 02434000 CRRRM53 EQU CRRRMAS1 02435000 CRRRM52 EQU CRRRMAS1 02436000 CRRRM51 EQU CRRRMAS1 02437000 CRRRM30 EQU CRRRMAS1 02438000 CRRRM26 EQU CRRRMAS1 02439000 CRRRM23 EQU CRRRMAS1 02440000 CRRRM22 EQU CRRRMAS1 02441000 CRRRM21 EQU CRRRMAS1 02442000 @NM00025 EQU CRRMAS4 02443000 CRRM3X EQU CRRMAS4 02444000 CRRM85 EQU CRRMAS4 02445000 CRRM83 EQU CRRMAS4 02446000 CRRM82 EQU CRRMAS4 02447000 CRRM61 EQU CRRMAS4 02448000 CRRM60 EQU CRRMAS4 02449000 CRRM81 EQU CRRMAS3 02450000 CRRM80 EQU CRRMAS3 02451000 CRRM75 EQU CRRMAS3 02452000 CRRM51 EQU CRRMAS3 02453000 CRRM50 EQU CRRMAS3 02454000 CRRM42 EQU CRRMAS3 02455000 CRRM41 EQU CRRMAS3 02456000 CRRM40 EQU CRRMAS3 02457000 CRRM32 EQU CRRMAS2 02458000 CRRM31 EQU CRRMAS2 02459000 CRRM30 EQU CRRMAS2 02460000 CRRM25 EQU CRRMAS2 02461000 CRRM24 EQU CRRMAS2 02462000 CRRM23 EQU CRRMAS2 02463000 CRRM22 EQU CRRMAS2 02464000 CRRM21 EQU CRRMAS2 02465000 CRRM20 EQU CRRMAS1 02466000 CRRM13 EQU CRRMAS1 02467000 CRRM12 EQU CRRMAS1 02468000 CRRM11 EQU CRRMAS1 02469000 CRRM10 EQU CRRMAS1 02470000 CRRM02 EQU CRRMAS1 02471000 CRRM01 EQU CRRMAS1 02472000 CRRM00 EQU CRRMAS1 02473000 CRRFSB EQU CRRSAREA+144 02474000 CRRSAVE1 EQU CRRSAREA+72 02475000 CRRSAVE EQU CRRSAREA 02476000 CRRRSV22 EQU ISTDCCRR+4 02477000 CRRCRR EQU ISTDCCRR 02478000 PFCRSV01 EQU ISTPFCRR+13 02479000 PFCFTA EQU ISTPFCRR+12 02480000 CRRFRR EQU PFCFRRO 02481000 CRRCHAIN EQU PFCCRRO 02482000 CRRLEN EQU PFCCRRLN 02483000 PFCRSV10 EQU PFCCRR+1 02484000 CRRID EQU PFCCRRID 02485000 PATRSV01 EQU PATFLAGA 02486000 PATUSEFG EQU PATFLAGA 02487000 PATRDCNT EQU ISTPAT+6 02488000 PATGRPID EQU ISTPAT+5 02489000 PATPTHID EQU ISTPAT+4 02490000 PATDINDX EQU ISTPAT+2 02491000 PATGINDX EQU ISTPAT 02492000 GNTGRPNM EQU ISTGNT 02493000 DNTTELNO EQU ISTDNT+1 02494000 DNTCTDIG EQU ISTDNT 02495000 RLSRSV02 EQU ISTRLS+140 02496000 RLSRSV01 EQU ISTRLS+138 02497000 RLSCTELU EQU ISTRLS+136 02498000 RLSPRE EQU ISTRLS 02499000 RDARSVPT EQU ISTRDA+84 02500000 RDAPUBI EQU ISTRDA+83 02501000 RDADFCUA EQU ISTRDA+80 02502000 RDACTPCC EQU ISTRDA+79 02503000 RDADACUA EQU ISTRDA+76 02504000 RDALUBA EQU RDAUCBAD+1 02505000 RDACHQI EQU RDAUCBAD 02506000 RDARSV01 EQU RDAFLAG 02507000 RDARBISA EQU RDAFLAG 02508000 RDAPRE EQU ISTRDA 02509000 RSWRSV01 EQU ISTRSW+152 02510000 RSWRSV02 EQU ISTRSW+150 02511000 RSWCTELU EQU ISTRSW+148 02512000 RSWGRUPZ EQU ISTRSW+146 02513000 RSWDIALZ EQU ISTRSW+144 02514000 RSWGRUPT EQU ISTRSW+140 02515000 RSWDIALT EQU ISTRSW+136 02516000 RSWPRE EQU ISTRSW 02517000 RLXRSV03 EQU ISTRLX+80 02518000 RLXRSV02 EQU ISTRLX+77 02519000 RLXRSV01 EQU RLXFLAGA 02520000 RLXINUSE EQU RLXFLAGA 02521000 RLXNLUX EQU ISTRLX+72 02522000 RLXPRE EQU ISTRLX 02523000 RPXRSV01 EQU ISTRPX+80 02524000 RPXRSV02 EQU ISTRPX+77 02525000 RPXMAXLU EQU ISTRPX+76 02526000 RPXFLUX EQU ISTRPX+72 02527000 RPXPRE EQU ISTRPX 02528000 RLURSV02 EQU ISTRLU+172 02529000 RLULGMOD EQU ISTRLU+164 02530000 RLUMODEP EQU RLUMODET+8 02531000 RLUMODEN EQU RLUMODET 02532000 RLUUSSPT EQU RLUUSSTB+8 02533000 RLUUSSNM EQU RLUUSSTB 02534000 RLURSV01 EQU ISTRLU+137 02535000 RLULOCAD EQU ISTRLU+136 02536000 RLUNCPPM EQU RLUNCPPC+1 02537000 RLUNCPPN EQU RLUNCPPC 02538000 RLUPACEM EQU RLUPACE+1 02539000 RLUPACEN EQU RLUPACE 02540000 RLUINTA EQU ISTRLU+128 02541000 RLUSSCFM EQU ISTRLU+127 02542000 RLUCRRSV EQU RLUCRFLG 02543000 RLUACTLU EQU RLUCRFLG 02544000 RLURSV00 EQU RLUFLAG 02545000 RLUGSTAT EQU RLUFLAG 02546000 RLUBATCH EQU RLUFLAG 02547000 RLURBISA EQU RLUFLAG 02548000 RLUTYPE EQU ISTRLU+124 02549000 RLUCRPR EQU ISTRLU 02550000 RCCRVPT2 EQU ISTRCC+144 02551000 RCCXTOSW EQU ISTRCC+140 02552000 RCCSWTOX EQU ISTRCC+136 02553000 RCCRSPT2 EQU ISTRCC+133 02554000 RCCADDR EQU ISTRCC+132 02555000 RCCPASSL EQU ISTRCC+131 02556000 RCCMXOUT EQU ISTRCC+130 02557000 RCCMXDAT EQU ISTRCC+128 02558000 RCCINDEX EQU ISTRCC+126 02559000 RCCPATHZ EQU ISTRCC+124 02560000 RCCPATHT EQU ISTRCC+120 02561000 RCCDPQ EQU ISTRCC+116 02562000 RCCTPAB EQU ISTRCC+112 02563000 RCCRSV02 EQU ISTRCC+109 02564000 RCCCRRSV EQU RCCCRFLG 02565000 RCCCTCFL EQU RCCCRFLG 02566000 RCCACTPU EQU RCCCRFLG 02567000 RCCNCSPL EQU ISTRCC+104 02568000 RCCRPHCN EQU ISTRCC+100 02569000 RCCEPAB EQU ISTRCC+96 02570000 RCCDPAB EQU ISTRCC+92 02571000 RCCVPAB EQU ISTRCC+88 02572000 @NM00024 EQU ISTRCC+87 02573000 RCCSESCT EQU ISTRCC+86 02574000 RCCIDNUM EQU RCCID48+3 02575000 RCCIDBLK EQU RCCID48+2 02576000 RCCIDPA2 EQU RCCID48+1 02577000 RCCIDPUT EQU RCCID48 02578000 RCCIDPA1 EQU RCCSTAID 02579000 RCCCTELU EQU ISTRCC+76 02580000 RCCCNCNT EQU ISTRCC+75 02581000 RCCRTGOH EQU RCCFLAGB 02582000 RCCBRKCN EQU RCCFLAGB 02583000 RCCRESET EQU RCCFLAGB 02584000 RCCFINAL EQU RCCFLAGB 02585000 RCCBNNSP EQU RCCFLAGB 02586000 RCCIRETR EQU RCCFLAGB 02587000 RCCDIALP EQU RCCFLAGB 02588000 RCCDSTCT EQU RCCFLAGB 02589000 RCCCTPGD EQU RCCFLAG 02590000 RCCPRGDN EQU RCCFLAG 02591000 RCCOUERP EQU RCCFLAG 02592000 RCCOHIMM EQU RCCFLAG 02593000 RCCLDISC EQU RCCFLAG 02594000 RCCERPIP EQU RCCFLAG 02595000 RCCCUDIE EQU RCCFLAG 02596000 RCCRBISA EQU RCCFLAG 02597000 RCCTYPE EQU ISTRCC+72 02598000 RCCPRE EQU ISTRCC 02599000 DOTADTRM EQU ISTDOT 02600000 RDSADDOT EQU ISTRDS+76 02601000 RDSCTATR EQU ISTRDS+74 02602000 RDSCTTRM EQU ISTRDS+72 02603000 RDSPRE EQU ISTRDS 02604000 RINRSV05 EQU ISTRIN+156 02605000 RINRSV04 EQU ISTRIN+152 02606000 RINLOCRN EQU ISTRIN+148 02607000 RINRSV02 EQU ISTRIN+145 02608000 RTRCNCNT EQU RINCNCNT 02609000 RTRNCSPL EQU RINNCSPL 02610000 RTRRPHCN EQU RINRPHCN 02611000 RTRVPAB EQU RINVPAB 02612000 RTRREMOT EQU RINREMOT 02613000 RTRRLDAF EQU RINRLDAF 02614000 RTRNODID EQU RINNODID 02615000 RINRSV01 EQU RINDFD 02616000 RTRLDISC EQU RINLDISC 02617000 RTRNODEF EQU RINNODEF 02618000 RTRREMPO EQU RINREMPO 02619000 RINCRPRE EQU ISTRIN 02620000 RTRRSV04 EQU ISTRTR+210 02621000 RTRLCTI EQU ISTRTR+209 02622000 RTRIDCAS EQU RTRBSCID+1 02623000 RTRIDLEN EQU RTRBSCID 02624000 RTRRSVDD EQU ISTRTR+181 02625000 RTRRDFG EQU ISTRTR+180 02626000 RTRDIAA EQU ISTRTR+176 02627000 RTRPOLA EQU ISTRTR+172 02628000 RTRCADDR EQU ISTRTR+164 02629000 RTRCTADR EQU ISTRTR+162 02630000 RTRCTPOL EQU ISTRTR+160 02631000 RTRCTDIA EQU ISTRTR+158 02632000 RTRRSV03 EQU ISTRTR+156 02633000 RTRRVPT1 EQU ISTRTR+152 02634000 RTRBHSN1 EQU ISTRTR+144 02635000 RTRCRSV2 EQU RTRCRFLG 02636000 RTRDTRLM EQU RTRLSCMD 02637000 RTRCRSV1 EQU RTRCRFLG 02638000 RTRTRMAX EQU ISTRTR+142 02639000 RTRRSV24 EQU RTRRDFF 02640000 RTRRFDEK EQU RTRRDFF 02641000 RTRRFANK EQU RTRRDFF 02642000 RTRRFPFK EQU RTRRDFF 02643000 RTRRFPEN EQU RTRRDFF 02644000 RTRRFXCT EQU RTRRDFF 02645000 RTRRESCT EQU RTRRDFE 02646000 RTRRESUP EQU RTRRDFE 02647000 RTRREATT EQU RTRRDFE 02648000 RTRRECHK EQU RTRRDFE 02649000 RTRREACR EQU RTRRDFE 02650000 RTRRSV0A EQU RTRRDFE 02651000 RTRREBRK EQU RTRRDFE 02652000 RTRRSV11 EQU RTRRDFD 02653000 RTRRSV10 EQU RTRRDFD 02654000 RTRRDBHI EQU RTRRDFD 02655000 RTRRDBHD EQU RTRRDFD 02656000 RTRRDBHN EQU RTRRDFD 02657000 RTRRSV23 EQU RTRRDFC 02658000 RTRRCXMS EQU RTRRDFC 02659000 RTRRCMSG EQU RTRRDFC 02660000 RTRRCBLK EQU RTRRDFC 02661000 RTRRCPT3 EQU RTRRDFC 02662000 RTRRCIT2 EQU RTRRDFC 02663000 RTRRCIT1 EQU RTRRDFC 02664000 RTRRSV32 EQU RTRRDFB 02665000 RTRRBEND EQU RTRRDFB 02666000 RTRRBECT EQU RTRRDFB 02667000 RTRRSV02 EQU RTRRDFA 02668000 RTRRACTR EQU RTRRDFA 02669000 RTRRSV60 EQU RTRRDFA 02670000 RTRRACDT EQU RTRRDFA 02671000 RTRRAPT3 EQU RTRRAALL 02672000 RTRRAPT2 EQU RTRRAALL 02673000 RTRRAPT1 EQU RTRRAALL 02674000 RTRRAATN EQU RTRRDFA 02675000 RTRRSV45 EQU ISTRTR+132 02676000 RTRRSV01 EQU ISTRTR+130 02677000 RTRCTECM EQU ISTRTR+128 02678000 RTRADRPT EQU RTRADR+1 02679000 RTRRSV22 EQU RTRFLAG 02680000 RTRVTERM EQU RTRFLAG 02681000 RTRRSV51 EQU RTRFLAG 02682000 RTRRBISA EQU RTRFLAG 02683000 RTRRSV21 EQU RTRFLAG 02684000 RTRCRPR EQU ISTRTR 02685000 RCLRVPT2 EQU ISTRCL+92 02686000 RCLRVPT1 EQU ISTRCL+88 02687000 RCLGPOLA EQU ISTRCL+84 02688000 RCLCTNGP EQU ISTRCL+82 02689000 RCLRSV01 EQU ISTRCL+80 02690000 RCLCTECM EQU ISTRCL+78 02691000 RCLCTETR EQU ISTRCL+76 02692000 RCLGPADR EQU RCLADR+1 02693000 RCLRSV33 EQU RCLFLAG 02694000 RCLBATCH EQU RCLFLAG 02695000 RCLRBISA EQU RCLFLAG 02696000 RCLRSV22 EQU RCLFLAG 02697000 RCLPRE EQU ISTRCL 02698000 RPTRSV03 EQU ISTRPT+156 02699000 RPTRSV02 EQU ISTRPT+152 02700000 RPTNSNSV EQU ISTRPT+148 02701000 RPTPTHCT EQU ISTRPT+146 02702000 RPTPEPCT EQU ISTRPT+144 02703000 RPTDAFSV EQU ISTRPT+142 02704000 RPTRSV01 EQU ISTRPT+141 02705000 RPTISTAT EQU RPTFLAG1 02706000 RPTDYNAM EQU RPTFLAG1 02707000 RPTVYIMM EQU RPTFLAG1 02708000 RPTVIODN EQU RPTFLAG1 02709000 RPTONLIN EQU RPTFLAG1 02710000 RPTHLVPD EQU RPTFLAG1 02711000 RPTVRYPD EQU RPTFLAG1 02712000 RPTASLEP EQU RPTFLAG1 02713000 RPTUTERM EQU ISTRPT+136 02714000 RPTATERM EQU ISTRPT+132 02715000 RPTDIVT EQU RPTDITT 02716000 RPTCTNM EQU ISTRPT+120 02717000 RPTLNDAF EQU RPTLNCID+2 02718000 RPTLNSAF EQU RPTLNCID 02719000 RPTLN EQU ISTRPT 02720000 RLNRVPT2 EQU ISTRLN+112 02721000 RLNNCSPL EQU ISTRLN+108 02722000 RLNX2SW EQU ISTRLN+104 02723000 @NM00023 EQU ISTRLN+103 02724000 RLNCRRSV EQU RLNCRFLG 02725000 RLNSWEP EQU RLNCRFLG 02726000 RLNSVSKP EQU RLNLSCMD 02727000 RLNSESLM EQU RLNLSCMD 02728000 RLNNPRLM EQU RLNLSCMD 02729000 RLNSWNCP EQU RLNCRFLG 02730000 RLNACTLN EQU RLNCRFLG 02731000 RLNPAUSE EQU ISTRLN+101 02732000 RLNPOLMT EQU ISTRLN+100 02733000 RLNACTSN EQU ISTRLN+98 02734000 RLNRESV1 EQU ISTRLN+97 02735000 RLNACTRM EQU ISTRLN+96 02736000 RLNCTSES EQU ISTRLN+95 02737000 RLNRDSLM EQU ISTRLN+94 02738000 RLNAUTOA EQU ISTRLN+92 02739000 RLNRDFD EQU RLNRDF+3 02740000 RLNRDFC EQU RLNRDF+2 02741000 RLNMULTP EQU RLNRDFB 02742000 RLNRATRN EQU RLNRDFB 02743000 RLNRAPOL EQU RLNRDFB 02744000 RLNTTV EQU RLNRDFB 02745000 RLNRSV0B EQU RLNRDFB 02746000 RLNAUTOD EQU RLNRDFB 02747000 RLNANSWR EQU RLNRDFB 02748000 RLNRBUSE EQU RLNRDFB 02749000 RLNRAPEP EQU RLNRDFA 02750000 RLNRANCP EQU RLNRDFA 02751000 RLNRAEP EQU RLNRDFA 02752000 RLNIDV EQU RLNRDFA 02753000 RLNPORT EQU RLNRDFA 02754000 RLNGANSW EQU RLNRDFA 02755000 RLNRACAN EQU RLNRACNT 02756000 RLNRACAT EQU RLNRACNT 02757000 RLNRSV04 EQU RLNSTAT2 02758000 RLNINUSE EQU RLNSTAT2 02759000 RLNOHIN EQU RLNSTAT2 02760000 RLNRSV03 EQU RLNSTAT1 02761000 RLNVD EQU RLNSTAT1 02762000 RLNINOPP EQU RLNSTAT1 02763000 RLNINOPL EQU RLNSTAT1 02764000 RLNLRST EQU RLNSTAT1 02765000 RLNTRAP EQU RLNSTAT1 02766000 RLNACTCT EQU ISTRLN+84 02767000 RLNCTECM EQU ISTRLN+82 02768000 RLNCTEIN EQU ISTRLN+80 02769000 RLNCTETR EQU ISTRLN+78 02770000 RLNCTECL EQU ISTRLN+76 02771000 RLNCUA EQU RLNUCBAD 02772000 RLNRSV01 EQU RLNFLAG 02773000 RLNRBISA EQU RLNFLAG 02774000 RLNEAM EQU RLNFLAG 02775000 RLNPRE EQU ISTRLN 02776000 RGPRVPT2 EQU ISTRGP+88 02777000 RGPRVPT1 EQU ISTRGP+84 02778000 RGPCTECM EQU ISTRGP+82 02779000 RGPCTEIN EQU ISTRGP+80 02780000 RGPCTETR EQU ISTRGP+78 02781000 RGPCTECL EQU ISTRGP+76 02782000 RGPCTELN EQU ISTRGP+74 02783000 RGPRSV03 EQU ISTRGP+73 02784000 RGPRSV02 EQU RGPFLG 02785000 RGPASDLC EQU RGPFLG 02786000 RGPABSC EQU RGPFLG 02787000 RGPASS EQU RGPFLG 02788000 RGPADIL EQU RGPFLG 02789000 RGPPRE EQU ISTRGP 02790000 RRNRINNM EQU ISTRRN+248 02791000 @NM00022 EQU ISTRRN+247 02792000 RRNRDCUA EQU ISTRRN+244 02793000 RRNLASTE EQU ISTRRN+240 02794000 RRNNCSPL EQU ISTRRN+236 02795000 RRNRPLPT EQU ISTRRN+232 02796000 RRNMSIZE EQU ISTRRN+228 02797000 RRNNCPNM EQU ISTRRN+221 02798000 RRNCTPCC EQU ISTRRN+220 02799000 RRNHBUFS EQU ISTRRN+218 02800000 RRNHLENT EQU RRNHPRE+1 02801000 RRNHLENH EQU RRNHPRE 02802000 RRNNMNCP EQU ISTRRN+208 02803000 RRNDELAY EQU ISTRRN+206 02804000 RRNRSV04 EQU ISTRRN+200 02805000 RRNRSV88 EQU RRNNMDPD+7 02806000 RRNPUBI EQU RRNNMDPD+6 02807000 RRNDPLUB EQU RRNNMDPD 02808000 RRNEPADR EQU ISTRRN+190 02809000 RRNCPLUB EQU ISTRRN+184 02810000 RRNFLUX EQU ISTRRN+180 02811000 RRNRSV05 EQU RRNCMFD 02812000 RRNREMPO EQU RRNCMFD 02813000 RRNCDREC EQU RRNCMFD 02814000 RRNCDDSI EQU RRNCMFD 02815000 RRNCDBCK EQU RRNCMFD 02816000 RRNCDDTL EQU RRNCMFD 02817000 RRNCDSTD EQU RRNCMFD 02818000 RRNCDCSP EQU RRNCMFD 02819000 RRNCCCSL EQU RRNCMFC 02820000 RRNCCSIM EQU RRNCMFC 02821000 RRNCCRCM EQU RRNCMFC 02822000 RRNCCRIM EQU RRNCMFC 02823000 RRNCCCRC EQU RRNCMFC 02824000 RRNCCRST EQU RRNCMFC 02825000 RRNCCRDQ EQU RRNCMFC 02826000 RRNCCRCN EQU RRNCMFC 02827000 RRNCBALT EQU RRNCMFB 02828000 RRNCBMOD EQU RRNCMFB 02829000 RRNCBNPL EQU RRNCMFB 02830000 RRNCBRLS EQU RRNCMFB 02831000 RRNCBRDS EQU RRNCMFB 02832000 RRNCBDLR EQU RRNCMFB 02833000 RRNCBDLH EQU RRNCMFB 02834000 RRNCBDLO EQU RRNCMFB 02835000 RRNCADGO EQU RRNCMFA 02836000 RRNCADTD EQU RRNCMFA 02837000 RRNCACDT EQU RRNCMFA 02838000 RRNCAMBH EQU RRNCMFA 02839000 RRNCAATI EQU RRNCMFA 02840000 RRNCAATG EQU RRNCMFA 02841000 RRNCAATD EQU RRNCMFA 02842000 RRNCAALL EQU RRNCMFA 02843000 RRNRSV55 EQU RRNRDF+3 02844000 RRNPTASL EQU RRNRDFB+1 02845000 RRNRSV01 EQU RRNRDFB+1 02846000 RRNVYDON EQU RRNRDFB+1 02847000 RRNRBBUP EQU RRNRDFB+1 02848000 RRNRSV03 EQU RRNRDFB 02849000 RRNRBCT2 EQU RRNRDFB 02850000 RRNRBCT1 EQU RRNRDFB 02851000 RRNRBSEC EQU RRNRDFB 02852000 RRNRBCCT EQU RRNRDFB 02853000 RRNRBCCL EQU RRNRDFB 02854000 RRNRSV02 EQU RRNRDFB 02855000 RRNRBMDL EQU RRNRDFB 02856000 RRNRAPEP EQU RRNRDFA 02857000 RRNRANCP EQU RRNRDFA 02858000 RRNRBREM EQU RRNRDFA 02859000 RRNRAOLT EQU RRNRDFA 02860000 RRNRASYN EQU RRNRDFA 02861000 RRNRADMP EQU RRNRDFA 02862000 RRNRAIPL EQU RRNRDFA 02863000 RRNRASHT EQU RRNRDFA 02864000 RRNCTENT EQU ISTRRN+170 02865000 RRNCTECM EQU ISTRRN+168 02866000 RRNCTEIN EQU ISTRRN+166 02867000 RRNCTETR EQU ISTRRN+164 02868000 RRNCTECL EQU ISTRRN+162 02869000 RRNCTELI EQU ISTRRN+160 02870000 RRNCTEGP EQU ISTRRN+158 02871000 RRNCTBHS EQU ISTRRN+156 02872000 RRNBHSET EQU ISTRRN+152 02873000 RRNTRENT EQU ISTRRN+148 02874000 RRNRSV22 EQU ISTRRN+147 02875000 RRNRNCUA EQU ISTRRN+144 02876000 RRNGRPA EQU ISTRRN+140 02877000 RRNLUBA EQU RRNUCBAD+1 02878000 RRNCHQI EQU RRNUCBAD 02879000 RRNRSV11 EQU RRNFLAG 02880000 RRNDSTCT EQU RRNFLAG 02881000 RRNERPIP EQU RRNFLAG 02882000 RRNLCDIP EQU RRNFLAG 02883000 RRNLCDIE EQU RRNFLAG 02884000 RRNLCSIP EQU RRNFLAG 02885000 RRNRBISA EQU RRNFLAG 02886000 RRNRSV89 EQU RRNFLAG 02887000 RRNPRE EQU ISTRRN 02888000 RLCRVPT2 EQU ISTRLC+80 02889000 RLCRVPT1 EQU ISTRLC+79 02890000 RLCLCCUA EQU ISTRLC+76 02891000 RLCUCBAD EQU RLCADR+1 02892000 RLCRSVDE EQU RLCFLAG 02893000 RLCACNT EQU RLCFLAG 02894000 RLCRSV14 EQU RLCFLAG 02895000 RLCRBISA EQU RLCFLAG 02896000 RLCRSV22 EQU RLCFLAG 02897000 RLCPRE EQU ISTRLC 02898000 RAPRVPT2 EQU ISTRAP+116 02899000 RAPRVPT1 EQU ISTRAP+112 02900000 RAPBFACT EQU ISTRAP+111 02901000 RAPRSV17 EQU RAPFLGC 02902000 RAPRSV16 EQU RAPFLGC 02903000 RAPRSV15 EQU RAPFLGC 02904000 RAPRSV14 EQU RAPFLGC 02905000 RAPRSV13 EQU RAPFLGC 02906000 RAPRSV12 EQU RAPFLGC 02907000 RAPRSV11 EQU RAPFLGC 02908000 RAPRSV10 EQU RAPFLGC 02909000 RAPRSV09 EQU RAPFLGB 02910000 RAPASPO EQU RAPFLGB 02911000 RAPAPPO EQU RAPFLGB 02912000 RAPAACQ EQU RAPFLGB 02913000 RAPAPRMT EQU RAPFLGB 02914000 RAPAPASS EQU RAPFLGB 02915000 RAPABLCK EQU RAPFLGB 02916000 RAPALLF EQU RAPFLGB 02917000 RAPRSV06 EQU RAPFLG 02918000 RAPRSV05 EQU RAPFLG 02919000 RAPRSV04 EQU RAPFLG 02920000 RAPRSV03 EQU RAPFLG 02921000 RAPATLGN EQU RAPFLG 02922000 RAPASLGI EQU RAPFLG 02923000 RAPAQUI EQU RAPFLG 02924000 RAPABLGN EQU RAPFLG 02925000 RAPACEQD EQU ISTRAP+106 02926000 RAPTRPRE EQU ISTRAP+104 02927000 RAPACEAP EQU ISTRAP+100 02928000 RAPICEAQ EQU ISTRAP+96 02929000 RAPICEAC EQU ISTRAP+92 02930000 RAPICELG EQU ISTRAP+88 02931000 RAPAPPWD EQU ISTRAP+80 02932000 RAPACDEB EQU ISTRAP+76 02933000 RAPACBA EQU ISTRAP+72 02934000 RAPPRE EQU ISTRAP 02935000 RDTVSRPL EQU ISTRDT+132 02936000 RDTCRSPW EQU ISTRDT+124 02937000 RDTCRSDS EQU ISTRDT+116 02938000 @NM00021 EQU ISTRDT+113 02939000 RRNSTCNT EQU RDTSTCNT 02940000 RRNVYRPH EQU RDTVYRPH 02941000 RDTTPAB EQU ISTRDT+104 02942000 RDTDPAB EQU ISTRDT+100 02943000 RDTEPAB EQU ISTRDT+96 02944000 RDTVPAB EQU ISTRDT+92 02945000 RDTRSV01 EQU RDTFLAGB 02946000 RDTBHSET EQU RDTFLAGB 02947000 RDTCTCFL EQU RDTFLAGB 02948000 RDTCTPGD EQU RDTFLAGB 02949000 RDTPRGDN EQU RDTFLAGB 02950000 RDTOUERP EQU RDTFLAGB 02951000 RDTLGCT EQU ISTRDT+90 02952000 RDTNODID EQU ISTRDT+89 02953000 RDTMAXID EQU ISTRDT+88 02954000 RDTCTSNT EQU ISTRDT+86 02955000 RDTFLAGS EQU ISTRDT+84 02956000 RDTBACK EQU ISTRDT+80 02957000 RDTFORW EQU ISTRDT+76 02958000 RDTLEN EQU RDTPLEN+1 02959000 RDTPRILS EQU RDTPRIOR 02960000 RDTPRISW EQU RDTPRIOR 02961000 RDTPRIRN EQU RDTPRIOR 02962000 RDTPRILC EQU RDTPRIOR 02963000 RDTPRIAP EQU RDTPRIOR 02964000 @NM00020 EQU RDTPRIOR 02965000 RDTPRE EQU ISTRDT 02966000 RCPRSV05 EQU ISTRCPRE+120 02967000 RCPRSV04 EQU ISTRCPRE+116 02968000 RCPRSV03 EQU ISTRCPRE+112 02969000 RCPINTA EQU RCPLGNIN+16 02970000 RCPLGNCT EQU RCPLGNIN+8 02971000 RCPLGNAP EQU RCPLGNIN 02972000 @NM00019 EQU RCPPMODE 02973000 RCPRRECD EQU RCPPMODE 02974000 RCPRBASC EQU RCPPMODE 02975000 RCPBFLIM EQU ISTRCPRE+90 02976000 RCPBHSI2 EQU ISTRCPRE+89 02977000 RCPBHSI1 EQU ISTRCPRE+88 02978000 RCPACETR EQU ISTRCPRE+84 02979000 RCPICEAQ EQU ISTRCPRE+80 02980000 RCPLNAPA EQU ISTRCPRE+76 02981000 RCPICELN EQU ISTRCPRE+72 02982000 RCPPRE EQU ISTRCPRE 02983000 RPRCONID EQU ISTRPRE+63 02984000 RPRCLVPD EQU RPRFLAGC 02985000 RPRINIMM EQU RPRFLAGD 02986000 RPRRSV05 EQU RPRFLAGD 02987000 @NM00018 EQU RPRFLAGD 02988000 RPRRSON EQU RPRFLAGD 02989000 RPRCONCT EQU RPRFLAGD 02990000 RPRLTASN EQU RPRFLAGD 02991000 RPRPTHCT EQU ISTRPRE+60 02992000 RPRSWDAF EQU ISTRPRE+58 02993000 RPRSTPCT EQU ISTRPRE+56 02994000 RPRRVPT1 EQU ISTRPRE+52 02995000 RPRDEVCH EQU ISTRPRE+44 02996000 RPRNCBA EQU ISTRPRE+40 02997000 RPRNSNEA EQU ISTRPRE+36 02998000 RPRLGONB EQU ISTRPRE+32 02999000 RPRLGONF EQU ISTRPRE+28 03000000 RPRHDTYP EQU ISTRPRE+27 03001000 RPRTIOCT EQU ISTRPRE+26 03002000 RPRPEPCT EQU ISTRPRE+24 03003000 RPRRSV03 EQU RPRCAUSE 03004000 RPRRSYNC EQU RPRCAUSE 03005000 RPRCRCPT EQU RPRCAUSE 03006000 RPRNOSRT EQU RPRCAUSE 03007000 RPRINTST EQU RPRFLAGB 03008000 RPRVYIMM EQU RPRFLAGB 03009000 RPRHLVPD EQU RPRFLAGB 03010000 RPRONLIN EQU RPRFLAGB 03011000 RPRVIODN EQU RPRFLAGB 03012000 RPRAOPN EQU RPRFLAGB 03013000 RPRENTVT EQU RPRFLAGB 03014000 RPRENTVH EQU RPRFLAGB 03015000 RPRLIVE EQU RPRFLAGA 03016000 RPRVRYPD EQU RPRFLAGA 03017000 RPRENTED EQU RPRFLAGA 03018000 RPRENTIO EQU RPRFLAGA 03019000 RPRENTBF EQU RPRFLAGA 03020000 RPRTIED EQU RPRFLAGA 03021000 RPRINV EQU RPRFLAGA 03022000 RPRACT EQU RPRFLAGA 03023000 RPRENTRY EQU ISTRPRE+20 03024000 RPRPELEN EQU ISTRPRE+18 03025000 RPRELEN EQU ISTRPRE+16 03026000 RPRRLOCK EQU ISTRPRE+12 03027000 RPRDAF EQU RPRCOMID+2 03028000 RPRSAF EQU RPRCOMID 03029000 HCNRSV01 EQU ISTHCNCB+113 03030000 HCNSVCR EQU ISTHCNCB+112 03031000 HCNNCB EQU ISTHCNCB 03032000 DNCZC001 EQU DNCOS+40 03033000 DNCLOCK EQU DNCOS+36 03034000 DNCZV005 EQU DNCOS+32 03035000 DNCZV004 EQU DNCOS+28 03036000 DNCZV003 EQU DNCOS+24 03037000 DNCZV002 EQU DNCOS+21 03038000 DNCZX001 EQU DNCOS+20 03039000 DNCZV001 EQU DNCOS+17 03040000 DNCZX003 EQU DNCOS+16 03041000 DNCZV000 EQU DNCOS+12 03042000 DNCSESCQ EQU DNCOS+8 03043000 DNCSESIQ EQU DNCOS+4 03044000 DNCACIP EQU DNCBSCED+1 03045000 DNCLICP EQU DNCBSCED 03046000 DNCZF008 EQU DNCZFLGS+1 03047000 DNCZPSRD EQU DNCZFLGS+1 03048000 DNCPSOL EQU DNCZFLGS+1 03049000 DNCZF007 EQU DNCZFLGS+1 03050000 DNCZF006 EQU DNCZFLGS+1 03051000 DNCZF005 EQU DNCZFLGS+1 03052000 DNCZF004 EQU DNCZFLGS+1 03053000 DNCZF003 EQU DNCZFLGS 03054000 DNCZF002 EQU DNCZFLGS 03055000 DNCZRSCH EQU DNCZFLGS 03056000 DNCDISC EQU DNCZFLGS 03057000 DNCCONT EQU DNCZFLGS 03058000 DNCINVIT EQU DNCZFLGS 03059000 DNCSESS EQU DNCZFLGS 03060000 DNCZF001 EQU DNCZFLGS 03061000 DNCMODE EQU ISTDNCB+49 03062000 DNCBHSET EQU ISTDNCB+48 03063000 DNCNCB EQU ISTDNCB 03064000 NCBRSV01 EQU ISTNCB+46 03065000 NCBSWDAF EQU ISTNCB+44 03066000 NCBDEVCH EQU ISTNCB+36 03067000 NCBFMCBP EQU ISTNCB+32 03068000 NCBLTRC EQU ISTNCB+30 03069000 NCBRVPT1 EQU ISTNCB+28 03070000 NCBNMLLN EQU NCBFLAGS+3 03071000 @NM00017 EQU NCBFLAG1 03072000 @NM00016 EQU NCBFLAG1 03073000 NCBTTF EQU NCBFLAG1 03074000 NCBRSYNC EQU NCBFLAG1 03075000 NCBRSTRT EQU NCBFLAG1 03076000 NCBCONF EQU NCBFLAG1 03077000 NCBSNAI EQU NCBFLAG1 03078000 NCBFLTIO EQU NCBFTRIO 03079000 NCBCSTAT EQU NCBFLAGS 03080000 NCBNCSL EQU ISTNCB+22 03081000 NCBNCBA EQU ISTNCB+20 03082000 NCBFMCBA EQU ISTNCB+16 03083000 NCBNSNA EQU ISTNCB+12 03084000 NCBTSKID EQU ISTNCB+8 03085000 NCBDAF EQU ISTNCB+2 03086000 NCBLNGTH EQU ISTNCB+1 03087000 NCBTYPE EQU ISTNCB 03088000 FMCFLRSV EQU FMCFLGB 03089000 FMCFLGA8 EQU FMCFLGB 03090000 FMCCLRPH EQU FMCVS1+45 03091000 FMCRSV0X EQU FMCCVFLG 03092000 FMCVYRPH EQU FMCCVFLG 03093000 FMCZV004 EQU FMCVS1+40 03094000 FMCLOCK2 EQU FMCVS1+36 03095000 @NM00015 EQU FMCZFLG2 03096000 FMCZF027 EQU FMCZFLG2 03097000 FMCZF026 EQU FMCZFLG2 03098000 FMCSEQ1B EQU FMCSEQ1 03099000 FMCSEQ1T EQU FMCSEQ1 03100000 FMCZX006 EQU FMCVS1+33 03101000 FMCZX005 EQU FMCVS1+32 03102000 FMCZX004 EQU FMCVS1+31 03103000 FMCZX003 EQU FMCVS1+30 03104000 FMCZX002 EQU FMCVS1+29 03105000 FMCZX001 EQU FMCVS1+28 03106000 FMCZV001 EQU FMCVS1+24 03107000 FMCAWATQ EQU FMCLCPAQ+1 03108000 @NM00014 EQU FMCLCPAQ 03109000 FMCLCPB2 EQU FMCLCPBQ+1 03110000 FMCLCPB1 EQU FMCLCPBQ 03111000 FMCASCDQ EQU FMCSHEAQ+1 03112000 @NM00013 EQU FMCSHEAQ 03113000 FMCSHEDQ EQU FMCVS1+8 03114000 FMCRSV04 EQU FMCVS1+6 03115000 FMCZH001 EQU FMCVS1+4 03116000 FMCZF025 EQU FMCZFLAG+3 03117000 FMCZF024 EQU FMCZFLAG+3 03118000 FMCZF023 EQU FMCZFLAG+3 03119000 FMCZF022 EQU FMCZFLAG+3 03120000 FMCZF021 EQU FMCZFLAG+3 03121000 FMCZF020 EQU FMCZFLAG+3 03122000 FMCZF019 EQU FMCZFLAG+3 03123000 FMCZF018 EQU FMCZFLAG+3 03124000 FMCZF017 EQU FMCZFLAG+2 03125000 FMCZF016 EQU FMCZFLAG+2 03126000 FMCZF015 EQU FMCZFLAG+2 03127000 FMCZF014 EQU FMCZFLAG+2 03128000 FMCZF013 EQU FMCZFLAG+2 03129000 FMCZF012 EQU FMCZFLAG+2 03130000 FMCZF011 EQU FMCZFLAG+2 03131000 FMCZF010 EQU FMCZFLAG+2 03132000 FMCZF00F EQU FMCZFLAG+1 03133000 FMCZF00E EQU FMCZFLAG+1 03134000 FMCZF00D EQU FMCZFLAG+1 03135000 FMCZF00C EQU FMCZFLAG+1 03136000 FMCZF00B EQU FMCZFLAG+1 03137000 FMCRSV10 EQU FMCZFLAG+1 03138000 FMCZF009 EQU FMCZFLAG+1 03139000 FMCZFD06 EQU FMCZF006+1 03140000 FMCZFC06 EQU FMCZF006 03141000 FMCZFB06 EQU FMCZF006 03142000 FMCZFA06 EQU FMCZF006 03143000 FMCZF005 EQU FMCZFLAG 03144000 FMCZF004 EQU FMCZFLAG 03145000 FMCZF003 EQU FMCZFLAG 03146000 FMCZF002 EQU FMCZFLAG 03147000 FMCZF001 EQU FMCZFLAG 03148000 FMCFRESA EQU ISTFMCB+228 03149000 FMCSCSQN EQU FMCSNCTL+2 03150000 FMCSCCTL EQU FMCSNCTL+1 03151000 FMCSTCTL EQU FMCSCFLG 03152000 FMCSCCLO EQU FMCSCFLG 03153000 FMCAPRO EQU FMCSCFLG 03154000 FMCLURO EQU FMCSCFLG 03155000 FMCOBSAC EQU FMCSCFLG 03156000 FMCIBSAC EQU FMCSCFLG 03157000 FMCFBRE EQU ISTFMCB+220 03158000 FMCFBXM EQU FMCZV002 03159000 FMCASEGQ EQU ISTFMCB+212 03160000 FMCRDTPT EQU ISTFMCB+208 03161000 FMCLOCK EQU ISTFMCB+204 03162000 FMCSEGD EQU FMCSSEGQ 03163000 FMCRSPLM EQU ISTFMCB+198 03164000 FMCPSTRS EQU ISTFMCB+196 03165000 @NM00012 EQU FMCRRESP 03166000 FMCTSLHA EQU FMCRRESP 03167000 FMCFRRN EQU FMCRRESP 03168000 FMCFME EQU FMCRRESP 03169000 FMCFEX EQU FMCRRESP 03170000 FMCFPE EQU FMCRRESP 03171000 FMCCTLB EQU ISTFMCB+194 03172000 FMCBSQNO EQU FMCCLSEQ+2 03173000 FMCTSQNO EQU FMCCLSEQ 03174000 FMCOBPRG EQU FMCMODEB 03175000 FMCIBPRG EQU FMCMODEB 03176000 FMCRESOT EQU FMCMODEB 03177000 FMCRSTSR EQU FMCMODEB 03178000 FMCLUQ EQU FMCMODEB 03179000 FMCAPQ EQU FMCMODEB 03180000 FMCCLEAR EQU FMCMODEB 03181000 FMCHOLD EQU FMCMODEB 03182000 FMCIPSEQ EQU ISTFMCB+188 03183000 FMCLUSTR EQU ISTFMCB+187 03184000 FMCRSV87 EQU FMCSTAT2 03185000 FMCSEQI EQU FMCSTAT2 03186000 FMCCPIP EQU FMCSTAT2 03187000 FMCALIPR EQU FMCSTAT2 03188000 FMCIAIO EQU FMCSTAT2 03189000 FMCZF00A EQU FMCSTAT2 03190000 FMCVPIP EQU FMCSTAT2 03191000 FMCBHSET EQU ISTFMCB+185 03192000 FMCPRMRC EQU FMCCLEXT+20 03193000 FMCRSV89 EQU FMCPSTAT 03194000 FMCPCLSD EQU FMCPSTAT 03195000 FMCDDOCD EQU FMCPSTAT 03196000 FMCIDVFD EQU FMCPSTAT 03197000 FMCELKST EQU FMCPSTAT 03198000 FMCRSV88 EQU FMCPSCMD 03199000 FMCRDBLK EQU FMCPSCMD 03200000 FMCDSEOC EQU FMCPSCMD 03201000 FMCPURGE EQU FMCPSCMD 03202000 FMCRESTI EQU FMCPSCMD 03203000 FMCCNTCT EQU FMCPSCMD 03204000 FMCINVT EQU FMCPSCMD 03205000 FMCFLGB7 EQU FMCFLGCL 03206000 FMCFLGB6 EQU FMCFLGCL 03207000 FMCFLGB5 EQU FMCFLGCL 03208000 FMCFLGB4 EQU FMCFLGCL 03209000 FMCFLGB3 EQU FMCFLGCL 03210000 FMCFLGB2 EQU FMCFLGCL 03211000 FMCFLGB1 EQU FMCFLGCL 03212000 FMCFLGB0 EQU FMCFLGCL 03213000 FMCFLGA7 EQU FMCFLGA 03214000 FMCFLGA6 EQU FMCFLGA 03215000 FMCFLGA5 EQU FMCFLGA 03216000 FMCFLGA4 EQU FMCFLGA 03217000 FMCFLGA3 EQU FMCFLGA 03218000 FMCFLGA2 EQU FMCFLGA 03219000 FMCFLGA1 EQU FMCFLGA 03220000 FMCFLGA0 EQU FMCFLGA 03221000 FMCDCLOK EQU FMCCLEXT+12 03222000 FMCRAFM EQU FMCCLEXT+8 03223000 FMCFBPTR EQU FMCFBA+1 03224000 FMCFBRSV EQU FMCFBA 03225000 FMCRPLPT EQU FMCRPLA+1 03226000 FMCRPLRS EQU FMCRPLA 03227000 FMCPRCLS EQU FMCCVAL 03228000 FMCIBCE EQU FMCCVAL 03229000 FMCONLY EQU FMCOBCE 03230000 FMCLAST EQU FMCOBCE 03231000 FMCMIDLE EQU FMCOBCE 03232000 FMCFIRST EQU FMCOBCE 03233000 FMCCPCNT EQU FMCPACPC 03234000 FMCMPCNT EQU FMCPACEM 03235000 FMCNPCNT EQU FMCPACEN 03236000 FMCCONF EQU FMCSSTAT 03237000 FMCPURCH EQU FMCSSTAT 03238000 FMCNSALU EQU FMCSSTAT 03239000 FMCBIP EQU FMCSSTAT 03240000 FMCSDTR EQU FMCSSTAT 03241000 FMCUIPI EQU FMCSSTAT 03242000 FMCCIPI EQU FMCSSTAT 03243000 FMCSNBI EQU FMCSSTAT 03244000 FMCRVD01 EQU ISTFMCB+158 03245000 FMCISSN EQU ISTFMCB+156 03246000 FMCOASN EQU FMCNXOSC 03247000 FMCOSSN EQU FMCNXCFM 03248000 FMCSIP EQU FMCSIPA 03249000 FMCEXLST EQU ISTFMCB+144 03250000 FMCPAB5 EQU ISTFMCB+128 03251000 FMCPAB4 EQU ISTFMCB+112 03252000 FMCPAB3 EQU ISTFMCB+96 03253000 FMCPAB2 EQU ISTFMCB+80 03254000 FMCPAB1 EQU ISTFMCB+64 03255000 FMCFASYA EQU ISTFMCB+60 03256000 FMCMODE EQU ISTFMCB+52 03257000 FMCPROCD EQU ISTFMCB+48 03258000 FMCVWT EQU ISTFMCB+44 03259000 FMCRPLH EQU ISTFMCB+40 03260000 FMCBUFNB EQU FMCCMPS1+2 03261000 FMCBUFLM EQU FMCCMPS1 03262000 FMCDEBA EQU ISTFMCB+32 03263000 @NM00011 EQU FMCCMDFL 03264000 FMCSNA EQU FMCCMDFL 03265000 FMCVSNA EQU FMCCMDFL 03266000 FMCCMDR EQU FMCCMDFL 03267000 @NM00010 EQU ISTFMCB+30 03268000 @NM00009 EQU FMCSTAT1 03269000 FMCHPURG EQU FMCSTAT1 03270000 FMCVSP2 EQU FMCSTAT1 03271000 FMCVSP1 EQU FMCSTAT 03272000 FMCLTEAS EQU FMCSTAT 03273000 FMCZF007 EQU FMCSTAT 03274000 FMCDEDSC EQU FMCSTAT 03275000 FMCDEVOF EQU FMCSTAT 03276000 FMCDAPT EQU FMCSTAT 03277000 FMCPRMTE EQU FMCSTAT 03278000 FMCPRMTR EQU FMCSTAT 03279000 FMCUSFLD EQU ISTFMCB+24 03280000 FMCFMCBA EQU ISTFMCB+20 03281000 FMCDVTA EQU ISTFMCB+12 03282000 FMCTSKID EQU ISTFMCB+8 03283000 FMCNXTCB EQU ISTFMCB+4 03284000 FMCSAF EQU ISTFMCB+2 03285000 FMCLNGTH EQU ISTFMCB+1 03286000 FMCTYPE EQU ISTFMCB 03287000 PROSRDEF EQU PROSETM4 03288000 PRORSV47 EQU PROSETM4 03289000 PROSCON EQU PROSETM4 03290000 PRORSV46 EQU PROSETM3 03291000 PROSMONT EQU PROSETM3 03292000 PRORSV45 EQU PROSETM3 03293000 PROSNTO EQU PROSETM3 03294000 PRORSV44 EQU PROSETM3 03295000 PRORSV43 EQU PROSETM2 03296000 PROSNTFL EQU PROSETM2 03297000 PRORSV42 EQU PROSETM2 03298000 PRORSV41 EQU PROPROCS 03299000 PROMODC EQU PROPROC4 03300000 PROMODT EQU PROPROC4 03301000 PROMODM EQU PROPROC4 03302000 PROMODB EQU PROPROC4 03303000 PRORSV14 EQU PROPROC4 03304000 PRORSV13 EQU PROPROC4 03305000 PRORSV12 EQU PROPROC4 03306000 PROEIB EQU PROPROC4 03307000 PRORSV11 EQU PROPROC3 03308000 PROMONT2 EQU PROPROC3 03309000 PROMONIT EQU PROPROC3 03310000 PROSUBLK EQU PROPROC3 03311000 PRONTO EQU PROPROC3 03312000 PROLGIN EQU PROPROC3 03313000 PROERPI EQU PROPROC3 03314000 PRORSV07 EQU PROPROC3 03315000 PROCFTX EQU PROPROC2 03316000 PROEMLC EQU PROPROC2 03317000 PRONTFL EQU PROPROC2 03318000 PRORSV05 EQU PROPROC2 03319000 PRORSV04 EQU PROPROC2 03320000 PROLGOT EQU PROPROC2 03321000 PROERPO EQU PROPROC2 03322000 PRORSV03 EQU PROPROC2 03323000 PRORPLC EQU PROPROC1 03324000 PROCS EQU PROPROC1 03325000 PROCA EQU PROPROC1 03326000 PRORESPX EQU PROPROC1 03327000 PRODFASY EQU PROPROC1 03328000 PROXPOPT EQU PROPROC1 03329000 PROTRUNC EQU PROPROC1 03330000 PROASYIP EQU PROPROC1 03331000 DEVRSV03 EQU ISTDEVCH+5 03332000 DEVPHYSA EQU ISTDEVCH+4 03333000 DEVCSLPN EQU DEVCHAR3 03334000 DEVCSTCL EQU DEVCHAR3 03335000 DEVCCHEK EQU DEVCHAR3 03336000 DEVCATTN EQU DEVCHAR3 03337000 DEVCSWL EQU DEVFCCTL 03338000 DEVCRVB EQU DEVFCCTL 03339000 DEVCSSL EQU DEVFCCTL 03340000 DEVCBSC EQU DEVFCCTL 03341000 DEVMCODE EQU ISTDEVCH+2 03342000 DEVCHAR2 EQU DEVTCODE 03343000 DEVRSV01 EQU DEVCHAR 03344000 DEVCCTL EQU DEVCHAR 03345000 DEVNNSPT EQU DEVCHAR 03346000 DEVSPS EQU DEVCHAR 03347000 DEVSUBND EQU DEVCHAR 03348000 DEVCONVR EQU DEVCHAR 03349000 DEVOTPUT EQU DEVCHAR 03350000 DEVINPUT EQU DEVCHAR 03351000 LOKXCL EQU @NM00007 03352000 LOKPRY EQU @NM00007 03353000 @NM00008 EQU @NM00007 03354000 @NM00006 EQU LOKCHNG 03355000 LOKCT EQU ISTLOK 03356000 PABRPHA EQU PABRPHFG+1 03357000 PABNODQ EQU PABFLAGS 03358000 PABINHBT EQU PABFLAGS 03359000 PABERLOK EQU PABERRLK 03360000 PABSSN EQU PABFLAGS 03361000 PABDYNAM EQU PABFLAGS 03362000 PABNORPR EQU PABFLAGS 03363000 PABPRIOR EQU PABFLAGS 03364000 PABAPYP EQU PABFLAGS 03365000 PABDVTA EQU ISTPAB+9 03366000 PABOFFST EQU ISTPAB+8 03367000 PABCHNGP EQU PABCHAIN+1 03368000 PABRSV02 EQU PABCHAIN 03369000 PABRUNNG EQU PABCHAIN 03370000 PABRESET EQU PABCHAIN 03371000 PABUNCON EQU PABCHAIN 03372000 PABCDP EQU PABCHAIN 03373000 PABRESCH EQU PABCHAIN 03374000 PABCHNG EQU PABCHAIN 03375000 PABWEQP EQU PABWEQA+1 03376000 PABRSV01 EQU PABWEQA 03377000 PABWEQG EQU PABWEQA 03378000 RPHNEXPO EQU ISTRPH+104 03379000 RPHSAV16 EQU RPHWORK+60 03380000 RPHSAV15 EQU RPHWORK+56 03381000 RPHSAV14 EQU RPHWORK+52 03382000 RPHSAV13 EQU RPHWORK+48 03383000 RPHSAV12 EQU RPHWORK+44 03384000 RPHSAV11 EQU RPHWORK+40 03385000 RPHSAV10 EQU RPHWORK+36 03386000 RPHSAVE9 EQU RPHWORK+32 03387000 RPHSAVE8 EQU RPHWORK+28 03388000 RPHSAVE7 EQU RPHWORK+24 03389000 RPHSAVE6 EQU RPHWORK+20 03390000 RPHSAVE5 EQU RPHWORK+16 03391000 RPHSAVE4 EQU RPHWORK+12 03392000 RPHSAVE3 EQU RPHWORK+8 03393000 RPHSAVE2 EQU RPHWORK+4 03394000 RPHSHALF EQU RPHSAVE1+2 03395000 RPHSBIT8 EQU RPHSBITS 03396000 RPHSBIT7 EQU RPHSBITS 03397000 RPHSBIT6 EQU RPHSBITS 03398000 RPHSBIT5 EQU RPHSBITS 03399000 RPHSBIT4 EQU RPHSBITS 03400000 RPHSBIT3 EQU RPHSBITS 03401000 RPHSBIT2 EQU RPHSBITS 03402000 RPHSBIT1 EQU RPHSBITS 03403000 RPHSBYTE EQU RPHSAVE1 03404000 RPHPABQP EQU RPHPABQA+1 03405000 RPHPABFG EQU RPHPABQA 03406000 RPHSRP34 EQU RPHSRPRM+2 03407000 RPHSRP12 EQU RPHSRPRM 03408000 RPHWEGT EQU RPHCSPA 03409000 RPHPABOF EQU ISTRPH+20 03410000 RPHRESUM EQU RPHRESMA+1 03411000 RPHRSV01 EQU RPHWPFLG 03412000 RPHPURGE EQU RPHWPFLG 03413000 RPHPT EQU RPHWPFLG 03414000 RPHWT EQU RPHWPFLG 03415000 RPHRSKEY EQU RPHWPFLG 03416000 RPHDVTA EQU ISTRPH+12 03417000 RPHTIK EQU RPHTSKID+3 03418000 @NM00005 EQU RPHTSKID 03419000 RPHRPHAP EQU RPHRPHA+1 03420000 @NM00004 EQU RPHRPHA 03421000 RPHGATE EQU RPHRPHA 03422000 @NM00003 EQU RPHFLGB 03423000 RPHRLCRA EQU RPHFLGB 03424000 RPHNRSAV EQU RPHFLGB 03425000 RPHPGCMP EQU RPHFLGB 03426000 RPHFBAPS EQU RPHFLGB 03427000 RPHBSSP EQU RPHFLGB 03428000 RPHLOCK EQU RPHFLGB 03429000 RPHFNFLG EQU RPHFSTLC 03430000 RPHMLTCP EQU RPHFLAGS 03431000 RPHSMCLR EQU RPHFLAGS 03432000 RPHSMTYP EQU RPHFLAGS 03433000 RPHSMQ EQU RPHFLAGS 03434000 RPHAUTEX EQU RPHAPTYP 03435000 RPHSPGIN EQU RPHFLAGS 03436000 RPHOGIND EQU RPHFLAGS 03437000 RPHLNGTH EQU ISTRPH+1 03438000 RPHTYPE EQU ISTRPH 03439000 CVTLEVL EQU CVTRELNO+2 03440000 CVTNUMB EQU CVTRELNO 03441000 CVTMDL EQU CVTFIX+250 03442000 @NM00002 EQU CVTFIX+248 03443000 @NM00001 EQU CVTFIX 03444000 CVTRV482 EQU CVTXTNT2+128 03445000 CVTRV481 EQU CVTXTNT2+124 03446000 CVTRV480 EQU CVTXTNT2+120 03447000 CVTRV479 EQU CVTXTNT2+118 03448000 CVTRV478 EQU CVTXTNT2+117 03449000 CVTRV477 EQU CVTXTNT2+116 03450000 CVTRV476 EQU CVTXTNT2+115 03451000 CVTRV475 EQU CVTXTNT2+114 03452000 CVTRV474 EQU CVTRV466 03453000 CVTRV473 EQU CVTRV466 03454000 CVTRV472 EQU CVTRV466 03455000 CVTRV471 EQU CVTRV466 03456000 CVTRV470 EQU CVTRV466 03457000 CVTRV469 EQU CVTRV466 03458000 CVTRV468 EQU CVTRV466 03459000 CVTRV467 EQU CVTRV466 03460000 CVTRV465 EQU CVTRV457 03461000 CVTRV464 EQU CVTRV457 03462000 CVTRV463 EQU CVTRV457 03463000 CVTRV462 EQU CVTRV457 03464000 CVTRV461 EQU CVTRV457 03465000 CVTRV460 EQU CVTRV457 03466000 CVTRV459 EQU CVTRV457 03467000 CVTRV458 EQU CVTRV457 03468000 CVTRV456 EQU CVTXTNT2+108 03469000 CVTRV455 EQU CVTXTNT2+104 03470000 CVTRV454 EQU CVTXTNT2+100 03471000 CVTRV453 EQU CVTXTNT2+96 03472000 CVTRV452 EQU CVTXTNT2+94 03473000 CVTRV451 EQU CVTXTNT2+92 03474000 CVTRV450 EQU CVTXTNT2+90 03475000 CVTRV449 EQU CVTXTNT2+88 03476000 CVTRV448 EQU CVTXTNT2+87 03477000 CVTRV447 EQU CVTXTNT2+86 03478000 CVTRV446 EQU CVTRV438 03479000 CVTRV445 EQU CVTRV438 03480000 CVTRV444 EQU CVTRV438 03481000 CVTRV443 EQU CVTRV438 03482000 CVTRV442 EQU CVTRV438 03483000 CVTRV441 EQU CVTRV438 03484000 CVTRV440 EQU CVTRV438 03485000 CVTRV439 EQU CVTRV438 03486000 CVTRV437 EQU CVTRV429 03487000 CVTRV436 EQU CVTRV429 03488000 CVTRV435 EQU CVTRV429 03489000 CVTRV434 EQU CVTRV429 03490000 CVTRV433 EQU CVTRV429 03491000 CVTRV432 EQU CVTRV429 03492000 CVTRV431 EQU CVTRV429 03493000 CVTRV430 EQU CVTRV429 03494000 CVTRV428 EQU CVTXTNT2+80 03495000 CVTRV427 EQU CVTXTNT2+76 03496000 CVTRV426 EQU CVTXTNT2+72 03497000 CVTRV425 EQU CVTXTNT2+68 03498000 CVTATACT EQU CVTATCVT 03499000 CVTRV423 EQU CVTXTNT2+62 03500000 CVTRV422 EQU CVTXTNT2+60 03501000 CVTRV421 EQU CVTXTNT2+58 03502000 CVTRV420 EQU CVTXTNT2+56 03503000 CVTRV419 EQU CVTXTNT2+55 03504000 CVTRV418 EQU CVTXTNT2+54 03505000 CVTRV417 EQU CVTRV409 03506000 CVTRV416 EQU CVTRV409 03507000 CVTRV415 EQU CVTRV409 03508000 CVTRV414 EQU CVTRV409 03509000 CVTRV413 EQU CVTRV409 03510000 CVTRV412 EQU CVTRV409 03511000 CVTRV411 EQU CVTRV409 03512000 CVTRV410 EQU CVTRV409 03513000 CVTRV408 EQU CVTRV400 03514000 CVTRV407 EQU CVTRV400 03515000 CVTRV406 EQU CVTRV400 03516000 CVTRV405 EQU CVTRV400 03517000 CVTRV404 EQU CVTRV400 03518000 CVTRV403 EQU CVTRV400 03519000 CVTRV402 EQU CVTRV400 03520000 CVTRV401 EQU CVTRV400 03521000 CVTICB EQU CVTXTNT2+48 03522000 CVTSKTA EQU CVTXTNT2+44 03523000 CVTSHSB EQU CVTSHS 03524000 CVTRSV98 EQU CVTXTNT2+36 03525000 CVTRSV97 EQU CVTXTNT2+34 03526000 CVTRSV96 EQU CVTXTNT2+32 03527000 CVTOLTEP EQU CVTXTNT2+28 03528000 CVTQIDA EQU CVTQID+1 03529000 CVTRSV95 EQU CVTQID 03530000 CVTRSV94 EQU CVTXTNT2+20 03531000 CVTRSV93 EQU CVTXTNT2+16 03532000 CVTRSV92 EQU CVTXTNT2+12 03533000 CVTDEBVR EQU CVTXTNT2+8 03534000 CVTRSV91 EQU CVTXTNT2+6 03535000 CVTRSV9H EQU CVTFLGBT 03536000 CVTRSV9G EQU CVTFLGBT 03537000 CVTRSV9F EQU CVTFLGBT 03538000 CVTRSV9E EQU CVTFLGBT 03539000 CVTRSV9D EQU CVTFLGBT 03540000 CVTRSV9C EQU CVTFLGBT 03541000 CVTVME EQU CVTFLGBT 03542000 CVTNPE EQU CVTFLGBT 03543000 CVTNUCLS EQU CVTXTNT2+4 03544000 CVTDSSVA EQU CVTDSSV+1 03545000 CVTRSV89 EQU CVTDSSV 03546000 CVTRSV88 EQU CVTXTNT1+8 03547000 CVTRSV87 EQU CVTXTNT1+4 03548000 CVTFACHN EQU CVTXTNT1 03549000 CVTRV488 EQU CVTMAP+412 03550000 CVTRV487 EQU CVTMAP+408 03551000 CVTRV486 EQU CVTMAP+404 03552000 CVTRV485 EQU CVTMAP+400 03553000 CVTACTAP EQU CVTMAP+396 03554000 CVTAUTH EQU CVTMAP+392 03555000 CVTATMCA EQU CVTATMCT+1 03556000 CVTATMST EQU CVTATMCT 03557000 CVTRSV61 EQU CVTMAP+384 03558000 CVTVOLT1 EQU CVTVOLM1+1 03559000 CVTVOLI1 EQU CVTVOLF1 03560000 CVTSTOA EQU CVTMAP+376 03561000 CVTRSV58 EQU CVTMAP+374 03562000 CVTRSV57 EQU CVTMAP+372 03563000 CVTDDCE EQU CVTMAP+368 03564000 CVTPNWFR EQU CVTMAP+364 03565000 CVTSMF EQU CVTMAP+360 03566000 CVTSULK EQU CVTMAP+358 03567000 CVTSLKO EQU CVTSYSK 03568000 CVTSLKP EQU CVTSYSK 03569000 CVTSLKQ EQU CVTSYSK 03570000 CVTSLKR EQU CVTSYSK 03571000 CVTRSV56 EQU CVTSYSK 03572000 CVTRSV55 EQU CVTSYSK 03573000 CVTRSV54 EQU CVTSYSK 03574000 CVTRSV53 EQU CVTSYSK 03575000 CVTRSV52 EQU CVTA1F1 03576000 CVTRSV51 EQU CVTA1F1 03577000 CVTRSV50 EQU CVTA1F1 03578000 CVTRSV49 EQU CVTA1F1 03579000 CVTRSV48 EQU CVTA1F1 03580000 CVTRSV47 EQU CVTA1F1 03581000 CVTSRSW EQU CVTA1F1 03582000 CVTPFSW EQU CVTA1F1 03583000 CVTPCVT EQU CVTMAP+352 03584000 CVTRSV46 EQU CVTMAP+344 03585000 CVTRSV45 EQU CVTMAP+340 03586000 CVTRSV44 EQU CVTMAP+338 03587000 CVTRSV43 EQU CVTMAP+336 03588000 CVTHJESA EQU CVTHJES+1 03589000 CVTRSV42 EQU CVTHJES 03590000 CVTEXT2A EQU CVTEXT2+1 03591000 CVTRSV41 EQU CVTEXT2 03592000 CVTAPFA EQU CVTAPF+1 03593000 CVTRSV40 EQU CVTAPF 03594000 CVTRV518 EQU CVTINTLA 03595000 CVTRV517 EQU CVTERPV 03596000 CVTEORM EQU CVTMAP+312 03597000 CVTMCHPR EQU CVTMAP+308 03598000 CVTTZ EQU CVTMAP+304 03599000 CVTJEPS EQU CVTMAP+300 03600000 CVTJESCT EQU CVTMAP+296 03601000 CVTMODE EQU CVTMAP+292 03602000 CVTPTRV EQU CVTMAP+288 03603000 CVTREAL EQU CVTMAP+284 03604000 CVTRSV39 EQU CVTMAP+280 03605000 CVTRSV38 EQU CVTMAP+276 03606000 CVTDMSRA EQU CVTDMSR+1 03607000 CVTRSV37 EQU CVTDMSR 03608000 CVTQMSGA EQU CVTQMSG+1 03609000 CVTRSV36 EQU CVTQMSG 03610000 CVTAMFF EQU CVTMAP+264 03611000 CVTPURGA EQU CVTPURG+1 03612000 CVTRSV35 EQU CVTPURG 03613000 CVTCBSP EQU CVTMAP+256 03614000 CVTATERA EQU CVTATER+1 03615000 CVTSYST EQU CVTATER 03616000 CVTVOLT2 EQU CVTTAT 03617000 CVTVOLI2 EQU CVTVOLF2 03618000 CVTAQAVB EQU CVTAQAVT+1 03619000 CVTRSV34 EQU CVTTCMFG 03620000 CVTRSV33 EQU CVTTCMFG 03621000 CVTRSV32 EQU CVTTCMFG 03622000 CVTRSV31 EQU CVTTCMFG 03623000 CVTRSV30 EQU CVTTCMFG 03624000 CVTRSV29 EQU CVTTCMFG 03625000 CVTRSV28 EQU CVTTCMFG 03626000 CVTTCRDY EQU CVTTCMFG 03627000 CVTGTFA EQU CVTGTF+1 03628000 CVTRSV27 EQU CVTGTFST 03629000 CVTRNIO EQU CVTGTFST 03630000 CVTUSR EQU CVTGTFST 03631000 CVTRV318 EQU CVTFORM 03632000 CVTRV317 EQU CVTTMODE 03633000 CVTRV316 EQU CVTSTATE 03634000 CVTRV315 EQU CVTGTFS 03635000 CVTGTFAV EQU CVTGTFS 03636000 CVT0SCR1 EQU CVTMAP+232 03637000 CVTRV515 EQU CVTMAP+228 03638000 CVTRMS EQU CVTMAP+224 03639000 CVTPATCH EQU CVTMAP+220 03640000 CVTTSCE EQU CVTMAP+216 03641000 CVTLNKSC EQU CVTMAP+214 03642000 CVTQABST EQU CVTMAP+212 03643000 CVTMDLDS EQU CVTMAP+208 03644000 CVTUSER EQU CVTMAP+204 03645000 CVTABEND EQU CVTMAP+200 03646000 CVTSMCA EQU CVTMAP+196 03647000 CVTRSV18 EQU CVTMAP+192 03648000 CVTQLPAQ EQU CVTMAP+188 03649000 CVTQCDSR EQU CVTMAP+184 03650000 CVTRSV17 EQU CVTOPTB 03651000 CVTRSV16 EQU CVTOPTB 03652000 CVTFP EQU CVTOPTB 03653000 CVTAPTHR EQU CVTOPTB 03654000 CVTNLOG EQU CVTOPTB 03655000 CVTTOD EQU CVTOPTB 03656000 CVTCTIMS EQU CVTOPTB 03657000 CVTPROT EQU CVTOPTB 03658000 CVTXPFP EQU CVTOPTA 03659000 CVTASCII EQU CVTOPTA 03660000 CVTRSV13 EQU CVTOPTA 03661000 CVTRSV12 EQU CVTOPTA 03662000 CVTNIP EQU CVTOPTA 03663000 CVTDDR EQU CVTOPTA 03664000 CVTAPR EQU CVTOPTA 03665000 CVTCCH EQU CVTOPTA 03666000 CVTSNCTR EQU CVTMAP+180 03667000 CVTQMWR EQU CVTMAP+176 03668000 CVTQOCR EQU CVTMAP+172 03669000 CVT1EF00 EQU CVTMAP+168 03670000 CVTMZ00 EQU CVTMAP+164 03671000 CVTHEAD EQU CVTMAP+160 03672000 CVTRSV11 EQU CVTMAP+156 03673000 CVT0PT01 EQU CVTMAP+152 03674000 CVTMSER EQU CVTMAP+148 03675000 CVTRV516 EQU CVTIERLC 03676000 CVTILCH EQU CVTMAP+140 03677000 CVT0DS EQU CVTMAP+136 03678000 CVTFBOSV EQU CVTMAP+132 03679000 CVTNUCB EQU CVTMAP+128 03680000 CVTIXAVL EQU CVTMAP+124 03681000 CVTIOQET EQU CVTMAP+120 03682000 CVTDCBA EQU CVTMAP+117 03683000 CVTMVS2 EQU CVTDCB 03684000 CVT6DAT EQU CVTDCB 03685000 CVT4MPS EQU CVTDCB 03686000 CVTRSV09 EQU CVTDCB 03687000 CVT4MS1 EQU CVTDCB 03688000 CVT2SPS EQU CVTDCB 03689000 CVT1SSS EQU CVTDCB 03690000 CVTRSV08 EQU CVTDCB 03691000 CVTSTB EQU CVTMAP+112 03692000 CVTQTD00 EQU CVTMAP+108 03693000 CVTQTE00 EQU CVTMAP+104 03694000 CVTCUCB EQU CVTMAP+100 03695000 CVTSJQ EQU CVTMAP+96 03696000 CVTPBLDL EQU CVTMAP+92 03697000 CVTTPC EQU CVTMAP+88 03698000 CVTSVDCB EQU CVTMAP+84 03699000 CVTBRET EQU CVTMAP+82 03700000 CVTEXIT EQU CVTMAP+80 03701000 CVT0FN00 EQU CVTMAP+76 03702000 CVTDARA EQU CVTDAR+1 03703000 CVTRSV07 EQU CVTFLGS1 03704000 CVTRSV06 EQU CVTFLGS1 03705000 CVTRSV05 EQU CVTFLGS1 03706000 CVTRSV04 EQU CVTFLGS1 03707000 CVTRSV03 EQU CVTFLGS1 03708000 CVTRSV02 EQU CVTFLGS1 03709000 CVTRSV01 EQU CVTFLGS1 03710000 CVTDMPLK EQU CVTFLGS1 03711000 CVTXITP EQU CVTMAP+68 03712000 CVTZDTAB EQU CVTMAP+64 03713000 CVTMSLT EQU CVTMAP+60 03714000 CVTDATE EQU CVTMAP+56 03715000 CVTBTERM EQU CVTMAP+52 03716000 CVTSYSAD EQU CVTMAP+48 03717000 CVTXTLER EQU CVTMAP+44 03718000 CVTILK2 EQU CVTMAP+40 03719000 CVTILK1 EQU CVTMAP+36 03720000 CVTPRLTV EQU CVTMAP+32 03721000 CVTPCNVT EQU CVTMAP+28 03722000 CVT0VL00 EQU CVTMAP+24 03723000 CVTXAPG EQU CVTMAP+20 03724000 CVTBUF EQU CVTMAP+16 03725000 CVTJOB EQU CVTMAP+12 03726000 CVTLINK EQU CVTMAP+8 03727000 CVT0EF00 EQU CVTMAP+4 03728000 CVTTCBP EQU CVTMAP 03729000 CVT EQU CVTMAP 03730000 .@UNREFD ANOP END UNREFERENCED COMPONENTS 03731000 @ENDDATA EQU * 03732000 END ISTNMCCF,(C'PLS0329',0603,75130) 03733000