TITLE 'ISTZBFX0/AX0-VS1/MX0-VS2 - TPIOS INVALID LCCW PROCESSOR*00001000 R ' 00002000 ISTZBFX0 CSECT , 0001 00003000 @MAINENT DS 0H 0001 00004000 USING *,@15 0001 00005000 B @PROLOG 0001 00006000 DC AL1(16) 0001 00007000 DC C'ISTZBFX0 75.130' 0001 00008000 DROP @15 00009000 @PROLOG DS 0H 0002 00010000 EJECT 00011000 */* SAVE REGS AND ESTAB MODULE ADDRESSABILITY */ 00012000 */* TPZSAVE (7,12,14) BASE AC(BCX0) */ 00013000 * 0098 00014000 * DO; 0098 00015000 * DCL 0099 00016000 * GPR01F FIXED(31) REG(01); 0099 00017000 * DCL 0100 00018000 * GPR01P PTR(31) REG(01); 0100 00019000 * DCL 0101 00020000 * GPR12F FIXED(31) REG(12); 0101 00021000 * DCL 0102 00022000 * GPR12P PTR(31) REG(12); 0102 00023000 * DCL 0103 00024000 * GPR13F FIXED(31) REG(13); 0103 00025000 * DCL 0104 00026000 * GPR13P PTR(31) REG(13); 0104 00027000 * DCL 0105 00028000 * GPR14F FIXED(31) REG(14); 0105 00029000 * DCL 0106 00030000 * GPR14P PTR(31) REG(14); 0106 00031000 * RFY 0107 00032000 * (GPR01P, 0107 00033000 * GPR12P, 0107 00034000 * GPR13P, 0107 00035000 * GPR14P) RSTD; 0107 00036000 * GEN(PRINT OFF); 0108 00037000 * 0108 00038000 PRINT OFF 00039000 */* ATBUILD (ISTZSAVE) */ 00040000 */* END OF ATBUILD */ 00041000 * 0109 00042000 * GEN(PRINT ON); 0109 00043000 PRINT ON 00044000 * RFY 0110 00045000 * ISTZSAVE BASED(GPR13P); 0110 00046000 * GEN SETS(ZSAZSVVR)(STM 7,12,ZSAZSVVR+0(13)); 0111 00047000 STM 7,12,ZSAZSVVR+0(13) 00048000 * GEN SETS(GPR12P); 0112 00049000 BALR GPR12P,0 00050000 @TSTART DS 0H 00051000 USING @TSTART,GPR12P 00052000 * GEN(PRINT OFF); 0113 00053000 * 0113 00054000 PRINT OFF 00055000 */* ATBUILD (ISTZCRR,ISTRPH,ISTCRA) EJECT(NO) */ 00056000 * 0114 00057000 */* COMPONENT RECOVERY RECORD FOR TPIOS */ 0114 00058000 */* DELTA 006 02/10/75 */ 00059000 *DCL 0114 00060000 *1 ISTZCRR BDY(WORD) BASED, /* CONTROL WORD */ 00061000 * 2 ZCRCRR CHAR(4), /* CONTROL WORD */ 00062000 * 3 ZCRID CHAR(1), /* CONTROL BLOCK ID */ 00063000 * 3 ZCRLEN CHAR(2), /* LENGTH OF ZCR */ 00064000 * 3 ZCRFLAG CHAR(1), /* FLAGS */ 00065000 * 2 ZCRCHAIN PTR(31), /* POINTER TO PREVIOUS ZCR */ 00066000 * 2 ZCRFRRA PTR(31), /* PTR TO FRR */ 00067000 * 2 ZCRFLGS1 CHAR(1), /* FLGS USED BY REQUEST COMPLETION */ 00068000 * 3 ZCREXSW BIT(1), /* EXIT SWITCH */ 00069000 * 3 ZCRQUESW BIT(1), /* QUEUE SWITCH */ 00070000 * 3 ZCRDEQSW BIT(1), /* DEQUEUE SWITCH */ 00071000 * 3 ZCRWAIT BIT(1), /* WAIT Q ANALYSIS COMPLETE */ 00072000 * 3 ZCRNRMEX BIT(1), /* NORMAL EXIT TO BE TAKEN */ 00073000 * 3 ZCRENDLP BIT(1), /* END OF LOOP SWITCH */ 00074000 * 3 ZCRUNSOL BIT(1), /* UNSOLICITED DATA */ 00075000 * 3 ZCRFEXIT BIT(1), /* FORCE EXIT SWITCH */ 00076000 * 2 ZCRFLGS2 CHAR(1), /* FLAGS USED WITHIN TPIOS */ 00077000 * 3 ZCRLOCAL BIT(1), /* LOCAL SUPPORT */ 00078000 * 3 ZCRSHEDI BIT(1), /* IMMEDIATE SCHEDULE */ 00079000 * 3 ZCRFMSED BIT(1), /* FMCB SEARCH ENDED */ 00080000 * 3 ZCROB BIT(1), /* OUTBOUND PROC IN PROGRESS */ 00081000 * 3 ZCRIF0E1 BIT(1), /* SWITCH FOR STRUCTURED PGM USED BY 00082000 * INBOUND PROCESSING */ 00083000 * 3 ZCRIF0E2 BIT(1), /* SWITCH FOR STRUCTURED PGM USED BY 00084000 * INBOUND PROCESSING */ 00085000 * 3 ZCRIF0E3 BIT(1), /* SWITCH FOR STRUCTURED PGM USED BY 00086000 * INBOUND PROCESSING */ 00087000 * 2 ZCRSWFLD CHAR(1), /* SWITCHES FOR TPIOS OUTBOUND */ 00088000 * 3 ZCRENDSH BIT(1), /* EXIT FROM REMOTE DEV SCHEDULER */ 00089000 * 4 ZCRSLCP BIT(1), /* SCHEDULE LCPB */ 00090000 * 3 ZCREXTYP BIT(1), /* TPEXIT TYPE */ 00091000 * 3 ZCRENDPR BIT(1), /* EXIT FROM INNER PROCESS */ 00092000 * 3 ZCRNDLCP BIT(1), /* EXIT FROM LCPB PROCESSING */ 00093000 * 4 ZCROB1 BIT(1), /* REMOTE DEV SCHED 1ST TIME SWITCH */ 00094000 * 3 ZCRENDX BIT(1), /* EXIT FROM LCCW/BTU XLATION */ 00095000 * 3 ZCRENDXL BIT(1), /* EXIT FROM LCCW PROC */ 00096000 * 3 ZCRENDAN BIT(1), /* EXIT FROM LCPB ANALYSIS */ 00097000 * 3 ZCRRESET BIT(1), 0114 00098000 * 4 ZCRCNLXL BIT(1), /* CANCEL FURTHER XLATE */ 00099000 * 2 ZCRFLGS3 CHAR(1), /* FLAGS FOR OUTBOUND PROCESSING */ 00100000 * 3 ZCRTIC BIT(1), /* SELECT NOT TO BE SENT */ 00101000 * 3 ZCRTPCON BIT(1), /* TPIOS CONTACT SENT */ 00102000 * 3 ZCRTPDIS BIT(1), /* TPIOS DISCONNECT TO BE SENT */ 00103000 * 3 ZCRDISC BIT(1), /* DISCONNECT IN PROCESS */ 00104000 * 3 ZCREDRIV BIT(1), /* DO DERIVE */ 00105000 * 3 ZCRNOFRE BIT(1), /* NO FREEING OF SIO QUEUE */ 00106000 * 3 ZCRWRPTR BIT(1), /* WRITE TO PRINTER REQUEST */ 00107000 * 3 ZCRINLCP BIT(1), /* ERROR OCCURED DURING OUTBND PROC */ 00108000 * 2 ZCRGENSW CHAR(1), /* GENERAL SWITCHES */ 00109000 * 3 ZCRTSW1 BIT(1), /* TEMP SW FOR STRUCTURED PGM */ 00110000 * 3 ZCRTSW2 BIT(1), /* TEMP SW FOR STRUCTURED PGM */ 00111000 * 3 ZCRRT06 BIT(1), /* CRITICAL TEXT OPTION */ 00112000 * 3 ZCRLCSYN BIT(1), /* LCCW SYNC SPECIFIED */ 00113000 * 3 ZCREXRES BIT(1), /* EXCEPTION RESPONSE SPECIFIED */ 00114000 * 3 ZCRCLRBD BIT(1), /* FLAG INDICATING BIND WAS CLEARED */ 00115000 * 3 ZCRBRIS BIT(1), /* BRACKET REJECTED DUE TO IN BRAC. */ 00116000 * 3 ZCRF1RES BIT(1), /* FID1 RESPONSE TO BE GENERATED */ 00117000 * 2 ZCRPFLGS CHAR(1), /* UTILITIES PROC OPTION FLAGS */ 00118000 * 3 ZCRQAHED BIT(1), /* QXFR RTN TO USE INSERT OPT'N ON TPQ* 00119000 * 3 * BIT(7), /* RESERVED */ 00120000 * 2 ZCRIBPR CHAR(1), /* INBOUND PROCESSING FLAGS */ 00121000 * 3 ZCRNOBUF BIT(1), /* FSB WITH NO BUFFER */ 00122000 * 3 ZCRERR BIT(1), /* ERROR INDICATOR */ 00123000 * 3 ZCRRELK BIT(1), /* RESET ERROR LOCK FUNCTION REQ. */ 00124000 * 3 ZCRLCPFR BIT(1), /* FLAG IND. DEALLOCATE ATOP LCPB */ 00125000 * 3 ZCRLCPFD BIT(1), /* FLAG IND. LCPB FOUND ON WAITQ */ 00126000 * 3 ZCR3270 BIT(1), /* 3270 DEVICE */ 00127000 * 3 ZCR3270R BIT(1), /* 3270 DEVICE IN RECORD MODE */ 00128000 * 3 * BIT(1), /* RESERVED */ 00129000 * 2 ZCRSCPSW CHAR(1), /* SESSION CONTROL FLAGS */ 00130000 * 3 ZCRTPEX BIT(1), /* TP EXIT */ 00131000 * 3 ZCRTPINV BIT(1), /* INVOKE TPIOS */ 00132000 * 3 ZCRRJLCP BIT(1), /* LCPB REJECTED */ 00133000 * 3 ZCRLREQ BIT(1), /* REQUEST */ 00134000 * 3 ZCRPRCMP BIT(1), /* PROCESSING COMPLETE */ 00135000 * 3 ZCRFSBWE BIT(1), /* FSB IS WORK ELEMENT */ 00136000 * 3 ZCRSKIPT BIT(1), /* SKIP TRACE FLAG */ 00137000 * 3 * BIT(1), /* RESERVED */ 00138000 * 2 ZCRCRLCP PTR(31), /* CURRENT LCPB PTR */ 00139000 * 2 ZCRPARMS BDY(WORD), /* PARAMETERS PASSED TO UTILITIES */ 00140000 * 3 ZCRFBPTR PTR(31), /* PTR TO FROM BUFFER */ 00141000 * 4 ZCRCBPTR PTR(31), /* PTR TO CURRENT BUFFER */ 00142000 * 3 ZCRTBPTR PTR(31), /* PTR TO TO-OR-TRANSLATE BUFFER */ 00143000 * 3 ZCRMLNG FIXED(15), /* LENGTH TO MOVE */ 00144000 * 3 ZCRDFRDA FIXED(15), /* OFFSET FROM DATA ADDR IN FROM BUF*/ 00145000 * 4 ZCRDTODA FIXED(15), /* OFFSET FROM DATA ADDR XLATE BUF */ 00146000 * 3 ZCRPCOD1 CHAR(1), /* CODE BYTE FOR ALLOC/DISALLOC */ 00147000 * 4 ZCRPPG BIT(1), /* GET PAGEABLE BUFF */ 00148000 * 4 ZCRPLNG BIT(1), /* LENGTH OF BUFFER SPECIFIED */ 00149000 * 4 ZCRPFSB BIT(1), /* GET FSB */ 00150000 * 4 ZCRPLSBF BIT(1), /* GET LSCB AND BUFFER */ 00151000 * 5 ZCRPLSBQ BIT(1), /* PURGE LSCB QUEUE */ 00152000 * 4 ZCRPLSCB BIT(1), /* GET OR RELEASE LSCB */ 00153000 * 4 ZCRPBUF BIT(1), /* GET OR RELEASE BUFFER */ 00154000 * 4 ZCRPCFTX BIT(1), /* CONFIDENTIAL TEXT */ 00155000 * 4 ZCRPRES BIT(1), /* RESERVED */ 00156000 * 3 ZCRPCOD2 CHAR(1), /* CODE BYTE FOR MOVE */ 00157000 * 4 ZCRPPG2 BIT(1), /* GET PAGEABLE BUFFER */ 00158000 * 4 ZCRPFHDR BIT(1), /* FROM BUFFER FDB TO BE USED */ 00159000 * 4 ZCRPMFGF BIT(1), /* MOVE STARTS WIHT 1ST BUFF IN BLOCK* 00160000 * 4 ZCRPRES2 BIT(5), /* RESERVED */ 00161000 * 3 ZCRPCHAR CHAR(1), /* TRANSLATE & TEST SEARCH CHARACTER*/ 00162000 * 3 ZCRPSW CHAR(1), /* SWITCH FIELD */ 00163000 * 2 ZCRCCWA PTR(31), /* PTR TO CURRENT CCW (CCW 1 OR 2) */ 00164000 * 2 ZCRBFPTR PTR(31), /* SAVE 1ST BUFF PTR IN TO-BUFF CHN 00165000 * OR LAST BUFFER IN CHANNEL PGM */ 00166000 * 2 ZCRZLB PTR(31), /* PTR TO CURR BUFF IN CHANNEL PGM */ 00167000 * 2 ZCRPVZB PTR(31), /* PTR TO PREVIOUS BUFF IN CHAN PGM */ 00168000 * 2 ZCRSVRTN BDY(WORD), /* REG 14 SAVE AREAS */ 00169000 * 3 ZCRSVF1 PTR(31), /* SAVE REQUIRED REGISTER */ 00170000 * 3 ZCRSVF2 PTR(31), /* SAVE REQUIRED REGISTER */ 00171000 * 3 ZCRSVF3 PTR(31), /* SAVE REQUIRED REGISTER */ 00172000 * 3 ZCRSVF4 PTR(31), /* SAVE REQUIRED REGISTER */ 00173000 * 3 ZCRSVF5 PTR(31), /* SAVE REQUIRED REGISTER */ 00174000 * 3 ZCRSVF6 PTR(31), /* SAVE REQUIRED REGISTER */ 00175000 * 3 ZCRSVF7 PTR(31), /* SAVE REQUIRED REGISTER */ 00176000 * 3 ZCRSVF8 PTR(31), /* SAVE REQUIRED REGISTER */ 00177000 * 3 ZCRSVF9 PTR(31), /* SAVE REQUIRED REGISTER */ 00178000 * 3 ZCRSVF10 PTR(31), /* SAVE REQUIRED REGISTER */ 00179000 * 3 ZCRSVF11 PTR(31), /* SAVE REQUIRED REGISTER */ 00180000 * 3 ZCRSVF12 PTR(31), /* SAVE REQUIRED REGISTER */ 00181000 * 3 ZCRSVF13 PTR(31), /* SAVE REQUIRED REGISTER */ 00182000 * 3 ZCRSVF14 PTR(31), /* SAVE REQUIRED REGISTER */ 00183000 * 3 ZCRSVF15 PTR(31), /* SAVE REQUIRED REGISTER */ 00184000 * 3 ZCRSVF16 PTR(31), /* SAVE REQUIRED REGISTER */ 00185000 * 3 ZCRSVF17 PTR(31), /* SAVE REQUIRED REGISTER */ 00186000 * 3 ZCRSVF18 PTR(31), /* SAVE REQUIRED REGISTER */ 00187000 * 3 ZCRSVF19 PTR(31), /* SAVE REQUIRED REGISTER */ 00188000 * 3 ZCRSVF20 PTR(31), /* SAVE REQUIRED REGISTER */ 00189000 * 3 ZCRSVF21 PTR(31), /* SAVE REQUIRED REGISTER */ 00190000 * 3 ZCRSVF22 PTR(31), /* SAVE REQUIRED REGISTER */ 00191000 * 3 ZCRSVF23 PTR(31), /* SAVE REQUIRED REGISTER */ 00192000 * 3 ZCRSVF24 PTR(31), /* SAVE REQUIRED REGISTER */ 00193000 * 3 ZCRSVF25 PTR(31), /* SAVE REQUIRED REGISTER */ 00194000 * 2 ZCRWKARA BDY(WORD), /* TEMPORARY REG SAVE AREA */ 00195000 * 3 ZCRSVWK1 PTR(31), /* SAVE REQUIRED REG */ 00196000 * 3 ZCRSVWK2 PTR(31), /* SAVE REQUIRED REG */ 00197000 * 3 ZCRSVWK3 PTR(31), /* SAVE REQUIRED REG */ 00198000 * 3 ZCRSVWK4 PTR(31), /* SAVE REQUIRED REG */ 00199000 * 3 ZCRSVWK5 PTR(31), /* SAVE REQUIRED REG */ 00200000 * 2 ZCRFSBSV PTR(31), /* FSB CHAIN PTR SAVEAREA */ 00201000 * 2 ZCRFBPRC BIT(1), /* FSB PROCESS SW */ 00202000 * 2 ZCRMOREL BIT(1), /* MORE ELEMENTS SW */ 00203000 * 2 ZCRSCANQ BIT(1), /* SCAN QUEUE SW */ 00204000 * 2 ZCRNXTEL BIT(1), /* NEXT ELEMENT SW */ 00205000 * 2 ZCRXSCHD BIT(1), /* EXIT SCHEDULE SW */ 00206000 * 2 ZCRLSTFB BIT(1), /* INBOUND PROC LAST FSB FOR ELEM SW*/ 00207000 * 2 ZCRTOPQ BIT(1), /* QUEUE ELEMENT TO TOP SW */ 00208000 * 2 ZCRAWQSW BIT(1), /* CHECK AWAITQ FOR MORE WORK =1 */ 00209000 * /* CHECK WAITQ =0 */ 00210000 * 2 ZCRRCDSV CHAR(1), /* RETURN CODE SAVEAREA */ 00211000 * 2 ZCRPRMTC CHAR(1), /* PREEMPT COMPLETION PARAMETER BYTE*/ 00212000 * 2 ZCROPCDE CHAR(1), /* OP CODE TO BE TRANSFORMED * 00213000 * 2 ZCRR2SV PTR(31), /* ISTZBFDI REG 2 SAVE EREA */ 00214000 * 2 ZCRR13SV PTR(31), /* ISTSBFDI REG 13 SAVE EREA */ 00215000 * 2 ZCRCIDSV BDY(WORD), /* ISTZBFDI CID SAVE AREA */ 00216000 * 3 ZCRSAFSV CHAR(2), /* ISTZBFDI SAF SAVE AREA */ 00217000 * 3 ZCRDAFSV CHAR(2), /* ISTZBFDI DAF SAVE AREA */ 00218000 * 2 ZCRSAVEZ (6) BDY(WORD) CHAR(LENGTH(ISTZSAVE)), 0114 00219000 * /* SAVE/TRACE AREAS FOR TPIOS MODS */ 00220000 * 2 ZCRREMIC PTR(31), /* POINTER TO REMOTE RN ICNCB */ 00221000 * 2 ZCRAUDIT CHAR(36), /* TPIOS AUDIT TRAIL AREA */ 00222000 * 3 ZCRTID CHAR(1), /* THREAD I.D. */ 00223000 * 3 ZCRTNAME CHAR(4), /* LAST 4 CHARS OF THREAD NAME */ 00224000 * 3 ZCRENTER BIT(248), /* BIT ARRAY FOR MODULES ENTERED */ 00225000 * 4 ZCREAC1A BIT(1), /* ISTZAC1A ENTERED */ 00226000 * 4 ZCREAC0A BIT(1), /* ISTZAC0A ENTERED */ 00227000 * 4 ZCREAC0B BIT(1), /* ISTZAC0B ENTERED */ 00228000 * 4 ZCREAC1B BIT(1), /* ISTZAC1B ENTERED */ 00229000 * 4 ZCREBCAA BIT(1), /* ISTZBCAA ENTERED */ 00230000 * 4 ZCREBCAB BIT(1), /* ISTZBCAB ENTERED */ 00231000 * 4 ZCREBCAE BIT(1), /* ISTZBCAE ENTERED */ 00232000 * 4 ZCREBCAG BIT(1), /* ISTZBCAG ENTERED */ 00233000 * 4 ZCREBCAI BIT(1), /* ISTZBCAI ENTERED */ 00234000 * 4 ZCREBCAM BIT(1), /* ISTZBCAM ENTERED */ 00235000 * 4 ZCREBCBA BIT(1), /* ISTZBCBA ENTERED */ 00236000 * 4 ZCREBCBB BIT(1), /* ISTZBCBB ENTERED */ 00237000 * 4 ZCREBCBI BIT(1), /* ISTZBCBI ENTERED */ 00238000 * 4 ZCREBCCB BIT(1), /* ISTZBCCB ENTERED */ 00239000 * 4 ZCREBCDI BIT(1), /* ISTZBCDI ENTERED */ 00240000 * 4 ZCREBCEB BIT(1), /* ISTZBCEB ENTERED */ 00241000 * 4 ZCREBCFA BIT(1), /* ISTZBCFA ENTERED */ 00242000 * 4 ZCREBCFB BIT(1), /* ISTZBCFB ENTERED */ 00243000 * 4 ZCREBCGA BIT(1), /* ISTZBCGA ENTERED */ 00244000 * 4 ZCREBCGB BIT(1), /* ISTZBCGB ENTERED */ 00245000 * 4 ZCREBCHA BIT(1), /* ISTZBCHA ENTERED */ 00246000 * 4 ZCREBCHB BIT(1), /* ISTZBCHB ENTERED */ 00247000 * 4 ZCREBCIA BIT(1), /* ISTZBCIA ENTERED */ 00248000 * 4 ZCREBCIB BIT(1), /* ISTZBCIB ENTERED */ 00249000 * 4 ZCREBCID BIT(1), /* ISTZBCID ENTERED */ 00250000 * 4 ZCREBCJA BIT(1), /* ISTZBCJA ENTERED */ 00251000 * 4 ZCREBCJB BIT(1), /* ISTZBCJB ENTERED */ 00252000 * 4 ZCREBCKA BIT(1), /* ISTZBCKA ENTERED */ 00253000 * 4 ZCREBCKB BIT(1), /* ISTZBCKB ENTERED */ 00254000 * 4 ZCREBCLA BIT(1), /* ISTZBCLA ENTERED */ 00255000 * 4 ZCREBCLB BIT(1), /* ISTZBCLB ENTERED */ 00256000 * 4 ZCREBCMB BIT(1), /* ISTZBCMB ENTERED */ 00257000 * 4 ZCREBCND BIT(1), /* ISTZBCND ENTERED */ 00258000 * 4 ZCREBCNE BIT(1), /* ISTZBCNE ENTERED */ 00259000 * 4 ZCREBCOB BIT(1), /* ISTZBCOB ENTERED */ 00260000 * 4 ZCREBCPB BIT(1), /* ISTZBCPB ENTERED */ 00261000 * 4 ZCREBCQB BIT(1), /* ISTZBCQB ENTERED */ 00262000 * 4 ZCREBCRA BIT(1), /* ISTZBCRA ENTERED */ 00263000 * 4 ZCREBCRB BIT(1), /* ISTZBCRB ENTERED */ 00264000 * 4 ZCREBCSC BIT(1), /* ISTZBCSC ENTERED */ 00265000 * 4 ZCREBCXA BIT(1), /* ISTZBCXA ENTERED */ 00266000 * 4 ZCREBCX0 BIT(1), /* ISTZBCX0 ENTERED */ 00267000 * 4 ZCREBCY0 BIT(1), /* ISTZBCY0 ENTERED */ 00268000 * 4 ZCREBCZ0 BIT(1), /* ISTZBCZ0 ENTERED */ 00269000 * 4 ZCREBC0A BIT(1), /* ISTZBC0A ENTERED */ 00270000 * 4 ZCREBC0B BIT(1), /* ISTZBC0B ENTERED */ 00271000 * 4 ZCRECC0A BIT(1), /* ISTZCC0A ENTERED */ 00272000 * 4 ZCRECC0B BIT(1), /* ISTZCC0B ENTERED */ 00273000 * 4 ZCRECC1A BIT(1), /* ISTZCC1A ENTERED */ 00274000 * 4 ZCRECC1B BIT(1), /* ISTZCC1B ENTERED */ 00275000 * 4 ZCRECC2B BIT(1), /* ISTZCC2B ENTERED */ 00276000 * 4 ZCREDCA0 BIT(1), /* ISTZDCA0 ENTERED */ 00277000 * 4 ZCREDCB0 BIT(1), /* ISTZDCB0 ENTERED */ 00278000 * 4 ZCREDCC0 BIT(1), /* ISTZDCC0 ENTERED */ 00279000 * 4 ZCREDCD0 BIT(1), /* ISTZDCD0 ENTERED */ 00280000 * 4 ZCREDCE0 BIT(1), /* ISTZDCE0 ENTERED */ 00281000 * 4 ZCREDCF0 BIT(1), /* ISTZDCF0 ENTERED */ 00282000 * 4 ZCREDCH0 BIT(1), /* ISTZDCH0 ENTERED */ 00283000 * 4 ZCREDCI0 BIT(1), /* ISTZDCI0 ENTERED */ 00284000 * 4 ZCREDCJ0 BIT(1), /* ISTZDCJ0 ENTERED */ 00285000 * 4 ZCREDCKA BIT(1), /* ISTZDCKA ENTERED */ 00286000 * 4 ZCREDCKB BIT(1), /* ISTZDCKB ENTERED */ 00287000 * 4 ZCREDCL0 BIT(1), /* ISTZDCL0 ENTERED */ 00288000 * 4 ZCREDCMB BIT(1), /* ISTZDCMB ENTERED */ 00289000 * 4 ZCREECBA BIT(1), /* ISTZECBA ENTERED */ 00290000 * 4 ZCREECBB BIT(1), /* ISTZECBB ENTERED */ 00291000 * 4 ZCREECCA BIT(1), /* ISTZECCA ENTERED */ 00292000 * 4 ZCREECCB BIT(1), /* ISTZECCB ENTERED */ 00293000 * 4 ZCREECDA BIT(1), /* ISTZECDA ENTERED */ 00294000 * 4 ZCREECEA BIT(1), /* ISTZECEA ENTERED */ 00295000 * 4 ZCREECTA BIT(1), /* ISTZECTA ENTERED */ 00296000 * 4 ZCREFCEA BIT(1), /* ISTZFCEA ENTERED */ 00297000 * 4 ZCREFCEB BIT(1), /* ISTZFCEB ENTERED */ 00298000 * 4 ZCREGCAB BIT(1), /* ISTZGCAB ENTERED */ 00299000 * 4 ZCREGCBB BIT(1), /* ISTZGCBB ENTERED */ 00300000 * 4 * BIT(1), /* NOT USED */ 00301000 * 4 ZCREGCDB BIT(1), /* ISTZGCDB ENTERED */ 00302000 * 4 ZCREGCEB BIT(1), /* ISTZGCEB ENTERED */ 00303000 * 4 ZCREGCLA BIT(1), /* ISTZGCLA ENTERED */ 00304000 * 4 ZCREGC0A BIT(1), /* ISTZGC0A ENTERED */ 00305000 * 4 ZCREGC0B BIT(1), /* ISTZGC0B ENTERED */ 00306000 * 4 ZCREHCAN BIT(1), /* ISTZHCAN ENTERED */ 00307000 * 4 ZCREICAA BIT(1), /* ISTZICAA ENTERED */ 00308000 * 4 ZCREICAB BIT(1), /* ISTZICAB ENTERED */ 00309000 * 4 ZCREICBB BIT(1), /* ISTZICBB ENTERED */ 00310000 * 4 ZCREICBI BIT(1), /* ISTZICBI ENTERED */ 00311000 * 4 ZCREICCB BIT(1), /* ISTZICCB ENTERED */ 00312000 * 4 ZCREICCI BIT(1), /* ISTZICCI ENTERED */ 00313000 * 4 ZCREICDB BIT(1), /* ISTZICDB ENTERED */ 00314000 * 4 ZCREICEB BIT(1), /* ISTZICEB ENTERED */ 00315000 * 4 ZCREICGB BIT(1), /* ISTZICGB ENTERED */ 00316000 * 4 ZCREICHB BIT(1), /* ISTZICHB ENTERED */ 00317000 * 4 ZCREICIB BIT(1), /* ISTZICIB ENTERED */ 00318000 * 4 ZCREICID BIT(1), /* ISTZICID ENTERED */ 00319000 * 4 ZCREICJB BIT(1), /* ISTZICJB ENTERED */ 00320000 * 4 ZCREICKB BIT(1), /* ISTZICKB ENTERED */ 00321000 * 4 ZCREICKE BIT(1), /* ISTZICKE ENTERED */ 00322000 * 4 ZCREICKG BIT(1), /* ISTZICKG ENTERED */ 00323000 * 4 ZCREICLB BIT(1), /* ISTZICLB ENTERED */ 00324000 * 4 ZCREICMB BIT(1), /* ISTZICMB ENTERED */ 00325000 * 4 ZCREICNA BIT(1), /* ISTZICNA ENTERED */ 00326000 * 4 ZCREICNB BIT(1), /* ISTZICNB ENTERED */ 00327000 * 4 ZCREICOA BIT(1), /* ISTZICOA ENTERED */ 00328000 * 4 ZCREICOB BIT(1), /* ISTZICOB ENTERED */ 00329000 * 4 ZCREICQA BIT(1), /* ISTZICQA ENTERED */ 00330000 * 4 ZCREICQB BIT(1), /* ISTZICQB ENTERED */ 00331000 * 4 ZCREICRB BIT(1), /* ISTZICRB ENTERED */ 00332000 * 4 ZCREICSB BIT(1), /* ISTZICSB ENTERED */ 00333000 * 4 ZCREICSC BIT(1), /* ISTZICSC ENTERED */ 00334000 * 4 ZCREICTB BIT(1), /* ISTZICTB ENTERED */ 00335000 * 4 ZCREICUB BIT(1), /* ISTZICUB ENTERED */ 00336000 * 4 ZCREICVB BIT(1), /* ISTZICVB ENTERED */ 00337000 * 4 ZCREICWB BIT(1), /* ISTZICWB ENTERED */ 00338000 * 4 ZCREICX0 BIT(1), /* ISTZICX0 ENTERED */ 00339000 * 4 ZCREIC0B BIT(1), /* ISTZIC0B ENTERED */ 00340000 * 4 ZCREIC1B BIT(1), /* ISTZIC1B ENTERED */ 00341000 * 4 ZCREJCAB BIT(1), /* ISTZJCAB ENTERED */ 00342000 * 4 ZCREJCBB BIT(1), /* ISTZJCBB ENTERED */ 00343000 * 4 ZCREJCCB BIT(1), /* ISTZJCCB ENTERED */ 00344000 * 4 ZCREJCDB BIT(1), /* ISTZJCDB ENTERED */ 00345000 * 4 ZCREJC0B BIT(1), /* ISTZJC0B ENTERED */ 00346000 * 4 ZCREKCBB BIT(1), /* ISTZKCBB ENTERED */ 00347000 * 4 ZCREKCBN BIT(1), /* ISTZKCBN ENTERED */ 00348000 * 4 ZCREKCCN BIT(1), /* ISTZKCCN ENTERED */ 00349000 * 4 ZCREDCWR BIT(1), /* ISTZDCWR ENTERED */ 00350000 * 4 ZCREDCWB BIT(1), /* ISTZDCWB ENTERED */ 00351000 * 4 ZCREDCXR BIT(1), /* ISTZDCXR ENTERED */ 00352000 * 4 ZCREBCBR BIT(1), /* ISTZBCBR ENTERED */ 00353000 * 4 ZCREBCDR BIT(1), /* ISTZBCDR ENTERED */ 00354000 * 4 ZCREBCAR BIT(1), /* ISTZBCAR ENTERED */ 00355000 * 4 ZCRECCBI BIT(1), /* ISTZCCBI ENTERED */ 00356000 * 4 ZCRECCAI BIT(1), /* ISTZCCAI ENTERED */ 00357000 * 4 ZCRECCCI BIT(1), /* ISTZCCCI ENTERED */ 00358000 * 4 ZCREAC1R BIT(1), /* ISTZAC1R ENTERED */ 00359000 * 4 ZCREBCSB BIT(1), /* ISTZBCSB ENTERED */ 00360000 * 4 ZCREDCPR BIT(1), /* ISTZDCPR ENTERED */ 00361000 * 4 ZCREDCQR BIT(1), /* ISTZDCQR ENTERED */ 00362000 * 4 ZCREBCAL BIT(1), /* ISTZBCAL ENTERED */ 00363000 * 4 ZCREBC0L BIT(1), /* ISTZBC0L ENTERED */ 00364000 * 4 ZCREBCNB BIT(1), /* ISTZBCNB ENTERED */ 00365000 * 4 ZCREICOE BIT(1), /* ISTZICOE ENTERED */ 00366000 * 4 ZCREDCNB BIT(1), /* ISTZDCNB ENTERED */ 00367000 * 4 ZCREKCCB BIT(1), /* ISTZKCCB ENTERED */ 00368000 * 4 ZCRECFY0 BIT(1), /* ISTZCFY0 ENTERED */ 00369000 * 4 ZCREDCK0 BIT(1), /* ISTZDFK0 ENTERED */ 00370000 * 4 ZCREICSG BIT(1), /* ISTZICSG ENTERED */ 00371000 * 4 ZCREBCIF BIT(1), /* ISTZBCIF ENTERED */ 00372000 * 4 ZCREDCMF BIT(1), /* ISTZDCMF ENTERED */ 00373000 * 4 ZCRELCAB BIT(1), /* ISTZLCAB ENTERED */ 00374000 * 4 ZCREAC2B BIT(1), /* ISTZAC2B ENTERED */ 00375000 * 4 ZCREIC2B BIT(1), /* ISTZIC2B ENTERED */ 00376000 * 4 ZCRRSV97 BIT(97), /* RESERVED */ 00377000 * 2 ZCRCMNRC CHAR(1), /* PURGE MWOR RETURN CODE */ 00378000 * 2 ZCRWORDA CHAR(3), /* RESERVED FOR LATER USE */ 00379000 * 2 ZCRLCPB CHAR(LENGTH(ISTLCPB)), /* 3270 S/R LCPB */ 00380000 * 3 ZCRRHRU, /* SAVEAREA FOR RH AND RU */ 00381000 * 4 ZCRRH CHAR(3), /* RH */ 00382000 * 4 ZCRRU CHAR(*); /* RU */ 00383000 *DCL ZCTYPE BIT(8) CONSTANT('00'X); /* ZCR TYPE */ 00384000 *DCL ZCLNG FIXED(15) CONSTANT(172); /* ZCRR LENGTH */ 00385000 *DCL ZCRSAVNO BIT(8) CONSTANT('06'X); /* NUMBER OF SAVEAREAS IN ZCRR */ 00386000 *DCL ZCRLSVNO BIT(8) CONSTANT('04'X); /* NUMBER OF SAVE AREAS IN 0118 00387000 * LOCAL SUPPORT */ 00388000 */* *** EQUATES FOR ZCRRCDSV *** */ 0119 00389000 * 0119 00390000 *DCL ZCRMRFSB BIT(8) CONSTANT('0C'X); /* REQUEST COMPLETION MOVE FSB 00391000 * TO PROCESS */ 00392000 *DCL ZCRSRCHQ BIT(8) CONSTANT('10'X); /* REQUEST COMPLETION SEARCH 00393000 * REQUEST QUEUE */ 00394000 *DCL ZCREXIT BIT(8) CONSTANT('14'X); /* REQUEST COMPLETION EXIT */ 00395000 *DCL ZCRSFSB BIT(8) CONSTANT('18'X); /* REQUEST COMPLETION SINGLE 00396000 * FSB */ 00397000 *DCL ZCRDLFSB BIT(8) CONSTANT('1C'X); /* REQUEST COMPLETION DUAL FSB * 00398000 *DCL ZCRNOSCH BIT (8) CONSTANT('20'X); /* REQUEST COMPLETION, EXIT WITH 00399000 * SCHED NONE */ 00400000 *DCL ZCRNRSCH BIT (8) CONSTANT('24'X); /* REQUEST COMPLETION, EXIT WITH 00401000 * SCHED NORM */ 00402000 *DCL ZCRLGERR FIXED(8) CONSTANT(8); /* LOGICAL ERROR */ 00403000 *DCL ZCPLSCB BIT(8) CONSTANT('08'X); /* GET A RELEASE LSCB */ 00404000 *DCL ZCPBUF BIT(8) CONSTANT('04'X); /* GET A RELEASE BUFFER */ 00405000 *DCL ZCRTAC0A FIXED(8) CONSTANT(01); /* LOCAL DEVICE SCHEDULER(OUT)*/ 00406000 *DCL ZCRTAC0B FIXED(8) CONSTANT(02); /* REMOTE DEVICE SCHEDLER(OUT)*/ 00407000 *DCL ZCRTCC1A FIXED(8) CONSTANT(03); /* LOCAL DIALOG SCHEDLER(IN) */ 00408000 *DCL ZCRTCC1B FIXED(8) CONSTANT(04); /* REMOTE DIALOG SCHEDLER(IN) */ 00409000 *DCL ZCRTDCE0 FIXED(8) CONSTANT(05); /* NCP SLOWDOWN RECOVERY */ 00410000 *DCL ZCRTDCKA FIXED(8) CONSTANT(06); /* LOCAL GENERAL FUNCTIONS */ 00411000 *DCL ZCRTDCKB FIXED(8) CONSTANT(07); /* REMOTE GENERAL FUNCTIONS */ 00412000 *DCL ZCRTFCEB FIXED(8) CONSTANT(08); /* REMOTE READ BUFFER ALLOC. */ 00413000 *DCL ZCRTGCLA FIXED(8) CONSTANT(09); /* LCAL CTL & TEST FEEDBACK(IN)* 00414000 *DCL ZCRTGC0A FIXED(8) CONSTANT(10); /* LOCAL REQ. COMPLETION(IN) */ 00415000 *DCL ZCRTGC0B FIXED(8) CONSTANT(11); /* REMOTE REQ. COMPLETION(IN) */ 00416000 *DCL ZCRTICWB FIXED(8) CONSTANT(12); /* RESET CLEANUP (PHASE 5) */ 00417000 *DCL ZCRTIC0B FIXED(8) CONSTANT(13); /* REMOTE REQ COMPLTION CTL(IN)* 00418000 *DCL ZCRTAC1B FIXED(8) CONSTANT(14); /* ISTZAC1B THREAD ID */ 00419000 *DCL ZCRTIC1B FIXED(8) CONSTANT(15); /* ISTZIC1B THREAD ID */ 00420000 *DCL ZCRTCCBI FIXED(8) CONSTANT(16); /* ISTZCCBI THREAD ID */ 00421000 *DCL ZCRTAC1R FIXED(8) CONSTANT(17); /* ISTZAC1R THREAD ID */ 00422000 *DCL ZCRTAC1A FIXED(8) CONSTANT(18); /* ISTZAC1A THREAD ID */ 00423000 *DCL ZCRTLCAB FIXED(8) CONSTANT(19); /* ISTZLCAB THREAD ID */ 00424000 */* PREFIX FOR CRR */ 00425000 */* */ 00426000 */* RELEASE 1 - JUNE 28, 1973 */ 00427000 */* */ 00428000 *DCL 1 ISTPFCRR BASED BDY(WORD), /* PREFIX FOR CRR */ 00429000 * 2 PFCCRR CHAR(4), /* CRR HEADER */ 00430000 * 3 PFCCRRID CHAR(1), /* CRR ID FIELD */ 00431000 * 4 CRRID CHAR(1), /* BASIC CTL LAYER DEFINITION*/ 00432000 * 3 PFCRSV10 CHAR(1), /* RESERVED FOR ALIGNMENT */ 00433000 * 3 PFCCRRLN CHAR(2), /* CRR LENGTH */ 00434000 * 4 CRRLEN CHAR(2), /* BASIC CTL LAYER DEF */ 00435000 * 2 PFCHDR CHAR(8) BDY(WORD), /* SAVE AREA FOR OLD CRR FRR */ 00436000 * 3 PFCCRRO PTR(31), /* PTR TO OLD CRR */ 00437000 * 4 CRRCHAIN PTR(31), /* BASIC CTL LAYER DEFINITION 00438000 * FOR OLD CRR PTR */ 00439000 * 3 PFCFRRO PTR(31), /* PTR TO OLD FRR */ 00440000 * 4 CRRFRR PTR(31), /* BASIC CTL LAYER 0148 00441000 * DEFINITION OF OLD FRR PTR */ 00442000 * 2 PFCFTA BIT(8), /* ID OF LAST FUNCTION TRACED*/ 00443000 * 2 PFCRSV01 CHAR(3); /* ALIGNMENT */ 00444000 *DCL PFIDPIE BIT(8) CONSTANT('80'X); /* DOS/VS TPIOS */ 00445000 *DCL PFIDORE BIT(8) CONSTANT('81'X); /* DOS/VS BMS */ 00446000 *DCL PFIDAPE BIT(8) CONSTANT('82'X); /* DOS/VS PSS */ 00447000 *DCL PFCIDPSV BIT(8) CONSTANT('38'X); /* COMPONENT ID 0152 00448000 * PSS - VS1 AND 2 */ 00449000 *DCL PFCIDTPV BIT(8) CONSTANT('3C'X); /* COMPONENT ID 0153 00450000 * TPIOS VS1 AND 2 */ 00451000 *DCL PFCIDSME BIT(8) CONSTANT('3D'X); /* COMPONENT ID 0154 00452000 * STORAGE MANAGEMENT DOS */ 00453000 *DCL PFCIDOC BIT(8) CONSTANT('31'X); /* COMPONENT ID OPEN/CLOSE */ 00454000 *DCL PFCIDPS BIT(8) CONSTANT('32'X); /* PORT SOLICITOR */ 00455000 *DCL PFCIDCS BIT(8) CONSTANT('34'X); /* CLUSTER SOLICITOR */ 00456000 *DCL PFCIDIT BIT(8) CONSTANT('35'X); /* INIT/TERM */ 00457000 *DCL PFCIDVY BIT(8) CONSTANT('36'X); /* VARY */ 00458000 *DCL PFCIDNS BIT(8) CONSTANT('37'X); /* NET. STAT.SRV. */ 00459000 *DCL PFCIDTPE BIT(8) CONSTANT('38'X); /* COMPONENT ID 0161 00460000 * TPIOS - DOS */ 00461000 *DCL PFCIDCL BIT(8) CONSTANT('39'X); /* COMPONENT ID 0162 00462000 * CONTROL LAYER */ 00463000 *DCL PFCIDPSE BIT(8) CONSTANT('3A'X); /* COMPONENT ID 0163 00464000 * PSS - DOS */ 00465000 *DCL PFCIDSMV BIT(8) CONSTANT('3F'X); /* COMPONENT ID 0164 00466000 * STORAGE MANAGEMENT */ 00467000 *DCL PFCIDTIO BIT(8) CONSTANT('40'X); /* COMPONENT ID TIIO 0165 00468000 * PROCESSING (VS2) */ 00469000 *DCL PFCIDRS BIT(8) CONSTANT('41'X); /* ID FOR REMOTE SOLICITOR */ 00470000 */* CRR FOR COMMAND FACILITIES */ 00471000 *DCL 1 ISTCFCRR BDY(WORD) BASED, /* CRR FOR COMMAND FACILITIES */ 00472000 * 2 CFCAUDIT, /* AUDIT TRAIL FOR CMD FACILITIES*/ 00473000 * 3 CFCNTRD CHAR(1), /* LIST OF MODULES IN COMMAND */ 00474000 * /* FACILITIES ENTERED */ 00475000 * 4 NCFCS1 BIT(1), /* IND MODULE ISTCFCS1 ENTERED */ 00476000 * 4 NCFCS2 BIT(1), /* IND MODULE ISTCFCS2 ENTERED */ 00477000 * 4 NCFCR1 BIT(1), /* IND MODULE ISTCFCR1 ENTERED */ 00478000 * 4 NCFCRP BIT(1), /* IND MODULE ISTCFCRP ENTERED */ 00479000 * 4 NCFCR2 BIT(1), /* IND MODULE ISTCFCR2 ENTERED */ 00480000 * 4 NCFRSVD BIT(3), /* RESERVED */ 00481000 * 3 CFCCRT CHAR(1), /* LIST OF MODULES IN COMMAND */ 00482000 * /* FACILITIES RUNNING */ 00483000 * 4 CCFCS1 BIT(1), /* IND MODULE ISTCFCS1 RUNNING */ 00484000 * 4 CCFCS2 BIT(1), /* IND MODULE ISTCFCS2 RUNNING */ 00485000 * 4 CCFCR1 BIT(1), /* IND MODULE ISTCFCR1 RUNNING */ 00486000 * 4 CCFCRP BIT(1), /* IND MODULE ISTCFCRP RUNNING */ 00487000 * 4 CCFCR2 BIT(1), /* IND MODULE ISTCFCR2 RUNNING */ 00488000 * 4 CCFRSVD1 BIT(3); /* RESERVED */ 00489000 */* COMPONENT RECOVERY */ 00490000 */* */ 00491000 *DCL 1 ISTASCRR BDY(WORD) BASED, /* CRR FOR SMS */ 00492000 * 2 ASCPFCRR CHAR(LENGTH(ISTPFCRR)), 0168 00493000 * 2 ASCFLAGS CHAR(7), /* FLAGS */ 00494000 * 3 ASCFLG1 CHAR(2), /* MODULE TRACE FLAGS */ 00495000 * 4 ASCFBA BIT(1), /* ALLOCATION IN PATH */ 00496000 * 4 ASCFBD BIT(1), /* DE-ALLOCATION IN PATH */ 00497000 * 4 ASCFSR BIT(1), /* FSR IN PATH */ 00498000 * 4 ASCPASTR BIT(13), /* RESERVED PATH FLAGS */ 00499000 * 3 ASCFLG2 CHAR(2), /* MODULE IN CONTROL FLAGS */ 00500000 * 4 ASCFBAIC BIT(1), /* ALLOCATION IN CONTROL */ 00501000 * 4 ASCFBDIC BIT(1), /* DE-ALLOCATION IN CONTROL */ 00502000 * 4 ASCFSRIC BIT(1), /* FSR IN CONTROL */ 00503000 * 4 ASCICR BIT(13), /* RESERVED IN CONTROL FLAGS */ 00504000 * 3 ASCFLG3 CHAR(3), /* AUDIT FLAGS */ 00505000 * 4 ASCFSRGT BIT(1), /* FSR DOING GET PROCESSING */ 00506000 * 4 ASCFBDAL BIT(1), /* FBD DOING ALLOCATION */ 00507000 * 4 ASCKEYF BIT(1), /* KEY HAS BEEN ALTERED */ 00508000 * 4 ASCLLKF BIT(1), /* LOCAL LOCK HELD */ 00509000 * 4 ASCFBDUD BIT(1), /* FBD USING USER DATA */ 00510000 * 4 ASCAUDIT BIT(19), /* RESERVED AUDIT BITS */ 00511000 * 2 ASCKEY CHAR(1), /* ORIGINAL KEY */ 00512000 * 2 ASCETRYA PTR(31), /* RETRY ADRS FOR CONTINUE 0168 00513000 * OPTION */ 00514000 * 2 ASCUSRGS CHAR(16), /* SAVE AREA FOR USER REGS 0168 00515000 * 14 - 1 */ 00516000 * 3 ASCUSR14 CHAR(4), /* REGISTER 14 */ 00517000 * 3 ASCUSR15 CHAR(4), /* REGISTER 15 */ 00518000 * 3 ASCUSR00 CHAR(4), /* REGISTER 0 */ 00519000 * 3 ASCUSR01 CHAR(4), /* REGISTER 1 */ 00520000 * 2 ASCPSREG CHAR(16); /* SAVE AREA FOR PSS 0168 00521000 * REGS 1 - 4 */ 00522000 */* INITIAL LEVEL 001 04/09/75 */ 00523000 *DCL 1 ISTAPCRR BDY(WORD) BASED, 0169 00524000 * 2 APCHDRSV CHAR(LENGTH(ISTPFCRR)), /* HEADER */ 00525000 * 2 APCATFLG CHAR(2), /* AUDIT TRACE FLAGS */ 00526000 * 3 APC51E BIT(1), /* ISTAPC51 WAS ENTERED */ 00527000 * 3 APC52E BIT(1), /* ISTAPC52 ' ' */ 00528000 * 3 APC53E BIT(1), /* ISTAPC53 */ 00529000 * 3 APC54E BIT(1), 0169 00530000 * 3 APC56E BIT(1), 0169 00531000 * 3 APC57E BIT(1), 0169 00532000 * 3 APC58E BIT(1), 0169 00533000 * 3 APC31E BIT(1), 0169 00534000 * 3 * BIT(8), /* RESERVED */ 00535000 * 2 APCRFLG CHAR(2), /* AUDIT TRACE FLAGS */ 00536000 * 3 APC51R BIT(1), /* ISTAPCR1 IS RUNNING */ 00537000 * 3 APC52R BIT(1), /* ISTAPC52 IS RUNNING */ 00538000 * 3 APC53R BIT(1), 0169 00539000 * 3 APC54R BIT(1), 0169 00540000 * 3 APC56R BIT(1), 0169 00541000 * 3 APC57R BIT(1), 0169 00542000 * 3 APC58R BIT(1), 0169 00543000 * 3 APC31R BIT(1), 0169 00544000 * 3 * BIT(8), /* RESERVED */ 00545000 * 2 APCPSTA PTR(31), /* PST@ */ 00546000 * 2 APCTCBA PTR(31), /* TCB@ */ 00547000 * 2 APCRTRN PTR(31), /*@ TO BR14 TO RTN TO SYSTEM */ 00548000 * 2 APCPABSV PTR(31), /*SAVED PAB@ TO REDISPATCH */ 00549000 * 2 APCQWFO PTR(31), /* Q@ IN PST WORK AREA ON */ 00550000 * 2 APCFRRPM PTR(31), /* WORKAREA@ RTN'D FROM SETFR*/ 00551000 * 2 APCSAVE CHAR(72), 0169 00552000 * 3 APCESTAL CHAR(72), /* ESTAE PARAMETER LIST AREA */ 00553000 * 2 APCCOMF CHAR(4) BDY(HWORD), /* FLAGS USED BY ALL PSS RTN */ 00554000 * 3 APCCOMF1 CHAR(2), 0169 00555000 * 4 APCSSTSK BIT(1), /* IRB TYPE WORK */ 00556000 * 4 APCUETSK BIT(1), /* USER EXIT RUNNING UNDER IRB* 00557000 * 4 APCSMCR BIT(1), /* SMA CRA BEING USED */ 00558000 * 4 APCIRB1 BIT(1), /* IRB1 BEING USED */ 00559000 * 4 APCIRB2 BIT(1), /* IRB2 BEING USED */ 00560000 * 4 APCRELR BIT(1), /*CALL ISTAPC58 TO RLEASE CRA*/ 00561000 * 4 APCEXIT BIT(1), /* TELLS ISTAPC58 TO EXIT SYS*/ 00562000 * 4 APCZLBER BIT(1), /* ERR WHILE RUNNING ZLFAB PAB* 00563000 * 4 * BIT(8), /* RESERVED */ 00564000 * 3 APCRETCD FIXED(15), /* RTN CODE FOR R15 FOR SYS */ 00565000 * 2 APCSAV1 PTR(31), /* 1ST SAVE WORD */ 00566000 * 2 APCSAV2 PTR(31), /* 2ND SAVE WORD */ 00567000 * 2 APCSWTWD CHAR(4), /* SWITCH AREA FOR PSS RTN */ 00568000 * 2 APC31FLG CHAR(1), /* ISTAPC31 FLAGS */ 00569000 * 3 APCTPXIT BIT(1), /* TPEXIT IN PROGRESS */ 00570000 * 3 APCRESCH BIT(1), /*PAB TPEXIT OCCURED RESCHED*/ 00571000 * 3 APCSORT BIT(1), /* PAB SORTED TO PROPER PST/MPST */ 00572000 * 3 * BIT(5), /* RESERVED */ 00573000 * 2 APC52FLG CHAR(1), /* ISTAPC52 FLAGS */ 00574000 * 3 APCCKRQ BIT(1), /* CHECK RDY Q FOR WORK */ 00575000 * 3 APCSMSR BIT(1), /* RETURNING SMS RPH */ 00576000 * 3 APCQENQ BIT(1), /* ENQUEUEING PAB'S ON PST Q'S */ 00577000 * 3 APCRDQ BIT(1), /* DEQUEING PAB'S FROM PST RDY Q */ 00578000 * 3 APCNWF BIT(1), /* NO WORK FOUND */ 00579000 * 3 APCWKF BIT(1), /* WORK FOUND */ 00580000 * 3 * BIT(2), /* RESERVED */ 00581000 * 2 APC53FLG CHAR(1), /* ISTAPC53 FLAGS */ 00582000 * 3 APCPR153 BIT(1), /* USED PREALLOCATED CRA */ 00583000 * 2 APC54FLG CHAR(1), /* ISTAPC54 FLAGS */ 00584000 * 3 APCRLST BIT(1), /* SMS BEING CALLED TO RELEASE UECB*/ 00585000 * 3 * BIT(7), /* RESERVED */ 00586000 * 2 APC57FLG CHAR(1), /* ISTAPC57 FLAGS */ 00587000 * 3 APCRECRA BIT(1), /* RELEASE CRA BEING DONE */ 00588000 * 3 APCNREL BIT(1), /* DID NOT RELEASE CRA */ 00589000 * 3 * BIT(6), /* RESERVED */ 00590000 * 2 * CHAR(15); /* RESERVED */ 00591000 */* COMPONENT RECOVERY AREA */ 00592000 */* REVISIONS 005 04/09/75 */ 00593000 *DCL 1 ISTCRA BASED BDY(DWORD), /* COMPONENT RECOVERY AREA */ 00594000 * 2 CRABASIC BDY(WORD), /* CRA WITHOUT PROCESS CRR */ 00595000 * 3 CRAHDR CHAR(8) BDY(WORD), /* CRA HEADER */ 00596000 * 4 CRACRR PTR(31), /* PTR TO ACTIVE CRR */ 00597000 * 4 CRAFRR PTR(31), /* PTR TO ACTIVE FRR */ 00598000 * 3 CRALKACT BIT(32), /* LOCK LEVEL AND 0170 00599000 * OWNERSHIP FLAGS */ 00600000 * 4 CRALEV32 BIT(1), /* 1 = LEVEL 32 LOCK HELD */ 00601000 * 4 CRALEV31 BIT(1), /* 1 = LEVEL 31 LOCK HELD */ 00602000 * 4 CRALEV30 BIT(1), /* 1 = LEVEL 30 LOCK HELD */ 00603000 * 4 CRALEV29 BIT(1), /* 1 = LEVEL 29 LOCK HELD */ 00604000 * 4 CRALEV28 BIT(1), /* 1 = LEVEL 28 LOCK HELD */ 00605000 * 4 CRALEV27 BIT(1), /* 1 = LEVEL 27 LOCK HELD */ 00606000 * 4 CRALEV26 BIT(1), /* 1 = LEVEL 26 LOCK HELD */ 00607000 * 4 CRALEV25 BIT(1), /* 1 = LEVEL 25 LOCK HELD */ 00608000 * 4 CRALEV24 BIT(1), /* 1 = LEVEL 24 LOCK HELD */ 00609000 * 4 CRALEV23 BIT(1), /* 1 = LEVEL 23 LOCK HELD */ 00610000 * 4 CRALEV22 BIT(1), /* 1 = LEVEL 22 LOCK HELD */ 00611000 * 4 CRALEV21 BIT(1), /* 1 = LEVEL 21 LOCK HELD */ 00612000 * 4 CRALEV20 BIT(1), /* 1 = LEVEL 20 LOCK HELD */ 00613000 * 4 CRALEV19 BIT(1), /* 1 = LEVEL 19 LOCK HELD */ 00614000 * 4 CRALEV18 BIT(1), /* 1 = LEVEL 18 LOCK HELD */ 00615000 * 4 CRALEV17 BIT(1), /* 1 = LEVEL 17 LOCK HELD */ 00616000 * 4 CRALEV16 BIT(1), /* 1 = LEVEL 16 LOCK HELD */ 00617000 * 4 CRALEV15 BIT(1), /* 1 = LEVEL 15 LOCK HELD */ 00618000 * 4 CRALEV14 BIT(1), /* 1 = LEVEL 14 LOCK HELD */ 00619000 * 4 CRALEV13 BIT(1), /* 1 = LEVEL 13 LOCK HELD */ 00620000 * 4 CRALEV12 BIT(1), /* 1 = LEVEL 12 LOCK HELD */ 00621000 * 4 CRALEV11 BIT(1), /* 1 = LEVEL 11 LOCK HELD */ 00622000 * 4 CRALEV10 BIT(1), /* 1 = LEVEL 10 LOCK HELD */ 00623000 * 4 CRALEV09 BIT(1), /* 1 = LEVEL 9 LOCK HELD */ 00624000 * 4 CRALEV08 BIT(1), /* 1 = LEVEL 8 LOCK HELD */ 00625000 * 4 CRALEV07 BIT(1), /* 1 = LEVEL 7 LOCK HELD */ 00626000 * 4 CRALEV06 BIT(1), /* 1 = LEVEL 6 LOCK HELD */ 00627000 * 4 CRALEV05 BIT(1), /* 1 = LEVEL 5 LOCK HELD */ 00628000 * 4 CRALEV04 BIT(1), /* 1 = LEVEL 4 LOCK HELD */ 00629000 * 4 CRALEV03 BIT(1), /* 1 = LEVEL 3 LOCK HELD */ 00630000 * 4 CRALEV02 BIT(1), /* 1 = LEVEL 2 LOCK HELD */ 00631000 * 4 CRALEV01 BIT(1), /* 1 = LEVEL 1 LOCK HELD */ 00632000 * 3 CRAL1PTR PTR(31), /* PTR TO LEVEL 1 LOCK */ 00633000 * 3 CRAL2PTR PTR(31), /* PTR TO LEVEL 2 LOCK */ 00634000 * 3 CRAL3PTR PTR(31), /* PTR TO LEVEL 3 LOCK */ 00635000 * 3 CRAL4PTR PTR(31), /* PTR TO LEVEL 4 LOCK */ 00636000 * 3 CRAL5PTR PTR(31), /* PTR TO LEVEL 5 LOCK */ 00637000 * 3 CRAL6PTR PTR(31), /* PTR TO LEVEL 6 LOCK */ 00638000 * 3 CRAL7PTR PTR(31), /* PTR TO LEVEL 7 LOCK */ 00639000 * 3 CRAL8PTR PTR(31), /* PTR TO LEVEL 8 LOCK */ 00640000 * 3 CRAL9PTR PTR(31), /* PTR TO LEVEL 9 LOCK */ 00641000 * 3 CRALAPTR PTR(31), /* RESERVED */ 00642000 */* */ 00643000 */* VS1/VS2 EXTENSION */ 00644000 */* */ 00645000 * 2 CRARPH CHAR(LENGTH(ISTRPH)), /* RPH ASSOCIATED WITH 0170 00646000 * THIS CRH */ 00647000 * 2 CRAPSS CHAR(LENGTH(ISTAPCRR)), /* PSS CRR */ 00648000 * 2 CRAPROCR CHAR(LENGTH(ISTZCRR)) BDY(DWORD), /* PROCESS CRR */ 00649000 * 2 CRASVC CHAR(72) BDY(WORD), /* SERVICE RTN CRA */ 00650000 * 3 CRAASCRR CHAR(LENGTH(ISTASCRR)), /* CRR FOR SMS */ 00651000 * 3 CRAHSIZ PTR(31), /* HEADER SIZE QUED SMS REQ */ 00652000 * 3 CRAMASK PTR(31), /* PREFIX MASK QUED SMS REQ */ 00653000 * 3 CRABUFA FIXED(31), /* BUFF QUE FOR FBQ ALLOCATION* 00654000 * 4 CRABFTBA BIT(1), /* NO BUFFERS ALLOCATED YET * 00655000 * 2 CRARSV01 PTR(31), /* RESERVED */ 00656000 * 2 CRARSV02 PTR(31), /* RESERVED */ 00657000 * 2 CRACHAIN PTR(31); /* CHAIN FIELD USED TO QUEUE 00658000 * CRA TO PREALLOCATE QUEUE 00659000 * WHEN NOT IN USE */ 00660000 *DCL CRALMS32 BIT(32) CONSTANT('80000000'X); /* 32ND LEVEL LOCK MASK */ 00661000 *DCL CRALMS31 BIT(32) CONSTANT('40000000'X); /* 31ST LEVEL LOCK MASK */ 00662000 *DCL CRALMS30 BIT(32) CONSTANT('20000000'X); /* 30TH LEVEL LOCK MASK */ 00663000 *DCL CRALMS29 BIT(32) CONSTANT('10000000'X); /* 29TH LEVEL LOCK MASK */ 00664000 *DCL CRALMS28 BIT(32) CONSTANT('08000000'X); /* 28TH LEVEL LOCK MASK */ 00665000 *DCL CRALMS27 BIT(32) CONSTANT('04000000'X); /* 27TH LEVEL LOCK MASK */ 00666000 *DCL CRALMS26 BIT(32) CONSTANT('02000000'X); /* 26TH LEVEL LOCK MASK */ 00667000 *DCL CRALMS25 BIT(32) CONSTANT('01000000'X); /* 25TH LEVEL LOCK MASK */ 00668000 *DCL CRALMS24 BIT(32) CONSTANT('00800000'X); /* 24TH LEVEL LOCK MASK */ 00669000 *DCL CRALMS23 BIT(32) CONSTANT('00400000'X); /* 23RD LEVEL LOCK MASK */ 00670000 *DCL CRALMS22 BIT(32) CONSTANT('00200000'X); /* 22ND LEVEL LOCK MASK */ 00671000 *DCL CRALMS21 BIT(32) CONSTANT('00100000'X); /* 21ST LEVEL LOCK MASK */ 00672000 *DCL CRALMS20 BIT(32) CONSTANT('00080000'X); /* 20TH LEVEL LOCK MASK */ 00673000 *DCL CRALMS19 BIT(32) CONSTANT('00040000'X); /* 19TH LEVEL LOCK MASK */ 00674000 *DCL CRALMS18 BIT(32) CONSTANT('00020000'X); /* 18TH LEVEL LOCK MASK */ 00675000 *DCL CRALMS17 BIT(32) CONSTANT('00010000'X); /* 17TH LEVEL LOCK MASK */ 00676000 *DCL CRALMS16 BIT(32) CONSTANT('00008000'X); /* 16TH LEVEL LOCK MASK */ 00677000 *DCL CRALMS15 BIT(32) CONSTANT('00004000'X); /* 15TH LEVEL LOCK MASK */ 00678000 *DCL CRALMS14 BIT(32) CONSTANT('00002000'X); /* 14TH LEVEL LOCK MASK */ 00679000 *DCL CRALMS13 BIT(32) CONSTANT('00001000'X); /* 13TH LEVEL LOCK MASK */ 00680000 *DCL CRALMS12 BIT(32) CONSTANT('00000800'X); /* 12TH LEVEL LOCK MASK */ 00681000 *DCL CRALMS11 BIT(32) CONSTANT('00000400'X); /* 11TH LEVEL LOCK MASK */ 00682000 *DCL CRALMS10 BIT(32) CONSTANT('00000200'X); /* 10TH LEVEL LOCK MASK */ 00683000 *DCL CRALMS09 BIT(32) CONSTANT('00000100'X); /* 9TH LEVEL LOCK MASK */ 00684000 *DCL CRALMS08 BIT(32) CONSTANT('00000080'X); /* 8TH LEVEL LOCK MASK */ 00685000 *DCL CRALMS07 BIT(32) CONSTANT('00000040'X); /* 7TH LEVEL LOCK MASK */ 00686000 *DCL CRALMS06 BIT(32) CONSTANT('00000020'X); /* 6TH LEVEL LOCK MASK */ 00687000 *DCL CRALMS05 BIT(32) CONSTANT('00000010'X); /* 5TH LEVEL LOCK MASK */ 00688000 *DCL CRALMS04 BIT(32) CONSTANT('00000008'X); /* 4TH LEVEL LOCK MASK */ 00689000 *DCL CRALMS03 BIT(32) CONSTANT('00000004'X); /* 3RD LEVEL LOCK MASK */ 00690000 *DCL CRALMS02 BIT(32) CONSTANT('00000002'X); /* 2ND LEVEL LOCK MASK */ 00691000 *DCL CRALMS01 BIT(32) CONSTANT('00000001'X); /* 1ST LEVEL LOCK MASK */ 00692000 *DCL CRACRA CHAR(4) CONSTANT('CRA '); /* CHARACTER C.B. ID */ 00693000 * 0204 00694000 */* END OF ATBUILD */ 00695000 * 0204 00696000 * GEN(PRINT ON); 0204 00697000 PRINT ON 00698000 * GPR01P->RPHCRR->CRACRR->ZCREBCX0='1'B; 0205 00699000 L @15,RPHCRR(,GPR01P) 0205 00700000 L @15,CRACRR(,@15) 0205 00701000 OI ZCREBCX0(@15),B'01000000' 0205 00702000 * ZSAZACTV='1'B; 0206 00703000 OI ZSAZACTV(GPR13P),B'10000000' 0206 00704000 * ZSAZTRAC='BCX0'; 0207 00705000 MVC ZSAZTRAC(4,GPR13P),@CC02654 0207 00706000 * ZSAZSVRR=GPR14P; 0208 00707000 ST GPR14P,ZSAZSVRR(,GPR13P) 0208 00708000 * GPR13P=ZSAZSVFC; 0209 00709000 L GPR13P,ZSAZSVFC(,GPR13P) 0209 00710000 * RFY 0210 00711000 * (GPR01P) UNRSTD; 0210 00712000 * RFY 0211 00713000 * (GPR14P) UNRSTD; 0211 00714000 * END; 0212 00715000 * 0212 00716000 */* END TPZSAVE */ 00717000 * 0213 00718000 * LCPZRT01=ON; /* SET CONTROL BLOCK ERROR FLAG 00719000 * ON */ 00720000 OI LCPZRT01(PTRLCP),B'01000000' 0213 00721000 * LCPMNRCD=FRMINVL; /* SET LCPB MINOR RETURN CODE TO 00722000 * INDICATE INVALID LCCW OP CODE */ 00723000 MVI LCPMNRCD(PTRLCP),X'A3' 0214 00724000 * CALL ISTZBFZ0; /* CALL INVALID LCP RECOVERY 0215 00725000 * ROUTINE */ 00726000 L @14,ATCZPSVT(,PTRATC) 0215 00727000 L @15,ZPSZBFZ0(,@14) 0215 00728000 BALR @14,@15 0215 00729000 */* TPZRETN */ 00730000 * 0216 00731000 * DO; 0216 00732000 * DCL 0217 00733000 * GPR07F FIXED(31) REG(07); 0217 00734000 * DCL 0218 00735000 * GPR07P PTR(31) REG(07); 0218 00736000 * DCL 0219 00737000 * GPR15F FIXED(31) REG(15); 0219 00738000 * DCL 0220 00739000 * GPR15P PTR(31) REG(15); 0220 00740000 * RFY 0221 00741000 * (GPR07P, 0221 00742000 * GPR14P, 0221 00743000 * GPR15P) RSTD; 0221 00744000 * GPR13P=ZSAZSVBC; 0222 00745000 L GPR13P,ZSAZSVBC(,GPR13P) 0222 00746000 * IF GPR13P=0 THEN 0223 00747000 LTR GPR13P,GPR13P 0223 00748000 BZ @RT00223 0223 00749000 * ; /* TPDVTS ISTZFARR */ 00750000 * ELSE 0225 00751000 * GPR14P=ZSAZSVRR; 0225 00752000 L GPR14P,ZSAZSVRR(,GPR13P) 0225 00753000 * GEN REFS(ZSAZSVVR)(LM 7,12,ZSAZSVVR+0(13)); 0226 00754000 @RT00223 DS 0H 0226 00755000 LM 7,12,ZSAZSVVR+0(13) 00756000 * GEN REFS(GPR14P) EXIT NOSEQFLOW(BR GPR14P); 0227 00757000 BR GPR14P 00758000 * RFY 0228 00759000 * (GPR07P, 0228 00760000 * GPR14P, 0228 00761000 * GPR15P) UNRSTD; 0228 00762000 * END; 0229 00763000 * 0229 00764000 */* END TPZRETN */ 00765000 */* TPEPILOG */ 00766000 * 0230 00767000 * GEN(PRINT OFF); 0230 00768000 PRINT OFF 00769000 * GEN(PRINT ON); 0231 00770000 * 0231 00771000 PRINT ON 00772000 */* END OF TPEPILOG */ 00773000 * 0232 00774000 * END ISTZBFX0 0232 00775000 * 0232 00776000 */* THE FOLLOWING INCLUDE STATEMENTS WERE FOUND IN THIS PROGRAM. */ 00777000 */*%INCLUDE SYSLIB (CVT ) */ 00778000 * 0232 00779000 * ; 0232 00780000 @EL00001 DS 0H 0232 00781000 @EF00001 DS 0H 0232 00782000 @ER00001 BR @14 0232 00783000 @DATA DS 0H 00784000 @DATD DSECT 00785000 DS 0F 00786000 ISTZBFX0 CSECT 00787000 DS 0F 00788000 @DATD DSECT 00789000 DS 0D 00790000 CVTPTR DS A 00791000 LCPBPTR DS A 00792000 FSBPTR DS A 00793000 ORG *+1-(*-@DATD)/(*-@DATD) INSURE DSECT DATA 00794000 @ENDDATD EQU * 00795000 ISTZBFX0 CSECT 00796000 DS 0F 00797000 @SIZDATD DC AL1(0) 00798000 DC AL3(@ENDDATD-@DATD) 00799000 DS 0D 00800000 @CC02654 DC C'BCX0' 00801000 @00 EQU 00 EQUATES FOR REGISTERS 0-15 00802000 @01 EQU 01 00803000 @02 EQU 02 00804000 @03 EQU 03 00805000 @04 EQU 04 00806000 @05 EQU 05 00807000 @06 EQU 06 00808000 @07 EQU 07 00809000 @08 EQU 08 00810000 @09 EQU 09 00811000 @10 EQU 10 00812000 @11 EQU 11 00813000 @12 EQU 12 00814000 @13 EQU 13 00815000 @14 EQU 14 00816000 @15 EQU 15 00817000 PTRATC EQU @02 00818000 PTRLCP EQU @07 00819000 BASER EQU @12 00820000 PTRSAVE EQU @13 00821000 R01 EQU @01 00822000 R02 EQU @02 00823000 R03 EQU @03 00824000 R04 EQU @04 00825000 R05 EQU @05 00826000 R06 EQU @06 00827000 RPHPTR EQU @01 00828000 GPR01P EQU @01 00829000 GPR12P EQU @12 00830000 GPR13P EQU @13 00831000 GPR14P EQU @14 00832000 GPR07P EQU @07 00833000 GPR15P EQU @15 00834000 GPR01F EQU @01 00835000 GPR07F EQU @07 00836000 GPR12F EQU @12 00837000 GPR13F EQU @13 00838000 GPR14F EQU @14 00839000 GPR15F EQU @15 00840000 ATCLCPTR EQU 1032 00841000 ISTZBFZ0 EQU 0 00842000 CVTMAP EQU 0 00843000 CVTDAR EQU CVTMAP+72 00844000 CVTFLGS1 EQU CVTDAR 00845000 CVTDCB EQU CVTMAP+116 00846000 CVTIERLC EQU CVTMAP+144 00847000 CVTOPTA EQU CVTMAP+182 00848000 CVTOPTB EQU CVTMAP+183 00849000 CVTGTF EQU CVTMAP+236 00850000 CVTGTFST EQU CVTGTF 00851000 CVTGTFS EQU CVTGTFST 00852000 CVTSTATE EQU CVTGTFST 00853000 CVTTMODE EQU CVTGTFST 00854000 CVTFORM EQU CVTGTFST 00855000 CVTAQAVT EQU CVTMAP+240 00856000 CVTTCMFG EQU CVTAQAVT 00857000 CVTVOLM2 EQU CVTMAP+244 00858000 CVTTATA EQU CVTVOLM2 00859000 CVTTSKS EQU CVTTATA 00860000 CVTVOLF2 EQU CVTTSKS 00861000 CVTTAT EQU CVTTATA+1 00862000 CVTATER EQU CVTMAP+248 00863000 CVTEXT1 EQU CVTMAP+252 00864000 CVTPURG EQU CVTMAP+260 00865000 CVTQMSG EQU CVTMAP+268 00866000 CVTDMSR EQU CVTMAP+272 00867000 CVTERPV EQU CVTMAP+316 00868000 CVTINTLA EQU CVTMAP+320 00869000 CVTAPF EQU CVTMAP+324 00870000 CVTEXT2 EQU CVTMAP+328 00871000 CVTHJES EQU CVTMAP+332 00872000 CVTPGSIA EQU CVTMAP+348 00873000 CVTA1F1 EQU CVTMAP+356 00874000 CVTSYSK EQU CVTMAP+357 00875000 CVTVOLM1 EQU CVTMAP+380 00876000 CVTVOLF1 EQU CVTVOLM1 00877000 CVTATMCT EQU CVTMAP+388 00878000 CVTXTNT1 EQU 0 00879000 CVTXTNT2 EQU 0 00880000 CVTDSSV EQU CVTXTNT2 00881000 CVTFLGBT EQU CVTXTNT2+5 00882000 CVTQID EQU CVTXTNT2+24 00883000 CVTSHS EQU CVTXTNT2+40 00884000 CVTRV400 EQU CVTXTNT2+52 00885000 CVTRV409 EQU CVTXTNT2+53 00886000 CVTATCVT EQU CVTXTNT2+64 00887000 CVTRV429 EQU CVTXTNT2+84 00888000 CVTRV438 EQU CVTXTNT2+85 00889000 CVTRV457 EQU CVTXTNT2+112 00890000 CVTRV466 EQU CVTXTNT2+113 00891000 CVTFIX EQU 0 00892000 CVTRELNO EQU CVTFIX+252 00893000 ISTPAB EQU 0 00894000 PABWQCHN EQU ISTPAB 00895000 PABWEQA EQU PABWQCHN 00896000 PABCHAIN EQU PABWQCHN+4 00897000 PABRPHFG EQU ISTPAB+12 00898000 PABFLAGS EQU PABRPHFG 00899000 PABERLCK EQU PABFLAGS 00900000 PABERRLK EQU PABERLCK 00901000 ISTDYPAB EQU 0 00902000 ISTLOK EQU 0 00903000 LOKCHN EQU ISTLOK+1 00904000 LOKCHNG EQU LOKCHN 00905000 @NM00004 EQU LOKCHNG+2 00906000 ISTRPH EQU 0 00907000 RPHFLAGS EQU ISTRPH+2 00908000 RPHAPTYP EQU RPHFLAGS 00909000 RPHFSTLC EQU RPHFLAGS 00910000 RPHFLGB EQU ISTRPH+3 00911000 RPHRPHA EQU ISTRPH+4 00912000 RPHTSKID EQU ISTRPH+8 00913000 RPHRESMA EQU ISTRPH+16 00914000 RPHWPFLG EQU RPHRESMA 00915000 RPHWEA EQU ISTRPH+24 00916000 RPHCSPA EQU RPHWEA 00917000 RPHSRPRM EQU ISTRPH+28 00918000 RPHCRR EQU ISTRPH+32 00919000 RPHPABQA EQU ISTRPH+36 00920000 RPHWORK EQU ISTRPH+40 00921000 RPHSAVE1 EQU RPHWORK 00922000 RPHSBITS EQU RPHSAVE1+1 00923000 ISTATCVT EQU 0 00924000 ATCCOM EQU ISTATCVT 00925000 ATCSTAT EQU ATCCOM 00926000 ATCSTAT1 EQU ATCSTAT 00927000 ATCSTFLG EQU ATCSTAT+1 00928000 ATCPOFLG EQU ATCSTAT+2 00929000 ATCSTAT4 EQU ATCSTAT+3 00930000 ATCIOTRC EQU ATCCOM+140 00931000 ATCTHTRC EQU ATCIOTRC 00932000 ATCCSMR EQU ISTATCVT+296 00933000 ATCSHRFG EQU ISTATCVT+316 00934000 ATCHPGM EQU ISTATCVT+384 00935000 ATCVLCNT EQU ISTATCVT+772 00936000 ATCSOPD EQU ISTATCVT+792 00937000 ATCSIPD EQU ISTATCVT+800 00938000 ATCSECST EQU ISTATCVT+812 00939000 ATCAOSM EQU ISTATCVT+912 00940000 ATCGSRBQ EQU ATCAOSM+4 00941000 ATCGSRBG EQU ATCGSRBQ 00942000 ATCZPSVT EQU ATCAOSM+72 00943000 ATCICAPP EQU ATCAOSM+100 00944000 ATCLDAPP EQU ATCAOSM+120 00945000 ATCDAPVT EQU ATCAOSM+140 00946000 ATCVTFLG EQU ATCAOSM+392 00947000 ATCZFLAG EQU ATCAOSM+588 00948000 ISTZSAVE EQU 0 00949000 ZSAZSVBC EQU ISTZSAVE 00950000 ZSAZSVMS EQU ZSAZSVBC 00951000 ZSAZACTV EQU ZSAZSVMS 00952000 ZSAZSVFC EQU ISTZSAVE+4 00953000 ZSAZSVRR EQU ISTZSAVE+8 00954000 ZSAZSVVR EQU ISTZSAVE+12 00955000 ZSAZTRAC EQU ISTZSAVE+36 00956000 ISTLCCW EQU 0 00957000 LCCWOP EQU ISTLCCW 00958000 LCCWRWOP EQU LCCWOP 00959000 LCCWCTL EQU LCCWRWOP 00960000 LCCWFLAG EQU ISTLCCW+1 00961000 LCCWLSI EQU LCCWFLAG 00962000 ISTLCPB EQU 0 00963000 LCPREQTG EQU ISTLCPB+2 00964000 LCPFLAGS EQU LCPREQTG 00965000 LCPZRT01 EQU LCPFLAGS 00966000 LCPZF001 EQU LCPFLAGS 00967000 LCPZRT02 EQU LCPZF001 00968000 LCPZF002 EQU LCPFLAGS 00969000 LCPZRT03 EQU LCPZF002 00970000 LCPZF003 EQU LCPFLAGS 00971000 LCPZRT04 EQU LCPZF003 00972000 LCPZF004 EQU LCPFLAGS 00973000 LCPZRT05 EQU LCPZF004 00974000 LCPZRT06 EQU LCPFLAGS 00975000 LCPZRT07 EQU LCPFLAGS 00976000 LCPMNRCD EQU LCPREQTG+1 00977000 LCPZRT08 EQU LCPMNRCD 00978000 LCPZRT09 EQU LCPMNRCD 00979000 LCPCHAIN EQU ISTLCPB+4 00980000 LCPCHAI1 EQU LCPCHAIN 00981000 LCPRUCNT EQU ISTLCPB+8 00982000 LCPFLAG2 EQU ISTLCPB+9 00983000 LCPTLBPI EQU LCPFLAG2 00984000 LCPFID0 EQU LCPFLAG2 00985000 LCPSEQ EQU ISTLCPB+10 00986000 LCPCID EQU ISTLCPB+16 00987000 LCPFDBA EQU ISTLCPB+24 00988000 LCPFLG1 EQU ISTLCPB+37 00989000 LCPFLCCW EQU ISTLCPB+40 00990000 LCPLCCW EQU ISTLCPB+48 00991000 LCPPABA EQU LCPLCCW+4 00992000 LCPRPHA EQU LCPPABA 00993000 ISTFDB EQU 0 00994000 ISTFSB EQU 0 00995000 FSBFSB EQU ISTFSB 00996000 FSBMNRCD EQU FSBFSB+2 00997000 FSBSFLGS EQU FSBFSB+3 00998000 FSBFSBA EQU FSBFSB+4 00999000 FSBBTH EQU FSBFSB+8 01000000 FSBCID EQU FSBBTH 01001000 FSBRQTAG EQU FSBBTH+4 01002000 FSBSEQID EQU FSBRQTAG 01003000 FSBFLAGS EQU FSBSEQID 01004000 FSBSEQ EQU FSBSEQID+1 01005000 FSBCSWST EQU FSBBTH+6 01006000 FSBTHFLD EQU FSBCSWST 01007000 FSBTH1 EQU FSBTHFLD 01008000 FSBSYSRS EQU FSBTH1 01009000 FSBTH2 EQU FSBTHFLD+1 01010000 FSBEXTRS EQU FSBTH2 01011000 FSBXFSTS EQU FSBEXTRS 01012000 FSBXCODE EQU FSBEXTRS 01013000 FSBNETRS EQU FSBFSB+16 01014000 FSBSRCAT EQU FSBNETRS 01015000 FSBERC EQU FSBNETRS+1 01016000 FSBFBMI EQU FSBERC 01017000 FSBDMGRS EQU FSBFSB+18 01018000 FSBSS1 EQU FSBDMGRS 01019000 FSBSS2 EQU FSBDMGRS+1 01020000 FSBLCPB EQU FSBFSB+20 01021000 FSBMSGID EQU FSBLCPB 01022000 FSBLCCWA EQU FSBFSB+24 01023000 FSBRLSTS EQU FSBLCCWA 01024000 ISTZPSVT EQU 0 01025000 ZPSZBFZ0 EQU ISTZPSVT+28 01026000 ISTZCRR EQU 0 01027000 ZCRCRR EQU ISTZCRR 01028000 ZCRFLGS1 EQU ISTZCRR+12 01029000 ZCRFLGS2 EQU ISTZCRR+13 01030000 ZCRSWFLD EQU ISTZCRR+14 01031000 ZCRENDSH EQU ZCRSWFLD 01032000 ZCRNDLCP EQU ZCRSWFLD 01033000 ZCRRESET EQU ZCRSWFLD 01034000 ZCRFLGS3 EQU ISTZCRR+15 01035000 ZCRGENSW EQU ISTZCRR+16 01036000 ZCRPFLGS EQU ISTZCRR+17 01037000 ZCRIBPR EQU ISTZCRR+18 01038000 ZCRSCPSW EQU ISTZCRR+19 01039000 ZCRPARMS EQU ISTZCRR+24 01040000 ZCRFBPTR EQU ZCRPARMS 01041000 ZCRDFRDA EQU ZCRPARMS+10 01042000 ZCRPCOD1 EQU ZCRPARMS+12 01043000 ZCRPLSBF EQU ZCRPCOD1 01044000 ZCRPCOD2 EQU ZCRPARMS+13 01045000 ZCRSVRTN EQU ISTZCRR+56 01046000 ZCRWKARA EQU ISTZCRR+156 01047000 ZCRCIDSV EQU ISTZCRR+192 01048000 ZCRAUDIT EQU ISTZCRR+440 01049000 ZCRENTER EQU ZCRAUDIT+5 01050000 ZCREBCX0 EQU ZCRENTER+5 01051000 ZCRLCPB EQU ISTZCRR+480 01052000 ZCRRHRU EQU ZCRLCPB 01053000 ISTPFCRR EQU 0 01054000 PFCCRR EQU ISTPFCRR 01055000 PFCCRRID EQU PFCCRR 01056000 PFCCRRLN EQU PFCCRR+2 01057000 PFCHDR EQU ISTPFCRR+4 01058000 PFCCRRO EQU PFCHDR 01059000 PFCFRRO EQU PFCHDR+4 01060000 ISTCFCRR EQU 0 01061000 CFCAUDIT EQU ISTCFCRR 01062000 CFCNTRD EQU CFCAUDIT 01063000 CFCCRT EQU CFCAUDIT+1 01064000 ISTASCRR EQU 0 01065000 ASCFLAGS EQU ISTASCRR+16 01066000 ASCFLG1 EQU ASCFLAGS 01067000 ASCFLG2 EQU ASCFLAGS+2 01068000 ASCFLG3 EQU ASCFLAGS+4 01069000 ASCUSRGS EQU ISTASCRR+28 01070000 ISTAPCRR EQU 0 01071000 APCATFLG EQU ISTAPCRR+16 01072000 APCRFLG EQU ISTAPCRR+18 01073000 APCSAVE EQU ISTAPCRR+44 01074000 APCCOMF EQU ISTAPCRR+116 01075000 APCCOMF1 EQU APCCOMF 01076000 APC31FLG EQU ISTAPCRR+132 01077000 APC52FLG EQU ISTAPCRR+133 01078000 APC53FLG EQU ISTAPCRR+134 01079000 APC54FLG EQU ISTAPCRR+135 01080000 APC57FLG EQU ISTAPCRR+136 01081000 ISTCRA EQU 0 01082000 CRABASIC EQU ISTCRA 01083000 CRAHDR EQU CRABASIC 01084000 CRACRR EQU CRAHDR 01085000 CRALKACT EQU CRABASIC+8 01086000 CRASVC EQU ISTCRA+848 01087000 CRABUFA EQU CRASVC+68 01088000 CVTS01 EQU CVTPGSIA 01089000 CVTLPDIA EQU CVTS01+12 01090000 CVTDIRST EQU CVTLPDIA 01091000 CVTSLIDA EQU CVTS01+24 01092000 CVTCTLFG EQU CVTS01+50 01093000 CVTRV210 EQU CVTS01+424 01094000 CVTRV219 EQU CVTS01+425 01095000 CVTRV228 EQU CVTS01+426 01096000 CVTRV237 EQU CVTS01+427 01097000 CVTMFRTR EQU CVTS01+452 01098000 CVTRV262 EQU CVTS01+468 01099000 CVTRV271 EQU CVTS01+469 01100000 CVTRV280 EQU CVTS01+470 01101000 CVTRV289 EQU CVTS01+471 01102000 CVTGSDA EQU CVTS01+600 01103000 LCPZTIE EQU LCPCID 01104000 LCPZSNAM EQU LCPZTIE+8 01105000 FSBCOMBN EQU FSBNETRS 01106000 FSBRHFLD EQU FSBCOMBN+1 01107000 FSBRH3 EQU FSBRHFLD+2 01108000 FSBLDFLG EQU FSBRH3 01109000 @NM00017 EQU FSBRQTAG 01110000 AGO .@UNREFD START UNREFERENCED COMPONENTS 01111000 FSBRT0B EQU @NM00017+1 01112000 FSBRT0A EQU @NM00017+1 01113000 FSBRT09 EQU @NM00017+1 01114000 FSBRT08 EQU @NM00017+1 01115000 FSBRT07 EQU @NM00017 01116000 FSBRT06 EQU @NM00017 01117000 FSBRT05 EQU @NM00017 01118000 FSBRT04 EQU @NM00017 01119000 FSBRT03 EQU @NM00017 01120000 FSBRT02 EQU @NM00017 01121000 FSBRT01 EQU @NM00017 01122000 FSBRT00 EQU @NM00017 01123000 FSBLDCUF EQU FSBLDFLG 01124000 FSBLDSIF EQU FSBLDFLG 01125000 FSBLDSOF EQU FSBLDFLG 01126000 FSBLDEBF EQU FSBLDFLG 01127000 FSBLDBBF EQU FSBLDFLG 01128000 FSBLDFME EQU FSBLDFLG 01129000 FSBLDSCF EQU FSBLDFLG 01130000 FSBLDRMF EQU FSBLDFLG 01131000 FSBRH2 EQU FSBRHFLD+1 01132000 FSBRH1 EQU FSBRHFLD 01133000 FSBALIGN EQU FSBCOMBN 01134000 LCPZTRV4 EQU LCPZSNAM+4 01135000 LCPZTRV1 EQU LCPZSNAM 01136000 LCPZSNA EQU LCPZTIE+4 01137000 LCPZFMCA EQU LCPZTIE 01138000 CVTRV628 EQU CVTS01+728 01139000 CVTRV627 EQU CVTS01+724 01140000 CVTRV626 EQU CVTS01+720 01141000 CVTRV625 EQU CVTS01+716 01142000 CVTRV624 EQU CVTS01+712 01143000 CVTRV623 EQU CVTS01+708 01144000 CVTRV622 EQU CVTS01+704 01145000 CVTRV621 EQU CVTS01+700 01146000 CVTRV620 EQU CVTS01+696 01147000 CVTRV619 EQU CVTS01+692 01148000 CVTRV618 EQU CVTS01+688 01149000 CVTRV617 EQU CVTS01+684 01150000 CVTRV616 EQU CVTS01+680 01151000 CVTRV615 EQU CVTS01+676 01152000 CVTRV614 EQU CVTS01+672 01153000 CVTRV613 EQU CVTS01+668 01154000 CVTRV612 EQU CVTS01+664 01155000 CVTRV611 EQU CVTS01+660 01156000 CVTEVERM EQU CVTS01+656 01157000 CVTIRM EQU CVTS01+652 01158000 CVTCGK EQU CVTS01+648 01159000 CVTRAC EQU CVTS01+644 01160000 CVTRV606 EQU CVTS01+640 01161000 CVTRV605 EQU CVTS01+636 01162000 CVTRV604 EQU CVTS01+632 01163000 CVTEFF02 EQU CVTS01+628 01164000 CVTCBBR EQU CVTS01+624 01165000 CVTSSCR EQU CVTS01+620 01166000 CVTEVENT EQU CVTS01+616 01167000 CVTCRCA EQU CVTS01+612 01168000 CVTTPIO EQU CVTS01+608 01169000 CVTADV EQU CVTS01+604 01170000 CVTGSDAB EQU CVTGSDA 01171000 CVTQV3 EQU CVTS01+596 01172000 CVTQV2 EQU CVTS01+592 01173000 CVTQV1 EQU CVTS01+588 01174000 CVTRPT EQU CVTS01+584 01175000 CVTSSRB EQU CVTS01+580 01176000 CVTCSDRL EQU CVTS01+576 01177000 CVTEXP1 EQU CVTS01+572 01178000 CVTRMPMT EQU CVTS01+568 01179000 CVTRMPTT EQU CVTS01+564 01180000 CVTVPSA EQU CVTS01+560 01181000 CVTVSTOP EQU CVTS01+556 01182000 CVTGTFR8 EQU CVTS01+552 01183000 CVTQUIT EQU CVTS01+548 01184000 CVTVACR EQU CVTS01+544 01185000 CVTWTCB EQU CVTS01+540 01186000 CVTSTPRS EQU CVTS01+536 01187000 CVT0PT02 EQU CVTS01+532 01188000 CVTDARCM EQU CVTS01+528 01189000 CVTIRECM EQU CVTS01+524 01190000 CVTJRECM EQU CVTS01+520 01191000 CVTVEMS0 EQU CVTS01+516 01192000 CVTSPFRR EQU CVTS01+512 01193000 CVTRLSTG EQU CVTS01+508 01194000 CVT0TC0A EQU CVTS01+504 01195000 CVTGMBR EQU CVTS01+500 01196000 CVTLFRM EQU CVTS01+496 01197000 CVTRMBR EQU CVTS01+492 01198000 CVTVIOP EQU CVTS01+488 01199000 CVTRV307 EQU CVTS01+486 01200000 CVTRV306 EQU CVTS01+484 01201000 CVTRV305 EQU CVTS01+482 01202000 CVTRV304 EQU CVTS01+480 01203000 CVTRV303 EQU CVTS01+478 01204000 CVTRV302 EQU CVTS01+476 01205000 CVTTRCA EQU CVTS01+472 01206000 CVTRV297 EQU CVTRV289 01207000 CVTRV296 EQU CVTRV289 01208000 CVTRV295 EQU CVTRV289 01209000 CVTRV294 EQU CVTRV289 01210000 CVTRV293 EQU CVTRV289 01211000 CVTRV292 EQU CVTRV289 01212000 CVTRV291 EQU CVTRV289 01213000 CVTRV290 EQU CVTRV289 01214000 CVTRV288 EQU CVTRV280 01215000 CVTRV287 EQU CVTRV280 01216000 CVTRV286 EQU CVTRV280 01217000 CVTRV285 EQU CVTRV280 01218000 CVTRV284 EQU CVTRV280 01219000 CVTRV283 EQU CVTRV280 01220000 CVTRV282 EQU CVTRV280 01221000 CVTRV281 EQU CVTRV280 01222000 CVTRV279 EQU CVTRV271 01223000 CVTRV278 EQU CVTRV271 01224000 CVTRV277 EQU CVTRV271 01225000 CVTRV276 EQU CVTRV271 01226000 CVTRV275 EQU CVTRV271 01227000 CVTRV274 EQU CVTRV271 01228000 CVTRV273 EQU CVTRV271 01229000 CVTRV272 EQU CVTRV271 01230000 CVTRV270 EQU CVTRV262 01231000 CVTRV269 EQU CVTRV262 01232000 CVTRV268 EQU CVTRV262 01233000 CVTRV267 EQU CVTRV262 01234000 CVTRV266 EQU CVTRV262 01235000 CVTRV265 EQU CVTRV262 01236000 CVTRV264 EQU CVTRV262 01237000 CVTRV263 EQU CVTRV262 01238000 CVTVFP EQU CVTS01+464 01239000 CVTVSI EQU CVTS01+460 01240000 CVTVPSIB EQU CVTS01+456 01241000 CVTMFACT EQU CVTMFRTR 01242000 CVTMFCTL EQU CVTS01+448 01243000 CVTPVBP EQU CVTS01+444 01244000 CVTPWI EQU CVTS01+440 01245000 CVTRV254 EQU CVTS01+438 01246000 CVTRV253 EQU CVTS01+436 01247000 CVTRV252 EQU CVTS01+434 01248000 CVTRV251 EQU CVTS01+433 01249000 CVTRV250 EQU CVTS01+432 01250000 CVTRV249 EQU CVTS01+431 01251000 CVTRV248 EQU CVTS01+430 01252000 CVTRV247 EQU CVTS01+429 01253000 CVTRV246 EQU CVTS01+428 01254000 CVTRV245 EQU CVTRV237 01255000 CVTRV244 EQU CVTRV237 01256000 CVTRV243 EQU CVTRV237 01257000 CVTRV242 EQU CVTRV237 01258000 CVTRV241 EQU CVTRV237 01259000 CVTRV240 EQU CVTRV237 01260000 CVTRV239 EQU CVTRV237 01261000 CVTRV238 EQU CVTRV237 01262000 CVTRV236 EQU CVTRV228 01263000 CVTRV235 EQU CVTRV228 01264000 CVTRV234 EQU CVTRV228 01265000 CVTRV233 EQU CVTRV228 01266000 CVTRV232 EQU CVTRV228 01267000 CVTRV231 EQU CVTRV228 01268000 CVTRV230 EQU CVTRV228 01269000 CVTRV229 EQU CVTRV228 01270000 CVTRV227 EQU CVTRV219 01271000 CVTRV226 EQU CVTRV219 01272000 CVTRV225 EQU CVTRV219 01273000 CVTRV224 EQU CVTRV219 01274000 CVTRV223 EQU CVTRV219 01275000 CVTRV222 EQU CVTRV219 01276000 CVTRV221 EQU CVTRV219 01277000 CVTRV220 EQU CVTRV219 01278000 CVTRV218 EQU CVTRV210 01279000 CVTRV217 EQU CVTRV210 01280000 CVTRV216 EQU CVTRV210 01281000 CVTRV215 EQU CVTRV210 01282000 CVTRV214 EQU CVTRV210 01283000 CVTRV213 EQU CVTRV210 01284000 CVTRV212 EQU CVTRV210 01285000 CVTRV211 EQU CVTRV210 01286000 CVTLCCAT EQU CVTS01+420 01287000 CVTPCCAT EQU CVTS01+416 01288000 CVTIPCRP EQU CVTS01+412 01289000 CVTIPCRI EQU CVTS01+408 01290000 CVTIPCDS EQU CVTS01+404 01291000 CVTAIDVT EQU CVTS01+400 01292000 CVTSSAP EQU CVTS01+396 01293000 CVTEHCIR EQU CVTS01+392 01294000 CVTEHDEF EQU CVTS01+388 01295000 CVTDAIR EQU CVTS01+384 01296000 CVTPERFM EQU CVTS01+380 01297000 CVT044R2 EQU CVTS01+376 01298000 CVTFETCH EQU CVTS01+372 01299000 CVTRSTWD EQU CVTS01+368 01300000 CVTSPOST EQU CVTS01+364 01301000 CVTIOBP EQU CVTS01+360 01302000 CVTASMVT EQU CVTS01+356 01303000 CVTRECRQ EQU CVTS01+352 01304000 CVTWSAC EQU CVTS01+348 01305000 CVTRV149 EQU CVTS01+344 01306000 CVTWSAL EQU CVTS01+340 01307000 CVTSPSA EQU CVTS01+336 01308000 CVTGLMN EQU CVTS01+332 01309000 CVTVEAC0 EQU CVTS01+328 01310000 CVT062R1 EQU CVTS01+324 01311000 CVTRPOST EQU CVTS01+320 01312000 CVTDQIQE EQU CVTS01+316 01313000 CVTCSD EQU CVTS01+312 01314000 CVTLKRMA EQU CVTS01+308 01315000 CVTRSPIE EQU CVTS01+304 01316000 CVTRENQ EQU CVTS01+300 01317000 CVTLQCB EQU CVTS01+296 01318000 CVTFQCB EQU CVTS01+292 01319000 CVTQCS01 EQU CVTS01+288 01320000 CVTAPFT EQU CVTS01+284 01321000 CVTPARRL EQU CVTS01+280 01322000 CVTVWAIT EQU CVTS01+276 01323000 CVTGSPL EQU CVTS01+272 01324000 CVTLSMQ EQU CVTS01+268 01325000 CVTGSMQ EQU CVTS01+264 01326000 CVTEXPRO EQU CVTS01+260 01327000 CVTOPCTP EQU CVTS01+256 01328000 CVTSIC EQU CVTS01+252 01329000 CVTTPIOS EQU CVTS01+248 01330000 CVTRTMS EQU CVTS01+244 01331000 CVTSDBF EQU CVTS01+240 01332000 CVTSCBP EQU CVTS01+236 01333000 CVTSDMP EQU CVTS01+232 01334000 CVTSV60 EQU CVTS01+228 01335000 CVTRTMCT EQU CVTS01+224 01336000 CVTASCBL EQU CVTS01+220 01337000 CVTASCBH EQU CVTS01+216 01338000 CVTGDA EQU CVTS01+212 01339000 CVTASVT EQU CVTS01+208 01340000 CVTVVMDI EQU CVTS01+204 01341000 CVTAQTOP EQU CVTS01+200 01342000 CVTIOSCS EQU CVTS01+196 01343000 CVTSDRM EQU CVTS01+192 01344000 CVTOPTE EQU CVTS01+188 01345000 CVTSTXU EQU CVTS01+184 01346000 CVTQUIS EQU CVTS01+180 01347000 CVTPARS EQU CVTS01+176 01348000 CVTS1EE EQU CVTS01+172 01349000 CVTFRAS EQU CVTS01+168 01350000 CVTQSAS EQU CVTS01+164 01351000 CVTCRAS EQU CVTS01+160 01352000 CVTCRMN EQU CVTS01+156 01353000 CVTDELCP EQU CVTS01+152 01354000 CVTFRECL EQU CVTS01+148 01355000 CVTGETCL EQU CVTS01+144 01356000 CVTBLDCP EQU CVTS01+140 01357000 CVTAUTHL EQU CVTS01+136 01358000 CVTSCAN EQU CVTS01+132 01359000 CVTRV144 EQU CVTS01+130 01360000 CVTMAXMP EQU CVTS01+128 01361000 CVTSTCK EQU CVTS01+124 01362000 CVTRV139 EQU CVTS01+123 01363000 CVTDSSAC EQU CVTS01+122 01364000 CVTRV513 EQU CVTS01+121 01365000 CVTIOSPL EQU CVTS01+120 01366000 CVTPTGT EQU CVTS01+116 01367000 CVTCSPIE EQU CVTS01+112 01368000 CVTSMFEX EQU CVTS01+108 01369000 CVTOLT0A EQU CVTS01+104 01370000 CVTSRBRT EQU CVTS01+100 01371000 CVTPUTL EQU CVTS01+96 01372000 CVTRV519 EQU CVTS01+92 01373000 CVTRV327 EQU CVTS01+88 01374000 CVTRV326 EQU CVTS01+84 01375000 CVTRV325 EQU CVTS01+80 01376000 CVTRV324 EQU CVTS01+76 01377000 CVT0VL01 EQU CVTS01+72 01378000 CVTSHRVM EQU CVTS01+68 01379000 CVTRV332 EQU CVTS01+64 01380000 CVTTAS EQU CVTS01+60 01381000 CVTRSCN EQU CVTS01+56 01382000 CVTTRAC2 EQU CVTS01+54 01383000 CVTTRACE EQU CVTS01+52 01384000 CVTAPG EQU CVTS01+51 01385000 CVTSDTRC EQU CVTCTLFG 01386000 CVTGTRCE EQU CVTCTLFG 01387000 CVTNOMP EQU CVTCTLFG 01388000 CVTRSV79 EQU CVTCTLFG 01389000 CVTDSTAT EQU CVTCTLFG 01390000 CVTRSV78 EQU CVTCTLFG 01391000 CVTRV333 EQU CVTCTLFG 01392000 CVTRV323 EQU CVTCTLFG 01393000 CVTSPVLK EQU CVTS01+49 01394000 CVTRSV77 EQU CVTS01+48 01395000 CVTRV331 EQU CVTS01+44 01396000 CVTRV330 EQU CVTS01+40 01397000 CVTRV329 EQU CVTS01+36 01398000 CVTRV328 EQU CVTS01+32 01399000 CVTRV322 EQU CVTS01+28 01400000 CVTSLID EQU CVTSLIDA+1 01401000 CVTSYLK EQU CVTSLIDA 01402000 CVTRV321 EQU CVTS01+20 01403000 CVTRV320 EQU CVTS01+16 01404000 CVTLPDIR EQU CVTLPDIA+1 01405000 CVTRSV69 EQU CVTDIRST 01406000 CVTRSV68 EQU CVTDIRST 01407000 CVTRSV67 EQU CVTDIRST 01408000 CVTRSV66 EQU CVTDIRST 01409000 CVTRSV65 EQU CVTDIRST 01410000 CVTRSV64 EQU CVTDIRST 01411000 CVTRSV63 EQU CVTDIRST 01412000 CVTDICOM EQU CVTDIRST 01413000 CVTPVTP EQU CVTS01+8 01414000 CVTLPDSR EQU CVTS01+4 01415000 CVTGETL EQU CVTS01 01416000 CRACHAIN EQU ISTCRA+928 01417000 CRARSV02 EQU ISTCRA+924 01418000 CRARSV01 EQU ISTCRA+920 01419000 CRABFTBA EQU CRABUFA 01420000 CRAMASK EQU CRASVC+64 01421000 CRAHSIZ EQU CRASVC+60 01422000 CRAASCRR EQU CRASVC 01423000 CRAPROCR EQU ISTCRA+312 01424000 CRAPSS EQU ISTCRA+160 01425000 CRARPH EQU ISTCRA+52 01426000 CRALAPTR EQU CRABASIC+48 01427000 CRAL9PTR EQU CRABASIC+44 01428000 CRAL8PTR EQU CRABASIC+40 01429000 CRAL7PTR EQU CRABASIC+36 01430000 CRAL6PTR EQU CRABASIC+32 01431000 CRAL5PTR EQU CRABASIC+28 01432000 CRAL4PTR EQU CRABASIC+24 01433000 CRAL3PTR EQU CRABASIC+20 01434000 CRAL2PTR EQU CRABASIC+16 01435000 CRAL1PTR EQU CRABASIC+12 01436000 CRALEV01 EQU CRALKACT+3 01437000 CRALEV02 EQU CRALKACT+3 01438000 CRALEV03 EQU CRALKACT+3 01439000 CRALEV04 EQU CRALKACT+3 01440000 CRALEV05 EQU CRALKACT+3 01441000 CRALEV06 EQU CRALKACT+3 01442000 CRALEV07 EQU CRALKACT+3 01443000 CRALEV08 EQU CRALKACT+3 01444000 CRALEV09 EQU CRALKACT+2 01445000 CRALEV10 EQU CRALKACT+2 01446000 CRALEV11 EQU CRALKACT+2 01447000 CRALEV12 EQU CRALKACT+2 01448000 CRALEV13 EQU CRALKACT+2 01449000 CRALEV14 EQU CRALKACT+2 01450000 CRALEV15 EQU CRALKACT+2 01451000 CRALEV16 EQU CRALKACT+2 01452000 CRALEV17 EQU CRALKACT+1 01453000 CRALEV18 EQU CRALKACT+1 01454000 CRALEV19 EQU CRALKACT+1 01455000 CRALEV20 EQU CRALKACT+1 01456000 CRALEV21 EQU CRALKACT+1 01457000 CRALEV22 EQU CRALKACT+1 01458000 CRALEV23 EQU CRALKACT+1 01459000 CRALEV24 EQU CRALKACT+1 01460000 CRALEV25 EQU CRALKACT 01461000 CRALEV26 EQU CRALKACT 01462000 CRALEV27 EQU CRALKACT 01463000 CRALEV28 EQU CRALKACT 01464000 CRALEV29 EQU CRALKACT 01465000 CRALEV30 EQU CRALKACT 01466000 CRALEV31 EQU CRALKACT 01467000 CRALEV32 EQU CRALKACT 01468000 CRAFRR EQU CRAHDR+4 01469000 @NM00030 EQU ISTAPCRR+137 01470000 @NM00029 EQU APC57FLG 01471000 APCNREL EQU APC57FLG 01472000 APCRECRA EQU APC57FLG 01473000 @NM00028 EQU APC54FLG 01474000 APCRLST EQU APC54FLG 01475000 APCPR153 EQU APC53FLG 01476000 @NM00027 EQU APC52FLG 01477000 APCWKF EQU APC52FLG 01478000 APCNWF EQU APC52FLG 01479000 APCRDQ EQU APC52FLG 01480000 APCQENQ EQU APC52FLG 01481000 APCSMSR EQU APC52FLG 01482000 APCCKRQ EQU APC52FLG 01483000 @NM00026 EQU APC31FLG 01484000 APCSORT EQU APC31FLG 01485000 APCRESCH EQU APC31FLG 01486000 APCTPXIT EQU APC31FLG 01487000 APCSWTWD EQU ISTAPCRR+128 01488000 APCSAV2 EQU ISTAPCRR+124 01489000 APCSAV1 EQU ISTAPCRR+120 01490000 APCRETCD EQU APCCOMF+2 01491000 @NM00025 EQU APCCOMF1+1 01492000 APCZLBER EQU APCCOMF1 01493000 APCEXIT EQU APCCOMF1 01494000 APCRELR EQU APCCOMF1 01495000 APCIRB2 EQU APCCOMF1 01496000 APCIRB1 EQU APCCOMF1 01497000 APCSMCR EQU APCCOMF1 01498000 APCUETSK EQU APCCOMF1 01499000 APCSSTSK EQU APCCOMF1 01500000 APCESTAL EQU APCSAVE 01501000 APCFRRPM EQU ISTAPCRR+40 01502000 APCQWFO EQU ISTAPCRR+36 01503000 APCPABSV EQU ISTAPCRR+32 01504000 APCRTRN EQU ISTAPCRR+28 01505000 APCTCBA EQU ISTAPCRR+24 01506000 APCPSTA EQU ISTAPCRR+20 01507000 @NM00024 EQU APCRFLG+1 01508000 APC31R EQU APCRFLG 01509000 APC58R EQU APCRFLG 01510000 APC57R EQU APCRFLG 01511000 APC56R EQU APCRFLG 01512000 APC54R EQU APCRFLG 01513000 APC53R EQU APCRFLG 01514000 APC52R EQU APCRFLG 01515000 APC51R EQU APCRFLG 01516000 @NM00023 EQU APCATFLG+1 01517000 APC31E EQU APCATFLG 01518000 APC58E EQU APCATFLG 01519000 APC57E EQU APCATFLG 01520000 APC56E EQU APCATFLG 01521000 APC54E EQU APCATFLG 01522000 APC53E EQU APCATFLG 01523000 APC52E EQU APCATFLG 01524000 APC51E EQU APCATFLG 01525000 APCHDRSV EQU ISTAPCRR 01526000 ASCPSREG EQU ISTASCRR+44 01527000 ASCUSR01 EQU ASCUSRGS+12 01528000 ASCUSR00 EQU ASCUSRGS+8 01529000 ASCUSR15 EQU ASCUSRGS+4 01530000 ASCUSR14 EQU ASCUSRGS 01531000 ASCETRYA EQU ISTASCRR+24 01532000 ASCKEY EQU ISTASCRR+23 01533000 ASCAUDIT EQU ASCFLG3 01534000 ASCFBDUD EQU ASCFLG3 01535000 ASCLLKF EQU ASCFLG3 01536000 ASCKEYF EQU ASCFLG3 01537000 ASCFBDAL EQU ASCFLG3 01538000 ASCFSRGT EQU ASCFLG3 01539000 ASCICR EQU ASCFLG2 01540000 ASCFSRIC EQU ASCFLG2 01541000 ASCFBDIC EQU ASCFLG2 01542000 ASCFBAIC EQU ASCFLG2 01543000 ASCPASTR EQU ASCFLG1 01544000 ASCFSR EQU ASCFLG1 01545000 ASCFBD EQU ASCFLG1 01546000 ASCFBA EQU ASCFLG1 01547000 ASCPFCRR EQU ISTASCRR 01548000 CCFRSVD1 EQU CFCCRT 01549000 CCFCR2 EQU CFCCRT 01550000 CCFCRP EQU CFCCRT 01551000 CCFCR1 EQU CFCCRT 01552000 CCFCS2 EQU CFCCRT 01553000 CCFCS1 EQU CFCCRT 01554000 NCFRSVD EQU CFCNTRD 01555000 NCFCR2 EQU CFCNTRD 01556000 NCFCRP EQU CFCNTRD 01557000 NCFCR1 EQU CFCNTRD 01558000 NCFCS2 EQU CFCNTRD 01559000 NCFCS1 EQU CFCNTRD 01560000 PFCRSV01 EQU ISTPFCRR+13 01561000 PFCFTA EQU ISTPFCRR+12 01562000 CRRFRR EQU PFCFRRO 01563000 CRRCHAIN EQU PFCCRRO 01564000 CRRLEN EQU PFCCRRLN 01565000 PFCRSV10 EQU PFCCRR+1 01566000 CRRID EQU PFCCRRID 01567000 ZCRRU EQU ZCRRHRU+3 01568000 ZCRRH EQU ZCRRHRU 01569000 ZCRWORDA EQU ISTZCRR+477 01570000 ZCRCMNRC EQU ISTZCRR+476 01571000 ZCRRSV97 EQU ZCRENTER+18 01572000 ZCREIC2B EQU ZCRENTER+18 01573000 ZCREAC2B EQU ZCRENTER+18 01574000 ZCRELCAB EQU ZCRENTER+18 01575000 ZCREDCMF EQU ZCRENTER+18 01576000 ZCREBCIF EQU ZCRENTER+18 01577000 ZCREICSG EQU ZCRENTER+18 01578000 ZCREDCK0 EQU ZCRENTER+18 01579000 ZCRECFY0 EQU ZCRENTER+17 01580000 ZCREKCCB EQU ZCRENTER+17 01581000 ZCREDCNB EQU ZCRENTER+17 01582000 ZCREICOE EQU ZCRENTER+17 01583000 ZCREBCNB EQU ZCRENTER+17 01584000 ZCREBC0L EQU ZCRENTER+17 01585000 ZCREBCAL EQU ZCRENTER+17 01586000 ZCREDCQR EQU ZCRENTER+17 01587000 ZCREDCPR EQU ZCRENTER+16 01588000 ZCREBCSB EQU ZCRENTER+16 01589000 ZCREAC1R EQU ZCRENTER+16 01590000 ZCRECCCI EQU ZCRENTER+16 01591000 ZCRECCAI EQU ZCRENTER+16 01592000 ZCRECCBI EQU ZCRENTER+16 01593000 ZCREBCAR EQU ZCRENTER+16 01594000 ZCREBCDR EQU ZCRENTER+16 01595000 ZCREBCBR EQU ZCRENTER+15 01596000 ZCREDCXR EQU ZCRENTER+15 01597000 ZCREDCWB EQU ZCRENTER+15 01598000 ZCREDCWR EQU ZCRENTER+15 01599000 ZCREKCCN EQU ZCRENTER+15 01600000 ZCREKCBN EQU ZCRENTER+15 01601000 ZCREKCBB EQU ZCRENTER+15 01602000 ZCREJC0B EQU ZCRENTER+15 01603000 ZCREJCDB EQU ZCRENTER+14 01604000 ZCREJCCB EQU ZCRENTER+14 01605000 ZCREJCBB EQU ZCRENTER+14 01606000 ZCREJCAB EQU ZCRENTER+14 01607000 ZCREIC1B EQU ZCRENTER+14 01608000 ZCREIC0B EQU ZCRENTER+14 01609000 ZCREICX0 EQU ZCRENTER+14 01610000 ZCREICWB EQU ZCRENTER+14 01611000 ZCREICVB EQU ZCRENTER+13 01612000 ZCREICUB EQU ZCRENTER+13 01613000 ZCREICTB EQU ZCRENTER+13 01614000 ZCREICSC EQU ZCRENTER+13 01615000 ZCREICSB EQU ZCRENTER+13 01616000 ZCREICRB EQU ZCRENTER+13 01617000 ZCREICQB EQU ZCRENTER+13 01618000 ZCREICQA EQU ZCRENTER+13 01619000 ZCREICOB EQU ZCRENTER+12 01620000 ZCREICOA EQU ZCRENTER+12 01621000 ZCREICNB EQU ZCRENTER+12 01622000 ZCREICNA EQU ZCRENTER+12 01623000 ZCREICMB EQU ZCRENTER+12 01624000 ZCREICLB EQU ZCRENTER+12 01625000 ZCREICKG EQU ZCRENTER+12 01626000 ZCREICKE EQU ZCRENTER+12 01627000 ZCREICKB EQU ZCRENTER+11 01628000 ZCREICJB EQU ZCRENTER+11 01629000 ZCREICID EQU ZCRENTER+11 01630000 ZCREICIB EQU ZCRENTER+11 01631000 ZCREICHB EQU ZCRENTER+11 01632000 ZCREICGB EQU ZCRENTER+11 01633000 ZCREICEB EQU ZCRENTER+11 01634000 ZCREICDB EQU ZCRENTER+11 01635000 ZCREICCI EQU ZCRENTER+10 01636000 ZCREICCB EQU ZCRENTER+10 01637000 ZCREICBI EQU ZCRENTER+10 01638000 ZCREICBB EQU ZCRENTER+10 01639000 ZCREICAB EQU ZCRENTER+10 01640000 ZCREICAA EQU ZCRENTER+10 01641000 ZCREHCAN EQU ZCRENTER+10 01642000 ZCREGC0B EQU ZCRENTER+10 01643000 ZCREGC0A EQU ZCRENTER+9 01644000 ZCREGCLA EQU ZCRENTER+9 01645000 ZCREGCEB EQU ZCRENTER+9 01646000 ZCREGCDB EQU ZCRENTER+9 01647000 @NM00022 EQU ZCRENTER+9 01648000 ZCREGCBB EQU ZCRENTER+9 01649000 ZCREGCAB EQU ZCRENTER+9 01650000 ZCREFCEB EQU ZCRENTER+9 01651000 ZCREFCEA EQU ZCRENTER+8 01652000 ZCREECTA EQU ZCRENTER+8 01653000 ZCREECEA EQU ZCRENTER+8 01654000 ZCREECDA EQU ZCRENTER+8 01655000 ZCREECCB EQU ZCRENTER+8 01656000 ZCREECCA EQU ZCRENTER+8 01657000 ZCREECBB EQU ZCRENTER+8 01658000 ZCREECBA EQU ZCRENTER+8 01659000 ZCREDCMB EQU ZCRENTER+7 01660000 ZCREDCL0 EQU ZCRENTER+7 01661000 ZCREDCKB EQU ZCRENTER+7 01662000 ZCREDCKA EQU ZCRENTER+7 01663000 ZCREDCJ0 EQU ZCRENTER+7 01664000 ZCREDCI0 EQU ZCRENTER+7 01665000 ZCREDCH0 EQU ZCRENTER+7 01666000 ZCREDCF0 EQU ZCRENTER+7 01667000 ZCREDCE0 EQU ZCRENTER+6 01668000 ZCREDCD0 EQU ZCRENTER+6 01669000 ZCREDCC0 EQU ZCRENTER+6 01670000 ZCREDCB0 EQU ZCRENTER+6 01671000 ZCREDCA0 EQU ZCRENTER+6 01672000 ZCRECC2B EQU ZCRENTER+6 01673000 ZCRECC1B EQU ZCRENTER+6 01674000 ZCRECC1A EQU ZCRENTER+6 01675000 ZCRECC0B EQU ZCRENTER+5 01676000 ZCRECC0A EQU ZCRENTER+5 01677000 ZCREBC0B EQU ZCRENTER+5 01678000 ZCREBC0A EQU ZCRENTER+5 01679000 ZCREBCZ0 EQU ZCRENTER+5 01680000 ZCREBCY0 EQU ZCRENTER+5 01681000 ZCREBCXA EQU ZCRENTER+5 01682000 ZCREBCSC EQU ZCRENTER+4 01683000 ZCREBCRB EQU ZCRENTER+4 01684000 ZCREBCRA EQU ZCRENTER+4 01685000 ZCREBCQB EQU ZCRENTER+4 01686000 ZCREBCPB EQU ZCRENTER+4 01687000 ZCREBCOB EQU ZCRENTER+4 01688000 ZCREBCNE EQU ZCRENTER+4 01689000 ZCREBCND EQU ZCRENTER+4 01690000 ZCREBCMB EQU ZCRENTER+3 01691000 ZCREBCLB EQU ZCRENTER+3 01692000 ZCREBCLA EQU ZCRENTER+3 01693000 ZCREBCKB EQU ZCRENTER+3 01694000 ZCREBCKA EQU ZCRENTER+3 01695000 ZCREBCJB EQU ZCRENTER+3 01696000 ZCREBCJA EQU ZCRENTER+3 01697000 ZCREBCID EQU ZCRENTER+3 01698000 ZCREBCIB EQU ZCRENTER+2 01699000 ZCREBCIA EQU ZCRENTER+2 01700000 ZCREBCHB EQU ZCRENTER+2 01701000 ZCREBCHA EQU ZCRENTER+2 01702000 ZCREBCGB EQU ZCRENTER+2 01703000 ZCREBCGA EQU ZCRENTER+2 01704000 ZCREBCFB EQU ZCRENTER+2 01705000 ZCREBCFA EQU ZCRENTER+2 01706000 ZCREBCEB EQU ZCRENTER+1 01707000 ZCREBCDI EQU ZCRENTER+1 01708000 ZCREBCCB EQU ZCRENTER+1 01709000 ZCREBCBI EQU ZCRENTER+1 01710000 ZCREBCBB EQU ZCRENTER+1 01711000 ZCREBCBA EQU ZCRENTER+1 01712000 ZCREBCAM EQU ZCRENTER+1 01713000 ZCREBCAI EQU ZCRENTER+1 01714000 ZCREBCAG EQU ZCRENTER 01715000 ZCREBCAE EQU ZCRENTER 01716000 ZCREBCAB EQU ZCRENTER 01717000 ZCREBCAA EQU ZCRENTER 01718000 ZCREAC1B EQU ZCRENTER 01719000 ZCREAC0B EQU ZCRENTER 01720000 ZCREAC0A EQU ZCRENTER 01721000 ZCREAC1A EQU ZCRENTER 01722000 ZCRTNAME EQU ZCRAUDIT+1 01723000 ZCRTID EQU ZCRAUDIT 01724000 ZCRREMIC EQU ISTZCRR+436 01725000 ZCRSAVEZ EQU ISTZCRR+196 01726000 ZCRDAFSV EQU ZCRCIDSV+2 01727000 ZCRSAFSV EQU ZCRCIDSV 01728000 ZCRR13SV EQU ISTZCRR+188 01729000 ZCRR2SV EQU ISTZCRR+184 01730000 ZCROPCDE EQU ISTZCRR+183 01731000 ZCRPRMTC EQU ISTZCRR+182 01732000 ZCRRCDSV EQU ISTZCRR+181 01733000 ZCRAWQSW EQU ISTZCRR+180 01734000 ZCRTOPQ EQU ISTZCRR+180 01735000 ZCRLSTFB EQU ISTZCRR+180 01736000 ZCRXSCHD EQU ISTZCRR+180 01737000 ZCRNXTEL EQU ISTZCRR+180 01738000 ZCRSCANQ EQU ISTZCRR+180 01739000 ZCRMOREL EQU ISTZCRR+180 01740000 ZCRFBPRC EQU ISTZCRR+180 01741000 ZCRFSBSV EQU ISTZCRR+176 01742000 ZCRSVWK5 EQU ZCRWKARA+16 01743000 ZCRSVWK4 EQU ZCRWKARA+12 01744000 ZCRSVWK3 EQU ZCRWKARA+8 01745000 ZCRSVWK2 EQU ZCRWKARA+4 01746000 ZCRSVWK1 EQU ZCRWKARA 01747000 ZCRSVF25 EQU ZCRSVRTN+96 01748000 ZCRSVF24 EQU ZCRSVRTN+92 01749000 ZCRSVF23 EQU ZCRSVRTN+88 01750000 ZCRSVF22 EQU ZCRSVRTN+84 01751000 ZCRSVF21 EQU ZCRSVRTN+80 01752000 ZCRSVF20 EQU ZCRSVRTN+76 01753000 ZCRSVF19 EQU ZCRSVRTN+72 01754000 ZCRSVF18 EQU ZCRSVRTN+68 01755000 ZCRSVF17 EQU ZCRSVRTN+64 01756000 ZCRSVF16 EQU ZCRSVRTN+60 01757000 ZCRSVF15 EQU ZCRSVRTN+56 01758000 ZCRSVF14 EQU ZCRSVRTN+52 01759000 ZCRSVF13 EQU ZCRSVRTN+48 01760000 ZCRSVF12 EQU ZCRSVRTN+44 01761000 ZCRSVF11 EQU ZCRSVRTN+40 01762000 ZCRSVF10 EQU ZCRSVRTN+36 01763000 ZCRSVF9 EQU ZCRSVRTN+32 01764000 ZCRSVF8 EQU ZCRSVRTN+28 01765000 ZCRSVF7 EQU ZCRSVRTN+24 01766000 ZCRSVF6 EQU ZCRSVRTN+20 01767000 ZCRSVF5 EQU ZCRSVRTN+16 01768000 ZCRSVF4 EQU ZCRSVRTN+12 01769000 ZCRSVF3 EQU ZCRSVRTN+8 01770000 ZCRSVF2 EQU ZCRSVRTN+4 01771000 ZCRSVF1 EQU ZCRSVRTN 01772000 ZCRPVZB EQU ISTZCRR+52 01773000 ZCRZLB EQU ISTZCRR+48 01774000 ZCRBFPTR EQU ISTZCRR+44 01775000 ZCRCCWA EQU ISTZCRR+40 01776000 ZCRPSW EQU ZCRPARMS+15 01777000 ZCRPCHAR EQU ZCRPARMS+14 01778000 ZCRPRES2 EQU ZCRPCOD2 01779000 ZCRPMFGF EQU ZCRPCOD2 01780000 ZCRPFHDR EQU ZCRPCOD2 01781000 ZCRPPG2 EQU ZCRPCOD2 01782000 ZCRPRES EQU ZCRPCOD1 01783000 ZCRPCFTX EQU ZCRPCOD1 01784000 ZCRPBUF EQU ZCRPCOD1 01785000 ZCRPLSCB EQU ZCRPCOD1 01786000 ZCRPLSBQ EQU ZCRPLSBF 01787000 ZCRPFSB EQU ZCRPCOD1 01788000 ZCRPLNG EQU ZCRPCOD1 01789000 ZCRPPG EQU ZCRPCOD1 01790000 ZCRDTODA EQU ZCRDFRDA 01791000 ZCRMLNG EQU ZCRPARMS+8 01792000 ZCRTBPTR EQU ZCRPARMS+4 01793000 ZCRCBPTR EQU ZCRFBPTR 01794000 ZCRCRLCP EQU ISTZCRR+20 01795000 @NM00021 EQU ZCRSCPSW 01796000 ZCRSKIPT EQU ZCRSCPSW 01797000 ZCRFSBWE EQU ZCRSCPSW 01798000 ZCRPRCMP EQU ZCRSCPSW 01799000 ZCRLREQ EQU ZCRSCPSW 01800000 ZCRRJLCP EQU ZCRSCPSW 01801000 ZCRTPINV EQU ZCRSCPSW 01802000 ZCRTPEX EQU ZCRSCPSW 01803000 @NM00020 EQU ZCRIBPR 01804000 ZCR3270R EQU ZCRIBPR 01805000 ZCR3270 EQU ZCRIBPR 01806000 ZCRLCPFD EQU ZCRIBPR 01807000 ZCRLCPFR EQU ZCRIBPR 01808000 ZCRRELK EQU ZCRIBPR 01809000 ZCRERR EQU ZCRIBPR 01810000 ZCRNOBUF EQU ZCRIBPR 01811000 @NM00019 EQU ZCRPFLGS 01812000 ZCRQAHED EQU ZCRPFLGS 01813000 ZCRF1RES EQU ZCRGENSW 01814000 ZCRBRIS EQU ZCRGENSW 01815000 ZCRCLRBD EQU ZCRGENSW 01816000 ZCREXRES EQU ZCRGENSW 01817000 ZCRLCSYN EQU ZCRGENSW 01818000 ZCRRT06 EQU ZCRGENSW 01819000 ZCRTSW2 EQU ZCRGENSW 01820000 ZCRTSW1 EQU ZCRGENSW 01821000 ZCRINLCP EQU ZCRFLGS3 01822000 ZCRWRPTR EQU ZCRFLGS3 01823000 ZCRNOFRE EQU ZCRFLGS3 01824000 ZCREDRIV EQU ZCRFLGS3 01825000 ZCRDISC EQU ZCRFLGS3 01826000 ZCRTPDIS EQU ZCRFLGS3 01827000 ZCRTPCON EQU ZCRFLGS3 01828000 ZCRTIC EQU ZCRFLGS3 01829000 ZCRCNLXL EQU ZCRRESET 01830000 ZCRENDAN EQU ZCRSWFLD 01831000 ZCRENDXL EQU ZCRSWFLD 01832000 ZCRENDX EQU ZCRSWFLD 01833000 ZCROB1 EQU ZCRNDLCP 01834000 ZCRENDPR EQU ZCRSWFLD 01835000 ZCREXTYP EQU ZCRSWFLD 01836000 ZCRSLCP EQU ZCRENDSH 01837000 ZCRIF0E3 EQU ZCRFLGS2 01838000 ZCRIF0E2 EQU ZCRFLGS2 01839000 ZCRIF0E1 EQU ZCRFLGS2 01840000 ZCROB EQU ZCRFLGS2 01841000 ZCRFMSED EQU ZCRFLGS2 01842000 ZCRSHEDI EQU ZCRFLGS2 01843000 ZCRLOCAL EQU ZCRFLGS2 01844000 ZCRFEXIT EQU ZCRFLGS1 01845000 ZCRUNSOL EQU ZCRFLGS1 01846000 ZCRENDLP EQU ZCRFLGS1 01847000 ZCRNRMEX EQU ZCRFLGS1 01848000 ZCRWAIT EQU ZCRFLGS1 01849000 ZCRDEQSW EQU ZCRFLGS1 01850000 ZCRQUESW EQU ZCRFLGS1 01851000 ZCREXSW EQU ZCRFLGS1 01852000 ZCRFRRA EQU ISTZCRR+8 01853000 ZCRCHAIN EQU ISTZCRR+4 01854000 ZCRFLAG EQU ZCRCRR+3 01855000 ZCRLEN EQU ZCRCRR+1 01856000 ZCRID EQU ZCRCRR 01857000 ZPSZDFQR EQU ISTZPSVT+80 01858000 ZPSZDFPR EQU ISTZPSVT+76 01859000 ZPSZDFXR EQU ISTZPSVT+72 01860000 ZPSZIF2B EQU ISTZPSVT+68 01861000 ZPSZAF2B EQU ISTZPSVT+64 01862000 ZPSZDFMB EQU ISTZPSVT+60 01863000 ZPSZDFMF EQU ISTZPSVT+56 01864000 ZPSZDFNB EQU ISTZPSVT+52 01865000 @NM00018 EQU ISTZPSVT+48 01866000 ZPSZDFF0 EQU ISTZPSVT+44 01867000 ZPSZTRTT EQU ISTZPSVT+40 01868000 ZPSZBFOB EQU ISTZPSVT+36 01869000 ZPSZBFMB EQU ISTZPSVT+32 01870000 ZPSZBFY0 EQU ISTZPSVT+24 01871000 ZPSZDFI0 EQU ISTZPSVT+20 01872000 ZPSZDFB0 EQU ISTZPSVT+16 01873000 ZPSZDFH0 EQU ISTZPSVT+12 01874000 ZPSZDFD0 EQU ISTZPSVT+8 01875000 ZPSZDFC0 EQU ISTZPSVT+4 01876000 ZPSZDFA0 EQU ISTZPSVT 01877000 FSBFDB EQU ISTFSB+32 01878000 FSBRSV01 EQU FSBFSB+30 01879000 FSBTHCNT EQU FSBFSB+28 01880000 FSBRLRSV EQU FSBRLSTS 01881000 FSBCFTX EQU FSBRLSTS 01882000 FSBICNCB EQU FSBMSGID 01883000 FSBSSOC EQU FSBSS2 01884000 FSBSSCC EQU FSBSS2 01885000 FSBSSDC EQU FSBSS2 01886000 FSBSSEC EQU FSBSS2 01887000 FSBSSIR EQU FSBSS2 01888000 FSBSSCR EQU FSBSS2 01889000 @NM00016 EQU FSBSS2 01890000 @NM00015 EQU FSBSS1 01891000 FSBSSDE EQU FSBSS1 01892000 FSBSSUS EQU FSBSS1 01893000 @NM00014 EQU FSBSS1 01894000 FSBSOHI EQU FSBERC 01895000 FSBLGI EQU FSBERC 01896000 FSBLMRI EQU FSBFBMI 01897000 FSBETI EQU FSBERC 01898000 FSBEMI EQU FSBERC 01899000 FSBEBI EQU FSBERC 01900000 FSBECI EQU FSBERC 01901000 FSBELI EQU FSBERC 01902000 FSBMJRCD EQU FSBSRCAT 01903000 FSBXLCI EQU FSBXCODE 01904000 FSBXFINS EQU FSBXCODE 01905000 FSBXNORM EQU FSBXFSTS 01906000 FSBSCODE EQU FSBSYSRS 01907000 FSBSPHSE EQU FSBSYSRS 01908000 FSBSERR EQU FSBSYSRS 01909000 FSBCMD EQU FSBSEQ 01910000 FSBDTRCE EQU FSBFLAGS 01911000 FSBASBTU EQU FSBFLAGS 01912000 FSBINPET EQU FSBFLAGS 01913000 FSBNONCB EQU FSBFLAGS 01914000 FSBLBIND EQU FSBFLAGS 01915000 FSBFFIND EQU FSBFLAGS 01916000 FSBACIND EQU FSBFLAGS 01917000 FSBRFIND EQU FSBFLAGS 01918000 FSBDAF EQU FSBCID+2 01919000 FSBSAF EQU FSBCID 01920000 FSBGATE EQU FSBFSBA 01921000 FSBRSV02 EQU FSBSFLGS 01922000 FSBPGBUF EQU FSBSFLGS 01923000 FSBMNSDA EQU FSBMNRCD 01924000 FSBMNOA EQU FSBMNRCD 01925000 FSBMNDIF EQU FSBMNRCD 01926000 FSBMNEOP EQU FSBMNRCD 01927000 FSBMNDNU EQU FSBMNRCD 01928000 FSBMNATN EQU FSBMNRCD 01929000 FSBMNRVI EQU FSBMNRCD 01930000 FSBMNELI EQU FSBMNRCD 01931000 FSBLNGTH EQU FSBFSB+1 01932000 FSBTYPE EQU FSBFSB 01933000 FDBOFSET EQU ISTFDB+10 01934000 FDBDATCT EQU ISTFDB+8 01935000 FDBDATAA EQU ISTFDB+4 01936000 FDBFDBA EQU ISTFDB 01937000 LCPFTYPE EQU LCPRPHA 01938000 LCPRSTQH EQU LCPLCCW 01939000 LCPCLREP EQU ISTLCPB+44 01940000 LCPUBFSB EQU LCPFLCCW 01941000 LCPRSV77 EQU ISTLCPB+39 01942000 LCPLCCWC EQU ISTLCPB+38 01943000 LCPRSV78 EQU LCPFLG1 01944000 LCPTRANS EQU LCPFLG1 01945000 LCPSTLB EQU LCPFLG1 01946000 LCPREDRV EQU LCPFLG1 01947000 LCPDIRPT EQU LCPFLG1 01948000 LCPINTER EQU LCPFLG1 01949000 LCPRESET EQU LCPFLG1 01950000 LCPSTYPE EQU ISTLCPB+36 01951000 LCPFSNCH EQU ISTLCPB+34 01952000 LCPFOSN EQU ISTLCPB+32 01953000 LCPTLBAD EQU ISTLCPB+28 01954000 LCPFDB2 EQU LCPFDBA+1 01955000 LCPFDB1 EQU LCPFDBA 01956000 LCPNXLCW EQU ISTLCPB+20 01957000 LCPDAF EQU LCPCID+2 01958000 LCPSAF EQU LCPCID 01959000 LCPLCCW1 EQU ISTLCPB+12 01960000 LCPRRCNT EQU LCPSEQ+1 01961000 LCPRRCCT EQU LCPSEQ 01962000 LCPATOP EQU LCPFLAG2 01963000 LCPFREE EQU LCPFLAG2 01964000 LCPDSTAT EQU LCPFLAG2 01965000 LCPEXRES EQU LCPFID0 01966000 LCPZRIMM EQU LCPTLBPI 01967000 LCPRSTRT EQU LCPFLAG2 01968000 LCPASYN EQU LCPFLAG2 01969000 LCPPRFLG EQU LCPFLAG2 01970000 LCPZMIRC EQU LCPRUCNT 01971000 LCPCHAI2 EQU LCPCHAIN+1 01972000 LCPCHNG EQU LCPCHAI1 01973000 LCPZRT0B EQU LCPMNRCD 01974000 LCPZRT0A EQU LCPMNRCD 01975000 LCPZRTL9 EQU LCPZRT09 01976000 LCPZRTL8 EQU LCPZRT08 01977000 LCPZRTL7 EQU LCPZRT07 01978000 LCPZRTL6 EQU LCPZRT06 01979000 LCPZRTL5 EQU LCPZRT05 01980000 LCPZRTL4 EQU LCPZRT04 01981000 LCPZRTL3 EQU LCPZRT03 01982000 LCPZRTL2 EQU LCPZRT02 01983000 LCPZRT00 EQU LCPFLAGS 01984000 LCPLNGTH EQU ISTLCPB+1 01985000 LCPTYPE EQU ISTLCPB 01986000 LCCWDATA EQU ISTLCCW+4 01987000 LCCWCNT EQU ISTLCCW+2 01988000 LCCWACI EQU LCCWFLAG 01989000 LCCWRFI EQU LCCWFLAG 01990000 LCCWPER EQU LCCWLSI 01991000 LCCWIDAT EQU LCCWFLAG 01992000 LCCWNTVC EQU LCCWFLAG 01993000 LCCWCKPT EQU LCCWFLAG 01994000 LCCWCC EQU LCCWFLAG 01995000 LCCWCD EQU LCCWFLAG 01996000 LCCWTYPE EQU LCCWCTL 01997000 LCCWMODE EQU LCCWCTL 01998000 LCCWSOP EQU LCCWRWOP 01999000 @NM00013 EQU LCCWRWOP 02000000 LCCWSD EQU LCCWOP 02001000 LCCWSI EQU LCCWOP 02002000 ATCAOS EQU ISTATCVT+1552 02003000 ATCVIOPM EQU ATCAOSM+636 02004000 ATCTPMMI EQU ATCAOSM+632 02005000 ATCTPMPB EQU ATCAOSM+600 02006000 ATCRPLCT EQU ATCAOSM+594 02007000 ATCCRACT EQU ATCAOSM+592 02008000 ATCSRBCT EQU ATCAOSM+590 02009000 ATCRSV75 EQU ATCAOSM+589 02010000 ATCRSV66 EQU ATCZFLAG 02011000 ATCZF001 EQU ATCZFLAG 02012000 ATCTPCP1 EQU ATCAOSM+584 02013000 ATCTPCP0 EQU ATCAOSM+580 02014000 ATCAICTN EQU ATCAOSM+576 02015000 ATCZR01 EQU ATCAOSM+572 02016000 ATCMPLTA EQU ATCAOSM+568 02017000 ATCASCB EQU ATCAOSM+564 02018000 ATCAP86 EQU ATCAOSM+560 02019000 ATCAP85 EQU ATCAOSM+556 02020000 ATCAP84 EQU ATCAOSM+552 02021000 ATCAP83 EQU ATCAOSM+548 02022000 ATCAP82 EQU ATCAOSM+544 02023000 ATCAP69 EQU ATCAOSM+540 02024000 ATCAP66 EQU ATCAOSM+536 02025000 ATCAP62 EQU ATCAOSM+532 02026000 ATCAPC59 EQU ATCAOSM+528 02027000 ATCAP56 EQU ATCAOSM+524 02028000 ATCAP55 EQU ATCAOSM+520 02029000 ATCRCFY0 EQU ATCAOSM+516 02030000 ATCAP41 EQU ATCAOSM+512 02031000 ATCAPC25 EQU ATCAOSM+508 02032000 ATCAP23 EQU ATCAOSM+504 02033000 ATCTPSPB EQU ATCAOSM+472 02034000 ATCTRMBP EQU ATCAOSM+440 02035000 ATCPSTA EQU ATCAOSM+432 02036000 ATCSMABF EQU ATCAOSM+428 02037000 ATCSMAPR EQU ATCAOSM+424 02038000 ATCTPWQA EQU ATCAOSM+420 02039000 ATCSMAID EQU ATCAOSM+416 02040000 ATCSMARA EQU ATCAOSM+412 02041000 ATCCACXA EQU ATCAOSM+408 02042000 ATCZLAAB EQU ATCAOSM+404 02043000 ATCATA10 EQU ATCAOSM+400 02044000 ATCHLTCB EQU ATCAOSM+396 02045000 @NM00012 EQU ATCVTFLG 02046000 ATCVTACT EQU ATCVTFLG 02047000 ATCRPT40 EQU ATCAOSM+388 02048000 ATCRPT39 EQU ATCAOSM+384 02049000 ATCRPT38 EQU ATCAOSM+380 02050000 ATCRPT37 EQU ATCAOSM+376 02051000 ATCRPT36 EQU ATCAOSM+372 02052000 ATCRPT35 EQU ATCAOSM+368 02053000 ATCRPT34 EQU ATCAOSM+364 02054000 ATCRPT33 EQU ATCAOSM+360 02055000 ATCRPT32 EQU ATCAOSM+356 02056000 ATCRPT31 EQU ATCAOSM+352 02057000 ATCRPT30 EQU ATCAOSM+348 02058000 ATCRPT29 EQU ATCAOSM+344 02059000 ATCRPT28 EQU ATCAOSM+340 02060000 ATCRPT27 EQU ATCAOSM+336 02061000 ATCRPT26 EQU ATCAOSM+332 02062000 ATCRPT25 EQU ATCAOSM+328 02063000 ATCRPT24 EQU ATCAOSM+324 02064000 ATCRPT23 EQU ATCAOSM+320 02065000 ATCRPT22 EQU ATCAOSM+316 02066000 ATCRPT21 EQU ATCAOSM+312 02067000 ATCRPT20 EQU ATCAOSM+308 02068000 ATCRPT19 EQU ATCAOSM+304 02069000 ATCRPT18 EQU ATCAOSM+300 02070000 ATCRPT17 EQU ATCAOSM+296 02071000 ATCRPT16 EQU ATCAOSM+292 02072000 ATCRPT15 EQU ATCAOSM+288 02073000 ATCRPT14 EQU ATCAOSM+284 02074000 ATCRPT13 EQU ATCAOSM+280 02075000 ATCRPT12 EQU ATCAOSM+276 02076000 ATCRPT11 EQU ATCAOSM+272 02077000 ATCAP38 EQU ATCAOSM+268 02078000 ATCAP37 EQU ATCAOSM+264 02079000 ATCZDFJ0 EQU ATCAOSM+260 02080000 ATCAP51 EQU ATCAOSM+256 02081000 ATCZPAB2 EQU ATCAOSM+224 02082000 ATCZPAB1 EQU ATCAOSM+192 02083000 ATCZLFVT EQU ATCAOSM+188 02084000 ATCZLPVT EQU ATCAOSM+184 02085000 ATCZDVTX EQU ATCAOSM+180 02086000 ATCZDVTA EQU ATCAOSM+176 02087000 ATCZDVT9 EQU ATCAOSM+172 02088000 ATCZDVT8 EQU ATCAOSM+168 02089000 ATCZDVT7 EQU ATCAOSM+164 02090000 ATCRSV56 EQU ATCDAPVT+22 02091000 ATCDAPDG EQU ATCDAPVT+20 02092000 ATCDXCEA EQU ATCDAPVT+16 02093000 ATCDCEA EQU ATCDAPVT+12 02094000 ATCDPCIA EQU ATCDAPVT+8 02095000 ATCDSIOA EQU ATCDAPVT+4 02096000 ATCDEOEA EQU ATCDAPVT 02097000 ATCZLAEA EQU ATCLDAPP+16 02098000 ATCZLCEA EQU ATCLDAPP+12 02099000 ATCRSV17 EQU ATCLDAPP+8 02100000 ATCSMFRR EQU ATCLDAPP+4 02101000 ATCCDTID EQU ATCLDAPP 02102000 ATCZAEA EQU ATCICAPP+16 02103000 ATCZCEA EQU ATCICAPP+12 02104000 ATCCDTCB EQU ATCICAPP+8 02105000 ATCZSIOA EQU ATCICAPP+4 02106000 ATCCDRPH EQU ATCICAPP 02107000 ATCAP65 EQU ATCAOSM+96 02108000 ATCZDVT6 EQU ATCAOSM+92 02109000 ATCZDVT4 EQU ATCAOSM+88 02110000 ATCZDVT3 EQU ATCAOSM+84 02111000 ATCZDVT1 EQU ATCAOSM+80 02112000 ATCICNCB EQU ATCAOSM+76 02113000 ATCZFSVT EQU ATCAOSM+68 02114000 ATCAP64 EQU ATCAOSM+64 02115000 ATCAP63 EQU ATCAOSM+60 02116000 ATCAP61 EQU ATCAOSM+56 02117000 ATCAP58 EQU ATCAOSM+52 02118000 ATCAP57 EQU ATCAOSM+48 02119000 ATCAP54 EQU ATCAOSM+44 02120000 ATCAP53 EQU ATCAOSM+40 02121000 ATCAP52 EQU ATCAOSM+36 02122000 ATCAP34 EQU ATCAOSM+32 02123000 ATCAP32 EQU ATCAOSM+28 02124000 ATCAP31 EQU ATCAOSM+24 02125000 ATCAP12 EQU ATCAOSM+20 02126000 ATCAP11 EQU ATCAOSM+16 02127000 ATCCMTCB EQU ATCAOSM+12 02128000 ATCPRPH EQU ATCAOSM+8 02129000 ATCGSRBF EQU ATCGSRBG 02130000 ATCSRBRT EQU ATCAOSM 02131000 ATCRSVBB EQU ISTATCVT+908 02132000 ATCVDLOK EQU ISTATCVT+904 02133000 ATCVFPAB EQU ISTATCVT+872 02134000 ATCVDPAB EQU ISTATCVT+840 02135000 ATCIOECB EQU ISTATCVT+836 02136000 ATCINCW3 EQU ISTATCVT+832 02137000 ATCMODTB EQU ISTATCVT+828 02138000 ATCUSSPT EQU ISTATCVT+824 02139000 ATCSRTAB EQU ISTATCVT+820 02140000 @NM00011 EQU ISTATCVT+818 02141000 ATCNMCTR EQU ISTATCVT+816 02142000 ATCSEC51 EQU ATCSECST 02143000 ATCSEC40 EQU ATCSIPD+8 02144000 ATCSEC30 EQU ATCSIPD+4 02145000 ATCSEC21 EQU ATCSIPD 02146000 ATCSEC10 EQU ATCSOPD+4 02147000 ATCSEC01 EQU ATCSOPD 02148000 ATCPOIA EQU ISTATCVT+788 02149000 ATCPODVT EQU ISTATCVT+784 02150000 ATCS49XL EQU ISTATCVT+780 02151000 ATCS49XI EQU ISTATCVT+776 02152000 ATCLCLCT EQU ATCVLCNT+2 02153000 ATCRNCNT EQU ATCVLCNT 02154000 ATCCFEAD EQU ISTATCVT+768 02155000 ATCPTR00 EQU ISTATCVT+736 02156000 ATCRSV10 EQU ISTATCVT+704 02157000 ATCTACB EQU ISTATCVT+700 02158000 ATCVTINM EQU ISTATCVT+696 02159000 ATCTCLIM EQU ISTATCVT+692 02160000 ATCTCLOM EQU ISTATCVT+688 02161000 ATCVTIPB EQU ISTATCVT+656 02162000 ATCTCIPB EQU ISTATCVT+624 02163000 ATCTIPAB EQU ISTATCVT+592 02164000 ATCOCCCB EQU ISTATCVT+588 02165000 ATCOCCOB EQU ISTATCVT+584 02166000 ATCCDLAD EQU ISTATCVT+580 02167000 ATCCCLAD EQU ISTATCVT+576 02168000 ATCDLRPB EQU ISTATCVT+544 02169000 ATCPGPAB EQU ISTATCVT+512 02170000 ATCVPAB1 EQU ISTATCVT+480 02171000 ATCRSV97 EQU ISTATCVT+476 02172000 ATCRDTLK EQU ISTATCVT+472 02173000 ATCVOCLK EQU ISTATCVT+468 02174000 ATCCDFDN EQU ISTATCVT+464 02175000 ATCCDFIN EQU ISTATCVT+460 02176000 ATCDVTLK EQU ISTATCVT+456 02177000 ATCAP36 EQU ISTATCVT+452 02178000 ATCAP35 EQU ISTATCVT+448 02179000 ATCAP33 EQU ISTATCVT+444 02180000 ATCRSV99 EQU ISTATCVT+412 02181000 ATCLDECB EQU ISTATCVT+408 02182000 ATCLDNCS EQU ISTATCVT+404 02183000 ATCCDPTR EQU ISTATCVT+400 02184000 ATCADEL EQU ISTATCVT+396 02185000 ATCTODVT EQU ISTATCVT+392 02186000 ATCDEBCH EQU ISTATCVT+388 02187000 ATCHBSIZ EQU ATCHPGM+2 02188000 ATCHBFNO EQU ATCHPGM 02189000 ATCCRME EQU ISTATCVT+380 02190000 ATCRVCHS EQU ISTATCVT+372 02191000 ATCECTLP EQU ISTATCVT+368 02192000 ATCZDVTB EQU ISTATCVT+364 02193000 ATCECPRT EQU ISTATCVT+360 02194000 ATCVTLOD EQU ISTATCVT+356 02195000 ATCTRPAB EQU ISTATCVT+352 02196000 ATCMSGM EQU ISTATCVT+348 02197000 ATCMSGP EQU ISTATCVT+344 02198000 ATCEPT EQU ISTATCVT+340 02199000 ATCDVT EQU ISTATCVT+336 02200000 ATCTRCPT EQU ISTATCVT+332 02201000 ATCDVLOD EQU ISTATCVT+328 02202000 ATCALERT EQU ISTATCVT+324 02203000 ATCEPA EQU ISTATCVT+320 02204000 ATCSAF EQU ISTATCVT+318 02205000 ATCXRANG EQU ISTATCVT+317 02206000 ATCLAST EQU ATCSHRFG 02207000 ATCSHRTN EQU ISTATCVT+308 02208000 ATCUEP EQU ISTATCVT+304 02209000 ATCOCRT EQU ISTATCVT+300 02210000 ATCCSMA EQU ATCCSMR 02211000 ATCESC02 EQU ISTATCVT+292 02212000 ATCESC01 EQU ISTATCVT+288 02213000 ATCCDFND EQU ISTATCVT+284 02214000 ATCCDDEL EQU ISTATCVT+280 02215000 ATCCDADD EQU ISTATCVT+276 02216000 ATCMNT EQU ISTATCVT+272 02217000 ATCRSV16 EQU ISTATCVT+270 02218000 ATCMAXID EQU ISTATCVT+269 02219000 ATCMSGSP EQU ATCCOM+268 02220000 ATCCIDM EQU ATCCOM+266 02221000 ATCACTRM EQU ATCCOM+264 02222000 ATCNERAP EQU ATCCOM+260 02223000 ATCNESAL EQU ATCCOM+256 02224000 ATCRCC65 EQU ATCCOM+252 02225000 ATCRCC26 EQU ATCCOM+248 02226000 ATCRCC63 EQU ATCCOM+244 02227000 ATCRSV11 EQU ATCCOM+242 02228000 ATCVTMID EQU ATCCOM+240 02229000 ATCAPOST EQU ATCCOM+236 02230000 ATCNERFN EQU ATCCOM+232 02231000 ATCNERNE EQU ATCCOM+228 02232000 ATCNERCV EQU ATCCOM+224 02233000 ATCNERST EQU ATCCOM+220 02234000 ATCDCC61 EQU ATCCOM+216 02235000 ATCDCC60 EQU ATCCOM+212 02236000 ATCSRTDF EQU ATCCOM+208 02237000 ATCSRTAD EQU ATCCOM+204 02238000 ATCFIRA EQU ATCCOM+200 02239000 ATCSMBQ EQU ATCCOM+196 02240000 ATCSMRC EQU ATCCOM+192 02241000 ATCSMRS EQU ATCCOM+188 02242000 ATCSMQU EQU ATCCOM+184 02243000 ATCSMRQ EQU ATCCOM+180 02244000 ATCACDA EQU ATCCOM+176 02245000 ATCSTMA EQU ATCCOM+172 02246000 ATCFRSTR EQU ATCCOM+168 02247000 ATCGTSTR EQU ATCCOM+164 02248000 ATCREADA EQU ATCCOM+160 02249000 ATCALOAD EQU ATCCOM+156 02250000 ATCBLDLA EQU ATCCOM+152 02251000 ATCFBRPH EQU ATCCOM+148 02252000 ATCBFTRC EQU ATCCOM+144 02253000 ATCTPBUF EQU ATCTHTRC 02254000 ATCREMOV EQU ATCCOM+136 02255000 ATCADD EQU ATCCOM+132 02256000 ATCBPDA EQU ATCCOM+128 02257000 ATCDVTPT EQU ATCCOM+124 02258000 ATCFEPT EQU ATCCOM+120 02259000 ATCFDVT EQU ATCCOM+116 02260000 ATCCONFT EQU ATCCOM+112 02261000 ATCPTCHA EQU ATCCOM+108 02262000 ATCAUTHA EQU ATCCOM+104 02263000 ATCACCTA EQU ATCCOM+100 02264000 ATCRDTH EQU ATCCOM+96 02265000 ATCFRSCH EQU ATCCOM+92 02266000 ATCFSB EQU ATCCOM+88 02267000 ATCHLTMS EQU ATCCOM+84 02268000 ATCECPRM EQU ATCCOM+80 02269000 ATCECNET EQU ATCCOM+76 02270000 ATCECOPC EQU ATCCOM+72 02271000 ATCVPARM EQU ATCCOM+68 02272000 ATCECVRQ EQU ATCCOM+64 02273000 ATCECSES EQU ATCCOM+60 02274000 ATCOCHA EQU ATCCOM+56 02275000 ATCDSPLQ EQU ATCCOM+52 02276000 ATCECDSP EQU ATCCOM+48 02277000 ATCVARYQ EQU ATCCOM+44 02278000 ATCECVRY EQU ATCCOM+40 02279000 ATCHALTQ EQU ATCCOM+36 02280000 ATCECHLT EQU ATCCOM+32 02281000 ATCMODQ EQU ATCCOM+28 02282000 ATCECMOD EQU ATCCOM+24 02283000 ATCASCHD EQU ATCCOM+20 02284000 ATCSRT EQU ATCCOM+16 02285000 ATCRDT EQU ATCCOM+12 02286000 ATCDCFRR EQU ATCCOM+8 02287000 ATCAPI EQU ATCCOM+4 02288000 ATCRSV04 EQU ATCSTAT4 02289000 ATCNCSD EQU ATCSTAT4 02290000 ATCMTST EQU ATCSTAT4 02291000 ATCTPRT EQU ATCSTAT4 02292000 ATCPRTAT EQU ATCSTAT4 02293000 @NM00010 EQU ATCPOFLG 02294000 ATCPOUNS EQU ATCPOFLG 02295000 ATCHSDMF EQU ATCSTFLG 02296000 @NM00009 EQU ATCSTAT1 02297000 ATCINHLT EQU ATCSTAT1 02298000 ATCNETSL EQU ATCSTAT1 02299000 ATCQKHLT EQU ATCSTAT1 02300000 ATCSNHLT EQU ATCSTAT1 02301000 ATCACTIV EQU ATCSTAT1 02302000 ATCSTART EQU ATCSTAT1 02303000 RPHNEXPO EQU ISTRPH+104 02304000 RPHSAV16 EQU RPHWORK+60 02305000 RPHSAV15 EQU RPHWORK+56 02306000 RPHSAV14 EQU RPHWORK+52 02307000 RPHSAV13 EQU RPHWORK+48 02308000 RPHSAV12 EQU RPHWORK+44 02309000 RPHSAV11 EQU RPHWORK+40 02310000 RPHSAV10 EQU RPHWORK+36 02311000 RPHSAVE9 EQU RPHWORK+32 02312000 RPHSAVE8 EQU RPHWORK+28 02313000 RPHSAVE7 EQU RPHWORK+24 02314000 RPHSAVE6 EQU RPHWORK+20 02315000 RPHSAVE5 EQU RPHWORK+16 02316000 RPHSAVE4 EQU RPHWORK+12 02317000 RPHSAVE3 EQU RPHWORK+8 02318000 RPHSAVE2 EQU RPHWORK+4 02319000 RPHSHALF EQU RPHSAVE1+2 02320000 RPHSBIT8 EQU RPHSBITS 02321000 RPHSBIT7 EQU RPHSBITS 02322000 RPHSBIT6 EQU RPHSBITS 02323000 RPHSBIT5 EQU RPHSBITS 02324000 RPHSBIT4 EQU RPHSBITS 02325000 RPHSBIT3 EQU RPHSBITS 02326000 RPHSBIT2 EQU RPHSBITS 02327000 RPHSBIT1 EQU RPHSBITS 02328000 RPHSBYTE EQU RPHSAVE1 02329000 RPHPABQP EQU RPHPABQA+1 02330000 RPHPABFG EQU RPHPABQA 02331000 RPHSRP34 EQU RPHSRPRM+2 02332000 RPHSRP12 EQU RPHSRPRM 02333000 RPHWEGT EQU RPHCSPA 02334000 RPHMAJCB EQU ISTRPH+21 02335000 RPHPABOF EQU ISTRPH+20 02336000 RPHRESUM EQU RPHRESMA+1 02337000 RPHRSV01 EQU RPHWPFLG 02338000 RPHPURGE EQU RPHWPFLG 02339000 RPHPT EQU RPHWPFLG 02340000 RPHWT EQU RPHWPFLG 02341000 RPHRSKEY EQU RPHWPFLG 02342000 RPHDVTA EQU ISTRPH+12 02343000 RPHTIK EQU RPHTSKID+3 02344000 @NM00008 EQU RPHTSKID 02345000 RPHRPHAP EQU RPHRPHA+1 02346000 @NM00007 EQU RPHRPHA 02347000 RPHGATE EQU RPHRPHA 02348000 @NM00006 EQU RPHFLGB 02349000 RPHRLCRA EQU RPHFLGB 02350000 RPHNRSAV EQU RPHFLGB 02351000 RPHPGCMP EQU RPHFLGB 02352000 RPHFBAPS EQU RPHFLGB 02353000 RPHBSSP EQU RPHFLGB 02354000 RPHLOCK EQU RPHFLGB 02355000 RPHFNFLG EQU RPHFSTLC 02356000 RPHMLTCP EQU RPHFLAGS 02357000 RPHSMCLR EQU RPHFLAGS 02358000 RPHSMTYP EQU RPHFLAGS 02359000 RPHSMQ EQU RPHFLAGS 02360000 RPHAUTEX EQU RPHAPTYP 02361000 RPHSPGIN EQU RPHFLAGS 02362000 RPHOGIND EQU RPHFLAGS 02363000 RPHLNGTH EQU ISTRPH+1 02364000 RPHTYPE EQU ISTRPH 02365000 LOKXCL EQU @NM00004 02366000 LOKPRY EQU @NM00004 02367000 @NM00005 EQU @NM00004 02368000 @NM00003 EQU LOKCHNG 02369000 LOKCT EQU ISTLOK 02370000 DYPPAB EQU ISTDYPAB+16 02371000 DYPRSV01 EQU ISTDYPAB+12 02372000 DYPTSKID EQU ISTDYPAB+8 02373000 DYPCHAIN EQU ISTDYPAB+4 02374000 DYPFLGS EQU ISTDYPAB+2 02375000 DYPLNGTH EQU ISTDYPAB+1 02376000 DYPTYPE EQU ISTDYPAB 02377000 PABRPHA EQU PABRPHFG+1 02378000 PABNODQ EQU PABFLAGS 02379000 PABINHBT EQU PABFLAGS 02380000 PABERLOK EQU PABERRLK 02381000 PABSSN EQU PABFLAGS 02382000 PABDYNAM EQU PABFLAGS 02383000 PABNORPR EQU PABFLAGS 02384000 PABPRIOR EQU PABFLAGS 02385000 PABAPYP EQU PABFLAGS 02386000 PABDVTA EQU ISTPAB+9 02387000 PABOFFST EQU ISTPAB+8 02388000 PABCHNGP EQU PABCHAIN+1 02389000 PABRSV02 EQU PABCHAIN 02390000 PABRUNNG EQU PABCHAIN 02391000 PABRESET EQU PABCHAIN 02392000 PABUNCON EQU PABCHAIN 02393000 PABCDP EQU PABCHAIN 02394000 PABRESCH EQU PABCHAIN 02395000 PABCHNG EQU PABCHAIN 02396000 PABWEQP EQU PABWEQA+1 02397000 PABRSV01 EQU PABWEQA 02398000 PABWEQG EQU PABWEQA 02399000 CVTLEVL EQU CVTRELNO+2 02400000 CVTNUMB EQU CVTRELNO 02401000 CVTMDL EQU CVTFIX+250 02402000 @NM00002 EQU CVTFIX+248 02403000 @NM00001 EQU CVTFIX 02404000 CVTRV482 EQU CVTXTNT2+128 02405000 CVTRV481 EQU CVTXTNT2+124 02406000 CVTRV480 EQU CVTXTNT2+120 02407000 CVTRV479 EQU CVTXTNT2+118 02408000 CVTRV478 EQU CVTXTNT2+117 02409000 CVTRV477 EQU CVTXTNT2+116 02410000 CVTRV476 EQU CVTXTNT2+115 02411000 CVTRV475 EQU CVTXTNT2+114 02412000 CVTRV474 EQU CVTRV466 02413000 CVTRV473 EQU CVTRV466 02414000 CVTRV472 EQU CVTRV466 02415000 CVTRV471 EQU CVTRV466 02416000 CVTRV470 EQU CVTRV466 02417000 CVTRV469 EQU CVTRV466 02418000 CVTRV468 EQU CVTRV466 02419000 CVTRV467 EQU CVTRV466 02420000 CVTRV465 EQU CVTRV457 02421000 CVTRV464 EQU CVTRV457 02422000 CVTRV463 EQU CVTRV457 02423000 CVTRV462 EQU CVTRV457 02424000 CVTRV461 EQU CVTRV457 02425000 CVTRV460 EQU CVTRV457 02426000 CVTRV459 EQU CVTRV457 02427000 CVTRV458 EQU CVTRV457 02428000 CVTRV456 EQU CVTXTNT2+108 02429000 CVTRV455 EQU CVTXTNT2+104 02430000 CVTRV454 EQU CVTXTNT2+100 02431000 CVTRV453 EQU CVTXTNT2+96 02432000 CVTRV452 EQU CVTXTNT2+94 02433000 CVTRV451 EQU CVTXTNT2+92 02434000 CVTRV450 EQU CVTXTNT2+90 02435000 CVTRV449 EQU CVTXTNT2+88 02436000 CVTRV448 EQU CVTXTNT2+87 02437000 CVTRV447 EQU CVTXTNT2+86 02438000 CVTRV446 EQU CVTRV438 02439000 CVTRV445 EQU CVTRV438 02440000 CVTRV444 EQU CVTRV438 02441000 CVTRV443 EQU CVTRV438 02442000 CVTRV442 EQU CVTRV438 02443000 CVTRV441 EQU CVTRV438 02444000 CVTRV440 EQU CVTRV438 02445000 CVTRV439 EQU CVTRV438 02446000 CVTRV437 EQU CVTRV429 02447000 CVTRV436 EQU CVTRV429 02448000 CVTRV435 EQU CVTRV429 02449000 CVTRV434 EQU CVTRV429 02450000 CVTRV433 EQU CVTRV429 02451000 CVTRV432 EQU CVTRV429 02452000 CVTRV431 EQU CVTRV429 02453000 CVTRV430 EQU CVTRV429 02454000 CVTRV428 EQU CVTXTNT2+80 02455000 CVTRV427 EQU CVTXTNT2+76 02456000 CVTRV426 EQU CVTXTNT2+72 02457000 CVTRV425 EQU CVTXTNT2+68 02458000 CVTATACT EQU CVTATCVT 02459000 CVTRV423 EQU CVTXTNT2+62 02460000 CVTRV422 EQU CVTXTNT2+60 02461000 CVTRV421 EQU CVTXTNT2+58 02462000 CVTRV420 EQU CVTXTNT2+56 02463000 CVTRV419 EQU CVTXTNT2+55 02464000 CVTRV418 EQU CVTXTNT2+54 02465000 CVTRV417 EQU CVTRV409 02466000 CVTRV416 EQU CVTRV409 02467000 CVTRV415 EQU CVTRV409 02468000 CVTRV414 EQU CVTRV409 02469000 CVTRV413 EQU CVTRV409 02470000 CVTRV412 EQU CVTRV409 02471000 CVTRV411 EQU CVTRV409 02472000 CVTRV410 EQU CVTRV409 02473000 CVTRV408 EQU CVTRV400 02474000 CVTRV407 EQU CVTRV400 02475000 CVTRV406 EQU CVTRV400 02476000 CVTRV405 EQU CVTRV400 02477000 CVTRV404 EQU CVTRV400 02478000 CVTRV403 EQU CVTRV400 02479000 CVTRV402 EQU CVTRV400 02480000 CVTRV401 EQU CVTRV400 02481000 CVTICB EQU CVTXTNT2+48 02482000 CVTSKTA EQU CVTXTNT2+44 02483000 CVTSHSB EQU CVTSHS 02484000 CVTRSV98 EQU CVTXTNT2+36 02485000 CVTRSV97 EQU CVTXTNT2+34 02486000 CVTRSV96 EQU CVTXTNT2+32 02487000 CVTOLTEP EQU CVTXTNT2+28 02488000 CVTQIDA EQU CVTQID+1 02489000 CVTRSV95 EQU CVTQID 02490000 CVTRSV94 EQU CVTXTNT2+20 02491000 CVTRSV93 EQU CVTXTNT2+16 02492000 CVTRSV92 EQU CVTXTNT2+12 02493000 CVTDEBVR EQU CVTXTNT2+8 02494000 CVTRSV91 EQU CVTXTNT2+6 02495000 CVTRSV9H EQU CVTFLGBT 02496000 CVTRSV9G EQU CVTFLGBT 02497000 CVTRSV9F EQU CVTFLGBT 02498000 CVTRSV9E EQU CVTFLGBT 02499000 CVTRSV9D EQU CVTFLGBT 02500000 CVTRSV9C EQU CVTFLGBT 02501000 CVTVME EQU CVTFLGBT 02502000 CVTNPE EQU CVTFLGBT 02503000 CVTNUCLS EQU CVTXTNT2+4 02504000 CVTDSSVA EQU CVTDSSV+1 02505000 CVTRSV89 EQU CVTDSSV 02506000 CVTRSV88 EQU CVTXTNT1+8 02507000 CVTRSV87 EQU CVTXTNT1+4 02508000 CVTFACHN EQU CVTXTNT1 02509000 CVTRV488 EQU CVTMAP+412 02510000 CVTRV487 EQU CVTMAP+408 02511000 CVTRV486 EQU CVTMAP+404 02512000 CVTRV485 EQU CVTMAP+400 02513000 CVTACTAP EQU CVTMAP+396 02514000 CVTAUTH EQU CVTMAP+392 02515000 CVTATMCA EQU CVTATMCT+1 02516000 CVTATMST EQU CVTATMCT 02517000 CVTRSV61 EQU CVTMAP+384 02518000 CVTVOLT1 EQU CVTVOLM1+1 02519000 CVTVOLI1 EQU CVTVOLF1 02520000 CVTSTOA EQU CVTMAP+376 02521000 CVTRSV58 EQU CVTMAP+374 02522000 CVTRSV57 EQU CVTMAP+372 02523000 CVTDDCE EQU CVTMAP+368 02524000 CVTPNWFR EQU CVTMAP+364 02525000 CVTSMF EQU CVTMAP+360 02526000 CVTSULK EQU CVTMAP+358 02527000 CVTSLKO EQU CVTSYSK 02528000 CVTSLKP EQU CVTSYSK 02529000 CVTSLKQ EQU CVTSYSK 02530000 CVTSLKR EQU CVTSYSK 02531000 CVTRSV56 EQU CVTSYSK 02532000 CVTRSV55 EQU CVTSYSK 02533000 CVTRSV54 EQU CVTSYSK 02534000 CVTRSV53 EQU CVTSYSK 02535000 CVTRSV52 EQU CVTA1F1 02536000 CVTRSV51 EQU CVTA1F1 02537000 CVTRSV50 EQU CVTA1F1 02538000 CVTRSV49 EQU CVTA1F1 02539000 CVTRSV48 EQU CVTA1F1 02540000 CVTRSV47 EQU CVTA1F1 02541000 CVTSRSW EQU CVTA1F1 02542000 CVTPFSW EQU CVTA1F1 02543000 CVTPCVT EQU CVTMAP+352 02544000 CVTRSV46 EQU CVTMAP+344 02545000 CVTRSV45 EQU CVTMAP+340 02546000 CVTRSV44 EQU CVTMAP+338 02547000 CVTRSV43 EQU CVTMAP+336 02548000 CVTHJESA EQU CVTHJES+1 02549000 CVTRSV42 EQU CVTHJES 02550000 CVTEXT2A EQU CVTEXT2+1 02551000 CVTRSV41 EQU CVTEXT2 02552000 CVTAPFA EQU CVTAPF+1 02553000 CVTRSV40 EQU CVTAPF 02554000 CVTRV518 EQU CVTINTLA 02555000 CVTRV517 EQU CVTERPV 02556000 CVTEORM EQU CVTMAP+312 02557000 CVTMCHPR EQU CVTMAP+308 02558000 CVTTZ EQU CVTMAP+304 02559000 CVTJEPS EQU CVTMAP+300 02560000 CVTJESCT EQU CVTMAP+296 02561000 CVTMODE EQU CVTMAP+292 02562000 CVTPTRV EQU CVTMAP+288 02563000 CVTREAL EQU CVTMAP+284 02564000 CVTRSV39 EQU CVTMAP+280 02565000 CVTRSV38 EQU CVTMAP+276 02566000 CVTDMSRA EQU CVTDMSR+1 02567000 CVTRSV37 EQU CVTDMSR 02568000 CVTQMSGA EQU CVTQMSG+1 02569000 CVTRSV36 EQU CVTQMSG 02570000 CVTAMFF EQU CVTMAP+264 02571000 CVTPURGA EQU CVTPURG+1 02572000 CVTRSV35 EQU CVTPURG 02573000 CVTCBSP EQU CVTMAP+256 02574000 CVTATERA EQU CVTATER+1 02575000 CVTSYST EQU CVTATER 02576000 CVTVOLT2 EQU CVTTAT 02577000 CVTVOLI2 EQU CVTVOLF2 02578000 CVTAQAVB EQU CVTAQAVT+1 02579000 CVTRSV34 EQU CVTTCMFG 02580000 CVTRSV33 EQU CVTTCMFG 02581000 CVTRSV32 EQU CVTTCMFG 02582000 CVTRSV31 EQU CVTTCMFG 02583000 CVTRSV30 EQU CVTTCMFG 02584000 CVTRSV29 EQU CVTTCMFG 02585000 CVTRSV28 EQU CVTTCMFG 02586000 CVTTCRDY EQU CVTTCMFG 02587000 CVTGTFA EQU CVTGTF+1 02588000 CVTRSV27 EQU CVTGTFST 02589000 CVTRNIO EQU CVTGTFST 02590000 CVTUSR EQU CVTGTFST 02591000 CVTRV318 EQU CVTFORM 02592000 CVTRV317 EQU CVTTMODE 02593000 CVTRV316 EQU CVTSTATE 02594000 CVTRV315 EQU CVTGTFS 02595000 CVTGTFAV EQU CVTGTFS 02596000 CVT0SCR1 EQU CVTMAP+232 02597000 CVTRV515 EQU CVTMAP+228 02598000 CVTRMS EQU CVTMAP+224 02599000 CVTPATCH EQU CVTMAP+220 02600000 CVTTSCE EQU CVTMAP+216 02601000 CVTLNKSC EQU CVTMAP+214 02602000 CVTQABST EQU CVTMAP+212 02603000 CVTMDLDS EQU CVTMAP+208 02604000 CVTUSER EQU CVTMAP+204 02605000 CVTABEND EQU CVTMAP+200 02606000 CVTSMCA EQU CVTMAP+196 02607000 CVTRSV18 EQU CVTMAP+192 02608000 CVTQLPAQ EQU CVTMAP+188 02609000 CVTQCDSR EQU CVTMAP+184 02610000 CVTRSV17 EQU CVTOPTB 02611000 CVTRSV16 EQU CVTOPTB 02612000 CVTFP EQU CVTOPTB 02613000 CVTAPTHR EQU CVTOPTB 02614000 CVTNLOG EQU CVTOPTB 02615000 CVTTOD EQU CVTOPTB 02616000 CVTCTIMS EQU CVTOPTB 02617000 CVTPROT EQU CVTOPTB 02618000 CVTXPFP EQU CVTOPTA 02619000 CVTASCII EQU CVTOPTA 02620000 CVTRSV13 EQU CVTOPTA 02621000 CVTRSV12 EQU CVTOPTA 02622000 CVTNIP EQU CVTOPTA 02623000 CVTDDR EQU CVTOPTA 02624000 CVTAPR EQU CVTOPTA 02625000 CVTCCH EQU CVTOPTA 02626000 CVTSNCTR EQU CVTMAP+180 02627000 CVTQMWR EQU CVTMAP+176 02628000 CVTQOCR EQU CVTMAP+172 02629000 CVT1EF00 EQU CVTMAP+168 02630000 CVTMZ00 EQU CVTMAP+164 02631000 CVTHEAD EQU CVTMAP+160 02632000 CVTRSV11 EQU CVTMAP+156 02633000 CVT0PT01 EQU CVTMAP+152 02634000 CVTMSER EQU CVTMAP+148 02635000 CVTRV516 EQU CVTIERLC 02636000 CVTILCH EQU CVTMAP+140 02637000 CVT0DS EQU CVTMAP+136 02638000 CVTFBOSV EQU CVTMAP+132 02639000 CVTNUCB EQU CVTMAP+128 02640000 CVTIXAVL EQU CVTMAP+124 02641000 CVTIOQET EQU CVTMAP+120 02642000 CVTDCBA EQU CVTMAP+117 02643000 CVTMVS2 EQU CVTDCB 02644000 CVT6DAT EQU CVTDCB 02645000 CVT4MPS EQU CVTDCB 02646000 CVTRSV09 EQU CVTDCB 02647000 CVT4MS1 EQU CVTDCB 02648000 CVT2SPS EQU CVTDCB 02649000 CVT1SSS EQU CVTDCB 02650000 CVTRSV08 EQU CVTDCB 02651000 CVTSTB EQU CVTMAP+112 02652000 CVTQTD00 EQU CVTMAP+108 02653000 CVTQTE00 EQU CVTMAP+104 02654000 CVTCUCB EQU CVTMAP+100 02655000 CVTSJQ EQU CVTMAP+96 02656000 CVTPBLDL EQU CVTMAP+92 02657000 CVTTPC EQU CVTMAP+88 02658000 CVTSVDCB EQU CVTMAP+84 02659000 CVTBRET EQU CVTMAP+82 02660000 CVTEXIT EQU CVTMAP+80 02661000 CVT0FN00 EQU CVTMAP+76 02662000 CVTDARA EQU CVTDAR+1 02663000 CVTRSV07 EQU CVTFLGS1 02664000 CVTRSV06 EQU CVTFLGS1 02665000 CVTRSV05 EQU CVTFLGS1 02666000 CVTRSV04 EQU CVTFLGS1 02667000 CVTRSV03 EQU CVTFLGS1 02668000 CVTRSV02 EQU CVTFLGS1 02669000 CVTRSV01 EQU CVTFLGS1 02670000 CVTDMPLK EQU CVTFLGS1 02671000 CVTXITP EQU CVTMAP+68 02672000 CVTZDTAB EQU CVTMAP+64 02673000 CVTMSLT EQU CVTMAP+60 02674000 CVTDATE EQU CVTMAP+56 02675000 CVTBTERM EQU CVTMAP+52 02676000 CVTSYSAD EQU CVTMAP+48 02677000 CVTXTLER EQU CVTMAP+44 02678000 CVTILK2 EQU CVTMAP+40 02679000 CVTILK1 EQU CVTMAP+36 02680000 CVTPRLTV EQU CVTMAP+32 02681000 CVTPCNVT EQU CVTMAP+28 02682000 CVT0VL00 EQU CVTMAP+24 02683000 CVTXAPG EQU CVTMAP+20 02684000 CVTBUF EQU CVTMAP+16 02685000 CVTJOB EQU CVTMAP+12 02686000 CVTLINK EQU CVTMAP+8 02687000 CVT0EF00 EQU CVTMAP+4 02688000 CVTTCBP EQU CVTMAP 02689000 CVT EQU CVTMAP 02690000 .@UNREFD ANOP END UNREFERENCED COMPONENTS 02691000 @ENDDATA EQU * 02692000 END ISTZBFX0,(C'PLS1447',0603,75130) 02693000