Previous File Previous Page Single Page Next Page Next File

* 0170-001-6801 (IOS-O16X) CCD NO. 70181495000 REV. A PAGE 10

0419 * MTU : END OF FILE PROCESSOR 0420 * 0421 * 0422 00257 0 02 00554 MTU LDA ETAB CHECK FOR PRECEEDING EOF 0423 00260 100040 SZE IF ZERO. THIS IS FIRST EOF 0424 00261 0 01 00266 JMP FIX1 DOUBLE EOF - WRAP UP JOB 0425 00262 140401 CMA SET ETAB NON ZERO 0426 00263 0 04 00554 STA ETAB 0427 00264 0 12 00551 IRS MTF2 INCREMENT FILE/PROGRAM COUNTER 0428 00265 0 01 00240 JMP MTIN-3 GO READ NEXT RECORD 0429 00266 0 04 00555 FIX1 STA LOC SET DOUBLE EOF INDICATOR 0430 00267 0 01 00453 JMP E222 JOB IS DONE 0431 * 0432 * 0433 EJCT . . . . . . . . . . . . . . .
Previous File Previous Page Single Page Next Page Next File