TITLE 'IGC0H10D,OPERATOR CONTROL MESSAGE MODULE *00001000 ' 00002000 IGC0H10D CSECT , 01S0001 00003000 @PROLOG BALR @12,0 01S0001 00004000 @PSTART DS 0H 01S0001 00005000 USING @PSTART,@12 01S0001 00006000 * /* 00007000 IGC0H10D IEDHJN AFTERHJN,HJN MODULE IDENTIFICATION MACRO 00008000 * ROPCAVT=RPARM; /* ESTABLISH ADDRESSABILITY TO 00009000 * THE OPERATOR CONTROL ADDRESS 00010000 * VECTOR TABLE */ 00011000 LR ROPCAVT,RPARM 02S0186 00012000 * RFY 02S0187 00013000 * RPARM UNRSTD; /* RELEASE THE REGISTER 02S0187 00014000 * RESTRICTED AT ENTRY TO THE 00015000 * MODULE THAT CONTAINS THE 02S0187 00016000 * ADDRESS OF THE OPERATOR 02S0187 00017000 * CONTROL ADDRESS VECTOR TABLE */ 00018000 * REG10=OPCWORK+LENGTH(MSGWORKA); /* SET THE BASE REGISTER TO BE 00019000 * USED FOR ADDRESSING AUTOMATIC 00020000 * DATA WITH THE ADDRESS OF THE 00021000 * SECTION OF THE OPERATOR 02S0188 00022000 * CONTROL RESIDENT WORK AREA 00023000 * THAT IS AFTER THE SECTION USED 00024000 * TO CONSTRUCT MESSAGES */ 00025000 LA REG10,84 02S0188 00026000 AL REG10,OPCWORK(,ROPCAVT) 02S0188 00027000 * GEN REFS(REG10) NOSETS; 02S0189 00028000 * /* 00029000 USING @DATD,REG10 PROVIDE ADDRESSABILITY TO ALL 00030000 * AUTOMATIC DATA 00031000 * RSAVE=ADDR(OPCSAVE); /* SET THE SAVE AREA ADDRESS 00032000 * REGISTER WITH THE ADDRESS OF 00033000 * THE OPERATOR CONTROL SAVE AREA*/ 00034000 LA RSAVE,OPCSAVE(,ROPCAVT) 02S0190 00035000 * 02S0191 00036000 * /*****************************************************************/ 00037000 * /* */ 00038000 * /* PROCESS: THIS SEGMENT DOES THE PROCESSING THAT IS NECESSARY TO*/ 00039000 * /* PERFORM THE FUNCTION OF THE MODULE. */ 00040000 * /* */ 00041000 * /*****************************************************************/ 00042000 * 02S0191 00043000 * 03S0191 00044000 * /*****************************************************************/ 00045000 * /* */ 00046000 * /* PROCESS.INITIAL: THIS SEGMENT DOES THE INITIAL PROCESSING. */ 00047000 * /* */ 00048000 * /*****************************************************************/ 00049000 * 03S0191 00050000 * RAVT=OPCAVTPT; /* SET THE BASE POINTER FOR THE 00051000 * TCAM ADDRESS VECTOR TABLE */ 00052000 L RAVT,OPCAVTPT(,ROPCAVT) 03S0191 00053000 * ROPCE=OPCCOPCE; /* SET THE BASE POINTER FOR THE 00054000 * OPERATOR CONTROL ELEMENT */ 00055000 L ROPCE,OPCCOPCE(,ROPCAVT) 03S0192 00056000 * SEARCH=YES; /* INITIALIZE THE "SEARCH" SWITCH 00057000 * TO INDICATE THAT A SEARCH IS 00058000 * TO BE PERFORMED */ 00059000 OI SEARCH,B'10000000' 02S0193 00060000 * DO PTRENTRY=ADDR(TABDATA) BY LENGTH(TABENTRY) WHILE(SEARCH=YES); 00061000 LA PTRENTRY,TABDATA 02S0194 00062000 B @DE00194 02S0194 00063000 @DL00194 DS 0H 02S0195 00064000 * /* INCREMENT THE POINTER TO 02S0195 00065000 * ENTRIES IN THE MESSAGE DATA 00066000 * TABLE WHILE THE SEARCH IS IN 00067000 * PROGRESS */ 00068000 * IF TABMNUM=REG00 /* MATCHING MESSAGE NUMBERS */ 00069000 * THEN /* STOP THE SEARCH AND BUILD THE 00070000 * APPROPRIATE MESSAGE */ 00071000 CH REG00,TABMNUM(,PTRENTRY) 02S0195 00072000 BNE @RF00195 02S0195 00073000 * 03S0196 00074000 * /*************************************************************/ 00075000 * /* */ 00076000 * /* PROCESS.BUILDMSG: THIS SEGMENT STOPS THE SEARCH FOR A */ 00077000 * /* MATCHING MESSAGE TABLE ENTRY, BUILDS THE APPROPRIATE */ 00078000 * /* MESSAGE IN THE OPERATOR CONTROL RESIDENT WORK AREA AND */ 00079000 * /* DOES THE PREPARATION THAT IS NECESSARY TO TRANSFER CONTROL*/ 00080000 * /* TO THE LAST MODULE IN THE MESSAGE MODULE CHAIN. */ 00081000 * /* */ 00082000 * /*************************************************************/ 00083000 * 03S0196 00084000 * DO; 03S0196 00085000 * SEARCH=STOP; /* INDICATE THAT THE SEARCH IS TO 00086000 * BE STOPPED */ 00087000 NI SEARCH,B'01111111' 03S0197 00088000 * MSGLNGTH=TABLNGTH; /* SET THE LENGTH OF THE MESSAGE 00089000 * IN THE OPERATOR CONTROL 03S0198 00090000 * RESIDENT WORK AREA */ 00091000 L @11,OPCWORK(,ROPCAVT) 03S0198 00092000 LH @01,TABLNGTH(,PTRENTRY) 03S0198 00093000 STH @01,MSGLNGTH(,@11) 03S0198 00094000 * MSGTEXT(1:MSGLNGTH)=MSGSTRNG(1:MSGLNGTH);/* PUT THE MESSAGE 00095000 * CHARACTER STRING INTO THE 00096000 * MESSAGE TEXT FIELD OF THE WORK 00097000 * AREA */ 00098000 BCTR @01,0 03S0199 00099000 L @15,TABMPTR(,PTRENTRY) 03S0199 00100000 EX @01,@SM01326 03S0199 00101000 * IF TABCASE>0 /* ADDITIONAL PROCESSING OF THE 00102000 * MESSAGE IS NECESSARY */ 00103000 * THEN /* PROCESS THE UNIQUE 03S0200 00104000 * REQUIREMENTS OF THE MESSAGE */ 00105000 L @11,TABCASE(,PTRENTRY) 03S0200 00106000 LTR @11,@11 03S0200 00107000 BNP @RF00200 03S0200 00108000 * 04S0201 00109000 * /*********************************************************/ 00110000 * /* */ 00111000 * /* PROCESS.BUILDMSG.CASE: THIS SEGMENT IMPLEMENTS THE */ 00112000 * /* CASE CONTROL STRUCTURE IN ORDER TO SATISFY THE UNIQUE */ 00113000 * /* REQUIREMENTS OF THE MESSAGES WITH VARIABLE CHARACTER */ 00114000 * /* FIELDS THAT ARE BUILT IN THE OPERATOR CONTROL RESIDENT*/ 00115000 * /* WORK AREA BY THIS MODULE. */ 00116000 * /* */ 00117000 * /*********************************************************/ 00118000 * 04S0201 00119000 * DO; /* CASE(TABCASE)NAMES(LSTART,CNTL 00120000 * TOTE,SUPERIOR,ACTIVRES,ISSUE,R 00121000 * ESOURC,LNGROUP,PHYSUNIT,CLOSED 00122000 * WN) */ 00123000 * DCL 04S0202 00124000 * CL0001@ LABEL BASED(CP0001@(TABCASE)) VALUERANGE(LSTART 00125000 * ,CNTLTOTE,SUPERIOR,ACTIVRES,ISSUE,RESOURC,LNGROUP, 00126000 * PHYSUNIT,CLOSEDWN);/* BRANCH TARGET */ 00127000 * DCL 04S0203 00128000 * CP0001@(9) PTR(31) INIT(ADDR(LSTART),ADDR(CNTLTOTE), 00129000 * ADDR(SUPERIOR),ADDR(ACTIVRES),ADDR(ISSUE),ADDR( 00130000 * RESOURC),ADDR(LNGROUP),ADDR(PHYSUNIT),ADDR(CLOSEDWN 00131000 * )); 04S0203 00132000 * GOTO CL0001@; /* BRANCH TO SELECTED CASE */ 00133000 SLA @11,2 04S0204 00134000 L @01,CP0001@-4(@11) 04S0204 00135000 BR @01 04S0204 00136000 * 05S0205 00137000 * /*******************************************************/ 00138000 * /* */ 00139000 * /* PROCESS.BUILDMSG.CASE.LSTART: THIS SEGMENT PLACES */ 00140000 * /* THE RESOURCE NAME INTO THE REQUIRED FIELD IN THE */ 00141000 * /* MESSAGE TEXT */ 00142000 * /* */ 00143000 * /*******************************************************/ 00144000 * 05S0205 00145000 *LSTART: 05S0205 00146000 * DO; /* SUBCASE */ 00147000 LSTART DS 0H 05S0206 00148000 * MSGGROUP=OCBACKUP; /* PLACE THE GROUP NAME INTO THE 00149000 * MESSAGE */ 00150000 L @01,OPCWORK(,ROPCAVT) 05S0206 00151000 MVC MSGGROUP(8,@01),OCBACKUP(ROPCE) 05S0206 00152000 * GOTO CE0001@; /* BRANCH TO END OF CASE */ 00153000 B CE0001@ 05S0207 00154000 * END; /* END OF SUBCASE */ 00155000 * 05S0209 00156000 * /*******************************************************/ 00157000 * /* */ 00158000 * /* PROCESS.BUILDMSG.CASE.CNTLTOTE: THIS SEGMENT PLACES */ 00159000 * /* THE RESOURCE NAME INTO THE REQUIRED FIELD IN THE */ 00160000 * /* MESSAGE TEXT */ 00161000 * /* */ 00162000 * /*******************************************************/ 00163000 * 05S0209 00164000 *CNTLTOTE: 05S0209 00165000 * DO; /* SUBCASE */ 00166000 CNTLTOTE DS 0H 05S0210 00167000 * MSGRTOTE=OCBACKUP; /* PLACE RESOURCE NAME INTO 05S0210 00168000 * MESSAGE */ 00169000 L @01,OPCWORK(,ROPCAVT) 05S0210 00170000 MVC MSGRTOTE(8,@01),OCBACKUP(ROPCE) 05S0210 00171000 * GOTO CE0001@; /* BRANCH TO END OF CASE */ 00172000 B CE0001@ 05S0211 00173000 * END; /* END OF SUBCASE */ 00174000 * 05S0213 00175000 * /*******************************************************/ 00176000 * /* */ 00177000 * /* PROCESS.BUILDMSG.CASE.SUPERIOR: THIS SEGMENT PLACES */ 00178000 * /* THE RESOURCE NAME INTO THE REQUIRED FIELD IN THE */ 00179000 * /* MESSAGE TEXT */ 00180000 * /* */ 00181000 * /*******************************************************/ 00182000 * 05S0213 00183000 *SUPERIOR: 05S0213 00184000 * DO; /* SUBCASE */ 00185000 SUPERIOR DS 0H 05S0214 00186000 * RESINACT=OCBACKUP; /* PLACE SUPERIOR RESOURCE NAME 00187000 * INTO MESSAGE */ 00188000 L @01,OPCWORK(,ROPCAVT) 05S0214 00189000 MVC RESINACT(8,@01),OCBACKUP(ROPCE) 05S0214 00190000 * GOTO CE0001@; /* BRANCH TO END OF CASE */ 00191000 B CE0001@ 05S0215 00192000 * END; /* END OF SUBCASE */ 00193000 * 05S0217 00194000 * /*******************************************************/ 00195000 * /* */ 00196000 * /* PROCESS.BUILDMSG.CASE.ACTIVRES: THIS SEGMENT PLACES */ 00197000 * /* THE RESOURCE NAME INTO THE REQUIRED FIELD IN THE */ 00198000 * /* MESSAGE TEXT */ 00199000 * /* */ 00200000 * /*******************************************************/ 00201000 * 05S0217 00202000 *ACTIVRES: 05S0217 00203000 * DO; /* SUBCASE */ 00204000 ACTIVRES DS 0H 05S0218 00205000 * RESACTIV=OCBACKUP; /* PLACE ACTIVE RESOURCE NAME 00206000 * INTO MESSAGE */ 00207000 L @01,OPCWORK(,ROPCAVT) 05S0218 00208000 MVC RESACTIV(8,@01),OCBACKUP(ROPCE) 05S0218 00209000 * GOTO CE0001@; /* BRANCH TO END OF CASE */ 00210000 B CE0001@ 05S0219 00211000 * END; /* END OF SUBCASE */ 00212000 * 05S0221 00213000 * /*******************************************************/ 00214000 * /* */ 00215000 * /* PROCESS.BUILDMSG.CASE.ISSUE: THIS SEGMENT PLACES THE*/ 00216000 * /* RESOURCE NAME INTO THE REQUIRED FIELD IN THE MESSAGE*/ 00217000 * /* TEXT */ 00218000 * /* */ 00219000 * /*******************************************************/ 00220000 * 05S0221 00221000 *ISSUE: 05S0221 00222000 * DO; /* SUBCASE */ 00223000 ISSUE DS 0H 05S0222 00224000 * RESISSUE=OCBACKUP; /* PLACE ISSUING RESOURCE NAME 00225000 * INTO MESSAGE */ 00226000 L @01,OPCWORK(,ROPCAVT) 05S0222 00227000 MVC RESISSUE(8,@01),OCBACKUP(ROPCE) 05S0222 00228000 * GOTO CE0001@; /* BRANCH TO END OF CASE */ 00229000 B CE0001@ 05S0223 00230000 * END; /* END OF SUBCASE */ 00231000 * 05S0225 00232000 * /*******************************************************/ 00233000 * /* */ 00234000 * /* PROCESS.BUILDMSG.CASE.RESOURC: THIS SEGMENT PLACES */ 00235000 * /* THE RESOURCE NAME INTO THE REQUIRED FIELD IN THE */ 00236000 * /* MESSAGE TEXT */ 00237000 * /* */ 00238000 * /*******************************************************/ 00239000 * 05S0225 00240000 *RESOURC: 05S0225 00241000 * DO; /* SUBCASE */ 00242000 RESOURC DS 0H 05S0226 00243000 * RESDCB=OCBACKUP; /* PLACE RESOURCE NAME INTO 05S0226 00244000 * MESSAGE */ 00245000 L @01,OPCWORK(,ROPCAVT) 05S0226 00246000 MVC RESDCB(8,@01),OCBACKUP(ROPCE) 05S0226 00247000 * GOTO CE0001@; /* BRANCH TO END OF CASE */ 00248000 B CE0001@ 05S0227 00249000 * END; /* END OF SUBCASE */ 00250000 * 05S0229 00251000 * /*******************************************************/ 00252000 * /* */ 00253000 * /* PROCESS.BUILDMSG.CASE.LNGROUP: THIS SEGMENT PLACES */ 00254000 * /* THE LINE GROUP NAME INTO THE REQUIRED FIELD IN THE */ 00255000 * /* MESSAGE TEXT */ 00256000 * /* */ 00257000 * /*******************************************************/ 00258000 * 05S0229 00259000 *LNGROUP: 05S0229 00260000 * DO; /* SUBCASE */ 00261000 LNGROUP DS 0H 05S0230 00262000 * LINEGRP=OCBACKUP; /* PLACE LINE GROUP NAME INTO 00263000 * MESSAGE TEXT */ 00264000 L @01,OPCWORK(,ROPCAVT) 05S0230 00265000 MVC LINEGRP(8,@01),OCBACKUP(ROPCE) 05S0230 00266000 * GOTO CE0001@; /* BRANCH TO END OF CASE */ 00267000 B CE0001@ 05S0231 00268000 * END; /* END OF SUBCASE */ 00269000 * 05S0233 00270000 * /*******************************************************/ 00271000 * /* */ 00272000 * /* PROCESS.BUILDMSG.CASE.PHYSUNIT: THIS SEGMENT PLACES */ 00273000 * /* THE PHYSICAL UNIT NAME INTO THE REQUIRED FIELD IN */ 00274000 * /* THE MESSAGE TEXT */ 00275000 * /* */ 00276000 * /*******************************************************/ 00277000 * 05S0233 00278000 *PHYSUNIT: 05S0233 00279000 * DO; /* SUBCASE */ 00280000 PHYSUNIT DS 0H 05S0234 00281000 * PUNAME=OCBACKUP; /* PLACE PHYSICAL UNIT NAME INTO 00282000 * MESSAGE TEXT */ 00283000 L @01,OPCWORK(,ROPCAVT) 05S0234 00284000 MVC PUNAME(8,@01),OCBACKUP(ROPCE) 05S0234 00285000 * GOTO CE0001@; /* BRANCH TO END OF CASE */ 00286000 B CE0001@ 05S0235 00287000 * END; /* END OF SUBCASE */ 00288000 * 05S0237 00289000 * /*******************************************************/ 00290000 * /* */ 00291000 * /* PROCESS.BUILDMSG.CASE.CLOSEDWN: THIS SEGMENT PLACES */ 00292000 * /* THE NCP NAME OR DDNAME INTO THE REQUIRED FIELD IN */ 00293000 * /* THE MESSAGE TEXT */ 00294000 * /* */ 00295000 * /*******************************************************/ 00296000 * 05S0237 00297000 *CLOSEDWN: 05S0237 00298000 * DO; /* SUBCASE */ 00299000 CLOSEDWN DS 0H 05S0238 00300000 * NCPDDNME=OCBACKUP; /* PLACE THE NCP NAME OR DDNAME 00301000 * INTO THE MESSAGE TEXT */ 00302000 L @01,OPCWORK(,ROPCAVT) 05S0238 00303000 MVC NCPDDNME(8,@01),OCBACKUP(ROPCE) 05S0238 00304000 * GOTO CE0001@; /* BRANCH TO END OF CASE */ 00305000 B CE0001@ 05S0239 00306000 * END; /* END OF SUBCASE */ 00307000 *CE0001@: 04S0241 00308000 * END; /* END OF CASE */ 00309000 CE0001@ DS 0H 04S0242 00310000 * OPCMODID='07'; /* SET THE MODULE IDENTIFICATION 00311000 * CHARACTERS FOR THE NEXTMODULE 00312000 * TO BE EXECUTED */ 00313000 @RF00200 MVC OPCMODID(2,ROPCAVT),@CC01322 03S0242 00314000 * END; 03S0243 00315000 * ELSE /* CHECK FOR NO MATCHING TABLE 00316000 * ENTRY FOR THE MESSAGE NUMBER */ 00317000 * IF TABMNUM=0 /* LAST TABLE ENTRY REACHED */ 00318000 * |TABMNUM>REG00 /* THERE IS NO TABLE ENTRY FOR 00319000 * THE ARGUMENT MESSAGE NUMBER */ 00320000 * THEN 02S0244 00321000 B @RC00195 02S0244 00322000 @RF00195 LH @11,TABMNUM(,PTRENTRY) 02S0244 00323000 LTR @11,@11 02S0244 00324000 BZ @RT00244 02S0244 00325000 CR @11,REG00 02S0244 00326000 BNH @RF00244 02S0244 00327000 @RT00244 DS 0H 02S0245 00328000 * DO; /* PREPARE TO TRANSFER CONTROL TO 00329000 * THE NEXT MESSAGE MODULE */ 00330000 * SEARCH=STOP; /* INDICATE THAT THE SEARCH IS TO 00331000 * BE STOPPED */ 00332000 NI SEARCH,B'01111111' 02S0246 00333000 * OPCMODID='0K'; /* SET MODULE IDENTIFICATION 00334000 * CHARACTERS FOR THE NEXT 02S0247 00335000 * MESSAGE MODULE IN THE CHAIN */ 00336000 MVC OPCMODID(2,ROPCAVT),@CC01323 02S0247 00337000 * END; 02S0248 00338000 * END; 02S0249 00339000 @RF00244 DS 0H 02S0249 00340000 @RC00195 AL PTRENTRY,@CF00032 02S0249 00341000 @DE00194 TM SEARCH,B'10000000' 02S0249 00342000 BO @DL00194 02S0249 00343000 * 02S0250 00344000 * /*****************************************************************/ 00345000 * /* */ 00346000 * /* EPILOGUE: THIS SEGMENT COMPLETES THE EPILOGUE CODE THAT WAS */ 00347000 * /* ALTERED BY THE MODULE PROCEDURE STATEMENT. THE XCTL ASSEMBLER */ 00348000 * /* MACRO INSTRUCTION IS USED BY THIS SEGMENT TO TRANSFER CONTROL */ 00349000 * /* TO THE NEXT MODULE THAT IS TO BE EXECUTED. */ 00350000 * /* */ 00351000 * /*****************************************************************/ 00352000 * 02S0250 00353000 * RFY 02S0250 00354000 * REG01 RSTD; /* RESTRICT THE ARGUMENT REGISTER 00355000 * TO BE USED TO CONTAIN THE 00356000 * ADDRESS OF THE OPERATOR 02S0250 00357000 * CONTROL ADDRESS VECTOR TABLE 00358000 * FROM USE BY THE COMPILER */ 00359000 * REG01=ROPCAVT; /* SET THE ARGUMENT REGISTER IN 00360000 * PREPARATION TO TRANSFERRING 00361000 * CONTROL TO THE NEXT MODULE TO 00362000 * BE EXECUTED */ 00363000 LR REG01,ROPCAVT 02S0251 00364000 * GEN EXIT REFS(OPCXCTL,ROPCAVT) NOSEQFLOW SETS(REG15); 02S0252 00365000 * /* 00366000 XCTL SF=(E,OPCXCTL(ROPCAVT)) TRANSFER CONTROL MACRO 00367000 * END IGC0H10D 01S0253 00368000 * 01S0253 00369000 */* THE FOLLOWING INCLUDE STATEMENTS WERE FOUND IN THIS PROGRAM. */ 00370000 */*%INCLUDE SYSLIB (TAVTD ) */ 00371000 */*%INCLUDE SYSLIB (TOPCED ) */ 00372000 */*%INCLUDE SYSLIB (TOPCAVTD) */ 00373000 */*%INCLUDE SYSUT5 (RFY ) */ 00374000 */*%INCLUDE SYSUT5 (DCL ) */ 00375000 */*%INCLUDE SYSUT5 (PROLOGUE) */ 00376000 */*%INCLUDE SYSUT5 (PROCESS ) */ 00377000 */*%INCLUDE SYSUT5 (INITIAL ) */ 00378000 */*%INCLUDE SYSUT5 (BUILDMSG) */ 00379000 */*%INCLUDE SYSUT5 (CASE ) */ 00380000 */*%INCLUDE SYSUT5 (LSTART ) */ 00381000 */*%INCLUDE SYSUT5 (CNTLTOTE) */ 00382000 */*%INCLUDE SYSUT5 (SUPERIOR) */ 00383000 */*%INCLUDE SYSUT5 (ACTIVRES) */ 00384000 */*%INCLUDE SYSUT5 (ISSUE ) */ 00385000 */*%INCLUDE SYSUT5 (RESOURC ) */ 00386000 */*%INCLUDE SYSUT5 (LNGROUP ) */ 00387000 */*%INCLUDE SYSUT5 (PHYSUNIT) */ 00388000 */*%INCLUDE SYSUT5 (CLOSEDWN) */ 00389000 */*%INCLUDE SYSUT5 (EPILOGUE) */ 00390000 * 01S0253 00391000 * ; 01S0253 00392000 @DATA DS 0H 00393000 @SM01326 MVC MSGTEXT(0,@11),MSGSTRNG(@15) 00394000 @DATD DSECT 00395000 DS 0F 00396000 IGC0H10D CSECT 00397000 DS 0F 00398000 @CF00032 DC F'12' 00399000 @DATD DSECT 00400000 DS 0D 00401000 SEARCH DS BL1 00402000 ORG *+1-(*-@DATD)/(*-@DATD) INSURE DSECT DATA 00403000 @ENDDATD EQU * 00404000 IGC0H10D CSECT 00405000 DS 0F 00406000 @SIZDATD DC AL1(0) 00407000 DC AL3(@ENDDATD-@DATD) 00408000 DS 0D 00409000 @CC01322 DC C'07' 00410000 @CC01323 DC C'0K' 00411000 IED510I DC CL47'IED510I IN ALL REQUESTED LINES STARTED' 00412000 IED511I DC CL48'IED511I IN SOME REQUESTED LINES STARTED' 00413000 IED512I DC CL46'IED512I IN NO REQUESTED LINES STARTED' 00414000 IED513I DC CL64'IED513I COMMAND FOR INVALID. SUPERIOR RESOC00415000 URCE INACTIVE' 00416000 IED514I DC CL53'IED514I CONTROLLED BY TOTE. COMMAND REJECTC00417000 ED' 00418000 IED515I DC CL77'IED515I SUPERIOR RESOURCE FOR INACTIVE. LOC00419000 GICAL ACTIVATION PERFORMED' 00420000 IED516I DC CL49'IED516I ALREADY ACTIVE. COMMAND REJECTED' 00421000 IED517I DC CL71'IED517I COMMAND FOR AFFECTS ISSUING RESOURC00422000 CE. COMMAND REJECTED' 00423000 IED518I DC CL48'IED518I DCB NOT OPEN. COMMAND REJECTED' 00424000 IED541I DC CL49'IED541I LINE GROUP HAS NO LINES ATTACHED' 00425000 IED543I DC CL47'IED543I IN ALL REQUESTED LINES STOPPED' 00426000 IED544I DC CL46'IED544I IN NO REQUESTED LINES STOPPED' 00427000 IED545I DC CL48'IED545I IN SOME REQUESTED LINES STOPPED' 00428000 IED554I DC CL58'IED554I FOR ALL REQUESTED LOGICAL UNITS VAC00429000 RIED ON' 00430000 IED555I DC CL59'IED555I FOR SOME REQUESTED LOGICAL UNITS VC00431000 ARIED ON' 00432000 IED556I DC CL57'IED556I FOR NO REQUESTED LOGICAL UNITS VARC00433000 IED ON' 00434000 IED557I DC CL59'IED557I FOR ALL REQUESTED LOGICAL UNITS VAC00435000 RIED OFF' 00436000 IED558I DC CL60'IED558I FOR SOME REQUESTED LOGICAL UNITS VC00437000 ARIED OFF' 00438000 IED559I DC CL58'IED559I FOR NO REQUESTED LOGICAL UNITS VARC00439000 IED OFF' 00440000 IED560I DC CL39'IED560I 3705 LINE TRACE ENTRY TRUNCATED' 00441000 IED561I DC CL66'IED561I PU HAS NO ATTACHED LOGICAL UNITS.CC00442000 OMMAND REJECTED' 00443000 IED562I DC CL48'IED562I NCP OPTION INVALID FOR CONFIGURED SYSTEM' 00444000 IED563I DC CL50'IED563I CLOSEDOWN ALREADY IN PROGRESS FOR ' 00445000 DS CL1 00446000 PATCH DC XL104'0' 00447000 TABDATA DS CL278 00448000 ORG TABDATA 00449000 @NM00143 DC H'510' 00450000 @NM00144 DC AL2(47) 00451000 @NM00145 DC AL4(IED510I) 00452000 @NM00146 DC F'1' 00453000 @NM00147 DC H'511' 00454000 @NM00148 DC AL2(48) 00455000 @NM00149 DC AL4(IED511I) 00456000 @NM00150 DC F'1' 00457000 @NM00151 DC H'512' 00458000 @NM00152 DC AL2(46) 00459000 @NM00153 DC AL4(IED512I) 00460000 @NM00154 DC F'1' 00461000 @NM00155 DC H'513' 00462000 @NM00156 DC AL2(64) 00463000 @NM00157 DC AL4(IED513I) 00464000 @NM00158 DC F'5' 00465000 @NM00159 DC H'514' 00466000 @NM00160 DC AL2(53) 00467000 @NM00161 DC AL4(IED514I) 00468000 @NM00162 DC F'2' 00469000 @NM00163 DC H'515' 00470000 @NM00164 DC AL2(77) 00471000 @NM00165 DC AL4(IED515I) 00472000 @NM00166 DC F'3' 00473000 @NM00167 DC H'516' 00474000 @NM00168 DC AL2(49) 00475000 @NM00169 DC AL4(IED516I) 00476000 @NM00170 DC F'4' 00477000 @NM00171 DC H'517' 00478000 @NM00172 DC AL2(71) 00479000 @NM00173 DC AL4(IED517I) 00480000 @NM00174 DC F'5' 00481000 @NM00175 DC H'518' 00482000 @NM00176 DC AL2(48) 00483000 @NM00177 DC AL4(IED518I) 00484000 @NM00178 DC F'6' 00485000 @NM00179 DC H'541' 00486000 @NM00180 DC AL2(49) 00487000 @NM00181 DC AL4(IED541I) 00488000 @NM00182 DC F'7' 00489000 @NM00183 DC H'543' 00490000 @NM00184 DC AL2(47) 00491000 @NM00185 DC AL4(IED543I) 00492000 @NM00186 DC F'1' 00493000 @NM00187 DC H'544' 00494000 @NM00188 DC AL2(46) 00495000 @NM00189 DC AL4(IED544I) 00496000 @NM00190 DC F'1' 00497000 @NM00191 DC H'545' 00498000 @NM00192 DC AL2(48) 00499000 @NM00193 DC AL4(IED545I) 00500000 @NM00194 DC F'1' 00501000 @NM00195 DC H'554' 00502000 @NM00196 DC AL2(58) 00503000 @NM00197 DC AL4(IED554I) 00504000 @NM00198 DC F'8' 00505000 @NM00199 DC H'555' 00506000 @NM00200 DC AL2(59) 00507000 @NM00201 DC AL4(IED555I) 00508000 @NM00202 DC F'8' 00509000 @NM00203 DC H'556' 00510000 @NM00204 DC AL2(57) 00511000 @NM00205 DC AL4(IED556I) 00512000 @NM00206 DC F'8' 00513000 @NM00207 DC H'557' 00514000 @NM00208 DC AL2(59) 00515000 @NM00209 DC AL4(IED557I) 00516000 @NM00210 DC F'8' 00517000 @NM00211 DC H'558' 00518000 @NM00212 DC AL2(60) 00519000 @NM00213 DC AL4(IED558I) 00520000 @NM00214 DC F'8' 00521000 @NM00215 DC H'559' 00522000 @NM00216 DC AL2(58) 00523000 @NM00217 DC AL4(IED559I) 00524000 @NM00218 DC F'8' 00525000 @NM00219 DC H'560' 00526000 @NM00220 DC AL2(39) 00527000 @NM00221 DC AL4(IED560I) 00528000 @NM00222 DC F'0' 00529000 @NM00223 DC H'561' 00530000 @NM00224 DC AL2(66) 00531000 @NM00225 DC AL4(IED561I) 00532000 @NM00226 DC F'1' 00533000 @NM00227 DC H'562' 00534000 @NM00228 DC AL2(48) 00535000 @NM00229 DC AL4(IED562I) 00536000 @NM00230 DC F'0' 00537000 @NM00231 DC H'563' 00538000 @NM00232 DC AL2(50) 00539000 @NM00233 DC AL4(IED563I) 00540000 @NM00234 DC F'9' 00541000 TABEND DC H'0' 00542000 ORG TABDATA+278 00543000 DS CL2 00544000 CP0001@ DC AL4(LSTART) 00545000 DC AL4(CNTLTOTE) 00546000 DC AL4(SUPERIOR) 00547000 DC AL4(ACTIVRES) 00548000 DC AL4(ISSUE) 00549000 DC AL4(RESOURC) 00550000 DC AL4(LNGROUP) 00551000 DC AL4(PHYSUNIT) 00552000 DC AL4(CLOSEDWN) 00553000 @00 EQU 00 EQUATES FOR REGISTERS 0-15 00554000 @01 EQU 01 00555000 @02 EQU 02 00556000 @03 EQU 03 00557000 @04 EQU 04 00558000 @05 EQU 05 00559000 @06 EQU 06 00560000 @07 EQU 07 00561000 @08 EQU 08 00562000 @09 EQU 09 00563000 @10 EQU 10 00564000 @11 EQU 11 00565000 @12 EQU 12 00566000 @13 EQU 13 00567000 @14 EQU 14 00568000 @15 EQU 15 00569000 PTRENTRY EQU @05 00570000 ROPCE EQU @03 00571000 ROPCAVT EQU @02 00572000 RAVT EQU @04 00573000 REG00 EQU @00 00574000 REG01 EQU @01 00575000 RPARM EQU @01 00576000 REG10 EQU @10 00577000 RSAVE EQU @13 00578000 REG15 EQU @15 00579000 IEDQAVTD EQU 0 00580000 AVTSAVEX EQU IEDQAVTD+288 00581000 AVTREADD EQU IEDQAVTD+380 00582000 AVTBUFSW EQU IEDQAVTD+384 00583000 @NM00004 EQU IEDQAVTD+388 00584000 AVTCKFLG EQU @NM00004 00585000 AVTBASE EQU IEDQAVTD+412 00586000 AVTPKF EQU AVTBASE 00587000 AVTOSECB EQU IEDQAVTD+492 00588000 AVTECB1 EQU AVTOSECB 00589000 AVTHG02 EQU IEDQAVTD+528 00590000 AVTDISP EQU IEDQAVTD+552 00591000 AVTHD EQU IEDQAVTD+556 00592000 AVTSCOPT EQU AVTHD 00593000 AVTSAVTP EQU IEDQAVTD+612 00594000 AVTSAVTF EQU AVTSAVTP 00595000 AVTCKPEL EQU IEDQAVTD+652 00596000 AVTCKRMV EQU AVTCKPEL 00597000 AVTCKELF EQU IEDQAVTD+680 00598000 AVTCKBYT EQU IEDQAVTD+691 00599000 AVTHG01 EQU IEDQAVTD+692 00600000 AVTCKLNK EQU IEDQAVTD+696 00601000 AVTCRELE EQU IEDQAVTD+708 00602000 AVTCCELE EQU AVTCRELE 00603000 AVTCLRHI EQU IEDQAVTD+716 00604000 AVTADBUF EQU IEDQAVTD+720 00605000 AVTSYSER EQU IEDQAVTD+728 00606000 AVTBFRFG EQU IEDQAVTD+784 00607000 AVTCKPQB EQU IEDQAVTD+804 00608000 AVTCKPTB EQU AVTCKPQB 00609000 AVTCKPEC EQU AVTCKPQB+4 00610000 AVTCKPCC EQU AVTCKPEC 00611000 AVTOPCQB EQU IEDQAVTD+816 00612000 AVTOPCOB EQU AVTOPCQB 00613000 AVTOPCEC EQU AVTOPCQB+4 00614000 AVTOPCCC EQU AVTOPCEC 00615000 AVTOLTQB EQU IEDQAVTD+828 00616000 AVTCWFL1 EQU IEDQAVTD+924 00617000 AVTCWFL2 EQU IEDQAVTD+925 00618000 AVTSUBT EQU IEDQAVTD+948 00619000 AVTIOTR EQU IEDQAVTD+949 00620000 AVTBIT1 EQU IEDQAVTD+1050 00621000 AVTBIT2 EQU IEDQAVTD+1051 00622000 AVTBIT3 EQU IEDQAVTD+1052 00623000 AVTBIT4 EQU IEDQAVTD+1136 00624000 @NM00086 EQU IEDQAVTD+1232 00625000 IEDQAPTR EQU 0 00626000 IEDNSVTD EQU 0 00627000 SAVTDIAG EQU IEDNSVTD 00628000 SAVTDIAF EQU SAVTDIAG 00629000 SAVTLUSQ EQU IEDNSVTD+88 00630000 SAVTTCPU EQU IEDNSVTD+238 00631000 SAVTZELM EQU IEDNSVTD+270 00632000 SAVTRDRV EQU IEDNSVTD+284 00633000 SAVTCKQB EQU IEDNSVTD+300 00634000 SAVTCKTB EQU SAVTCKQB 00635000 SAVTCKEC EQU SAVTCKQB+4 00636000 SAVTCKCC EQU SAVTCKEC 00637000 IEDQOPCE EQU 0 00638000 OCELEM EQU IEDQOPCE+4 00639000 OCUNIT EQU IEDQOPCE+8 00640000 OCRUDEST EQU OCUNIT 00641000 OCCKPKEY EQU OCRUDEST 00642000 OCSCAN EQU OCCKPKEY 00643000 OCOPTCDE EQU IEDQOPCE+12 00644000 OCSWITCH EQU IEDQOPCE+13 00645000 OCFLAG EQU IEDQOPCE+14 00646000 @NM00109 EQU IEDQOPCE+16 00647000 OCDEST EQU @NM00109 00648000 OCREQVAL EQU OCDEST+1 00649000 OCLINENO EQU IEDQOPCE+22 00650000 OCTIOT EQU OCLINENO 00651000 OCTRUNIT EQU IEDQOPCE+24 00652000 OCRSID EQU OCTRUNIT 00653000 OCALSTAT EQU OCRSID 00654000 OCPARM EQU IEDQOPCE+28 00655000 OCBACKUP EQU IEDQOPCE+32 00656000 OCMODNME EQU IEDQOPCE+40 00657000 OCIPLWA EQU OCMODNME 00658000 OCCKDATA EQU IEDQOPCE+48 00659000 OCRSTGTM EQU OCCKDATA 00660000 IEDQOPCN EQU 0 00661000 OCLDNME EQU IEDQOPCN 00662000 OCLINTTE EQU OCLDNME 00663000 OCREQFLG EQU OCLINTTE+2 00664000 OCPREFLG EQU OCLINTTE+3 00665000 IEDQOPCD EQU 0 00666000 OPCAVTPT EQU IEDQOPCD+8 00667000 OPCCOPCE EQU IEDQOPCD+12 00668000 OPCSAVE EQU IEDQOPCD+56 00669000 OPCWORK EQU IEDQOPCD+140 00670000 OPCAQCTL EQU IEDQOPCD+180 00671000 OPCXCTL EQU IEDQOPCD+204 00672000 OPCLDNME EQU IEDQOPCD+212 00673000 OPCMODID EQU OPCLDNME+3 00674000 OPCSPEC EQU IEDQOPCD+300 00675000 OPCPWCOB EQU IEDQOPCD+368 00676000 OPCPWQCB EQU OPCPWCOB 00677000 OPCPWECB EQU OPCPWCOB+4 00678000 MSGSTRNG EQU 0 00679000 MSGWORKA EQU 0 00680000 MSGLNGTH EQU MSGWORKA 00681000 MSGTEXT EQU MSGWORKA+4 00682000 TABENTRY EQU 0 00683000 TABMNUM EQU TABENTRY 00684000 TABLNGTH EQU TABENTRY+2 00685000 TABMPTR EQU TABENTRY+4 00686000 TABCASE EQU TABENTRY+8 00687000 CL0001@ EQU 0 00688000 OCCKPKY1 EQU OCCKPKEY 00689000 OCCKPTYP EQU OCCKPKY1 00690000 OCICACTN EQU OCMODNME 00691000 OCICDADR EQU OCICACTN 00692000 OCICSW EQU OCICDADR+3 00693000 OPCAQWD EQU OPCAQCTL 00694000 OPCAQWD1 EQU OPCAQWD 00695000 OPCAQWD2 EQU OPCAQWD+4 00696000 OPCAQWD3 EQU OPCAQWD+8 00697000 MSG510I EQU MSGTEXT 00698000 MSGGROUP EQU MSG510I+11 00699000 MSG514I EQU MSGTEXT 00700000 MSGRTOTE EQU MSG514I+8 00701000 MSG515I EQU MSGTEXT 00702000 RESINACT EQU MSG515I+30 00703000 MSG516I EQU MSGTEXT 00704000 RESACTIV EQU MSG516I+8 00705000 MSG517I EQU MSGTEXT 00706000 RESISSUE EQU MSG517I+20 00707000 MSG518I EQU MSGTEXT 00708000 RESDCB EQU MSG518I+8 00709000 MSG541I EQU MSGTEXT 00710000 LINEGRP EQU MSG541I+19 00711000 MSG554I EQU MSGTEXT 00712000 PUNAME EQU MSG554I+12 00713000 MSG563I EQU MSGTEXT 00714000 NCPDDNME EQU MSG563I+42 00715000 OCCIB EQU OCREQVAL 00716000 AGO .@UNREFD START UNREFERENCED COMPONENTS 00717000 @NM00142 EQU MSG563I 00718000 @NM00141 EQU MSG554I 00719000 @NM00140 EQU MSG541I 00720000 @NM00139 EQU MSG518I 00721000 @NM00138 EQU MSG517I 00722000 @NM00137 EQU MSG516I 00723000 @NM00136 EQU MSG515I 00724000 @NM00135 EQU MSG514I 00725000 @NM00134 EQU MSG510I 00726000 OPCAQLST EQU OPCAQWD3+1 00727000 OPCAQRQ3 EQU OPCAQWD3 00728000 OPCAQSEC EQU OPCAQWD2+1 00729000 OPCAQRQ2 EQU OPCAQWD2 00730000 OPCAQFST EQU OPCAQWD1+1 00731000 OPCAQREQ EQU OPCAQWD1 00732000 OCICINAC EQU OCICSW 00733000 @NM00114 EQU OCICSW 00734000 OCICATST EQU OCICDADR+1 00735000 OCICTYPE EQU OCICDADR 00736000 @NM00113 EQU OCCKPKY1 00737000 OCCKPENV EQU OCCKPKY1 00738000 OCCKPRST EQU OCCKPTYP 00739000 OCCKPNCP EQU OCCKPTYP 00740000 OCCKPINC EQU OCCKPTYP 00741000 @NM00133 EQU MSGWORKA+2 00742000 OPCBOTTM EQU IEDQOPCD+1188 00743000 OPCDSRWT EQU IEDQOPCD+1184 00744000 @NM00132 EQU IEDQOPCD+1100 00745000 @NM00131 EQU IEDQOPCD+948 00746000 @NM00130 EQU IEDQOPCD+940 00747000 @NM00129 EQU IEDQOPCD+380 00748000 @NM00128 EQU OPCPWCOB+9 00749000 @NM00127 EQU OPCPWCOB+8 00750000 @NM00126 EQU OPCPWECB+1 00751000 OPCPWCCC EQU OPCPWECB 00752000 OPCPWCHN EQU OPCPWQCB+1 00753000 OPCPWVTO EQU OPCPWQCB 00754000 OPCWAITV EQU IEDQOPCD+364 00755000 OPCTOTCK EQU IEDQOPCD+360 00756000 OPCAPXTL EQU IEDQOPCD+356 00757000 OPCDECR EQU IEDQOPCD+352 00758000 OPCBUFWT EQU IEDQOPCD+348 00759000 OPCWRKSP EQU IEDQOPCD+320 00760000 OPCADGOT EQU IEDQOPCD+318 00761000 OPCRQCNT EQU IEDQOPCD+316 00762000 OPPOLSTP EQU IEDQOPCD+312 00763000 OPCCKCIB EQU IEDQOPCD+308 00764000 OPCEND EQU IEDQOPCD+307 00765000 OPCSTCBS EQU IEDQOPCD+306 00766000 OPCHNEND EQU IEDQOPCD+302 00767000 OPCOQSW EQU IEDQOPCD+301 00768000 @NM00125 EQU OPCSPEC 00769000 @NM00124 EQU OPCSPEC 00770000 @NM00123 EQU OPCSPEC 00771000 @NM00122 EQU OPCSPEC 00772000 OPCFRMCA EQU OPCSPEC 00773000 OPCRSTRT EQU OPCSPEC 00774000 OPCPART EQU OPCSPEC 00775000 OPCALTD EQU OPCSPEC 00776000 OPCBFEND EQU IEDQOPCD+296 00777000 OPCBFIRS EQU IEDQOPCD+292 00778000 OPCAVBUF EQU IEDQOPCD+290 00779000 OPCIPLCT EQU IEDQOPCD+289 00780000 OPCCLNTS EQU IEDQOPCD+288 00781000 OPCHA8 EQU IEDQOPCD+286 00782000 OPCBFREQ EQU IEDQOPCD+284 00783000 OPCFREBF EQU IEDQOPCD+280 00784000 OPCGETBF EQU IEDQOPCD+276 00785000 OPCNEXT EQU IEDQOPCD+272 00786000 OPCFMDFC EQU IEDQOPCD+268 00787000 OPCSCNC EQU IEDQOPCD+264 00788000 OPCHORTG EQU IEDQOPCD+260 00789000 OPCHORT EQU IEDQOPCD+256 00790000 OPCCKPTL EQU IEDQOPCD+252 00791000 OPCCKPTF EQU IEDQOPCD+248 00792000 OPCWAITA EQU IEDQOPCD+244 00793000 OPCWAITR EQU IEDQOPCD+240 00794000 OPCWAITP EQU IEDQOPCD+236 00795000 OPCWAITO EQU IEDQOPCD+232 00796000 OPCWAITN EQU IEDQOPCD+228 00797000 OPCWAITL EQU IEDQOPCD+224 00798000 OPCWAITC EQU IEDQOPCD+220 00799000 @NM00121 EQU OPCLDNME+5 00800000 @NM00120 EQU OPCLDNME 00801000 OPCWAIT EQU IEDQOPCD+192 00802000 OPCCKERB EQU IEDQOPCD+164 00803000 OPCBFERB EQU IEDQOPCD+148 00804000 OPCFLAG2 EQU IEDQOPCD+147 00805000 OPCFLAG1 EQU IEDQOPCD+146 00806000 OPCWRKSZ EQU IEDQOPCD+144 00807000 OPCRSAVE EQU IEDQOPCD+132 00808000 OPCQCBAD EQU IEDQOPCD+128 00809000 OPCTRMWA EQU IEDQOPCD+52 00810000 OPCPSTWT EQU IEDQOPCD+48 00811000 OPCTNTEA EQU IEDQOPCD+44 00812000 OPCPGCK EQU IEDQOPCD+40 00813000 OPCLCB EQU IEDQOPCD+36 00814000 @NM00119 EQU IEDQOPCD+32 00815000 OPCIPLAD EQU IEDQOPCD+28 00816000 OPCTOFLK EQU IEDQOPCD+24 00817000 OPCOPTLK EQU IEDQOPCD+20 00818000 OPCDCBLK EQU IEDQOPCD+16 00819000 OPCDOUBL EQU IEDQOPCD 00820000 @NM00118 EQU OCLDNME+4 00821000 @NM00117 EQU OCPREFLG 00822000 OCTOTEP EQU OCPREFLG 00823000 OCREPOST EQU OCPREFLG 00824000 OCRSPSNT EQU OCPREFLG 00825000 OCBFREQ EQU OCPREFLG 00826000 OCIDLE EQU OCREQFLG 00827000 OCFORCE EQU OCREQFLG 00828000 OCDCARD EQU OCREQFLG 00829000 OCPARTAL EQU OCREQFLG 00830000 OCADNCP EQU OCREQFLG 00831000 @NM00116 EQU OCREQFLG 00832000 @NM00115 EQU OCREQFLG 00833000 OCFLUSHZ EQU OCREQFLG 00834000 OCRESPCT EQU OCLINTTE 00835000 OCCKPTWA EQU OCCKDATA+4 00836000 @NM00112 EQU OCRSTGTM+2 00837000 OCCKDAT2 EQU OCRSTGTM+1 00838000 OCCKDAT1 EQU OCRSTGTM 00839000 OCPTRSAV EQU OCMODNME+4 00840000 OCPUADR EQU OCIPLWA+2 00841000 OCWTGSAV EQU OCIPLWA 00842000 OCDVRDCT EQU OCBACKUP+6 00843000 OCNCP EQU OCBACKUP+4 00844000 OCBUFGOT EQU OCBACKUP+2 00845000 OCBUFNED EQU OCBACKUP 00846000 OCWTG EQU IEDQOPCE+30 00847000 OCRESNUM EQU OCPARM 00848000 OCSEQ EQU OCTRUNIT+2 00849000 @NM00111 EQU OCRSID+1 00850000 OCNONE EQU OCALSTAT 00851000 OCSOME EQU OCALSTAT 00852000 OCALLFLG EQU OCALSTAT 00853000 OCACTREQ EQU OCALSTAT 00854000 OCREDRVE EQU OCALSTAT 00855000 OCSEQIND EQU OCALSTAT 00856000 OCDACTIP EQU OCALSTAT 00857000 OCRENTRD EQU OCALSTAT 00858000 OCWTGB EQU OCTIOT 00859000 OCTRMTBL EQU IEDQOPCE+20 00860000 @NM00110 EQU @NM00109+2 00861000 OCCONID EQU OCDEST 00862000 OCRLN EQU IEDQOPCE+15 00863000 OCRESP EQU OCFLAG 00864000 OCATTACH EQU OCFLAG 00865000 OCSSCP EQU OCFLAG 00866000 OCOUTPUT EQU OCFLAG 00867000 OCLINE EQU OCFLAG 00868000 OCMPP EQU OCFLAG 00869000 OCTOTE EQU OCFLAG 00870000 OCCONSOL EQU OCFLAG 00871000 @NM00108 EQU OCSWITCH 00872000 OCQUCKN EQU OCSWITCH 00873000 OCPRIFLG EQU OCOPTCDE 00874000 @NM00107 EQU OCRUDEST+1 00875000 @NM00106 EQU OCSCAN 00876000 OCNOTUCB EQU OCSCAN 00877000 OCNONAME EQU OCSCAN 00878000 OCALLRLN EQU OCSCAN 00879000 OCDDNAME EQU OCSCAN 00880000 OCDDNRLN EQU OCSCAN 00881000 OCADDR EQU OCSCAN 00882000 OCELMPTR EQU OCELEM+1 00883000 OCELMPRI EQU OCELEM 00884000 OCLINK EQU IEDQOPCE 00885000 SAVTLLCB EQU IEDNSVTD+316 00886000 SAVTBITN EQU IEDNSVTD+312 00887000 @NM00105 EQU SAVTCKQB+8 00888000 @NM00104 EQU SAVTCKEC+1 00889000 @NM00103 EQU SAVTCKCC 00890000 SAVTCKPO EQU SAVTCKCC 00891000 SAVTCKWA EQU SAVTCKCC 00892000 SAVTCKCH EQU SAVTCKTB+1 00893000 SAVTCKVT EQU SAVTCKTB 00894000 @NM00102 EQU IEDNSVTD+297 00895000 SAVTRDFG EQU SAVTRDRV+12 00896000 @NM00101 EQU SAVTRDRV+5 00897000 SAVTRDPY EQU SAVTRDRV+4 00898000 SAVTRDQB EQU SAVTRDRV+1 00899000 SAVTRDKY EQU SAVTRDRV 00900000 SAVTNID EQU IEDNSVTD+280 00901000 SAVTDVAS EQU IEDNSVTD+276 00902000 SAVTPLSZ EQU IEDNSVTD+274 00903000 @NM00100 EQU IEDNSVTD+273 00904000 SAVTSUBL EQU IEDNSVTD+272 00905000 @NM00099 EQU SAVTZELM+1 00906000 SAVTSUBM EQU SAVTZELM 00907000 SAVTMHDX EQU IEDNSVTD+268 00908000 SAVTNAT1 EQU IEDNSVTD+266 00909000 SAVTSH20 EQU IEDNSVTD+264 00910000 SAVTLCBS EQU IEDNSVTD+260 00911000 SAVTRNMP EQU IEDNSVTD+256 00912000 SAVTTNTX EQU IEDNSVTD+252 00913000 SAVTNAX EQU IEDNSVTD+248 00914000 SAVTSUBV EQU IEDNSVTD+247 00915000 SAVTSUBA EQU IEDNSVTD+246 00916000 SAVTSIBC EQU IEDNSVTD+244 00917000 SAVTBSM EQU IEDNSVTD+240 00918000 SAVTSCPT EQU SAVTTCPU 00919000 SAVTRQTG EQU IEDNSVTD+236 00920000 SAVTRQCH EQU IEDNSVTD+232 00921000 SAVTMAND EQU IEDNSVTD+228 00922000 SAVTSPLN EQU IEDNSVTD+224 00923000 SAVTNADL EQU IEDNSVTD+222 00924000 SAVTNATL EQU IEDNSVTD+220 00925000 SAVTMHTB EQU IEDNSVTD+216 00926000 SAVTSSMH EQU IEDNSVTD+212 00927000 SAVTQRS EQU IEDNSVTD+208 00928000 SAVTRQIN EQU IEDNSVTD+204 00929000 SAVTDFCO EQU IEDNSVTD+200 00930000 SAVTSAO EQU IEDNSVTD+196 00931000 SAVTSARI EQU IEDNSVTD+192 00932000 SAVTSAC EQU IEDNSVTD+188 00933000 SAVTSAI EQU IEDNSVTD+184 00934000 SAVTCSCI EQU IEDNSVTD+180 00935000 SAVTSSRP EQU IEDNSVTD+176 00936000 SAVTSSRQ EQU IEDNSVTD+172 00937000 SAVTSCLU EQU IEDNSVTD+168 00938000 SAVTXTRQ EQU IEDNSVTD+164 00939000 SAVTMVBF EQU IEDNSVTD+160 00940000 @NM00098 EQU IEDNSVTD+148 00941000 SAVTIPCQ EQU IEDNSVTD+144 00942000 @NM00097 EQU IEDNSVTD+136 00943000 SAVTXFMI EQU IEDNSVTD+132 00944000 @NM00096 EQU IEDNSVTD+124 00945000 SAVTXFMO EQU IEDNSVTD+120 00946000 @NM00095 EQU IEDNSVTD+116 00947000 SAVTSSSR EQU IEDNSVTD+112 00948000 SAVTSCPQ EQU IEDNSVTD+108 00949000 SAVTSLCB EQU IEDNSVTD+104 00950000 SAVTLUSR EQU IEDNSVTD+100 00951000 @NM00094 EQU SAVTLUSQ+8 00952000 SAVTLUSP EQU SAVTLUSQ+4 00953000 SAVTLUSB EQU SAVTLUSQ 00954000 @NM00093 EQU IEDNSVTD+84 00955000 SAVTSAT EQU IEDNSVTD+80 00956000 SAVTNAT EQU IEDNSVTD+76 00957000 SAVTCLUP EQU IEDNSVTD+72 00958000 SAVTPIUT EQU IEDNSVTD+68 00959000 SAVTRNTA EQU IEDNSVTD+64 00960000 SAVTDNIR EQU IEDNSVTD+60 00961000 SAVTCNIR EQU IEDNSVTD+56 00962000 SAVTFLDH EQU IEDNSVTD+52 00963000 SAVTSRTN EQU IEDNSVTD+48 00964000 SAVTSREQ EQU IEDNSVTD+44 00965000 SAVTFAIL EQU IEDNSVTD+42 00966000 SAVTSUSE EQU IEDNSVTD+40 00967000 SAVTSIB EQU IEDNSVTD+36 00968000 SAVTPRTN EQU IEDNSVTD+32 00969000 @NM00092 EQU IEDNSVTD+28 00970000 SAVTWH20 EQU IEDNSVTD+26 00971000 SAVTPWT EQU IEDNSVTD+24 00972000 SAVTPRTQ EQU IEDNSVTD+20 00973000 SAVTPREQ EQU IEDNSVTD+16 00974000 SAVTPH20 EQU IEDNSVTD+14 00975000 SAVTPUSE EQU IEDNSVTD+12 00976000 SAVTPLCB EQU IEDNSVTD+8 00977000 SAVTPOOL EQU IEDNSVTD+4 00978000 SAVTPRMT EQU SAVTDIAF 00979000 SAVTVIRT EQU SAVTDIAF 00980000 AVTCPBNO EQU IEDQAVTD+1244 00981000 AVTHRESS EQU IEDQAVTD+1243 00982000 @NM00091 EQU IEDQAVTD+1242 00983000 @NM00090 EQU IEDQAVTD+1241 00984000 @NM00089 EQU IEDQAVTD+1240 00985000 @NM00088 EQU IEDQAVTD+1237 00986000 @NM00087 EQU IEDQAVTD+1236 00987000 AVTHRESE EQU @NM00086 00988000 AVTRADDR EQU IEDQAVTD+1228 00989000 AVTNADDR EQU IEDQAVTD+1224 00990000 AVTHRESN EQU IEDQAVTD+1220 00991000 AVTVOLRN EQU IEDQAVTD+1216 00992000 AVTTOTNN EQU IEDQAVTD+1212 00993000 AVTTRCYN EQU IEDQAVTD+1208 00994000 AVTRCTRN EQU IEDQAVTD+1204 00995000 AVTNOVON EQU IEDQAVTD+1200 00996000 AVTADEBN EQU IEDQAVTD+1196 00997000 AVTVOLRR EQU IEDQAVTD+1192 00998000 AVTTOTNR EQU IEDQAVTD+1188 00999000 AVTTRCYR EQU IEDQAVTD+1184 01000000 AVTRCTRR EQU IEDQAVTD+1180 01001000 AVTNOVOR EQU IEDQAVTD+1176 01002000 AVTADEBR EQU IEDQAVTD+1172 01003000 AVTLODPT EQU IEDQAVTD+1168 01004000 AVTIOBN EQU IEDQAVTD+1164 01005000 AVTIOBR EQU IEDQAVTD+1160 01006000 AVTCPBPT EQU IEDQAVTD+1156 01007000 AVTFCPB EQU IEDQAVTD+1152 01008000 @NM00085 EQU IEDQAVTD+1148 01009000 AVTINCPQ EQU IEDQAVTD+1144 01010000 @NM00084 EQU IEDQAVTD+1140 01011000 @NM00083 EQU IEDQAVTD+1137 01012000 @NM00082 EQU AVTBIT4 01013000 @NM00081 EQU AVTBIT4 01014000 @NM00080 EQU AVTBIT4 01015000 @NM00079 EQU AVTBIT4 01016000 @NM00078 EQU AVTBIT4 01017000 @NM00077 EQU AVTBIT4 01018000 @NM00076 EQU AVTBIT4 01019000 AVTRUFTN EQU AVTBIT4 01020000 @NM00075 EQU IEDQAVTD+1132 01021000 AVTNOBFQ EQU IEDQAVTD+1128 01022000 @NM00074 EQU IEDQAVTD+1124 01023000 AVTDKENQ EQU IEDQAVTD+1120 01024000 @NM00073 EQU IEDQAVTD+1116 01025000 AVTDKAPQ EQU IEDQAVTD+1112 01026000 AVTCOPY EQU IEDQAVTD+1108 01027000 AVTIA EQU IEDQAVTD+1104 01028000 AVTFL EQU IEDQAVTD+1100 01029000 @NM00072 EQU IEDQAVTD+1096 01030000 AVTNCPBQ EQU IEDQAVTD+1092 01031000 AVTTOTNC EQU IEDQAVTD+1088 01032000 AVTCMAX EQU IEDQAVTD+1084 01033000 AVTCMIN EQU IEDQAVTD+1080 01034000 AVTHM02 EQU IEDQAVTD+1076 01035000 AVTOPCIN EQU IEDQAVTD+1074 01036000 AVTDCTLN EQU IEDQAVTD+1072 01037000 AVTOPMSK EQU IEDQAVTD+1068 01038000 AVTDDFT EQU IEDQAVTD+1064 01039000 AVTSTEAL EQU IEDQAVTD+1060 01040000 AVTOPTN EQU IEDQAVTD+1056 01041000 AVTDSKCT EQU IEDQAVTD+1054 01042000 AVTCKRST EQU IEDQAVTD+1053 01043000 AVTSTAN EQU AVTBIT3 01044000 AVTSTACN EQU AVTBIT3 01045000 AVTSTAIN EQU AVTBIT3 01046000 AVTSTAYN EQU AVTBIT3 01047000 AVTOLTBN EQU AVTBIT3 01048000 AVTTSAB EQU AVTBIT3 01049000 AVTRFULN EQU AVTBIT3 01050000 AVTRECVN EQU AVTBIT3 01051000 @NM00071 EQU AVTBIT2 01052000 @NM00070 EQU AVTBIT2 01053000 AVTOPEIN EQU AVTBIT2 01054000 AVTSTRTN EQU AVTBIT2 01055000 AVTTOPOL EQU AVTBIT2 01056000 AVTCOPYN EQU AVTBIT2 01057000 AVTREUSN EQU AVTBIT2 01058000 AVTEXTSC EQU AVTBIT2 01059000 AVTDISKN EQU AVTBIT1 01060000 AVTQUCKN EQU AVTBIT1 01061000 AVTCLOSN EQU AVTBIT1 01062000 AVTREADN EQU AVTBIT1 01063000 AVTDLAYN EQU AVTBIT1 01064000 AVTAQTAN EQU AVTBIT1 01065000 AVTTSON EQU AVTBIT1 01066000 AVTAPLKN EQU AVTBIT1 01067000 AVTDUMBR EQU IEDQAVTD+1048 01068000 AVTDLQX EQU IEDQAVTD+1046 01069000 AVTINTLV EQU IEDQAVTD+1044 01070000 AVTSMCNT EQU IEDQAVTD+1042 01071000 AVTAVFCT EQU IEDQAVTD+1040 01072000 AVTOPCON EQU IEDQAVTD+1038 01073000 AVTOPCNT EQU IEDQAVTD+1036 01074000 AVTLNCNT EQU IEDQAVTD+1034 01075000 AVTKEYLE EQU IEDQAVTD+1032 01076000 AVTHA16 EQU IEDQAVTD+1030 01077000 AVTHA7 EQU IEDQAVTD+1028 01078000 AVTHA4 EQU IEDQAVTD+1026 01079000 AVTHA3 EQU IEDQAVTD+1024 01080000 AVTHA2 EQU IEDQAVTD+1022 01081000 AVTGETMS EQU IEDQAVTD+1021 01082000 @NM00069 EQU IEDQAVTD+1020 01083000 AVTGETMD EQU IEDQAVTD+1016 01084000 AVTGETMN EQU IEDQAVTD+1012 01085000 AVTCWTOT EQU IEDQAVTD+1008 01086000 AVTCWINT EQU IEDQAVTD+956 01087000 AVTDTRAP EQU IEDQAVTD+952 01088000 @NM00068 EQU IEDQAVTD+950 01089000 @NM00067 EQU AVTIOTR 01090000 AVTIOTRH EQU AVTIOTR 01091000 AVTIOTRE EQU AVTIOTR 01092000 @NM00066 EQU AVTSUBT 01093000 AVTSUBPT EQU AVTSUBT 01094000 AVTSUBON EQU AVTSUBT 01095000 AVTAFE30 EQU IEDQAVTD+944 01096000 AVTAFE20 EQU IEDQAVTD+940 01097000 AVTAFE10 EQU IEDQAVTD+936 01098000 AVTCWEC2 EQU IEDQAVTD+932 01099000 AVTCWPM2 EQU IEDQAVTD+928 01100000 AVTCWTS2 EQU IEDQAVTD+927 01101000 AVTCWTS1 EQU IEDQAVTD+926 01102000 AVTCWCLD EQU AVTCWFL2 01103000 AVTCWRAP EQU AVTCWFL2 01104000 @NM00065 EQU AVTCWFL2 01105000 @NM00064 EQU AVTCWFL2 01106000 @NM00063 EQU AVTCWFL2 01107000 @NM00062 EQU AVTCWFL2 01108000 @NM00061 EQU AVTCWFL2 01109000 AVTCWACT EQU AVTCWFL2 01110000 @NM00060 EQU AVTCWFL1 01111000 @NM00059 EQU AVTCWFL1 01112000 @NM00058 EQU AVTCWFL1 01113000 @NM00057 EQU AVTCWFL1 01114000 @NM00056 EQU AVTCWFL1 01115000 @NM00055 EQU AVTCWFL1 01116000 @NM00054 EQU AVTCWFL1 01117000 AVTCOMWN EQU AVTCWFL1 01118000 AVTCWEC1 EQU IEDQAVTD+920 01119000 AVTCWPM1 EQU IEDQAVTD+916 01120000 AVTCAREA EQU IEDQAVTD+912 01121000 AVTFZERO EQU IEDQAVTD+908 01122000 AVTCADDR EQU IEDQAVTD+904 01123000 AVTCOREC EQU IEDQAVTD+900 01124000 @NM00053 EQU IEDQAVTD+892 01125000 AVTCPBCB EQU IEDQAVTD+888 01126000 @NM00052 EQU IEDQAVTD+880 01127000 AVTDSIOB EQU IEDQAVTD+876 01128000 @NM00051 EQU IEDQAVTD+868 01129000 AVTCPRMB EQU IEDQAVTD+864 01130000 @NM00050 EQU IEDQAVTD+856 01131000 AVTCLOSB EQU IEDQAVTD+852 01132000 @NM00049 EQU IEDQAVTD+844 01133000 AVTACTIB EQU IEDQAVTD+840 01134000 @NM00048 EQU IEDQAVTD+836 01135000 AVTOLTEB EQU IEDQAVTD+832 01136000 AVTOLTCH EQU AVTOLTQB+1 01137000 AVTOLTVT EQU AVTOLTQB 01138000 @NM00047 EQU AVTOPCQB+8 01139000 @NM00046 EQU AVTOPCEC+1 01140000 @NM00045 EQU AVTOPCCC 01141000 AVTOPCPO EQU AVTOPCCC 01142000 AVTOPCWA EQU AVTOPCCC 01143000 AVTOPCCH EQU AVTOPCOB+1 01144000 AVTOPCVT EQU AVTOPCOB 01145000 @NM00044 EQU AVTCKPQB+9 01146000 AVTCKPTS EQU AVTCKPQB+8 01147000 @NM00043 EQU AVTCKPEC+1 01148000 @NM00042 EQU AVTCKPCC 01149000 AVTCKPPO EQU AVTCKPCC 01150000 AVTCKPWA EQU AVTCKPCC 01151000 AVTCKPCH EQU AVTCKPTB+1 01152000 AVTCKPVT EQU AVTCKPTB 01153000 @NM00041 EQU IEDQAVTD+796 01154000 AVTBFRTB EQU IEDQAVTD+792 01155000 @NM00040 EQU IEDQAVTD+788 01156000 AVTSELCH EQU IEDQAVTD+785 01157000 AVTBFRTN EQU AVTBFRFG 01158000 AVTBFREB EQU IEDQAVTD+780 01159000 AVTTIMQ EQU IEDQAVTD+776 01160000 @NM00039 EQU IEDQAVTD+772 01161000 AVTIMQPS EQU IEDQAVTD+768 01162000 AVTINOUT EQU IEDQAVTD+766 01163000 AVTREFTM EQU IEDQAVTD+764 01164000 @NM00038 EQU IEDQAVTD+752 01165000 AVTDELYB EQU IEDQAVTD+748 01166000 AVTOCQPT EQU IEDQAVTD+744 01167000 AVTTSOPT EQU IEDQAVTD+740 01168000 AVTSUPPT EQU IEDQAVTD+736 01169000 AVTCBQCB EQU IEDQAVTD+732 01170000 AVTMSGS EQU IEDQAVTD+729 01171000 @NM00037 EQU AVTSYSER 01172000 @NM00036 EQU AVTSYSER 01173000 @NM00035 EQU AVTSYSER 01174000 @NM00034 EQU AVTSYSER 01175000 @NM00033 EQU AVTSYSER 01176000 @NM00032 EQU AVTSYSER 01177000 AVTCMAXN EQU AVTSYSER 01178000 AVTCMINN EQU AVTSYSER 01179000 AVT2260L EQU IEDQAVTD+724 01180000 AVTABEPL EQU AVTADBUF 01181000 AVTHFF EQU AVTCLRHI+2 01182000 @NM00031 EQU AVTCLRHI 01183000 AVTCCLNK EQU AVTCRELE+5 01184000 AVTCCPRI EQU AVTCRELE+4 01185000 AVTCCQCB EQU AVTCCELE+1 01186000 AVTCCKEY EQU AVTCCELE 01187000 AVTDELAD EQU IEDQAVTD+704 01188000 AVTDELEM EQU IEDQAVTD+700 01189000 AVTBSX EQU AVTCKLNK 01190000 AVTOPETR EQU AVTHG01 01191000 @NM00030 EQU AVTCKBYT 01192000 AVTCKONQ EQU AVTCKBYT 01193000 @NM00029 EQU AVTCKBYT 01194000 @NM00028 EQU AVTCKBYT 01195000 @NM00027 EQU AVTCKBYT 01196000 @NM00026 EQU AVTCKBYT 01197000 @NM00025 EQU AVTCKBYT 01198000 @NM00024 EQU AVTCKBYT 01199000 AVTOPERT EQU IEDQAVTD+690 01200000 AVTOPXCL EQU IEDQAVTD+688 01201000 AVTOPERL EQU IEDQAVTD+687 01202000 @NM00023 EQU IEDQAVTD+686 01203000 AVTCKTIM EQU IEDQAVTD+684 01204000 AVTCKELV EQU IEDQAVTD+682 01205000 AVTCPRCD EQU IEDQAVTD+681 01206000 AVTWARMN EQU AVTCKELF 01207000 AVTCRTLN EQU AVTCKELF 01208000 AVTCPIPN EQU AVTCKELF 01209000 AVTCCLCN EQU AVTCKELF 01210000 AVTCINCN EQU AVTCKELF 01211000 @NM00022 EQU AVTCKELF 01212000 AVTCMCPN EQU AVTCKELF 01213000 AVTNQBCK EQU AVTCKELF 01214000 AVTCKQAD EQU IEDQAVTD+677 01215000 AVTSCBSZ EQU IEDQAVTD+676 01216000 @NM00021 EQU IEDQAVTD+672 01217000 AVTCKELE EQU IEDQAVTD+668 01218000 @NM00020 EQU AVTCKPEL+8 01219000 AVTCKRLK EQU AVTCKPEL+5 01220000 AVTCKRPR EQU AVTCKPEL+4 01221000 AVTCKRMQ EQU AVTCKRMV+1 01222000 AVTCKRKY EQU AVTCKRMV 01223000 AVTHK EQU IEDQAVTD+648 01224000 AVTHI EQU IEDQAVTD+644 01225000 AVTIOT EQU IEDQAVTD+640 01226000 AVTNX EQU IEDQAVTD+636 01227000 AVTTONE EQU IEDQAVTD+632 01228000 AVTA3TL EQU IEDQAVTD+628 01229000 AVTDMECB EQU IEDQAVTD+624 01230000 AVTABEND EQU IEDQAVTD+618 01231000 AVTPLCBN EQU IEDQAVTD+616 01232000 @NM00019 EQU AVTSAVTP+1 01233000 @NM00018 EQU AVTSAVTF 01234000 AVTSNA EQU AVTSAVTF 01235000 AVTONSNA EQU AVTSAVTF 01236000 AVTVTMCP EQU AVTSAVTF 01237000 @NM00017 EQU IEDQAVTD+608 01238000 AVTCMBSS EQU IEDQAVTD+604 01239000 AVTRCV EQU IEDQAVTD+600 01240000 AVTSEND EQU IEDQAVTD+596 01241000 AVTCSCH EQU IEDQAVTD+592 01242000 AVTQ1 EQU IEDQAVTD+588 01243000 AVTE7 EQU IEDQAVTD+584 01244000 AVTHB EQU IEDQAVTD+580 01245000 AVTR1 EQU IEDQAVTD+576 01246000 AVTBZ EQU IEDQAVTD+572 01247000 AVTEZ EQU IEDQAVTD+568 01248000 AVTEC EQU IEDQAVTD+564 01249000 AVTEW EQU IEDQAVTD+560 01250000 AVTNDIAL EQU AVTSCOPT 01251000 AVTN2741 EQU AVTSCOPT 01252000 AVTCONCO EQU AVTSCOPT 01253000 AVTCONC EQU AVTSCOPT 01254000 AVTCMBUF EQU AVTSCOPT 01255000 AVTAPDMP EQU AVTSCOPT 01256000 @NM00016 EQU AVTSCOPT 01257000 AVTHA EQU AVTDISP 01258000 AVTEA EQU IEDQAVTD+548 01259000 AVTAX EQU IEDQAVTD+544 01260000 AVTA3 EQU IEDQAVTD+540 01261000 AVTGD EQU IEDQAVTD+536 01262000 AVTAL EQU IEDQAVTD+532 01263000 AVTOLTST EQU AVTHG02 01264000 AVTE8 EQU IEDQAVTD+524 01265000 AVTUI EQU IEDQAVTD+520 01266000 AVTCOMPT EQU IEDQAVTD+516 01267000 AVTCRSRF EQU IEDQAVTD+512 01268000 @NM00015 EQU IEDQAVTD+508 01269000 AVTKA02 EQU IEDQAVTD+504 01270000 AVTOPTPT EQU IEDQAVTD+500 01271000 AVTPCBPT EQU IEDQAVTD+496 01272000 @NM00014 EQU AVTECB1 01273000 AVTCOMP EQU AVTECB1 01274000 @NM00013 EQU AVTECB1 01275000 AVTOPECA EQU IEDQAVTD+488 01276000 AVTOLECA EQU IEDQAVTD+484 01277000 AVTCKECA EQU IEDQAVTD+480 01278000 AVTCWECA EQU IEDQAVTD+476 01279000 AVTCWTCB EQU IEDQAVTD+472 01280000 AVTOLTCB EQU IEDQAVTD+468 01281000 AVTOCTCB EQU IEDQAVTD+464 01282000 AVTCKTCB EQU IEDQAVTD+460 01283000 AVTAS EQU IEDQAVTD+456 01284000 AVTNOLBF EQU IEDQAVTD+454 01285000 AVTNCKPR EQU IEDQAVTD+453 01286000 AVTCIB EQU IEDQAVTD+452 01287000 AVTSPLPT EQU IEDQAVTD+448 01288000 AVTMVBFR EQU IEDQAVTD+444 01289000 AVTSBTA EQU IEDQAVTD+440 01290000 AVTRARTN EQU IEDQAVTD+436 01291000 AVTBSCAN EQU IEDQAVTD+432 01292000 AVTRDYA EQU IEDQAVTD+428 01293000 AVTRNMPT EQU IEDQAVTD+424 01294000 AVTDISTR EQU IEDQAVTD+420 01295000 AVTPARM3 EQU IEDQAVTD+416 01296000 @NM00012 EQU AVTPKF 01297000 @NM00011 EQU AVTPKF 01298000 @NM00010 EQU AVTPKF 01299000 AVTFTCHF EQU AVTPKF 01300000 @NM00009 EQU AVTPKF 01301000 @NM00008 EQU AVTPKF 01302000 @NM00007 EQU AVTPKF 01303000 @NM00006 EQU AVTPKF 01304000 AVTPARM EQU IEDQAVTD+408 01305000 AVTEXS2A EQU IEDQAVTD+402 01306000 AVTEXA2S EQU IEDQAVTD+396 01307000 AVTOCGET EQU IEDQAVTD+392 01308000 AVTCKAVT EQU @NM00004+1 01309000 @NM00005 EQU AVTCKFLG 01310000 AVTCKHLT EQU AVTCKFLG 01311000 AVTCKREQ EQU AVTCKFLG 01312000 AVTCKENV EQU AVTCKFLG 01313000 AVTCKNAC EQU AVTCKFLG 01314000 AVTCKTAC EQU AVTCKFLG 01315000 AVTBUENT EQU IEDQAVTD+386 01316000 @NM00003 EQU IEDQAVTD+385 01317000 AVTFULLT EQU AVTBUFSW 01318000 AVTUNCON EQU AVTBUFSW 01319000 @NM00002 EQU AVTBUFSW 01320000 AVTBUFTR EQU AVTREADD 01321000 AVTREADY EQU IEDQAVTD+376 01322000 AVTRACE EQU IEDQAVTD+372 01323000 AVTTCB EQU IEDQAVTD+368 01324000 AVTPASWD EQU IEDQAVTD+360 01325000 AVTCTLCH EQU IEDQAVTD+352 01326000 AVTDOUBL EQU IEDQAVTD+344 01327000 AVTDOUBX EQU IEDQAVTD+336 01328000 AVTDPARM EQU IEDQAVTD+332 01329000 AVTCSTCS EQU IEDQAVTD+328 01330000 AVTDLQ EQU AVTSAVEX+32 01331000 @NM00001 EQU AVTSAVEX 01332000 AVTSAVE4 EQU IEDQAVTD+216 01333000 AVTSAVE3 EQU IEDQAVTD+144 01334000 AVTSAVE2 EQU IEDQAVTD+72 01335000 AVTSAVE1 EQU IEDQAVTD 01336000 .@UNREFD ANOP END UNREFERENCED COMPONENTS 01337000 @ENDDATA EQU * 01338000 END IGC0H10D,(C'PLS1906',0701,78089) 01339000