|
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: 20548 (0x5044)
Notes: pts_type(SC)
Names: »DENT01.SC«
└─⟦79fbed147⟧ Bits:30009697 Philips computer tape "600414"
└─⟦this⟧ »S:DE/DENT01.SC«
└─⟦this⟧ »SHBAPL/DENT01.SC«
IDENT DENT01 SHB 10.0 80-04-11 * LINE 675 SHB UNIQUE STATEMENT DDUM DEDDIV PDIV ENTRY DENT01 EXT DERECS EXT DEACC EXT DECLRN EXT DECLRD EXT DECLRA EXT DECLRS EXT DERROR EXT DELAST EXT CLEARB EXT RESTOR EXT UPDBIN EXT UPDBOL EXT DERR EXT TESTB TEST FOR A BIT IN A BIN EXT SETB SET A BIT IN A BIN EXT GETDUP LOOK FOR DUPLICATION- STRING FOR CURRENT FIELD EXT DEDISC DISC HANDLING ROUTINE EXT DEPOOL POOL HANDLING ROUTINE EXT MASK EXT EMPTYT EXT DELOCK EXT DEPRUT INCLUDE DELITT EJECT DENT01 PROC ***************************************** * * HANDLE ENTERED DATA * ***************************************** DATAIN TBT DOOL8,DAT04 JUMP IF OPEN NEW * TBF VERIFM,DAT0X VERIFY MODE ? TBF DBOMVR,DAT05 RECORD TO VERIFY ? TBF DBOVER,DAT05 VERIFIED RECORD ? CLEAR VERIFM PERF DEVERC CLEAR VERIFY B DAT0X * * DAT0 THOME DAT01 CLEAR DECHANGE CHANGED INPUTFIELD TBT VERIFM,DAT05 VERIFY MODE ? TBF DEPROMPT,DAT07 ENTIRE DISPLAY DAT04 CLEAR BOOL3 F=NO/UNVALID IMMID.FORM CH MOVE STSAVE(W4),HEX00 FORMAT NAME:=000000 PERF DECLRA CLEAR ALL INPUTFIELDS B DAT03 DAT02 TBT VERIFM,DAT05 VERIFY MODE ? DAT07 PERF DECLRS CLEAR SOME INPUTFIELDS(NCLR) B DAT03 DAT05 TBT KEYVER,DAT06 KEY VERIFICATION ? DAT0X SET DENOCHAN NO CHANGES PERMITTED DAT06 PERF DECLRD DISPLAY VARIABEL FIELDS DAT03 IB DEBINW2,CANCDA,RETUDA,DATENT,RFWDDA,RBWDDA C CORDAT,DLTEDA,TOTDA,PROGDA,INSRDA EJECT * * HANDLE ERROR AND/OR ILLEGAL KEYS * DATERR MOVE DEBINW4,W0 DATER2 TBF VERIFM,DATER3 VERIFY MODE ? TBT KEYVER,DATER3 KEY VERIFICATION ? SET DENOCHAN NO CHANGES PERMITTED * DATER3 CBE PINDFR,W0,DATER4 NO ENTRY FORMAT ATTACHED. PERF DERR B DAT03 * DATER4 PERF DERROR,DEKTABN TBF DOOLA,DATER7 NOT BALANCE IB DEBINW2,TOTBAL,CANCBL,SERIOUS B DATER4 DATER7 IB DEBINW2,DATER5,DATER5 CLR,CAN C RETUDA,RFWDDA,DATER6,TOTDA,PROGDA DATER5 COPY DEINPUT,W0,W6,STR6A,W0 RESTOR FORMATNAME PERF DERECS,W14 GET FORMAT BNOK DATER4 TBT VERIFM,DAT05 VERIFY MODE ? MOVE DEBINW3,NUMBER CURRENT REC.NR CBG DEBINW3,BDPOIN(W2),DAT0 ENTRY NEW REC TBT DOOL2,DAT0 INSERT B DAT0X DATER6 CBE NUMBER,=D'0',DATER8 BATCHEAD=0 B RBWDDA DATER8 MOVE DEBINW4,W15 B DATER4 EJECT ***************** * CANCEL PRESSED. ***************** CANCDA TBT SOOL2,CANC03 DATARECORD HANDLING ? TBF DOOL8,CANC03 OPEN NEW/BATCHHEAD? THOME B DAT04 * CANC03 TBF DOOL2,CANC10 JUMP IF NOT INSERT MOVE DEBINW2,W5 SIMULATE RBWD PRESSED B RBWD10 CANC10 TBT DECHANGE,CANC20 CHANGED INPUTFIELD? TBT VERIFM,CANC13 VERIFY MODE ? PERF DEPRUT,PRNUM,DEBINW4,DEBINW3 CBNE DEBINW4,W6,CANC15 MOVE DEBINW3,NUMBER CBG DEBINW3,BDPOIN(W2),CANC15 TBF DBOMVR,CANC15 RECORD TO VERIFY ? TBT DBOVER,CANC15 VERIFIED RECORD ? PERF DEVERS SET VERIFY MODE CANC13 CLEAR DENOCHAN CHANGES PERMITTED ERASE 1,W1,W0 ERASE ALL ON SCREEN B DAT05 CANC15 PERF DECLRN B DAT03 CANC20 ERASE 1,W1,W0 ERASE ALL ON SCREEN PERF DERECS,W5 GET CURRENT RECORD BERR DATER2 CLEAR DECHANGE CHANGED INPUTFILED ? CLEAR DEPROMPT ENTIRE DISPLAY BNZ DAT04 ERASE 5,W1,W0 ERASE SOME FROM 1 AND UP B DAT06 EJECT ***************** * RETURN PRESSED. ***************** RETUDA TBT DENOCHAN,RETU05 CLEAR DOOL2 INSERT OF RECORD BNZ RETU05 TBT VERIFM,RETU05 VERIFY MODE ? PERF DERECS,W3 ENTER LAST RECORD BNERR SERIOUS RETU03 PERF DERROR,DEKTAB6 RETU05 B SERIOUS **************** * ENTER PRESSED. **************** DATENT TBF VERIFM,DAEN00 VERIFY MODE ? VERIFY SET DBOVER VERIFIED RECORD ? BNZ RFWD10 PERF DERECS,W2 ENTER OLD RECORD BNOK DATER2 B RFWD10 EJECT DAEN00 TBF DECHANGE,DAEN10 NO ACCUMULATE WHEN NO INPUT PERF DEACC,W0 INCREASE ACCUMULATORS DAEN10 CLEAR DOOL2 RECORD INSERT ? BZ DAEN50 * HANDLE INSERTED RECORD * CLEAR BOOL7 CLEAR/SET CR BZ DAEN15 SET DOOL2 INSERT WITH FORMATCHANGE B DAEN59 DAEN15 SET DENOCHAN NO CHANGES PERMITTED PERF DERECS,W12 ENTER INSERTED RECORD BOK DAEN30 DAEN20 PERF DEACC,W1 DECREASE ACCUMULATORS B DATER2 DAEN30 MOVE BCD13A,NUMBER INSERR PERF DELAST,W6,DEKTAB5 IB DEBINW2,INSERR,RETUDA CLEAR DECHANGE SET DENOCHAN NO CHANGES PERMITTED B DAT03 EJECT * HANDLE NORMAL INPUT * DAEN50 TBF DOOL8,DAEN60 OPEN NEW/BATCHHEAD ? CALL CLEARB,BIN1,W0 CLEAR DOOL8 IN REC.STATUS DAEN60 TBF DECHANGE,DAEN61 PERF DERECS,W1 ENTER NEW BNOK DAEN20 DAEN61 CLEAR BOOL5 CLEAR/SET CR CLEAR BOOL7 CLEAR/SET CR BOK DAEN62 NO FORMAT CHANGE FOUND DAEN59 MOVE DEBINW4,W3 FORMATNAME=IMMIDIATE (N) B DAEN63 DAEN62 CLEAR BOOL3 CLEAR/SET CR BOK DAEN65 NO FORMAT CHANGE FOUND MOVE DEBINW4,W4 FORMATNAME=NEXT AFTER (R)EG DAEN63 CALL EMPTYT,STSAVE(DEBINW4) CHECK IF FORMAT CHANGE BNOK DAEN65 MOVE STR1A,=C'*' MOVE DEBINW3,W0 LOOK IF BALANCE-FORMAT MATCH STSAVE(DEBINW4),DEBINW3,W1,STR1A,W0,W1 BNOK DAEN67 DATAENTER-FORMAT MOVE BIN3,DEBINW4 SAVE FORMATINDEX PERF DERECS,W3 ENTER LAST RECORD BOK DAEN66 CBNE DEBINW4,W13,DAEN69 IGNORE NO WORKSPACE IN CORE DAEN66 MOVE DEINPUT,HEX00 COPY DEINPUT,W0,W6,STSAVE(BIN3),W0 GET FORMATNAME MOVE FRMTPNTR,W0 B TOTB05 GET BALANCE-FORMAT DAEN67 MOVE DEINPUT,HEX00 COPY DEINPUT,W0,W6,STSAVE(DEBINW4),W0 GET FORMATNAME CLEAR DOOL8 OPEN NEW BATCH PERF DERECS,W14 CHANGE FORMAT BOK DAEN64 CBNE NUMBER,=D'0',DAEN69 SET DENOCHAN DAEN69 B DATER2 DAEN64 SET SOOL2 DAEN65 SET SOOL2 BNZ DAEN70 CLEAR DECHANGE SET DOOL8 PERF DERECS,W10 BOK DAEN68 CLEAR DOOL8 B DATER4 DAEN68 CLEAR DOOL8 DAEN70 CLEAR DECHANGE BZ DAT0 CLEAR SW95PR BZ DAEN80 MOVE DEBINW4,=W'-1' PERF DERROR,DEKTABS IB DEBINW2,DAEN80,DAEN80,RETUDA DAEN80 PERF DEPRUT,PRNUM,DEBINW4,DEBINW3 CBNE DEBINW4,W6,DAEN85 TBF DBOMVR,DAEN85 PERF DERECS,W3 ENTER LAST SECTOR BERR DATER2 PERF DEVERS SET VERIFY MODE B RFWD02 DAEN85 B DAT0 EJECT ****************** * RECORD FORWARD. ****************** RFWDDA TBT DECHANGE,RFWD07 TBT VERIFM,RFWD04 VERIFY MODE ? TBT DOOL2,RFWD06 INSERT OF RECORD PERF DEPRUT,PRNUM,DEBINW4,DEBINW3 CBNE DEBINW4,W6,RFWD03 VERIFY MODE ? TBF DBOMVR,RFWD03 RECORD TO VERIFY PERF DEVERS SET VERIFY MODE TBT DBOVER,RFWD10 RFWD02 PERF DELAST,W9,DEKTAB8 B CANC13 RFWD04 TBT DBOVER,RFWD10 VERIFIED RECORD ? PERF DELAST,W9,DEKTAB8 B CANC15 RFWD03 TBT DOOL8,RFWD07 TBF DOOL2,RFWD05 JUMP IF NOT INSERT RFWD06 B RBWD10 GET PREVIOUS RECORD RFWD05 TBT DENOCHAN,RFWD10 RFWD07 B DATERR RFWD10 MOVE DEBINW3,NUMBER CBNE DEBINW3,BDPOIN(W2),RFWD15 TEST VERIFM BNZ TOTBAL JUMP VERIFY TO BALANCE RFWD13 CBNE NUMBER,=D'0',RFWD14 RFWD12 CLEAR SOOL2 RFWD14 MOVE DEBINW4,W9 NO MORE RECORDS B RFWD33 RFWD15 TBT VERIFM,RFWD23 VERIFY MODE? PERF DELAST,W15,DEKTABR IB DEBINW2,PROCAN,PROCAN,RETUDA C RFWD18,RBWDDA MOVE DEBINW2,W4 RFWD22 MOVE BCDI21(W3),DEINPUT CBG BCDI21(W3),NUMBER,RFWD17 RFWD16 ILLEGAL NUMBER ENTERED MOVE BCDI21(W3),NUMBER RESTORE MOVE DEBINW4,W6 B DATER2 RFWD17 MOVE DEBINW3,BCDI21(W3) CBNG DEBINW3,BDPOIN(W2),RFWD19 WITHIN BATCH MOVE BCDI21(W3),NUMBER RESTORE B RFWD13 NOT FOUND RFWD18 SUB DEBINW1,W1 BNZ RFWD22 RFWD23 MOVE BCDI21(W3),NUMBER ADD BCDI21(W3),=D'1' B RFWD17 RFWD19 ERASE 1,W1,W0 ERASE ALL ON SCREEN RFWD20 PERF DERECS,W4 GET NEXT RECORD RFWD30 BOK RFWD40 BOFL RETU03 CLEAR DOOLC CBNE PINDFR,W0,RFWD33 CURR FORMAT CBE DEBINW2,W5,RFWD31 RBWD PRESSED ? TBF VERIFM,RFWD31 VERIFY MODE ? CBE DEBINW4,W13,RFWD20 NO WORKSPACE ? RFWD31 CBE NUMBER,=D'0',RFWD32 BATCHHEAD SET SOOL2 B DATER4 RFWD32 CLEAR SOOL2 B DATER4 RFWD33 TBF VERIFM,RFWD38 TEST BDAVER BNZ TOTBAL TBT KEYVER,RFWD35 DISPLAY 30,W1,W0 B RFWD39 RFWD35 DISPLAY 20,W1,W0 B RFWD39 RFWD38 CMP DEBINW4,W15 BZ TOTBAL JUMP TO BAL IF SEARCH DISPLAY 0,W1,W0 RFWD39 THOME B DATER2 RFWD40 SET SOOL2 NOT BATCHHEAD CBE DEBINW2,W5,RFWD50 RBWD PRESSED PERF DEPRUT,PRNUM,DEBINW4,DEBINW3 CBNE DEBINW4,W6,RFWD50 NOT VERIFY TBF DBOMVR,RFWD10 PERF DEVERS SET VERIFY MODE TBT DBOVER,RFWD10 CLEAR DENOCHAN CHANGES PERMITTED B DAT05 RFWD50 CLEAR DECHANGE RFWD60 CBE NUMBER,=D'0',RFWD70 TEST VERIFM BZ DAT06 B DAT05 RFWD70 CLEAR SOOL2 TEST VERIFM BZ DAT0X B DAT05 EJECT ***************** * RECORD BACKWARD ***************** * RBWERR B DATERR * RBWDDA TBT DECHANGE,RBWERR TBF SOOL2,RBWERR TBT DOOL2,RBWD10 INSERT OF RECORD CBE NUMBER,=D'0',RFWD12 BATCHHEAD PERF DEVERC CLEAR IF VERIFY MODE BNZ RBWD10 TBT DENOCHAN,RBWD15 SET DENOCHAN NO CHANGES PERMITTED PERF DERECS,W3 ENTER LAST SECTOR BERR DATER2 B RFWD50 RBWD10 SET DENOCHAN NO CHANGES PERMITTED CLEAR DOOL2 INSERT OF RECORD? BNZ RBWD28 YES! RBWD15 PERF DELAST,W15,DEKTABR IB DEBINW2,PROCAN,PROCAN,RETUDA C RFWDDA,RBWD25 MOVE DEBINW2,W5 RBWD20 MOVE BCDI21(W3),DEINPUT CBNL BCDI21(W3),NUMBER,RFWD16 B RBWD30 RBWD25 SUB DEBINW1,W1 BNZ RBWD20 RBWD28 MOVE BCDI21(W3),NUMBER SUB BCDI21(W3),=D'1' RBWD30 ERASE 1,W1,W0 ERASE ALL FROM 1 AND UP PERF DERECS,W6 GET PREVIOUS RECORD B RFWD30 EJECT ******************* * RECORD CORRECTION ******************* CORDAT TBT VERIFM,CORD10 TBF DENOCHAN,RBWERR CORD10 TBT DOOL2,RBWERR INSERT CLEAR DBOVER CLEAR DBOFOR PERF DEACC,W1 DECREASE ACCUMULATORS THOME CLEAR DENOCHAN CHANGES PERMITTED PERF DELAST,W8,DEKTAB7 PERF DEVERC CLEAR IF VERIFY MODE BZ CORD20 PERF DECLRD B CORD30 CORD20 PERF DECLRN CORD30 IB DEBINW2,CORCAN,CORC10,CORENT CLR,CAN,ENT C CORD35,CORD35,CORD35 NOT VALID C CORE15 DEL CORD35 MOVE DEBINW4,W0 CORD40 PERF DERR B CORD30 CORCAN TBF DECHANGE,CORE15 NO CHANGES MADE ERASE 1,W1,W0 ERASE ALL ON SCREEN CORC10 SET DOOL4 PERF DERECS,W5 GET CURRENT RECORD BNERR CORRET CLEAR DOOL4 B CORD40 CORRET CLEAR DOOL4 CORE15 PERF DEACC,W2 INCREASE ACCUMULATORS CLEAR DECHANGE THOME CORR30 IB DEBINW2,CORE10,SERIOUS,CORE20 CAN,RET,ENT C CORENT,CORENT,CORENT NOT USED C CORDEL DEL CORENT PERF DERECS,W2 ENTER OLD BNOK CORD40 CORE10 MOVE DEBINW3,W24 ERASE 0,DEBINW3,DEBINW3 ERASE LAST LINE CBNE DEBINW2,W1,CORE15 NOT CANCE B CORE45 CORE20 GETFLD 0,W1,DEBINW1 CLEAR DECHANGE CORE45 PERF DEPRUT,PRNUM,DEBINW4,DEBINW3 CBNE DEBINW4,W6,CORE60 CORE50 TBF DBOMVR,CORE60 TBT DBOVER,CORE60 PERF DEVERS SET VEIFY MODE B RFWD02 CORE60 SET DENOCHAN NO CHANGES PERMITTED CBNE DEBINW2,W1,CORE90 JUMP IF NOT CANCEL B DAT06 CORE90 PERF DECLRN B DAT03 CORDEL SET DENOCHAN B DLTE05 EJECT ***************** * RECORD DELETE. ***************** DLTEDA TBT VERIFM,DLTE05 TEST DENOCHAN BZ DATERR TEST DOOL2 INSERT BNZ DATERR DLTE05 TEST SOOL2 BZ DATERR JUMP IF BATCHHEAD PERF DEVERC SET DENOCHAN DLTE10 PERF DELAST,W2,DEKTAB7 IB DEBINW2,PROCAN,PROCAN,RETUDA,DLTE10 ERASE 1,W1,W0 ERASE ALL ON SCREEN PERF DEACC,W1 DECREASE ACCUMULATORS THOME DLTE30 PERF DERECS,W8 BNERR DLTE50 PERF DERROR,DEKTAB6 B SERIOUS DLTE50 PERF DELAST,W3,DEKTAB5 DLTE60 IB DEBINW2,DELERR,RETUDA,DELERR,RFWD10,RFWD50,DELERR, C DELERR,TOTDA DELERR EDWRT DEDSSCRN,BELL ACOUSTIC ALARM B DLTE50 EJECT ******************* * CHANGE PROGRAM. * ******************* PROGDA TEST DENOCHAN BNZ DATERR TEST DECHANGE BNZ DATERR TEST SOOL2 BZ DATERR GETABX BIN4 PROGD0 PERF DELAST,W1,DEKTAB7 IB DEBINW2,PROCAN,PROCAN,RETUDA,PROGD0 PROENT SUB DEBINW1,W1 BZ PROGD0 JUMP IF NO INPUT COPY DEINPUT,DEBINW1,W1,HEX00,W0 DELETE ENTER-KEY PERF DERECS,W10 CHANGE PROGRAM BOK DAT0 GETFLD 0,BIN4,DEBINW2 B DATER2 * PROCAN PERF DEPRUT,PRNUM,DEBINW4,DEBINW2 MOVE DEBINW2,W1 CBE DEBINW4,W6,CORE50 JUMP IF VERIFY PERF DECLRN B DAT03 * EJECT ****************** * RECORD INSERT. * ****************** INSRDA TEST DOOL2 BNZ DATERR PERF DEPRUT,PRNUM,DEBINW4,DEBINW3 CBNE DEBINW4,W6,INSR05 TBF DBOMVR,INSR05 TBT DBOVER,INSR05 PERF DEVERS SET VERIFY MODE B RFWD02 INSR05 MOVE DEBINW3,NUMBER CBNE DEBINW3,BDPOIN(W2),INSR10 LAST RECORD CLEAR DENOCHAN CHANGES PERMITTED B CANBL1 INSR10 PERF DELAST,W4,DEKTAB7 IB DEBINW2,PROCAN,PROCAN,RETUDA,INSR10 PERF DERECS,W9 INSERT RECORD BERR DATER2 CLEAR DENOCHAN CHANGES PERMITTED SET DOOL2 RECORD INSERT PERF DEVERC CLEAR IF VERIFY MODE B DAEN65 EJECT ******************** * TOT-KEY PRESSED. * ******************** TOTDA TEST DOOL8 BNZ DATERR TBF SOOL2,TOTBAL CLEAR DOOL2 INSERT BNZ TOTBAL TEST DECHANGE BNZ DATERR TBT DENOCHAN,TOTBAL TBT VERIFM,TOTBAL PERF DERECS,W3 ENTER LAST BNERR TOTBAL CBE DEBINW4,W13,TOTBAL NO WORKSPACE ? B DATER2 EJECT ***************************************** * * HANDLE BALANCE FORMAT * ***************************************** TOTBAL CLEAR DENOCHAN CHANGES PERMITTED CLEAR SOOL2 MOVE DEINPUT,HEX00 COPY DEINPUT,W0,W6,FORTAB(W21),W0 BALANCEFORMAT MOVE FRMTPNTR,SYMREC(W11) TOTB05 CLEAR DECHANGE SET DOOLA TOTB10 PERF DEDISC,W10 GET FORMAT BNERR TOTB20 CBNE DEBINW4,W13,TOTB12 NO WORKSPACE ATTFMT FFETCH ATTACH DUMMYFORMAT DISPLAY 0,W1,W0 THOME CBE PINDFR,W0,TOTB14 NO CURR. FORMAT PERF DEPOOL,W6,PINDFR,BIN14,STRG10A MOVE FORMAT,HEX00 B TOTB10 TOTB12 CLEAR DOOLA NO BALANCE-FORMAT SET DENOCHAN NO CHANGES PERMITTED TOTB14 B DATER2 TOTB20 MOVE FORMAT,FORTAB(W21) BLANCE NAME MOVE SYMREC(W11),FRMTPNTR MOVE BIN14,FLIND(W1) ATTFMT BPOOL(BIN14) SET DEPROMPT PERF DEDISC,W1 ENTER JOB DEFINITION TOTB35 PERF DECLRN TOTB40 IB DEBINW2,CANCBL,SERIOUS,ENTBL CBNE DEBINW2,W8,TOTB50 JUMP IF NOT TOT CBE BDPOIN(W5),W0,TOTB42 ALL VERIFIED PERF DELAST,W9,DEKTAB6 B TOTB35 TOTB42 B TOTB50 SHB UNIQUE STATEMENT PERF DELAST,W11,DEKTAB7 CONFIRM FREEZE IB DEBINW2,TOTB44,TOTB44,ENTBL,TOTB42 SET BDAFRO ENTER PRESSED MOVE DEBINW2,W3 B ENTBL TOTB44 MOVE DEBINW4,W24 ERASE 0,DEBINW4,DEBINW4 B TOTB35 TOTB50 MOVE DEBINW4,W0 TOTB60 PERF DERR B TOTB40 ENTBL SET BDABAL IN BALANCE TOTB70 CLEAR DOOLA CALL RESTOR,W0,W4,PWBDB4 RESTORE RBUF WB10 MOVE DEBINW2,W1 RET * CANCBL CANBL1 CLEAR DOOLA SET SOOL2 PERF DERECS,W7 GET LAST RECORD BOK CANBL3 BOFL RETU03 CBE DEBINW4,W13,TOTB14 SET DOOLA B TOTB60 CANBL3 PERF DEVERC CLEAR IF VERIFY MODE CBE NUMBER,=D'1',CANBL2 JUMP IF FIRST CLEAR DECHANGE B DAT02 CANBL2 B DAT01 SERIOUS CLEAR BDABAL OUT OF BALANCE B TOTB70 PEND EJECT DEVERS PROC CALL SETB,WORK(W11),W0 CALL SETB,WORK(W12),W0 SET VERIFM RET PEND DEVERC PROC CLEAR VERIFM BZ DEVERE MOVE WORK(W11),W0 MOVE WORK(W12),W0 DEVERE RET PEND EJECT BELL FRMT FSL FILLR X'07',1 FMEND FFETCH FRMT FSL FTEXT 'FETCHING FORMAT:' FCOPY DEINPUT FTEXT ' FROM DISC.' FNL FKI 1,ALPHA FCOPY HEX00 FMEND * END
0x0000…0028 (0, 0, 400) Head {h00=0x0024, h01=0x0050, text=» IDENT DENT01 SHB 10.0 80-04-11 «, t00=0x0000, t01=0x0004}
0x0028…0052 Head {h00=0x0026, h01=0x0050, text=»* LINE 675 SHB UNIQUE STATEMENT «, t00=0x0000, t01=0x002c}
0x0052…0066 Head {h00=0x0010, h01=0x0050, text=» DDUM DEDDIV«, t00=0x0000, t01=0x0056}
0x0066…0074 Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x0000, t01=0x006a}
0x0074…008a Head {h00=0x0012, h01=0x0050, text=» ENTRY DENT01 «, t00=0x0000, t01=0x0078}
0x008a…009e Head {h00=0x0010, h01=0x0050, text=» EXT DERECS «, t00=0x0000, t01=0x008e}
0x009e…00b0 Head {h00=0x000e, h01=0x0050, text=» EXT DEACC«, t00=0x0000, t01=0x00a2}
0x00b0…00c4 Head {h00=0x0010, h01=0x0050, text=» EXT DECLRN «, t00=0x0000, t01=0x00b4}
0x00c4…00d8 Head {h00=0x0010, h01=0x0050, text=» EXT DECLRD «, t00=0x0000, t01=0x00c8}
0x00d8…00ec Head {h00=0x0010, h01=0x0050, text=» EXT DECLRA «, t00=0x0000, t01=0x00dc}
0x00ec…0100 Head {h00=0x0010, h01=0x0050, text=» EXT DECLRS «, t00=0x0000, t01=0x00f0}
0x0100…0114 Head {h00=0x0010, h01=0x0050, text=» EXT DERROR «, t00=0x0000, t01=0x0104}
0x0114…0128 Head {h00=0x0010, h01=0x0050, text=» EXT DELAST «, t00=0x0000, t01=0x0118}
0x0128…013c Head {h00=0x0010, h01=0x0050, text=» EXT CLEARB «, t00=0x0000, t01=0x012c}
0x013c…0150 Head {h00=0x0010, h01=0x0050, text=» EXT RESTOR «, t00=0x0000, t01=0x0140}
0x0150…0164 Head {h00=0x0010, h01=0x0050, text=» EXT UPDBIN «, t00=0x0000, t01=0x0154}
0x0164…0178 Head {h00=0x0010, h01=0x0050, text=» EXT UPDBOL «, t00=0x0000, t01=0x0168}
0x0178…018a Head {h00=0x000e, h01=0x0050, text=» EXT DERR «, t00=0x0000, t01=0x017c}
0x018a…01b4 Head {h00=0x0026, h01=0x0050, text=» EXT TESTB TEST FOR A BIT IN A BIN«, t00=0x0000, t01=0x018e}
0x01b4…01d8 Head {h00=0x0020, h01=0x0050, text=» EXT SETB SET A BIT IN A BIN«, t00=0x0001, t01=0x0028}
0x01d8…0202 Head {h00=0x0026, h01=0x0050, text=» EXT GETDUP LOOK FOR DUPLICATION- «, t00=0x0001, t01=0x004c}
0x0202…0226 Head {h00=0x0020, h01=0x0050, text=» STRING FOR CURRENT FIELD «, t00=0x0001, t01=0x0076}
0x0226…0250 Head {h00=0x0026, h01=0x0050, text=» EXT DEDISC DISC HANDLING ROUTINE «, t00=0x0001, t01=0x009a}
0x0250…027a Head {h00=0x0026, h01=0x0050, text=» EXT DEPOOL POOL HANDLING ROUTINE «, t00=0x0001, t01=0x00c4}
0x027a…028c Head {h00=0x000e, h01=0x0050, text=» EXT MASK «, t00=0x0001, t01=0x00ee}
0x028c…02a0 Head {h00=0x0010, h01=0x0050, text=» EXT EMPTYT «, t00=0x0001, t01=0x0100}
0x02a0…02b4 Head {h00=0x0010, h01=0x0050, text=» EXT DELOCK «, t00=0x0001, t01=0x0114}
0x02b4…02c8 Head {h00=0x0010, h01=0x0050, text=» EXT DEPRUT «, t00=0x0001, t01=0x0128}
0x02c8…02e0 Head {h00=0x0014, h01=0x0050, text=» INCLUDE DELITT «, t00=0x0001, t01=0x013c}
0x02e0…02ee Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x0154}
0x02ee…0302 Head {h00=0x0010, h01=0x0050, text=»DENT01 PROC «, t00=0x0001, t01=0x0162}
0x0302…0334 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0001, t01=0x0176}
0x0334…033e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0018}
0x033e…035c Head {h00=0x001a, h01=0x0050, text=»* HANDLE ENTERED DATA «, t00=0x0002, t01=0x0022}
0x035c…0366 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0040}
0x0366…0398 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0002, t01=0x004a}
0x0398…03a6 Head {h00=0x000a, h01=0x0050, text=»DATAIN«, t00=0x0002, t01=0x007c}
0x03a6…03d0 Head {h00=0x0026, h01=0x0050, text=» TBT DOOL8,DAT04 JUMP IF OPEN NEW «, t00=0x0002, t01=0x008a}
0x03d0…03da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00b4}
0x03da…0402 Head {h00=0x0024, h01=0x0050, text=» TBF VERIFM,DAT0X VERIFY MODE ? «, t00=0x0002, t01=0x00be}
0x0402…042e Head {h00=0x0028, h01=0x0050, text=» TBF DBOMVR,DAT05 RECORD TO VERIFY ?«, t00=0x0002, t01=0x00e6}
0x042e…045a Head {h00=0x0028, h01=0x0050, text=» TBF DBOVER,DAT05 VERIFIED RECORD ? «, t00=0x0002, t01=0x0112}
0x045a…0470 Head {h00=0x0012, h01=0x0050, text=» CLEAR VERIFM «, t00=0x0002, t01=0x013e}
0x0470…0492 Head {h00=0x001e, h01=0x0050, text=» PERF DEVERC CLEAR VERIFY «, t00=0x0002, t01=0x0154}
0x0492…04a2 Head {h00=0x000c, h01=0x0050, text=» B DAT0X«, t00=0x0002, t01=0x0176}
0x04a2…04ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0186}
0x04ac…04b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0190}
0x04b6…04c8 Head {h00=0x000e, h01=0x0050, text=»DAT0 THOME«, t00=0x0003, t01=0x000a}
0x04c8…04f8 Head {h00=0x002c, h01=0x0050, text=»DAT01 CLEAR DECHANGE CHANGED INPUTFIELD «, t00=0x0003, t01=0x001c}
0x04f8…0520 Head {h00=0x0024, h01=0x0050, text=» TBT VERIFM,DAT05 VERIFY MODE ? «, t00=0x0003, t01=0x004c}
0x0520…054a Head {h00=0x0026, h01=0x0050, text=» TBF DEPROMPT,DAT07 ENTIRE DISPLAY«, t00=0x0003, t01=0x0074}
0x054a…0558 Head {h00=0x000a, h01=0x0050, text=»DAT04 «, t00=0x0003, t01=0x009e}
0x0558…0588 Head {h00=0x002c, h01=0x0050, text=» CLEAR BOOL3 F=NO/UNVALID IMMID.FORM CH «, t00=0x0003, t01=0x00ac}
0x0588…05ba Head {h00=0x002e, h01=0x0050, text=» MOVE STSAVE(W4),HEX00 FORMAT NAME:=000000«, t00=0x0003, t01=0x00dc}
0x05ba…05e4 Head {h00=0x0026, h01=0x0050, text=» PERF DECLRA CLEAR ALL INPUTFIELDS«, t00=0x0003, t01=0x010e}
0x05e4…05f4 Head {h00=0x000c, h01=0x0050, text=» B DAT03«, t00=0x0003, t01=0x0138}
0x05f4…0602 Head {h00=0x000a, h01=0x0050, text=»DAT02 «, t00=0x0003, t01=0x0148}
0x0602…062a Head {h00=0x0024, h01=0x0050, text=» TBT VERIFM,DAT05 VERIFY MODE ? «, t00=0x0003, t01=0x0156}
0x062a…0638 Head {h00=0x000a, h01=0x0050, text=»DAT07 «, t00=0x0003, t01=0x017e}
0x0638…066a Head {h00=0x002e, h01=0x0050, text=» PERF DECLRS CLEAR SOME INPUTFIELDS(NCLR) «, t00=0x0003, t01=0x018c}
0x066a…067a Head {h00=0x000c, h01=0x0050, text=» B DAT03«, t00=0x0004, t01=0x002e}
0x067a…0688 Head {h00=0x000a, h01=0x0050, text=»DAT05 «, t00=0x0004, t01=0x003e}
0x0688…06b4 Head {h00=0x0028, h01=0x0050, text=» TBT KEYVER,DAT06 KEY VERIFICATION ?«, t00=0x0004, t01=0x004c}
0x06b4…06c2 Head {h00=0x000a, h01=0x0050, text=»DAT0X «, t00=0x0004, t01=0x0078}
0x06c2…06ec Head {h00=0x0026, h01=0x0050, text=» SET DENOCHAN NO CHANGES PERMITTED«, t00=0x0004, t01=0x0086}
0x06ec…06fa Head {h00=0x000a, h01=0x0050, text=»DAT06 «, t00=0x0004, t01=0x00b0}
0x06fa…0726 Head {h00=0x0028, h01=0x0050, text=» PERF DECLRD DISPLAY VARIABEL FIELDS«, t00=0x0004, t01=0x00be}
0x0726…0764 Head {h00=0x003a, h01=0x0050, text=»DAT03 IB DEBINW2,CANCDA,RETUDA,DATENT,RFWDDA,RBWDDA C«, t00=0x0004, t01=0x00ea}
0x0764…0790 Head {h00=0x0028, h01=0x0050, text=» CORDAT,DLTEDA,TOTDA,PROGDA,INSRDA «, t00=0x0004, t01=0x0128}
0x0790…079e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x0154}
0x079e…07a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0162}
0x07a8…07d2 Head {h00=0x0026, h01=0x0050, text=»* HANDLE ERROR AND/OR ILLEGAL KEYS«, t00=0x0004, t01=0x016c}
0x07d2…07dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0008}
0x07dc…07fa Head {h00=0x001a, h01=0x0050, text=»DATERR MOVE DEBINW4,W0«, t00=0x0005, t01=0x0012}
0x07fa…0808 Head {h00=0x000a, h01=0x0050, text=»DATER2«, t00=0x0005, t01=0x0030}
0x0808…0830 Head {h00=0x0024, h01=0x0050, text=» TBF VERIFM,DATER3 VERIFY MODE ?«, t00=0x0005, t01=0x003e}
0x0830…085e Head {h00=0x002a, h01=0x0050, text=» TBT KEYVER,DATER3 KEY VERIFICATION ? «, t00=0x0005, t01=0x0066}
0x085e…0888 Head {h00=0x0026, h01=0x0050, text=» SET DENOCHAN NO CHANGES PERMITTED«, t00=0x0005, t01=0x0094}
0x0888…0892 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00be}
0x0892…08a0 Head {h00=0x000a, h01=0x0050, text=»DATER3«, t00=0x0005, t01=0x00c8}
0x08a0…08ce Head {h00=0x002a, h01=0x0050, text=» CBE PINDFR,W0,DATER4 NO ENTRY FORMAT «, t00=0x0005, t01=0x00d6}
0x08ce…08e2 Head {h00=0x0010, h01=0x0050, text=» ATTACHED.«, t00=0x0005, t01=0x0104}
0x08e2…08f4 Head {h00=0x000e, h01=0x0050, text=» PERF DERR«, t00=0x0005, t01=0x0118}
0x08f4…0904 Head {h00=0x000c, h01=0x0050, text=» B DAT03«, t00=0x0005, t01=0x012a}
0x0904…090e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x013a}
0x090e…091c Head {h00=0x000a, h01=0x0050, text=»DATER4«, t00=0x0005, t01=0x0144}
0x091c…0938 Head {h00=0x0018, h01=0x0050, text=» PERF DERROR,DEKTABN«, t00=0x0005, t01=0x0152}
0x0938…095e Head {h00=0x0022, h01=0x0050, text=» TBF DOOLA,DATER7 NOT BALANCE «, t00=0x0005, t01=0x016e}
0x095e…0988 (6, 0, 400) Head {h00=0x0026, h01=0x0050, text=» IB DEBINW2,TOTBAL,CANCBL,SERIOUS «, t00=0x0006, t01=0x0004}
0x0988…099a Head {h00=0x000e, h01=0x0050, text=» B DATER4 «, t00=0x0006, t01=0x002e}
0x099a…09a8 Head {h00=0x000a, h01=0x0050, text=»DATER7«, t00=0x0006, t01=0x0040}
0x09a8…09d4 Head {h00=0x0028, h01=0x0050, text=» IB DEBINW2,DATER5,DATER5 CLR,CAN C «, t00=0x0006, t01=0x004e}
0x09d4…0a00 Head {h00=0x0028, h01=0x0050, text=» RETUDA,RFWDDA,DATER6,TOTDA,PROGDA «, t00=0x0006, t01=0x007a}
0x0a00…0a0e Head {h00=0x000a, h01=0x0050, text=»DATER5«, t00=0x0006, t01=0x00a6}
0x0a0e…0a44 Head {h00=0x0032, h01=0x0050, text=» COPY DEINPUT,W0,W6,STR6A,W0 RESTOR FORMATNAME«, t00=0x0006, t01=0x00b4}
0x0a44…0a68 Head {h00=0x0020, h01=0x0050, text=» PERF DERECS,W14 GET FORMAT «, t00=0x0006, t01=0x00ea}
0x0a68…0a7c Head {h00=0x0010, h01=0x0050, text=» BNOK DATER4«, t00=0x0006, t01=0x010e}
0x0a7c…0aa4 Head {h00=0x0024, h01=0x0050, text=» TBT VERIFM,DAT05 VERIFY MODE ? «, t00=0x0006, t01=0x0122}
0x0aa4…0ad0 Head {h00=0x0028, h01=0x0050, text=» MOVE DEBINW3,NUMBER CURRENT REC.NR «, t00=0x0006, t01=0x014a}
0x0ad0…0b02 Head {h00=0x002e, h01=0x0050, text=» CBG DEBINW3,BDPOIN(W2),DAT0 ENTRY NEW REC«, t00=0x0006, t01=0x0176}
0x0b02…0b20 Head {h00=0x001a, h01=0x0050, text=» TBT DOOL2,DAT0 INSERT«, t00=0x0007, t01=0x0018}
0x0b20…0b30 Head {h00=0x000c, h01=0x0050, text=» B DAT0X«, t00=0x0007, t01=0x0036}
0x0b30…0b3e Head {h00=0x000a, h01=0x0050, text=»DATER6«, t00=0x0007, t01=0x0046}
0x0b3e…0b6a Head {h00=0x0028, h01=0x0050, text=» CBE NUMBER,=D'0',DATER8 BATCHEAD=0 «, t00=0x0007, t01=0x0054}
0x0b6a…0b7c Head {h00=0x000e, h01=0x0050, text=» B RBWDDA «, t00=0x0007, t01=0x0080}
0x0b7c…0b8a Head {h00=0x000a, h01=0x0050, text=»DATER8«, t00=0x0007, t01=0x0092}
0x0b8a…0ba4 Head {h00=0x0016, h01=0x0050, text=» MOVE DEBINW4,W15 «, t00=0x0007, t01=0x00a0}
0x0ba4…0bb6 Head {h00=0x000e, h01=0x0050, text=» B DATER4 «, t00=0x0007, t01=0x00ba}
0x0bb6…0bc4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x00cc}
0x0bc4…0bde Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0007, t01=0x00da}
0x0bde…0bf8 Head {h00=0x0016, h01=0x0050, text=»* CANCEL PRESSED. «, t00=0x0007, t01=0x00f4}
0x0bf8…0c12 Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0007, t01=0x010e}
0x0c12…0c20 Head {h00=0x000a, h01=0x0050, text=»CANCDA«, t00=0x0007, t01=0x0128}
0x0c20…0c50 Head {h00=0x002c, h01=0x0050, text=» TBT SOOL2,CANC03 DATARECORD HANDLING ? «, t00=0x0007, t01=0x0136}
0x0c50…0c7e Head {h00=0x002a, h01=0x0050, text=» TBF DOOL8,CANC03 OPEN NEW/BATCHHEAD? «, t00=0x0007, t01=0x0166}
0x0c7e…0c8c (8, 0, 400) Head {h00=0x000a, h01=0x0050, text=» THOME«, t00=0x0008, t01=0x0004}
0x0c8c…0c9c Head {h00=0x000c, h01=0x0050, text=» B DAT04«, t00=0x0008, t01=0x0012}
0x0c9c…0ca6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0022}
0x0ca6…0cb4 Head {h00=0x000a, h01=0x0050, text=»CANC03«, t00=0x0008, t01=0x002c}
0x0cb4…0ce0 Head {h00=0x0028, h01=0x0050, text=» TBF DOOL2,CANC10 JUMP IF NOT INSERT«, t00=0x0008, t01=0x003a}
0x0ce0…0d0e Head {h00=0x002a, h01=0x0050, text=» MOVE DEBINW2,W5 SIMULATE RBWD PRESSED«, t00=0x0008, t01=0x0066}
0x0d0e…0d20 Head {h00=0x000e, h01=0x0050, text=» B RBWD10 «, t00=0x0008, t01=0x0094}
0x0d20…0d2e Head {h00=0x000a, h01=0x0050, text=»CANC10«, t00=0x0008, t01=0x00a6}
0x0d2e…0d5e Head {h00=0x002c, h01=0x0050, text=» TBT DECHANGE,CANC20 CHANGED INPUTFIELD?«, t00=0x0008, t01=0x00b4}
0x0d5e…0d86 Head {h00=0x0024, h01=0x0050, text=» TBT VERIFM,CANC13 VERIFY MODE ?«, t00=0x0008, t01=0x00e4}
0x0d86…0db0 Head {h00=0x0026, h01=0x0050, text=» PERF DEPRUT,PRNUM,DEBINW4,DEBINW3«, t00=0x0008, t01=0x010c}
0x0db0…0dd0 Head {h00=0x001c, h01=0x0050, text=» CBNE DEBINW4,W6,CANC15 «, t00=0x0008, t01=0x0136}
0x0dd0…0dec Head {h00=0x0018, h01=0x0050, text=» MOVE DEBINW3,NUMBER«, t00=0x0008, t01=0x0156}
0x0dec…0e12 Head {h00=0x0022, h01=0x0050, text=» CBG DEBINW3,BDPOIN(W2),CANC15«, t00=0x0008, t01=0x0172}
0x0e12…0e40 Head {h00=0x002a, h01=0x0050, text=» TBF DBOMVR,CANC15 RECORD TO VERIFY ? «, t00=0x0009, t01=0x0008}
0x0e40…0e6c Head {h00=0x0028, h01=0x0050, text=» TBT DBOVER,CANC15 VERIFIED RECORD ?«, t00=0x0009, t01=0x0036}
0x0e6c…0e90 Head {h00=0x0020, h01=0x0050, text=» PERF DEVERS SET VERIFY MODE«, t00=0x0009, t01=0x0062}
0x0e90…0e9e Head {h00=0x000a, h01=0x0050, text=»CANC13«, t00=0x0009, t01=0x0086}
0x0e9e…0ec8 Head {h00=0x0026, h01=0x0050, text=» CLEAR DENOCHAN CHANGES PERMITTED «, t00=0x0009, t01=0x0094}
0x0ec8…0ef2 Head {h00=0x0026, h01=0x0050, text=» ERASE 1,W1,W0 ERASE ALL ON SCREEN«, t00=0x0009, t01=0x00be}
0x0ef2…0f02 Head {h00=0x000c, h01=0x0050, text=» B DAT05«, t00=0x0009, t01=0x00e8}
0x0f02…0f10 Head {h00=0x000a, h01=0x0050, text=»CANC15«, t00=0x0009, t01=0x00f8}
0x0f10…0f24 Head {h00=0x0010, h01=0x0050, text=» PERF DECLRN«, t00=0x0009, t01=0x0106}
0x0f24…0f34 Head {h00=0x000c, h01=0x0050, text=» B DAT03«, t00=0x0009, t01=0x011a}
0x0f34…0f42 Head {h00=0x000a, h01=0x0050, text=»CANC20«, t00=0x0009, t01=0x012a}
0x0f42…0f6c Head {h00=0x0026, h01=0x0050, text=» ERASE 1,W1,W0 ERASE ALL ON SCREEN«, t00=0x0009, t01=0x0138}
0x0f6c…0f96 Head {h00=0x0026, h01=0x0050, text=» PERF DERECS,W5 GET CURRENT RECORD«, t00=0x0009, t01=0x0162}
0x0f96…0faa Head {h00=0x0010, h01=0x0050, text=» BERR DATER2«, t00=0x0009, t01=0x018c}
0x0faa…0fd6 Head {h00=0x0028, h01=0x0050, text=» CLEAR DECHANGE CHANGED INPUTFILED ?«, t00=0x000a, t01=0x0010}
0x0fd6…0ffc Head {h00=0x0022, h01=0x0050, text=» CLEAR DEPROMPT ENTIRE DISPLAY«, t00=0x000a, t01=0x003c}
0x0ffc…100e Head {h00=0x000e, h01=0x0050, text=» BNZ DAT04«, t00=0x000a, t01=0x0062}
0x100e…103e Head {h00=0x002c, h01=0x0050, text=» ERASE 5,W1,W0 ERASE SOME FROM 1 AND UP «, t00=0x000a, t01=0x0074}
0x103e…104e Head {h00=0x000c, h01=0x0050, text=» B DAT06«, t00=0x000a, t01=0x00a4}
0x104e…105c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x00b4}
0x105c…1076 Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x000a, t01=0x00c2}
0x1076…1090 Head {h00=0x0016, h01=0x0050, text=»* RETURN PRESSED. «, t00=0x000a, t01=0x00dc}
0x1090…10aa Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x000a, t01=0x00f6}
0x10aa…10b8 Head {h00=0x000a, h01=0x0050, text=»RETUDA«, t00=0x000a, t01=0x0110}
0x10b8…10d4 Head {h00=0x0018, h01=0x0050, text=» TBT DENOCHAN,RETU05«, t00=0x000a, t01=0x011e}
0x10d4…10fa Head {h00=0x0022, h01=0x0050, text=» CLEAR DOOL2 INSERT OF RECORD «, t00=0x000a, t01=0x013a}
0x10fa…110e Head {h00=0x0010, h01=0x0050, text=» BNZ RETU05 «, t00=0x000a, t01=0x0160}
0x110e…1136 Head {h00=0x0024, h01=0x0050, text=» TBT VERIFM,RETU05 VERIFY MODE ?«, t00=0x000a, t01=0x0174}
0x1136…1160 Head {h00=0x0026, h01=0x0050, text=» PERF DERECS,W3 ENTER LAST RECORD «, t00=0x000b, t01=0x000c}
0x1160…1176 Head {h00=0x0012, h01=0x0050, text=» BNERR SERIOUS«, t00=0x000b, t01=0x0036}
0x1176…1184 Head {h00=0x000a, h01=0x0050, text=»RETU03«, t00=0x000b, t01=0x004c}
0x1184…11a0 Head {h00=0x0018, h01=0x0050, text=» PERF DERROR,DEKTAB6«, t00=0x000b, t01=0x005a}
0x11a0…11ae Head {h00=0x000a, h01=0x0050, text=»RETU05«, t00=0x000b, t01=0x0076}
0x11ae…11c0 Head {h00=0x000e, h01=0x0050, text=» B SERIOUS«, t00=0x000b, t01=0x0084}
0x11c0…11d8 Head {h00=0x0014, h01=0x0050, text=»****************«, t00=0x000b, t01=0x0096}
0x11d8…11f0 Head {h00=0x0014, h01=0x0050, text=»* ENTER PRESSED.«, t00=0x000b, t01=0x00ae}
0x11f0…1208 Head {h00=0x0014, h01=0x0050, text=»****************«, t00=0x000b, t01=0x00c6}
0x1208…1216 Head {h00=0x000a, h01=0x0050, text=»DATENT«, t00=0x000b, t01=0x00de}
0x1216…123e Head {h00=0x0024, h01=0x0050, text=» TBF VERIFM,DAEN00 VERIFY MODE ?«, t00=0x000b, t01=0x00ec}
0x123e…124c Head {h00=0x000a, h01=0x0050, text=»VERIFY«, t00=0x000b, t01=0x0114}
0x124c…1272 Head {h00=0x0022, h01=0x0050, text=» SET DBOVER VERIFIED RECORD ? «, t00=0x000b, t01=0x0122}
0x1272…1286 Head {h00=0x0010, h01=0x0050, text=» BNZ RFWD10 «, t00=0x000b, t01=0x0148}
0x1286…12ae Head {h00=0x0024, h01=0x0050, text=» PERF DERECS,W2 ENTER OLD RECORD«, t00=0x000b, t01=0x015c}
0x12ae…12c2 Head {h00=0x0010, h01=0x0050, text=» BNOK DATER2«, t00=0x000b, t01=0x0184}
0x12c2…12d4 Head {h00=0x000e, h01=0x0050, text=» B RFWD10 «, t00=0x000c, t01=0x0008}
0x12d4…12e2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x001a}
0x12e2…12f0 Head {h00=0x000a, h01=0x0050, text=»DAEN00«, t00=0x000c, t01=0x0028}
0x12f0…1328 Head {h00=0x0034, h01=0x0050, text=» TBF DECHANGE,DAEN10 NO ACCUMULATE WHEN NO INPUT«, t00=0x000c, t01=0x0036}
0x1328…1354 Head {h00=0x0028, h01=0x0050, text=» PERF DEACC,W0 INCREASE ACCUMULATORS«, t00=0x000c, t01=0x006e}
0x1354…137e Head {h00=0x0026, h01=0x0050, text=»DAEN10 CLEAR DOOL2 RECORD INSERT ?«, t00=0x000c, t01=0x009a}
0x137e…1390 Head {h00=0x000e, h01=0x0050, text=» BZ DAEN50«, t00=0x000c, t01=0x00c4}
0x1390…13b0 Head {h00=0x001c, h01=0x0050, text=»* HANDLE INSERTED RECORD«, t00=0x000c, t01=0x00d6}
0x13b0…13ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00f6}
0x13ba…13dc Head {h00=0x001e, h01=0x0050, text=» CLEAR BOOL7 CLEAR/SET CR «, t00=0x000c, t01=0x0100}
0x13dc…13ee Head {h00=0x000e, h01=0x0050, text=» BZ DAEN15«, t00=0x000c, t01=0x0122}
0x13ee…141a Head {h00=0x0028, h01=0x0050, text=» SET DOOL2 INSERT WITH FORMATCHANGE «, t00=0x000c, t01=0x0134}
0x141a…142c Head {h00=0x000e, h01=0x0050, text=» B DAEN59 «, t00=0x000c, t01=0x0160}
0x142c…143a Head {h00=0x000a, h01=0x0050, text=»DAEN15«, t00=0x000c, t01=0x0172}
0x143a…1464 Head {h00=0x0026, h01=0x0050, text=» SET DENOCHAN NO CHANGES PERMITTED«, t00=0x000c, t01=0x0180}
0x1464…1492 Head {h00=0x002a, h01=0x0050, text=» PERF DERECS,W12 ENTER INSERTED RECORD«, t00=0x000d, t01=0x001a}
0x1492…14a6 Head {h00=0x0010, h01=0x0050, text=» BOK DAEN30 «, t00=0x000d, t01=0x0048}
0x14a6…14b4 Head {h00=0x000a, h01=0x0050, text=»DAEN20«, t00=0x000d, t01=0x005c}
0x14b4…14e0 Head {h00=0x0028, h01=0x0050, text=» PERF DEACC,W1 DECREASE ACCUMULATORS«, t00=0x000d, t01=0x006a}
0x14e0…14f2 Head {h00=0x000e, h01=0x0050, text=» B DATER2 «, t00=0x000d, t01=0x0096}
0x14f2…1500 Head {h00=0x000a, h01=0x0050, text=»DAEN30«, t00=0x000d, t01=0x00a8}
0x1500…151c Head {h00=0x0018, h01=0x0050, text=» MOVE BCD13A,NUMBER «, t00=0x000d, t01=0x00b6}
0x151c…152a Head {h00=0x000a, h01=0x0050, text=»INSERR«, t00=0x000d, t01=0x00d2}
0x152a…154a Head {h00=0x001c, h01=0x0050, text=» PERF DELAST,W6,DEKTAB5 «, t00=0x000d, t01=0x00e0}
0x154a…156c Head {h00=0x001e, h01=0x0050, text=» IB DEBINW2,INSERR,RETUDA «, t00=0x000d, t01=0x0100}
0x156c…1584 Head {h00=0x0014, h01=0x0050, text=» CLEAR DECHANGE «, t00=0x000d, t01=0x0122}
0x1584…15ae Head {h00=0x0026, h01=0x0050, text=» SET DENOCHAN NO CHANGES PERMITTED«, t00=0x000d, t01=0x013a}
0x15ae…15be Head {h00=0x000c, h01=0x0050, text=» B DAT03«, t00=0x000d, t01=0x0164}
0x15be…15cc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x0174}
0x15cc…15ea Head {h00=0x001a, h01=0x0050, text=»* HANDLE NORMAL INPUT «, t00=0x000d, t01=0x0182}
0x15ea…15f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0010}
0x15f4…1602 Head {h00=0x000a, h01=0x0050, text=»DAEN50«, t00=0x000e, t01=0x001a}
0x1602…1630 Head {h00=0x002a, h01=0x0050, text=» TBF DOOL8,DAEN60 OPEN NEW/BATCHHEAD ?«, t00=0x000e, t01=0x0028}
0x1630…1666 Head {h00=0x0032, h01=0x0050, text=» CALL CLEARB,BIN1,W0 CLEAR DOOL8 IN REC.STATUS«, t00=0x000e, t01=0x0056}
0x1666…1674 Head {h00=0x000a, h01=0x0050, text=»DAEN60«, t00=0x000e, t01=0x008c}
0x1674…1690 Head {h00=0x0018, h01=0x0050, text=» TBF DECHANGE,DAEN61«, t00=0x000e, t01=0x009a}
0x1690…16b2 Head {h00=0x001e, h01=0x0050, text=» PERF DERECS,W1 ENTER NEW «, t00=0x000e, t01=0x00b6}
0x16b2…16c6 Head {h00=0x0010, h01=0x0050, text=» BNOK DAEN20«, t00=0x000e, t01=0x00d8}
0x16c6…16d4 Head {h00=0x000a, h01=0x0050, text=»DAEN61«, t00=0x000e, t01=0x00ec}
0x16d4…16f6 Head {h00=0x001e, h01=0x0050, text=» CLEAR BOOL5 CLEAR/SET CR «, t00=0x000e, t01=0x00fa}
0x16f6…1718 Head {h00=0x001e, h01=0x0050, text=» CLEAR BOOL7 CLEAR/SET CR «, t00=0x000e, t01=0x011c}
0x1718…1742 Head {h00=0x0026, h01=0x0050, text=» BOK DAEN62 NO FORMAT CHANGE FOUND«, t00=0x000e, t01=0x013e}
0x1742…1750 Head {h00=0x000a, h01=0x0050, text=»DAEN59«, t00=0x000e, t01=0x0168}
0x1750…1782 Head {h00=0x002e, h01=0x0050, text=» MOVE DEBINW4,W3 FORMATNAME=IMMIDIATE (N) «, t00=0x000e, t01=0x0176}
0x1782…1794 Head {h00=0x000e, h01=0x0050, text=» B DAEN63 «, t00=0x000f, t01=0x0018}
0x1794…17a2 Head {h00=0x000a, h01=0x0050, text=»DAEN62«, t00=0x000f, t01=0x002a}
0x17a2…17c4 Head {h00=0x001e, h01=0x0050, text=» CLEAR BOOL3 CLEAR/SET CR «, t00=0x000f, t01=0x0038}
0x17c4…17ee Head {h00=0x0026, h01=0x0050, text=» BOK DAEN65 NO FORMAT CHANGE FOUND«, t00=0x000f, t01=0x005a}
0x17ee…1824 Head {h00=0x0032, h01=0x0050, text=» MOVE DEBINW4,W4 FORMATNAME=NEXT AFTER (R)EG «, t00=0x000f, t01=0x0084}
0x1824…1832 Head {h00=0x000a, h01=0x0050, text=»DAEN63«, t00=0x000f, t01=0x00ba}
0x1832…186e Head {h00=0x0038, h01=0x0050, text=» CALL EMPTYT,STSAVE(DEBINW4) CHECK IF FORMAT CHANGE «, t00=0x000f, t01=0x00c8}
0x186e…1882 Head {h00=0x0010, h01=0x0050, text=» BNOK DAEN65«, t00=0x000f, t01=0x0104}
0x1882…189c Head {h00=0x0016, h01=0x0050, text=» MOVE STR1A,=C'*' «, t00=0x000f, t01=0x0118}
0x189c…18cc Head {h00=0x002c, h01=0x0050, text=» MOVE DEBINW3,W0 LOOK IF BALANCE-FORMAT «, t00=0x000f, t01=0x0132}
0x18cc…1902 Head {h00=0x0032, h01=0x0050, text=» MATCH STSAVE(DEBINW4),DEBINW3,W1,STR1A,W0,W1 «, t00=0x000f, t01=0x0162}
0x1902…1928 Head {h00=0x0022, h01=0x0050, text=» BNOK DAEN67 DATAENTER-FORMAT «, t00=0x0010, t01=0x0008}
0x1928…1954 Head {h00=0x0028, h01=0x0050, text=» MOVE BIN3,DEBINW4 SAVE FORMATINDEX «, t00=0x0010, t01=0x002e}
0x1954…197e Head {h00=0x0026, h01=0x0050, text=» PERF DERECS,W3 ENTER LAST RECORD «, t00=0x0010, t01=0x005a}
0x197e…1992 Head {h00=0x0010, h01=0x0050, text=» BOK DAEN66 «, t00=0x0010, t01=0x0084}
0x1992…19ce Head {h00=0x0038, h01=0x0050, text=» CBNE DEBINW4,W13,DAEN69 IGNORE NO WORKSPACE IN CORE«, t00=0x0010, t01=0x0098}
0x19ce…19dc Head {h00=0x000a, h01=0x0050, text=»DAEN66«, t00=0x0010, t01=0x00d4}
0x19dc…19f8 Head {h00=0x0018, h01=0x0050, text=» MOVE DEINPUT,HEX00 «, t00=0x0010, t01=0x00e2}
0x19f8…1a32 Head {h00=0x0036, h01=0x0050, text=» COPY DEINPUT,W0,W6,STSAVE(BIN3),W0 GET FORMATNAME«, t00=0x0010, t01=0x00fe}
0x1a32…1a4c Head {h00=0x0016, h01=0x0050, text=» MOVE FRMTPNTR,W0 «, t00=0x0010, t01=0x0138}
0x1a4c…1a70 Head {h00=0x0020, h01=0x0050, text=» B TOTB05 GET BALANCE-FORMAT«, t00=0x0010, t01=0x0152}
0x1a70…1a7e Head {h00=0x000a, h01=0x0050, text=»DAEN67«, t00=0x0010, t01=0x0176}
0x1a7e…1a9a Head {h00=0x0018, h01=0x0050, text=» MOVE DEINPUT,HEX00 «, t00=0x0010, t01=0x0184}
0x1a9a…1ad8 Head {h00=0x003a, h01=0x0050, text=» COPY DEINPUT,W0,W6,STSAVE(DEBINW4),W0 GET FORMATNAME «, t00=0x0011, t01=0x0010}
0x1ad8…1afc Head {h00=0x0020, h01=0x0050, text=» CLEAR DOOL8 OPEN NEW BATCH «, t00=0x0011, t01=0x004e}
0x1afc…1b22 Head {h00=0x0022, h01=0x0050, text=» PERF DERECS,W14 CHANGE FORMAT«, t00=0x0011, t01=0x0072}
0x1b22…1b36 Head {h00=0x0010, h01=0x0050, text=» BOK DAEN64 «, t00=0x0011, t01=0x0098}
0x1b36…1b58 Head {h00=0x001e, h01=0x0050, text=» CBNE NUMBER,=D'0',DAEN69 «, t00=0x0011, t01=0x00ac}
0x1b58…1b6e Head {h00=0x0012, h01=0x0050, text=» SET DENOCHAN «, t00=0x0011, t01=0x00ce}
0x1b6e…1b7c Head {h00=0x000a, h01=0x0050, text=»DAEN69«, t00=0x0011, t01=0x00e4}
0x1b7c…1b8e Head {h00=0x000e, h01=0x0050, text=» B DATER2 «, t00=0x0011, t01=0x00f2}
0x1b8e…1b9c Head {h00=0x000a, h01=0x0050, text=»DAEN64«, t00=0x0011, t01=0x0104}
0x1b9c…1bae Head {h00=0x000e, h01=0x0050, text=» SET SOOL2«, t00=0x0011, t01=0x0112}
0x1bae…1bbc Head {h00=0x000a, h01=0x0050, text=»DAEN65«, t00=0x0011, t01=0x0124}
0x1bbc…1bce Head {h00=0x000e, h01=0x0050, text=» SET SOOL2«, t00=0x0011, t01=0x0132}
0x1bce…1be2 Head {h00=0x0010, h01=0x0050, text=» BNZ DAEN70 «, t00=0x0011, t01=0x0144}
0x1be2…1bfa Head {h00=0x0014, h01=0x0050, text=» CLEAR DECHANGE «, t00=0x0011, t01=0x0158}
0x1bfa…1c0c Head {h00=0x000e, h01=0x0050, text=» SET DOOL8«, t00=0x0011, t01=0x0170}
0x1c0c…1c24 Head {h00=0x0014, h01=0x0050, text=» PERF DERECS,W10«, t00=0x0011, t01=0x0182}
0x1c24…1c38 Head {h00=0x0010, h01=0x0050, text=» BOK DAEN68 «, t00=0x0012, t01=0x000a}
0x1c38…1c4c Head {h00=0x0010, h01=0x0050, text=» CLEAR DOOL8«, t00=0x0012, t01=0x001e}
0x1c4c…1c5e Head {h00=0x000e, h01=0x0050, text=» B DATER4 «, t00=0x0012, t01=0x0032}
0x1c5e…1c6c Head {h00=0x000a, h01=0x0050, text=»DAEN68«, t00=0x0012, t01=0x0044}
0x1c6c…1c80 Head {h00=0x0010, h01=0x0050, text=» CLEAR DOOL8«, t00=0x0012, t01=0x0052}
0x1c80…1c8e Head {h00=0x000a, h01=0x0050, text=»DAEN70«, t00=0x0012, t01=0x0066}
0x1c8e…1ca6 Head {h00=0x0014, h01=0x0050, text=» CLEAR DECHANGE «, t00=0x0012, t01=0x0074}
0x1ca6…1cb6 Head {h00=0x000c, h01=0x0050, text=» BZ DAT0«, t00=0x0012, t01=0x008c}
0x1cb6…1ccc Head {h00=0x0012, h01=0x0050, text=» CLEAR SW95PR «, t00=0x0012, t01=0x009c}
0x1ccc…1cde Head {h00=0x000e, h01=0x0050, text=» BZ DAEN80«, t00=0x0012, t01=0x00b2}
0x1cde…1cfa Head {h00=0x0018, h01=0x0050, text=» MOVE DEBINW4,=W'-1'«, t00=0x0012, t01=0x00c4}
0x1cfa…1d16 Head {h00=0x0018, h01=0x0050, text=» PERF DERROR,DEKTABS«, t00=0x0012, t01=0x00e0}
0x1d16…1d3e Head {h00=0x0024, h01=0x0050, text=» IB DEBINW2,DAEN80,DAEN80,RETUDA«, t00=0x0012, t01=0x00fc}
0x1d3e…1d4c Head {h00=0x000a, h01=0x0050, text=»DAEN80«, t00=0x0012, t01=0x0124}
0x1d4c…1d76 Head {h00=0x0026, h01=0x0050, text=» PERF DEPRUT,PRNUM,DEBINW4,DEBINW3«, t00=0x0012, t01=0x0132}
0x1d76…1d96 Head {h00=0x001c, h01=0x0050, text=» CBNE DEBINW4,W6,DAEN85 «, t00=0x0012, t01=0x015c}
0x1d96…1db0 Head {h00=0x0016, h01=0x0050, text=» TBF DBOMVR,DAEN85«, t00=0x0012, t01=0x017c}
0x1db0…1dda Head {h00=0x0026, h01=0x0050, text=» PERF DERECS,W3 ENTER LAST SECTOR «, t00=0x0013, t01=0x0008}
0x1dda…1dee Head {h00=0x0010, h01=0x0050, text=» BERR DATER2«, t00=0x0013, t01=0x0032}
0x1dee…1e12 Head {h00=0x0020, h01=0x0050, text=» PERF DEVERS SET VERIFY MODE«, t00=0x0013, t01=0x0046}
0x1e12…1e24 Head {h00=0x000e, h01=0x0050, text=» B RFWD02 «, t00=0x0013, t01=0x006a}
0x1e24…1e32 Head {h00=0x000a, h01=0x0050, text=»DAEN85«, t00=0x0013, t01=0x007c}
0x1e32…1e42 Head {h00=0x000c, h01=0x0050, text=» B DAT0 «, t00=0x0013, t01=0x008a}
0x1e42…1e50 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x009a}
0x1e50…1e6a Head {h00=0x0016, h01=0x0050, text=»******************«, t00=0x0013, t01=0x00a8}
0x1e6a…1e84 Head {h00=0x0016, h01=0x0050, text=»* RECORD FORWARD. «, t00=0x0013, t01=0x00c2}
0x1e84…1e9e Head {h00=0x0016, h01=0x0050, text=»******************«, t00=0x0013, t01=0x00dc}
0x1e9e…1eac Head {h00=0x000a, h01=0x0050, text=»RFWDDA«, t00=0x0013, t01=0x00f6}
0x1eac…1ec8 Head {h00=0x0018, h01=0x0050, text=» TBT DECHANGE,RFWD07«, t00=0x0013, t01=0x0104}
0x1ec8…1ef0 Head {h00=0x0024, h01=0x0050, text=» TBT VERIFM,RFWD04 VERIFY MODE ?«, t00=0x0013, t01=0x0120}
0x1ef0…1f1a Head {h00=0x0026, h01=0x0050, text=» TBT DOOL2,RFWD06 INSERT OF RECORD«, t00=0x0013, t01=0x0148}
0x1f1a…1f44 Head {h00=0x0026, h01=0x0050, text=» PERF DEPRUT,PRNUM,DEBINW4,DEBINW3«, t00=0x0013, t01=0x0172}
0x1f44…1f72 Head {h00=0x002a, h01=0x0050, text=» CBNE DEBINW4,W6,RFWD03 VERIFY MODE ? «, t00=0x0014, t01=0x000c}
0x1f72…1f9e Head {h00=0x0028, h01=0x0050, text=» TBF DBOMVR,RFWD03 RECORD TO VERIFY «, t00=0x0014, t01=0x003a}
0x1f9e…1fc2 Head {h00=0x0020, h01=0x0050, text=» PERF DEVERS SET VERIFY MODE«, t00=0x0014, t01=0x0066}
0x1fc2…1fdc Head {h00=0x0016, h01=0x0050, text=» TBT DBOVER,RFWD10«, t00=0x0014, t01=0x008a}
0x1fdc…1fea Head {h00=0x000a, h01=0x0050, text=»RFWD02«, t00=0x0014, t01=0x00a4}
0x1fea…200a Head {h00=0x001c, h01=0x0050, text=» PERF DELAST,W9,DEKTAB8 «, t00=0x0014, t01=0x00b2}
0x200a…201c Head {h00=0x000e, h01=0x0050, text=» B CANC13 «, t00=0x0014, t01=0x00d2}
0x201c…202a Head {h00=0x000a, h01=0x0050, text=»RFWD04«, t00=0x0014, t01=0x00e4}
0x202a…2056 Head {h00=0x0028, h01=0x0050, text=» TBT DBOVER,RFWD10 VERIFIED RECORD ?«, t00=0x0014, t01=0x00f2}
0x2056…2076 Head {h00=0x001c, h01=0x0050, text=» PERF DELAST,W9,DEKTAB8 «, t00=0x0014, t01=0x011e}
0x2076…2088 Head {h00=0x000e, h01=0x0050, text=» B CANC15 «, t00=0x0014, t01=0x013e}
0x2088…2096 Head {h00=0x000a, h01=0x0050, text=»RFWD03«, t00=0x0014, t01=0x0150}
0x2096…20b0 Head {h00=0x0016, h01=0x0050, text=» TBT DOOL8,RFWD07 «, t00=0x0014, t01=0x015e}
0x20b0…20dc Head {h00=0x0028, h01=0x0050, text=» TBF DOOL2,RFWD05 JUMP IF NOT INSERT«, t00=0x0014, t01=0x0178}
0x20dc…20ea Head {h00=0x000a, h01=0x0050, text=»RFWD06«, t00=0x0015, t01=0x0014}
0x20ea…2110 Head {h00=0x0022, h01=0x0050, text=» B RBWD10 GET PREVIOUS RECORD «, t00=0x0015, t01=0x0022}
0x2110…211e Head {h00=0x000a, h01=0x0050, text=»RFWD05«, t00=0x0015, t01=0x0048}
0x211e…213a Head {h00=0x0018, h01=0x0050, text=» TBT DENOCHAN,RFWD10«, t00=0x0015, t01=0x0056}
0x213a…2148 Head {h00=0x000a, h01=0x0050, text=»RFWD07«, t00=0x0015, t01=0x0072}
0x2148…215a Head {h00=0x000e, h01=0x0050, text=» B DATERR «, t00=0x0015, t01=0x0080}
0x215a…2168 Head {h00=0x000a, h01=0x0050, text=»RFWD10«, t00=0x0015, t01=0x0092}
0x2168…2184 Head {h00=0x0018, h01=0x0050, text=» MOVE DEBINW3,NUMBER«, t00=0x0015, t01=0x00a0}
0x2184…21ac Head {h00=0x0024, h01=0x0050, text=» CBNE DEBINW3,BDPOIN(W2),RFWD15 «, t00=0x0015, t01=0x00bc}
0x21ac…21c0 Head {h00=0x0010, h01=0x0050, text=» TEST VERIFM«, t00=0x0015, t01=0x00e4}
0x21c0…21ea Head {h00=0x0026, h01=0x0050, text=» BNZ TOTBAL JUMP VERIFY TO BALANCE«, t00=0x0015, t01=0x00f8}
0x21ea…21f8 Head {h00=0x000a, h01=0x0050, text=»RFWD13«, t00=0x0015, t01=0x0122}
0x21f8…221a Head {h00=0x001e, h01=0x0050, text=» CBNE NUMBER,=D'0',RFWD14 «, t00=0x0015, t01=0x0130}
0x221a…2228 Head {h00=0x000a, h01=0x0050, text=»RFWD12«, t00=0x0015, t01=0x0152}
0x2228…223c Head {h00=0x0010, h01=0x0050, text=» CLEAR SOOL2«, t00=0x0015, t01=0x0160}
0x223c…224a Head {h00=0x000a, h01=0x0050, text=»RFWD14«, t00=0x0015, t01=0x0174}
0x224a…2272 Head {h00=0x0024, h01=0x0050, text=» MOVE DEBINW4,W9 NO MORE RECORDS«, t00=0x0015, t01=0x0182}
0x2272…2284 Head {h00=0x000e, h01=0x0050, text=» B RFWD33 «, t00=0x0016, t01=0x001a}
0x2284…2292 Head {h00=0x000a, h01=0x0050, text=»RFWD15«, t00=0x0016, t01=0x002c}
0x2292…22ba Head {h00=0x0024, h01=0x0050, text=» TBT VERIFM,RFWD23 VERIFY MODE? «, t00=0x0016, t01=0x003a}
0x22ba…22da Head {h00=0x001c, h01=0x0050, text=» PERF DELAST,W15,DEKTABR«, t00=0x0016, t01=0x0062}
0x22da…2306 Head {h00=0x0028, h01=0x0050, text=» IB DEBINW2,PROCAN,PROCAN,RETUDA C «, t00=0x0016, t01=0x0082}
0x2306…231e Head {h00=0x0014, h01=0x0050, text=» RFWD18,RBWDDA «, t00=0x0016, t01=0x00ae}
0x231e…2336 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW2,W4«, t00=0x0016, t01=0x00c6}
0x2336…2344 Head {h00=0x000a, h01=0x0050, text=»RFWD22«, t00=0x0016, t01=0x00de}
0x2344…2364 Head {h00=0x001c, h01=0x0050, text=» MOVE BCDI21(W3),DEINPUT«, t00=0x0016, t01=0x00ec}
0x2364…238a Head {h00=0x0022, h01=0x0050, text=» CBG BCDI21(W3),NUMBER,RFWD17 «, t00=0x0016, t01=0x010c}
0x238a…23b2 Head {h00=0x0024, h01=0x0050, text=»RFWD16 ILLEGAL NUMBER ENTERED «, t00=0x0016, t01=0x0132}
0x23b2…23da Head {h00=0x0024, h01=0x0050, text=» MOVE BCDI21(W3),NUMBER RESTORE «, t00=0x0016, t01=0x015a}
0x23da…23f2 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W6«, t00=0x0016, t01=0x0182}
0x23f2…2404 Head {h00=0x000e, h01=0x0050, text=» B DATER2 «, t00=0x0017, t01=0x000a}
0x2404…2412 Head {h00=0x000a, h01=0x0050, text=»RFWD17«, t00=0x0017, t01=0x001c}
0x2412…2432 Head {h00=0x001c, h01=0x0050, text=» MOVE DEBINW3,BCDI21(W3)«, t00=0x0017, t01=0x002a}
0x2432…2466 Head {h00=0x0030, h01=0x0050, text=» CBNG DEBINW3,BDPOIN(W2),RFWD19 WITHIN BATCH«, t00=0x0017, t01=0x004a}
0x2466…248e Head {h00=0x0024, h01=0x0050, text=» MOVE BCDI21(W3),NUMBER RESTORE «, t00=0x0017, t01=0x007e}
0x248e…24aa Head {h00=0x0018, h01=0x0050, text=» B RFWD13 NOT FOUND «, t00=0x0017, t01=0x00a6}
0x24aa…24b8 Head {h00=0x000a, h01=0x0050, text=»RFWD18«, t00=0x0017, t01=0x00c2}
0x24b8…24d0 Head {h00=0x0014, h01=0x0050, text=» SUB DEBINW1,W1 «, t00=0x0017, t01=0x00d0}
0x24d0…24e4 Head {h00=0x0010, h01=0x0050, text=» BNZ RFWD22 «, t00=0x0017, t01=0x00e8}
0x24e4…24f2 Head {h00=0x000a, h01=0x0050, text=»RFWD23«, t00=0x0017, t01=0x00fc}
0x24f2…2512 Head {h00=0x001c, h01=0x0050, text=» MOVE BCDI21(W3),NUMBER «, t00=0x0017, t01=0x010a}
0x2512…2530 Head {h00=0x001a, h01=0x0050, text=» ADD BCDI21(W3),=D'1' «, t00=0x0017, t01=0x012a}
0x2530…2542 Head {h00=0x000e, h01=0x0050, text=» B RFWD17 «, t00=0x0017, t01=0x0148}
0x2542…2550 Head {h00=0x000a, h01=0x0050, text=»RFWD19«, t00=0x0017, t01=0x015a}
0x2550…257a Head {h00=0x0026, h01=0x0050, text=» ERASE 1,W1,W0 ERASE ALL ON SCREEN«, t00=0x0017, t01=0x0168}
0x257a…2588 (24, 0, 400) Head {h00=0x000a, h01=0x0050, text=»RFWD20«, t00=0x0018, t01=0x0004}
0x2588…25b0 Head {h00=0x0024, h01=0x0050, text=» PERF DERECS,W4 GET NEXT RECORD «, t00=0x0018, t01=0x0012}
0x25b0…25be Head {h00=0x000a, h01=0x0050, text=»RFWD30«, t00=0x0018, t01=0x003a}
0x25be…25d2 Head {h00=0x0010, h01=0x0050, text=» BOK RFWD40 «, t00=0x0018, t01=0x0048}
0x25d2…25e6 Head {h00=0x0010, h01=0x0050, text=» BOFL RETU03«, t00=0x0018, t01=0x005c}
0x25e6…25fa Head {h00=0x0010, h01=0x0050, text=» CLEAR DOOLC«, t00=0x0018, t01=0x0070}
0x25fa…2624 Head {h00=0x0026, h01=0x0050, text=» CBNE PINDFR,W0,RFWD33 CURR FORMAT«, t00=0x0018, t01=0x0084}
0x2624…2652 Head {h00=0x002a, h01=0x0050, text=» CBE DEBINW2,W5,RFWD31 RBWD PRESSED ? «, t00=0x0018, t01=0x00ae}
0x2652…267a Head {h00=0x0024, h01=0x0050, text=» TBF VERIFM,RFWD31 VERIFY MODE ?«, t00=0x0018, t01=0x00dc}
0x267a…26a8 Head {h00=0x002a, h01=0x0050, text=» CBE DEBINW4,W13,RFWD20 NO WORKSPACE ?«, t00=0x0018, t01=0x0104}
0x26a8…26b6 Head {h00=0x000a, h01=0x0050, text=»RFWD31«, t00=0x0018, t01=0x0132}
0x26b6…26e0 Head {h00=0x0026, h01=0x0050, text=» CBE NUMBER,=D'0',RFWD32 BATCHHEAD«, t00=0x0018, t01=0x0140}
0x26e0…26f2 Head {h00=0x000e, h01=0x0050, text=» SET SOOL2«, t00=0x0018, t01=0x016a}
0x26f2…2704 Head {h00=0x000e, h01=0x0050, text=» B DATER4 «, t00=0x0018, t01=0x017c}
0x2704…2712 Head {h00=0x000a, h01=0x0050, text=»RFWD32«, t00=0x0018, t01=0x018e}
0x2712…2726 Head {h00=0x0010, h01=0x0050, text=» CLEAR SOOL2«, t00=0x0019, t01=0x000c}
0x2726…2738 Head {h00=0x000e, h01=0x0050, text=» B DATER4 «, t00=0x0019, t01=0x0020}
0x2738…2746 Head {h00=0x000a, h01=0x0050, text=»RFWD33«, t00=0x0019, t01=0x0032}
0x2746…2760 Head {h00=0x0016, h01=0x0050, text=» TBF VERIFM,RFWD38«, t00=0x0019, t01=0x0040}
0x2760…2774 Head {h00=0x0010, h01=0x0050, text=» TEST BDAVER«, t00=0x0019, t01=0x005a}
0x2774…2788 Head {h00=0x0010, h01=0x0050, text=» BNZ TOTBAL «, t00=0x0019, t01=0x006e}
0x2788…27a2 Head {h00=0x0016, h01=0x0050, text=» TBT KEYVER,RFWD35«, t00=0x0019, t01=0x0082}
0x27a2…27bc Head {h00=0x0016, h01=0x0050, text=» DISPLAY 30,W1,W0 «, t00=0x0019, t01=0x009c}
0x27bc…27ce Head {h00=0x000e, h01=0x0050, text=» B RFWD39 «, t00=0x0019, t01=0x00b6}
0x27ce…27dc Head {h00=0x000a, h01=0x0050, text=»RFWD35«, t00=0x0019, t01=0x00c8}
0x27dc…27f6 Head {h00=0x0016, h01=0x0050, text=» DISPLAY 20,W1,W0 «, t00=0x0019, t01=0x00d6}
0x27f6…2808 Head {h00=0x000e, h01=0x0050, text=» B RFWD39 «, t00=0x0019, t01=0x00f0}
0x2808…2816 Head {h00=0x000a, h01=0x0050, text=»RFWD38«, t00=0x0019, t01=0x0102}
0x2816…282e Head {h00=0x0014, h01=0x0050, text=» CMP DEBINW4,W15«, t00=0x0019, t01=0x0110}
0x282e…2856 Head {h00=0x0024, h01=0x0050, text=» BZ TOTBAL JUMP TO BAL IF SEARCH«, t00=0x0019, t01=0x0128}
0x2856…286e Head {h00=0x0014, h01=0x0050, text=» DISPLAY 0,W1,W0«, t00=0x0019, t01=0x0150}
0x286e…287c Head {h00=0x000a, h01=0x0050, text=»RFWD39«, t00=0x0019, t01=0x0168}
0x287c…288a Head {h00=0x000a, h01=0x0050, text=» THOME«, t00=0x0019, t01=0x0176}
0x288a…289c Head {h00=0x000e, h01=0x0050, text=» B DATER2 «, t00=0x0019, t01=0x0184}
0x289c…28aa Head {h00=0x000a, h01=0x0050, text=»RFWD40«, t00=0x001a, t01=0x0008}
0x28aa…28ca Head {h00=0x001c, h01=0x0050, text=» SET SOOL2 NOT BATCHHEAD«, t00=0x001a, t01=0x0016}
0x28ca…28f6 Head {h00=0x0028, h01=0x0050, text=» CBE DEBINW2,W5,RFWD50 RBWD PRESSED «, t00=0x001a, t01=0x0036}
0x28f6…2920 Head {h00=0x0026, h01=0x0050, text=» PERF DEPRUT,PRNUM,DEBINW4,DEBINW3«, t00=0x001a, t01=0x0062}
0x2920…294a Head {h00=0x0026, h01=0x0050, text=» CBNE DEBINW4,W6,RFWD50 NOT VERIFY«, t00=0x001a, t01=0x008c}
0x294a…2964 Head {h00=0x0016, h01=0x0050, text=» TBF DBOMVR,RFWD10«, t00=0x001a, t01=0x00b6}
0x2964…2988 Head {h00=0x0020, h01=0x0050, text=» PERF DEVERS SET VERIFY MODE«, t00=0x001a, t01=0x00d0}
0x2988…29a2 Head {h00=0x0016, h01=0x0050, text=» TBT DBOVER,RFWD10«, t00=0x001a, t01=0x00f4}
0x29a2…29cc Head {h00=0x0026, h01=0x0050, text=» CLEAR DENOCHAN CHANGES PERMITTED «, t00=0x001a, t01=0x010e}
0x29cc…29dc Head {h00=0x000c, h01=0x0050, text=» B DAT05«, t00=0x001a, t01=0x0138}
0x29dc…29ea Head {h00=0x000a, h01=0x0050, text=»RFWD50«, t00=0x001a, t01=0x0148}
0x29ea…2a02 Head {h00=0x0014, h01=0x0050, text=» CLEAR DECHANGE «, t00=0x001a, t01=0x0156}
0x2a02…2a10 Head {h00=0x000a, h01=0x0050, text=»RFWD60«, t00=0x001a, t01=0x016e}
0x2a10…2a30 Head {h00=0x001c, h01=0x0050, text=» CBE NUMBER,=D'0',RFWD70«, t00=0x001a, t01=0x017c}
0x2a30…2a44 Head {h00=0x0010, h01=0x0050, text=» TEST VERIFM«, t00=0x001b, t01=0x000c}
0x2a44…2a56 Head {h00=0x000e, h01=0x0050, text=» BZ DAT06 «, t00=0x001b, t01=0x0020}
0x2a56…2a66 Head {h00=0x000c, h01=0x0050, text=» B DAT05«, t00=0x001b, t01=0x0032}
0x2a66…2a74 Head {h00=0x000a, h01=0x0050, text=»RFWD70«, t00=0x001b, t01=0x0042}
0x2a74…2a88 Head {h00=0x0010, h01=0x0050, text=» CLEAR SOOL2«, t00=0x001b, t01=0x0050}
0x2a88…2a9c Head {h00=0x0010, h01=0x0050, text=» TEST VERIFM«, t00=0x001b, t01=0x0064}
0x2a9c…2aae Head {h00=0x000e, h01=0x0050, text=» BZ DAT0X «, t00=0x001b, t01=0x0078}
0x2aae…2abe Head {h00=0x000c, h01=0x0050, text=» B DAT05«, t00=0x001b, t01=0x008a}
0x2abe…2acc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x009a}
0x2acc…2ae6 Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x001b, t01=0x00a8}
0x2ae6…2b00 Head {h00=0x0016, h01=0x0050, text=»* RECORD BACKWARD «, t00=0x001b, t01=0x00c2}
0x2b00…2b1a Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x001b, t01=0x00dc}
0x2b1a…2b24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00f6}
0x2b24…2b3c Head {h00=0x0014, h01=0x0050, text=»RBWERR B DATERR «, t00=0x001b, t01=0x0100}
0x2b3c…2b46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0118}
0x2b46…2b68 Head {h00=0x001e, h01=0x0050, text=»RBWDDA TBT DECHANGE,RBWERR«, t00=0x001b, t01=0x0122}
0x2b68…2b82 Head {h00=0x0016, h01=0x0050, text=» TBF SOOL2,RBWERR «, t00=0x001b, t01=0x0144}
0x2b82…2bac Head {h00=0x0026, h01=0x0050, text=» TBT DOOL2,RBWD10 INSERT OF RECORD«, t00=0x001b, t01=0x015e}
0x2bac…2bd6 Head {h00=0x0026, h01=0x0050, text=» CBE NUMBER,=D'0',RFWD12 BATCHHEAD«, t00=0x001b, t01=0x0188}
0x2bd6…2c00 Head {h00=0x0026, h01=0x0050, text=» PERF DEVERC CLEAR IF VERIFY MODE «, t00=0x001c, t01=0x0022}
0x2c00…2c14 Head {h00=0x0010, h01=0x0050, text=» BNZ RBWD10 «, t00=0x001c, t01=0x004c}
0x2c14…2c30 Head {h00=0x0018, h01=0x0050, text=» TBT DENOCHAN,RBWD15«, t00=0x001c, t01=0x0060}
0x2c30…2c5a Head {h00=0x0026, h01=0x0050, text=» SET DENOCHAN NO CHANGES PERMITTED«, t00=0x001c, t01=0x007c}
0x2c5a…2c84 Head {h00=0x0026, h01=0x0050, text=» PERF DERECS,W3 ENTER LAST SECTOR «, t00=0x001c, t01=0x00a6}
0x2c84…2c98 Head {h00=0x0010, h01=0x0050, text=» BERR DATER2«, t00=0x001c, t01=0x00d0}
0x2c98…2caa Head {h00=0x000e, h01=0x0050, text=» B RFWD50 «, t00=0x001c, t01=0x00e4}
0x2caa…2cb8 Head {h00=0x000a, h01=0x0050, text=»RBWD10«, t00=0x001c, t01=0x00f6}
0x2cb8…2ce2 Head {h00=0x0026, h01=0x0050, text=» SET DENOCHAN NO CHANGES PERMITTED«, t00=0x001c, t01=0x0104}
0x2ce2…2d08 Head {h00=0x0022, h01=0x0050, text=» CLEAR DOOL2 INSERT OF RECORD?«, t00=0x001c, t01=0x012e}
0x2d08…2d20 Head {h00=0x0014, h01=0x0050, text=» BNZ RBWD28 YES!«, t00=0x001c, t01=0x0154}
0x2d20…2d2e Head {h00=0x000a, h01=0x0050, text=»RBWD15«, t00=0x001c, t01=0x016c}
0x2d2e…2d4e Head {h00=0x001c, h01=0x0050, text=» PERF DELAST,W15,DEKTABR«, t00=0x001c, t01=0x017a}
0x2d4e…2d7a Head {h00=0x0028, h01=0x0050, text=» IB DEBINW2,PROCAN,PROCAN,RETUDA C «, t00=0x001d, t01=0x000a}
0x2d7a…2d92 Head {h00=0x0014, h01=0x0050, text=» RFWDDA,RBWD25 «, t00=0x001d, t01=0x0036}
0x2d92…2daa Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW2,W5«, t00=0x001d, t01=0x004e}
0x2daa…2db8 Head {h00=0x000a, h01=0x0050, text=»RBWD20«, t00=0x001d, t01=0x0066}
0x2db8…2dd8 Head {h00=0x001c, h01=0x0050, text=» MOVE BCDI21(W3),DEINPUT«, t00=0x001d, t01=0x0074}
0x2dd8…2dfe Head {h00=0x0022, h01=0x0050, text=» CBNL BCDI21(W3),NUMBER,RFWD16«, t00=0x001d, t01=0x0094}
0x2dfe…2e10 Head {h00=0x000e, h01=0x0050, text=» B RBWD30 «, t00=0x001d, t01=0x00ba}
0x2e10…2e1e Head {h00=0x000a, h01=0x0050, text=»RBWD25«, t00=0x001d, t01=0x00cc}
0x2e1e…2e36 Head {h00=0x0014, h01=0x0050, text=» SUB DEBINW1,W1 «, t00=0x001d, t01=0x00da}
0x2e36…2e4a Head {h00=0x0010, h01=0x0050, text=» BNZ RBWD20 «, t00=0x001d, t01=0x00f2}
0x2e4a…2e58 Head {h00=0x000a, h01=0x0050, text=»RBWD28«, t00=0x001d, t01=0x0106}
0x2e58…2e78 Head {h00=0x001c, h01=0x0050, text=» MOVE BCDI21(W3),NUMBER «, t00=0x001d, t01=0x0114}
0x2e78…2e96 Head {h00=0x001a, h01=0x0050, text=» SUB BCDI21(W3),=D'1' «, t00=0x001d, t01=0x0134}
0x2e96…2ea4 Head {h00=0x000a, h01=0x0050, text=»RBWD30«, t00=0x001d, t01=0x0152}
0x2ea4…2ed2 Head {h00=0x002a, h01=0x0050, text=» ERASE 1,W1,W0 ERASE ALL FROM 1 AND UP«, t00=0x001d, t01=0x0160}
0x2ed2…2efe Head {h00=0x0028, h01=0x0050, text=» PERF DERECS,W6 GET PREVIOUS RECORD «, t00=0x001d, t01=0x018e}
0x2efe…2f10 Head {h00=0x000e, h01=0x0050, text=» B RFWD30 «, t00=0x001e, t01=0x002a}
0x2f10…2f1e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001e, t01=0x003c}
0x2f1e…2f3a Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x001e, t01=0x004a}
0x2f3a…2f56 Head {h00=0x0018, h01=0x0050, text=»* RECORD CORRECTION «, t00=0x001e, t01=0x0066}
0x2f56…2f72 Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x001e, t01=0x0082}
0x2f72…2f80 Head {h00=0x000a, h01=0x0050, text=»CORDAT«, t00=0x001e, t01=0x009e}
0x2f80…2f9a Head {h00=0x0016, h01=0x0050, text=» TBT VERIFM,CORD10«, t00=0x001e, t01=0x00ac}
0x2f9a…2fb6 Head {h00=0x0018, h01=0x0050, text=» TBF DENOCHAN,RBWERR«, t00=0x001e, t01=0x00c6}
0x2fb6…2fc4 Head {h00=0x000a, h01=0x0050, text=»CORD10«, t00=0x001e, t01=0x00e2}
0x2fc4…2fe4 Head {h00=0x001c, h01=0x0050, text=» TBT DOOL2,RBWERR INSERT«, t00=0x001e, t01=0x00f0}
0x2fe4…2ffa Head {h00=0x0012, h01=0x0050, text=» CLEAR DBOVER «, t00=0x001e, t01=0x0110}
0x2ffa…3010 Head {h00=0x0012, h01=0x0050, text=» CLEAR DBOFOR «, t00=0x001e, t01=0x0126}
0x3010…303c Head {h00=0x0028, h01=0x0050, text=» PERF DEACC,W1 DECREASE ACCUMULATORS«, t00=0x001e, t01=0x013c}
0x303c…304a Head {h00=0x000a, h01=0x0050, text=» THOME«, t00=0x001e, t01=0x0168}
0x304a…3074 Head {h00=0x0026, h01=0x0050, text=» CLEAR DENOCHAN CHANGES PERMITTED «, t00=0x001e, t01=0x0176}
0x3074…3094 Head {h00=0x001c, h01=0x0050, text=» PERF DELAST,W8,DEKTAB7 «, t00=0x001f, t01=0x0010}
0x3094…30be Head {h00=0x0026, h01=0x0050, text=» PERF DEVERC CLEAR IF VERIFY MODE «, t00=0x001f, t01=0x0030}
0x30be…30d0 Head {h00=0x000e, h01=0x0050, text=» BZ CORD20«, t00=0x001f, t01=0x005a}
0x30d0…30e4 Head {h00=0x0010, h01=0x0050, text=» PERF DECLRD«, t00=0x001f, t01=0x006c}
0x30e4…30f6 Head {h00=0x000e, h01=0x0050, text=» B CORD30 «, t00=0x001f, t01=0x0080}
0x30f6…3104 Head {h00=0x000a, h01=0x0050, text=»CORD20«, t00=0x001f, t01=0x0092}
0x3104…3118 Head {h00=0x0010, h01=0x0050, text=» PERF DECLRN«, t00=0x001f, t01=0x00a0}
0x3118…3154 Head {h00=0x0038, h01=0x0050, text=»CORD30 IB DEBINW2,CORCAN,CORC10,CORENT CLR,CAN,ENT C«, t00=0x001f, t01=0x00b4}
0x3154…317e Head {h00=0x0026, h01=0x0050, text=» CORD35,CORD35,CORD35 NOT VALID C«, t00=0x001f, t01=0x00f0}
0x317e…3192 Head {h00=0x0010, h01=0x0050, text=» CORE15 DEL«, t00=0x001f, t01=0x011a}
0x3192…31a0 Head {h00=0x000a, h01=0x0050, text=»CORD35«, t00=0x001f, t01=0x012e}
0x31a0…31b8 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W0«, t00=0x001f, t01=0x013c}
0x31b8…31c6 Head {h00=0x000a, h01=0x0050, text=»CORD40«, t00=0x001f, t01=0x0154}
0x31c6…31d8 Head {h00=0x000e, h01=0x0050, text=» PERF DERR«, t00=0x001f, t01=0x0162}
0x31d8…31ea Head {h00=0x000e, h01=0x0050, text=» B CORD30 «, t00=0x001f, t01=0x0174}
0x31ea…31f8 Head {h00=0x000a, h01=0x0050, text=»CORCAN«, t00=0x001f, t01=0x0186}
0x31f8…3224 (32, 0, 400) Head {h00=0x0028, h01=0x0050, text=» TBF DECHANGE,CORE15 NO CHANGES MADE«, t00=0x0020, t01=0x0004}
0x3224…324e Head {h00=0x0026, h01=0x0050, text=» ERASE 1,W1,W0 ERASE ALL ON SCREEN«, t00=0x0020, t01=0x0030}
0x324e…325c Head {h00=0x000a, h01=0x0050, text=»CORC10«, t00=0x0020, t01=0x005a}
0x325c…326e Head {h00=0x000e, h01=0x0050, text=» SET DOOL4«, t00=0x0020, t01=0x0068}
0x326e…3298 Head {h00=0x0026, h01=0x0050, text=» PERF DERECS,W5 GET CURRENT RECORD«, t00=0x0020, t01=0x007a}
0x3298…32ae Head {h00=0x0012, h01=0x0050, text=» BNERR CORRET «, t00=0x0020, t01=0x00a4}
0x32ae…32c2 Head {h00=0x0010, h01=0x0050, text=» CLEAR DOOL4«, t00=0x0020, t01=0x00ba}
0x32c2…32d4 Head {h00=0x000e, h01=0x0050, text=» B CORD40 «, t00=0x0020, t01=0x00ce}
0x32d4…32e2 Head {h00=0x000a, h01=0x0050, text=»CORRET«, t00=0x0020, t01=0x00e0}
0x32e2…32f6 Head {h00=0x0010, h01=0x0050, text=» CLEAR DOOL4«, t00=0x0020, t01=0x00ee}
0x32f6…3304 Head {h00=0x000a, h01=0x0050, text=»CORE15«, t00=0x0020, t01=0x0102}
0x3304…3330 Head {h00=0x0028, h01=0x0050, text=» PERF DEACC,W2 INCREASE ACCUMULATORS«, t00=0x0020, t01=0x0110}
0x3330…3348 Head {h00=0x0014, h01=0x0050, text=» CLEAR DECHANGE «, t00=0x0020, t01=0x013c}
0x3348…3356 Head {h00=0x000a, h01=0x0050, text=» THOME«, t00=0x0020, t01=0x0154}
0x3356…3394 Head {h00=0x003a, h01=0x0050, text=»CORR30 IB DEBINW2,CORE10,SERIOUS,CORE20 CAN,RET,ENT C «, t00=0x0020, t01=0x0162}
0x3394…33be Head {h00=0x0026, h01=0x0050, text=» CORENT,CORENT,CORENT NOT USED C «, t00=0x0021, t01=0x0010}
0x33be…33d2 Head {h00=0x0010, h01=0x0050, text=» CORDEL DEL«, t00=0x0021, t01=0x003a}
0x33d2…33e0 Head {h00=0x000a, h01=0x0050, text=»CORENT«, t00=0x0021, t01=0x004e}
0x33e0…3402 Head {h00=0x001e, h01=0x0050, text=» PERF DERECS,W2 ENTER OLD «, t00=0x0021, t01=0x005c}
0x3402…3416 Head {h00=0x0010, h01=0x0050, text=» BNOK CORD40«, t00=0x0021, t01=0x007e}
0x3416…3424 Head {h00=0x000a, h01=0x0050, text=»CORE10«, t00=0x0021, t01=0x0092}
0x3424…343e Head {h00=0x0016, h01=0x0050, text=» MOVE DEBINW3,W24 «, t00=0x0021, t01=0x00a0}
0x343e…346e Head {h00=0x002c, h01=0x0050, text=» ERASE 0,DEBINW3,DEBINW3 ERASE LAST LINE«, t00=0x0021, t01=0x00ba}
0x346e…3498 Head {h00=0x0026, h01=0x0050, text=» CBNE DEBINW2,W1,CORE15 NOT CANCE «, t00=0x0021, t01=0x00ea}
0x3498…34aa Head {h00=0x000e, h01=0x0050, text=» B CORE45 «, t00=0x0021, t01=0x0114}
0x34aa…34b8 Head {h00=0x000a, h01=0x0050, text=»CORE20«, t00=0x0021, t01=0x0126}
0x34b8…34d4 Head {h00=0x0018, h01=0x0050, text=» GETFLD 0,W1,DEBINW1«, t00=0x0021, t01=0x0134}
0x34d4…34ec Head {h00=0x0014, h01=0x0050, text=» CLEAR DECHANGE «, t00=0x0021, t01=0x0150}
0x34ec…34fa Head {h00=0x000a, h01=0x0050, text=»CORE45«, t00=0x0021, t01=0x0168}
0x34fa…3524 Head {h00=0x0026, h01=0x0050, text=» PERF DEPRUT,PRNUM,DEBINW4,DEBINW3«, t00=0x0021, t01=0x0176}
0x3524…3544 Head {h00=0x001c, h01=0x0050, text=» CBNE DEBINW4,W6,CORE60 «, t00=0x0022, t01=0x0010}
0x3544…3552 Head {h00=0x000a, h01=0x0050, text=»CORE50«, t00=0x0022, t01=0x0030}
0x3552…356c Head {h00=0x0016, h01=0x0050, text=» TBF DBOMVR,CORE60«, t00=0x0022, t01=0x003e}
0x356c…3586 Head {h00=0x0016, h01=0x0050, text=» TBT DBOVER,CORE60«, t00=0x0022, t01=0x0058}
0x3586…35aa Head {h00=0x0020, h01=0x0050, text=» PERF DEVERS SET VEIFY MODE «, t00=0x0022, t01=0x0072}
0x35aa…35bc Head {h00=0x000e, h01=0x0050, text=» B RFWD02 «, t00=0x0022, t01=0x0096}
0x35bc…35ca Head {h00=0x000a, h01=0x0050, text=»CORE60«, t00=0x0022, t01=0x00a8}
0x35ca…35f4 Head {h00=0x0026, h01=0x0050, text=» SET DENOCHAN NO CHANGES PERMITTED«, t00=0x0022, t01=0x00b6}
0x35f4…3626 Head {h00=0x002e, h01=0x0050, text=» CBNE DEBINW2,W1,CORE90 JUMP IF NOT CANCEL«, t00=0x0022, t01=0x00e0}
0x3626…3636 Head {h00=0x000c, h01=0x0050, text=» B DAT06«, t00=0x0022, t01=0x0112}
0x3636…3644 Head {h00=0x000a, h01=0x0050, text=»CORE90«, t00=0x0022, t01=0x0122}
0x3644…3658 Head {h00=0x0010, h01=0x0050, text=» PERF DECLRN«, t00=0x0022, t01=0x0130}
0x3658…3668 Head {h00=0x000c, h01=0x0050, text=» B DAT03«, t00=0x0022, t01=0x0144}
0x3668…3676 Head {h00=0x000a, h01=0x0050, text=»CORDEL«, t00=0x0022, t01=0x0154}
0x3676…368c Head {h00=0x0012, h01=0x0050, text=» SET DENOCHAN «, t00=0x0022, t01=0x0162}
0x368c…369e Head {h00=0x000e, h01=0x0050, text=» B DLTE05 «, t00=0x0022, t01=0x0178}
0x369e…36ac Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0022, t01=0x018a}
0x36ac…36c6 Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0023, t01=0x0008}
0x36c6…36de Head {h00=0x0014, h01=0x0050, text=»* RECORD DELETE.«, t00=0x0023, t01=0x0022}
0x36de…36f8 Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0023, t01=0x003a}
0x36f8…3706 Head {h00=0x000a, h01=0x0050, text=»DLTEDA«, t00=0x0023, t01=0x0054}
0x3706…3720 Head {h00=0x0016, h01=0x0050, text=» TBT VERIFM,DLTE05«, t00=0x0023, t01=0x0062}
0x3720…3736 Head {h00=0x0012, h01=0x0050, text=» TEST DENOCHAN«, t00=0x0023, t01=0x007c}
0x3736…3748 Head {h00=0x000e, h01=0x0050, text=» BZ DATERR«, t00=0x0023, t01=0x0092}
0x3748…3762 Head {h00=0x0016, h01=0x0050, text=» TEST DOOL2 INSERT«, t00=0x0023, t01=0x00a4}
0x3762…3776 Head {h00=0x0010, h01=0x0050, text=» BNZ DATERR «, t00=0x0023, t01=0x00be}
0x3776…3784 Head {h00=0x000a, h01=0x0050, text=»DLTE05«, t00=0x0023, t01=0x00d2}
0x3784…3798 Head {h00=0x0010, h01=0x0050, text=» TEST SOOL2 «, t00=0x0023, t01=0x00e0}
0x3798…37bc Head {h00=0x0020, h01=0x0050, text=» BZ DATERR JUMP IF BATCHHEAD«, t00=0x0023, t01=0x00f4}
0x37bc…37d0 Head {h00=0x0010, h01=0x0050, text=» PERF DEVERC«, t00=0x0023, t01=0x0118}
0x37d0…37e6 Head {h00=0x0012, h01=0x0050, text=» SET DENOCHAN «, t00=0x0023, t01=0x012c}
0x37e6…37f4 Head {h00=0x000a, h01=0x0050, text=»DLTE10«, t00=0x0023, t01=0x0142}
0x37f4…3814 Head {h00=0x001c, h01=0x0050, text=» PERF DELAST,W2,DEKTAB7 «, t00=0x0023, t01=0x0150}
0x3814…3844 Head {h00=0x002c, h01=0x0050, text=» IB DEBINW2,PROCAN,PROCAN,RETUDA,DLTE10 «, t00=0x0023, t01=0x0170}
0x3844…386e Head {h00=0x0026, h01=0x0050, text=» ERASE 1,W1,W0 ERASE ALL ON SCREEN«, t00=0x0024, t01=0x0010}
0x386e…389a Head {h00=0x0028, h01=0x0050, text=» PERF DEACC,W1 DECREASE ACCUMULATORS«, t00=0x0024, t01=0x003a}
0x389a…38a8 Head {h00=0x000a, h01=0x0050, text=» THOME«, t00=0x0024, t01=0x0066}
0x38a8…38b6 Head {h00=0x000a, h01=0x0050, text=»DLTE30«, t00=0x0024, t01=0x0074}
0x38b6…38ce Head {h00=0x0014, h01=0x0050, text=» PERF DERECS,W8 «, t00=0x0024, t01=0x0082}
0x38ce…38e4 Head {h00=0x0012, h01=0x0050, text=» BNERR DLTE50 «, t00=0x0024, t01=0x009a}
0x38e4…3900 Head {h00=0x0018, h01=0x0050, text=» PERF DERROR,DEKTAB6«, t00=0x0024, t01=0x00b0}
0x3900…3912 Head {h00=0x000e, h01=0x0050, text=» B SERIOUS«, t00=0x0024, t01=0x00cc}
0x3912…3920 Head {h00=0x000a, h01=0x0050, text=»DLTE50«, t00=0x0024, t01=0x00de}
0x3920…3940 Head {h00=0x001c, h01=0x0050, text=» PERF DELAST,W3,DEKTAB5 «, t00=0x0024, t01=0x00ec}
0x3940…394e Head {h00=0x000a, h01=0x0050, text=»DLTE60«, t00=0x0024, t01=0x010c}
0x394e…3990 Head {h00=0x003e, h01=0x0050, text=» IB DEBINW2,DELERR,RETUDA,DELERR,RFWD10,RFWD50,DELERR, C «, t00=0x0024, t01=0x011a}
0x3990…39a6 Head {h00=0x0012, h01=0x0050, text=» DELERR,TOTDA«, t00=0x0024, t01=0x015c}
0x39a6…39b4 Head {h00=0x000a, h01=0x0050, text=»DELERR«, t00=0x0024, t01=0x0172}
0x39b4…39e0 Head {h00=0x0028, h01=0x0050, text=» EDWRT DEDSSCRN,BELL ACOUSTIC ALARM «, t00=0x0024, t01=0x0180}
0x39e0…39f2 Head {h00=0x000e, h01=0x0050, text=» B DLTE50 «, t00=0x0025, t01=0x001c}
0x39f2…3a00 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0025, t01=0x002e}
0x3a00…3a1c Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x0025, t01=0x003c}
0x3a1c…3a38 Head {h00=0x0018, h01=0x0050, text=»* CHANGE PROGRAM. * «, t00=0x0025, t01=0x0058}
0x3a38…3a54 Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x0025, t01=0x0074}
0x3a54…3a62 Head {h00=0x000a, h01=0x0050, text=»PROGDA«, t00=0x0025, t01=0x0090}
0x3a62…3a78 Head {h00=0x0012, h01=0x0050, text=» TEST DENOCHAN«, t00=0x0025, t01=0x009e}
0x3a78…3a8c Head {h00=0x0010, h01=0x0050, text=» BNZ DATERR «, t00=0x0025, t01=0x00b4}
0x3a8c…3aa2 Head {h00=0x0012, h01=0x0050, text=» TEST DECHANGE«, t00=0x0025, t01=0x00c8}
0x3aa2…3ab6 Head {h00=0x0010, h01=0x0050, text=» BNZ DATERR «, t00=0x0025, t01=0x00de}
0x3ab6…3aca Head {h00=0x0010, h01=0x0050, text=» TEST SOOL2 «, t00=0x0025, t01=0x00f2}
0x3aca…3adc Head {h00=0x000e, h01=0x0050, text=» BZ DATERR«, t00=0x0025, t01=0x0106}
0x3adc…3af0 Head {h00=0x0010, h01=0x0050, text=» GETABX BIN4«, t00=0x0025, t01=0x0118}
0x3af0…3afe Head {h00=0x000a, h01=0x0050, text=»PROGD0«, t00=0x0025, t01=0x012c}
0x3afe…3b1e Head {h00=0x001c, h01=0x0050, text=» PERF DELAST,W1,DEKTAB7 «, t00=0x0025, t01=0x013a}
0x3b1e…3b4e Head {h00=0x002c, h01=0x0050, text=» IB DEBINW2,PROCAN,PROCAN,RETUDA,PROGD0 «, t00=0x0025, t01=0x015a}
0x3b4e…3b6c Head {h00=0x001a, h01=0x0050, text=»PROENT SUB DEBINW1,W1 «, t00=0x0025, t01=0x018a}
0x3b6c…3b90 Head {h00=0x0020, h01=0x0050, text=» BZ PROGD0 JUMP IF NO INPUT «, t00=0x0026, t01=0x0018}
0x3b90…3bca Head {h00=0x0036, h01=0x0050, text=» COPY DEINPUT,DEBINW1,W1,HEX00,W0 DELETE ENTER-KEY«, t00=0x0026, t01=0x003c}
0x3bca…3bf2 Head {h00=0x0024, h01=0x0050, text=» PERF DERECS,W10 CHANGE PROGRAM«, t00=0x0026, t01=0x0076}
0x3bf2…3c04 Head {h00=0x000e, h01=0x0050, text=» BOK DAT0 «, t00=0x0026, t01=0x009e}
0x3c04…3c22 Head {h00=0x001a, h01=0x0050, text=» GETFLD 0,BIN4,DEBINW2«, t00=0x0026, t01=0x00b0}
0x3c22…3c34 Head {h00=0x000e, h01=0x0050, text=» B DATER2 «, t00=0x0026, t01=0x00ce}
0x3c34…3c3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00e0}
0x3c3e…3c4c Head {h00=0x000a, h01=0x0050, text=»PROCAN«, t00=0x0026, t01=0x00ea}
0x3c4c…3c76 Head {h00=0x0026, h01=0x0050, text=» PERF DEPRUT,PRNUM,DEBINW4,DEBINW2«, t00=0x0026, t01=0x00f8}
0x3c76…3c8e Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW2,W1«, t00=0x0026, t01=0x0122}
0x3c8e…3cbc Head {h00=0x002a, h01=0x0050, text=» CBE DEBINW4,W6,CORE50 JUMP IF VERIFY «, t00=0x0026, t01=0x013a}
0x3cbc…3cd0 Head {h00=0x0010, h01=0x0050, text=» PERF DECLRN«, t00=0x0026, t01=0x0168}
0x3cd0…3ce0 Head {h00=0x000c, h01=0x0050, text=» B DAT03«, t00=0x0026, t01=0x017c}
0x3ce0…3cea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x018c}
0x3cea…3cf8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x0008}
0x3cf8…3d12 Head {h00=0x0016, h01=0x0050, text=»******************«, t00=0x0027, t01=0x0016}
0x3d12…3d2c Head {h00=0x0016, h01=0x0050, text=»* RECORD INSERT. *«, t00=0x0027, t01=0x0030}
0x3d2c…3d46 Head {h00=0x0016, h01=0x0050, text=»******************«, t00=0x0027, t01=0x004a}
0x3d46…3d54 Head {h00=0x000a, h01=0x0050, text=»INSRDA«, t00=0x0027, t01=0x0064}
0x3d54…3d68 Head {h00=0x0010, h01=0x0050, text=» TEST DOOL2 «, t00=0x0027, t01=0x0072}
0x3d68…3d7c Head {h00=0x0010, h01=0x0050, text=» BNZ DATERR «, t00=0x0027, t01=0x0086}
0x3d7c…3da6 Head {h00=0x0026, h01=0x0050, text=» PERF DEPRUT,PRNUM,DEBINW4,DEBINW3«, t00=0x0027, t01=0x009a}
0x3da6…3dc6 Head {h00=0x001c, h01=0x0050, text=» CBNE DEBINW4,W6,INSR05 «, t00=0x0027, t01=0x00c4}
0x3dc6…3de0 Head {h00=0x0016, h01=0x0050, text=» TBF DBOMVR,INSR05«, t00=0x0027, t01=0x00e4}
0x3de0…3dfa Head {h00=0x0016, h01=0x0050, text=» TBT DBOVER,INSR05«, t00=0x0027, t01=0x00fe}
0x3dfa…3e1e Head {h00=0x0020, h01=0x0050, text=» PERF DEVERS SET VERIFY MODE«, t00=0x0027, t01=0x0118}
0x3e1e…3e30 Head {h00=0x000e, h01=0x0050, text=» B RFWD02 «, t00=0x0027, t01=0x013c}
0x3e30…3e3e Head {h00=0x000a, h01=0x0050, text=»INSR05«, t00=0x0027, t01=0x014e}
0x3e3e…3e5a Head {h00=0x0018, h01=0x0050, text=» MOVE DEBINW3,NUMBER«, t00=0x0027, t01=0x015c}
0x3e5a…3e8e Head {h00=0x0030, h01=0x0050, text=» CBNE DEBINW3,BDPOIN(W2),INSR10 LAST RECORD «, t00=0x0027, t01=0x0178}
0x3e8e…3eb8 Head {h00=0x0026, h01=0x0050, text=» CLEAR DENOCHAN CHANGES PERMITTED «, t00=0x0028, t01=0x001c}
0x3eb8…3eca Head {h00=0x000e, h01=0x0050, text=» B CANBL1 «, t00=0x0028, t01=0x0046}
0x3eca…3ed8 Head {h00=0x000a, h01=0x0050, text=»INSR10«, t00=0x0028, t01=0x0058}
0x3ed8…3ef8 Head {h00=0x001c, h01=0x0050, text=» PERF DELAST,W4,DEKTAB7 «, t00=0x0028, t01=0x0066}
0x3ef8…3f28 Head {h00=0x002c, h01=0x0050, text=» IB DEBINW2,PROCAN,PROCAN,RETUDA,INSR10 «, t00=0x0028, t01=0x0086}
0x3f28…3f4e Head {h00=0x0022, h01=0x0050, text=» PERF DERECS,W9 INSERT RECORD «, t00=0x0028, t01=0x00b6}
0x3f4e…3f62 Head {h00=0x0010, h01=0x0050, text=» BERR DATER2«, t00=0x0028, t01=0x00dc}
0x3f62…3f8c Head {h00=0x0026, h01=0x0050, text=» CLEAR DENOCHAN CHANGES PERMITTED «, t00=0x0028, t01=0x00f0}
0x3f8c…3fac Head {h00=0x001c, h01=0x0050, text=» SET DOOL2 RECORD INSERT«, t00=0x0028, t01=0x011a}
0x3fac…3fd6 Head {h00=0x0026, h01=0x0050, text=» PERF DEVERC CLEAR IF VERIFY MODE «, t00=0x0028, t01=0x013a}
0x3fd6…3fe8 Head {h00=0x000e, h01=0x0050, text=» B DAEN65 «, t00=0x0028, t01=0x0164}
0x3fe8…3ff6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x0176}
0x3ff6…4012 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0028, t01=0x0184}
0x4012…402e Head {h00=0x0018, h01=0x0050, text=»* TOT-KEY PRESSED. *«, t00=0x0029, t01=0x0010}
0x402e…404a Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0029, t01=0x002c}
0x404a…4058 Head {h00=0x000a, h01=0x0050, text=»TOTDA «, t00=0x0029, t01=0x0048}
0x4058…406c Head {h00=0x0010, h01=0x0050, text=» TEST DOOL8 «, t00=0x0029, t01=0x0056}
0x406c…4080 Head {h00=0x0010, h01=0x0050, text=» BNZ DATERR «, t00=0x0029, t01=0x006a}
0x4080…409a Head {h00=0x0016, h01=0x0050, text=» TBF SOOL2,TOTBAL «, t00=0x0029, t01=0x007e}
0x409a…40b6 Head {h00=0x0018, h01=0x0050, text=» CLEAR DOOL2 INSERT «, t00=0x0029, t01=0x0098}
0x40b6…40ca Head {h00=0x0010, h01=0x0050, text=» BNZ TOTBAL «, t00=0x0029, t01=0x00b4}
0x40ca…40e0 Head {h00=0x0012, h01=0x0050, text=» TEST DECHANGE«, t00=0x0029, t01=0x00c8}
0x40e0…40f4 Head {h00=0x0010, h01=0x0050, text=» BNZ DATERR «, t00=0x0029, t01=0x00de}
0x40f4…4110 Head {h00=0x0018, h01=0x0050, text=» TBT DENOCHAN,TOTBAL«, t00=0x0029, t01=0x00f2}
0x4110…412a Head {h00=0x0016, h01=0x0050, text=» TBT VERIFM,TOTBAL«, t00=0x0029, t01=0x010e}
0x412a…414c Head {h00=0x001e, h01=0x0050, text=» PERF DERECS,W3 ENTER LAST«, t00=0x0029, t01=0x0128}
0x414c…4162 Head {h00=0x0012, h01=0x0050, text=» BNERR TOTBAL «, t00=0x0029, t01=0x014a}
0x4162…4190 Head {h00=0x002a, h01=0x0050, text=» CBE DEBINW4,W13,TOTBAL NO WORKSPACE ?«, t00=0x0029, t01=0x0160}
0x4190…41a2 Head {h00=0x000e, h01=0x0050, text=» B DATER2 «, t00=0x0029, t01=0x018e}
0x41a2…41b0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002a, t01=0x0010}
0x41b0…41e2 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x002a, t01=0x001e}
0x41e2…41ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0050}
0x41ec…420c Head {h00=0x001c, h01=0x0050, text=»* HANDLE BALANCE FORMAT «, t00=0x002a, t01=0x005a}
0x420c…4216 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x007a}
0x4216…4248 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x002a, t01=0x0084}
0x4248…4256 Head {h00=0x000a, h01=0x0050, text=»TOTBAL«, t00=0x002a, t01=0x00b6}
0x4256…4280 Head {h00=0x0026, h01=0x0050, text=» CLEAR DENOCHAN CHANGES PERMITTED «, t00=0x002a, t01=0x00c4}
0x4280…4294 Head {h00=0x0010, h01=0x0050, text=» CLEAR SOOL2«, t00=0x002a, t01=0x00ee}
0x4294…42b0 Head {h00=0x0018, h01=0x0050, text=» MOVE DEINPUT,HEX00 «, t00=0x002a, t01=0x0102}
0x42b0…42e8 Head {h00=0x0034, h01=0x0050, text=» COPY DEINPUT,W0,W6,FORTAB(W21),W0 BALANCEFORMAT«, t00=0x002a, t01=0x011e}
0x42e8…430a Head {h00=0x001e, h01=0x0050, text=» MOVE FRMTPNTR,SYMREC(W11)«, t00=0x002a, t01=0x0156}
0x430a…4318 Head {h00=0x000a, h01=0x0050, text=»TOTB05«, t00=0x002a, t01=0x0178}
0x4318…4330 Head {h00=0x0014, h01=0x0050, text=» CLEAR DECHANGE «, t00=0x002a, t01=0x0186}
0x4330…4342 Head {h00=0x000e, h01=0x0050, text=» SET DOOLA«, t00=0x002b, t01=0x000e}
0x4342…4350 Head {h00=0x000a, h01=0x0050, text=»TOTB10«, t00=0x002b, t01=0x0020}
0x4350…4374 Head {h00=0x0020, h01=0x0050, text=» PERF DEDISC,W10 GET FORMAT «, t00=0x002b, t01=0x002e}
0x4374…438a Head {h00=0x0012, h01=0x0050, text=» BNERR TOTB20 «, t00=0x002b, t01=0x0052}
0x438a…43b8 Head {h00=0x002a, h01=0x0050, text=» CBNE DEBINW4,W13,TOTB12 NO WORKSPACE «, t00=0x002b, t01=0x0068}
0x43b8…43e2 Head {h00=0x0026, h01=0x0050, text=» ATTFMT FFETCH ATTACH DUMMYFORMAT «, t00=0x002b, t01=0x0096}
0x43e2…43fa Head {h00=0x0014, h01=0x0050, text=» DISPLAY 0,W1,W0«, t00=0x002b, t01=0x00c0}
0x43fa…4408 Head {h00=0x000a, h01=0x0050, text=» THOME«, t00=0x002b, t01=0x00d8}
0x4408…4436 Head {h00=0x002a, h01=0x0050, text=» CBE PINDFR,W0,TOTB14 NO CURR. FORMAT «, t00=0x002b, t01=0x00e6}
0x4436…4462 Head {h00=0x0028, h01=0x0050, text=» PERF DEPOOL,W6,PINDFR,BIN14,STRG10A«, t00=0x002b, t01=0x0114}
0x4462…447c Head {h00=0x0016, h01=0x0050, text=» MOVE FORMAT,HEX00«, t00=0x002b, t01=0x0140}
0x447c…448e Head {h00=0x000e, h01=0x0050, text=» B TOTB10 «, t00=0x002b, t01=0x015a}
0x448e…449c Head {h00=0x000a, h01=0x0050, text=»TOTB12«, t00=0x002b, t01=0x016c}
0x449c…44c2 Head {h00=0x0022, h01=0x0050, text=» CLEAR DOOLA NO BALANCE-FORMAT«, t00=0x002b, t01=0x017a}
0x44c2…44ec Head {h00=0x0026, h01=0x0050, text=» SET DENOCHAN NO CHANGES PERMITTED«, t00=0x002c, t01=0x0010}
0x44ec…44fa Head {h00=0x000a, h01=0x0050, text=»TOTB14«, t00=0x002c, t01=0x003a}
0x44fa…450c Head {h00=0x000e, h01=0x0050, text=» B DATER2 «, t00=0x002c, t01=0x0048}
0x450c…451a Head {h00=0x000a, h01=0x0050, text=»TOTB20«, t00=0x002c, t01=0x005a}
0x451a…4546 Head {h00=0x0028, h01=0x0050, text=» MOVE FORMAT,FORTAB(W21) BLANCE NAME«, t00=0x002c, t01=0x0068}
0x4546…4568 Head {h00=0x001e, h01=0x0050, text=» MOVE SYMREC(W11),FRMTPNTR«, t00=0x002c, t01=0x0094}
0x4568…4586 Head {h00=0x001a, h01=0x0050, text=» MOVE BIN14,FLIND(W1) «, t00=0x002c, t01=0x00b6}
0x4586…45a2 Head {h00=0x0018, h01=0x0050, text=» ATTFMT BPOOL(BIN14)«, t00=0x002c, t01=0x00d4}
0x45a2…45b8 Head {h00=0x0012, h01=0x0050, text=» SET DEPROMPT «, t00=0x002c, t01=0x00f0}
0x45b8…45e4 Head {h00=0x0028, h01=0x0050, text=» PERF DEDISC,W1 ENTER JOB DEFINITION«, t00=0x002c, t01=0x0106}
0x45e4…45f2 Head {h00=0x000a, h01=0x0050, text=»TOTB35«, t00=0x002c, t01=0x0132}
0x45f2…4606 Head {h00=0x0010, h01=0x0050, text=» PERF DECLRN«, t00=0x002c, t01=0x0140}
0x4606…4634 Head {h00=0x002a, h01=0x0050, text=»TOTB40 IB DEBINW2,CANCBL,SERIOUS,ENTBL«, t00=0x002c, t01=0x0154}
0x4634…4664 Head {h00=0x002c, h01=0x0050, text=» CBNE DEBINW2,W8,TOTB50 JUMP IF NOT TOT «, t00=0x002c, t01=0x0182}
0x4664…4692 Head {h00=0x002a, h01=0x0050, text=» CBE BDPOIN(W5),W0,TOTB42 ALL VERIFIED«, t00=0x002d, t01=0x0022}
0x4692…46b2 Head {h00=0x001c, h01=0x0050, text=» PERF DELAST,W9,DEKTAB6 «, t00=0x002d, t01=0x0050}
0x46b2…46c4 Head {h00=0x000e, h01=0x0050, text=» B TOTB35 «, t00=0x002d, t01=0x0070}
0x46c4…46d2 Head {h00=0x000a, h01=0x0050, text=»TOTB42«, t00=0x002d, t01=0x0082}
0x46d2…46f8 Head {h00=0x0022, h01=0x0050, text=» B TOTB50 SHB UNIQUE STATEMENT«, t00=0x002d, t01=0x0090}
0x46f8…4728 Head {h00=0x002c, h01=0x0050, text=» PERF DELAST,W11,DEKTAB7 CONFIRM FREEZE «, t00=0x002d, t01=0x00b6}
0x4728…4756 Head {h00=0x002a, h01=0x0050, text=» IB DEBINW2,TOTB44,TOTB44,ENTBL,TOTB42«, t00=0x002d, t01=0x00e6}
0x4756…4778 Head {h00=0x001e, h01=0x0050, text=» SET BDAFRO ENTER PRESSED «, t00=0x002d, t01=0x0114}
0x4778…4790 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW2,W3«, t00=0x002d, t01=0x0136}
0x4790…47a0 Head {h00=0x000c, h01=0x0050, text=» B ENTBL«, t00=0x002d, t01=0x014e}
0x47a0…47ae Head {h00=0x000a, h01=0x0050, text=»TOTB44«, t00=0x002d, t01=0x015e}
0x47ae…47c8 Head {h00=0x0016, h01=0x0050, text=» MOVE DEBINW4,W24 «, t00=0x002d, t01=0x016c}
0x47c8…47e8 Head {h00=0x001c, h01=0x0050, text=» ERASE 0,DEBINW4,DEBINW4«, t00=0x002d, t01=0x0186}
0x47e8…47fa Head {h00=0x000e, h01=0x0050, text=» B TOTB35 «, t00=0x002e, t01=0x0016}
0x47fa…4808 Head {h00=0x000a, h01=0x0050, text=»TOTB50«, t00=0x002e, t01=0x0028}
0x4808…4820 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W0«, t00=0x002e, t01=0x0036}
0x4820…4838 Head {h00=0x0014, h01=0x0050, text=»TOTB60 PERF DERR«, t00=0x002e, t01=0x004e}
0x4838…484a Head {h00=0x000e, h01=0x0050, text=» B TOTB40 «, t00=0x002e, t01=0x0066}
0x484a…4858 Head {h00=0x000a, h01=0x0050, text=»ENTBL «, t00=0x002e, t01=0x0078}
0x4858…4876 Head {h00=0x001a, h01=0x0050, text=» SET BDABAL IN BALANCE«, t00=0x002e, t01=0x0086}
0x4876…4884 Head {h00=0x000a, h01=0x0050, text=»TOTB70«, t00=0x002e, t01=0x00a4}
0x4884…4898 Head {h00=0x0010, h01=0x0050, text=» CLEAR DOOLA«, t00=0x002e, t01=0x00b2}
0x4898…48cc Head {h00=0x0030, h01=0x0050, text=» CALL RESTOR,W0,W4,PWBDB4 RESTORE RBUF WB10 «, t00=0x002e, t01=0x00c6}
0x48cc…48e4 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW2,W1«, t00=0x002e, t01=0x00fa}
0x48e4…48f0 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x002e, t01=0x0112}
0x48f0…48fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x011e}
0x48fa…4908 Head {h00=0x000a, h01=0x0050, text=»CANCBL«, t00=0x002e, t01=0x0128}
0x4908…4916 Head {h00=0x000a, h01=0x0050, text=»CANBL1«, t00=0x002e, t01=0x0136}
0x4916…492a Head {h00=0x0010, h01=0x0050, text=» CLEAR DOOLA«, t00=0x002e, t01=0x0144}
0x492a…493c Head {h00=0x000e, h01=0x0050, text=» SET SOOL2«, t00=0x002e, t01=0x0158}
0x493c…4964 Head {h00=0x0024, h01=0x0050, text=» PERF DERECS,W7 GET LAST RECORD «, t00=0x002e, t01=0x016a}
0x4964…4978 (47, 0, 398) Head {h00=0x0010, h01=0x0050, text=» BOK CANBL3 «, t00=0x002f, t01=0x0004}
0x4978…498c Head {h00=0x0010, h01=0x0050, text=» BOFL RETU03«, t00=0x002f, t01=0x0018}
0x498c…49ac Head {h00=0x001c, h01=0x0050, text=» CBE DEBINW4,W13,TOTB14 «, t00=0x002f, t01=0x002c}
0x49ac…49be Head {h00=0x000e, h01=0x0050, text=» SET DOOLA«, t00=0x002f, t01=0x004c}
0x49be…49d0 Head {h00=0x000e, h01=0x0050, text=» B TOTB60 «, t00=0x002f, t01=0x005e}
0x49d0…49de Head {h00=0x000a, h01=0x0050, text=»CANBL3«, t00=0x002f, t01=0x0070}
0x49de…4a08 Head {h00=0x0026, h01=0x0050, text=» PERF DEVERC CLEAR IF VERIFY MODE «, t00=0x002f, t01=0x007e}
0x4a08…4a36 Head {h00=0x002a, h01=0x0050, text=» CBE NUMBER,=D'1',CANBL2 JUMP IF FIRST«, t00=0x002f, t01=0x00a8}
0x4a36…4a4e Head {h00=0x0014, h01=0x0050, text=» CLEAR DECHANGE «, t00=0x002f, t01=0x00d6}
0x4a4e…4a5e Head {h00=0x000c, h01=0x0050, text=» B DAT02«, t00=0x002f, t01=0x00ee}
0x4a5e…4a6c Head {h00=0x000a, h01=0x0050, text=»CANBL2«, t00=0x002f, t01=0x00fe}
0x4a6c…4a7c Head {h00=0x000c, h01=0x0050, text=» B DAT01«, t00=0x002f, t01=0x010c}
0x4a7c…4a8c Head {h00=0x000c, h01=0x0050, text=»SERIOUS «, t00=0x002f, t01=0x011c}
0x4a8c…4ab0 Head {h00=0x0020, h01=0x0050, text=» CLEAR BDABAL OUT OF BALANCE«, t00=0x002f, t01=0x012c}
0x4ab0…4ac2 Head {h00=0x000e, h01=0x0050, text=» B TOTB70 «, t00=0x002f, t01=0x0150}
0x4ac2…4ad0 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x002f, t01=0x0162}
0x4ad0…4ade Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002f, t01=0x0170}
0x4ade…4af2 Head {h00=0x0010, h01=0x0050, text=»DEVERS PROC «, t00=0x002f, t01=0x017e}
0x4af2…4b12 (48, 0, 400) Head {h00=0x001c, h01=0x0050, text=» CALL SETB,WORK(W11),W0 «, t00=0x0030, t01=0x0004}
0x4b12…4b32 Head {h00=0x001c, h01=0x0050, text=» CALL SETB,WORK(W12),W0 «, t00=0x0030, t01=0x0024}
0x4b32…4b46 Head {h00=0x0010, h01=0x0050, text=» SET VERIFM «, t00=0x0030, t01=0x0044}
0x4b46…4b52 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0030, t01=0x0058}
0x4b52…4b60 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0030, t01=0x0064}
0x4b60…4b74 Head {h00=0x0010, h01=0x0050, text=»DEVERC PROC «, t00=0x0030, t01=0x0072}
0x4b74…4b8a Head {h00=0x0012, h01=0x0050, text=» CLEAR VERIFM «, t00=0x0030, t01=0x0086}
0x4b8a…4b9c Head {h00=0x000e, h01=0x0050, text=» BZ DEVERE«, t00=0x0030, t01=0x009c}
0x4b9c…4bb6 Head {h00=0x0016, h01=0x0050, text=» MOVE WORK(W11),W0«, t00=0x0030, t01=0x00ae}
0x4bb6…4bd0 Head {h00=0x0016, h01=0x0050, text=» MOVE WORK(W12),W0«, t00=0x0030, t01=0x00c8}
0x4bd0…4bde Head {h00=0x000a, h01=0x0050, text=»DEVERE«, t00=0x0030, t01=0x00e2}
0x4bde…4bea Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0030, t01=0x00f0}
0x4bea…4bf8 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0030, t01=0x00fc}
0x4bf8…4c06 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x010a}
0x4c06…4c18 Head {h00=0x000e, h01=0x0050, text=»BELL FRMT «, t00=0x0030, t01=0x0118}
0x4c18…4c24 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0030, t01=0x012a}
0x4c24…4c3a Head {h00=0x0012, h01=0x0050, text=» FILLR X'07',1«, t00=0x0030, t01=0x0136}
0x4c3a…4c48 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0030, t01=0x014c}
0x4c48…4c5c Head {h00=0x0010, h01=0x0050, text=»FFETCH FRMT «, t00=0x0030, t01=0x015a}
0x4c5c…4c68 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0030, t01=0x016e}
0x4c68…4c8a Head {h00=0x001e, h01=0x0050, text=» FTEXT 'FETCHING FORMAT:' «, t00=0x0030, t01=0x017a}
0x4c8a…4ca0 Head {h00=0x0012, h01=0x0050, text=» FCOPY DEINPUT«, t00=0x0031, t01=0x000c}
0x4ca0…4cbc Head {h00=0x0018, h01=0x0050, text=» FTEXT ' FROM DISC.'«, t00=0x0031, t01=0x0022}
0x4cbc…4cc8 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0031, t01=0x003e}
0x4cc8…4cdc Head {h00=0x0010, h01=0x0050, text=» FKI 1,ALPHA«, t00=0x0031, t01=0x004a}
0x4cdc…4cf0 Head {h00=0x0010, h01=0x0050, text=» FCOPY HEX00«, t00=0x0031, t01=0x005e}
0x4cf0…4cfe Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0031, t01=0x0072}
0x4cfe…4d08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0080}
0x4d08…4d14 Head {h00=0x0008, h01=0x0004, text=» END«, t00=0x0031, t01=0x008a}
0x4d14…4d18 Head {h00=0x4004, h01=0x0000}
0x4d18…4d1c 00 31 00 96 ┆ 1 ┆
0x4d1c…4d24 (50, 1, 8) 20 04 00 00 00 32 00 04 ┆ 2 ┆
0x4d24…4d74 (51, 0, 400) 11 12 12 13 14 15 16 17 18 06 90 87 3f 19 41 8d 5f 95 30 22 87 d3 21 3c 0f 00 9f 22 d3 87 3f 1a 04 88 23 40 8e 54 07 30 25 00 50 39 57 03 49 99 34 36 88 01 08 30 03 17 21 8e 89 57 06 30 03 d5 21 8e 89 06 89 87 3a 0f 00 89 20 36 88 01 0a 68 ┆ ? A _ 0" !< " ? #@ T 0% P9W I 46 0 ! W 0 ! : 6 h┆
0x4d74…4dc4 95 89 8e 17 87 20 8e 57 08 68 95 89 8e d5 87 20 8e 38 1b 3f 1c 36 88 01 0e 30 22 87 17 21 3c 0f 00 9f 22 17 87 3f 1a 30 22 87 d5 21 3c 0f 00 9f 22 d5 87 3f 1a 28 87 20 03 00 87 92 30 3a 89 0b 00 0a 87 28 89 23 29 30 29 01 89 41 8b 00 86 20 ┆ W h 8 ? 6 0" !< " ? 0" !< " ? ( 0: ( #)0) A ┆
0x4dc4…4e14 68 0b 00 0a 87 86 89 55 20 21 06 90 86 3c 1c 00 89 20 68 95 89 90 0b 00 0a 87 20 90 38 1b 3f 1c 00 9f 22 0b 00 0a 87 3f 1a 06 84 20 3c 0f 00 e8 20 00 97 87 00 88 20 01 99 36 68 99 88 21 1b 8a 8b 21 50 08 00 88 20 00 e0 21 57 10 02 8b 21 6a ┆h U ! < h 8 ? " ? < 6h ! !P !W !j┆
0x4e14…4e64 88 21 21 1b 8a 8b 02 8b 21 00 e0 88 00 e6 97 01 99 38 66 e6 20 22 64 e6 22 21 55 20 64 e6 20 21 99 20 80 03 38 50 0f 20 e1 20 06 80 04 26 e1 89 9d 06 20 21 3f 19 00 8e 20 30 38 1b e1 28 2b 30 39 1b e1 20 2b 6a 8f 21 21 19 e1 31 6a 8e 21 21 ┆ !! ! 8f "d "!U d ! 8P & !? 08 (+09 +j !! 1j !!┆
0x4e64…4eb4 19 e1 32 04 e0 8f 02 e0 21 49 8e 07 30 25 00 50 2c 57 03 49 99 27 6a 87 21 21 1b e1 21 80 01 24 00 85 20 68 95 85 87 6f 20 87 50 18 18 88 20 55 02 e0 21 02 8f 21 06 8f 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 09 ┆ 2 !I 0% P,W I 'j !! ! $ h o P U ! ! ┆
0x4eb4…4f04 (52, 0, 400) 8e 39 1d 5f 20 00 9f 22 b0 e0 57 fc 00 e8 8f 80 04 26 e1 89 9d 06 20 20 3f 19 80 05 87 3f 19 30 19 95 39 1b 3f 1c 00 9f 22 e8 57 dc 40 67 40 6b 02 8b 21 41 69 6a 8d 21 21 1b 8a 8b 02 8b 21 3f 1e 00 93 24 40 6b 41 67 57 07 00 93 23 40 67 41 ┆ 9 _ " W & ? ? 0 9 ? " W @g@k !Aij !! !? $@kAgW #@gA┆
0x4f04…4f54 6b 40 69 02 8b 21 00 8f 20 6a 8f 21 21 1b 8a 8b 04 8f 12 02 8b 21 00 7f 93 55 6a 7f 93 20 8f 1b 8a 8b 02 8b 8f 3f 1e 01 88 35 30 0d 88 87 01 99 37 00 89 8b 68 1b 8a 89 88 99 20 21 54 3f 00 87 20 6a 89 21 21 95 20 21 89 33 04 29 89 34 03 00 ┆k@i ! j !! ! Uj ? 50 7 h !T? j !! ! 3 ) 4 ┆
0x4f54…4fa4 87 21 02 88 8b 00 89 87 68 95 89 21 1b 8a 8b 21 54 0c 02 87 21 20 87 90 37 02 8b 21 5f 19 00 89 8b 68 1b 8a 89 21 99 20 21 58 19 57 23 40 8e 54 0e 30 25 00 50 21 20 90 88 08 02 8b 88 57 83 49 99 15 00 89 20 02 88 8b 68 95 89 90 1b 8a 8b 90 ┆ ! h ! !T ! 7 !_ h ! !X W#@ T 0% P! W I h ┆
0x4fa4…4ff4 00 8b 88 50 a2 57 6b 00 7e 55 62 7e 20 88 1b 8a 8b 00 9f 22 7e 02 8b 88 40 8d 50 0a 30 17 9f 22 21 30 18 9f 22 22 36 85 03 07 0e 15 02 9f 21 9f 22 57 13 04 9f 21 9f 22 57 0c 08 9f 21 9f 22 57 05 0a 9f 21 9f 22 00 85 20 2c 8b 8c 0d 01 7e 39 ┆ P Wk ~Ub~ "~ @ P 0 "!0 ""6 ! "W ! "W ! "W ! " , ~9┆
0x4ff4…5044 68 7e 85 24 1b 8a 8b 21 38 1f 00 9f 22 95 06 9f 22 9f 21 36 84 02 04 08 50 3d 57 06 51 39 57 02 52 35 40 88 54 4c 20 e1 20 31 06 88 20 3c 20 02 e0 21 02 8f 21 22 8f 8e 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆h~ $ !8 " " !6 P=W Q9W R5@ TL 1 < ! !" ┆