|
DataMuseum.dkPresents historical artifacts from the history of: Philips Data Systems |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Philips Data Systems Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 42934 (0xa7b6)
Notes: pts_type(SC)
Names: »NYCONV.SC«
└─⟦5c22ed822⟧ Bits:30009675 Philips computer tape "600209"
└─⟦this⟧ »DEN10/NYCONV.SC«
IDENT NYCONV NJ-AMT 830225/EV BATCH TRANSMISSION 82-11-10/EV 820506/NJ UPD 82-02-22/EV UPD 81-08-27/EV UPD 80-12-12/SHB UPD 80-07-14/JAER DDUM DEDDIV PDIV ENTRY DECONV EXT DEPOOL EXT TESTB EXT EMPTYT EXT DERROR EXT ATTDEV ATTACH DEVICE EXT ATTPRT EXT DETPRT EXT MASK EXT GETFWD EXT ADJUST EXT FDIO * EXT DCSGON EXT DCSGOF EXT DCSEND * EJECT * * KEYTABLE * CLR EQU X'8F' CLEAR CAN EQU X'91' CANCEL RET EQU X'98' RETURN ENT EQU X'8C' ENTER * KEYTAB KTAB CLR,CAN,RET,ENT * * STIMO EQU X'0B' ATTACH EQU X'0E' DETACH EQU X'0F' TRPAR EQU X'00' EJECT * THIS MODULE TAKE CARES OF THE DIFFERENT CONVERTIONS- * -METHODS * ONE OF THEM IS ALREADY PREPAIRED FOR YOUR PRINTOUT). * THE OTHER YOU HAVE TO CODE YOURSELVES. * FORMAL PARAMETERS: FC = FUNCTION-CODE (DEVICE-CLASS) * = 1 DATACOMMUNICATION OUT * = 2 DATACOMMUNICATION IN * = 3 CASETTE OUTPUT * = 4 PRINTOUT LP/GP * = 5 DISCFILE * = 6 FLOPPYDISC FILE * = 7 DELETE BATCHES ON USERFILE * = 8 FREEZE BATCHES ON USER FILE * = 9 LISTING LP/GP * TYPE = TYPE OF HANDLING * = 1 OPEN * = 2 BATCHHEAD-RECORD * = 3 DATA RECORD * = 4 BALANCE RECORD * = 5 CLOSE * RETCON = RETURN-CODE * = 0 OK * /= 0 ERROR MESSAGE-NUMBER * =-1 SKIP CURR BATCH, GO TO NEXT * =-2 SKIP TO BALANCE * =-3 RESTART CURRENT BATCH (CANCEL) * =-4 ABORT CONVERSION (RETURN) * =-5 DELETE THIS BATCH * =-6 GET CURRENT RECORD * INPUT VARIABLE: BIN4 = FC-CODE FOR DEVICE EJECT DECONV PROC FC,TYPE,RETCON IB FC,TRANSM,RECEIV,CASSET JUMP ON DEVICE-CLASS C PRINTA,DISCFD,FLOPPY,DELETE,FREEZE,LISTE RECEIV DISCFD CASSET ERROR MOVE RETCON,W4 'FUNCTION NOT ALLOWED? B RETURN * * THIS IS THE PRINTOUT FUNCTION * PRINTA IB TYPE,PR100,PR200,PR200 JUMP ON TYPE 0F HANDLING C PR200,PR500 B ERROR * * OPEN DEVICE = ATTACH PRINTER * PR100 PERF ATTDEV,BIN6 ATTACH DEVICE BOK DECOOK B RETURN EJECT * * * PRINTOUT OF THE DIFFERENT RECORD TYPES * PR200 EDWRT DEDSPRT,FCOUNT BNOK PR298 MOVE DEBINW3,W1 PRINT DEDSPRT,DEBINW3,W0 BNOK PR298 B DECOOK PR298 MOVE RETCON,=W'35' OUTPUT DEVICE NOT OP....' B RETURN GO AND CLOSE * * CLOSE DEVICE = DETACH PRINTER * PR500 PERF DETPRT DETACH DEVICE B RETURN EJECT * * THIS ROUTINE DELETE BATCHES ON THE USERFILE * DELETE IB TYPE,DECOOK,DEL100 B DECOOK DEL100 MOVE RETCON,=W'-5' CBNE WORK(W8),W0,DEL110 NOT THE WHOLE FILE MOVE DATE,HEX00 RESET DATE DEL110 B RETURN EJECT * * THIS ROUTINE FREEZE BATCHES ON USER FILE * FREEZE IB TYPE,FRE100,FRE200,FRE300 OPEN BATCHHEAD DATA C FRE400,FRE500 BALANCE CLOSE * OPEN FRE100 B DECOOK FRE200 B DECOOK FRE300 B DECOOK * BALANCE RECORD FRE400 B DECOOK * CLOSE FRE500 B DECOOK EJECT * * OK * DECOOK MOVE RETCON,W0 RETURN RET EJECT * * BATCH TRANSMISSION * TRANSM MOVE BTYPE,TYPE IB TYPE,DC100,DC200,DC300 OPEN,BATCHHEAD,DATA C DC400,DC500 BALANCE,CLOSE * REQLEN REQUESTED LENGTH * RECLGD MAX RECORD LENGTH * DCBUF DCBUFFER * REQDC BUFFER POINTER * * SEND SOF * SEND '001'+DATE * DC100 TBT DCBAB,DC170 MOVE BIN4,W20 DSC1 DSDCFD,ATTACH,BIN4 ATTACH DEVICE DC BNOK DCERR PERF GETBUF GET 3 CONSECUTIVE BUFFERS B DC110 OK B DCERR ERROR DC110 DC140 MOVE BCDI21(W5),=D'0' RECORD COUNT MOVE WORK(W15),W0 LENGTH HEADER MOVE WORK(W17),W0 LENGTH RECORD NO MOVE WORK(W19),W0 LENGTH SEQUENCE NO CLEAR BCONT CONTINUATION MARK CLEAR BSUPR SET SPLITFL NORMAL SPLIT MOVE BIN6,=X'0036' FILE CODE PRINTER PERF ATTDEV,BIN6 ATTACH DEVICE BNOK DC335 MOVE STRG10A,HEX00 GETTIME STRG10A MOVE TIME,STRG10A EDWRT DEDSPRT,FDCHDR MOVE BIN4,TSKADR DSC1 DSDCFD,TRPAR,BIN4 PASS DCADR TO DRIVER BNOK DCERR MOVE REQLEN,=W'504' DCREQLEN MOVE RECLGD,=D'128' OR =D'080' ??????? MOVE DCBUF,=C' ' MOVE REQDC,W0 BUFFER POINTER EDSUB DCBUF,REQDC,SNDFRM2 PERF DCRVOL READ VOLUME LABEL B DC150 OK B DCERR ERR DC150 IB DEBINW2,DC160,DC180,DC170 CLR,CAN,RET * ENT DC160 PERF DCSGON SIGN ON B DC165 OK B DCERR ERROR DC165 B DECOOK OK DC170 MOVE RETCON,=W'-4' ABORT CONVERSION B DCERRT DCERR MOVE RETCON,=W'53' OUTP. DEV. NOT OPERABLE DCERRT DSC1 DSDCFD,TRPAR,W0 SET DCBAB B RETURN DC180 DSC1 DSDCFD,TRPAR,W0 PASS DCADR 0 B RETURN EJECT * * BATCHEAD RECORD * DC200 TBT DCBAB,DC330 TBF BDAFOR,DC300 ANY FORCED FIELDS? EDWRT DEDSPRT,FBATC3 PRINT ERROR REPORT SET DCBAB MOVE RETCON,=W'-1' GET NEXT BATCH B RETURN DC300 TBT DCBAB,DC330 CBE TYPE,W4,DC305 PRINTING CBE TYPE,W2,DC305 PRINTING B DC308 NO PRINTING DC305 * PRINT BATCH HEAD AND BALANCE RECORD MOVE DEBINW3,W1 PRINT DEDSPRT,DEBINW3,W0 BNOK DC335 DC308 MOVE BIN10,WORK(W13) GET BUFFER INDEX MOVE BIN9,BIN10 GET BPOOL INDEX ADD BIN9,W1 MOVE BIN8,W0 RESET FIELD NUMBER TBT DCBAB,DC330 ABORTION DC310 MOVE BIN4,W0 DC311 PERF CONV,BIN4,FC B DECOOK ALL DONE B DC340 WRITE BLOCKS B DC315 CUMP FIELD EMPTHY B DC320 BCD FIELD OVERFLOW B DC320 EDIT BUFFER OVERFLOW DC315 MOVE RETCON,W5 B DCERRT DC320 MOVE RETCON,=W'54' EDIT ERROR B DCERRT * * DC330 MOVE RETCON,=W'-4' ABORT B RETURN * * DC335 MOVE RETCON,=W'35' B RETURN * * WRITE BLOCKS * DC340 PERF DCWRIT,FC,TYPE,RETCON B DC310 OK B DC360 ERROR B DC360 EOE MOVE BIN4,W1 CONTINUE IN SAME BUFFER B DC311 DC360 *???????? ERROR, SEND TERMINATE ??????? B DCERR EJECT DC400 * BALANCE FORMAT B DC300 DC500 TBT DCBAB,DC560 ABORT PERF DCSGOF B DC510 B DCERR DC510 MOVE STRG10A,HEX00 GETTIME STRG10A MOVE TIME,STRG10A EDWRT DEDSPRT,FDCEND DC550 CLEAR DCBAB DSC1 DSDCFD,TRPAR,W0 PASS DCADR 0 MOVE BIN4,W0 DSC1 DSDCFD,DETACH,BIN4 PERF DETPRT * RELEAS BUFFERS PERF DEPOOL,W6,BIN10,BIN4,STRG10A B DECOOK DC560 MOVE STRG10A,HEX00 GETTIME STRG10A MOVE TIME,STRG10A EDWRT DEDSPRT,FDCERR B DC550 EJECT * * LISTING * LISTE MOVE BTYPE,TYPE IB TYPE,LS100,LS200,LS300, OPEN,BATCHHEAD,DATA, C LS400,LS500 BALANCE,CLOSE LS100 TBT LSBAB,LS170 PERF GETBUF GET 3 CONSECUTIVE BUFFERS B LS110 OK B LSERR ERROR LS110 MOVE BCDI21(W5),=D'0' RECORD COUNT MOVE WORK(W15),W0 LENGTH HEADER MOVE WORK(W17),W0 LENGTH RECORD NO MOVE WORK(W19),W0 LENGTH SEQUENCE NO CLEAR BCONT CONTINUATION MARK CLEAR BSUPR CLEAR SPLITFL NNO SPLIT CLEAR FIRSTFL INITIATE FIRST RECORD PERF ATTDEV,BIN6 ATTACH DEVICE BNOK LSERR MOVE STRG10A,HEX00 GETTIME STRG10A MOVE TIME,STRG10A EDWRT DEDSPRT,FLSHDR MOVE RECLGD,=D'112' * ENT B DECOOK OK LS170 MOVE RETCON,=W'-4' ABORT CONVERSION B LSERRT LSERR MOVE RETCON,=W'35' OUTPUT DEV NOT OPERABLE LSERRT SET LSBAB B RETURN * * BATCHEAD RECORD * LS200 TBT LSBAB,LS170 TBF BDAFOR,LS250 ANY FORCED FIELDS? EDWRT DEDSPRT,FBATC3 PRINT ERROR REPORT SET LSBAB MOVE RETCON,=W'-1' GET NEXT BATCH B RETURN LS250 BATCHHEAD OR BALANCE TBT LSBAB,LS170 MOVE DEBINW3,W1 PRINT DEDSPRT,DEBINW3,W0 BNOK LSERR * CONVERT HEADER TO SET CONVERSION INDICATIONS LS220 MOVE BIN10,WORK(W13) GET BUFFER INDEX MOVE BIN9,BIN10 GET BPOOL INDEX ADD BIN9,W1 MOVE BIN8,W0 RESET FIELD NO MOVE BIN4,W0 LS210 PERF CONV,BIN4,FC B DECOOK ALL DONE B LS210 NOT ALL DONE B LS315 COMP FIELD EMPTY B LS320 BCD FIELD OVERFLOW B LS320 EDIT BUFFER OVERFLOW B DECOOK LS300 TBT FDBAB,LS170 MOVE BIN10,WORK(W13) GET BUFFER INDEX MOVE BIN9,BIN10 GET BPOOL INDEX ADD BIN9,W1 MOVE BIN8,W0 RESET FIELD NUMBER LS310 MOVE BIN4,W0 LS311 PERF CONV,BIN4,FC B DECOOK ALL DONE B LS340 WRITE BLOCKS B LS315 CUMP FIELD EMPTY B LS320 BCD FIELD OVERFLOW B LS320 EDIT BUFFER OVERFLOW LS315 MOVE RETCON,W5 B LSERRT LS320 MOVE RETCON,=W'54' B LSERRT * WRITE BLOCKS LS340 PERF LSWRIT,FC,TYPE,RETCON B LS310 OK B LS310 DUMMY B LS310 DUMMY MOVE BIN4,W1 CONTINUE IN SAME BUFFER B LS311 LS400 * BALANCE FORMAT B LS250 LS500 MOVE BIN10,WORK(W13) GET BUFFER INDEX TBT FDBAB,LS560 ABORT B LS570 LS550 CLEAR LSBAB MOVE BIN4,W0 PERF DETPRT * RELEAS BUFFERS PERF DEPOOL,W6,BIN10,BIN4,STRG10A B DECOOK LS560 MOVE STRG10A,HEX00 GETTIME STRG10A MOVE TIME,STRG10A EDWRT DEDSPRT,FLSERR B LS550 LS570 MOVE STRG10A,HEX00 GETTIME STRG10A MOVE TIME,STRG10A EDWRT DEDSPRT,FLSEND B LS550 EJECT * * FLOPPY DUMPING * FLOPPY MOVE BTYPE,TYPE IB TYPE,FD100,FD200,FD300 OPEN,BATCHHEAD,DATA C FD400,FD500 BALANCE,CLOSE * * SEND SOF * SEND '001'+DATE * FD100 TBT FDBAB,FD170 PERF GETBUF GET 3 CONSECUTIVE BUFFERS B FD110 OK B FDERR ERROR FD110 MOVE CWFD,W7 HDR RECORD MOVE REQFD,=W'128' CALL FDIO,DSFD,X'A1',BPOOL(BIN10),REQFD,CWFD OPEN MOVE BIN4,W20 DSC1 DSFD,ATTACH,BIN4 ATTACH DEVICE FD BNOK FDERR PERF FDLOAD B FD140 OK B FDERR ERROR FD140 MOVE BCDI21(W5),=D'0' RECORD COUNT MOVE WORK(W15),W0 LENGTH HEADER MOVE WORK(W17),W0 LENGTH RECORD NO MOVE WORK(W19),W0 LENGTH SEQUENCE NO CLEAR BCONT CONTINUATION MARK CLEAR BSUPR SET SPLITFL NORMAL SPLIT MOVE BIN6,=X'0036' FILE CODE PRINTER PERF ATTDEV,BIN6 ATTACH DEVICE BNOK FDERR MOVE STRG10A,HEX00 GETTIME STRG10A MOVE TIME,STRG10A EDWRT DEDSPRT,FFDHDR PERF FDRVOL READ VOLUME LABEL B FD150 OK B FDERR ERR FD150 IB DEBINW2,FD160,FD180,FD170 CLR,CAN,RET * ENT FD160 MOVE STR8A,STR8B SAVE FILE NAME MOVE FDCNT,W1 RESET FD COUNTER PERF FDWVOL WRITE VOLUME LABEL B FD165 OK B FDERR ERROR FD165 B DECOOK OK FD170 MOVE RETCON,=W'-4' ABORT CONVERSION B FDERRT FDERR MOVE RETCON,=W'35' OUTP. DEV. NOT OPERABLE FDERRT SET FDBAB B RETURN FD180 MOVE CWFD,W7 MOVE REQFD,=W'128' CALL FDIO,DSFD,X'B8',BPOOL(BIN10),REQFD,CWFD *UNLOAD HDR1 MOVE RETCON,=W'55' CHANGE FD B RETURN EJECT * * BATCHEAD RECORD * FD200 TBT FDBAB,FD170 TBF BDAFOR,FD300 ANY FORCED FIELDS? EDWRT DEDSPRT,FBATC3 PRINT ERROR REPORT SET FDBAB MOVE RETCON,=W'-1' GET NEXT BATCH B RETURN FD300 TBT FDBAB,FD170 TBT FDEOF,FDEOF10 CBE TYPE,W4,FD305 PRINTING CBE TYPE,W2,FD305 PRINTING B FD308 NO PRINTING FD305 * PRINT BATCH HEAD AND BALANCE RECORD MOVE DEBINW3,W1 PRINT DEDSPRT,DEBINW3,W0 BNOK FDERR FD308 MOVE BIN10,WORK(W13) GET BUFFER INDEX MOVE BIN9,BIN10 GET BPOOL INDEX ADD BIN9,W1 MOVE BIN8,W0 RESET FIELD NUMBER FD310 MOVE BIN4,W0 FD311 PERF CONV,BIN4,FC B DECOOK ALL DONE B FD340 WRITE BLOCKS B FD315 CUMP FIELD EMPTHY B FD320 BCD FIELD OVERFLOW B FD320 EDIT BUFFER OVERFLOW FD315 MOVE RETCON,W5 B FDERRT FD320 MOVE RETCON,=W'54' EDIT ERROR B FDERRT * * WRITE BLOCKS * FD340 PERF FDWRIT,FC,TYPE,RETCON B FD310 OK B FD360 ERROR B FDEOF05 EOE MOVE BIN4,W1 CONTINUE IN SAME BUFFER B FD311 FD350 PERF FDLOAD B FD370 OK B FD360 ERROR FD360 MOVE REQFD,=W'128' MOVE CWFD,W7 CALL FDIO,DSFD,X'B8',BPOOL(BIN10),REQFD,CWFD UNLOAD FD365 MOVE DEBINW4,=W'55' CHANGE FLOPPYDISK PERF DERROR,KEYTAB IB DEBINW2,FD350,FD360,FD170 CLR,CAN,RET B FD350 ENT FD370 PERF FDRVOL READ VOLUME LABEL B FD375 OK B FD360 ERROR FD375 IB DEBINW2,FD380,FD360,FD170 CLR,CAN,RET * ENT FD380 PERF FDWVOL WRITE VOLUME LABEL B FD382 OK B FD360 ERROE FD382 TBF FDEOF,FD340 NOT EOF MOVE RETCON,=W'-6' GET CURRENT RECORD B RETURN FDEOF05 SET FDEOF INDICATE EOF MOVE WORK(W14),BIN8 SAVE FIELD NO B FD360 FDEOF10 CLEAR FDEOF MOVE BIN10,WORK(W13) GET BUFFER INDEX MOVE BIN9,BIN10 GET BPOOL INDEX ADD BIN9,W1 MOVE BIN8,WORK(W14) GET FIELD NO MOVE REQFD,=W'128' MOVE CWFD,W0 CALL FDIO,DSFD,X'06',BPOOL(BIN10),REQFD,CWFD WRITE BLOCKS B FD340 EJECT FD400 * BALANCE FORMAT B FD300 FD500 TBT FDBAB,FD560 ABORT FD505 ***PERF FDWRIT B FD570 OK B FDERR ERR B FD510 EOE FD510 MOVE REQFD,=W'128' MOVE CWFD,W7 CALL FDIO,DSFD,X'B8',BPOOL(BIN10),REQFD,CWFD UNLOAD FD515 MOVE DEBINW4,=W'55' CHANGE FLOPPYDISK PERF DERROR,KEYTAB IB DEBINW2,FD520,FD510,FD170 CLR,CAN,RET FD520 PERF FDLOAD B FD525 OK B FD510 ERROR FD525 PERF FDRVOL READ VOLUME LABEL B FD530 OK B FD510 ERROR FD530 IB DEBINW2,FD535,FD510,FD170 CLR,CAN,RET * ENT FD535 PERF FDWVOL WRITE VOLUME LABEL B FD540 OK B FD510 ERROR FD540 MOVE REQFD,=W'128' MOVE CWFD,W0 CALL FDIO,DSFD,X'06',BPOOL(BIN10),REQFD,CWFD WRITE BLOCKS B FD505 FD550 WAIT DSFD CLEAR FDBAB MOVE CWFD,W7 HDR SECTOR MOVE REQFD,=W'128' CALL FDIO,DSFD,X'B8',BPOOL(BIN10),REQFD,CWFD UNLOAD CLEAR FDEOF RESET EOF MOVE CWFD,W7 MOVE REQFD,=W'128' CALL FDIO,DSFD,X'A2',BPOOL(BIN10),REQFD,CWFD CLOSE MOVE BIN4,W0 DSC1 DSFD,DETACH,BIN4 PERF DETPRT * RELEAS BUFFERS PERF DEPOOL,W6,BIN10,BIN4,STRG10A B DECOOK FD560 MOVE STRG10A,HEX00 GETTIME STRG10A MOVE TIME,STRG10A EDWRT DEDSPRT,FFDERR B FD550 FD570 MOVE STRG10A,HEX00 GETTIME STRG10A MOVE TIME,STRG10A EDWRT DEDSPRT,FFDEND B FD550 PEND EJECT * * GETBUF GET TWO CONSECUTIVE BUFFERS * * BUFFER INDEX IN WORK(W13) * GETBUF PROC MOVE BIN10,W3 TOTAL NUMBER OF BUFFERS MOVE BIN4,W3 NO. OF COSECUTIVE BUFFERS PERF DEPOOL,W2,BIN10,BIN4,STRG10A GET 3 COSECUTIVE BUFFERS BNOK GETBU2 NO BUFFERS AVAIBLE MOVE WORK(W13),BIN10 SAVE BUFFER INDEX MOVE BIN9,BIN10 LOAD WORKING BUFFER INDEX ADD BIN9,W1 INDEX EDIT BUFFER MOVE BPOOL(BIN10),=X'00' RESET TRANSMIT BUFFER RET GETBU2 RET 2 PEND EJECT * * FDRVOL READ VOLUME LABEL AND DISPLAY * FDRVOL PROC MOVE REQFD,=W'128' MOVE BIN13,BIN10 GET BUFFER INDEX ADD BIN13,W2 ADJUST FOR READ BUFFER MOVE CWFD,W7 CALL FDIO,DSFD,X'91',BPOOL(BIN13),REQFD,CWFD READ (HDR1) XSTAT DSFD,BIN4 MOVE BIN7,=X'086F' CALL MASK,BIN4,BIN7 BNOK FDRV02 MOVE BIN7,=W'66' XCOPY STR6A,W0,W6,BPOOL(BIN13),BIN7 EXPIRATION DATE XCOPY STR8A,W0,W8,BPOOL(BIN13),W5 GET FILE NAME MOVE BIN7,W22 GET RECORD LENGTH XCOPY STR6B,W1,W5,BPOOL(BIN13),BIN7 MOVE RECLGD,STR6B MOVE BIN7,=W'45' XCOPY STR2A,W0,W2,BPOOL(BIN13),BIN7 GET FD NUMBER ATTFMT FCAS02 SET DEPROMPT DISPLAY 0,W1,W0 THOME MOVE DEBINW3,W1 REQUESTED LENGTH NKI .NE,DEDSDYKB,STR1A,KEYTAB,DEBINW3,DEBINW2 RET FDRV02 RET 2 PEND EJECT * * FDWVOL WRITE VOLUME LABEL * FDWVOL PROC MOVE BIN7,=W'66' MOVE BIN13,BIN10 GET BUFFER INDEX ADD BIN13,W2 ADJUST FOR READ BUFFER EDSUB BPOOL(BIN13),BIN7,FRMVOL2 DATE MOVE BIN7,W5 EDSUB BPOOL(BIN13),BIN7,FRMVOL1 VOLUME NAME MOVE BIN7,=W'45' EDSUB BPOOL(BIN13),BIN7,FRMVOL3 FD NUMBER MOVE REQFD,=W'128' REQUESTED LENGTH MOVE CWFD,W7 CALL FDIO,DSFD,X'95',BPOOL(BIN13),REQFD,CWFD WRITE (HDR1) XSTAT DSFD,BIN4 MOVE BIN7,=X'024F' CALL MASK,BIN4,BIN7 BNOK FDWVO2 ADD FDCNT,=D'1' UPDATE FD NUMBER MOVE CWFD,=W'26' HDR RECORD MOVE REQFD,=W'128' REQUESTED LENGTH CALL FDIO,DSFD,X'B1',BPOOL(BIN13),REQFD,CWFD REWIND RET FDWVO2 RET 2 PEND EJECT * * LSWRIT WRITE BLOCKS * LSWRIT PROC FC,TYPE,RETCON PERF BAWRIT,FC,TYPE,RETCON RET RET 2 RET 4 RET 6 PEND EJECT * * FDWRIT WRITE BLOCKS * FDWRIT PROC FC,TYPE,RETCON FDWR00 WAIT DSFD XSTAT DSFD,BIN4 CALL TESTB,BIN4,W2 EOE BZ FDWR10 RET 4 END OF EXTENT FDWR10 MOVE BIN7,=X'024F' CALL MASK,BIN4,BIN7 BERR FDWR20 IB BTYPE,FDWROP,FDWRHD,FDWRDATA,FDWRBAL,FDWRCL FDWROP FDWRCL B FDWR20 FDWRHD BATCH HEADER MOVE BPOOL(BIN10),=X'00' INITIATE OUTPUT BUFFER MOVE BIN4,RECLGD XCOPY BPOOL(BIN10),W0,BIN4,BPOOL(BIN9),W0 PERF FDSEND RET RET 2 FDWRBAL MOVE BPOOL(BIN10),=X'00' INITIATE OUTPUT BUFFER EDIT BPOOL(BIN9),FFD999 MOVE BIN4,RECLGD XCOPY BPOOL(BIN10),W0,BIN4,BPOOL(BIN9),W0 PERF FDSEND RET * FDWRDATA PERF BAWRIT,FC,TYPE,RETCON RET FDWR20 RET 2 RET 4 RET 6 B FDWR00 REPEAT PEND EJECT * * FDLOAD LOAD FD PROCEDURE * FDLOAD PROC MOVE CWFD,W7 HDR RECORD MOVE REQFD,=W'128' CALL FDIO,DSFD,X'B7',BPOOL(BIN10),REQFD,CWFD LOAD XSTAT DSFD,BIN4 CALL TESTB,BIN4,W5 IBM BZ FDLOA2 MOVE BIN7,=X'000F' CALL MASK,BIN4,BIN7 BNOK FDLOA2 RET FDLOA2 MOVE CWFD,W7 HDR RECORD MOVE REQFD,=W'128' CALL FDIO,DSFD,X'B8',BPOOL(BIN10),REQFD,CWFD UNLOAD RET 2 PEND EJECT * * DCRVOL DISPLAY * DCRVOL PROC ATTFMT SNDFRM SET DEPROMPT DISPLAY 0,W1,W0 THOME MOVE DEBINW3,W1 REQUESTED LENGTH NKI .NE,DEDSDYKB,STR1A,KEYTAB,DEBINW3,DEBINW2 RET DCRV02 RET 2 PEND EJECT * * BAWRIT WRITE BLOCKS * BAWRIT PROC FC,TYPE,RETCON BAWR00 * BIN16 NO OF CHARS TO SEND * BIN4 AVAILABLE SPACE IN OUTPUT BUFFER * DEBIN3 LENGTH OF HEADER * BIN15 ACTUAL LENGTH OF INPUT DATA USED CMP BIN16,W0 BE BAWRRET NODATA=NOWRITE MOVE BIN4,RECLGD SET RECORD LENGTH ADD BCDI21(W5),=D'1' ADD 1 TO RECORD NO ADD BCDI21(W4),=D'1' ADD 1 TO SEQUENCE NO CBE BCDI21(W4),=D'1',BAWR50 * NOT FIRST TIME (SEQUENCE NO > 1) * COPY HEADER PART, LENGTH IN WORK(W15) SUB BIN4,WORK(W15) MAKE ROOM FOR HEADER MOVE DEBIN3,WORK(W15) START POINT B BAWR55 BAWR50 * FIRST OUTPUT RECORD FOR THIS INPUT RECORD MOVE DEBIN3,W0 START POINT * BAWR55 CBL BIN16,BIN4,BAWR58 ROOM FOR EVERYTING? NO ROOM TBT SPLITFL,BAWR57 NORMAL SPLIT FIND PRECEDING & MOVE DEBIN1,BIN4 START AT END OF RECORD MOVE STR2A,=C'&&' LOOK FOR & BAWR56 SUB DEBIN1,W1 CBNG DEBIN1,W0,BAWR57 NO & MOVE DEBIN2,DEBIN1 MATCH BPOOL(BIN9),DEBIN2,W1,STR2A,W0,W1 BNOK BAWR56 NOT FOUND MOVE BIN15,DEBIN2 B BAWR59 *NORMAL SPLIT BAWR57 MOVE BIN15,BIN4 B BAWR59 * NO OF CHARS, FIT IN AVAILABLE ROOM BAWR58 MOVE BIN15,BIN16 SEND ALL CHARS * BAWR59 XCOPY BPOOL(BIN10),DEBIN3,BIN15,BPOOL(BIN9),W0 COPY FIRST * MOVE BLANKS INTO REMAINING PART OF OUTPUT BUFFER * BIN4 = NO OF CHARS IN OUTPUT BUFFER MOVE BIN4,BIN15 ADD BIN4,DEBIN3 ADD HEADER * MOVE DEBIN1,RECLGD SUB DEBIN1,BIN4 NO OF BLANKS XCOPY BPOOL(BIN10),BIN4,DEBIN1,BPOOL(BIN9),BIN16 MOVE BLANKS * BAWR60 * INSERT RECORD NO - BCDI21(W5) CBE WORK(W17),W0,BAWR70 SKIP IF LENGTH ZERO MOVE STRG10A,BCDI21(W5) CONVERT RECORD NO MOVE DEBIN1,W10 LENGTH FIELD SUB DEBIN1,WORK(W17) FIND START OF NO XCOPY BPOOL(BIN10),WORK(W16),WORK(W17),STRG10A,DEBIN1 * BAWR70 * INSERT SEQUENCE NO - BCDI21(W4) CBE WORK(W19),W0,BAWR80 SKIPIF LENGTH ZERO MOVE STRG10A,BCDI21(W4) CONVERT SEQUENCE NO MOVE DEBIN1,W10 LENGTH FIELD SUB DEBIN1,WORK(W19) FIELD START OF NO XCOPY BPOOL(BIN10),WORK(W18),WORK(W19),STRG10A,DEBIN1 * BAWR80 * HANDLE END OF RECORD CBG BIN16,BIN15,BAWR100 NO ROOM, CONT * INSERT EOR * CBE FC,W6,BAWR85 FD CBE FC,W1,BAWR85 DC B BAWRSEND BAWR85 MOVE STR2A,=X'7F' EOR CHAR XCOPY BPOOL(BIN10),BIN4,W1,STR2A,W1 INSERT EOR ADD BIN4,W1 * FLOPPY DISK B BAWRSEND * BAWR100 * IB FC, C DCWR105, SEND BATCH C BAWR105, DUMMY C BAWR105, DUMMY C BAWR105, DUMMY C BAWR105, DUMMY C FDWR105, FLOPPY CONVERSION C BAWR105, DUMMY C BAWR105, DUMMY C LSWR105 LISTING B BAWR105 DCWR105 PERF DCSEND,FC,TYPE,RETCON B BAWR105 * FDWR105 * CHECK IF CONTINUATION CHAR NEEDED TBF BCONT,FDWR150 * CONTINUATION MOVE DEBIN1,RECLGD CBNE BIN4,DEBIN1,FDWR140 SUB BIN4,W1 SUB BIN15,W1 FDWR140 MOVE STR2A,=X'21' CONTINUATION MARK XCOPY BPOOL(BIN10),BIN4,W1,STR2A,W1 FDWR150 PERF FDSEND B BAWR105 * LSWR105 PERF LSSEND B BAWR105 * BAWR105 MOVE CWFD,W0 DELETE BPOOL(BIN9),CWFD,BIN15 DELETE WHAT IS SEND SUB BIN16,BIN15 MOVE BIN13,BIN16 CMP VSEIND,W1 BE BAWR110 WRITE RESET OF BUFFER RET 6 * BAWR110 REPEAT IB FC, C BAWR111, SEND BATCH C BAWR111, DUMMY C BAWR111, DUMMY C BAWR111, DUMMY C BAWR111, DUMMY C BAWR112, FD C BAWR111, DUMMY C BAWR111, DUMMY C BAWR111 LISTE * BAWR111 REPEAT INSIDE B BAWR00 * BAWR112 REPEAT OUTSIDE RET 8 * * * BAWRSEND * IB FC, C DCWR205, SEND BATCH C BAWR205, DUMMY C BAWR205, DUMMY C BAWR205, DUMMY C BAWR205, DUMMY C FDWR205, FLOPPY CONVERSION C BAWR205, DUMMY C BAWR205, DUMMY C LSWR205 LISTING B BAWR205 DCWR205 PERF DCSEND,FC,TYPE,RETCON B BAWR205 B BAWRERR * FDWR205 PERF FDSEND B BAWR205 B BAWRERR * LSWR205 PERF LSSEND B BAWR205 B BAWRERR * BAWR205 BAWRRET RET BAWRERR RET 2 PEND EJECT LSSEND PROC INSRT BPOOL(BIN10),W0,W2,INSERT,W0 MOVE DEBIN1,RECLGD ADD DEBIN1,W2 WRITE DEDSPRT,BPOOL(BIN10),DEBIN1 DLETE BPOOL(BIN10),W0,W2 RET PEND EJECT FDSEND PROC MOVE REQFD,=W'128' MOVE CWFD,W0 CALL FDIO,DSFD,X'06',BPOOL(BIN10),REQFD,CWFD RET PEND EJECT * * DCWRIT WRITE BLOCKS * DCWRIT PROC FC,TYPE,RETCON * DCWR00 CBNE TYPE,W4,DCWR010 MOVE BIN4,W0 EDSUB BPOOL(BIN10),BIN4,FDC999 PERF DCSEND,FC,TYPE,RETCON RET RET 2 DCWR010 MOVE BIN4,=W'600' DSC1 .NW,DSDCFD,STIMO,BIN4 * PERF BAWRIT,FC,TYPE,RETCON RET DCWRERR RET 2 RET 4 RET 6 B DCWR00 REPEAT PEND EJECT * * CONVERSI0N OF DATA ENTRY RECORDS TO BPOOL BUFFER * RET =RECORD CONVERTED * RET 2 =TRANSMIT * RET 4 =CUMPULSORY FIELD EMPTHY * RET 6 =BCD-FIELD OVERFLOW * RET 8 =EDIT BUFFER OVERFLOW * * APPL = FIELD INTO BUFFER * APPL = 1 FIELD INTO BUFFER, TRANSMIT BLOCK * APPL = 2 NO TRANSMIT FIELD * APPL = 3 SUPPRESS LEADING ZEROES (IF HEADER:SETR GENEREL) * APPL = 4 LENGTH OF FIELD=MAXL (IF HEADER: SET GENERAL) * LISTE: ALWAYS SET * FOLLOWING APPL ONLY USED IN BATCHHEADER * APPL = 13 EOR-CHAR AS END OF EACH RECORD * LISTE: ALWAYS CLEAR * APPL = 14 CONT-CHAR IN END OF EACH DATA RECORD WHICH IS CONTINUED * LISTE: ALWAYS CLEAR * APPL = 15 INSERT BACHNAME IN THIS FIELD * APPL = 16 FIELDS (STARTING WITH &) ARE NOT SPLIT * LSTE: ALWAYS CLEAR * * APPL = 1XXX XXX=LENGTH OF RECORD HEADER * APPL = 2XXX THIS FIELD IS THE RECORD NUMBER FIELD * APPL = 3XXX THIS FIELD IS THE CONTINUATION SEQUENCE NUMBER FIELD * * BIN4 = WORK ITEM * BIN7 = MAX LENGTH * BIN8 = FIELD NUMBER * BIN9 = INDEX TO EDIT BUFFER * BIN13= DELETE START POINTER * BIN16= EDIT POINTER * * BIN15 = NO OF CHAR INSERTED IN OUTPUT RECORD * STRG10A = WORK STRING FOR DATE/TIME/CONVERTED BCD * WORK(W15) = LENGTH OF HEADER * WORK(W16) = RECORD NUMBER POSITION * WORK(W17) = RECORD NUMBER LENGTH * WORK(W18) = CONTINUATION SEQUENCE POSITION * WORD(W19) = CONTINUATION SEQUENCE LENGTH * BCDI21(W4) = CONTINUATION SEQUENCE NUMBER * BCDI21(W5) = RECORD NUMBER * CONV PROC CONT,FC CBG CONT,W0,CON100 CON090 MOVE BPOOL(BIN9),=X'20' MOVE BCDI21(W4),=D'0' RESET SEQUENCE NO MOVE BIN13,W0 RESET DELETE POINTER MOVE BIN16,BIN13 LOAD EDIT POINTER CON100 CLEAR FSUPR TBF BSUPR,CON105 SET FSUPR CON105 ADD BIN8,W1 UPDATE FIELD NUMBER CALL GETFWD,BIN7,2,BIN8,BIN4 CALL ADJUST,BIN7 BOK CON130 BN CONRET ALL FIELD DONE B CONER1 COMPULSORY FIELD EMPTHY CON130 GETCTL 0,VSEIND GET APPL * CBL VSEIND,=W'1000',CON131 NORMAL APPL VALUE CBL VSEIND,=W'2000',APL1000 HANDLE RECORD HEADER CBL VSEIND,=W'3000',APL2000 HANDLE RECORD NO CBL VSEIND,=W'4000',APL3000 HANDLE SEQUENCE NO MOVE VSEIND,W2 CLEAR ERROR APPL B CON131 * * HANDLE RECORD HEADER: * APPL=1000, WHERE XXX=LENGTH OF RECORD HEADER APL1000 SUB VSEIND,=W'1000' MOVE WORK(W15),VSEIND WORK(W15) = LENGTH OF HEADER SET FIRSTFL FIRST TIME B CON100 * * HANDLE POSITION AND LENGTH OF RECORD NO APL2000 MOVE WORK(W16),BIN16 SET START POS OF RECORD NO GETCTL 1,BIN7 GET MAXL OF FIELD MOVE WORK(W17),BIN7 SET LENGTH OF RECORD NO SUB VSEIND,=W'2000' ADJUST APPL VALUE B CON131 FURTHER HANDLING * * HANDLE POSITION AND LENGTH OF SEQUENCE NO APL3000 MOVE WORK(W18),BIN16 SET START POSITION OF SEQUENCE NO GETCTL 1,BIN7 GET MAXL OF FIELD MOVE WORK(W19),BIN7 SET LENGTH OF SEQUENCE NO SUB VSEIND,=W'3000' ADJUST APPL VALUE B CON131 FURTHER HANDLING * * CON131 * CBNE BTYPE,W3,CON150 * DATA RECORD IB VSEIND,CON132,CON100,CON135,CON140 CON132 B CON190 * CON135 * SUPPRESS LEADING ZEROES SET FSUPR B CON190 * CON140 * NO SUPPRESSION CLEAR FSUPR B CON190 * * CON150 * IN HEADER, SET GENERAL CONDITIONS IB VSEIND,CON152,CON100,CON155,CON160,CON152, C CON152,CON152,CON152,CON152,CON152, C CON152,CON152,CON165,CON170,CON175,CON180 CON152 B CON190 * CON155 * GENERAL SUPPRESS LEADING ZEROES SET BSUPR B CON100 * CON160 * GENERAL NO SUPPRESSION CBE W9,FC,CON100 LISTE: ALWAYS SET CLEAR BSUPR B CON100 * CON165 * EOR CHARACTER B CON100 * CON170 * CONTINUATION CHARACTER CBE W9,FC,CON100 LISTE: ALWAYS CLEAR SET BCONT INDICATE CONT. CHAR NEEDED B CON100 * CON175 * INSERT BATCH NAME MOVE BIN7,W6 MOVE BIN4,W188 SUB BIN4,BIN7 LENGTH FIELD SUB BIN4,BIN16 EDSUB BPOOL(BIN9),BIN16,FMTBATCH INSERT BATCHNAME B CON260 * CON180 * FIELDS (STARTING WITH &) ARE NOT SPLIT CLEAR SPLITFL NOT NORMAL SPLIT B CON100 * * CON190 CBE W9,FC,CON195 LISTE: ALL FIELDS INCLUDED TBF FSUPR,CON195 CALL EMPTYT,:FMTITEM TEST IF EMPTY BNZ CON280 EMPTY, IGNORE FIELD CON195 GETCTL 1,BIN7 GET MAXL TSTCTL 0 TEST - ALPHA BZ CON200 BCD * ALPHA MOVE BIN4,W188 GET EDIT BUFFER LENGTH SUB BIN4,BIN7 ADJUST WITH MAX LENGTH SUB BIN4,BIN16 ADJUST WITH EDIT POINTER BN CONER3 EDSUB BPOOL(BIN9),BIN16,FRMALP B CON260 EJECT * BCD CON200 CBG BIN7,W21,CONER2 BCD-OVERFLOW MOVE BIN4,W188 GET EDIT BUFFER LENGTH SUB BIN4,BIN7 ADJUST WITH MAX LENGTH SUB BIN4,BIN16 ADJUST WITH EDIT POINTER BN CONER3 GETCTL 3,BIN4 GET SCHK CALL TESTB,BIN4,W15 SIGN BZ CON220 NO TBF FSUPR,CON210 CBE W9,FC,CON205 EDSUB BPOOL(BIN9),BIN16,FRMTCS MOVE BIN13,BIN16 B CON280 CON205 IF LISTE EDSUB BPOOL(BIN9),BIN16,FRMZCS EDIT 21 DIGITS B CON215 CON210 EDSUB BPOOL(BIN9),BIN16,FRMBCS EDIT 21 DIGITS CON215 MOVE BIN4,W22 SET PICTURE LENGTH ADD BIN7,W1 ADJUST POINTER FOR SIGN B CON250 CON220 TBF FSUPR,CON230 CBE W9,FC,CON225 EDSUB BPOOL(BIN9),BIN16,FRMTCD MOVE BIN13,BIN16 B CON280 CON225 IF LISTE EDSUB BPOOL(BIN9),BIN16,FRMZCD B CON235 CON230 EDSUB BPOOL(BIN9),BIN16,FRMBCD CON235 MOVE BIN4,W21 SET PICUTR LENGTH CON250 SUB BIN4,BIN7 SET DELETE LENGTH DELETE BPOOL(BIN9),BIN13,BIN4 DELETE ADDED ZEROES CON260 ADD BIN13,BIN7 ADJUST DELETE/EDIT POINTER MOVE BIN16,BIN13 LOAD EDIT POINTER CON280 CBNE W9,FC,CON290 EDSUB BPOOL(BIN9),BIN16,FRMFILL LISTE: INSERT FILLER TBF FIRSTFL,CON285 NOT FIRST HEADER CBNE BTYPE,W3,CON285 NOT NORMAL TRANS CBL BIN16,WORK(W15),CON283 CLEAR FIRSTFL OUT OF FIRST HEADER CON283 IN FIRST HEADER ADD WORK(W15),W1 CON285 MOVE BIN13,BIN16 CON290 CBE VSEIND,W1,CONTRM APPL =1 TRANSM MOVE BIN4,RECLGD CBG BIN16,BIN4,CONTRM B CON100 EJECT CONRET RET ALL DONE CONTRM RET 2 WRITE/TRANSMIT BLOCK CONER1 RET 4 CUMPULSORY FIELD EMPTHY CONER2 RET 6 BCD FIELD OVERFLOW CONER3 RET 8 EDIT BUFFER OVERFLOW PEND EJECT * * FORMATS * FRMFILL FRMT FILLR ' ',1 FMEND FCOUNT FRMT FTEXT ' 1' FEOR NEW PAGE FILLR ' ',2 FILLR '*',10 FTEXT 'NUMMER: ' FMEL '9999',NUMBER FEOR FILLR ' ',2 FEOR FMEND FRMVOL1 FRMT FCOPY STR8A FMEND FRMVOL2 FRMT FMEL '999999',DATE FMEND FRMVOL3 FRMT FMEL '99',FDCNT FMEND FBATC3 FRMT FLINK FBATCH FTEXT 'EJ GODKENDT' FEOR FMEND FBATCH FRMT FNL FEOR FNL FTEXT 'JOBNAME: ' FCOPY JOBNAME FILLR ' ',4 FTEXT 'BATCHNAME: ' FCOPY BATCH FILLR ' ',4 FMEND FMTBATCH FRMT FCOPY BATCH FMEND FFDHDR FRMT FNL FEOR FNL FCOPY ='FLOPPY DISC SKRIVNING' FLINK HDR FMEND FFDEND FRMT FNL FEOR FNL FCOPY ='FLOPPY DISC SKRIVNING' FCOPY =' KLAR' FLINK HDR FEOR FNL FMEND FFDERR FRMT FNL FEOR FNL FCOPY ='FLOPPY DISC SKRIVNING' FCOPY =' AFBRYDES' FLINK HDR FEOR FNL FMEND FLSHDR FRMT FNL FEOR FNL FCOPY ='LISTNING' FLINK HDR FMEND FLSEND FRMT FNL FEOR FNL FCOPY ='LISTNING' FCOPY =' KLAR' FLINK HDR FEOR FNL FMEND FLSERR FRMT FNL FEOR FNL FCOPY ='LISTNING' FCOPY =' AFBRYDES' FLINK HDR FEOR FNL FMEND HDR FRMT FILLR ' ',4 FTEXT 'DATO: ' FMEL '99-99-99',DATE FILLR ' ',4 FTEXT 'TID: ' FMEL '99-99-99',TIME FEOR FNL FTEXT 'IND: ' FMEL '99999',NUMBER FTEXT ' UD: ' FMEL '99999',BCDI21(W5) FEOR FNL FMEND FCAS02 FRMT FSL FCOPY =C'DEVICE' FILLR ':',1 FINP 9 FCOPY STSAVE(W3) FTAB 20 FCOPY =C'FILE' FILLR '-',1 FCOPY =C'NAME' FILLR ':',1 FINP 32 FCOPY STR8B FNL FCOPY =C'EXPIRATION DATE:' FINP 32 FCOPY STR6A FNL FCOPY =C'OLD DATA SET IDENTIFIER:' FINP 32 FCOPY STR8A FNL FCOPY =C'OLD VOLUME SEQUENCE NO:' FINP 32 FCOPY STR2A FNL FKI 1 FCOPY HEX00 FMEND FFD999 FRMT FTEXT =C'SLUTD' FMEL '99999',BCDI21(W5) FILLR ' ',60 FILLR ' ',62 FMEND FRMALP FRMT FCOPY :FMTITEM FMEND FRMTCD FRMT FMEL 'TTTTTTTTTTTTTTTTTTTT9',:FMTITEM FMEND FRMTCS FRMT FMEL 'TTTTTTTTTTTTTTTTTTTT9-',:FMTITEM FMEND FRMZCD FRMT FMEL 'ZZZZZZZZZZZZZZZZZZZZ9',:FMTITEM FMEND FRMZCS FRMT FMEL 'ZZZZZZZZZZZZZZZZZZZZ9-',:FMTITEM FMEND FRMBCD FRMT FMEL '999999999999999999999',:FMTITEM FMEND FRMBCS FRMT FMEL '999999999999999999999-',:FMTITEM FMEND SNDFRM FRMT FSL FCOPY =C'DATATRANSMISSION' FILLR '?',1 FNL FNL FMEND * SNDFRM2 FRMT FILLR ' ',2 FCOPY =X'272020' FMEND * FDC999 FRMT FTEXT =C'SLUTD' FMEL '99999',BCDI21(W5) FMEND * FDCHDR FRMT FNL FEOR FNL FCOPY =C'BATCH TRANSMISSION' FLINK HDR FMEND * FDCEND FRMT FNL FEOR FNL FCOPY ='BATCH TRANSMISSION' FCOPY =C' KLAR' FLINK HDR FMEND * FDCERR FRMT FNL FEOR FNL FCOPY ='BATCH TRANSMISSION' FCOPY =' AFBRYDES' FLINK HDR FEOR FNL FMEND * * END
0x0000…0026 (0, 0, 398) Head {h00=0x0022, h01=0x0050, text=» IDENT NYCONV NJ-AMT 830225/EV«, t00=0x0000, t01=0x0004}
0x0026…0044 Head {h00=0x001a, h01=0x0050, text=» BATCH TRANSMISSION «, t00=0x0000, t01=0x002a}
0x0044…005a Head {h00=0x0012, h01=0x0050, text=» 82-11-10/EV«, t00=0x0000, t01=0x0048}
0x005a…006e Head {h00=0x0010, h01=0x0050, text=» 820506/NJ«, t00=0x0000, t01=0x005e}
0x006e…0088 Head {h00=0x0016, h01=0x0050, text=» UPD 82-02-22/EV«, t00=0x0000, t01=0x0072}
0x0088…00a2 Head {h00=0x0016, h01=0x0050, text=» UPD 81-08-27/EV«, t00=0x0000, t01=0x008c}
0x00a2…00be Head {h00=0x0018, h01=0x0050, text=» UPD 80-12-12/SHB «, t00=0x0000, t01=0x00a6}
0x00be…00da Head {h00=0x0018, h01=0x0050, text=» UPD 80-07-14/JAER«, t00=0x0000, t01=0x00c2}
0x00da…00ee Head {h00=0x0010, h01=0x0050, text=» DDUM DEDDIV«, t00=0x0000, t01=0x00de}
0x00ee…00fc Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x0000, t01=0x00f2}
0x00fc…0112 Head {h00=0x0012, h01=0x0050, text=» ENTRY DECONV «, t00=0x0000, t01=0x0100}
0x0112…011a Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0116}
0x011a…0122 Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x011e}
0x0122…0136 Head {h00=0x0010, h01=0x0050, text=» EXT DEPOOL «, t00=0x0000, t01=0x0126}
0x0136…0148 Head {h00=0x000e, h01=0x0050, text=» EXT TESTB«, t00=0x0000, t01=0x013a}
0x0148…015c Head {h00=0x0010, h01=0x0050, text=» EXT EMPTYT «, t00=0x0000, t01=0x014c}
0x015c…0170 Head {h00=0x0010, h01=0x0050, text=» EXT DERROR «, t00=0x0000, t01=0x0160}
0x0170…0192 Head {h00=0x001e, h01=0x0050, text=» EXT ATTDEV ATTACH DEVICE «, t00=0x0000, t01=0x0174}
0x0192…01a6 Head {h00=0x0010, h01=0x0050, text=» EXT ATTPRT «, t00=0x0001, t01=0x0008}
0x01a6…01ba Head {h00=0x0010, h01=0x0050, text=» EXT DETPRT «, t00=0x0001, t01=0x001c}
0x01ba…01cc Head {h00=0x000e, h01=0x0050, text=» EXT MASK «, t00=0x0001, t01=0x0030}
0x01cc…01e0 Head {h00=0x0010, h01=0x0050, text=» EXT GETFWD «, t00=0x0001, t01=0x0042}
0x01e0…01f4 Head {h00=0x0010, h01=0x0050, text=» EXT ADJUST «, t00=0x0001, t01=0x0056}
0x01f4…0206 Head {h00=0x000e, h01=0x0050, text=» EXT FDIO «, t00=0x0001, t01=0x006a}
0x0206…0210 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x007c}
0x0210…0224 Head {h00=0x0010, h01=0x0050, text=» EXT DCSGON «, t00=0x0001, t01=0x0086}
0x0224…0238 Head {h00=0x0010, h01=0x0050, text=» EXT DCSGOF «, t00=0x0001, t01=0x009a}
0x0238…024c Head {h00=0x0010, h01=0x0050, text=» EXT DCSEND «, t00=0x0001, t01=0x00ae}
0x024c…0256 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00c2}
0x0256…0264 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x00cc}
0x0264…026e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00da}
0x026e…0286 Head {h00=0x0014, h01=0x0050, text=»* KEYTABLE«, t00=0x0001, t01=0x00e4}
0x0286…0290 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00fc}
0x0290…02ac Head {h00=0x0018, h01=0x0050, text=»CLR EQU X'8F' CLEAR «, t00=0x0001, t01=0x0106}
0x02ac…02c8 Head {h00=0x0018, h01=0x0050, text=»CAN EQU X'91' CANCEL«, t00=0x0001, t01=0x0122}
0x02c8…02e4 Head {h00=0x0018, h01=0x0050, text=»RET EQU X'98' RETURN«, t00=0x0001, t01=0x013e}
0x02e4…0300 Head {h00=0x0018, h01=0x0050, text=»ENT EQU X'8C' ENTER «, t00=0x0001, t01=0x015a}
0x0300…030a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0176}
0x030a…032e Head {h00=0x0020, h01=0x0050, text=»KEYTAB KTAB CLR,CAN,RET,ENT «, t00=0x0001, t01=0x0180}
0x032e…0336 Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x0014}
0x0336…033e Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x001c}
0x033e…0346 Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x0024}
0x0346…0350 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x002c}
0x0350…035a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0036}
0x035a…0362 Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x0040}
0x0362…037a Head {h00=0x0014, h01=0x0050, text=»STIMO EQU X'0B' «, t00=0x0002, t01=0x0048}
0x037a…0392 Head {h00=0x0014, h01=0x0050, text=»ATTACH EQU X'0E'«, t00=0x0002, t01=0x0060}
0x0392…03aa Head {h00=0x0014, h01=0x0050, text=»DETACH EQU X'0F'«, t00=0x0002, t01=0x0078}
0x03aa…03c2 Head {h00=0x0014, h01=0x0050, text=»TRPAR EQU X'00' «, t00=0x0002, t01=0x0090}
0x03c2…03d0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x00a8}
0x03d0…0414 Head {h00=0x0040, h01=0x0050, text=»* THIS MODULE TAKE CARES OF THE DIFFERENT CONVERTIONS-«, t00=0x0002, t01=0x00b6}
0x0414…042e Head {h00=0x0016, h01=0x0050, text=»* -METHODS «, t00=0x0002, t01=0x00fa}
0x042e…0472 Head {h00=0x0040, h01=0x0050, text=»* ONE OF THEM IS ALREADY PREPAIRED FOR YOUR PRINTOUT).«, t00=0x0002, t01=0x0114}
0x0472…04a8 Head {h00=0x0032, h01=0x0050, text=»* THE OTHER YOU HAVE TO CODE YOURSELVES.«, t00=0x0002, t01=0x0158}
0x04a8…04f0 Head {h00=0x0044, h01=0x0050, text=»* FORMAL PARAMETERS: FC = FUNCTION-CODE (DEVICE-CLASS)«, t00=0x0002, t01=0x018e}
0x04f0…0534 Head {h00=0x0040, h01=0x0050, text=»* = 1 DATACOMMUNICATION OUT «, t00=0x0003, t01=0x0046}
0x0534…0576 Head {h00=0x003e, h01=0x0050, text=»* = 2 DATACOMMUNICATION IN«, t00=0x0003, t01=0x008a}
0x0576…05b2 Head {h00=0x0038, h01=0x0050, text=»* = 3 CASETTE OUTPUT«, t00=0x0003, t01=0x00cc}
0x05b2…05ee Head {h00=0x0038, h01=0x0050, text=»* = 4 PRINTOUT LP/GP«, t00=0x0003, t01=0x0108}
0x05ee…0624 Head {h00=0x0032, h01=0x0050, text=»* = 5 DISCFILE«, t00=0x0003, t01=0x0144}
0x0624…0662 Head {h00=0x003a, h01=0x0050, text=»* = 6 FLOPPYDISC FILE «, t00=0x0003, t01=0x017a}
0x0662…06aa Head {h00=0x0044, h01=0x0050, text=»* = 7 DELETE BATCHES ON USERFILE«, t00=0x0004, t01=0x0028}
0x06aa…06f4 Head {h00=0x0046, h01=0x0050, text=»* = 8 FREEZE BATCHES ON USER FILE «, t00=0x0004, t01=0x0070}
0x06f4…0730 Head {h00=0x0038, h01=0x0050, text=»* = 9 LISTING LP/GP «, t00=0x0004, t01=0x00ba}
0x0730…076c Head {h00=0x0038, h01=0x0050, text=»* TYPE = TYPE OF HANDLING«, t00=0x0004, t01=0x00f6}
0x076c…079e Head {h00=0x002e, h01=0x0050, text=»* = 1 OPEN«, t00=0x0004, t01=0x0132}
0x079e…07dc Head {h00=0x003a, h01=0x0050, text=»* = 2 BATCHHEAD-RECORD«, t00=0x0004, t01=0x0164}
0x07dc…0816 Head {h00=0x0036, h01=0x0050, text=»* = 3 DATA RECORD «, t00=0x0005, t01=0x0012}
0x0816…0852 Head {h00=0x0038, h01=0x0050, text=»* = 4 BALANCE RECORD«, t00=0x0005, t01=0x004c}
0x0852…0886 Head {h00=0x0030, h01=0x0050, text=»* = 5 CLOSE «, t00=0x0005, t01=0x0088}
0x0886…08be Head {h00=0x0034, h01=0x0050, text=»* RETCON = RETURN-CODE «, t00=0x0005, t01=0x00bc}
0x08be…08ee Head {h00=0x002c, h01=0x0050, text=»* = 0 OK«, t00=0x0005, t01=0x00f4}
0x08ee…0930 Head {h00=0x003e, h01=0x0050, text=»* /= 0 ERROR MESSAGE-NUMBER«, t00=0x0005, t01=0x0124}
0x0930…097a Head {h00=0x0046, h01=0x0050, text=»* =-1 SKIP CURR BATCH, GO TO NEXT «, t00=0x0005, t01=0x0166}
0x097a…09b8 Head {h00=0x003a, h01=0x0050, text=»* =-2 SKIP TO BALANCE «, t00=0x0006, t01=0x0020}
0x09b8…0a04 Head {h00=0x0048, h01=0x0050, text=»* =-3 RESTART CURRENT BATCH (CANCEL)«, t00=0x0006, t01=0x005e}
0x0a04…0a4c Head {h00=0x0044, h01=0x0050, text=»* =-4 ABORT CONVERSION (RETURN) «, t00=0x0006, t01=0x00aa}
0x0a4c…0a8c Head {h00=0x003c, h01=0x0050, text=»* =-5 DELETE THIS BATCH «, t00=0x0006, t01=0x00f2}
0x0a8c…0ace Head {h00=0x003e, h01=0x0050, text=»* =-6 GET CURRENT RECORD «, t00=0x0006, t01=0x0132}
0x0ace…0b0c Head {h00=0x003a, h01=0x0050, text=»* INPUT VARIABLE: BIN4 = FC-CODE FOR DEVICE«, t00=0x0006, t01=0x0174}
0x0b0c…0b1a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x0022}
0x0b1a…0b3c Head {h00=0x001e, h01=0x0050, text=»DECONV PROC FC,TYPE,RETCON«, t00=0x0007, t01=0x0030}
0x0b3c…0b76 Head {h00=0x0036, h01=0x0050, text=» IB FC,TRANSM,RECEIV,CASSET JUMP ON DEVICE-CLASS C«, t00=0x0007, t01=0x0052}
0x0b76…0ba8 Head {h00=0x002e, h01=0x0050, text=» PRINTA,DISCFD,FLOPPY,DELETE,FREEZE,LISTE«, t00=0x0007, t01=0x008c}
0x0ba8…0bb6 Head {h00=0x000a, h01=0x0050, text=»RECEIV«, t00=0x0007, t01=0x00be}
0x0bb6…0bc4 Head {h00=0x000a, h01=0x0050, text=»DISCFD«, t00=0x0007, t01=0x00cc}
0x0bc4…0bd2 Head {h00=0x000a, h01=0x0050, text=»CASSET«, t00=0x0007, t01=0x00da}
0x0bd2…0be0 Head {h00=0x000a, h01=0x0050, text=»ERROR «, t00=0x0007, t01=0x00e8}
0x0be0…0c0e Head {h00=0x002a, h01=0x0050, text=» MOVE RETCON,W4 'FUNCTION NOT ALLOWED?«, t00=0x0007, t01=0x00f6}
0x0c0e…0c20 Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0007, t01=0x0124}
0x0c20…0c2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0136}
0x0c2a…0c58 Head {h00=0x002a, h01=0x0050, text=»* THIS IS THE PRINTOUT FUNCTION«, t00=0x0007, t01=0x0140}
0x0c58…0c62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x016e}
0x0c62…0c70 Head {h00=0x000a, h01=0x0050, text=»PRINTA«, t00=0x0007, t01=0x0178}
0x0c70…0cae Head {h00=0x003a, h01=0x0050, text=» IB TYPE,PR100,PR200,PR200 JUMP ON TYPE 0F HANDLING C «, t00=0x0007, t01=0x0186}
0x0cae…0cc4 Head {h00=0x0012, h01=0x0050, text=» PR200,PR500 «, t00=0x0008, t01=0x0034}
0x0cc4…0cd4 Head {h00=0x000c, h01=0x0050, text=» B ERROR«, t00=0x0008, t01=0x004a}
0x0cd4…0cde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x005a}
0x0cde…0d0c Head {h00=0x002a, h01=0x0050, text=»* OPEN DEVICE = ATTACH PRINTER «, t00=0x0008, t01=0x0064}
0x0d0c…0d16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0092}
0x0d16…0d24 Head {h00=0x000a, h01=0x0050, text=»PR100 «, t00=0x0008, t01=0x009c}
0x0d24…0d4c Head {h00=0x0024, h01=0x0050, text=» PERF ATTDEV,BIN6 ATTACH DEVICE «, t00=0x0008, t01=0x00aa}
0x0d4c…0d60 Head {h00=0x0010, h01=0x0050, text=» BOK DECOOK «, t00=0x0008, t01=0x00d2}
0x0d60…0d72 Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0008, t01=0x00e6}
0x0d72…0d80 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x00f8}
0x0d80…0d8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0106}
0x0d8a…0d94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0110}
0x0d94…0dcc Head {h00=0x0034, h01=0x0050, text=»* PRINTOUT OF THE DIFFERENT RECORD TYPES «, t00=0x0008, t01=0x011a}
0x0dcc…0dd6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0152}
0x0dd6…0de4 Head {h00=0x000a, h01=0x0050, text=»PR200 «, t00=0x0008, t01=0x015c}
0x0de4…0e02 Head {h00=0x001a, h01=0x0050, text=» EDWRT DEDSPRT,FCOUNT «, t00=0x0008, t01=0x016a}
0x0e02…0e16 Head {h00=0x0010, h01=0x0050, text=» BNOK PR298 «, t00=0x0008, t01=0x0188}
0x0e16…0e2e Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW3,W1«, t00=0x0009, t01=0x000c}
0x0e2e…0e50 Head {h00=0x001e, h01=0x0050, text=» PRINT DEDSPRT,DEBINW3,W0 «, t00=0x0009, t01=0x0024}
0x0e50…0e64 Head {h00=0x0010, h01=0x0050, text=» BNOK PR298 «, t00=0x0009, t01=0x0046}
0x0e64…0e76 Head {h00=0x000e, h01=0x0050, text=» B DECOOK «, t00=0x0009, t01=0x005a}
0x0e76…0e84 Head {h00=0x000a, h01=0x0050, text=»PR298 «, t00=0x0009, t01=0x006c}
0x0e84…0eba Head {h00=0x0032, h01=0x0050, text=» MOVE RETCON,=W'35' OUTPUT DEVICE NOT OP....' «, t00=0x0009, t01=0x007a}
0x0eba…0ed8 Head {h00=0x001a, h01=0x0050, text=» B RETURN GO AND CLOSE«, t00=0x0009, t01=0x00b0}
0x0ed8…0ee2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00ce}
0x0ee2…0f10 Head {h00=0x002a, h01=0x0050, text=»* CLOSE DEVICE = DETACH PRINTER «, t00=0x0009, t01=0x00d8}
0x0f10…0f1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0106}
0x0f1a…0f28 Head {h00=0x000a, h01=0x0050, text=»PR500 «, t00=0x0009, t01=0x0110}
0x0f28…0f4a Head {h00=0x001e, h01=0x0050, text=» PERF DETPRT DETACH DEVICE«, t00=0x0009, t01=0x011e}
0x0f4a…0f5c Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0009, t01=0x0140}
0x0f5c…0f6a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x0152}
0x0f6a…0f74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0160}
0x0f74…0fb0 Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE DELETE BATCHES ON THE USERFILE «, t00=0x0009, t01=0x016a}
0x0fb0…0fba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0016}
0x0fba…0fc8 Head {h00=0x000a, h01=0x0050, text=»DELETE«, t00=0x000a, t01=0x0020}
0x0fc8…0fe6 Head {h00=0x001a, h01=0x0050, text=» IB TYPE,DECOOK,DEL100«, t00=0x000a, t01=0x002e}
0x0fe6…0ff8 Head {h00=0x000e, h01=0x0050, text=» B DECOOK «, t00=0x000a, t01=0x004c}
0x0ff8…1006 Head {h00=0x000a, h01=0x0050, text=»DEL100«, t00=0x000a, t01=0x005e}
0x1006…1022 Head {h00=0x0018, h01=0x0050, text=» MOVE RETCON,=W'-5' «, t00=0x000a, t01=0x006c}
0x1022…1056 Head {h00=0x0030, h01=0x0050, text=» CBNE WORK(W8),W0,DEL110 NOT THE WHOLE FILE «, t00=0x000a, t01=0x0088}
0x1056…107a Head {h00=0x0020, h01=0x0050, text=» MOVE DATE,HEX00 RESET DATE «, t00=0x000a, t01=0x00bc}
0x107a…1088 Head {h00=0x000a, h01=0x0050, text=»DEL110«, t00=0x000a, t01=0x00e0}
0x1088…109a Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x000a, t01=0x00ee}
0x109a…10a8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x0100}
0x10a8…10b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x010e}
0x10b2…10e4 Head {h00=0x002e, h01=0x0050, text=»* THIS ROUTINE FREEZE BATCHES ON USER FILE«, t00=0x000a, t01=0x0118}
0x10e4…10ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x014a}
0x10ee…10f6 Head {h00=0x0004, h01=0x0050, t00=0x000a, t01=0x0154}
0x10f6…1104 Head {h00=0x000a, h01=0x0050, text=»FREEZE«, t00=0x000a, t01=0x015c}
0x1104…1140 Head {h00=0x0038, h01=0x0050, text=» IB TYPE,FRE100,FRE200,FRE300 OPEN BATCHHEAD DATA C «, t00=0x000a, t01=0x016a}
0x1140…1166 Head {h00=0x0022, h01=0x0050, text=» FRE400,FRE500 BALANCE CLOSE «, t00=0x000b, t01=0x0016}
0x1166…116e Head {h00=0x0004, h01=0x0050, t00=0x000b, t01=0x003c}
0x116e…117c Head {h00=0x000a, h01=0x0050, text=»* OPEN«, t00=0x000b, t01=0x0044}
0x117c…1184 Head {h00=0x0004, h01=0x0050, t00=0x000b, t01=0x0052}
0x1184…1192 Head {h00=0x000a, h01=0x0050, text=»FRE100«, t00=0x000b, t01=0x005a}
0x1192…11a4 Head {h00=0x000e, h01=0x0050, text=» B DECOOK «, t00=0x000b, t01=0x0068}
0x11a4…11b2 Head {h00=0x000a, h01=0x0050, text=»FRE200«, t00=0x000b, t01=0x007a}
0x11b2…11c4 Head {h00=0x000e, h01=0x0050, text=» B DECOOK «, t00=0x000b, t01=0x0088}
0x11c4…11d2 Head {h00=0x000a, h01=0x0050, text=»FRE300«, t00=0x000b, t01=0x009a}
0x11d2…11e4 Head {h00=0x000e, h01=0x0050, text=» B DECOOK «, t00=0x000b, t01=0x00a8}
0x11e4…11fc Head {h00=0x0014, h01=0x0050, text=»* BALANCE RECORD«, t00=0x000b, t01=0x00ba}
0x11fc…120a Head {h00=0x000a, h01=0x0050, text=»FRE400«, t00=0x000b, t01=0x00d2}
0x120a…121c Head {h00=0x000e, h01=0x0050, text=» B DECOOK «, t00=0x000b, t01=0x00e0}
0x121c…122c Head {h00=0x000c, h01=0x0050, text=»* CLOSE «, t00=0x000b, t01=0x00f2}
0x122c…123a Head {h00=0x000a, h01=0x0050, text=»FRE500«, t00=0x000b, t01=0x0102}
0x123a…124c Head {h00=0x000e, h01=0x0050, text=» B DECOOK «, t00=0x000b, t01=0x0110}
0x124c…125a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x0122}
0x125a…1264 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0130}
0x1264…1276 Head {h00=0x000e, h01=0x0050, text=»* OK«, t00=0x000b, t01=0x013a}
0x1276…1280 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x014c}
0x1280…128e Head {h00=0x000a, h01=0x0050, text=»DECOOK«, t00=0x000b, t01=0x0156}
0x128e…12a6 Head {h00=0x0014, h01=0x0050, text=» MOVE RETCON,W0 «, t00=0x000b, t01=0x0164}
0x12a6…12b4 Head {h00=0x000a, h01=0x0050, text=»RETURN«, t00=0x000b, t01=0x017c}
0x12b4…12c0 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000b, t01=0x018a}
0x12c0…12ce Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x0008}
0x12ce…12d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0016}
0x12d8…12f4 Head {h00=0x0018, h01=0x0050, text=»* BATCH TRANSMISSION«, t00=0x000c, t01=0x0020}
0x12f4…12fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x003c}
0x12fe…130c Head {h00=0x000a, h01=0x0050, text=»TRANSM«, t00=0x000c, t01=0x0046}
0x130c…1324 Head {h00=0x0014, h01=0x0050, text=» MOVE BTYPE,TYPE«, t00=0x000c, t01=0x0054}
0x1324…135c Head {h00=0x0034, h01=0x0050, text=» IB TYPE,DC100,DC200,DC300 OPEN,BATCHHEAD,DATA C«, t00=0x000c, t01=0x006c}
0x135c…1380 Head {h00=0x0020, h01=0x0050, text=» DC400,DC500 BALANCE,CLOSE «, t00=0x000c, t01=0x00a4}
0x1380…1388 Head {h00=0x0004, h01=0x0050, t00=0x000c, t01=0x00c8}
0x1388…1390 Head {h00=0x0004, h01=0x0050, t00=0x000c, t01=0x00d0}
0x1390…13ba Head {h00=0x0026, h01=0x0050, text=»* REQLEN REQUESTED LENGTH «, t00=0x000c, t01=0x00d8}
0x13ba…13e4 Head {h00=0x0026, h01=0x0050, text=»* RECLGD MAX RECORD LENGTH«, t00=0x000c, t01=0x0102}
0x13e4…1406 Head {h00=0x001e, h01=0x0050, text=»* DCBUF DCBUFFER «, t00=0x000c, t01=0x012c}
0x1406…142e Head {h00=0x0024, h01=0x0050, text=»* REQDC BUFFER POINTER «, t00=0x000c, t01=0x014e}
0x142e…1438 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0176}
0x1438…144a Head {h00=0x000e, h01=0x0050, text=»* SEND SOF«, t00=0x000c, t01=0x0180}
0x144a…1464 (13, 0, 400) Head {h00=0x0016, h01=0x0050, text=»* SEND '001'+DATE «, t00=0x000d, t01=0x0004}
0x1464…146e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x001e}
0x146e…1476 Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x0028}
0x1476…1484 Head {h00=0x000a, h01=0x0050, text=»DC100 «, t00=0x000d, t01=0x0030}
0x1484…149c Head {h00=0x0014, h01=0x0050, text=» TBT DCBAB,DC170«, t00=0x000d, t01=0x003e}
0x149c…14b2 Head {h00=0x0012, h01=0x0050, text=» MOVE BIN4,W20«, t00=0x000d, t01=0x0056}
0x14b2…14e4 Head {h00=0x002e, h01=0x0050, text=» DSC1 DSDCFD,ATTACH,BIN4 ATTACH DEVICE DC «, t00=0x000d, t01=0x006c}
0x14e4…14f8 Head {h00=0x0010, h01=0x0050, text=» BNOK DCERR «, t00=0x000d, t01=0x009e}
0x14f8…1526 Head {h00=0x002a, h01=0x0050, text=» PERF GETBUF GET 3 CONSECUTIVE BUFFERS«, t00=0x000d, t01=0x00b2}
0x1526…153a Head {h00=0x0010, h01=0x0050, text=» B DC110 OK «, t00=0x000d, t01=0x00e0}
0x153a…1550 Head {h00=0x0012, h01=0x0050, text=» B DCERR ERROR«, t00=0x000d, t01=0x00f4}
0x1550…155e Head {h00=0x000a, h01=0x0050, text=»DC110 «, t00=0x000d, t01=0x010a}
0x155e…1566 Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x0118}
0x1566…156e Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x0120}
0x156e…157c Head {h00=0x000a, h01=0x0050, text=»DC140 «, t00=0x000d, t01=0x0128}
0x157c…15a8 Head {h00=0x0028, h01=0x0050, text=» MOVE BCDI21(W5),=D'0' RECORD COUNT «, t00=0x000d, t01=0x0136}
0x15a8…15d0 Head {h00=0x0024, h01=0x0050, text=» MOVE WORK(W15),W0 LENGTH HEADER«, t00=0x000d, t01=0x0162}
0x15d0…15fc Head {h00=0x0028, h01=0x0050, text=» MOVE WORK(W17),W0 LENGTH RECORD NO «, t00=0x000d, t01=0x018a}
0x15fc…162a Head {h00=0x002a, h01=0x0050, text=» MOVE WORK(W19),W0 LENGTH SEQUENCE NO «, t00=0x000e, t01=0x0026}
0x162a…1650 Head {h00=0x0022, h01=0x0050, text=» CLEAR BCONT CONTINUATION MARK«, t00=0x000e, t01=0x0054}
0x1650…1664 Head {h00=0x0010, h01=0x0050, text=» CLEAR BSUPR«, t00=0x000e, t01=0x007a}
0x1664…1686 Head {h00=0x001e, h01=0x0050, text=» SET SPLITFL NORMAL SPLIT «, t00=0x000e, t01=0x008e}
0x1686…16b4 Head {h00=0x002a, h01=0x0050, text=» MOVE BIN6,=X'0036' FILE CODE PRINTER «, t00=0x000e, t01=0x00b0}
0x16b4…16dc Head {h00=0x0024, h01=0x0050, text=» PERF ATTDEV,BIN6 ATTACH DEVICE «, t00=0x000e, t01=0x00de}
0x16dc…16f0 Head {h00=0x0010, h01=0x0050, text=» BNOK DC335 «, t00=0x000e, t01=0x0106}
0x16f0…170c Head {h00=0x0018, h01=0x0050, text=» MOVE STRG10A,HEX00 «, t00=0x000e, t01=0x011a}
0x170c…1724 Head {h00=0x0014, h01=0x0050, text=» GETTIME STRG10A«, t00=0x000e, t01=0x0136}
0x1724…173e Head {h00=0x0016, h01=0x0050, text=» MOVE TIME,STRG10A«, t00=0x000e, t01=0x014e}
0x173e…175c Head {h00=0x001a, h01=0x0050, text=» EDWRT DEDSPRT,FDCHDR «, t00=0x000e, t01=0x0168}
0x175c…1776 Head {h00=0x0016, h01=0x0050, text=» MOVE BIN4,TSKADR «, t00=0x000e, t01=0x0186}
0x1776…17aa Head {h00=0x0030, h01=0x0050, text=» DSC1 DSDCFD,TRPAR,BIN4 PASS DCADR TO DRIVER«, t00=0x000f, t01=0x0010}
0x17aa…17be Head {h00=0x0010, h01=0x0050, text=» BNOK DCERR «, t00=0x000f, t01=0x0044}
0x17be…17e4 Head {h00=0x0022, h01=0x0050, text=» MOVE REQLEN,=W'504' DCREQLEN «, t00=0x000f, t01=0x0058}
0x17e4…1814 Head {h00=0x002c, h01=0x0050, text=» MOVE RECLGD,=D'128' OR =D'080' ??????? «, t00=0x000f, t01=0x007e}
0x1814…182e Head {h00=0x0016, h01=0x0050, text=» MOVE DCBUF,=C' ' «, t00=0x000f, t01=0x00ae}
0x182e…1854 Head {h00=0x0022, h01=0x0050, text=» MOVE REQDC,W0 BUFFER POINTER «, t00=0x000f, t01=0x00c8}
0x1854…1876 Head {h00=0x001e, h01=0x0050, text=» EDSUB DCBUF,REQDC,SNDFRM2«, t00=0x000f, t01=0x00ee}
0x1876…189c Head {h00=0x0022, h01=0x0050, text=» PERF DCRVOL READ VOLUME LABEL«, t00=0x000f, t01=0x0110}
0x189c…18b0 Head {h00=0x0010, h01=0x0050, text=» B DC150 OK «, t00=0x000f, t01=0x0136}
0x18b0…18c4 Head {h00=0x0010, h01=0x0050, text=» B DCERR ERR«, t00=0x000f, t01=0x014a}
0x18c4…18d2 Head {h00=0x000a, h01=0x0050, text=»DC150 «, t00=0x000f, t01=0x015e}
0x18d2…1904 Head {h00=0x002e, h01=0x0050, text=» IB DEBINW2,DC160,DC180,DC170 CLR,CAN,RET «, t00=0x000f, t01=0x016c}
0x1904…1912 Head {h00=0x000a, h01=0x0050, text=»* ENT «, t00=0x0010, t01=0x000e}
0x1912…191a Head {h00=0x0004, h01=0x0050, t00=0x0010, t01=0x001c}
0x191a…1928 Head {h00=0x000a, h01=0x0050, text=»DC160 «, t00=0x0010, t01=0x0024}
0x1928…1944 Head {h00=0x0018, h01=0x0050, text=» PERF DCSGON SIGN ON«, t00=0x0010, t01=0x0032}
0x1944…1958 Head {h00=0x0010, h01=0x0050, text=» B DC165 OK «, t00=0x0010, t01=0x004e}
0x1958…196e Head {h00=0x0012, h01=0x0050, text=» B DCERR ERROR«, t00=0x0010, t01=0x0062}
0x196e…1976 Head {h00=0x0004, h01=0x0050, t00=0x0010, t01=0x0078}
0x1976…1984 Head {h00=0x000a, h01=0x0050, text=»DC165 «, t00=0x0010, t01=0x0080}
0x1984…1998 Head {h00=0x0010, h01=0x0050, text=» B DECOOK OK«, t00=0x0010, t01=0x008e}
0x1998…19a0 Head {h00=0x0004, h01=0x0050, t00=0x0010, t01=0x00a2}
0x19a0…19ae Head {h00=0x000a, h01=0x0050, text=»DC170 «, t00=0x0010, t01=0x00aa}
0x19ae…19da Head {h00=0x0028, h01=0x0050, text=» MOVE RETCON,=W'-4' ABORT CONVERSION«, t00=0x0010, t01=0x00b8}
0x19da…19ec Head {h00=0x000e, h01=0x0050, text=» B DCERRT «, t00=0x0010, t01=0x00e4}
0x19ec…19f4 Head {h00=0x0004, h01=0x0050, t00=0x0010, t01=0x00f6}
0x19f4…1a02 Head {h00=0x000a, h01=0x0050, text=»DCERR «, t00=0x0010, t01=0x00fe}
0x1a02…1a36 Head {h00=0x0030, h01=0x0050, text=» MOVE RETCON,=W'53' OUTP. DEV. NOT OPERABLE «, t00=0x0010, t01=0x010c}
0x1a36…1a44 Head {h00=0x000a, h01=0x0050, text=»DCERRT«, t00=0x0010, t01=0x0140}
0x1a44…1a62 Head {h00=0x001a, h01=0x0050, text=» DSC1 DSDCFD,TRPAR,W0 «, t00=0x0010, t01=0x014e}
0x1a62…1a74 Head {h00=0x000e, h01=0x0050, text=» SET DCBAB«, t00=0x0010, t01=0x016c}
0x1a74…1a86 Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0010, t01=0x017e}
0x1a86…1a8e Head {h00=0x0004, h01=0x0050, t00=0x0010, t01=0x0190}
0x1a8e…1a9c Head {h00=0x000a, h01=0x0050, text=»DC180 «, t00=0x0011, t01=0x0008}
0x1a9c…1ac6 Head {h00=0x0026, h01=0x0050, text=» DSC1 DSDCFD,TRPAR,W0 PASS DCADR 0«, t00=0x0011, t01=0x0016}
0x1ac6…1ad8 Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0011, t01=0x0040}
0x1ad8…1ae6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x0052}
0x1ae6…1af0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0060}
0x1af0…1b0a Head {h00=0x0016, h01=0x0050, text=»* BATCHEAD RECORD «, t00=0x0011, t01=0x006a}
0x1b0a…1b14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0084}
0x1b14…1b22 Head {h00=0x000a, h01=0x0050, text=»DC200 «, t00=0x0011, t01=0x008e}
0x1b22…1b3a Head {h00=0x0014, h01=0x0050, text=» TBT DCBAB,DC330«, t00=0x0011, t01=0x009c}
0x1b3a…1b66 Head {h00=0x0028, h01=0x0050, text=» TBF BDAFOR,DC300 ANY FORCED FIELDS?«, t00=0x0011, t01=0x00b4}
0x1b66…1b96 Head {h00=0x002c, h01=0x0050, text=» EDWRT DEDSPRT,FBATC3 PRINT ERROR REPORT«, t00=0x0011, t01=0x00e0}
0x1b96…1ba8 Head {h00=0x000e, h01=0x0050, text=» SET DCBAB«, t00=0x0011, t01=0x0110}
0x1ba8…1bd2 Head {h00=0x0026, h01=0x0050, text=» MOVE RETCON,=W'-1' GET NEXT BATCH«, t00=0x0011, t01=0x0122}
0x1bd2…1be4 Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0011, t01=0x014c}
0x1be4…1bf2 Head {h00=0x000a, h01=0x0050, text=»DC300 «, t00=0x0011, t01=0x015e}
0x1bf2…1c0a Head {h00=0x0014, h01=0x0050, text=» TBT DCBAB,DC330«, t00=0x0011, t01=0x016c}
0x1c0a…1c2e Head {h00=0x0020, h01=0x0050, text=» CBE TYPE,W4,DC305 PRINTING «, t00=0x0011, t01=0x0184}
0x1c2e…1c52 Head {h00=0x0020, h01=0x0050, text=» CBE TYPE,W2,DC305 PRINTING «, t00=0x0012, t01=0x0018}
0x1c52…1c6e Head {h00=0x0018, h01=0x0050, text=» B DC308 NO PRINTING«, t00=0x0012, t01=0x003c}
0x1c6e…1c7c Head {h00=0x000a, h01=0x0050, text=»DC305 «, t00=0x0012, t01=0x0058}
0x1c7c…1caa Head {h00=0x002a, h01=0x0050, text=»* PRINT BATCH HEAD AND BALANCE RECORD «, t00=0x0012, t01=0x0066}
0x1caa…1cc2 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW3,W1«, t00=0x0012, t01=0x0094}
0x1cc2…1ce4 Head {h00=0x001e, h01=0x0050, text=» PRINT DEDSPRT,DEBINW3,W0 «, t00=0x0012, t01=0x00ac}
0x1ce4…1cf8 Head {h00=0x0010, h01=0x0050, text=» BNOK DC335 «, t00=0x0012, t01=0x00ce}
0x1cf8…1d06 Head {h00=0x000a, h01=0x0050, text=»DC308 «, t00=0x0012, t01=0x00e2}
0x1d06…1d34 Head {h00=0x002a, h01=0x0050, text=» MOVE BIN10,WORK(W13) GET BUFFER INDEX«, t00=0x0012, t01=0x00f0}
0x1d34…1d5c Head {h00=0x0024, h01=0x0050, text=» MOVE BIN9,BIN10 GET BPOOL INDEX«, t00=0x0012, t01=0x011e}
0x1d5c…1d70 Head {h00=0x0010, h01=0x0050, text=» ADD BIN9,W1«, t00=0x0012, t01=0x0146}
0x1d70…1d98 Head {h00=0x0024, h01=0x0050, text=» MOVE BIN8,W0 RESET FIELD NUMBER«, t00=0x0012, t01=0x015a}
0x1d98…1dba Head {h00=0x001e, h01=0x0050, text=» TBT DCBAB,DC330 ABORTION «, t00=0x0012, t01=0x0182}
0x1dba…1dc8 Head {h00=0x000a, h01=0x0050, text=»DC310 «, t00=0x0013, t01=0x0014}
0x1dc8…1dde Head {h00=0x0012, h01=0x0050, text=» MOVE BIN4,W0 «, t00=0x0013, t01=0x0022}
0x1dde…1dec Head {h00=0x000a, h01=0x0050, text=»DC311 «, t00=0x0013, t01=0x0038}
0x1dec…1e06 Head {h00=0x0016, h01=0x0050, text=» PERF CONV,BIN4,FC«, t00=0x0013, t01=0x0046}
0x1e06…1e20 Head {h00=0x0016, h01=0x0050, text=» B DECOOK ALL DONE«, t00=0x0013, t01=0x0060}
0x1e20…1e3e Head {h00=0x001a, h01=0x0050, text=» B DC340 WRITE BLOCKS «, t00=0x0013, t01=0x007a}
0x1e3e…1e60 Head {h00=0x001e, h01=0x0050, text=» B DC315 CUMP FIELD EMPTHY«, t00=0x0013, t01=0x0098}
0x1e60…1e84 Head {h00=0x0020, h01=0x0050, text=» B DC320 BCD FIELD OVERFLOW «, t00=0x0013, t01=0x00ba}
0x1e84…1eaa Head {h00=0x0022, h01=0x0050, text=» B DC320 EDIT BUFFER OVERFLOW «, t00=0x0013, t01=0x00de}
0x1eaa…1eb8 Head {h00=0x000a, h01=0x0050, text=»DC315 «, t00=0x0013, t01=0x0104}
0x1eb8…1ed0 Head {h00=0x0014, h01=0x0050, text=» MOVE RETCON,W5 «, t00=0x0013, t01=0x0112}
0x1ed0…1ee2 Head {h00=0x000e, h01=0x0050, text=» B DCERRT «, t00=0x0013, t01=0x012a}
0x1ee2…1eea Head {h00=0x0004, h01=0x0050, t00=0x0013, t01=0x013c}
0x1eea…1ef8 Head {h00=0x000a, h01=0x0050, text=»DC320 «, t00=0x0013, t01=0x0144}
0x1ef8…1f1e Head {h00=0x0022, h01=0x0050, text=» MOVE RETCON,=W'54' EDIT ERROR«, t00=0x0013, t01=0x0152}
0x1f1e…1f30 Head {h00=0x000e, h01=0x0050, text=» B DCERRT «, t00=0x0013, t01=0x0178}
0x1f30…1f3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x018a}
0x1f3a…1f44 (20, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0004}
0x1f44…1f52 Head {h00=0x000a, h01=0x0050, text=»DC330 «, t00=0x0014, t01=0x000e}
0x1f52…1f74 Head {h00=0x001e, h01=0x0050, text=» MOVE RETCON,=W'-4' ABORT «, t00=0x0014, t01=0x001c}
0x1f74…1f86 Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0014, t01=0x003e}
0x1f86…1f90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0050}
0x1f90…1f9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x005a}
0x1f9a…1fa8 Head {h00=0x000a, h01=0x0050, text=»DC335 «, t00=0x0014, t01=0x0064}
0x1fa8…1fc4 Head {h00=0x0018, h01=0x0050, text=» MOVE RETCON,=W'35' «, t00=0x0014, t01=0x0072}
0x1fc4…1fd6 Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0014, t01=0x008e}
0x1fd6…1fe0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00a0}
0x1fe0…1ff6 Head {h00=0x0012, h01=0x0050, text=»* WRITE BLOCKS«, t00=0x0014, t01=0x00aa}
0x1ff6…2000 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00c0}
0x2000…2008 Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x00ca}
0x2008…2016 Head {h00=0x000a, h01=0x0050, text=»DC340 «, t00=0x0014, t01=0x00d2}
0x2016…203a Head {h00=0x0020, h01=0x0050, text=» PERF DCWRIT,FC,TYPE,RETCON «, t00=0x0014, t01=0x00e0}
0x203a…204e Head {h00=0x0010, h01=0x0050, text=» B DC310 OK «, t00=0x0014, t01=0x0104}
0x204e…2064 Head {h00=0x0012, h01=0x0050, text=» B DC360 ERROR«, t00=0x0014, t01=0x0118}
0x2064…2078 Head {h00=0x0010, h01=0x0050, text=» B DC360 EOE«, t00=0x0014, t01=0x012e}
0x2078…20a6 Head {h00=0x002a, h01=0x0050, text=» MOVE BIN4,W1 CONTINUE IN SAME BUFFER «, t00=0x0014, t01=0x0142}
0x20a6…20b6 Head {h00=0x000c, h01=0x0050, text=» B DC311«, t00=0x0014, t01=0x0170}
0x20b6…20c4 Head {h00=0x000a, h01=0x0050, text=»DC360 «, t00=0x0014, t01=0x0180}
0x20c4…20f6 Head {h00=0x002e, h01=0x0050, text=»*???????? ERROR, SEND TERMINATE ???????«, t00=0x0014, t01=0x018e}
0x20f6…2106 Head {h00=0x000c, h01=0x0050, text=» B DCERR«, t00=0x0015, t01=0x0030}
0x2106…2114 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x0040}
0x2114…2122 Head {h00=0x000a, h01=0x0050, text=»DC400 «, t00=0x0015, t01=0x004e}
0x2122…2140 Head {h00=0x001a, h01=0x0050, text=»* BALANCE FORMAT «, t00=0x0015, t01=0x005c}
0x2140…2150 Head {h00=0x000c, h01=0x0050, text=» B DC300«, t00=0x0015, t01=0x007a}
0x2150…215e Head {h00=0x000a, h01=0x0050, text=»DC500 «, t00=0x0015, t01=0x008a}
0x215e…217c Head {h00=0x001a, h01=0x0050, text=» TBT DCBAB,DC560 ABORT«, t00=0x0015, t01=0x0098}
0x217c…2190 Head {h00=0x0010, h01=0x0050, text=» PERF DCSGOF«, t00=0x0015, t01=0x00b6}
0x2190…21a0 Head {h00=0x000c, h01=0x0050, text=» B DC510«, t00=0x0015, t01=0x00ca}
0x21a0…21b0 Head {h00=0x000c, h01=0x0050, text=» B DCERR«, t00=0x0015, t01=0x00da}
0x21b0…21be Head {h00=0x000a, h01=0x0050, text=»DC510 «, t00=0x0015, t01=0x00ea}
0x21be…21da Head {h00=0x0018, h01=0x0050, text=» MOVE STRG10A,HEX00 «, t00=0x0015, t01=0x00f8}
0x21da…21f2 Head {h00=0x0014, h01=0x0050, text=» GETTIME STRG10A«, t00=0x0015, t01=0x0114}
0x21f2…220c Head {h00=0x0016, h01=0x0050, text=» MOVE TIME,STRG10A«, t00=0x0015, t01=0x012c}
0x220c…222a Head {h00=0x001a, h01=0x0050, text=» EDWRT DEDSPRT,FDCEND «, t00=0x0015, t01=0x0146}
0x222a…2238 Head {h00=0x000a, h01=0x0050, text=»DC550 «, t00=0x0015, t01=0x0164}
0x2238…224c Head {h00=0x0010, h01=0x0050, text=» CLEAR DCBAB«, t00=0x0015, t01=0x0172}
0x224c…2276 Head {h00=0x0026, h01=0x0050, text=» DSC1 DSDCFD,TRPAR,W0 PASS DCADR 0«, t00=0x0015, t01=0x0186}
0x2276…228c Head {h00=0x0012, h01=0x0050, text=» MOVE BIN4,W0 «, t00=0x0016, t01=0x0020}
0x228c…22ac Head {h00=0x001c, h01=0x0050, text=» DSC1 DSDCFD,DETACH,BIN4«, t00=0x0016, t01=0x0036}
0x22ac…22c0 Head {h00=0x0010, h01=0x0050, text=» PERF DETPRT«, t00=0x0016, t01=0x0056}
0x22c0…22d8 Head {h00=0x0014, h01=0x0050, text=»* RELEAS BUFFERS«, t00=0x0016, t01=0x006a}
0x22d8…2302 Head {h00=0x0026, h01=0x0050, text=» PERF DEPOOL,W6,BIN10,BIN4,STRG10A«, t00=0x0016, t01=0x0082}
0x2302…2314 Head {h00=0x000e, h01=0x0050, text=» B DECOOK «, t00=0x0016, t01=0x00ac}
0x2314…2322 Head {h00=0x000a, h01=0x0050, text=»DC560 «, t00=0x0016, t01=0x00be}
0x2322…233e Head {h00=0x0018, h01=0x0050, text=» MOVE STRG10A,HEX00 «, t00=0x0016, t01=0x00cc}
0x233e…2356 Head {h00=0x0014, h01=0x0050, text=» GETTIME STRG10A«, t00=0x0016, t01=0x00e8}
0x2356…2370 Head {h00=0x0016, h01=0x0050, text=» MOVE TIME,STRG10A«, t00=0x0016, t01=0x0100}
0x2370…238e Head {h00=0x001a, h01=0x0050, text=» EDWRT DEDSPRT,FDCERR «, t00=0x0016, t01=0x011a}
0x238e…239e Head {h00=0x000c, h01=0x0050, text=» B DC550«, t00=0x0016, t01=0x0138}
0x239e…23a6 Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x0148}
0x23a6…23b4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x0150}
0x23b4…23be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x015e}
0x23be…23d0 Head {h00=0x000e, h01=0x0050, text=»* LISTING «, t00=0x0016, t01=0x0168}
0x23d0…23da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x017a}
0x23da…23e8 Head {h00=0x000a, h01=0x0050, text=»LISTE «, t00=0x0016, t01=0x0184}
0x23e8…2400 (23, 0, 400) Head {h00=0x0014, h01=0x0050, text=» MOVE BTYPE,TYPE«, t00=0x0017, t01=0x0004}
0x2400…243a Head {h00=0x0036, h01=0x0050, text=» IB TYPE,LS100,LS200,LS300, OPEN,BATCHHEAD,DATA, C«, t00=0x0017, t01=0x001c}
0x243a…245e Head {h00=0x0020, h01=0x0050, text=» LS400,LS500 BALANCE,CLOSE «, t00=0x0017, t01=0x0056}
0x245e…2466 Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x007a}
0x2466…2474 Head {h00=0x000a, h01=0x0050, text=»LS100 «, t00=0x0017, t01=0x0082}
0x2474…248c Head {h00=0x0014, h01=0x0050, text=» TBT LSBAB,LS170«, t00=0x0017, t01=0x0090}
0x248c…24ba Head {h00=0x002a, h01=0x0050, text=» PERF GETBUF GET 3 CONSECUTIVE BUFFERS«, t00=0x0017, t01=0x00a8}
0x24ba…24ce Head {h00=0x0010, h01=0x0050, text=» B LS110 OK«, t00=0x0017, t01=0x00d6}
0x24ce…24e4 Head {h00=0x0012, h01=0x0050, text=» B LSERR ERROR«, t00=0x0017, t01=0x00ea}
0x24e4…24f2 Head {h00=0x000a, h01=0x0050, text=»LS110 «, t00=0x0017, t01=0x0100}
0x24f2…251e Head {h00=0x0028, h01=0x0050, text=» MOVE BCDI21(W5),=D'0' RECORD COUNT «, t00=0x0017, t01=0x010e}
0x251e…2546 Head {h00=0x0024, h01=0x0050, text=» MOVE WORK(W15),W0 LENGTH HEADER«, t00=0x0017, t01=0x013a}
0x2546…2572 Head {h00=0x0028, h01=0x0050, text=» MOVE WORK(W17),W0 LENGTH RECORD NO «, t00=0x0017, t01=0x0162}
0x2572…25a0 Head {h00=0x002a, h01=0x0050, text=» MOVE WORK(W19),W0 LENGTH SEQUENCE NO «, t00=0x0017, t01=0x018e}
0x25a0…25c6 Head {h00=0x0022, h01=0x0050, text=» CLEAR BCONT CONTINUATION MARK«, t00=0x0018, t01=0x002c}
0x25c6…25da Head {h00=0x0010, h01=0x0050, text=» CLEAR BSUPR«, t00=0x0018, t01=0x0052}
0x25da…25fa Head {h00=0x001c, h01=0x0050, text=» CLEAR SPLITFL NNO SPLIT«, t00=0x0018, t01=0x0066}
0x25fa…2626 Head {h00=0x0028, h01=0x0050, text=» CLEAR FIRSTFL INITIATE FIRST RECORD«, t00=0x0018, t01=0x0086}
0x2626…264e Head {h00=0x0024, h01=0x0050, text=» PERF ATTDEV,BIN6 ATTACH DEVICE «, t00=0x0018, t01=0x00b2}
0x264e…2662 Head {h00=0x0010, h01=0x0050, text=» BNOK LSERR «, t00=0x0018, t01=0x00da}
0x2662…267e Head {h00=0x0018, h01=0x0050, text=» MOVE STRG10A,HEX00 «, t00=0x0018, t01=0x00ee}
0x267e…2696 Head {h00=0x0014, h01=0x0050, text=» GETTIME STRG10A«, t00=0x0018, t01=0x010a}
0x2696…26b0 Head {h00=0x0016, h01=0x0050, text=» MOVE TIME,STRG10A«, t00=0x0018, t01=0x0122}
0x26b0…26ce Head {h00=0x001a, h01=0x0050, text=» EDWRT DEDSPRT,FLSHDR «, t00=0x0018, t01=0x013c}
0x26ce…26ea Head {h00=0x0018, h01=0x0050, text=» MOVE RECLGD,=D'112'«, t00=0x0018, t01=0x015a}
0x26ea…26f8 Head {h00=0x000a, h01=0x0050, text=»* ENT «, t00=0x0018, t01=0x0176}
0x26f8…270c Head {h00=0x0010, h01=0x0050, text=» B DECOOK OK«, t00=0x0018, t01=0x0184}
0x270c…2714 Head {h00=0x0004, h01=0x0050, t00=0x0019, t01=0x0008}
0x2714…2722 Head {h00=0x000a, h01=0x0050, text=»LS170 «, t00=0x0019, t01=0x0010}
0x2722…274e Head {h00=0x0028, h01=0x0050, text=» MOVE RETCON,=W'-4' ABORT CONVERSION«, t00=0x0019, t01=0x001e}
0x274e…2760 Head {h00=0x000e, h01=0x0050, text=» B LSERRT «, t00=0x0019, t01=0x004a}
0x2760…276e Head {h00=0x000a, h01=0x0050, text=»LSERR «, t00=0x0019, t01=0x005c}
0x276e…27a2 Head {h00=0x0030, h01=0x0050, text=» MOVE RETCON,=W'35' OUTPUT DEV NOT OPERABLE «, t00=0x0019, t01=0x006a}
0x27a2…27b0 Head {h00=0x000a, h01=0x0050, text=»LSERRT«, t00=0x0019, t01=0x009e}
0x27b0…27c2 Head {h00=0x000e, h01=0x0050, text=» SET LSBAB«, t00=0x0019, t01=0x00ac}
0x27c2…27d4 Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0019, t01=0x00be}
0x27d4…27de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00d0}
0x27de…27f8 Head {h00=0x0016, h01=0x0050, text=»* BATCHEAD RECORD «, t00=0x0019, t01=0x00da}
0x27f8…2802 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00f4}
0x2802…2810 Head {h00=0x000a, h01=0x0050, text=»LS200 «, t00=0x0019, t01=0x00fe}
0x2810…2828 Head {h00=0x0014, h01=0x0050, text=» TBT LSBAB,LS170«, t00=0x0019, t01=0x010c}
0x2828…2854 Head {h00=0x0028, h01=0x0050, text=» TBF BDAFOR,LS250 ANY FORCED FIELDS?«, t00=0x0019, t01=0x0124}
0x2854…2884 Head {h00=0x002c, h01=0x0050, text=» EDWRT DEDSPRT,FBATC3 PRINT ERROR REPORT«, t00=0x0019, t01=0x0150}
0x2884…2896 Head {h00=0x000e, h01=0x0050, text=» SET LSBAB«, t00=0x0019, t01=0x0180}
0x2896…28c0 (26, 0, 400) Head {h00=0x0026, h01=0x0050, text=» MOVE RETCON,=W'-1' GET NEXT BATCH«, t00=0x001a, t01=0x0004}
0x28c0…28d2 Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x001a, t01=0x002e}
0x28d2…28f6 Head {h00=0x0020, h01=0x0050, text=»LS250 BATCHHEAD OR BALANCE«, t00=0x001a, t01=0x0040}
0x28f6…290e Head {h00=0x0014, h01=0x0050, text=» TBT LSBAB,LS170«, t00=0x001a, t01=0x0064}
0x290e…2926 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW3,W1«, t00=0x001a, t01=0x007c}
0x2926…2948 Head {h00=0x001e, h01=0x0050, text=» PRINT DEDSPRT,DEBINW3,W0 «, t00=0x001a, t01=0x0094}
0x2948…295c Head {h00=0x0010, h01=0x0050, text=» BNOK LSERR «, t00=0x001a, t01=0x00b6}
0x295c…2992 Head {h00=0x0032, h01=0x0050, text=»* CONVERT HEADER TO SET CONVERSION INDICATIONS«, t00=0x001a, t01=0x00ca}
0x2992…29a0 Head {h00=0x000a, h01=0x0050, text=»LS220 «, t00=0x001a, t01=0x0100}
0x29a0…29d0 Head {h00=0x002c, h01=0x0050, text=» MOVE BIN10,WORK(W13) GET BUFFER INDEX «, t00=0x001a, t01=0x010e}
0x29d0…29f8 Head {h00=0x0024, h01=0x0050, text=» MOVE BIN9,BIN10 GET BPOOL INDEX«, t00=0x001a, t01=0x013e}
0x29f8…2a0c Head {h00=0x0010, h01=0x0050, text=» ADD BIN9,W1«, t00=0x001a, t01=0x0166}
0x2a0c…2a30 Head {h00=0x0020, h01=0x0050, text=» MOVE BIN8,W0 RESET FIELD NO«, t00=0x001a, t01=0x017a}
0x2a30…2a46 Head {h00=0x0012, h01=0x0050, text=» MOVE BIN4,W0 «, t00=0x001b, t01=0x000e}
0x2a46…2a54 Head {h00=0x000a, h01=0x0050, text=»LS210 «, t00=0x001b, t01=0x0024}
0x2a54…2a6e Head {h00=0x0016, h01=0x0050, text=» PERF CONV,BIN4,FC«, t00=0x001b, t01=0x0032}
0x2a6e…2a88 Head {h00=0x0016, h01=0x0050, text=» B DECOOK ALL DONE«, t00=0x001b, t01=0x004c}
0x2a88…2aa6 Head {h00=0x001a, h01=0x0050, text=» B LS210 NOT ALL DONE «, t00=0x001b, t01=0x0066}
0x2aa6…2ac8 Head {h00=0x001e, h01=0x0050, text=» B LS315 COMP FIELD EMPTY «, t00=0x001b, t01=0x0084}
0x2ac8…2aec Head {h00=0x0020, h01=0x0050, text=» B LS320 BCD FIELD OVERFLOW «, t00=0x001b, t01=0x00a6}
0x2aec…2b12 Head {h00=0x0022, h01=0x0050, text=» B LS320 EDIT BUFFER OVERFLOW «, t00=0x001b, t01=0x00ca}
0x2b12…2b24 Head {h00=0x000e, h01=0x0050, text=» B DECOOK «, t00=0x001b, t01=0x00f0}
0x2b24…2b2c Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x0102}
0x2b2c…2b34 Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x010a}
0x2b34…2b42 Head {h00=0x000a, h01=0x0050, text=»LS300 «, t00=0x001b, t01=0x0112}
0x2b42…2b5a Head {h00=0x0014, h01=0x0050, text=» TBT FDBAB,LS170«, t00=0x001b, t01=0x0120}
0x2b5a…2b88 Head {h00=0x002a, h01=0x0050, text=» MOVE BIN10,WORK(W13) GET BUFFER INDEX«, t00=0x001b, t01=0x0138}
0x2b88…2bb0 Head {h00=0x0024, h01=0x0050, text=» MOVE BIN9,BIN10 GET BPOOL INDEX«, t00=0x001b, t01=0x0166}
0x2bb0…2bc4 Head {h00=0x0010, h01=0x0050, text=» ADD BIN9,W1«, t00=0x001b, t01=0x018e}
0x2bc4…2bec Head {h00=0x0024, h01=0x0050, text=» MOVE BIN8,W0 RESET FIELD NUMBER«, t00=0x001c, t01=0x0012}
0x2bec…2bfa Head {h00=0x000a, h01=0x0050, text=»LS310 «, t00=0x001c, t01=0x003a}
0x2bfa…2c10 Head {h00=0x0012, h01=0x0050, text=» MOVE BIN4,W0 «, t00=0x001c, t01=0x0048}
0x2c10…2c1e Head {h00=0x000a, h01=0x0050, text=»LS311 «, t00=0x001c, t01=0x005e}
0x2c1e…2c38 Head {h00=0x0016, h01=0x0050, text=» PERF CONV,BIN4,FC«, t00=0x001c, t01=0x006c}
0x2c38…2c52 Head {h00=0x0016, h01=0x0050, text=» B DECOOK ALL DONE«, t00=0x001c, t01=0x0086}
0x2c52…2c70 Head {h00=0x001a, h01=0x0050, text=» B LS340 WRITE BLOCKS «, t00=0x001c, t01=0x00a0}
0x2c70…2c92 Head {h00=0x001e, h01=0x0050, text=» B LS315 CUMP FIELD EMPTY «, t00=0x001c, t01=0x00be}
0x2c92…2cb6 Head {h00=0x0020, h01=0x0050, text=» B LS320 BCD FIELD OVERFLOW «, t00=0x001c, t01=0x00e0}
0x2cb6…2cdc Head {h00=0x0022, h01=0x0050, text=» B LS320 EDIT BUFFER OVERFLOW «, t00=0x001c, t01=0x0104}
0x2cdc…2cea Head {h00=0x000a, h01=0x0050, text=»LS315 «, t00=0x001c, t01=0x012a}
0x2cea…2d02 Head {h00=0x0014, h01=0x0050, text=» MOVE RETCON,W5 «, t00=0x001c, t01=0x0138}
0x2d02…2d14 Head {h00=0x000e, h01=0x0050, text=» B LSERRT «, t00=0x001c, t01=0x0150}
0x2d14…2d22 Head {h00=0x000a, h01=0x0050, text=»LS320 «, t00=0x001c, t01=0x0162}
0x2d22…2d3e Head {h00=0x0018, h01=0x0050, text=» MOVE RETCON,=W'54' «, t00=0x001c, t01=0x0170}
0x2d3e…2d50 Head {h00=0x000e, h01=0x0050, text=» B LSERRT «, t00=0x001c, t01=0x018c}
0x2d50…2d58 Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x000e}
0x2d58…2d6e Head {h00=0x0012, h01=0x0050, text=»* WRITE BLOCKS«, t00=0x001d, t01=0x0016}
0x2d6e…2d76 Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x002c}
0x2d76…2d84 Head {h00=0x000a, h01=0x0050, text=»LS340 «, t00=0x001d, t01=0x0034}
0x2d84…2da8 Head {h00=0x0020, h01=0x0050, text=» PERF LSWRIT,FC,TYPE,RETCON «, t00=0x001d, t01=0x0042}
0x2da8…2dbc Head {h00=0x0010, h01=0x0050, text=» B LS310 OK «, t00=0x001d, t01=0x0066}
0x2dbc…2dd2 Head {h00=0x0012, h01=0x0050, text=» B LS310 DUMMY«, t00=0x001d, t01=0x007a}
0x2dd2…2de8 Head {h00=0x0012, h01=0x0050, text=» B LS310 DUMMY«, t00=0x001d, t01=0x0090}
0x2de8…2e16 Head {h00=0x002a, h01=0x0050, text=» MOVE BIN4,W1 CONTINUE IN SAME BUFFER «, t00=0x001d, t01=0x00a6}
0x2e16…2e26 Head {h00=0x000c, h01=0x0050, text=» B LS311«, t00=0x001d, t01=0x00d4}
0x2e26…2e2e Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x00e4}
0x2e2e…2e36 Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x00ec}
0x2e36…2e44 Head {h00=0x000a, h01=0x0050, text=»LS400 «, t00=0x001d, t01=0x00f4}
0x2e44…2e5c Head {h00=0x0014, h01=0x0050, text=»* BALANCE FORMAT«, t00=0x001d, t01=0x0102}
0x2e5c…2e6c Head {h00=0x000c, h01=0x0050, text=» B LS250«, t00=0x001d, t01=0x011a}
0x2e6c…2e74 Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x012a}
0x2e74…2e82 Head {h00=0x000a, h01=0x0050, text=»LS500 «, t00=0x001d, t01=0x0132}
0x2e82…2eb0 Head {h00=0x002a, h01=0x0050, text=» MOVE BIN10,WORK(W13) GET BUFFER INDEX«, t00=0x001d, t01=0x0140}
0x2eb0…2ece Head {h00=0x001a, h01=0x0050, text=» TBT FDBAB,LS560 ABORT«, t00=0x001d, t01=0x016e}
0x2ece…2ede Head {h00=0x000c, h01=0x0050, text=» B LS570«, t00=0x001d, t01=0x018c}
0x2ede…2eec Head {h00=0x000a, h01=0x0050, text=»LS550 «, t00=0x001e, t01=0x000c}
0x2eec…2f00 Head {h00=0x0010, h01=0x0050, text=» CLEAR LSBAB«, t00=0x001e, t01=0x001a}
0x2f00…2f16 Head {h00=0x0012, h01=0x0050, text=» MOVE BIN4,W0 «, t00=0x001e, t01=0x002e}
0x2f16…2f2a Head {h00=0x0010, h01=0x0050, text=» PERF DETPRT«, t00=0x001e, t01=0x0044}
0x2f2a…2f42 Head {h00=0x0014, h01=0x0050, text=»* RELEAS BUFFERS«, t00=0x001e, t01=0x0058}
0x2f42…2f6c Head {h00=0x0026, h01=0x0050, text=» PERF DEPOOL,W6,BIN10,BIN4,STRG10A«, t00=0x001e, t01=0x0070}
0x2f6c…2f7e Head {h00=0x000e, h01=0x0050, text=» B DECOOK «, t00=0x001e, t01=0x009a}
0x2f7e…2f8c Head {h00=0x000a, h01=0x0050, text=»LS560 «, t00=0x001e, t01=0x00ac}
0x2f8c…2fa8 Head {h00=0x0018, h01=0x0050, text=» MOVE STRG10A,HEX00 «, t00=0x001e, t01=0x00ba}
0x2fa8…2fc0 Head {h00=0x0014, h01=0x0050, text=» GETTIME STRG10A«, t00=0x001e, t01=0x00d6}
0x2fc0…2fda Head {h00=0x0016, h01=0x0050, text=» MOVE TIME,STRG10A«, t00=0x001e, t01=0x00ee}
0x2fda…2ff8 Head {h00=0x001a, h01=0x0050, text=» EDWRT DEDSPRT,FLSERR «, t00=0x001e, t01=0x0108}
0x2ff8…3008 Head {h00=0x000c, h01=0x0050, text=» B LS550«, t00=0x001e, t01=0x0126}
0x3008…3016 Head {h00=0x000a, h01=0x0050, text=»LS570 «, t00=0x001e, t01=0x0136}
0x3016…3032 Head {h00=0x0018, h01=0x0050, text=» MOVE STRG10A,HEX00 «, t00=0x001e, t01=0x0144}
0x3032…304a Head {h00=0x0014, h01=0x0050, text=» GETTIME STRG10A«, t00=0x001e, t01=0x0160}
0x304a…3064 Head {h00=0x0016, h01=0x0050, text=» MOVE TIME,STRG10A«, t00=0x001e, t01=0x0178}
0x3064…3082 (31, 0, 400) Head {h00=0x001a, h01=0x0050, text=» EDWRT DEDSPRT,FLSEND «, t00=0x001f, t01=0x0004}
0x3082…3092 Head {h00=0x000c, h01=0x0050, text=» B LS550«, t00=0x001f, t01=0x0022}
0x3092…30a0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001f, t01=0x0032}
0x30a0…30aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0040}
0x30aa…30c2 Head {h00=0x0014, h01=0x0050, text=»* FLOPPY DUMPING«, t00=0x001f, t01=0x004a}
0x30c2…30cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0062}
0x30cc…30d4 Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x006c}
0x30d4…30e2 Head {h00=0x000a, h01=0x0050, text=»FLOPPY«, t00=0x001f, t01=0x0074}
0x30e2…30fa Head {h00=0x0014, h01=0x0050, text=» MOVE BTYPE,TYPE«, t00=0x001f, t01=0x0082}
0x30fa…3132 Head {h00=0x0034, h01=0x0050, text=» IB TYPE,FD100,FD200,FD300 OPEN,BATCHHEAD,DATA C«, t00=0x001f, t01=0x009a}
0x3132…3156 Head {h00=0x0020, h01=0x0050, text=» FD400,FD500 BALANCE,CLOSE «, t00=0x001f, t01=0x00d2}
0x3156…315e Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x00f6}
0x315e…3166 Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x00fe}
0x3166…3170 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0106}
0x3170…3182 Head {h00=0x000e, h01=0x0050, text=»* SEND SOF«, t00=0x001f, t01=0x0110}
0x3182…319c Head {h00=0x0016, h01=0x0050, text=»* SEND '001'+DATE «, t00=0x001f, t01=0x0122}
0x319c…31a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x013c}
0x31a6…31ae Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x0146}
0x31ae…31bc Head {h00=0x000a, h01=0x0050, text=»FD100 «, t00=0x001f, t01=0x014e}
0x31bc…31d4 Head {h00=0x0014, h01=0x0050, text=» TBT FDBAB,FD170«, t00=0x001f, t01=0x015c}
0x31d4…3202 Head {h00=0x002a, h01=0x0050, text=» PERF GETBUF GET 3 CONSECUTIVE BUFFERS«, t00=0x001f, t01=0x0174}
0x3202…3216 Head {h00=0x0010, h01=0x0050, text=» B FD110 OK «, t00=0x0020, t01=0x0012}
0x3216…322c Head {h00=0x0012, h01=0x0050, text=» B FDERR ERROR«, t00=0x0020, t01=0x0026}
0x322c…323a Head {h00=0x000a, h01=0x0050, text=»FD110 «, t00=0x0020, t01=0x003c}
0x323a…325a Head {h00=0x001c, h01=0x0050, text=» MOVE CWFD,W7 HDR RECORD«, t00=0x0020, t01=0x004a}
0x325a…3276 Head {h00=0x0018, h01=0x0050, text=» MOVE REQFD,=W'128' «, t00=0x0020, t01=0x006a}
0x3276…32b0 Head {h00=0x0036, h01=0x0050, text=» CALL FDIO,DSFD,X'A1',BPOOL(BIN10),REQFD,CWFD OPEN«, t00=0x0020, t01=0x0086}
0x32b0…32c6 Head {h00=0x0012, h01=0x0050, text=» MOVE BIN4,W20«, t00=0x0020, t01=0x00c0}
0x32c6…32f6 Head {h00=0x002c, h01=0x0050, text=» DSC1 DSFD,ATTACH,BIN4 ATTACH DEVICE FD«, t00=0x0020, t01=0x00d6}
0x32f6…330a Head {h00=0x0010, h01=0x0050, text=» BNOK FDERR «, t00=0x0020, t01=0x0106}
0x330a…331e Head {h00=0x0010, h01=0x0050, text=» PERF FDLOAD«, t00=0x0020, t01=0x011a}
0x331e…3332 Head {h00=0x0010, h01=0x0050, text=» B FD140 OK «, t00=0x0020, t01=0x012e}
0x3332…3348 Head {h00=0x0012, h01=0x0050, text=» B FDERR ERROR«, t00=0x0020, t01=0x0142}
0x3348…3350 Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x0158}
0x3350…3358 Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x0160}
0x3358…3366 Head {h00=0x000a, h01=0x0050, text=»FD140 «, t00=0x0020, t01=0x0168}
0x3366…3392 Head {h00=0x0028, h01=0x0050, text=» MOVE BCDI21(W5),=D'0' RECORD COUNT «, t00=0x0020, t01=0x0176}
0x3392…33ba Head {h00=0x0024, h01=0x0050, text=» MOVE WORK(W15),W0 LENGTH HEADER«, t00=0x0021, t01=0x0012}
0x33ba…33e6 Head {h00=0x0028, h01=0x0050, text=» MOVE WORK(W17),W0 LENGTH RECORD NO «, t00=0x0021, t01=0x003a}
0x33e6…3414 Head {h00=0x002a, h01=0x0050, text=» MOVE WORK(W19),W0 LENGTH SEQUENCE NO «, t00=0x0021, t01=0x0066}
0x3414…343a Head {h00=0x0022, h01=0x0050, text=» CLEAR BCONT CONTINUATION MARK«, t00=0x0021, t01=0x0094}
0x343a…344e Head {h00=0x0010, h01=0x0050, text=» CLEAR BSUPR«, t00=0x0021, t01=0x00ba}
0x344e…3470 Head {h00=0x001e, h01=0x0050, text=» SET SPLITFL NORMAL SPLIT «, t00=0x0021, t01=0x00ce}
0x3470…349e Head {h00=0x002a, h01=0x0050, text=» MOVE BIN6,=X'0036' FILE CODE PRINTER «, t00=0x0021, t01=0x00f0}
0x349e…34c6 Head {h00=0x0024, h01=0x0050, text=» PERF ATTDEV,BIN6 ATTACH DEVICE «, t00=0x0021, t01=0x011e}
0x34c6…34da Head {h00=0x0010, h01=0x0050, text=» BNOK FDERR «, t00=0x0021, t01=0x0146}
0x34da…34f6 Head {h00=0x0018, h01=0x0050, text=» MOVE STRG10A,HEX00 «, t00=0x0021, t01=0x015a}
0x34f6…350e Head {h00=0x0014, h01=0x0050, text=» GETTIME STRG10A«, t00=0x0021, t01=0x0176}
0x350e…3528 Head {h00=0x0016, h01=0x0050, text=» MOVE TIME,STRG10A«, t00=0x0021, t01=0x018e}
0x3528…3546 Head {h00=0x001a, h01=0x0050, text=» EDWRT DEDSPRT,FFDHDR «, t00=0x0022, t01=0x0018}
0x3546…356c Head {h00=0x0022, h01=0x0050, text=» PERF FDRVOL READ VOLUME LABEL«, t00=0x0022, t01=0x0036}
0x356c…3580 Head {h00=0x0010, h01=0x0050, text=» B FD150 OK «, t00=0x0022, t01=0x005c}
0x3580…3594 Head {h00=0x0010, h01=0x0050, text=» B FDERR ERR«, t00=0x0022, t01=0x0070}
0x3594…35a2 Head {h00=0x000a, h01=0x0050, text=»FD150 «, t00=0x0022, t01=0x0084}
0x35a2…35d4 Head {h00=0x002e, h01=0x0050, text=» IB DEBINW2,FD160,FD180,FD170 CLR,CAN,RET «, t00=0x0022, t01=0x0092}
0x35d4…35e2 Head {h00=0x000a, h01=0x0050, text=»* ENT «, t00=0x0022, t01=0x00c4}
0x35e2…35ea Head {h00=0x0004, h01=0x0050, t00=0x0022, t01=0x00d2}
0x35ea…35f8 Head {h00=0x000a, h01=0x0050, text=»FD160 «, t00=0x0022, t01=0x00da}
0x35f8…3620 Head {h00=0x0024, h01=0x0050, text=» MOVE STR8A,STR8B SAVE FILE NAME«, t00=0x0022, t01=0x00e8}
0x3620…3648 Head {h00=0x0024, h01=0x0050, text=» MOVE FDCNT,W1 RESET FD COUNTER «, t00=0x0022, t01=0x0110}
0x3648…3670 Head {h00=0x0024, h01=0x0050, text=» PERF FDWVOL WRITE VOLUME LABEL «, t00=0x0022, t01=0x0138}
0x3670…3684 Head {h00=0x0010, h01=0x0050, text=» B FD165 OK «, t00=0x0022, t01=0x0160}
0x3684…369a Head {h00=0x0012, h01=0x0050, text=» B FDERR ERROR«, t00=0x0022, t01=0x0174}
0x369a…36a2 Head {h00=0x0004, h01=0x0050, t00=0x0022, t01=0x018a}
0x36a2…36b0 (35, 0, 400) Head {h00=0x000a, h01=0x0050, text=»FD165 «, t00=0x0023, t01=0x0004}
0x36b0…36c4 Head {h00=0x0010, h01=0x0050, text=» B DECOOK OK«, t00=0x0023, t01=0x0012}
0x36c4…36cc Head {h00=0x0004, h01=0x0050, t00=0x0023, t01=0x0026}
0x36cc…36da Head {h00=0x000a, h01=0x0050, text=»FD170 «, t00=0x0023, t01=0x002e}
0x36da…3706 Head {h00=0x0028, h01=0x0050, text=» MOVE RETCON,=W'-4' ABORT CONVERSION«, t00=0x0023, t01=0x003c}
0x3706…3718 Head {h00=0x000e, h01=0x0050, text=» B FDERRT «, t00=0x0023, t01=0x0068}
0x3718…3720 Head {h00=0x0004, h01=0x0050, t00=0x0023, t01=0x007a}
0x3720…372e Head {h00=0x000a, h01=0x0050, text=»FDERR «, t00=0x0023, t01=0x0082}
0x372e…3762 Head {h00=0x0030, h01=0x0050, text=» MOVE RETCON,=W'35' OUTP. DEV. NOT OPERABLE «, t00=0x0023, t01=0x0090}
0x3762…3770 Head {h00=0x000a, h01=0x0050, text=»FDERRT«, t00=0x0023, t01=0x00c4}
0x3770…3782 Head {h00=0x000e, h01=0x0050, text=» SET FDBAB«, t00=0x0023, t01=0x00d2}
0x3782…3794 Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0023, t01=0x00e4}
0x3794…379c Head {h00=0x0004, h01=0x0050, t00=0x0023, t01=0x00f6}
0x379c…37aa Head {h00=0x000a, h01=0x0050, text=»FD180 «, t00=0x0023, t01=0x00fe}
0x37aa…37c0 Head {h00=0x0012, h01=0x0050, text=» MOVE CWFD,W7 «, t00=0x0023, t01=0x010c}
0x37c0…37dc Head {h00=0x0018, h01=0x0050, text=» MOVE REQFD,=W'128' «, t00=0x0023, t01=0x0122}
0x37dc…381e Head {h00=0x003e, h01=0x0050, text=» CALL FDIO,DSFD,X'B8',BPOOL(BIN10),REQFD,CWFD *UNLOAD HDR1«, t00=0x0023, t01=0x013e}
0x381e…3844 Head {h00=0x0022, h01=0x0050, text=» MOVE RETCON,=W'55' CHANGE FD «, t00=0x0023, t01=0x0180}
0x3844…3856 Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0024, t01=0x0016}
0x3856…3864 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0024, t01=0x0028}
0x3864…386e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0036}
0x386e…3888 Head {h00=0x0016, h01=0x0050, text=»* BATCHEAD RECORD «, t00=0x0024, t01=0x0040}
0x3888…3892 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x005a}
0x3892…38a0 Head {h00=0x000a, h01=0x0050, text=»FD200 «, t00=0x0024, t01=0x0064}
0x38a0…38b8 Head {h00=0x0014, h01=0x0050, text=» TBT FDBAB,FD170«, t00=0x0024, t01=0x0072}
0x38b8…38e4 Head {h00=0x0028, h01=0x0050, text=» TBF BDAFOR,FD300 ANY FORCED FIELDS?«, t00=0x0024, t01=0x008a}
0x38e4…3914 Head {h00=0x002c, h01=0x0050, text=» EDWRT DEDSPRT,FBATC3 PRINT ERROR REPORT«, t00=0x0024, t01=0x00b6}
0x3914…3926 Head {h00=0x000e, h01=0x0050, text=» SET FDBAB«, t00=0x0024, t01=0x00e6}
0x3926…3950 Head {h00=0x0026, h01=0x0050, text=» MOVE RETCON,=W'-1' GET NEXT BATCH«, t00=0x0024, t01=0x00f8}
0x3950…3962 Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0024, t01=0x0122}
0x3962…3970 Head {h00=0x000a, h01=0x0050, text=»FD300 «, t00=0x0024, t01=0x0134}
0x3970…3988 Head {h00=0x0014, h01=0x0050, text=» TBT FDBAB,FD170«, t00=0x0024, t01=0x0142}
0x3988…39a2 Head {h00=0x0016, h01=0x0050, text=» TBT FDEOF,FDEOF10«, t00=0x0024, t01=0x015a}
0x39a2…39c6 Head {h00=0x0020, h01=0x0050, text=» CBE TYPE,W4,FD305 PRINTING «, t00=0x0024, t01=0x0174}
0x39c6…39ea Head {h00=0x0020, h01=0x0050, text=» CBE TYPE,W2,FD305 PRINTING «, t00=0x0025, t01=0x0008}
0x39ea…3a06 Head {h00=0x0018, h01=0x0050, text=» B FD308 NO PRINTING«, t00=0x0025, t01=0x002c}
0x3a06…3a14 Head {h00=0x000a, h01=0x0050, text=»FD305 «, t00=0x0025, t01=0x0048}
0x3a14…3a42 Head {h00=0x002a, h01=0x0050, text=»* PRINT BATCH HEAD AND BALANCE RECORD «, t00=0x0025, t01=0x0056}
0x3a42…3a5a Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW3,W1«, t00=0x0025, t01=0x0084}
0x3a5a…3a7c Head {h00=0x001e, h01=0x0050, text=» PRINT DEDSPRT,DEBINW3,W0 «, t00=0x0025, t01=0x009c}
0x3a7c…3a90 Head {h00=0x0010, h01=0x0050, text=» BNOK FDERR «, t00=0x0025, t01=0x00be}
0x3a90…3a9e Head {h00=0x000a, h01=0x0050, text=»FD308 «, t00=0x0025, t01=0x00d2}
0x3a9e…3acc Head {h00=0x002a, h01=0x0050, text=» MOVE BIN10,WORK(W13) GET BUFFER INDEX«, t00=0x0025, t01=0x00e0}
0x3acc…3af4 Head {h00=0x0024, h01=0x0050, text=» MOVE BIN9,BIN10 GET BPOOL INDEX«, t00=0x0025, t01=0x010e}
0x3af4…3b08 Head {h00=0x0010, h01=0x0050, text=» ADD BIN9,W1«, t00=0x0025, t01=0x0136}
0x3b08…3b30 Head {h00=0x0024, h01=0x0050, text=» MOVE BIN8,W0 RESET FIELD NUMBER«, t00=0x0025, t01=0x014a}
0x3b30…3b3e Head {h00=0x000a, h01=0x0050, text=»FD310 «, t00=0x0025, t01=0x0172}
0x3b3e…3b54 Head {h00=0x0012, h01=0x0050, text=» MOVE BIN4,W0 «, t00=0x0025, t01=0x0180}
0x3b54…3b62 Head {h00=0x000a, h01=0x0050, text=»FD311 «, t00=0x0026, t01=0x0008}
0x3b62…3b7c Head {h00=0x0016, h01=0x0050, text=» PERF CONV,BIN4,FC«, t00=0x0026, t01=0x0016}
0x3b7c…3b96 Head {h00=0x0016, h01=0x0050, text=» B DECOOK ALL DONE«, t00=0x0026, t01=0x0030}
0x3b96…3bb4 Head {h00=0x001a, h01=0x0050, text=» B FD340 WRITE BLOCKS «, t00=0x0026, t01=0x004a}
0x3bb4…3bd6 Head {h00=0x001e, h01=0x0050, text=» B FD315 CUMP FIELD EMPTHY«, t00=0x0026, t01=0x0068}
0x3bd6…3bfa Head {h00=0x0020, h01=0x0050, text=» B FD320 BCD FIELD OVERFLOW «, t00=0x0026, t01=0x008a}
0x3bfa…3c20 Head {h00=0x0022, h01=0x0050, text=» B FD320 EDIT BUFFER OVERFLOW «, t00=0x0026, t01=0x00ae}
0x3c20…3c2e Head {h00=0x000a, h01=0x0050, text=»FD315 «, t00=0x0026, t01=0x00d4}
0x3c2e…3c46 Head {h00=0x0014, h01=0x0050, text=» MOVE RETCON,W5 «, t00=0x0026, t01=0x00e2}
0x3c46…3c58 Head {h00=0x000e, h01=0x0050, text=» B FDERRT «, t00=0x0026, t01=0x00fa}
0x3c58…3c60 Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x010c}
0x3c60…3c6e Head {h00=0x000a, h01=0x0050, text=»FD320 «, t00=0x0026, t01=0x0114}
0x3c6e…3c94 Head {h00=0x0022, h01=0x0050, text=» MOVE RETCON,=W'54' EDIT ERROR«, t00=0x0026, t01=0x0122}
0x3c94…3ca6 Head {h00=0x000e, h01=0x0050, text=» B FDERRT «, t00=0x0026, t01=0x0148}
0x3ca6…3cb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x015a}
0x3cb0…3cc6 Head {h00=0x0012, h01=0x0050, text=»* WRITE BLOCKS«, t00=0x0026, t01=0x0164}
0x3cc6…3cd0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x017a}
0x3cd0…3cd8 Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x0184}
0x3cd8…3ce6 Head {h00=0x000a, h01=0x0050, text=»FD340 «, t00=0x0026, t01=0x018c}
0x3ce6…3d0a Head {h00=0x0020, h01=0x0050, text=» PERF FDWRIT,FC,TYPE,RETCON «, t00=0x0027, t01=0x000a}
0x3d0a…3d1e Head {h00=0x0010, h01=0x0050, text=» B FD310 OK «, t00=0x0027, t01=0x002e}
0x3d1e…3d34 Head {h00=0x0012, h01=0x0050, text=» B FD360 ERROR«, t00=0x0027, t01=0x0042}
0x3d34…3d4a Head {h00=0x0012, h01=0x0050, text=» B FDEOF05 EOE«, t00=0x0027, t01=0x0058}
0x3d4a…3d78 Head {h00=0x002a, h01=0x0050, text=» MOVE BIN4,W1 CONTINUE IN SAME BUFFER «, t00=0x0027, t01=0x006e}
0x3d78…3d88 Head {h00=0x000c, h01=0x0050, text=» B FD311«, t00=0x0027, t01=0x009c}
0x3d88…3d96 Head {h00=0x000a, h01=0x0050, text=»FD350 «, t00=0x0027, t01=0x00ac}
0x3d96…3daa Head {h00=0x0010, h01=0x0050, text=» PERF FDLOAD«, t00=0x0027, t01=0x00ba}
0x3daa…3dbe Head {h00=0x0010, h01=0x0050, text=» B FD370 OK «, t00=0x0027, t01=0x00ce}
0x3dbe…3dd4 Head {h00=0x0012, h01=0x0050, text=» B FD360 ERROR«, t00=0x0027, t01=0x00e2}
0x3dd4…3de2 Head {h00=0x000a, h01=0x0050, text=»FD360 «, t00=0x0027, t01=0x00f8}
0x3de2…3dfe Head {h00=0x0018, h01=0x0050, text=» MOVE REQFD,=W'128' «, t00=0x0027, t01=0x0106}
0x3dfe…3e14 Head {h00=0x0012, h01=0x0050, text=» MOVE CWFD,W7 «, t00=0x0027, t01=0x0122}
0x3e14…3e50 Head {h00=0x0038, h01=0x0050, text=» CALL FDIO,DSFD,X'B8',BPOOL(BIN10),REQFD,CWFD UNLOAD«, t00=0x0027, t01=0x0138}
0x3e50…3e5e Head {h00=0x000a, h01=0x0050, text=»FD365 «, t00=0x0027, t01=0x0174}
0x3e5e…3e8c Head {h00=0x002a, h01=0x0050, text=» MOVE DEBINW4,=W'55' CHANGE FLOPPYDISK«, t00=0x0027, t01=0x0182}
0x3e8c…3ea8 Head {h00=0x0018, h01=0x0050, text=» PERF DERROR,KEYTAB «, t00=0x0028, t01=0x0020}
0x3ea8…3eda Head {h00=0x002e, h01=0x0050, text=» IB DEBINW2,FD350,FD360,FD170 CLR,CAN,RET «, t00=0x0028, t01=0x003c}
0x3eda…3eee Head {h00=0x0010, h01=0x0050, text=» B FD350 ENT«, t00=0x0028, t01=0x006e}
0x3eee…3efc Head {h00=0x000a, h01=0x0050, text=»FD370 «, t00=0x0028, t01=0x0082}
0x3efc…3f22 Head {h00=0x0022, h01=0x0050, text=» PERF FDRVOL READ VOLUME LABEL«, t00=0x0028, t01=0x0090}
0x3f22…3f36 Head {h00=0x0010, h01=0x0050, text=» B FD375 OK «, t00=0x0028, t01=0x00b6}
0x3f36…3f4c Head {h00=0x0012, h01=0x0050, text=» B FD360 ERROR«, t00=0x0028, t01=0x00ca}
0x3f4c…3f5a Head {h00=0x000a, h01=0x0050, text=»FD375 «, t00=0x0028, t01=0x00e0}
0x3f5a…3f8c Head {h00=0x002e, h01=0x0050, text=» IB DEBINW2,FD380,FD360,FD170 CLR,CAN,RET «, t00=0x0028, t01=0x00ee}
0x3f8c…3f9a Head {h00=0x000a, h01=0x0050, text=»* ENT «, t00=0x0028, t01=0x0120}
0x3f9a…3fa2 Head {h00=0x0004, h01=0x0050, t00=0x0028, t01=0x012e}
0x3fa2…3fb0 Head {h00=0x000a, h01=0x0050, text=»FD380 «, t00=0x0028, t01=0x0136}
0x3fb0…3fd8 Head {h00=0x0024, h01=0x0050, text=» PERF FDWVOL WRITE VOLUME LABEL «, t00=0x0028, t01=0x0144}
0x3fd8…3fec Head {h00=0x0010, h01=0x0050, text=» B FD382 OK «, t00=0x0028, t01=0x016c}
0x3fec…4002 Head {h00=0x0012, h01=0x0050, text=» B FD360 ERROE«, t00=0x0028, t01=0x0180}
0x4002…400a Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x0008}
0x400a…4018 Head {h00=0x000a, h01=0x0050, text=»FD382 «, t00=0x0029, t01=0x0010}
0x4018…4038 Head {h00=0x001c, h01=0x0050, text=» TBF FDEOF,FD340 NOT EOF«, t00=0x0029, t01=0x001e}
0x4038…4066 Head {h00=0x002a, h01=0x0050, text=» MOVE RETCON,=W'-6' GET CURRENT RECORD«, t00=0x0029, t01=0x003e}
0x4066…4078 Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0029, t01=0x006c}
0x4078…4080 Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x007e}
0x4080…4090 Head {h00=0x000c, h01=0x0050, text=»FDEOF05 «, t00=0x0029, t01=0x0086}
0x4090…40b0 Head {h00=0x001c, h01=0x0050, text=» SET FDEOF INDICATE EOF «, t00=0x0029, t01=0x0096}
0x40b0…40da Head {h00=0x0026, h01=0x0050, text=» MOVE WORK(W14),BIN8 SAVE FIELD NO«, t00=0x0029, t01=0x00b6}
0x40da…40ea Head {h00=0x000c, h01=0x0050, text=» B FD360«, t00=0x0029, t01=0x00e0}
0x40ea…40f2 Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x00f0}
0x40f2…4102 Head {h00=0x000c, h01=0x0050, text=»FDEOF10 «, t00=0x0029, t01=0x00f8}
0x4102…4116 Head {h00=0x0010, h01=0x0050, text=» CLEAR FDEOF«, t00=0x0029, t01=0x0108}
0x4116…4144 Head {h00=0x002a, h01=0x0050, text=» MOVE BIN10,WORK(W13) GET BUFFER INDEX«, t00=0x0029, t01=0x011c}
0x4144…416c Head {h00=0x0024, h01=0x0050, text=» MOVE BIN9,BIN10 GET BPOOL INDEX«, t00=0x0029, t01=0x014a}
0x416c…4180 Head {h00=0x0010, h01=0x0050, text=» ADD BIN9,W1«, t00=0x0029, t01=0x0172}
0x4180…41aa Head {h00=0x0026, h01=0x0050, text=» MOVE BIN8,WORK(W14) GET FIELD NO «, t00=0x0029, t01=0x0186}
0x41aa…41c6 Head {h00=0x0018, h01=0x0050, text=» MOVE REQFD,=W'128' «, t00=0x002a, t01=0x0020}
0x41c6…41dc Head {h00=0x0012, h01=0x0050, text=» MOVE CWFD,W0 «, t00=0x002a, t01=0x003c}
0x41dc…421e Head {h00=0x003e, h01=0x0050, text=» CALL FDIO,DSFD,X'06',BPOOL(BIN10),REQFD,CWFD WRITE BLOCKS«, t00=0x002a, t01=0x0052}
0x421e…422e Head {h00=0x000c, h01=0x0050, text=» B FD340«, t00=0x002a, t01=0x0094}
0x422e…423c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002a, t01=0x00a4}
0x423c…424a Head {h00=0x000a, h01=0x0050, text=»FD400 «, t00=0x002a, t01=0x00b2}
0x424a…4268 Head {h00=0x001a, h01=0x0050, text=»* BALANCE FORMAT «, t00=0x002a, t01=0x00c0}
0x4268…4278 Head {h00=0x000c, h01=0x0050, text=» B FD300«, t00=0x002a, t01=0x00de}
0x4278…4286 Head {h00=0x000a, h01=0x0050, text=»FD500 «, t00=0x002a, t01=0x00ee}
0x4286…42a4 Head {h00=0x001a, h01=0x0050, text=» TBT FDBAB,FD560 ABORT«, t00=0x002a, t01=0x00fc}
0x42a4…42b2 Head {h00=0x000a, h01=0x0050, text=»FD505 «, t00=0x002a, t01=0x011a}
0x42b2…42c8 Head {h00=0x0012, h01=0x0050, text=»***PERF FDWRIT«, t00=0x002a, t01=0x0128}
0x42c8…42dc Head {h00=0x0010, h01=0x0050, text=» B FD570 OK «, t00=0x002a, t01=0x013e}
0x42dc…42f0 Head {h00=0x0010, h01=0x0050, text=» B FDERR ERR«, t00=0x002a, t01=0x0152}
0x42f0…4304 Head {h00=0x0010, h01=0x0050, text=» B FD510 EOE«, t00=0x002a, t01=0x0166}
0x4304…4312 Head {h00=0x000a, h01=0x0050, text=»FD510 «, t00=0x002a, t01=0x017a}
0x4312…432e Head {h00=0x0018, h01=0x0050, text=» MOVE REQFD,=W'128' «, t00=0x002a, t01=0x0188}
0x432e…4344 Head {h00=0x0012, h01=0x0050, text=» MOVE CWFD,W7 «, t00=0x002b, t01=0x0014}
0x4344…4380 Head {h00=0x0038, h01=0x0050, text=» CALL FDIO,DSFD,X'B8',BPOOL(BIN10),REQFD,CWFD UNLOAD«, t00=0x002b, t01=0x002a}
0x4380…438e Head {h00=0x000a, h01=0x0050, text=»FD515 «, t00=0x002b, t01=0x0066}
0x438e…43bc Head {h00=0x002a, h01=0x0050, text=» MOVE DEBINW4,=W'55' CHANGE FLOPPYDISK«, t00=0x002b, t01=0x0074}
0x43bc…43d8 Head {h00=0x0018, h01=0x0050, text=» PERF DERROR,KEYTAB «, t00=0x002b, t01=0x00a2}
0x43d8…440a Head {h00=0x002e, h01=0x0050, text=» IB DEBINW2,FD520,FD510,FD170 CLR,CAN,RET «, t00=0x002b, t01=0x00be}
0x440a…4418 Head {h00=0x000a, h01=0x0050, text=»FD520 «, t00=0x002b, t01=0x00f0}
0x4418…442c Head {h00=0x0010, h01=0x0050, text=» PERF FDLOAD«, t00=0x002b, t01=0x00fe}
0x442c…4440 Head {h00=0x0010, h01=0x0050, text=» B FD525 OK «, t00=0x002b, t01=0x0112}
0x4440…4456 Head {h00=0x0012, h01=0x0050, text=» B FD510 ERROR«, t00=0x002b, t01=0x0126}
0x4456…4464 Head {h00=0x000a, h01=0x0050, text=»FD525 «, t00=0x002b, t01=0x013c}
0x4464…448a Head {h00=0x0022, h01=0x0050, text=» PERF FDRVOL READ VOLUME LABEL«, t00=0x002b, t01=0x014a}
0x448a…449e Head {h00=0x0010, h01=0x0050, text=» B FD530 OK «, t00=0x002b, t01=0x0170}
0x449e…44b4 Head {h00=0x0012, h01=0x0050, text=» B FD510 ERROR«, t00=0x002b, t01=0x0184}
0x44b4…44c2 Head {h00=0x000a, h01=0x0050, text=»FD530 «, t00=0x002c, t01=0x000a}
0x44c2…44f4 Head {h00=0x002e, h01=0x0050, text=» IB DEBINW2,FD535,FD510,FD170 CLR,CAN,RET «, t00=0x002c, t01=0x0018}
0x44f4…4502 Head {h00=0x000a, h01=0x0050, text=»* ENT «, t00=0x002c, t01=0x004a}
0x4502…4510 Head {h00=0x000a, h01=0x0050, text=»FD535 «, t00=0x002c, t01=0x0058}
0x4510…4538 Head {h00=0x0024, h01=0x0050, text=» PERF FDWVOL WRITE VOLUME LABEL «, t00=0x002c, t01=0x0066}
0x4538…454c Head {h00=0x0010, h01=0x0050, text=» B FD540 OK «, t00=0x002c, t01=0x008e}
0x454c…4562 Head {h00=0x0012, h01=0x0050, text=» B FD510 ERROR«, t00=0x002c, t01=0x00a2}
0x4562…4570 Head {h00=0x000a, h01=0x0050, text=»FD540 «, t00=0x002c, t01=0x00b8}
0x4570…458c Head {h00=0x0018, h01=0x0050, text=» MOVE REQFD,=W'128' «, t00=0x002c, t01=0x00c6}
0x458c…45a2 Head {h00=0x0012, h01=0x0050, text=» MOVE CWFD,W0 «, t00=0x002c, t01=0x00e2}
0x45a2…45e4 Head {h00=0x003e, h01=0x0050, text=» CALL FDIO,DSFD,X'06',BPOOL(BIN10),REQFD,CWFD WRITE BLOCKS«, t00=0x002c, t01=0x00f8}
0x45e4…45f4 Head {h00=0x000c, h01=0x0050, text=» B FD505«, t00=0x002c, t01=0x013a}
0x45f4…4602 Head {h00=0x000a, h01=0x0050, text=»FD550 «, t00=0x002c, t01=0x014a}
0x4602…4614 Head {h00=0x000e, h01=0x0050, text=» WAIT DSFD«, t00=0x002c, t01=0x0158}
0x4614…4628 Head {h00=0x0010, h01=0x0050, text=» CLEAR FDBAB«, t00=0x002c, t01=0x016a}
0x4628…4648 Head {h00=0x001c, h01=0x0050, text=» MOVE CWFD,W7 HDR SECTOR«, t00=0x002c, t01=0x017e}
0x4648…4664 Head {h00=0x0018, h01=0x0050, text=» MOVE REQFD,=W'128' «, t00=0x002d, t01=0x000e}
0x4664…46a0 Head {h00=0x0038, h01=0x0050, text=» CALL FDIO,DSFD,X'B8',BPOOL(BIN10),REQFD,CWFD UNLOAD«, t00=0x002d, t01=0x002a}
0x46a0…46be Head {h00=0x001a, h01=0x0050, text=» CLEAR FDEOF RESET EOF«, t00=0x002d, t01=0x0066}
0x46be…46d4 Head {h00=0x0012, h01=0x0050, text=» MOVE CWFD,W7 «, t00=0x002d, t01=0x0084}
0x46d4…46f0 Head {h00=0x0018, h01=0x0050, text=» MOVE REQFD,=W'128' «, t00=0x002d, t01=0x009a}
0x46f0…472c Head {h00=0x0038, h01=0x0050, text=» CALL FDIO,DSFD,X'A2',BPOOL(BIN10),REQFD,CWFD CLOSE «, t00=0x002d, t01=0x00b6}
0x472c…4742 Head {h00=0x0012, h01=0x0050, text=» MOVE BIN4,W0 «, t00=0x002d, t01=0x00f2}
0x4742…4760 Head {h00=0x001a, h01=0x0050, text=» DSC1 DSFD,DETACH,BIN4«, t00=0x002d, t01=0x0108}
0x4760…4774 Head {h00=0x0010, h01=0x0050, text=» PERF DETPRT«, t00=0x002d, t01=0x0126}
0x4774…478c Head {h00=0x0014, h01=0x0050, text=»* RELEAS BUFFERS«, t00=0x002d, t01=0x013a}
0x478c…47b6 Head {h00=0x0026, h01=0x0050, text=» PERF DEPOOL,W6,BIN10,BIN4,STRG10A«, t00=0x002d, t01=0x0152}
0x47b6…47c8 Head {h00=0x000e, h01=0x0050, text=» B DECOOK «, t00=0x002d, t01=0x017c}
0x47c8…47d6 Head {h00=0x000a, h01=0x0050, text=»FD560 «, t00=0x002d, t01=0x018e}
0x47d6…47f2 Head {h00=0x0018, h01=0x0050, text=» MOVE STRG10A,HEX00 «, t00=0x002e, t01=0x000c}
0x47f2…480a Head {h00=0x0014, h01=0x0050, text=» GETTIME STRG10A«, t00=0x002e, t01=0x0028}
0x480a…4824 Head {h00=0x0016, h01=0x0050, text=» MOVE TIME,STRG10A«, t00=0x002e, t01=0x0040}
0x4824…4842 Head {h00=0x001a, h01=0x0050, text=» EDWRT DEDSPRT,FFDERR «, t00=0x002e, t01=0x005a}
0x4842…4852 Head {h00=0x000c, h01=0x0050, text=» B FD550«, t00=0x002e, t01=0x0078}
0x4852…485a Head {h00=0x0004, h01=0x0050, t00=0x002e, t01=0x0088}
0x485a…4868 Head {h00=0x000a, h01=0x0050, text=»FD570 «, t00=0x002e, t01=0x0090}
0x4868…4884 Head {h00=0x0018, h01=0x0050, text=» MOVE STRG10A,HEX00 «, t00=0x002e, t01=0x009e}
0x4884…489c Head {h00=0x0014, h01=0x0050, text=» GETTIME STRG10A«, t00=0x002e, t01=0x00ba}
0x489c…48b6 Head {h00=0x0016, h01=0x0050, text=» MOVE TIME,STRG10A«, t00=0x002e, t01=0x00d2}
0x48b6…48d4 Head {h00=0x001a, h01=0x0050, text=» EDWRT DEDSPRT,FFDEND «, t00=0x002e, t01=0x00ec}
0x48d4…48e4 Head {h00=0x000c, h01=0x0050, text=» B FD550«, t00=0x002e, t01=0x010a}
0x48e4…48f2 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x002e, t01=0x011a}
0x48f2…4900 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002e, t01=0x0128}
0x4900…490a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0136}
0x490a…4936 Head {h00=0x0028, h01=0x0050, text=»* GETBUF GET TWO CONSECUTIVE BUFFERS«, t00=0x002e, t01=0x0140}
0x4936…4940 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x016c}
0x4940…4964 Head {h00=0x0020, h01=0x0050, text=»* BUFFER INDEX IN WORK(W13) «, t00=0x002e, t01=0x0176}
0x4964…496e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x000a}
0x496e…4976 Head {h00=0x0004, h01=0x0050, t00=0x002f, t01=0x0014}
0x4976…498a Head {h00=0x0010, h01=0x0050, text=»GETBUF PROC «, t00=0x002f, t01=0x001c}
0x498a…49b8 Head {h00=0x002a, h01=0x0050, text=» MOVE BIN10,W3 TOTAL NUMBER OF BUFFERS«, t00=0x002f, t01=0x0030}
0x49b8…49e8 Head {h00=0x002c, h01=0x0050, text=» MOVE BIN4,W3 NO. OF COSECUTIVE BUFFERS «, t00=0x002f, t01=0x005e}
0x49e8…4a2c Head {h00=0x0040, h01=0x0050, text=» PERF DEPOOL,W2,BIN10,BIN4,STRG10A GET 3 COSECUTIVE BUFFERS «, t00=0x002f, t01=0x008e}
0x4a2c…4a54 Head {h00=0x0024, h01=0x0050, text=» BNOK GETBU2 NO BUFFERS AVAIBLE «, t00=0x002f, t01=0x00d2}
0x4a54…4a84 Head {h00=0x002c, h01=0x0050, text=» MOVE WORK(W13),BIN10 SAVE BUFFER INDEX «, t00=0x002f, t01=0x00fa}
0x4a84…4ab6 Head {h00=0x002e, h01=0x0050, text=» MOVE BIN9,BIN10 LOAD WORKING BUFFER INDEX«, t00=0x002f, t01=0x012a}
0x4ab6…4adc Head {h00=0x0022, h01=0x0050, text=» ADD BIN9,W1 INDEX EDIT BUFFER«, t00=0x002f, t01=0x015c}
0x4adc…4b14 Head {h00=0x0034, h01=0x0050, text=» MOVE BPOOL(BIN10),=X'00' RESET TRANSMIT BUFFER «, t00=0x002f, t01=0x0182}
0x4b14…4b20 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0030, t01=0x002a}
0x4b20…4b2e Head {h00=0x000a, h01=0x0050, text=»GETBU2«, t00=0x0030, t01=0x0036}
0x4b2e…4b3c Head {h00=0x000a, h01=0x0050, text=» RET 2«, t00=0x0030, t01=0x0044}
0x4b3c…4b4a Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0030, t01=0x0052}
0x4b4a…4b58 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x0060}
0x4b58…4b62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x006e}
0x4b62…4b92 Head {h00=0x002c, h01=0x0050, text=»* FDRVOL READ VOLUME LABEL AND DISPLAY «, t00=0x0030, t01=0x0078}
0x4b92…4b9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00a8}
0x4b9c…4bb0 Head {h00=0x0010, h01=0x0050, text=»FDRVOL PROC «, t00=0x0030, t01=0x00b2}
0x4bb0…4bcc Head {h00=0x0018, h01=0x0050, text=» MOVE REQFD,=W'128' «, t00=0x0030, t01=0x00c6}
0x4bcc…4bf6 Head {h00=0x0026, h01=0x0050, text=» MOVE BIN13,BIN10 GET BUFFER INDEX«, t00=0x0030, t01=0x00e2}
0x4bf6…4c22 Head {h00=0x0028, h01=0x0050, text=» ADD BIN13,W2 ADJUST FOR READ BUFFER«, t00=0x0030, t01=0x010c}
0x4c22…4c38 Head {h00=0x0012, h01=0x0050, text=» MOVE CWFD,W7 «, t00=0x0030, t01=0x0138}
0x4c38…4c7a Head {h00=0x003e, h01=0x0050, text=» CALL FDIO,DSFD,X'91',BPOOL(BIN13),REQFD,CWFD READ (HDR1) «, t00=0x0030, t01=0x014e}
0x4c7a…4c92 Head {h00=0x0014, h01=0x0050, text=» XSTAT DSFD,BIN4«, t00=0x0030, t01=0x0190}
0x4c92…4cae Head {h00=0x0018, h01=0x0050, text=» MOVE BIN7,=X'086F' «, t00=0x0031, t01=0x0018}
0x4cae…4cca Head {h00=0x0018, h01=0x0050, text=» CALL MASK,BIN4,BIN7«, t00=0x0031, t01=0x0034}
0x4cca…4cde Head {h00=0x0010, h01=0x0050, text=» BNOK FDRV02«, t00=0x0031, t01=0x0050}
0x4cde…4cf8 Head {h00=0x0016, h01=0x0050, text=» MOVE BIN7,=W'66' «, t00=0x0031, t01=0x0064}
0x4cf8…4d34 Head {h00=0x0038, h01=0x0050, text=» XCOPY STR6A,W0,W6,BPOOL(BIN13),BIN7 EXPIRATION DATE«, t00=0x0031, t01=0x007e}
0x4d34…4d6c Head {h00=0x0034, h01=0x0050, text=» XCOPY STR8A,W0,W8,BPOOL(BIN13),W5 GET FILE NAME«, t00=0x0031, t01=0x00ba}
0x4d6c…4d94 Head {h00=0x0024, h01=0x0050, text=» MOVE BIN7,W22 GET RECORD LENGTH«, t00=0x0031, t01=0x00f2}
0x4d94…4dc0 Head {h00=0x0028, h01=0x0050, text=» XCOPY STR6B,W1,W5,BPOOL(BIN13),BIN7«, t00=0x0031, t01=0x011a}
0x4dc0…4dda Head {h00=0x0016, h01=0x0050, text=» MOVE RECLGD,STR6B«, t00=0x0031, t01=0x0146}
0x4dda…4df4 Head {h00=0x0016, h01=0x0050, text=» MOVE BIN7,=W'45' «, t00=0x0031, t01=0x0160}
0x4df4…4e2e Head {h00=0x0036, h01=0x0050, text=» XCOPY STR2A,W0,W2,BPOOL(BIN13),BIN7 GET FD NUMBER«, t00=0x0031, t01=0x017a}
0x4e2e…4e44 Head {h00=0x0012, h01=0x0050, text=» ATTFMT FCAS02«, t00=0x0032, t01=0x0024}
0x4e44…4e5a Head {h00=0x0012, h01=0x0050, text=» SET DEPROMPT «, t00=0x0032, t01=0x003a}
0x4e5a…4e72 Head {h00=0x0014, h01=0x0050, text=» DISPLAY 0,W1,W0«, t00=0x0032, t01=0x0050}
0x4e72…4e80 Head {h00=0x000a, h01=0x0050, text=» THOME«, t00=0x0032, t01=0x0068}
0x4e80…4eaa Head {h00=0x0026, h01=0x0050, text=» MOVE DEBINW3,W1 REQUESTED LENGTH «, t00=0x0032, t01=0x0076}
0x4eaa…4ee0 Head {h00=0x0032, h01=0x0050, text=» NKI .NE,DEDSDYKB,STR1A,KEYTAB,DEBINW3,DEBINW2«, t00=0x0032, t01=0x00a0}
0x4ee0…4eec Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0032, t01=0x00d6}
0x4eec…4efa Head {h00=0x000a, h01=0x0050, text=»FDRV02«, t00=0x0032, t01=0x00e2}
0x4efa…4f08 Head {h00=0x000a, h01=0x0050, text=» RET 2«, t00=0x0032, t01=0x00f0}
0x4f08…4f16 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0032, t01=0x00fe}
0x4f16…4f24 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0032, t01=0x010c}
0x4f24…4f2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x011a}
0x4f2e…4f52 Head {h00=0x0020, h01=0x0050, text=»* FDWVOL WRITE VOLUME LABEL«, t00=0x0032, t01=0x0124}
0x4f52…4f5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0148}
0x4f5c…4f64 Head {h00=0x0004, h01=0x0050, t00=0x0032, t01=0x0152}
0x4f64…4f6c Head {h00=0x0004, h01=0x0050, t00=0x0032, t01=0x015a}
0x4f6c…4f80 Head {h00=0x0010, h01=0x0050, text=»FDWVOL PROC «, t00=0x0032, t01=0x0162}
0x4f80…4f9a Head {h00=0x0016, h01=0x0050, text=» MOVE BIN7,=W'66' «, t00=0x0032, t01=0x0176}
0x4f9a…4fc4 Head {h00=0x0026, h01=0x0050, text=» MOVE BIN13,BIN10 GET BUFFER INDEX«, t00=0x0032, t01=0x0190}
0x4fc4…4ff0 Head {h00=0x0028, h01=0x0050, text=» ADD BIN13,W2 ADJUST FOR READ BUFFER«, t00=0x0033, t01=0x002a}
0x4ff0…501e Head {h00=0x002a, h01=0x0050, text=» EDSUB BPOOL(BIN13),BIN7,FRMVOL2 DATE «, t00=0x0033, t01=0x0056}
0x501e…5034 Head {h00=0x0012, h01=0x0050, text=» MOVE BIN7,W5 «, t00=0x0033, t01=0x0084}
0x5034…5068 Head {h00=0x0030, h01=0x0050, text=» EDSUB BPOOL(BIN13),BIN7,FRMVOL1 VOLUME NAME«, t00=0x0033, t01=0x009a}
0x5068…5082 Head {h00=0x0016, h01=0x0050, text=» MOVE BIN7,=W'45' «, t00=0x0033, t01=0x00ce}
0x5082…50b4 Head {h00=0x002e, h01=0x0050, text=» EDSUB BPOOL(BIN13),BIN7,FRMVOL3 FD NUMBER«, t00=0x0033, t01=0x00e8}
0x50b4…50e0 Head {h00=0x0028, h01=0x0050, text=» MOVE REQFD,=W'128' REQUESTED LENGTH«, t00=0x0033, t01=0x011a}
0x50e0…50f6 Head {h00=0x0012, h01=0x0050, text=» MOVE CWFD,W7 «, t00=0x0033, t01=0x0146}
0x50f6…5138 Head {h00=0x003e, h01=0x0050, text=» CALL FDIO,DSFD,X'95',BPOOL(BIN13),REQFD,CWFD WRITE (HDR1)«, t00=0x0033, t01=0x015c}
0x5138…5150 Head {h00=0x0014, h01=0x0050, text=» XSTAT DSFD,BIN4«, t00=0x0034, t01=0x000e}
0x5150…516c Head {h00=0x0018, h01=0x0050, text=» MOVE BIN7,=X'024F' «, t00=0x0034, t01=0x0026}
0x516c…5188 Head {h00=0x0018, h01=0x0050, text=» CALL MASK,BIN4,BIN7«, t00=0x0034, t01=0x0042}
0x5188…5190 Head {h00=0x0004, h01=0x0050, t00=0x0034, t01=0x005e}
0x5190…51a4 Head {h00=0x0010, h01=0x0050, text=» BNOK FDWVO2«, t00=0x0034, t01=0x0066}
0x51a4…51ce Head {h00=0x0026, h01=0x0050, text=» ADD FDCNT,=D'1' UPDATE FD NUMBER «, t00=0x0034, t01=0x007a}
0x51ce…51f2 Head {h00=0x0020, h01=0x0050, text=» MOVE CWFD,=W'26' HDR RECORD«, t00=0x0034, t01=0x00a4}
0x51f2…521e Head {h00=0x0028, h01=0x0050, text=» MOVE REQFD,=W'128' REQUESTED LENGTH«, t00=0x0034, t01=0x00c8}
0x521e…525a Head {h00=0x0038, h01=0x0050, text=» CALL FDIO,DSFD,X'B1',BPOOL(BIN13),REQFD,CWFD REWIND«, t00=0x0034, t01=0x00f4}
0x525a…5266 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0034, t01=0x0130}
0x5266…5274 Head {h00=0x000a, h01=0x0050, text=»FDWVO2«, t00=0x0034, t01=0x013c}
0x5274…5282 Head {h00=0x000a, h01=0x0050, text=» RET 2«, t00=0x0034, t01=0x014a}
0x5282…5290 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0034, t01=0x0158}
0x5290…529e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0034, t01=0x0166}
0x529e…52a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0174}
0x52a8…52c6 Head {h00=0x001a, h01=0x0050, text=»* LSWRIT WRITE BLOCKS «, t00=0x0034, t01=0x017e}
0x52c6…52d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x000c}
0x52d0…52d8 Head {h00=0x0004, h01=0x0050, t00=0x0035, t01=0x0016}
0x52d8…52fa Head {h00=0x001e, h01=0x0050, text=»LSWRIT PROC FC,TYPE,RETCON«, t00=0x0035, t01=0x001e}
0x52fa…531e Head {h00=0x0020, h01=0x0050, text=» PERF BAWRIT,FC,TYPE,RETCON «, t00=0x0035, t01=0x0040}
0x531e…532a Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0035, t01=0x0064}
0x532a…5338 Head {h00=0x000a, h01=0x0050, text=» RET 2«, t00=0x0035, t01=0x0070}
0x5338…5346 Head {h00=0x000a, h01=0x0050, text=» RET 4«, t00=0x0035, t01=0x007e}
0x5346…5354 Head {h00=0x000a, h01=0x0050, text=» RET 6«, t00=0x0035, t01=0x008c}
0x5354…5362 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0035, t01=0x009a}
0x5362…5370 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0035, t01=0x00a8}
0x5370…537a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00b6}
0x537a…5398 Head {h00=0x001a, h01=0x0050, text=»* FDWRIT WRITE BLOCKS«, t00=0x0035, t01=0x00c0}
0x5398…53a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00de}
0x53a2…53aa Head {h00=0x0004, h01=0x0050, t00=0x0035, t01=0x00e8}
0x53aa…53b2 Head {h00=0x0004, h01=0x0050, t00=0x0035, t01=0x00f0}
0x53b2…53d4 Head {h00=0x001e, h01=0x0050, text=»FDWRIT PROC FC,TYPE,RETCON«, t00=0x0035, t01=0x00f8}
0x53d4…53e2 Head {h00=0x000a, h01=0x0050, text=»FDWR00«, t00=0x0035, t01=0x011a}
0x53e2…53f4 Head {h00=0x000e, h01=0x0050, text=» WAIT DSFD«, t00=0x0035, t01=0x0128}
0x53f4…540c Head {h00=0x0014, h01=0x0050, text=» XSTAT DSFD,BIN4«, t00=0x0035, t01=0x013a}
0x540c…542c Head {h00=0x001c, h01=0x0050, text=» CALL TESTB,BIN4,W2 EOE «, t00=0x0035, t01=0x0152}
0x542c…543e Head {h00=0x000e, h01=0x0050, text=» BZ FDWR10«, t00=0x0035, t01=0x0172}
0x543e…545a Head {h00=0x0018, h01=0x0050, text=» RET 4 END OF EXTENT«, t00=0x0035, t01=0x0184}
0x545a…5468 Head {h00=0x000a, h01=0x0050, text=»FDWR10«, t00=0x0036, t01=0x0010}
0x5468…5484 Head {h00=0x0018, h01=0x0050, text=» MOVE BIN7,=X'024F' «, t00=0x0036, t01=0x001e}
0x5484…54a0 Head {h00=0x0018, h01=0x0050, text=» CALL MASK,BIN4,BIN7«, t00=0x0036, t01=0x003a}
0x54a0…54b4 Head {h00=0x0010, h01=0x0050, text=» BERR FDWR20«, t00=0x0036, t01=0x0056}
0x54b4…54ec Head {h00=0x0034, h01=0x0050, text=» IB BTYPE,FDWROP,FDWRHD,FDWRDATA,FDWRBAL,FDWRCL «, t00=0x0036, t01=0x006a}
0x54ec…54fa Head {h00=0x000a, h01=0x0050, text=»FDWROP«, t00=0x0036, t01=0x00a2}
0x54fa…5508 Head {h00=0x000a, h01=0x0050, text=»FDWRCL«, t00=0x0036, t01=0x00b0}
0x5508…551a Head {h00=0x000e, h01=0x0050, text=» B FDWR20 «, t00=0x0036, t01=0x00be}
0x551a…5538 Head {h00=0x001a, h01=0x0050, text=»FDWRHD BATCH HEADER «, t00=0x0036, t01=0x00d0}
0x5538…5570 Head {h00=0x0034, h01=0x0050, text=» MOVE BPOOL(BIN10),=X'00' INITIATE OUTPUT BUFFER«, t00=0x0036, t01=0x00ee}
0x5570…558a Head {h00=0x0016, h01=0x0050, text=» MOVE BIN4,RECLGD «, t00=0x0036, t01=0x0126}
0x558a…55bc Head {h00=0x002e, h01=0x0050, text=» XCOPY BPOOL(BIN10),W0,BIN4,BPOOL(BIN9),W0«, t00=0x0036, t01=0x0140}
0x55bc…55d0 Head {h00=0x0010, h01=0x0050, text=» PERF FDSEND«, t00=0x0036, t01=0x0172}
0x55d0…55dc Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0036, t01=0x0186}
0x55dc…55ea (55, 0, 400) Head {h00=0x000a, h01=0x0050, text=» RET 2«, t00=0x0037, t01=0x0004}
0x55ea…55fa Head {h00=0x000c, h01=0x0050, text=»FDWRBAL «, t00=0x0037, t01=0x0012}
0x55fa…5632 Head {h00=0x0034, h01=0x0050, text=» MOVE BPOOL(BIN10),=X'00' INITIATE OUTPUT BUFFER«, t00=0x0037, t01=0x0022}
0x5632…5652 Head {h00=0x001c, h01=0x0050, text=» EDIT BPOOL(BIN9),FFD999«, t00=0x0037, t01=0x005a}
0x5652…566c Head {h00=0x0016, h01=0x0050, text=» MOVE BIN4,RECLGD «, t00=0x0037, t01=0x007a}
0x566c…569e Head {h00=0x002e, h01=0x0050, text=» XCOPY BPOOL(BIN10),W0,BIN4,BPOOL(BIN9),W0«, t00=0x0037, t01=0x0094}
0x569e…56b2 Head {h00=0x0010, h01=0x0050, text=» PERF FDSEND«, t00=0x0037, t01=0x00c6}
0x56b2…56be Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0037, t01=0x00da}
0x56be…56c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00e6}
0x56c8…56d8 Head {h00=0x000c, h01=0x0050, text=»FDWRDATA«, t00=0x0037, t01=0x00f0}
0x56d8…56fc Head {h00=0x0020, h01=0x0050, text=» PERF BAWRIT,FC,TYPE,RETCON «, t00=0x0037, t01=0x0100}
0x56fc…5708 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0037, t01=0x0124}
0x5708…5716 Head {h00=0x000a, h01=0x0050, text=»FDWR20«, t00=0x0037, t01=0x0130}
0x5716…5724 Head {h00=0x000a, h01=0x0050, text=» RET 2«, t00=0x0037, t01=0x013e}
0x5724…5732 Head {h00=0x000a, h01=0x0050, text=» RET 4«, t00=0x0037, t01=0x014c}
0x5732…5740 Head {h00=0x000a, h01=0x0050, text=» RET 6«, t00=0x0037, t01=0x015a}
0x5740…5758 Head {h00=0x0014, h01=0x0050, text=» B FDWR00 REPEAT«, t00=0x0037, t01=0x0168}
0x5758…5766 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0037, t01=0x0180}
0x5766…5774 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0037, t01=0x018e}
0x5774…577e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x000c}
0x577e…57a2 Head {h00=0x0020, h01=0x0050, text=»* FDLOAD LOAD FD PROCEDURE «, t00=0x0038, t01=0x0016}
0x57a2…57ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x003a}
0x57ac…57b4 Head {h00=0x0004, h01=0x0050, t00=0x0038, t01=0x0044}
0x57b4…57bc Head {h00=0x0004, h01=0x0050, t00=0x0038, t01=0x004c}
0x57bc…57d0 Head {h00=0x0010, h01=0x0050, text=»FDLOAD PROC «, t00=0x0038, t01=0x0054}
0x57d0…57f0 Head {h00=0x001c, h01=0x0050, text=» MOVE CWFD,W7 HDR RECORD«, t00=0x0038, t01=0x0068}
0x57f0…580c Head {h00=0x0018, h01=0x0050, text=» MOVE REQFD,=W'128' «, t00=0x0038, t01=0x0088}
0x580c…5846 Head {h00=0x0036, h01=0x0050, text=» CALL FDIO,DSFD,X'B7',BPOOL(BIN10),REQFD,CWFD LOAD«, t00=0x0038, t01=0x00a4}
0x5846…585e Head {h00=0x0014, h01=0x0050, text=» XSTAT DSFD,BIN4«, t00=0x0038, t01=0x00de}
0x585e…587e Head {h00=0x001c, h01=0x0050, text=» CALL TESTB,BIN4,W5 IBM «, t00=0x0038, t01=0x00f6}
0x587e…5890 Head {h00=0x000e, h01=0x0050, text=» BZ FDLOA2«, t00=0x0038, t01=0x0116}
0x5890…58ac Head {h00=0x0018, h01=0x0050, text=» MOVE BIN7,=X'000F' «, t00=0x0038, t01=0x0128}
0x58ac…58c8 Head {h00=0x0018, h01=0x0050, text=» CALL MASK,BIN4,BIN7«, t00=0x0038, t01=0x0144}
0x58c8…58dc Head {h00=0x0010, h01=0x0050, text=» BNOK FDLOA2«, t00=0x0038, t01=0x0160}
0x58dc…58e8 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0038, t01=0x0174}
0x58e8…58f6 Head {h00=0x000a, h01=0x0050, text=»FDLOA2«, t00=0x0038, t01=0x0180}
0x58f6…5916 Head {h00=0x001c, h01=0x0050, text=» MOVE CWFD,W7 HDR RECORD«, t00=0x0038, t01=0x018e}
0x5916…5932 Head {h00=0x0018, h01=0x0050, text=» MOVE REQFD,=W'128' «, t00=0x0039, t01=0x001e}
0x5932…596e Head {h00=0x0038, h01=0x0050, text=» CALL FDIO,DSFD,X'B8',BPOOL(BIN10),REQFD,CWFD UNLOAD«, t00=0x0039, t01=0x003a}
0x596e…597c Head {h00=0x000a, h01=0x0050, text=» RET 2«, t00=0x0039, t01=0x0076}
0x597c…598a Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0039, t01=0x0084}
0x598a…5998 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0039, t01=0x0092}
0x5998…59a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x00a0}
0x59a2…59bc Head {h00=0x0016, h01=0x0050, text=»* DCRVOL DISPLAY «, t00=0x0039, t01=0x00aa}
0x59bc…59c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x00c4}
0x59c6…59da Head {h00=0x0010, h01=0x0050, text=»DCRVOL PROC «, t00=0x0039, t01=0x00ce}
0x59da…59f0 Head {h00=0x0012, h01=0x0050, text=» ATTFMT SNDFRM«, t00=0x0039, t01=0x00e2}
0x59f0…5a06 Head {h00=0x0012, h01=0x0050, text=» SET DEPROMPT «, t00=0x0039, t01=0x00f8}
0x5a06…5a1e Head {h00=0x0014, h01=0x0050, text=» DISPLAY 0,W1,W0«, t00=0x0039, t01=0x010e}
0x5a1e…5a2c Head {h00=0x000a, h01=0x0050, text=» THOME«, t00=0x0039, t01=0x0126}
0x5a2c…5a56 Head {h00=0x0026, h01=0x0050, text=» MOVE DEBINW3,W1 REQUESTED LENGTH «, t00=0x0039, t01=0x0134}
0x5a56…5a8c Head {h00=0x0032, h01=0x0050, text=» NKI .NE,DEDSDYKB,STR1A,KEYTAB,DEBINW3,DEBINW2«, t00=0x0039, t01=0x015e}
0x5a8c…5a98 (58, 0, 398) Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x003a, t01=0x0004}
0x5a98…5aa6 Head {h00=0x000a, h01=0x0050, text=»DCRV02«, t00=0x003a, t01=0x0010}
0x5aa6…5ab4 Head {h00=0x000a, h01=0x0050, text=» RET 2«, t00=0x003a, t01=0x001e}
0x5ab4…5ac2 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x003a, t01=0x002c}
0x5ac2…5ad0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003a, t01=0x003a}
0x5ad0…5ada Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0048}
0x5ada…5af8 Head {h00=0x001a, h01=0x0050, text=»* BAWRIT WRITE BLOCKS «, t00=0x003a, t01=0x0052}
0x5af8…5b02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0070}
0x5b02…5b0a Head {h00=0x0004, h01=0x0050, t00=0x003a, t01=0x007a}
0x5b0a…5b2c Head {h00=0x001e, h01=0x0050, text=»BAWRIT PROC FC,TYPE,RETCON«, t00=0x003a, t01=0x0082}
0x5b2c…5b3a Head {h00=0x000a, h01=0x0050, text=»BAWR00«, t00=0x003a, t01=0x00a4}
0x5b3a…5b60 Head {h00=0x0022, h01=0x0050, text=»* BIN16 NO OF CHARS TO SEND «, t00=0x003a, t01=0x00b2}
0x5b60…5b92 Head {h00=0x002e, h01=0x0050, text=»* BIN4 AVAILABLE SPACE IN OUTPUT BUFFER«, t00=0x003a, t01=0x00d8}
0x5b92…5bb4 Head {h00=0x001e, h01=0x0050, text=»* DEBIN3 LENGTH OF HEADER«, t00=0x003a, t01=0x010a}
0x5bb4…5be6 Head {h00=0x002e, h01=0x0050, text=»* BIN15 ACTUAL LENGTH OF INPUT DATA USED«, t00=0x003a, t01=0x012c}
0x5be6…5bfc Head {h00=0x0012, h01=0x0050, text=» CMP BIN16,W0 «, t00=0x003a, t01=0x015e}
0x5bfc…5c1e Head {h00=0x001e, h01=0x0050, text=» BE BAWRRET NODATA=NOWRITE«, t00=0x003a, t01=0x0174}
0x5c1e…5c4a Head {h00=0x0028, h01=0x0050, text=» MOVE BIN4,RECLGD SET RECORD LENGTH «, t00=0x003b, t01=0x0008}
0x5c4a…5c7a Head {h00=0x002c, h01=0x0050, text=» ADD BCDI21(W5),=D'1' ADD 1 TO RECORD NO«, t00=0x003b, t01=0x0034}
0x5c7a…5cac Head {h00=0x002e, h01=0x0050, text=» ADD BCDI21(W4),=D'1' ADD 1 TO SEQUENCE NO«, t00=0x003b, t01=0x0064}
0x5cac…5cd0 Head {h00=0x0020, h01=0x0050, text=» CBE BCDI21(W4),=D'1',BAWR50«, t00=0x003b, t01=0x0096}
0x5cd0…5cfc Head {h00=0x0028, h01=0x0050, text=»* NOT FIRST TIME (SEQUENCE NO > 1) «, t00=0x003b, t01=0x00ba}
0x5cfc…5d2c Head {h00=0x002c, h01=0x0050, text=»* COPY HEADER PART, LENGTH IN WORK(W15)«, t00=0x003b, t01=0x00e6}
0x5d2c…5d5c Head {h00=0x002c, h01=0x0050, text=» SUB BIN4,WORK(W15) MAKE ROOM FOR HEADER«, t00=0x003b, t01=0x0116}
0x5d5c…5d86 Head {h00=0x0026, h01=0x0050, text=» MOVE DEBIN3,WORK(W15) START POINT«, t00=0x003b, t01=0x0146}
0x5d86…5d98 Head {h00=0x000e, h01=0x0050, text=» B BAWR55 «, t00=0x003b, t01=0x0170}
0x5d98…5da6 Head {h00=0x000a, h01=0x0050, text=»BAWR50«, t00=0x003b, t01=0x0182}
0x5da6…5dda Head {h00=0x0030, h01=0x0050, text=»* FIRST OUTPUT RECORD FOR THIS INPUT RECORD«, t00=0x003b, t01=0x0190}
0x5dda…5dfe Head {h00=0x0020, h01=0x0050, text=» MOVE DEBIN3,W0 START POINT «, t00=0x003c, t01=0x0034}
0x5dfe…5e08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0058}
0x5e08…5e16 Head {h00=0x000a, h01=0x0050, text=»BAWR55«, t00=0x003c, t01=0x0062}
0x5e16…5e48 Head {h00=0x002e, h01=0x0050, text=» CBL BIN16,BIN4,BAWR58 ROOM FOR EVERYTING?«, t00=0x003c, t01=0x0070}
0x5e48…5e5a Head {h00=0x000e, h01=0x0050, text=» NO ROOM«, t00=0x003c, t01=0x00a2}
0x5e5a…5e82 Head {h00=0x0024, h01=0x0050, text=» TBT SPLITFL,BAWR57 NORMAL SPLIT«, t00=0x003c, t01=0x00b4}
0x5e82…5e9e Head {h00=0x0018, h01=0x0050, text=» FIND PRECEDING & «, t00=0x003c, t01=0x00dc}
0x5e9e…5ece Head {h00=0x002c, h01=0x0050, text=» MOVE DEBIN1,BIN4 START AT END OF RECORD«, t00=0x003c, t01=0x00f8}
0x5ece…5ef4 Head {h00=0x0022, h01=0x0050, text=» MOVE STR2A,=C'&&' LOOK FOR & «, t00=0x003c, t01=0x0128}
0x5ef4…5f02 Head {h00=0x000a, h01=0x0050, text=»BAWR56«, t00=0x003c, t01=0x014e}
0x5f02…5f18 Head {h00=0x0012, h01=0x0050, text=» SUB DEBIN1,W1«, t00=0x003c, t01=0x015c}
0x5f18…5f3c Head {h00=0x0020, h01=0x0050, text=» CBNG DEBIN1,W0,BAWR57 NO & «, t00=0x003c, t01=0x0172}
0x5f3c…5f58 Head {h00=0x0018, h01=0x0050, text=» MOVE DEBIN2,DEBIN1 «, t00=0x003d, t01=0x0008}
0x5f58…5f88 Head {h00=0x002c, h01=0x0050, text=» MATCH BPOOL(BIN9),DEBIN2,W1,STR2A,W0,W1«, t00=0x003d, t01=0x0024}
0x5f88…5fa6 Head {h00=0x001a, h01=0x0050, text=» BNOK BAWR56 NOT FOUND«, t00=0x003d, t01=0x0054}
0x5fa6…5fc0 Head {h00=0x0016, h01=0x0050, text=» MOVE BIN15,DEBIN2«, t00=0x003d, t01=0x0072}
0x5fc0…5fd2 Head {h00=0x000e, h01=0x0050, text=» B BAWR59 «, t00=0x003d, t01=0x008c}
0x5fd2…5fe8 Head {h00=0x0012, h01=0x0050, text=»*NORMAL SPLIT «, t00=0x003d, t01=0x009e}
0x5fe8…5ff6 Head {h00=0x000a, h01=0x0050, text=»BAWR57«, t00=0x003d, t01=0x00b4}
0x5ff6…600e Head {h00=0x0014, h01=0x0050, text=» MOVE BIN15,BIN4«, t00=0x003d, t01=0x00c2}
0x600e…6020 Head {h00=0x000e, h01=0x0050, text=» B BAWR59 «, t00=0x003d, t01=0x00da}
0x6020…604c Head {h00=0x0028, h01=0x0050, text=»* NO OF CHARS, FIT IN AVAILABLE ROOM«, t00=0x003d, t01=0x00ec}
0x604c…605a Head {h00=0x000a, h01=0x0050, text=»BAWR58«, t00=0x003d, t01=0x0118}
0x605a…6082 Head {h00=0x0024, h01=0x0050, text=» MOVE BIN15,BIN16 SEND ALL CHARS«, t00=0x003d, t01=0x0126}
0x6082…608c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x014e}
0x608c…609a Head {h00=0x000a, h01=0x0050, text=»BAWR59«, t00=0x003d, t01=0x0158}
0x609a…60dc Head {h00=0x003e, h01=0x0050, text=» XCOPY BPOOL(BIN10),DEBIN3,BIN15,BPOOL(BIN9),W0 COPY FIRST«, t00=0x003d, t01=0x0166}
0x60dc…6116 Head {h00=0x0036, h01=0x0050, text=»* MOVE BLANKS INTO REMAINING PART OF OUTPUT BUFFER«, t00=0x003e, t01=0x0018}
0x6116…6144 Head {h00=0x002a, h01=0x0050, text=»* BIN4 = NO OF CHARS IN OUTPUT BUFFER «, t00=0x003e, t01=0x0052}
0x6144…615c Head {h00=0x0014, h01=0x0050, text=» MOVE BIN4,BIN15«, t00=0x003e, t01=0x0080}
0x615c…6180 Head {h00=0x0020, h01=0x0050, text=» ADD BIN4,DEBIN3 ADD HEADER «, t00=0x003e, t01=0x0098}
0x6180…618a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x00bc}
0x618a…61a6 Head {h00=0x0018, h01=0x0050, text=» MOVE DEBIN1,RECLGD «, t00=0x003e, t01=0x00c6}
0x61a6…61cc Head {h00=0x0022, h01=0x0050, text=» SUB DEBIN1,BIN4 NO OF BLANKS «, t00=0x003e, t01=0x00e2}
0x61cc…6212 Head {h00=0x0042, h01=0x0050, text=» XCOPY BPOOL(BIN10),BIN4,DEBIN1,BPOOL(BIN9),BIN16 MOVE BLANKS «, t00=0x003e, t01=0x0108}
0x6212…621c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x014e}
0x621c…622a Head {h00=0x000a, h01=0x0050, text=»BAWR60«, t00=0x003e, t01=0x0158}
0x622a…6252 Head {h00=0x0024, h01=0x0050, text=»* INSERT RECORD NO - BCDI21(W5)«, t00=0x003e, t01=0x0166}
0x6252…6286 Head {h00=0x0030, h01=0x0050, text=» CBE WORK(W17),W0,BAWR70 SKIP IF LENGTH ZERO«, t00=0x003e, t01=0x018e}
0x6286…62b8 Head {h00=0x002e, h01=0x0050, text=» MOVE STRG10A,BCDI21(W5) CONVERT RECORD NO«, t00=0x003f, t01=0x0032}
0x62b8…62de Head {h00=0x0022, h01=0x0050, text=» MOVE DEBIN1,W10 LENGTH FIELD «, t00=0x003f, t01=0x0064}
0x62de…630c Head {h00=0x002a, h01=0x0050, text=» SUB DEBIN1,WORK(W17) FIND START OF NO«, t00=0x003f, t01=0x008a}
0x630c…634a Head {h00=0x003a, h01=0x0050, text=» XCOPY BPOOL(BIN10),WORK(W16),WORK(W17),STRG10A,DEBIN1«, t00=0x003f, t01=0x00b8}
0x634a…6354 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x00f6}
0x6354…6362 Head {h00=0x000a, h01=0x0050, text=»BAWR70«, t00=0x003f, t01=0x0100}
0x6362…638e Head {h00=0x0028, h01=0x0050, text=»* INSERT SEQUENCE NO - BCDI21(W4)«, t00=0x003f, t01=0x010e}
0x638e…63c2 Head {h00=0x0030, h01=0x0050, text=» CBE WORK(W19),W0,BAWR80 SKIPIF LENGTH ZERO «, t00=0x003f, t01=0x013a}
0x63c2…63f6 Head {h00=0x0030, h01=0x0050, text=» MOVE STRG10A,BCDI21(W4) CONVERT SEQUENCE NO«, t00=0x003f, t01=0x016e}
0x63f6…641c Head {h00=0x0022, h01=0x0050, text=» MOVE DEBIN1,W10 LENGTH FIELD «, t00=0x0040, t01=0x0012}
0x641c…644c Head {h00=0x002c, h01=0x0050, text=» SUB DEBIN1,WORK(W19) FIELD START OF NO «, t00=0x0040, t01=0x0038}
0x644c…648a Head {h00=0x003a, h01=0x0050, text=» XCOPY BPOOL(BIN10),WORK(W18),WORK(W19),STRG10A,DEBIN1«, t00=0x0040, t01=0x0068}
0x648a…6494 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x00a6}
0x6494…64a2 Head {h00=0x000a, h01=0x0050, text=»BAWR80«, t00=0x0040, t01=0x00b0}
0x64a2…64c0 Head {h00=0x001a, h01=0x0050, text=»* HANDLE END OF RECORD«, t00=0x0040, t01=0x00be}
0x64c0…64ee Head {h00=0x002a, h01=0x0050, text=» CBG BIN16,BIN15,BAWR100 NO ROOM, CONT«, t00=0x0040, t01=0x00dc}
0x64ee…6502 Head {h00=0x0010, h01=0x0050, text=»* INSERT EOR«, t00=0x0040, t01=0x010a}
0x6502…650c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x011e}
0x650c…6528 Head {h00=0x0018, h01=0x0050, text=» CBE FC,W6,BAWR85 FD«, t00=0x0040, t01=0x0128}
0x6528…6544 Head {h00=0x0018, h01=0x0050, text=» CBE FC,W1,BAWR85 DC«, t00=0x0040, t01=0x0144}
0x6544…6558 Head {h00=0x0010, h01=0x0050, text=» B BAWRSEND «, t00=0x0040, t01=0x0160}
0x6558…6566 Head {h00=0x000a, h01=0x0050, text=»BAWR85«, t00=0x0040, t01=0x0174}
0x6566…658a Head {h00=0x0020, h01=0x0050, text=» MOVE STR2A,=X'7F' EOR CHAR «, t00=0x0040, t01=0x0182}
0x658a…65c2 Head {h00=0x0034, h01=0x0050, text=» XCOPY BPOOL(BIN10),BIN4,W1,STR2A,W1 INSERT EOR «, t00=0x0041, t01=0x0016}
0x65c2…65d6 Head {h00=0x0010, h01=0x0050, text=» ADD BIN4,W1«, t00=0x0041, t01=0x004e}
0x65d6…65ec Head {h00=0x0012, h01=0x0050, text=»* FLOPPY DISK «, t00=0x0041, t01=0x0062}
0x65ec…6600 Head {h00=0x0010, h01=0x0050, text=» B BAWRSEND «, t00=0x0041, t01=0x0078}
0x6600…660a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x008c}
0x660a…661a Head {h00=0x000c, h01=0x0050, text=»BAWR100 «, t00=0x0041, t01=0x0096}
0x661a…6624 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00a6}
0x6624…6636 Head {h00=0x000e, h01=0x0050, text=» IB FC, C«, t00=0x0041, t01=0x00b0}
0x6636…6656 Head {h00=0x001c, h01=0x0050, text=» DCWR105, SEND BATCH C «, t00=0x0041, t01=0x00c2}
0x6656…6670 Head {h00=0x0016, h01=0x0050, text=» BAWR105, DUMMY C«, t00=0x0041, t01=0x00e2}
0x6670…668a Head {h00=0x0016, h01=0x0050, text=» BAWR105, DUMMY C«, t00=0x0041, t01=0x00fc}
0x668a…66a4 Head {h00=0x0016, h01=0x0050, text=» BAWR105, DUMMY C«, t00=0x0041, t01=0x0116}
0x66a4…66be Head {h00=0x0016, h01=0x0050, text=» BAWR105, DUMMY C«, t00=0x0041, t01=0x0130}
0x66be…66e4 Head {h00=0x0022, h01=0x0050, text=» FDWR105, FLOPPY CONVERSION C«, t00=0x0041, t01=0x014a}
0x66e4…66fe Head {h00=0x0016, h01=0x0050, text=» BAWR105, DUMMY C«, t00=0x0041, t01=0x0170}
0x66fe…6718 Head {h00=0x0016, h01=0x0050, text=» BAWR105, DUMMY C«, t00=0x0041, t01=0x018a}
0x6718…6732 Head {h00=0x0016, h01=0x0050, text=» LSWR105 LISTING «, t00=0x0042, t01=0x0014}
0x6732…6744 Head {h00=0x000e, h01=0x0050, text=» B BAWR105«, t00=0x0042, t01=0x002e}
0x6744…6754 Head {h00=0x000c, h01=0x0050, text=»DCWR105 «, t00=0x0042, t01=0x0040}
0x6754…6778 Head {h00=0x0020, h01=0x0050, text=» PERF DCSEND,FC,TYPE,RETCON «, t00=0x0042, t01=0x0050}
0x6778…678a Head {h00=0x000e, h01=0x0050, text=» B BAWR105«, t00=0x0042, t01=0x0074}
0x678a…6794 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0086}
0x6794…67a4 Head {h00=0x000c, h01=0x0050, text=»FDWR105 «, t00=0x0042, t01=0x0090}
0x67a4…67d0 Head {h00=0x0028, h01=0x0050, text=»* CHECK IF CONTINUATION CHAR NEEDED«, t00=0x0042, t01=0x00a0}
0x67d0…67ea Head {h00=0x0016, h01=0x0050, text=» TBF BCONT,FDWR150«, t00=0x0042, t01=0x00cc}
0x67ea…6802 Head {h00=0x0014, h01=0x0050, text=»* CONTINUATION «, t00=0x0042, t01=0x00e6}
0x6802…681e Head {h00=0x0018, h01=0x0050, text=» MOVE DEBIN1,RECLGD «, t00=0x0042, t01=0x00fe}
0x681e…6840 Head {h00=0x001e, h01=0x0050, text=» CBNE BIN4,DEBIN1,FDWR140 «, t00=0x0042, t01=0x011a}
0x6840…6854 Head {h00=0x0010, h01=0x0050, text=» SUB BIN4,W1«, t00=0x0042, t01=0x013c}
0x6854…686a Head {h00=0x0012, h01=0x0050, text=» SUB BIN15,W1 «, t00=0x0042, t01=0x0150}
0x686a…687a Head {h00=0x000c, h01=0x0050, text=»FDWR140 «, t00=0x0042, t01=0x0166}
0x687a…68a6 Head {h00=0x0028, h01=0x0050, text=» MOVE STR2A,=X'21' CONTINUATION MARK«, t00=0x0042, t01=0x0176}
0x68a6…68d2 Head {h00=0x0028, h01=0x0050, text=» XCOPY BPOOL(BIN10),BIN4,W1,STR2A,W1«, t00=0x0043, t01=0x0012}
0x68d2…68e2 Head {h00=0x000c, h01=0x0050, text=»FDWR150 «, t00=0x0043, t01=0x003e}
0x68e2…68f6 Head {h00=0x0010, h01=0x0050, text=» PERF FDSEND«, t00=0x0043, t01=0x004e}
0x68f6…6908 Head {h00=0x000e, h01=0x0050, text=» B BAWR105«, t00=0x0043, t01=0x0062}
0x6908…6912 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0074}
0x6912…6922 Head {h00=0x000c, h01=0x0050, text=»LSWR105 «, t00=0x0043, t01=0x007e}
0x6922…6936 Head {h00=0x0010, h01=0x0050, text=» PERF LSSEND«, t00=0x0043, t01=0x008e}
0x6936…6948 Head {h00=0x000e, h01=0x0050, text=» B BAWR105«, t00=0x0043, t01=0x00a2}
0x6948…6952 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00b4}
0x6952…6962 Head {h00=0x000c, h01=0x0050, text=»BAWR105 «, t00=0x0043, t01=0x00be}
0x6962…6978 Head {h00=0x0012, h01=0x0050, text=» MOVE CWFD,W0 «, t00=0x0043, t01=0x00ce}
0x6978…69b2 Head {h00=0x0036, h01=0x0050, text=» DELETE BPOOL(BIN9),CWFD,BIN15 DELETE WHAT IS SEND«, t00=0x0043, t01=0x00e4}
0x69b2…69ca Head {h00=0x0014, h01=0x0050, text=» SUB BIN16,BIN15«, t00=0x0043, t01=0x011e}
0x69ca…69e4 Head {h00=0x0016, h01=0x0050, text=» MOVE BIN13,BIN16 «, t00=0x0043, t01=0x0136}
0x69e4…69fa Head {h00=0x0012, h01=0x0050, text=» CMP VSEIND,W1«, t00=0x0043, t01=0x0150}
0x69fa…6a24 Head {h00=0x0026, h01=0x0050, text=» BE BAWR110 WRITE RESET OF BUFFER «, t00=0x0043, t01=0x0166}
0x6a24…6a32 Head {h00=0x000a, h01=0x0050, text=» RET 6«, t00=0x0043, t01=0x0190}
0x6a32…6a3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x000e}
0x6a3c…6a54 Head {h00=0x0014, h01=0x0050, text=»BAWR110 REPEAT«, t00=0x0044, t01=0x0018}
0x6a54…6a66 Head {h00=0x000e, h01=0x0050, text=» IB FC, C«, t00=0x0044, t01=0x0030}
0x6a66…6a86 Head {h00=0x001c, h01=0x0050, text=» BAWR111, SEND BATCH C «, t00=0x0044, t01=0x0042}
0x6a86…6aa0 Head {h00=0x0016, h01=0x0050, text=» BAWR111, DUMMY C«, t00=0x0044, t01=0x0062}
0x6aa0…6aba Head {h00=0x0016, h01=0x0050, text=» BAWR111, DUMMY C«, t00=0x0044, t01=0x007c}
0x6aba…6ad4 Head {h00=0x0016, h01=0x0050, text=» BAWR111, DUMMY C«, t00=0x0044, t01=0x0096}
0x6ad4…6aee Head {h00=0x0016, h01=0x0050, text=» BAWR111, DUMMY C«, t00=0x0044, t01=0x00b0}
0x6aee…6b06 Head {h00=0x0014, h01=0x0050, text=» BAWR112, FD C «, t00=0x0044, t01=0x00ca}
0x6b06…6b20 Head {h00=0x0016, h01=0x0050, text=» BAWR111, DUMMY C«, t00=0x0044, t01=0x00e2}
0x6b20…6b3a Head {h00=0x0016, h01=0x0050, text=» BAWR111, DUMMY C«, t00=0x0044, t01=0x00fc}
0x6b3a…6b52 Head {h00=0x0014, h01=0x0050, text=» BAWR111 LISTE «, t00=0x0044, t01=0x0116}
0x6b52…6b5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x012e}
0x6b5c…6b7c Head {h00=0x001c, h01=0x0050, text=»BAWR111 REPEAT INSIDE «, t00=0x0044, t01=0x0138}
0x6b7c…6b8e Head {h00=0x000e, h01=0x0050, text=» B BAWR00 «, t00=0x0044, t01=0x0158}
0x6b8e…6b98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x016a}
0x6b98…6bb8 Head {h00=0x001c, h01=0x0050, text=»BAWR112 REPEAT OUTSIDE«, t00=0x0044, t01=0x0174}
0x6bb8…6bc6 (69, 0, 400) Head {h00=0x000a, h01=0x0050, text=» RET 8«, t00=0x0045, t01=0x0004}
0x6bc6…6bd0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0012}
0x6bd0…6bda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x001c}
0x6bda…6be4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0026}
0x6be4…6bf4 Head {h00=0x000c, h01=0x0050, text=»BAWRSEND«, t00=0x0045, t01=0x0030}
0x6bf4…6bfe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0040}
0x6bfe…6c10 Head {h00=0x000e, h01=0x0050, text=» IB FC, C«, t00=0x0045, t01=0x004a}
0x6c10…6c30 Head {h00=0x001c, h01=0x0050, text=» DCWR205, SEND BATCH C «, t00=0x0045, t01=0x005c}
0x6c30…6c4a Head {h00=0x0016, h01=0x0050, text=» BAWR205, DUMMY C«, t00=0x0045, t01=0x007c}
0x6c4a…6c64 Head {h00=0x0016, h01=0x0050, text=» BAWR205, DUMMY C«, t00=0x0045, t01=0x0096}
0x6c64…6c7e Head {h00=0x0016, h01=0x0050, text=» BAWR205, DUMMY C«, t00=0x0045, t01=0x00b0}
0x6c7e…6c98 Head {h00=0x0016, h01=0x0050, text=» BAWR205, DUMMY C«, t00=0x0045, t01=0x00ca}
0x6c98…6cbe Head {h00=0x0022, h01=0x0050, text=» FDWR205, FLOPPY CONVERSION C«, t00=0x0045, t01=0x00e4}
0x6cbe…6cd8 Head {h00=0x0016, h01=0x0050, text=» BAWR205, DUMMY C«, t00=0x0045, t01=0x010a}
0x6cd8…6cf2 Head {h00=0x0016, h01=0x0050, text=» BAWR205, DUMMY C«, t00=0x0045, t01=0x0124}
0x6cf2…6d0c Head {h00=0x0016, h01=0x0050, text=» LSWR205 LISTING «, t00=0x0045, t01=0x013e}
0x6d0c…6d1e Head {h00=0x000e, h01=0x0050, text=» B BAWR205«, t00=0x0045, t01=0x0158}
0x6d1e…6d2e Head {h00=0x000c, h01=0x0050, text=»DCWR205 «, t00=0x0045, t01=0x016a}
0x6d2e…6d52 Head {h00=0x0020, h01=0x0050, text=» PERF DCSEND,FC,TYPE,RETCON «, t00=0x0045, t01=0x017a}
0x6d52…6d64 Head {h00=0x000e, h01=0x0050, text=» B BAWR205«, t00=0x0046, t01=0x000e}
0x6d64…6d76 Head {h00=0x000e, h01=0x0050, text=» B BAWRERR«, t00=0x0046, t01=0x0020}
0x6d76…6d80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0032}
0x6d80…6d90 Head {h00=0x000c, h01=0x0050, text=»FDWR205 «, t00=0x0046, t01=0x003c}
0x6d90…6da4 Head {h00=0x0010, h01=0x0050, text=» PERF FDSEND«, t00=0x0046, t01=0x004c}
0x6da4…6db6 Head {h00=0x000e, h01=0x0050, text=» B BAWR205«, t00=0x0046, t01=0x0060}
0x6db6…6dc8 Head {h00=0x000e, h01=0x0050, text=» B BAWRERR«, t00=0x0046, t01=0x0072}
0x6dc8…6dd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0084}
0x6dd2…6de2 Head {h00=0x000c, h01=0x0050, text=»LSWR205 «, t00=0x0046, t01=0x008e}
0x6de2…6df6 Head {h00=0x0010, h01=0x0050, text=» PERF LSSEND«, t00=0x0046, t01=0x009e}
0x6df6…6e08 Head {h00=0x000e, h01=0x0050, text=» B BAWR205«, t00=0x0046, t01=0x00b2}
0x6e08…6e1a Head {h00=0x000e, h01=0x0050, text=» B BAWRERR«, t00=0x0046, t01=0x00c4}
0x6e1a…6e24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x00d6}
0x6e24…6e34 Head {h00=0x000c, h01=0x0050, text=»BAWR205 «, t00=0x0046, t01=0x00e0}
0x6e34…6e44 Head {h00=0x000c, h01=0x0050, text=»BAWRRET «, t00=0x0046, t01=0x00f0}
0x6e44…6e50 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0046, t01=0x0100}
0x6e50…6e60 Head {h00=0x000c, h01=0x0050, text=»BAWRERR «, t00=0x0046, t01=0x010c}
0x6e60…6e6e Head {h00=0x000a, h01=0x0050, text=» RET 2«, t00=0x0046, t01=0x011c}
0x6e6e…6e7c Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0046, t01=0x012a}
0x6e7c…6e8a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0046, t01=0x0138}
0x6e8a…6e9e Head {h00=0x0010, h01=0x0050, text=»LSSEND PROC «, t00=0x0046, t01=0x0146}
0x6e9e…6eca Head {h00=0x0028, h01=0x0050, text=» INSRT BPOOL(BIN10),W0,W2,INSERT,W0 «, t00=0x0046, t01=0x015a}
0x6eca…6ee6 Head {h00=0x0018, h01=0x0050, text=» MOVE DEBIN1,RECLGD «, t00=0x0046, t01=0x0186}
0x6ee6…6efc Head {h00=0x0012, h01=0x0050, text=» ADD DEBIN1,W2«, t00=0x0047, t01=0x0012}
0x6efc…6f26 Head {h00=0x0026, h01=0x0050, text=» WRITE DEDSPRT,BPOOL(BIN10),DEBIN1«, t00=0x0047, t01=0x0028}
0x6f26…6f48 Head {h00=0x001e, h01=0x0050, text=» DLETE BPOOL(BIN10),W0,W2 «, t00=0x0047, t01=0x0052}
0x6f48…6f54 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0047, t01=0x0074}
0x6f54…6f62 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0047, t01=0x0080}
0x6f62…6f70 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0047, t01=0x008e}
0x6f70…6f84 Head {h00=0x0010, h01=0x0050, text=»FDSEND PROC «, t00=0x0047, t01=0x009c}
0x6f84…6fa0 Head {h00=0x0018, h01=0x0050, text=» MOVE REQFD,=W'128' «, t00=0x0047, t01=0x00b0}
0x6fa0…6fb6 Head {h00=0x0012, h01=0x0050, text=» MOVE CWFD,W0 «, t00=0x0047, t01=0x00cc}
0x6fb6…6fec Head {h00=0x0032, h01=0x0050, text=» CALL FDIO,DSFD,X'06',BPOOL(BIN10),REQFD,CWFD «, t00=0x0047, t01=0x00e2}
0x6fec…6ff8 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0047, t01=0x0118}
0x6ff8…7006 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0047, t01=0x0124}
0x7006…7014 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0047, t01=0x0132}
0x7014…701e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0140}
0x701e…703c Head {h00=0x001a, h01=0x0050, text=»* DCWRIT WRITE BLOCKS«, t00=0x0047, t01=0x014a}
0x703c…7046 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0168}
0x7046…704e Head {h00=0x0004, h01=0x0050, t00=0x0047, t01=0x0172}
0x704e…7056 Head {h00=0x0004, h01=0x0050, t00=0x0047, t01=0x017a}
0x7056…7078 Head {h00=0x001e, h01=0x0050, text=»DCWRIT PROC FC,TYPE,RETCON«, t00=0x0047, t01=0x0182}
0x7078…7082 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x0014}
0x7082…7090 Head {h00=0x000a, h01=0x0050, text=»DCWR00«, t00=0x0048, t01=0x001e}
0x7090…70ae Head {h00=0x001a, h01=0x0050, text=» CBNE TYPE,W4,DCWR010 «, t00=0x0048, t01=0x002c}
0x70ae…70c4 Head {h00=0x0012, h01=0x0050, text=» MOVE BIN4,W0 «, t00=0x0048, t01=0x004a}
0x70c4…70ec Head {h00=0x0024, h01=0x0050, text=» EDSUB BPOOL(BIN10),BIN4,FDC999 «, t00=0x0048, t01=0x0060}
0x70ec…7110 Head {h00=0x0020, h01=0x0050, text=» PERF DCSEND,FC,TYPE,RETCON «, t00=0x0048, t01=0x0088}
0x7110…711c Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0048, t01=0x00ac}
0x711c…712a Head {h00=0x000a, h01=0x0050, text=» RET 2«, t00=0x0048, t01=0x00b8}
0x712a…713a Head {h00=0x000c, h01=0x0050, text=»DCWR010 «, t00=0x0048, t01=0x00c6}
0x713a…7154 Head {h00=0x0016, h01=0x0050, text=» MOVE BIN4,=W'600'«, t00=0x0048, t01=0x00d6}
0x7154…7178 Head {h00=0x0020, h01=0x0050, text=» DSC1 .NW,DSDCFD,STIMO,BIN4 «, t00=0x0048, t01=0x00f0}
0x7178…7182 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x0114}
0x7182…71a6 Head {h00=0x0020, h01=0x0050, text=» PERF BAWRIT,FC,TYPE,RETCON «, t00=0x0048, t01=0x011e}
0x71a6…71b2 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0048, t01=0x0142}
0x71b2…71c2 Head {h00=0x000c, h01=0x0050, text=»DCWRERR «, t00=0x0048, t01=0x014e}
0x71c2…71d0 Head {h00=0x000a, h01=0x0050, text=» RET 2«, t00=0x0048, t01=0x015e}
0x71d0…71de Head {h00=0x000a, h01=0x0050, text=» RET 4«, t00=0x0048, t01=0x016c}
0x71de…71ec Head {h00=0x000a, h01=0x0050, text=» RET 6«, t00=0x0048, t01=0x017a}
0x71ec…7204 Head {h00=0x0014, h01=0x0050, text=» B DCWR00 REPEAT«, t00=0x0048, t01=0x0188}
0x7204…7212 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0049, t01=0x0010}
0x7212…7220 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0049, t01=0x001e}
0x7220…722a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x002c}
0x722a…7266 Head {h00=0x0038, h01=0x0050, text=»* CONVERSI0N OF DATA ENTRY RECORDS TO BPOOL BUFFER «, t00=0x0049, t01=0x0036}
0x7266…7288 Head {h00=0x001e, h01=0x0050, text=»* RET =RECORD CONVERTED«, t00=0x0049, t01=0x0072}
0x7288…72a2 Head {h00=0x0016, h01=0x0050, text=»* RET 2 =TRANSMIT«, t00=0x0049, t01=0x0094}
0x72a2…72cc Head {h00=0x0026, h01=0x0050, text=»* RET 4 =CUMPULSORY FIELD EMPTHY «, t00=0x0049, t01=0x00ae}
0x72cc…72f0 Head {h00=0x0020, h01=0x0050, text=»* RET 6 =BCD-FIELD OVERFLOW«, t00=0x0049, t01=0x00d8}
0x72f0…7316 Head {h00=0x0022, h01=0x0050, text=»* RET 8 =EDIT BUFFER OVERFLOW«, t00=0x0049, t01=0x00fc}
0x7316…7320 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0122}
0x7320…7348 Head {h00=0x0024, h01=0x0050, text=»* APPL = FIELD INTO BUFFER «, t00=0x0049, t01=0x012c}
0x7348…7380 Head {h00=0x0034, h01=0x0050, text=»* APPL = 1 FIELD INTO BUFFER, TRANSMIT BLOCK «, t00=0x0049, t01=0x0154}
0x7380…73a8 Head {h00=0x0024, h01=0x0050, text=»* APPL = 2 NO TRANSMIT FIELD «, t00=0x0049, t01=0x018c}
0x73a8…73ee Head {h00=0x0042, h01=0x0050, text=»* APPL = 3 SUPPRESS LEADING ZEROES (IF HEADER:SETR GENEREL)«, t00=0x004a, t01=0x0024}
0x73ee…7432 Head {h00=0x0040, h01=0x0050, text=»* APPL = 4 LENGTH OF FIELD=MAXL (IF HEADER: SET GENERAL) «, t00=0x004a, t01=0x006a}
0x7432…7458 Head {h00=0x0022, h01=0x0050, text=»* LISTE: ALWAYS SET «, t00=0x004a, t01=0x00ae}
0x7458…748a Head {h00=0x002e, h01=0x0050, text=»* FOLLOWING APPL ONLY USED IN BATCHHEADER«, t00=0x004a, t01=0x00d4}
0x748a…74be Head {h00=0x0030, h01=0x0050, text=»* APPL = 13 EOR-CHAR AS END OF EACH RECORD«, t00=0x004a, t01=0x0106}
0x74be…74e6 Head {h00=0x0024, h01=0x0050, text=»* LISTE: ALWAYS CLEAR «, t00=0x004a, t01=0x013a}
0x74e6…7534 Head {h00=0x004a, h01=0x0050, text=»* APPL = 14 CONT-CHAR IN END OF EACH DATA RECORD WHICH IS CONTINUED «, t00=0x004a, t01=0x0162}
0x7534…755e Head {h00=0x0026, h01=0x0050, text=»* LISTE: ALWAYS CLEAR«, t00=0x004b, t01=0x0020}
0x755e…7592 Head {h00=0x0030, h01=0x0050, text=»* APPL = 15 INSERT BACHNAME IN THIS FIELD «, t00=0x004b, t01=0x004a}
0x7592…75ce Head {h00=0x0038, h01=0x0050, text=»* APPL = 16 FIELDS (STARTING WITH &) ARE NOT SPLIT«, t00=0x004b, t01=0x007e}
0x75ce…75f8 Head {h00=0x0026, h01=0x0050, text=»* LSTE: ALWAYS CLEAR «, t00=0x004b, t01=0x00ba}
0x75f8…7602 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x00e4}
0x7602…7636 Head {h00=0x0030, h01=0x0050, text=»* APPL = 1XXX XXX=LENGTH OF RECORD HEADER«, t00=0x004b, t01=0x00ee}
0x7636…7674 Head {h00=0x003a, h01=0x0050, text=»* APPL = 2XXX THIS FIELD IS THE RECORD NUMBER FIELD«, t00=0x004b, t01=0x0122}
0x7674…76c2 Head {h00=0x004a, h01=0x0050, text=»* APPL = 3XXX THIS FIELD IS THE CONTINUATION SEQUENCE NUMBER FIELD «, t00=0x004b, t01=0x0160}
0x76c2…76cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x001e}
0x76cc…76e8 Head {h00=0x0018, h01=0x0050, text=»* BIN4 = WORK ITEM «, t00=0x004c, t01=0x0028}
0x76e8…7704 Head {h00=0x0018, h01=0x0050, text=»* BIN7 = MAX LENGTH«, t00=0x004c, t01=0x0044}
0x7704…7722 Head {h00=0x001a, h01=0x0050, text=»* BIN8 = FIELD NUMBER«, t00=0x004c, t01=0x0060}
0x7722…7748 Head {h00=0x0022, h01=0x0050, text=»* BIN9 = INDEX TO EDIT BUFFER«, t00=0x004c, t01=0x007e}
0x7748…776e Head {h00=0x0022, h01=0x0050, text=»* BIN13= DELETE START POINTER«, t00=0x004c, t01=0x00a4}
0x776e…778c Head {h00=0x001a, h01=0x0050, text=»* BIN16= EDIT POINTER«, t00=0x004c, t01=0x00ca}
0x778c…7796 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x00e8}
0x7796…77ce Head {h00=0x0034, h01=0x0050, text=»* BIN15 = NO OF CHAR INSERTED IN OUTPUT RECORD «, t00=0x004c, t01=0x00f2}
0x77ce…780a Head {h00=0x0038, h01=0x0050, text=»* STRG10A = WORK STRING FOR DATE/TIME/CONVERTED BCD«, t00=0x004c, t01=0x012a}
0x780a…7832 Head {h00=0x0024, h01=0x0050, text=»* WORK(W15) = LENGTH OF HEADER «, t00=0x004c, t01=0x0166}
0x7832…7860 Head {h00=0x002a, h01=0x0050, text=»* WORK(W16) = RECORD NUMBER POSITION «, t00=0x004c, t01=0x018e}
0x7860…788c Head {h00=0x0028, h01=0x0050, text=»* WORK(W17) = RECORD NUMBER LENGTH «, t00=0x004d, t01=0x002c}
0x788c…78c2 Head {h00=0x0032, h01=0x0050, text=»* WORK(W18) = CONTINUATION SEQUENCE POSITION «, t00=0x004d, t01=0x0058}
0x78c2…78f6 Head {h00=0x0030, h01=0x0050, text=»* WORD(W19) = CONTINUATION SEQUENCE LENGTH «, t00=0x004d, t01=0x008e}
0x78f6…792a Head {h00=0x0030, h01=0x0050, text=»* BCDI21(W4) = CONTINUATION SEQUENCE NUMBER«, t00=0x004d, t01=0x00c2}
0x792a…7950 Head {h00=0x0022, h01=0x0050, text=»* BCDI21(W5) = RECORD NUMBER «, t00=0x004d, t01=0x00f6}
0x7950…795a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x011c}
0x795a…7974 Head {h00=0x0016, h01=0x0050, text=»CONV PROC CONT,FC «, t00=0x004d, t01=0x0126}
0x7974…7990 Head {h00=0x0018, h01=0x0050, text=» CBG CONT,W0,CON100 «, t00=0x004d, t01=0x0140}
0x7990…799e Head {h00=0x000a, h01=0x0050, text=»CON090«, t00=0x004d, t01=0x015c}
0x799e…79be Head {h00=0x001c, h01=0x0050, text=» MOVE BPOOL(BIN9),=X'20'«, t00=0x004d, t01=0x016a}
0x79be…79ee Head {h00=0x002c, h01=0x0050, text=» MOVE BCDI21(W4),=D'0' RESET SEQUENCE NO«, t00=0x004d, t01=0x018a}
0x79ee…7a1a Head {h00=0x0028, h01=0x0050, text=» MOVE BIN13,W0 RESET DELETE POINTER «, t00=0x004e, t01=0x002a}
0x7a1a…7a46 Head {h00=0x0028, h01=0x0050, text=» MOVE BIN16,BIN13 LOAD EDIT POINTER «, t00=0x004e, t01=0x0056}
0x7a46…7a54 Head {h00=0x000a, h01=0x0050, text=»CON100«, t00=0x004e, t01=0x0082}
0x7a54…7a68 Head {h00=0x0010, h01=0x0050, text=» CLEAR FSUPR«, t00=0x004e, t01=0x0090}
0x7a68…7a82 Head {h00=0x0016, h01=0x0050, text=» TBF BSUPR,CON105 «, t00=0x004e, t01=0x00a4}
0x7a82…7a94 Head {h00=0x000e, h01=0x0050, text=» SET FSUPR«, t00=0x004e, t01=0x00be}
0x7a94…7aa2 Head {h00=0x000a, h01=0x0050, text=»CON105«, t00=0x004e, t01=0x00d0}
0x7aa2…7aca Head {h00=0x0024, h01=0x0050, text=» ADD BIN8,W1 UPDATE FIELD NUMBER«, t00=0x004e, t01=0x00de}
0x7aca…7af0 Head {h00=0x0022, h01=0x0050, text=» CALL GETFWD,BIN7,2,BIN8,BIN4 «, t00=0x004e, t01=0x0106}
0x7af0…7b0a Head {h00=0x0016, h01=0x0050, text=» CALL ADJUST,BIN7 «, t00=0x004e, t01=0x012c}
0x7b0a…7b1e Head {h00=0x0010, h01=0x0050, text=» BOK CON130 «, t00=0x004e, t01=0x0146}
0x7b1e…7b40 Head {h00=0x001e, h01=0x0050, text=» BN CONRET ALL FIELD DONE «, t00=0x004e, t01=0x015a}
0x7b40…7b6a Head {h00=0x0026, h01=0x0050, text=» B CONER1 COMPULSORY FIELD EMPTHY «, t00=0x004e, t01=0x017c}
0x7b6a…7b78 Head {h00=0x000a, h01=0x0050, text=»CON130«, t00=0x004f, t01=0x0016}
0x7b78…7b9a Head {h00=0x001e, h01=0x0050, text=» GETCTL 0,VSEIND GET APPL «, t00=0x004f, t01=0x0024}
0x7b9a…7ba4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0046}
0x7ba4…7bda Head {h00=0x0032, h01=0x0050, text=» CBL VSEIND,=W'1000',CON131 NORMAL APPL VALUE «, t00=0x004f, t01=0x0050}
0x7bda…7c14 Head {h00=0x0036, h01=0x0050, text=» CBL VSEIND,=W'2000',APL1000 HANDLE RECORD HEADER «, t00=0x004f, t01=0x0086}
0x7c14…7c4a Head {h00=0x0032, h01=0x0050, text=» CBL VSEIND,=W'3000',APL2000 HANDLE RECORD NO «, t00=0x004f, t01=0x00c0}
0x7c4a…7c82 Head {h00=0x0034, h01=0x0050, text=» CBL VSEIND,=W'4000',APL3000 HANDLE SEQUENCE NO «, t00=0x004f, t01=0x00f6}
0x7c82…7caa Head {h00=0x0024, h01=0x0050, text=» MOVE VSEIND,W2 CLEAR ERROR APPL«, t00=0x004f, t01=0x012e}
0x7caa…7cbc Head {h00=0x000e, h01=0x0050, text=» B CON131 «, t00=0x004f, t01=0x0156}
0x7cbc…7cc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0168}
0x7cc6…7ce6 Head {h00=0x001c, h01=0x0050, text=»* HANDLE RECORD HEADER:«, t00=0x004f, t01=0x0172}
0x7ce6…7d1e (80, 0, 400) Head {h00=0x0034, h01=0x0050, text=»* APPL=1000, WHERE XXX=LENGTH OF RECORD HEADER «, t00=0x0050, t01=0x0004}
0x7d1e…7d2e Head {h00=0x000c, h01=0x0050, text=»APL1000 «, t00=0x0050, t01=0x003c}
0x7d2e…7d4a Head {h00=0x0018, h01=0x0050, text=» SUB VSEIND,=W'1000'«, t00=0x0050, t01=0x004c}
0x7d4a…7d86 Head {h00=0x0038, h01=0x0050, text=» MOVE WORK(W15),VSEIND WORK(W15) = LENGTH OF HEADER «, t00=0x0050, t01=0x0068}
0x7d86…7da6 Head {h00=0x001c, h01=0x0050, text=» SET FIRSTFL FIRST TIME «, t00=0x0050, t01=0x00a4}
0x7da6…7db8 Head {h00=0x000e, h01=0x0050, text=» B CON100 «, t00=0x0050, t01=0x00c4}
0x7db8…7dc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x00d6}
0x7dc2…7df4 Head {h00=0x002e, h01=0x0050, text=»* HANDLE POSITION AND LENGTH OF RECORD NO«, t00=0x0050, t01=0x00e0}
0x7df4…7e04 Head {h00=0x000c, h01=0x0050, text=»APL2000 «, t00=0x0050, t01=0x0112}
0x7e04…7e3c Head {h00=0x0034, h01=0x0050, text=» MOVE WORK(W16),BIN16 SET START POS OF RECORD NO«, t00=0x0050, t01=0x0122}
0x7e3c…7e64 Head {h00=0x0024, h01=0x0050, text=» GETCTL 1,BIN7 GET MAXL OF FIELD«, t00=0x0050, t01=0x015a}
0x7e64…7e98 Head {h00=0x0030, h01=0x0050, text=» MOVE WORK(W17),BIN7 SET LENGTH OF RECORD NO«, t00=0x0050, t01=0x0182}
0x7e98…7ec6 Head {h00=0x002a, h01=0x0050, text=» SUB VSEIND,=W'2000' ADJUST APPL VALUE«, t00=0x0051, t01=0x0026}
0x7ec6…7ee8 Head {h00=0x001e, h01=0x0050, text=» B CON131 FURTHER HANDLING«, t00=0x0051, t01=0x0054}
0x7ee8…7ef2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0076}
0x7ef2…7f26 Head {h00=0x0030, h01=0x0050, text=»* HANDLE POSITION AND LENGTH OF SEQUENCE NO«, t00=0x0051, t01=0x0080}
0x7f26…7f36 Head {h00=0x000c, h01=0x0050, text=»APL3000 «, t00=0x0051, t01=0x00b4}
0x7f36…7f76 Head {h00=0x003c, h01=0x0050, text=» MOVE WORK(W18),BIN16 SET START POSITION OF SEQUENCE NO «, t00=0x0051, t01=0x00c4}
0x7f76…7f9e Head {h00=0x0024, h01=0x0050, text=» GETCTL 1,BIN7 GET MAXL OF FIELD«, t00=0x0051, t01=0x0104}
0x7f9e…7fd4 Head {h00=0x0032, h01=0x0050, text=» MOVE WORK(W19),BIN7 SET LENGTH OF SEQUENCE NO«, t00=0x0051, t01=0x012c}
0x7fd4…8002 Head {h00=0x002a, h01=0x0050, text=» SUB VSEIND,=W'3000' ADJUST APPL VALUE«, t00=0x0051, t01=0x0162}
0x8002…8024 Head {h00=0x001e, h01=0x0050, text=» B CON131 FURTHER HANDLING«, t00=0x0051, t01=0x0190}
0x8024…802e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0022}
0x802e…8038 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x002c}
0x8038…8046 Head {h00=0x000a, h01=0x0050, text=»CON131«, t00=0x0052, t01=0x0036}
0x8046…8050 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0044}
0x8050…806e Head {h00=0x001a, h01=0x0050, text=» CBNE BTYPE,W3,CON150 «, t00=0x0052, t01=0x004e}
0x806e…8088 Head {h00=0x0016, h01=0x0050, text=»* DATA RECORD «, t00=0x0052, t01=0x006c}
0x8088…80b6 Head {h00=0x002a, h01=0x0050, text=» IB VSEIND,CON132,CON100,CON135,CON140«, t00=0x0052, t01=0x0086}
0x80b6…80c4 Head {h00=0x000a, h01=0x0050, text=»CON132«, t00=0x0052, t01=0x00b4}
0x80c4…80d6 Head {h00=0x000e, h01=0x0050, text=» B CON190 «, t00=0x0052, t01=0x00c2}
0x80d6…80e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00d4}
0x80e0…80ee Head {h00=0x000a, h01=0x0050, text=»CON135«, t00=0x0052, t01=0x00de}
0x80ee…8110 Head {h00=0x001e, h01=0x0050, text=»* SUPPRESS LEADING ZEROES«, t00=0x0052, t01=0x00ec}
0x8110…8122 Head {h00=0x000e, h01=0x0050, text=» SET FSUPR«, t00=0x0052, t01=0x010e}
0x8122…8134 Head {h00=0x000e, h01=0x0050, text=» B CON190 «, t00=0x0052, t01=0x0120}
0x8134…813e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0132}
0x813e…814c Head {h00=0x000a, h01=0x0050, text=»CON140«, t00=0x0052, t01=0x013c}
0x814c…8166 Head {h00=0x0016, h01=0x0050, text=»* NO SUPPRESSION «, t00=0x0052, t01=0x014a}
0x8166…817a Head {h00=0x0010, h01=0x0050, text=» CLEAR FSUPR«, t00=0x0052, t01=0x0164}
0x817a…818c Head {h00=0x000e, h01=0x0050, text=» B CON190 «, t00=0x0052, t01=0x0178}
0x818c…8196 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x018a}
0x8196…81a0 (83, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0004}
0x81a0…81ae Head {h00=0x000a, h01=0x0050, text=»CON150«, t00=0x0053, t01=0x000e}
0x81ae…81da Head {h00=0x0028, h01=0x0050, text=»* IN HEADER, SET GENERAL CONDITIONS«, t00=0x0053, t01=0x001c}
0x81da…8214 Head {h00=0x0036, h01=0x0050, text=» IB VSEIND,CON152,CON100,CON155,CON160,CON152, C «, t00=0x0053, t01=0x0048}
0x8214…8244 Head {h00=0x002c, h01=0x0050, text=» CON152,CON152,CON152,CON152,CON152, C«, t00=0x0053, t01=0x0082}
0x8244…8278 Head {h00=0x0030, h01=0x0050, text=» CON152,CON152,CON165,CON170,CON175,CON180 «, t00=0x0053, t01=0x00b2}
0x8278…8286 Head {h00=0x000a, h01=0x0050, text=»CON152«, t00=0x0053, t01=0x00e6}
0x8286…8298 Head {h00=0x000e, h01=0x0050, text=» B CON190 «, t00=0x0053, t01=0x00f4}
0x8298…82a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0106}
0x82a2…82b0 Head {h00=0x000a, h01=0x0050, text=»CON155«, t00=0x0053, t01=0x0110}
0x82b0…82dc Head {h00=0x0028, h01=0x0050, text=»* GENERAL SUPPRESS LEADING ZEROES «, t00=0x0053, t01=0x011e}
0x82dc…82ee Head {h00=0x000e, h01=0x0050, text=» SET BSUPR«, t00=0x0053, t01=0x014a}
0x82ee…8300 Head {h00=0x000e, h01=0x0050, text=» B CON100 «, t00=0x0053, t01=0x015c}
0x8300…830a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x016e}
0x830a…8318 Head {h00=0x000a, h01=0x0050, text=»CON160«, t00=0x0053, t01=0x0178}
0x8318…833a Head {h00=0x001e, h01=0x0050, text=»* GENERAL NO SUPPRESSION «, t00=0x0053, t01=0x0186}
0x833a…8366 Head {h00=0x0028, h01=0x0050, text=» CBE W9,FC,CON100 LISTE: ALWAYS SET «, t00=0x0054, t01=0x0018}
0x8366…837a Head {h00=0x0010, h01=0x0050, text=» CLEAR BSUPR«, t00=0x0054, t01=0x0044}
0x837a…838c Head {h00=0x000e, h01=0x0050, text=» B CON100 «, t00=0x0054, t01=0x0058}
0x838c…8396 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x006a}
0x8396…83a4 Head {h00=0x000a, h01=0x0050, text=»CON165«, t00=0x0054, t01=0x0074}
0x83a4…83bc Head {h00=0x0014, h01=0x0050, text=»* EOR CHARACTER «, t00=0x0054, t01=0x0082}
0x83bc…83ce Head {h00=0x000e, h01=0x0050, text=» B CON100 «, t00=0x0054, t01=0x009a}
0x83ce…83d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00ac}
0x83d8…83e6 Head {h00=0x000a, h01=0x0050, text=»CON170«, t00=0x0054, t01=0x00b6}
0x83e6…8406 Head {h00=0x001c, h01=0x0050, text=»* CONTINUATION CHARACTER«, t00=0x0054, t01=0x00c4}
0x8406…8434 Head {h00=0x002a, h01=0x0050, text=» CBE W9,FC,CON100 LISTE: ALWAYS CLEAR «, t00=0x0054, t01=0x00e4}
0x8434…8462 Head {h00=0x002a, h01=0x0050, text=» SET BCONT INDICATE CONT. CHAR NEEDED «, t00=0x0054, t01=0x0112}
0x8462…8474 Head {h00=0x000e, h01=0x0050, text=» B CON100 «, t00=0x0054, t01=0x0140}
0x8474…847e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0152}
0x847e…848c Head {h00=0x000a, h01=0x0050, text=»CON175«, t00=0x0054, t01=0x015c}
0x848c…84a8 Head {h00=0x0018, h01=0x0050, text=»* INSERT BATCH NAME«, t00=0x0054, t01=0x016a}
0x84a8…84be Head {h00=0x0012, h01=0x0050, text=» MOVE BIN7,W6 «, t00=0x0054, t01=0x0186}
0x84be…84d6 Head {h00=0x0014, h01=0x0050, text=» MOVE BIN4,W188 «, t00=0x0055, t01=0x000c}
0x84d6…84fa Head {h00=0x0020, h01=0x0050, text=» SUB BIN4,BIN7 LENGTH FIELD «, t00=0x0055, t01=0x0024}
0x84fa…8512 Head {h00=0x0014, h01=0x0050, text=» SUB BIN4,BIN16 «, t00=0x0055, t01=0x0048}
0x8512…854c Head {h00=0x0036, h01=0x0050, text=» EDSUB BPOOL(BIN9),BIN16,FMTBATCH INSERT BATCHNAME«, t00=0x0055, t01=0x0060}
0x854c…855e Head {h00=0x000e, h01=0x0050, text=» B CON260 «, t00=0x0055, t01=0x009a}
0x855e…8568 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x00ac}
0x8568…8576 Head {h00=0x000a, h01=0x0050, text=»CON180«, t00=0x0055, t01=0x00b6}
0x8576…85a6 Head {h00=0x002c, h01=0x0050, text=»* FIELDS (STARTING WITH &) ARE NOT SPLIT«, t00=0x0055, t01=0x00c4}
0x85a6…85ce Head {h00=0x0024, h01=0x0050, text=» CLEAR SPLITFL NOT NORMAL SPLIT «, t00=0x0055, t01=0x00f4}
0x85ce…85e0 Head {h00=0x000e, h01=0x0050, text=» B CON100 «, t00=0x0055, t01=0x011c}
0x85e0…85ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x012e}
0x85ea…85f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0138}
0x85f4…85fc Head {h00=0x0004, h01=0x0050, t00=0x0055, t01=0x0142}
0x85fc…860a Head {h00=0x000a, h01=0x0050, text=»CON190«, t00=0x0055, t01=0x014a}
0x860a…863e Head {h00=0x0030, h01=0x0050, text=» CBE W9,FC,CON195 LISTE: ALL FIELDS INCLUDED«, t00=0x0055, t01=0x0158}
0x863e…8658 Head {h00=0x0016, h01=0x0050, text=» TBF FSUPR,CON195 «, t00=0x0055, t01=0x018c}
0x8658…8684 Head {h00=0x0028, h01=0x0050, text=» CALL EMPTYT,:FMTITEM TEST IF EMPTY «, t00=0x0056, t01=0x0016}
0x8684…86ac Head {h00=0x0024, h01=0x0050, text=» BNZ CON280 EMPTY, IGNORE FIELD «, t00=0x0056, t01=0x0042}
0x86ac…86ba Head {h00=0x000a, h01=0x0050, text=»CON195«, t00=0x0056, t01=0x006a}
0x86ba…86da Head {h00=0x001c, h01=0x0050, text=» GETCTL 1,BIN7 GET MAXL «, t00=0x0056, t01=0x0078}
0x86da…86f8 Head {h00=0x001a, h01=0x0050, text=» TSTCTL 0 TEST - ALPHA«, t00=0x0056, t01=0x0098}
0x86f8…870e Head {h00=0x0012, h01=0x0050, text=» BZ CON200 BCD«, t00=0x0056, t01=0x00b6}
0x870e…8716 Head {h00=0x0004, h01=0x0050, t00=0x0056, t01=0x00cc}
0x8716…8726 Head {h00=0x000c, h01=0x0050, text=»* ALPHA «, t00=0x0056, t01=0x00d4}
0x8726…872e Head {h00=0x0004, h01=0x0050, t00=0x0056, t01=0x00e4}
0x872e…875c Head {h00=0x002a, h01=0x0050, text=» MOVE BIN4,W188 GET EDIT BUFFER LENGTH«, t00=0x0056, t01=0x00ec}
0x875c…878a Head {h00=0x002a, h01=0x0050, text=» SUB BIN4,BIN7 ADJUST WITH MAX LENGTH «, t00=0x0056, t01=0x011a}
0x878a…87ba Head {h00=0x002c, h01=0x0050, text=» SUB BIN4,BIN16 ADJUST WITH EDIT POINTER«, t00=0x0056, t01=0x0148}
0x87ba…87cc Head {h00=0x000e, h01=0x0050, text=» BN CONER3«, t00=0x0056, t01=0x0178}
0x87cc…87f4 Head {h00=0x0024, h01=0x0050, text=» EDSUB BPOOL(BIN9),BIN16,FRMALP «, t00=0x0056, t01=0x018a}
0x87f4…8806 Head {h00=0x000e, h01=0x0050, text=» B CON260 «, t00=0x0057, t01=0x0022}
0x8806…880e Head {h00=0x0004, h01=0x0050, t00=0x0057, t01=0x0034}
0x880e…881c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0057, t01=0x003c}
0x881c…882a Head {h00=0x000a, h01=0x0050, text=»* BCD «, t00=0x0057, t01=0x004a}
0x882a…8832 Head {h00=0x0004, h01=0x0050, t00=0x0057, t01=0x0058}
0x8832…8840 Head {h00=0x000a, h01=0x0050, text=»CON200«, t00=0x0057, t01=0x0060}
0x8840…886a Head {h00=0x0026, h01=0x0050, text=» CBG BIN7,W21,CONER2 BCD-OVERFLOW «, t00=0x0057, t01=0x006e}
0x886a…8898 Head {h00=0x002a, h01=0x0050, text=» MOVE BIN4,W188 GET EDIT BUFFER LENGTH«, t00=0x0057, t01=0x0098}
0x8898…88c6 Head {h00=0x002a, h01=0x0050, text=» SUB BIN4,BIN7 ADJUST WITH MAX LENGTH «, t00=0x0057, t01=0x00c6}
0x88c6…88f6 Head {h00=0x002c, h01=0x0050, text=» SUB BIN4,BIN16 ADJUST WITH EDIT POINTER«, t00=0x0057, t01=0x00f4}
0x88f6…8908 Head {h00=0x000e, h01=0x0050, text=» BN CONER3«, t00=0x0057, t01=0x0124}
0x8908…8928 Head {h00=0x001c, h01=0x0050, text=» GETCTL 3,BIN4 GET SCHK «, t00=0x0057, t01=0x0136}
0x8928…894a Head {h00=0x001e, h01=0x0050, text=» CALL TESTB,BIN4,W15 SIGN «, t00=0x0057, t01=0x0156}
0x894a…8960 Head {h00=0x0012, h01=0x0050, text=» BZ CON220 NO «, t00=0x0057, t01=0x0178}
0x8960…897a Head {h00=0x0016, h01=0x0050, text=» TBF FSUPR,CON210 «, t00=0x0057, t01=0x018e}
0x897a…8994 Head {h00=0x0016, h01=0x0050, text=» CBE W9,FC,CON205 «, t00=0x0058, t01=0x0018}
0x8994…89bc Head {h00=0x0024, h01=0x0050, text=» EDSUB BPOOL(BIN9),BIN16,FRMTCS «, t00=0x0058, t01=0x0032}
0x89bc…89d6 Head {h00=0x0016, h01=0x0050, text=» MOVE BIN13,BIN16 «, t00=0x0058, t01=0x005a}
0x89d6…89e8 Head {h00=0x000e, h01=0x0050, text=» B CON280 «, t00=0x0058, t01=0x0074}
0x89e8…8a02 Head {h00=0x0016, h01=0x0050, text=»CON205 IF LISTE «, t00=0x0058, t01=0x0086}
0x8a02…8a38 Head {h00=0x0032, h01=0x0050, text=» EDSUB BPOOL(BIN9),BIN16,FRMZCS EDIT 21 DIGITS«, t00=0x0058, t01=0x00a0}
0x8a38…8a4a Head {h00=0x000e, h01=0x0050, text=» B CON215 «, t00=0x0058, t01=0x00d6}
0x8a4a…8a58 Head {h00=0x000a, h01=0x0050, text=»CON210«, t00=0x0058, t01=0x00e8}
0x8a58…8a8e Head {h00=0x0032, h01=0x0050, text=» EDSUB BPOOL(BIN9),BIN16,FRMBCS EDIT 21 DIGITS«, t00=0x0058, t01=0x00f6}
0x8a8e…8a9c Head {h00=0x000a, h01=0x0050, text=»CON215«, t00=0x0058, t01=0x012c}
0x8a9c…8ac6 Head {h00=0x0026, h01=0x0050, text=» MOVE BIN4,W22 SET PICTURE LENGTH «, t00=0x0058, t01=0x013a}
0x8ac6…8af2 Head {h00=0x0028, h01=0x0050, text=» ADD BIN7,W1 ADJUST POINTER FOR SIGN«, t00=0x0058, t01=0x0164}
0x8af2…8b04 Head {h00=0x000e, h01=0x0050, text=» B CON250 «, t00=0x0058, t01=0x0190}
0x8b04…8b12 Head {h00=0x000a, h01=0x0050, text=»CON220«, t00=0x0059, t01=0x0012}
0x8b12…8b2c Head {h00=0x0016, h01=0x0050, text=» TBF FSUPR,CON230 «, t00=0x0059, t01=0x0020}
0x8b2c…8b46 Head {h00=0x0016, h01=0x0050, text=» CBE W9,FC,CON225 «, t00=0x0059, t01=0x003a}
0x8b46…8b6e Head {h00=0x0024, h01=0x0050, text=» EDSUB BPOOL(BIN9),BIN16,FRMTCD «, t00=0x0059, t01=0x0054}
0x8b6e…8b88 Head {h00=0x0016, h01=0x0050, text=» MOVE BIN13,BIN16 «, t00=0x0059, t01=0x007c}
0x8b88…8b9a Head {h00=0x000e, h01=0x0050, text=» B CON280 «, t00=0x0059, t01=0x0096}
0x8b9a…8bb4 Head {h00=0x0016, h01=0x0050, text=»CON225 IF LISTE «, t00=0x0059, t01=0x00a8}
0x8bb4…8bdc Head {h00=0x0024, h01=0x0050, text=» EDSUB BPOOL(BIN9),BIN16,FRMZCD «, t00=0x0059, t01=0x00c2}
0x8bdc…8bee Head {h00=0x000e, h01=0x0050, text=» B CON235 «, t00=0x0059, t01=0x00ea}
0x8bee…8bfc Head {h00=0x000a, h01=0x0050, text=»CON230«, t00=0x0059, t01=0x00fc}
0x8bfc…8c24 Head {h00=0x0024, h01=0x0050, text=» EDSUB BPOOL(BIN9),BIN16,FRMBCD «, t00=0x0059, t01=0x010a}
0x8c24…8c32 Head {h00=0x000a, h01=0x0050, text=»CON235«, t00=0x0059, t01=0x0132}
0x8c32…8c5a Head {h00=0x0024, h01=0x0050, text=» MOVE BIN4,W21 SET PICUTR LENGTH«, t00=0x0059, t01=0x0140}
0x8c5a…8c68 Head {h00=0x000a, h01=0x0050, text=»CON250«, t00=0x0059, t01=0x0168}
0x8c68…8c90 Head {h00=0x0024, h01=0x0050, text=» SUB BIN4,BIN7 SET DELETE LENGTH«, t00=0x0059, t01=0x0176}
0x8c90…8cca Head {h00=0x0036, h01=0x0050, text=» DELETE BPOOL(BIN9),BIN13,BIN4 DELETE ADDED ZEROES«, t00=0x005a, t01=0x000e}
0x8cca…8cd8 Head {h00=0x000a, h01=0x0050, text=»CON260«, t00=0x005a, t01=0x0048}
0x8cd8…8d0a Head {h00=0x002e, h01=0x0050, text=» ADD BIN13,BIN7 ADJUST DELETE/EDIT POINTER«, t00=0x005a, t01=0x0056}
0x8d0a…8d36 Head {h00=0x0028, h01=0x0050, text=» MOVE BIN16,BIN13 LOAD EDIT POINTER «, t00=0x005a, t01=0x0088}
0x8d36…8d44 Head {h00=0x000a, h01=0x0050, text=»CON280«, t00=0x005a, t01=0x00b4}
0x8d44…8d5e Head {h00=0x0016, h01=0x0050, text=» CBNE W9,FC,CON290«, t00=0x005a, t01=0x00c2}
0x8d5e…8d9c Head {h00=0x003a, h01=0x0050, text=» EDSUB BPOOL(BIN9),BIN16,FRMFILL LISTE: INSERT FILLER «, t00=0x005a, t01=0x00dc}
0x8d9c…8dc8 Head {h00=0x0028, h01=0x0050, text=» TBF FIRSTFL,CON285 NOT FIRST HEADER«, t00=0x005a, t01=0x011a}
0x8dc8…8df6 Head {h00=0x002a, h01=0x0050, text=» CBNE BTYPE,W3,CON285 NOT NORMAL TRANS«, t00=0x005a, t01=0x0146}
0x8df6…8e1a Head {h00=0x0020, h01=0x0050, text=» CBL BIN16,WORK(W15),CON283 «, t00=0x005a, t01=0x0174}
0x8e1a…8e44 Head {h00=0x0026, h01=0x0050, text=» CLEAR FIRSTFL OUT OF FIRST HEADER«, t00=0x005b, t01=0x0008}
0x8e44…8e64 Head {h00=0x001c, h01=0x0050, text=»CON283 IN FIRST HEADER«, t00=0x005b, t01=0x0032}
0x8e64…8e7e Head {h00=0x0016, h01=0x0050, text=» ADD WORK(W15),W1 «, t00=0x005b, t01=0x0052}
0x8e7e…8e8c Head {h00=0x000a, h01=0x0050, text=»CON285«, t00=0x005b, t01=0x006c}
0x8e8c…8ea6 Head {h00=0x0016, h01=0x0050, text=» MOVE BIN13,BIN16 «, t00=0x005b, t01=0x007a}
0x8ea6…8eb4 Head {h00=0x000a, h01=0x0050, text=»CON290«, t00=0x005b, t01=0x0094}
0x8eb4…8ee0 Head {h00=0x0028, h01=0x0050, text=» CBE VSEIND,W1,CONTRM APPL =1 TRANSM«, t00=0x005b, t01=0x00a2}
0x8ee0…8efa Head {h00=0x0016, h01=0x0050, text=» MOVE BIN4,RECLGD «, t00=0x005b, t01=0x00ce}
0x8efa…8f18 Head {h00=0x001a, h01=0x0050, text=» CBG BIN16,BIN4,CONTRM«, t00=0x005b, t01=0x00e8}
0x8f18…8f2a Head {h00=0x000e, h01=0x0050, text=» B CON100 «, t00=0x005b, t01=0x0106}
0x8f2a…8f38 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005b, t01=0x0118}
0x8f38…8f40 Head {h00=0x0004, h01=0x0050, t00=0x005b, t01=0x0126}
0x8f40…8f5c Head {h00=0x0018, h01=0x0050, text=»CONRET RET ALL DONE«, t00=0x005b, t01=0x012e}
0x8f5c…8f86 Head {h00=0x0026, h01=0x0050, text=»CONTRM RET 2 WRITE/TRANSMIT BLOCK «, t00=0x005b, t01=0x014a}
0x8f86…8fb2 Head {h00=0x0028, h01=0x0050, text=»CONER1 RET 4 CUMPULSORY FIELD EMPTHY«, t00=0x005b, t01=0x0174}
0x8fb2…8fda Head {h00=0x0024, h01=0x0050, text=»CONER2 RET 6 BCD FIELD OVERFLOW «, t00=0x005c, t01=0x0010}
0x8fda…9004 Head {h00=0x0026, h01=0x0050, text=»CONER3 RET 8 EDIT BUFFER OVERFLOW «, t00=0x005c, t01=0x0038}
0x9004…9012 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x005c, t01=0x0062}
0x9012…9020 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005c, t01=0x0070}
0x9020…902a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x007e}
0x902a…903c Head {h00=0x000e, h01=0x0050, text=»* FORMATS «, t00=0x005c, t01=0x0088}
0x903c…9046 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x009a}
0x9046…905a Head {h00=0x0010, h01=0x0050, text=»FRMFILL FRMT«, t00=0x005c, t01=0x00a4}
0x905a…906e Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',1«, t00=0x005c, t01=0x00b8}
0x906e…907c Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x005c, t01=0x00cc}
0x907c…9084 Head {h00=0x0004, h01=0x0050, t00=0x005c, t01=0x00da}
0x9084…9098 Head {h00=0x0010, h01=0x0050, text=»FCOUNT FRMT «, t00=0x005c, t01=0x00e2}
0x9098…90ac Head {h00=0x0010, h01=0x0050, text=» FTEXT ' 1' «, t00=0x005c, t01=0x00f6}
0x90ac…90c4 Head {h00=0x0014, h01=0x0050, text=» FEOR NEW PAGE «, t00=0x005c, t01=0x010a}
0x90c4…90d8 Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',2«, t00=0x005c, t01=0x0122}
0x90d8…90ee Head {h00=0x0012, h01=0x0050, text=» FILLR '*',10 «, t00=0x005c, t01=0x0136}
0x90ee…9108 Head {h00=0x0016, h01=0x0050, text=» FTEXT 'NUMMER: ' «, t00=0x005c, t01=0x014c}
0x9108…9124 Head {h00=0x0018, h01=0x0050, text=» FMEL '9999',NUMBER «, t00=0x005c, t01=0x0166}
0x9124…9132 Head {h00=0x000a, h01=0x0050, text=» FEOR «, t00=0x005c, t01=0x0182}
0x9132…9146 Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',2«, t00=0x005c, t01=0x0190}
0x9146…9154 Head {h00=0x000a, h01=0x0050, text=» FEOR «, t00=0x005d, t01=0x0014}
0x9154…9162 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x005d, t01=0x0022}
0x9162…916a Head {h00=0x0004, h01=0x0050, t00=0x005d, t01=0x0030}
0x916a…917e Head {h00=0x0010, h01=0x0050, text=»FRMVOL1 FRMT«, t00=0x005d, t01=0x0038}
0x917e…9192 Head {h00=0x0010, h01=0x0050, text=» FCOPY STR8A«, t00=0x005d, t01=0x004c}
0x9192…91a0 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x005d, t01=0x0060}
0x91a0…91a8 Head {h00=0x0004, h01=0x0050, t00=0x005d, t01=0x006e}
0x91a8…91bc Head {h00=0x0010, h01=0x0050, text=»FRMVOL2 FRMT«, t00=0x005d, t01=0x0076}
0x91bc…91d8 Head {h00=0x0018, h01=0x0050, text=» FMEL '999999',DATE «, t00=0x005d, t01=0x008a}
0x91d8…91e6 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x005d, t01=0x00a6}
0x91e6…91ee Head {h00=0x0004, h01=0x0050, t00=0x005d, t01=0x00b4}
0x91ee…9202 Head {h00=0x0010, h01=0x0050, text=»FRMVOL3 FRMT«, t00=0x005d, t01=0x00bc}
0x9202…921a Head {h00=0x0014, h01=0x0050, text=» FMEL '99',FDCNT«, t00=0x005d, t01=0x00d0}
0x921a…9228 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x005d, t01=0x00e8}
0x9228…9230 Head {h00=0x0004, h01=0x0050, t00=0x005d, t01=0x00f6}
0x9230…9244 Head {h00=0x0010, h01=0x0050, text=»FBATC3 FRMT «, t00=0x005d, t01=0x00fe}
0x9244…925a Head {h00=0x0012, h01=0x0050, text=» FLINK FBATCH «, t00=0x005d, t01=0x0112}
0x925a…9276 Head {h00=0x0018, h01=0x0050, text=» FTEXT 'EJ GODKENDT'«, t00=0x005d, t01=0x0128}
0x9276…9284 Head {h00=0x000a, h01=0x0050, text=» FEOR «, t00=0x005d, t01=0x0144}
0x9284…9292 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x005d, t01=0x0152}
0x9292…929a Head {h00=0x0004, h01=0x0050, t00=0x005d, t01=0x0160}
0x929a…92ae Head {h00=0x0010, h01=0x0050, text=»FBATCH FRMT «, t00=0x005d, t01=0x0168}
0x92ae…92ba Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x005d, t01=0x017c}
0x92ba…92c8 Head {h00=0x000a, h01=0x0050, text=» FEOR «, t00=0x005d, t01=0x0188}
0x92c8…92d4 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x005e, t01=0x0008}
0x92d4…92ee Head {h00=0x0016, h01=0x0050, text=» FTEXT 'JOBNAME: '«, t00=0x005e, t01=0x0014}
0x92ee…9304 Head {h00=0x0012, h01=0x0050, text=» FCOPY JOBNAME«, t00=0x005e, t01=0x002e}
0x9304…9318 Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',4«, t00=0x005e, t01=0x0044}
0x9318…9334 Head {h00=0x0018, h01=0x0050, text=» FTEXT 'BATCHNAME: '«, t00=0x005e, t01=0x0058}
0x9334…9348 Head {h00=0x0010, h01=0x0050, text=» FCOPY BATCH«, t00=0x005e, t01=0x0074}
0x9348…935c Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',4«, t00=0x005e, t01=0x0088}
0x935c…936a Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x005e, t01=0x009c}
0x936a…9372 Head {h00=0x0004, h01=0x0050, t00=0x005e, t01=0x00aa}
0x9372…9388 Head {h00=0x0012, h01=0x0050, text=»FMTBATCH FRMT «, t00=0x005e, t01=0x00b2}
0x9388…939c Head {h00=0x0010, h01=0x0050, text=» FCOPY BATCH«, t00=0x005e, t01=0x00c8}
0x939c…93aa Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x005e, t01=0x00dc}
0x93aa…93b2 Head {h00=0x0004, h01=0x0050, t00=0x005e, t01=0x00ea}
0x93b2…93c6 Head {h00=0x0010, h01=0x0050, text=»FFDHDR FRMT «, t00=0x005e, t01=0x00f2}
0x93c6…93d2 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x005e, t01=0x0106}
0x93d2…93e0 Head {h00=0x000a, h01=0x0050, text=» FEOR «, t00=0x005e, t01=0x0112}
0x93e0…93ec Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x005e, t01=0x0120}
0x93ec…9414 Head {h00=0x0024, h01=0x0050, text=» FCOPY ='FLOPPY DISC SKRIVNING' «, t00=0x005e, t01=0x012c}
0x9414…9426 Head {h00=0x000e, h01=0x0050, text=» FLINK HDR«, t00=0x005e, t01=0x0154}
0x9426…9434 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x005e, t01=0x0166}
0x9434…943c Head {h00=0x0004, h01=0x0050, t00=0x005e, t01=0x0174}
0x943c…9450 Head {h00=0x0010, h01=0x0050, text=»FFDEND FRMT «, t00=0x005e, t01=0x017c}
0x9450…945c Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x005e, t01=0x0190}
0x945c…946a Head {h00=0x000a, h01=0x0050, text=» FEOR «, t00=0x005f, t01=0x000c}
0x946a…9476 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x005f, t01=0x001a}
0x9476…949e Head {h00=0x0024, h01=0x0050, text=» FCOPY ='FLOPPY DISC SKRIVNING' «, t00=0x005f, t01=0x0026}
0x949e…94b6 Head {h00=0x0014, h01=0x0050, text=» FCOPY =' KLAR' «, t00=0x005f, t01=0x004e}
0x94b6…94c8 Head {h00=0x000e, h01=0x0050, text=» FLINK HDR«, t00=0x005f, t01=0x0066}
0x94c8…94d6 Head {h00=0x000a, h01=0x0050, text=» FEOR «, t00=0x005f, t01=0x0078}
0x94d6…94e2 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x005f, t01=0x0086}
0x94e2…94f0 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x005f, t01=0x0092}
0x94f0…94f8 Head {h00=0x0004, h01=0x0050, t00=0x005f, t01=0x00a0}
0x94f8…950c Head {h00=0x0010, h01=0x0050, text=»FFDERR FRMT «, t00=0x005f, t01=0x00a8}
0x950c…9518 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x005f, t01=0x00bc}
0x9518…9526 Head {h00=0x000a, h01=0x0050, text=» FEOR «, t00=0x005f, t01=0x00c8}
0x9526…9532 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x005f, t01=0x00d6}
0x9532…955a Head {h00=0x0024, h01=0x0050, text=» FCOPY ='FLOPPY DISC SKRIVNING' «, t00=0x005f, t01=0x00e2}
0x955a…9576 Head {h00=0x0018, h01=0x0050, text=» FCOPY =' AFBRYDES' «, t00=0x005f, t01=0x010a}
0x9576…9588 Head {h00=0x000e, h01=0x0050, text=» FLINK HDR«, t00=0x005f, t01=0x0126}
0x9588…9596 Head {h00=0x000a, h01=0x0050, text=» FEOR «, t00=0x005f, t01=0x0138}
0x9596…95a2 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x005f, t01=0x0146}
0x95a2…95b0 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x005f, t01=0x0152}
0x95b0…95b8 Head {h00=0x0004, h01=0x0050, t00=0x005f, t01=0x0160}
0x95b8…95cc Head {h00=0x0010, h01=0x0050, text=»FLSHDR FRMT «, t00=0x005f, t01=0x0168}
0x95cc…95d8 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x005f, t01=0x017c}
0x95d8…95e6 Head {h00=0x000a, h01=0x0050, text=» FEOR «, t00=0x005f, t01=0x0188}
0x95e6…95f2 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0060, t01=0x0008}
0x95f2…960c Head {h00=0x0016, h01=0x0050, text=» FCOPY ='LISTNING'«, t00=0x0060, t01=0x0014}
0x960c…961e Head {h00=0x000e, h01=0x0050, text=» FLINK HDR«, t00=0x0060, t01=0x002e}
0x961e…962c Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0060, t01=0x0040}
0x962c…9634 Head {h00=0x0004, h01=0x0050, t00=0x0060, t01=0x004e}
0x9634…9648 Head {h00=0x0010, h01=0x0050, text=»FLSEND FRMT «, t00=0x0060, t01=0x0056}
0x9648…9654 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0060, t01=0x006a}
0x9654…9662 Head {h00=0x000a, h01=0x0050, text=» FEOR «, t00=0x0060, t01=0x0076}
0x9662…966e Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0060, t01=0x0084}
0x966e…9688 Head {h00=0x0016, h01=0x0050, text=» FCOPY ='LISTNING'«, t00=0x0060, t01=0x0090}
0x9688…96a0 Head {h00=0x0014, h01=0x0050, text=» FCOPY =' KLAR' «, t00=0x0060, t01=0x00aa}
0x96a0…96b2 Head {h00=0x000e, h01=0x0050, text=» FLINK HDR«, t00=0x0060, t01=0x00c2}
0x96b2…96c0 Head {h00=0x000a, h01=0x0050, text=» FEOR «, t00=0x0060, t01=0x00d4}
0x96c0…96cc Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0060, t01=0x00e2}
0x96cc…96da Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0060, t01=0x00ee}
0x96da…96e2 Head {h00=0x0004, h01=0x0050, t00=0x0060, t01=0x00fc}
0x96e2…96f6 Head {h00=0x0010, h01=0x0050, text=»FLSERR FRMT «, t00=0x0060, t01=0x0104}
0x96f6…9702 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0060, t01=0x0118}
0x9702…9710 Head {h00=0x000a, h01=0x0050, text=» FEOR «, t00=0x0060, t01=0x0124}
0x9710…971c Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0060, t01=0x0132}
0x971c…9736 Head {h00=0x0016, h01=0x0050, text=» FCOPY ='LISTNING'«, t00=0x0060, t01=0x013e}
0x9736…9752 Head {h00=0x0018, h01=0x0050, text=» FCOPY =' AFBRYDES' «, t00=0x0060, t01=0x0158}
0x9752…9764 Head {h00=0x000e, h01=0x0050, text=» FLINK HDR«, t00=0x0060, t01=0x0174}
0x9764…9772 Head {h00=0x000a, h01=0x0050, text=» FEOR «, t00=0x0060, t01=0x0186}
0x9772…977e (97, 0, 400) Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0061, t01=0x0004}
0x977e…978c Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0061, t01=0x0010}
0x978c…9794 Head {h00=0x0004, h01=0x0050, t00=0x0061, t01=0x001e}
0x9794…97a4 Head {h00=0x000c, h01=0x0050, text=»HDR FRMT«, t00=0x0061, t01=0x0026}
0x97a4…97b8 Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',4«, t00=0x0061, t01=0x0036}
0x97b8…97d0 Head {h00=0x0014, h01=0x0050, text=» FTEXT 'DATO: '«, t00=0x0061, t01=0x004a}
0x97d0…97ee Head {h00=0x001a, h01=0x0050, text=» FMEL '99-99-99',DATE «, t00=0x0061, t01=0x0062}
0x97ee…9802 Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',4«, t00=0x0061, t01=0x0080}
0x9802…9818 Head {h00=0x0012, h01=0x0050, text=» FTEXT 'TID: '«, t00=0x0061, t01=0x0094}
0x9818…9836 Head {h00=0x001a, h01=0x0050, text=» FMEL '99-99-99',TIME «, t00=0x0061, t01=0x00aa}
0x9836…9844 Head {h00=0x000a, h01=0x0050, text=» FEOR «, t00=0x0061, t01=0x00c8}
0x9844…9850 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0061, t01=0x00d6}
0x9850…9866 Head {h00=0x0012, h01=0x0050, text=» FTEXT 'IND: '«, t00=0x0061, t01=0x00e2}
0x9866…9882 Head {h00=0x0018, h01=0x0050, text=» FMEL '99999',NUMBER«, t00=0x0061, t01=0x00f8}
0x9882…989a Head {h00=0x0014, h01=0x0050, text=» FTEXT ' UD: ' «, t00=0x0061, t01=0x0114}
0x989a…98ba Head {h00=0x001c, h01=0x0050, text=» FMEL '99999',BCDI21(W5)«, t00=0x0061, t01=0x012c}
0x98ba…98c8 Head {h00=0x000a, h01=0x0050, text=» FEOR «, t00=0x0061, t01=0x014c}
0x98c8…98d4 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0061, t01=0x015a}
0x98d4…98e2 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0061, t01=0x0166}
0x98e2…98ea Head {h00=0x0004, h01=0x0050, t00=0x0061, t01=0x0174}
0x98ea…98fe Head {h00=0x0010, h01=0x0050, text=»FCAS02 FRMT «, t00=0x0061, t01=0x017c}
0x98fe…990a Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0061, t01=0x0190}
0x990a…9924 Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'DEVICE' «, t00=0x0062, t01=0x000c}
0x9924…9938 Head {h00=0x0010, h01=0x0050, text=» FILLR ':',1«, t00=0x0062, t01=0x0026}
0x9938…9948 Head {h00=0x000c, h01=0x0050, text=» FINP 9 «, t00=0x0062, t01=0x003a}
0x9948…9962 Head {h00=0x0016, h01=0x0050, text=» FCOPY STSAVE(W3) «, t00=0x0062, t01=0x004a}
0x9962…9972 Head {h00=0x000c, h01=0x0050, text=» FTAB 20«, t00=0x0062, t01=0x0064}
0x9972…998a Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'FILE' «, t00=0x0062, t01=0x0074}
0x998a…999e Head {h00=0x0010, h01=0x0050, text=» FILLR '-',1«, t00=0x0062, t01=0x008c}
0x999e…99b6 Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'NAME' «, t00=0x0062, t01=0x00a0}
0x99b6…99ca Head {h00=0x0010, h01=0x0050, text=» FILLR ':',1«, t00=0x0062, t01=0x00b8}
0x99ca…99da Head {h00=0x000c, h01=0x0050, text=» FINP 32«, t00=0x0062, t01=0x00cc}
0x99da…99ee Head {h00=0x0010, h01=0x0050, text=» FCOPY STR8B«, t00=0x0062, t01=0x00dc}
0x99ee…99fa Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0062, t01=0x00f0}
0x99fa…9a1e Head {h00=0x0020, h01=0x0050, text=» FCOPY =C'EXPIRATION DATE:' «, t00=0x0062, t01=0x00fc}
0x9a1e…9a2e Head {h00=0x000c, h01=0x0050, text=» FINP 32«, t00=0x0062, t01=0x0120}
0x9a2e…9a42 Head {h00=0x0010, h01=0x0050, text=» FCOPY STR6A«, t00=0x0062, t01=0x0130}
0x9a42…9a4e Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0062, t01=0x0144}
0x9a4e…9a7a Head {h00=0x0028, h01=0x0050, text=» FCOPY =C'OLD DATA SET IDENTIFIER:' «, t00=0x0062, t01=0x0150}
0x9a7a…9a8a Head {h00=0x000c, h01=0x0050, text=» FINP 32«, t00=0x0062, t01=0x017c}
0x9a8a…9a9e Head {h00=0x0010, h01=0x0050, text=» FCOPY STR8A«, t00=0x0062, t01=0x018c}
0x9a9e…9aaa Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0063, t01=0x0010}
0x9aaa…9ad4 Head {h00=0x0026, h01=0x0050, text=» FCOPY =C'OLD VOLUME SEQUENCE NO:'«, t00=0x0063, t01=0x001c}
0x9ad4…9ae4 Head {h00=0x000c, h01=0x0050, text=» FINP 32«, t00=0x0063, t01=0x0046}
0x9ae4…9af8 Head {h00=0x0010, h01=0x0050, text=» FCOPY STR2A«, t00=0x0063, t01=0x0056}
0x9af8…9b04 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0063, t01=0x006a}
0x9b04…9b12 Head {h00=0x000a, h01=0x0050, text=» FKI 1«, t00=0x0063, t01=0x0076}
0x9b12…9b26 Head {h00=0x0010, h01=0x0050, text=» FCOPY HEX00«, t00=0x0063, t01=0x0084}
0x9b26…9b34 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0063, t01=0x0098}
0x9b34…9b3c Head {h00=0x0004, h01=0x0050, t00=0x0063, t01=0x00a6}
0x9b3c…9b50 Head {h00=0x0010, h01=0x0050, text=»FFD999 FRMT «, t00=0x0063, t01=0x00ae}
0x9b50…9b68 Head {h00=0x0014, h01=0x0050, text=» FTEXT =C'SLUTD'«, t00=0x0063, t01=0x00c2}
0x9b68…9b88 Head {h00=0x001c, h01=0x0050, text=» FMEL '99999',BCDI21(W5)«, t00=0x0063, t01=0x00da}
0x9b88…9b9e Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',60 «, t00=0x0063, t01=0x00fa}
0x9b9e…9bb4 Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',62 «, t00=0x0063, t01=0x0110}
0x9bb4…9bc2 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0063, t01=0x0126}
0x9bc2…9bca Head {h00=0x0004, h01=0x0050, t00=0x0063, t01=0x0134}
0x9bca…9bde Head {h00=0x0010, h01=0x0050, text=»FRMALP FRMT «, t00=0x0063, t01=0x013c}
0x9bde…9bf6 Head {h00=0x0014, h01=0x0050, text=» FCOPY :FMTITEM «, t00=0x0063, t01=0x0150}
0x9bf6…9c04 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0063, t01=0x0168}
0x9c04…9c0c Head {h00=0x0004, h01=0x0050, t00=0x0063, t01=0x0176}
0x9c0c…9c20 Head {h00=0x0010, h01=0x0050, text=»FRMTCD FRMT «, t00=0x0063, t01=0x017e}
0x9c20…9c4e (100, 0, 398) Head {h00=0x002a, h01=0x0050, text=» FMEL 'TTTTTTTTTTTTTTTTTTTT9',:FMTITEM«, t00=0x0064, t01=0x0004}
0x9c4e…9c5c Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0064, t01=0x0032}
0x9c5c…9c64 Head {h00=0x0004, h01=0x0050, t00=0x0064, t01=0x0040}
0x9c64…9c78 Head {h00=0x0010, h01=0x0050, text=»FRMTCS FRMT «, t00=0x0064, t01=0x0048}
0x9c78…9ca8 Head {h00=0x002c, h01=0x0050, text=» FMEL 'TTTTTTTTTTTTTTTTTTTT9-',:FMTITEM «, t00=0x0064, t01=0x005c}
0x9ca8…9cb6 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0064, t01=0x008c}
0x9cb6…9cbe Head {h00=0x0004, h01=0x0050, t00=0x0064, t01=0x009a}
0x9cbe…9cd2 Head {h00=0x0010, h01=0x0050, text=»FRMZCD FRMT «, t00=0x0064, t01=0x00a2}
0x9cd2…9d00 Head {h00=0x002a, h01=0x0050, text=» FMEL 'ZZZZZZZZZZZZZZZZZZZZ9',:FMTITEM«, t00=0x0064, t01=0x00b6}
0x9d00…9d0e Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0064, t01=0x00e4}
0x9d0e…9d16 Head {h00=0x0004, h01=0x0050, t00=0x0064, t01=0x00f2}
0x9d16…9d2a Head {h00=0x0010, h01=0x0050, text=»FRMZCS FRMT «, t00=0x0064, t01=0x00fa}
0x9d2a…9d5a Head {h00=0x002c, h01=0x0050, text=» FMEL 'ZZZZZZZZZZZZZZZZZZZZ9-',:FMTITEM «, t00=0x0064, t01=0x010e}
0x9d5a…9d68 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0064, t01=0x013e}
0x9d68…9d70 Head {h00=0x0004, h01=0x0050, t00=0x0064, t01=0x014c}
0x9d70…9d84 Head {h00=0x0010, h01=0x0050, text=»FRMBCD FRMT «, t00=0x0064, t01=0x0154}
0x9d84…9db2 Head {h00=0x002a, h01=0x0050, text=» FMEL '999999999999999999999',:FMTITEM«, t00=0x0064, t01=0x0168}
0x9db2…9dc0 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0065, t01=0x0008}
0x9dc0…9dc8 Head {h00=0x0004, h01=0x0050, t00=0x0065, t01=0x0016}
0x9dc8…9ddc Head {h00=0x0010, h01=0x0050, text=»FRMBCS FRMT «, t00=0x0065, t01=0x001e}
0x9ddc…9e0c Head {h00=0x002c, h01=0x0050, text=» FMEL '999999999999999999999-',:FMTITEM «, t00=0x0065, t01=0x0032}
0x9e0c…9e1a Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0065, t01=0x0062}
0x9e1a…9e2e Head {h00=0x0010, h01=0x0050, text=»SNDFRM FRMT «, t00=0x0065, t01=0x0070}
0x9e2e…9e3a Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0065, t01=0x0084}
0x9e3a…9e5e Head {h00=0x0020, h01=0x0050, text=» FCOPY =C'DATATRANSMISSION' «, t00=0x0065, t01=0x0090}
0x9e5e…9e72 Head {h00=0x0010, h01=0x0050, text=» FILLR '?',1«, t00=0x0065, t01=0x00b4}
0x9e72…9e7e Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0065, t01=0x00c8}
0x9e7e…9e8a Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0065, t01=0x00d4}
0x9e8a…9e98 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0065, t01=0x00e0}
0x9e98…9ea2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x00ee}
0x9ea2…9eb6 Head {h00=0x0010, h01=0x0050, text=»SNDFRM2 FRMT«, t00=0x0065, t01=0x00f8}
0x9eb6…9eca Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',2«, t00=0x0065, t01=0x010c}
0x9eca…9ee4 Head {h00=0x0016, h01=0x0050, text=» FCOPY =X'272020' «, t00=0x0065, t01=0x0120}
0x9ee4…9ef2 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0065, t01=0x013a}
0x9ef2…9efc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0148}
0x9efc…9f10 Head {h00=0x0010, h01=0x0050, text=»FDC999 FRMT «, t00=0x0065, t01=0x0152}
0x9f10…9f28 Head {h00=0x0014, h01=0x0050, text=» FTEXT =C'SLUTD'«, t00=0x0065, t01=0x0166}
0x9f28…9f48 Head {h00=0x001c, h01=0x0050, text=» FMEL '99999',BCDI21(W5)«, t00=0x0065, t01=0x017e}
0x9f48…9f56 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0066, t01=0x000e}
0x9f56…9f60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x001c}
0x9f60…9f74 Head {h00=0x0010, h01=0x0050, text=»FDCHDR FRMT «, t00=0x0066, t01=0x0026}
0x9f74…9f80 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0066, t01=0x003a}
0x9f80…9f8e Head {h00=0x000a, h01=0x0050, text=» FEOR «, t00=0x0066, t01=0x0046}
0x9f8e…9f9a Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0066, t01=0x0054}
0x9f9a…9fc0 Head {h00=0x0022, h01=0x0050, text=» FCOPY =C'BATCH TRANSMISSION' «, t00=0x0066, t01=0x0060}
0x9fc0…9fd2 Head {h00=0x000e, h01=0x0050, text=» FLINK HDR«, t00=0x0066, t01=0x0086}
0x9fd2…9fe0 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0066, t01=0x0098}
0x9fe0…9fea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x00a6}
0x9fea…9ffe Head {h00=0x0010, h01=0x0050, text=»FDCEND FRMT «, t00=0x0066, t01=0x00b0}
0x9ffe…a00a Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0066, t01=0x00c4}
0xa00a…a018 Head {h00=0x000a, h01=0x0050, text=» FEOR «, t00=0x0066, t01=0x00d0}
0xa018…a024 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0066, t01=0x00de}
0xa024…a048 Head {h00=0x0020, h01=0x0050, text=» FCOPY ='BATCH TRANSMISSION'«, t00=0x0066, t01=0x00ea}
0xa048…a060 Head {h00=0x0014, h01=0x0050, text=» FCOPY =C' KLAR'«, t00=0x0066, t01=0x010e}
0xa060…a072 Head {h00=0x000e, h01=0x0050, text=» FLINK HDR«, t00=0x0066, t01=0x0126}
0xa072…a080 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0066, t01=0x0138}
0xa080…a08a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0146}
0xa08a…a09e Head {h00=0x0010, h01=0x0050, text=»FDCERR FRMT «, t00=0x0066, t01=0x0150}
0xa09e…a0aa Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0066, t01=0x0164}
0xa0aa…a0b8 Head {h00=0x000a, h01=0x0050, text=» FEOR «, t00=0x0066, t01=0x0170}
0xa0b8…a0c4 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0066, t01=0x017e}
0xa0c4…a0e8 Head {h00=0x0020, h01=0x0050, text=» FCOPY ='BATCH TRANSMISSION'«, t00=0x0066, t01=0x018a}
0xa0e8…a104 Head {h00=0x0018, h01=0x0050, text=» FCOPY =' AFBRYDES' «, t00=0x0067, t01=0x001e}
0xa104…a116 Head {h00=0x000e, h01=0x0050, text=» FLINK HDR«, t00=0x0067, t01=0x003a}
0xa116…a124 Head {h00=0x000a, h01=0x0050, text=» FEOR «, t00=0x0067, t01=0x004c}
0xa124…a130 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0067, t01=0x005a}
0xa130…a13e Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0067, t01=0x0066}
0xa13e…a148 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0074}
0xa148…a152 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x007e}
0xa152…a15a Head {h00=0x0004, h01=0x0050, t00=0x0067, t01=0x0088}
0xa15a…a166 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0067, t01=0x0090}
0xa166…a16a Head {h00=0x4004, h01=0x0000}
0xa16a…a16e 00 67 00 9c ┆ g ┆
0xa16e…a176 (104, 1, 8) 20 04 00 00 00 68 00 04 ┆ h ┆
0xa176…a1c6 (105, 0, 400) 82 01 92 37 6a 6f 20 22 92 20 31 26 92 17 57 0c 25 93 34 03 00 93 22 31 26 92 4d 93 30 28 57 04 31 26 92 18 00 92 21 30 29 91 99 00 92 91 80 02 21 91 36 92 03 16 02 1d 57 22 30 12 11 92 30 1d 92 11 5c 20 18 93 24 28 20 91 23 10 5f 2e 30 0c ┆ 7jo " 1& W % 4 "1& M 0(W 1& !0) ! 6 W"0 0 $( # _.0 ┆
0xa1c6…a216 00 21 20 5f 79 18 93 24 35 00 91 21 28 91 2a 0b 40 e5 80 0d 2e 00 00 91 21 34 01 00 92 38 30 09 00 92 92 34 01 20 90 20 19 00 95 0c 01 6f 3f 00 0c 6f 30 15 93 30 09 0a 93 93 36 91 02 05 09 00 0c 95 34 00 41 6d 34 00 00 0c 95 30 15 93 30 0c ┆ ! _y $5 !( * @ . !4 80 4 o? o0 0 6 4 Am4 0 0 ┆
0xa216…a266 01 93 93 34 00 0a 00 36 00 03 05 76 00 03 03 6b 00 03 00 ff 00 03 00 ef 00 03 00 ca 00 03 04 0c 00 03 04 13 00 03 03 c2 00 03 00 86 00 03 05 81 00 03 00 7c 00 03 05 5f 00 03 01 4f 00 03 05 93 00 03 01 78 00 03 01 54 00 03 01 75 00 03 03 d8 ┆ 4 6 v k | _ O x T u ┆
0xa266…a2b6 00 03 04 54 00 03 02 d7 00 03 02 b0 00 03 02 86 00 03 00 c5 00 03 05 85 00 03 02 92 00 03 02 43 00 03 02 f8 00 03 02 f6 00 03 02 fb 00 03 03 5d 00 03 04 82 00 03 04 92 00 03 04 fa 00 03 04 27 00 03 05 10 00 03 04 b1 00 03 05 3e 00 03 00 c7 ┆ T C ] ' > ┆
0xa2b6…a306 00 03 03 d2 00 03 05 0e 00 03 04 25 00 03 05 90 00 03 05 51 00 03 05 7e 00 03 05 ad 00 03 01 43 00 03 01 a2 00 03 01 8d 00 03 02 ab 00 03 04 39 00 03 05 5a 00 03 05 56 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 09 ┆ % Q ~ C 9 Z V ┆
0xa306…a356 (106, 0, 400) 00 03 00 98 00 03 05 bc 00 0f 00 03 00 2a 00 00 03 03 00 03 05 fb 00 03 07 21 00 00 00 8f 00 04 00 0e 00 04 05 e5 00 00 01 86 00 04 08 f9 00 04 08 af 00 00 01 e6 00 00 02 26 00 04 0a fc 00 03 05 c1 00 03 07 cd 00 33 00 38 00 3f 00 50 20 2b ┆ * ! & 3 8 ? P +┆
0xa356…a3a6 20 2b 2d 30 3f 0a aa 0f aa 31 00 42 41 54 43 48 20 49 4e 20 55 53 45 53 59 4d 42 4f 4c 49 43 56 41 4c 55 45 2d 53 45 54 00 58 58 58 58 54 54 54 39 54 54 54 54 39 58 58 58 58 58 2d c0 0c c0 6f e0 81 07 e0 c0 95 e0 c0 99 e0 c1 41 e0 df 2e c3 ┆ +-0? 1 BATCH IN USESYMBOLICVALUE-SET XXXXTTT9TTTT9XXXXX- o A . ┆
0xa3a6…a3f6 02 20 31 e0 c3 02 14 2e 81 2e e0 c1 1b 81 3a c0 6b c1 41 e0 c1 43 81 3a c0 e6 c1 41 e0 c1 24 81 3a c0 9b c1 41 e0 c3 04 4e 4f 54 20 df 2e e0 c3 08 54 49 4d 45 2d 4f 55 54 e0 c3 09 43 44 56 2d 45 52 52 4f 52 e0 c3 09 4e 4f 54 20 46 4f 55 4e ┆ 1 . . : k A C : A $ : A NOT . TIME-OUT CDV-ERROR NOT FOUN┆
0xa3f6…a446 44 e0 c3 09 49 2f 4f 2d 45 52 52 4f 52 e0 c3 0a 44 41 54 45 20 45 52 52 4f 52 e0 c3 0c 46 4f 55 4e 44 20 4c 4f 43 4b 45 44 e0 c3 0d 4e 4f 20 44 49 53 43 20 53 50 41 43 45 e0 c3 0d 49 4c 4c 45 47 41 4c 20 56 41 4c 55 45 e0 c3 0e 49 4e 56 41 ┆D I/O-ERROR DATE ERROR FOUND LOCKED NO DISC SPACE ILLEGAL VALUE INVA┆
0xa446…a496 4c 49 44 20 4e 55 4d 42 45 52 e0 c3 0f 4e 4f 20 52 45 43 4f 52 44 20 46 4f 55 4e 44 e0 c3 0f 55 4e 44 45 46 49 4e 45 44 20 45 52 52 4f 52 c3 12 54 45 53 54 20 45 4e 54 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆LID NUMBER NO RECORD FOUND UNDEFINED ERROR TEST ENT ┆
0xa496…a4e6 (107, 0, 400) 45 52 45 44 20 42 41 54 43 48 e0 c3 11 52 45 43 4f 56 45 52 59 20 52 55 4e 4e 49 4e 47 2e e0 c3 11 44 49 53 43 20 4e 4f 54 20 4f 50 45 52 41 42 4c 45 e0 c1 40 81 3a c0 6c c3 04 20 49 4e 20 c1 1b 81 3a c0 6b c1 41 e0 c3 12 43 48 41 4e 47 45 ┆ERED BATCH RECOVERY RUNNING. DISC NOT OPERABLE @ : l IN : k A CHANGE┆
0xa4e6…a536 20 46 4c 4f 50 50 59 20 44 49 53 43 e0 c3 0e 44 49 53 43 20 49 2f 4f 2d 45 52 52 4f 52 c4 3a 17 98 e0 c3 13 49 4c 4c 45 47 41 4c 20 46 4f 52 4d 41 54 20 4e 41 4d 45 e0 c3 14 50 52 45 53 53 20 45 4e 54 20 54 4f 20 43 4f 4e 46 49 52 4d e0 c3 ┆ FLOPPY DISC DISC I/O-ERROR : ILLEGAL FORMAT NAME PRESS ENT TO CONFIRM ┆
0xa536…a586 14 4e 4f 20 57 4f 52 4b 53 50 41 43 45 20 49 4e 20 43 4f 52 45 e0 c3 14 46 55 4e 43 54 49 4f 4e 20 4e 4f 54 20 41 4c 4c 4f 57 45 44 e0 c3 15 55 53 45 52 46 49 4c 45 20 41 53 53 49 47 4e 2d 45 52 52 4f 52 e0 c3 16 39 35 20 25 20 4f 46 20 46 ┆ NO WORKSPACE IN CORE FUNCTION NOT ALLOWED USERFILE ASSIGN-ERROR 95 % OF F┆
0xa586…a5d6 49 4c 45 53 50 41 43 45 20 55 53 45 44 e0 c3 16 50 52 45 53 53 20 45 4e 54 20 46 4f 52 20 44 45 4c 45 54 49 4f 4e e0 c3 17 54 48 49 53 20 49 53 20 41 20 44 55 4d 4d 59 20 4d 45 53 53 41 47 45 e0 c3 17 53 59 53 54 45 4d 46 49 4c 45 20 41 53 ┆ILESPACE USED PRESS ENT FOR DELETION THIS IS A DUMMY MESSAGE SYSTEMFILE AS┆
0xa5d6…a626 53 49 47 4e 2d 45 52 52 4f 52 e0 c3 18 45 44 49 54 20 45 52 52 4f 52 20 49 4e 20 43 4f 4e 56 45 52 53 49 4f 4e e0 c3 18 41 4c 52 45 41 44 59 20 44 45 46 49 4e 45 44 2f 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 09 ┆SIGN-ERROR EDIT ERROR IN CONVERSION ALREADY DEFINED/ ┆
0xa626…a676 (108, 0, 400) 45 58 45 43 55 54 45 44 e0 c3 18 54 4f 4f 20 46 45 57 20 49 4e 50 55 54 20 43 48 41 52 41 43 54 45 52 53 e0 c3 1a 4f 55 54 50 55 54 20 44 45 56 49 43 45 20 4e 4f 54 20 4f 50 45 52 41 42 4c 45 e0 c3 1b 43 4f 4d 50 55 4c 53 4f 52 59 20 46 49 ┆EXECUTED TOO FEW INPUT CHARACTERS OUTPUT DEVICE NOT OPERABLE COMPULSORY FI┆
0xa676…a6c6 45 4c 44 20 4e 4f 54 20 46 49 4c 4c 45 44 e0 c3 1d 44 45 46 49 4e 45 44 20 4c 49 4e 45 20 4d 41 58 49 4d 55 4d 20 45 58 43 45 45 44 45 44 e0 c3 1e 4d 41 58 49 4d 55 4d 20 52 45 43 4f 52 44 2d 4c 45 4e 47 54 48 20 45 58 43 45 45 44 45 44 e0 ┆ELD NOT FILLED DEFINED LINE MAXIMUM EXCEEDED MAXIMUM RECORD-LENGTH EXCEEDED ┆
0xa6c6…a716 c3 21 4d 41 58 49 4d 55 4d 20 46 4f 52 4d 41 54 2d 43 4f 44 45 20 53 49 5a 45 20 45 58 43 45 45 44 45 44 e0 c3 21 4d 41 58 49 4d 55 4d 20 4e 55 4d 42 45 52 20 4f 46 20 46 49 45 4c 44 53 20 45 58 43 45 45 44 45 44 e0 c3 28 55 53 45 52 46 49 ┆ !MAXIMUM FORMAT-CODE SIZE EXCEEDED !MAXIMUM NUMBER OF FIELDS EXCEEDED (USERFI┆
0xa716…a766 4c 45 20 4e 4f 54 20 43 4c 4f 53 45 44 20 49 4e 20 50 52 45 56 49 4f 55 53 20 53 45 53 53 49 4f 4e 2e e0 c3 2c 45 4e 44 20 4f 46 20 46 4f 52 4d 41 54 20 46 4f 55 4e 44 20 50 52 45 53 53 20 52 49 4e 53 20 46 4f 52 20 4e 45 57 20 4c 49 4e 45 ┆LE NOT CLOSED IN PREVIOUS SESSION. ,END OF FORMAT FOUND PRESS RINS FOR NEW LINE┆
0xa766…a7b6 53 e0 c1 24 81 3a c0 6d 81 3a c3 29 43 4f 4e 46 49 52 4d 20 57 41 4e 54 45 44 20 46 55 4e 43 54 49 4f 4e 20 28 43 4f 52 52 2c 52 44 45 4c 2c 50 52 49 4e 54 29 e0 c0 6a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆S $ : m : )CONFIRM WANTED FUNCTION (CORR,RDEL,PRINT) j ┆