|
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: 13998 (0x36ae)
Notes: pts_type(SC)
Names: »RGSUBS.SC«
└─⟦22f4dea89⟧ Bits:30009702 Philips computer tape "DOS_PTS_4.2_M_FL"
└─⟦this⟧ »NJ-AMT/RGSUBS.SC«
└─⟦dab19bdd7⟧ Bits:30009677 Philips computer tape "600218"
└─⟦this⟧ »NJ-AMT/RGSUBS.SC«
IDENT RGSUBS 831031 EV
DDUM KMD08
PDIV
ENTRY ENTER
ENTRY MODP
ENTRY KVIT
ENTRY LSTINT
ENTRY SUBTOT
ENTRY SUM
ENTRY DIVTR
EXT SETKRE
EXT SETDEB
EXT SLUT
EXT KORT
EXT CYCLR
EXT FRMTKV
EXT FRMXSP
EXT FRMTSP
EXT FRMXVO
EXT FRMXTA
EXT WRITVO
EXT WRITJT
EXT WRITLO
EXT WTALLY
EXT WCHECK
EXT LINOPT
EXT CRVO
EXT SPINF1
EXT SPLIN8
EXT GRASPV
EXT FLDTST
EXT CYOUT
EXT RAWRIT
INCLUDE EQUATE
EJECT
MODP PROC
**********
*
** MODP - INVERTS THE PREVIOUS TRANSACTION
** I.E. REVERSES THE VALUE
** AND SETS FLAG TO UPDATE ACCUMULATORS
** MUST NOT BE IN FIRST TRANBS
** ONLY IN KASSEFUNCTIONS
*
**********
TBF TTEORFLG,MODPNOK NOT CORRECT TRANS
MOVE GTRETUR,CBIN0
TBT GTREGFLG,MODPNOK MUST NOT BE FIRST TRANS
TBF GTKASSE,MODPNOK ONLY IN KASSEFUNCTIONS (1-12)
CLEAR GTLOKSPG
MOVE SPKEY,CBIN1
SET TTINVFLG
MUL GTDUPF(CBIN4),='-1' MULTIPLY BELOB BY -1
* SET BCPR/BLEV ACCORDING TO THE CONTENTS OF GTDUPF(2)
SET BCPR
CBL GTDUPF(CBIN2),=D'10000000',MODP10
SET BLEV
CBG GTDUPF(CBIN2),=D'3900000000',MODP20
CLEAR BLEV
B MODP20
MODP10
CLEAR BCPR
MODP20
PERF SLUT
CLEAR TTINVFLG
CLEAR BCPR
CLEAR BLEV
CBNE GTRETUR,CBIN3,MODP50
PERF KORT
MODP50
CMP CBIN0,CBIN0 OK, SET CR=0
RET
MODPNOK
CMP CBIN1,CBIN0 NOK, SET CR<>0
RET
PEND
EJECT
KVIT PROC
**********
*
** KVIT - WRITES AN EXTRA RECEIPT
** ONLY IN KASSEFUNCTIONS
*
**********
TBF TTEORFLG,KVITNOK NOT CORRECT TRANS
TBT GTREGFLG,KVITNOK MUST NOT BE FIRST TRANS
TBT GTCYFLG,KVITNOK NOT IN CYCLE
TBF GTKASSE,KVITNOK ONLY IN KASSEFUNCTIONS(1-12)
MOVE SPKEY,CBIN1
PERF WRITJT,=W'1' WRITE 'KVIT' ON JOURNAL
PERF WRITLO,CBIN1
MOVE TTCYM,=C'K'
PERF FRMTKV
PERF WRITVO WRITE RECEIPT
MOVE TTCYM,=C' '
CLEAR GTLOKSPG
CMP CBIN0,CBIN0 OK, SET CR =0
RET
KVITNOK
CMP CBIN1,CBIN0 NOK, SET CR<>0
RET
PEND
EJECT
ENTER PROC
**********
*
** ENTER - PERFORMS DIFFERENT CHECKS AFTER A PAGE HAS BEEN
** ENTERED ON SCREEN
*
** 1 ANY PAGE TWO ?
*
** 2 FOR TRANSTYPE 51,53, REPETITION OF PAGE 3 ?
*
** 3 FIELD DEPENDENCE TEST
*
** AND THEN PERFORM PROCEDURE SLUT, TO
** WRITE TO DISK AND WRITE RELEVANT RECEIPTS
*
**********
MOVE GTRETUR,CBIN0 SET RETURN CODE
TBT GTTYPE3,ENTY3
TBT GTTYPE2,ENTY2
* TYPE 1 - ONE PAGE TRANSACTION
ENTY1
PERF FLDTST TEST FIELD DEPENDENCE
BNOK ENTNOK
PERF SLUT OK
BNOK ENTNOK
TBT GTKORTFL,ENT01
CBE GTRETUR,=W'3',ENT01 IF LINE 91
MOVE GTRETUR,=W'1'
TBF CKTAUTO,ENTOK
CBNE GTREGDEX,=W'4',ENTOK
ENT01
PERF KORT TRANS 4: KONTOKORT
MOVE GTRETUR,=W'3' RESET SCREEN
CLEAR GTKORTFL
B ENTOK
* TYPE 2 - TWO PAGE TRANSACTION
ENTY2
CBNE GTPAGE,CBIN1,ENT10
* GET PAGE 2
TBT GTSLUTFL,ENTY1
SET GTSLUTFL
PERF FMTNXT,CBIN1
MOVE GTRETUR,=W'2'
B ENTOK
*
ENT10
PERF FLDTST
BNOK ENTNOK
PERF SLUT
BNOK ENTNOK
TBT GTKORTFL,ENT01
CBE GTRETUR,=W'3',ENT01
MOVE GTRETUR,=W'3'
B ENTOK
* TYPE 3 - THREE PAGE TRANSACTION
ENTY3
CBNE GTPAGE,CBIN1,ENT20
TBT GTSLUTFL,ENTY1
* AFTER PAGE 1, GET NEXT PAGE
PERF FMTNXT,CBIN2
MOVE GTRETUR,=W'2'
B ENTOK
*
ENT20
CBNE GTPAGE,CBIN2,ENT30
TBT GTSLUTFL,ENT30
* AFTER PAGE 2, GET LAST PAGE
PERF FMTNXT,CBIN3
MOVE GTRETUR,=W'2'
B ENTOK
ENT30
B ENT10
ENT40
* CORRECT PAGE 3
PERF SLUT
BNOK ENTNOK
CLEAR GTKORTFL
CBE GTSUM,=D'0',ENT50
MOVE GTPAGE,CBIN4
MOVE GTRETUR,=W'1'
B ENTWC
ENT50
* FINISHED
MOVE GTRETUR,=W'3'
ENTWC
PERF WCHECK,CBIN1
BNOK ENTNOK
ENT60
PERF FRMTSP FULL FORMAT
ENTOK
CMP CBIN0,CBIN0 OK, SET CR =0
RET
ENTNOK
CMP CBIN1,CBIN0 NOK, SET CR<>0
RET
PEND
EJECT
FMTNXT PROC FORMAL1
*******************
*
** FMTNXT - ATTACHES FORMATS FOR PAGE 2 AND 3
** TRANSTYPES 8,9,51 AND 53
** (DEX 8,9,21,23)
*
****-**************
MOVE GSWBIN1,FORMAL1 WHICH PAGE?
IB GSWBIN1,NXTATT,NXT20,NXT30
NXT20
MOVE GTPAGE,CBIN2
CBE GTREGDEX,CBIN8,NXT208
CBE GTREGDEX,CBIN9,NXT209
CBE GTREGDEX,=W'24',NXT251
B NXT253
NXT208
MOVE GSWBIN1,CBIN7
B NXTATT
NXT209
MOVE GSWBIN1,CBIN8
B NXTATT
NXT251
MOVE GSWBIN1,CBIN3
B NXTATT
NXT253
MOVE GSWBIN1,CBIN4
B NXTATT
NXT30
MOVE GTPAGE,CBIN3
CBE GTREGDEX,CBIN8,NXT308
CBE GTREGDEX,CBIN9,NXT309
CBE GTREGDEX,=W'24',NXT351
B NXT353
NXT308
MOVE GSWBIN1,CBIN1
B NXTATT
NXT309
MOVE GSWBIN1,CBIN2
B NXTATT
NXT351
MOVE GSWBIN1,CBIN5
B NXTATT
NXT353
MOVE GSWBIN1,CBIN6
NXTATT
PERF FRMXSP,GSWBIN1
RET
PEND
EJECT
LSTINT PROC
********************
** LSTINT - INITIATE LISTFUNCTION
********************
TBT GTCYFLG,LSTNOK
TBT TTLSTFLG,LSTEND
* FIRST TIME
SET TTSUMFLG
SET TTLSTFLG
MOVE GTSUM,=D'0' INITIATE SUM
PERF FRMXTA,CBIN1 GET HEADER FOR TALLY ROLL
PERF WTALLY WRITE ON TALLY ROLL
MOVE GTTEXT,=C'LISTE '
B LSTOK
* LAST TIME
LSTEND
WAIT KTALLY
MOVE GSWBCD6,GTSUM
MOVE GSWSTR9,=C'TOTAL '
PERF FRMXTA,CBIN2 GET TOTALLINE FOR TALLY
PERF WTALLY
ERASE 0,CBIN8,CBIN8
CLEAR TTLSTFLG
CLEAR TTSUMFLG
MOVE GTTEXT,=C' '
LSTOK
PERF SPINF1
CMP CBIN0,CBIN0 OK, SET CR=0
RET
LSTNOK
CMP CBIN1,CBIN0 NOK, SET CR<>0
RET
PEND
EJECT
SUBTOT PROC
*******************
*
** SUBTOT - SUBTOTAL
*
** LISTFUNCTION- WRITE SUBTOTAL ON TALLY
*
** CYCLEFUNCTION- SAVE CYCLE INFORMATION
** WRITE SUBTOTAL
** IN CYCLE-PAUSE-STATE
*
********************
MOVE GSWSTR9,=C'SUBTOTAL '
TBT TTLSTFLG,SUBTLST IN LIST FUNCTION
TBT GTCYFLG,SUBTCYC IN CYCLE
TBF GTSUMKEY,SUBTNOK IN SUM
* SUBTOTAL IN SUM
SET GTSUBFLG
PERF SUM
CLEAR GTSUBFLG
B SUBTOK10
* SET PAUSE IN CYCLE
SUBTCYC
PERF CYOUT,CBIN0
MOVE TTARKSAV,GTDUPF(CBIN9) SAVE ARKIV KNT NR
SET TTPSEFLG INDICATE BREAK
PERF FRMXVO,CBIN3 GET SUBTOT FORMAT
SET GTCYWRTF
PERF WRITVO WRITE SUBTOT LINE
WAIT KVOUCH
DSC0 KVOUCH,RLEAS RELEASE VOUCHER
MOVE GTCYSUM,GTSUM SAVE SUM
SUB TTLINNR,=D'4'
MOVE TTCYKPOS,TTLINNR SAVE LINNR
MOVE GTPSELIN,TTLINNR
MOVE GTCYIN,GTUWB INITIATE CYSET
SUB GTCYIN,CBIN1
MUL GTCYIN,CCYSIZE
ADD GTCYIN,CBIN1
MOVE GTCYOUT,GTCYIN
PERF CYCLR
B SUBTOK
* SUBTOTAL IN LIST
SUBTLST
WAIT KTALLY
MOVE GSWBCD6,GTSUM
PERF FRMXTA,CBIN3 GET FORMAT
PERF WTALLY WRITE ON TALLY ROLL
SUBTOK
ERASE 0,CBIN8,CBIN8 ERASE LINE 8
PERF SPINF1
SUBTOK10
CMP CBIN0,CBIN0 OK, SET CR=0
RET
SUBTNOK
CMP CBIN1,CBIN0 NOK, SET CR<>0
RET
PEND
EJECT
SUM PROC
********************
*
** SUM - PROCEDURE FOR SUMMING UP FOR ALL
** TRANSACTIONS FROM THE INITIATING
** POINT TO THE RELEASING.
** FIRST TIME: INITIATING
** LAST TIME: WRITE SUM ON VOUCHER
*
********************
TBT GTSUMKEY,SUM50
* FIRST TIME
PERF WRITJT,=W'3' WRITE START SUM FUNCTION
MOVE GSWBIN1,=W'28'
PERF WRITLO,GSWBIN1
SUM10
MOVE TTSUMMRK,=C'*'
SET GTSUMKEY
MOVE GTSUMST,TTLBNR
ADD GTSUMST,=D'1' INITIATE FIRST NUMBER
MOVE GTSUMCNT,=D'0' INITIATE SUM
B SUMOK
* LAST TIME
SUM50
PERF WRITJT,=W'4' WRITE SLUT SUM FUNCTION
MOVE GSWBIN1,=W'29'
PERF WRITLO,GSWBIN1
TBT GTSUBFLG,SUM60
MOVE TTSUMMRK,=C' '
CLEAR GTSUMKEY
SUM60
PERF SPLIN8,CBIN2,CBIN0 WRITE BILAG
TBF GTCYFLG,SUM70 IF IN CYCLE
DSC0 KVOUCH,RLEAS
MOVE GSWBCD5,TTLINNR SAVE LINNR
CLEAR TTTSTFLG
SUM70
PERF GRASPV
CLEAR GTSWFLAG
PERF LINOPT
BNOK SUM60
CBG GSWBIN1,=W'90',SUM75
CBNE GSWBIN1,=W'0',SUM80 DEFAULT LINE?
SUM75
MOVE TTLINNR,=D'6' SET LINE 26
SUM80
MOVE GSWBIN1,TTLINNR
DSC1 KVOUCH,POS,GSWBIN1
MOVE TTLINNR,GSWBCD5 RESTORE LINNR
PERF FRMXVO,CBIN7
EDWRT KVOUCH,GTSTRFMT
PERF CRVO
DSC0 .NW,KVOUCH,RLEAS
TBT GTSUBFLG,SUMOK10
TBT GTASUMFL,SUM10
SUMOK
PERF SPINF1
SUMOK10
CMP CBIN0,CBIN0 OK, SET CR=0
RET
PEND
EJECT
DIVTR PROC
********************
*
** DIVTR - SET OR CLEAR DIVTR FLAG
*
********************
TBT CTRVALG,DIVTRNOK
TBT GTDIVTR,DIVEND
* SET DIVTR
SET GTDIVTR
SET GTTRSEL
CBE TTDKDEX,=W'1',DIV10
PERF SETDEB
B DIVTROK
DIV10
PERF SETKRE
B DIVTROK
* CLEAR DIVTR
DIVEND
CLEAR GTDIVTR
MOVE TTSTYRDX,=W'1'
B DIVTROK
*
DIVTROK
CMP CBIN0,CBIN0 OK, SET CR=0
RET
DIVTRNOK
CMP CBIN1,CBIN0 NOK, SET CR<>0
RET
PEND
*
*
END
0x0000…0020 (0, 0, 400) Head {h00=0x001c, h01=0x0050, text=» IDENT RGSUBS 831031 EV «, t00=0x0000, t01=0x0004}
0x0020…003e Head {h00=0x001a, h01=0x0050, text=» DDUM KMD08«, t00=0x0000, t01=0x0024}
0x003e…0054 Head {h00=0x0012, h01=0x0050, text=» PDIV «, t00=0x0000, t01=0x0042}
0x0054…0072 Head {h00=0x001a, h01=0x0050, text=» ENTRY ENTER«, t00=0x0000, t01=0x0058}
0x0072…0090 Head {h00=0x001a, h01=0x0050, text=» ENTRY MODP «, t00=0x0000, t01=0x0076}
0x0090…00ae Head {h00=0x001a, h01=0x0050, text=» ENTRY KVIT «, t00=0x0000, t01=0x0094}
0x00ae…00ce Head {h00=0x001c, h01=0x0050, text=» ENTRY LSTINT «, t00=0x0000, t01=0x00b2}
0x00ce…00ee Head {h00=0x001c, h01=0x0050, text=» ENTRY SUBTOT «, t00=0x0000, t01=0x00d2}
0x00ee…0100 Head {h00=0x000e, h01=0x0050, text=» ENTRY SUM«, t00=0x0000, t01=0x00f2}
0x0100…0114 Head {h00=0x0010, h01=0x0050, text=» ENTRY DIVTR«, t00=0x0000, t01=0x0104}
0x0114…011c Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0118}
0x011c…0124 Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0120}
0x0124…012c Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0128}
0x012c…0140 Head {h00=0x0010, h01=0x0050, text=» EXT SETKRE «, t00=0x0000, t01=0x0130}
0x0140…0154 Head {h00=0x0010, h01=0x0050, text=» EXT SETDEB «, t00=0x0000, t01=0x0144}
0x0154…0166 Head {h00=0x000e, h01=0x0050, text=» EXT SLUT «, t00=0x0000, t01=0x0158}
0x0166…0178 Head {h00=0x000e, h01=0x0050, text=» EXT KORT «, t00=0x0000, t01=0x016a}
0x0178…018a Head {h00=0x000e, h01=0x0050, text=» EXT CYCLR«, t00=0x0000, t01=0x017c}
0x018a…019e Head {h00=0x0010, h01=0x0050, text=» EXT FRMTKV «, t00=0x0000, t01=0x018e}
0x019e…01b2 Head {h00=0x0010, h01=0x0050, text=» EXT FRMXSP «, t00=0x0001, t01=0x0012}
0x01b2…01c6 Head {h00=0x0010, h01=0x0050, text=» EXT FRMTSP «, t00=0x0001, t01=0x0026}
0x01c6…01da Head {h00=0x0010, h01=0x0050, text=» EXT FRMXVO «, t00=0x0001, t01=0x003a}
0x01da…01ee Head {h00=0x0010, h01=0x0050, text=» EXT FRMXTA «, t00=0x0001, t01=0x004e}
0x01ee…020e Head {h00=0x001c, h01=0x0050, text=» EXT WRITVO «, t00=0x0001, t01=0x0062}
0x020e…0222 Head {h00=0x0010, h01=0x0050, text=» EXT WRITJT «, t00=0x0001, t01=0x0082}
0x0222…0236 Head {h00=0x0010, h01=0x0050, text=» EXT WRITLO «, t00=0x0001, t01=0x0096}
0x0236…0256 Head {h00=0x001c, h01=0x0050, text=» EXT WTALLY «, t00=0x0001, t01=0x00aa}
0x0256…0276 Head {h00=0x001c, h01=0x0050, text=» EXT WCHECK «, t00=0x0001, t01=0x00ca}
0x0276…028a Head {h00=0x0010, h01=0x0050, text=» EXT LINOPT «, t00=0x0001, t01=0x00ea}
0x028a…029c Head {h00=0x000e, h01=0x0050, text=» EXT CRVO «, t00=0x0001, t01=0x00fe}
0x029c…02b0 Head {h00=0x0010, h01=0x0050, text=» EXT SPINF1 «, t00=0x0001, t01=0x0110}
0x02b0…02c4 Head {h00=0x0010, h01=0x0050, text=» EXT SPLIN8 «, t00=0x0001, t01=0x0124}
0x02c4…02d8 Head {h00=0x0010, h01=0x0050, text=» EXT GRASPV «, t00=0x0001, t01=0x0138}
0x02d8…02ec Head {h00=0x0010, h01=0x0050, text=» EXT FLDTST «, t00=0x0001, t01=0x014c}
0x02ec…02fe Head {h00=0x000e, h01=0x0050, text=» EXT CYOUT«, t00=0x0001, t01=0x0160}
0x02fe…0312 Head {h00=0x0010, h01=0x0050, text=» EXT RAWRIT «, t00=0x0001, t01=0x0172}
0x0312…031a Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x0186}
0x031a…0322 Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x018e}
0x0322…0342 Head {h00=0x001c, h01=0x0050, text=» INCLUDE EQUATE «, t00=0x0002, t01=0x0008}
0x0342…0350 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x0028}
0x0350…0366 Head {h00=0x0012, h01=0x0050, text=»MODP PROC «, t00=0x0002, t01=0x0036}
0x0366…0378 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0002, t01=0x004c}
0x0378…0382 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x005e}
0x0382…03ba Head {h00=0x0034, h01=0x0050, text=»** MODP - INVERTS THE PREVIOUS TRANSACTION«, t00=0x0002, t01=0x0068}
0x03ba…03e2 Head {h00=0x0024, h01=0x0050, text=»** I.E. REVERSES THE VALUE«, t00=0x0002, t01=0x00a0}
0x03e2…0418 Head {h00=0x0032, h01=0x0050, text=»** AND SETS FLAG TO UPDATE ACCUMULATORS«, t00=0x0002, t01=0x00c8}
0x0418…0448 Head {h00=0x002c, h01=0x0050, text=»** MUST NOT BE IN FIRST TRANBS «, t00=0x0002, t01=0x00fe}
0x0448…0472 Head {h00=0x0026, h01=0x0050, text=»** ONLY IN KASSEFUNCTIONS«, t00=0x0002, t01=0x012e}
0x0472…047c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0158}
0x047c…048e Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0002, t01=0x0162}
0x048e…04be Head {h00=0x002c, h01=0x0050, text=» TBF TTEORFLG,MODPNOK NOT CORRECT TRANS «, t00=0x0002, t01=0x0174}
0x04be…04da Head {h00=0x0018, h01=0x0050, text=» MOVE GTRETUR,CBIN0 «, t00=0x0003, t01=0x0014}
0x04da…0510 Head {h00=0x0032, h01=0x0050, text=» TBT GTREGFLG,MODPNOK MUST NOT BE FIRST TRANS «, t00=0x0003, t01=0x0030}
0x0510…054a Head {h00=0x0036, h01=0x0050, text=» TBF GTKASSE,MODPNOK ONLY IN KASSEFUNCTIONS (1-12)«, t00=0x0003, t01=0x0066}
0x054a…0562 Head {h00=0x0014, h01=0x0050, text=» CLEAR GTLOKSPG «, t00=0x0003, t01=0x00a0}
0x0562…057c Head {h00=0x0016, h01=0x0050, text=» MOVE SPKEY,CBIN1 «, t00=0x0003, t01=0x00b8}
0x057c…059c Head {h00=0x001c, h01=0x0050, text=» SET TTINVFLG «, t00=0x0003, t01=0x00d2}
0x059c…05e0 Head {h00=0x0040, h01=0x0050, text=» MUL GTDUPF(CBIN4),='-1' MULTIPLY BELOB BY -1 «, t00=0x0003, t01=0x00f2}
0x05e0…061e Head {h00=0x003a, h01=0x0050, text=»* SET BCPR/BLEV ACCORDING TO THE CONTENTS OF GTDUPF(2)«, t00=0x0003, t01=0x0136}
0x061e…0630 Head {h00=0x000e, h01=0x0050, text=» SET BCPR «, t00=0x0003, t01=0x0174}
0x0630…065e Head {h00=0x002a, h01=0x0050, text=» CBL GTDUPF(CBIN2),=D'10000000',MODP10«, t00=0x0003, t01=0x0186}
0x065e…0670 Head {h00=0x000e, h01=0x0050, text=» SET BLEV «, t00=0x0004, t01=0x0024}
0x0670…06a0 Head {h00=0x002c, h01=0x0050, text=» CBG GTDUPF(CBIN2),=D'3900000000',MODP20«, t00=0x0004, t01=0x0036}
0x06a0…06b4 Head {h00=0x0010, h01=0x0050, text=» CLEAR BLEV «, t00=0x0004, t01=0x0066}
0x06b4…06c6 Head {h00=0x000e, h01=0x0050, text=» B MODP20 «, t00=0x0004, t01=0x007a}
0x06c6…06d4 Head {h00=0x000a, h01=0x0050, text=»MODP10«, t00=0x0004, t01=0x008c}
0x06d4…06e8 Head {h00=0x0010, h01=0x0050, text=» CLEAR BCPR «, t00=0x0004, t01=0x009a}
0x06e8…06f6 Head {h00=0x000a, h01=0x0050, text=»MODP20«, t00=0x0004, t01=0x00ae}
0x06f6…0708 Head {h00=0x000e, h01=0x0050, text=» PERF SLUT«, t00=0x0004, t01=0x00bc}
0x0708…0720 Head {h00=0x0014, h01=0x0050, text=» CLEAR TTINVFLG «, t00=0x0004, t01=0x00ce}
0x0720…0734 Head {h00=0x0010, h01=0x0050, text=» CLEAR BCPR «, t00=0x0004, t01=0x00e6}
0x0734…0748 Head {h00=0x0010, h01=0x0050, text=» CLEAR BLEV «, t00=0x0004, t01=0x00fa}
0x0748…076a Head {h00=0x001e, h01=0x0050, text=» CBNE GTRETUR,CBIN3,MODP50«, t00=0x0004, t01=0x010e}
0x076a…077c Head {h00=0x000e, h01=0x0050, text=» PERF KORT«, t00=0x0004, t01=0x0130}
0x077c…078a Head {h00=0x000a, h01=0x0050, text=»MODP50«, t00=0x0004, t01=0x0142}
0x078a…07b0 Head {h00=0x0022, h01=0x0050, text=» CMP CBIN0,CBIN0 OK, SET CR=0 «, t00=0x0004, t01=0x0150}
0x07b0…07bc Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0004, t01=0x0176}
0x07bc…07cc Head {h00=0x000c, h01=0x0050, text=»MODPNOK «, t00=0x0004, t01=0x0182}
0x07cc…07f4 (5, 0, 400) Head {h00=0x0024, h01=0x0050, text=» CMP CBIN1,CBIN0 NOK, SET CR<>0 «, t00=0x0005, t01=0x0004}
0x07f4…0808 Head {h00=0x0010, h01=0x0050, text=» RET«, t00=0x0005, t01=0x002c}
0x0808…081e Head {h00=0x0012, h01=0x0050, text=» PEND «, t00=0x0005, t01=0x0040}
0x081e…0834 Head {h00=0x0012, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x0056}
0x0834…084a Head {h00=0x0012, h01=0x0050, text=»KVIT PROC «, t00=0x0005, t01=0x006c}
0x084a…085c Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0005, t01=0x0082}
0x085c…0866 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0094}
0x0866…0898 Head {h00=0x002e, h01=0x0050, text=»** KVIT - WRITES AN EXTRA RECEIPT «, t00=0x0005, t01=0x009e}
0x0898…08c2 Head {h00=0x0026, h01=0x0050, text=»** ONLY IN KASSEFUNCTIONS«, t00=0x0005, t01=0x00d0}
0x08c2…08cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00fa}
0x08cc…08de Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0005, t01=0x0104}
0x08de…090e Head {h00=0x002c, h01=0x0050, text=» TBF TTEORFLG,KVITNOK NOT CORRECT TRANS «, t00=0x0005, t01=0x0116}
0x090e…0944 Head {h00=0x0032, h01=0x0050, text=» TBT GTREGFLG,KVITNOK MUST NOT BE FIRST TRANS «, t00=0x0005, t01=0x0146}
0x0944…096e Head {h00=0x0026, h01=0x0050, text=» TBT GTCYFLG,KVITNOK NOT IN CYCLE «, t00=0x0005, t01=0x017c}
0x096e…09a8 Head {h00=0x0036, h01=0x0050, text=» TBF GTKASSE,KVITNOK ONLY IN KASSEFUNCTIONS(1-12) «, t00=0x0006, t01=0x0016}
0x09a8…09c2 Head {h00=0x0016, h01=0x0050, text=» MOVE SPKEY,CBIN1 «, t00=0x0006, t01=0x0050}
0x09c2…0a0e Head {h00=0x0048, h01=0x0050, text=» PERF WRITJT,=W'1' WRITE 'KVIT' ON JOURNAL«, t00=0x0006, t01=0x006a}
0x0a0e…0a28 Head {h00=0x0016, h01=0x0050, text=» PERF WRITLO,CBIN1«, t00=0x0006, t01=0x00b6}
0x0a28…0a42 Head {h00=0x0016, h01=0x0050, text=» MOVE TTCYM,=C'K' «, t00=0x0006, t01=0x00d0}
0x0a42…0a56 Head {h00=0x0010, h01=0x0050, text=» PERF FRMTKV«, t00=0x0006, t01=0x00ea}
0x0a56…0a78 Head {h00=0x001e, h01=0x0050, text=» PERF WRITVO WRITE RECEIPT«, t00=0x0006, t01=0x00fe}
0x0a78…0a92 Head {h00=0x0016, h01=0x0050, text=» MOVE TTCYM,=C' ' «, t00=0x0006, t01=0x0120}
0x0a92…0aaa Head {h00=0x0014, h01=0x0050, text=» CLEAR GTLOKSPG «, t00=0x0006, t01=0x013a}
0x0aaa…0ad0 Head {h00=0x0022, h01=0x0050, text=» CMP CBIN0,CBIN0 OK, SET CR =0«, t00=0x0006, t01=0x0152}
0x0ad0…0adc Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0006, t01=0x0178}
0x0adc…0aec Head {h00=0x000c, h01=0x0050, text=»KVITNOK «, t00=0x0006, t01=0x0184}
0x0aec…0b14 (7, 0, 400) Head {h00=0x0024, h01=0x0050, text=» CMP CBIN1,CBIN0 NOK, SET CR<>0 «, t00=0x0007, t01=0x0004}
0x0b14…0b28 Head {h00=0x0010, h01=0x0050, text=» RET«, t00=0x0007, t01=0x002c}
0x0b28…0b3e Head {h00=0x0012, h01=0x0050, text=» PEND «, t00=0x0007, t01=0x0040}
0x0b3e…0b54 Head {h00=0x0012, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x0056}
0x0b54…0b6a Head {h00=0x0012, h01=0x0050, text=»ENTER PROC «, t00=0x0007, t01=0x006c}
0x0b6a…0b7c Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0007, t01=0x0082}
0x0b7c…0b86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0094}
0x0b86…0bce Head {h00=0x0044, h01=0x0050, text=»** ENTER - PERFORMS DIFFERENT CHECKS AFTER A PAGE HAS BEEN«, t00=0x0007, t01=0x009e}
0x0bce…0bf0 Head {h00=0x001e, h01=0x0050, text=»** ENTERED ON SCREEN«, t00=0x0007, t01=0x00e6}
0x0bf0…0bfa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0108}
0x0bfa…0c20 Head {h00=0x0022, h01=0x0050, text=»** 1 ANY PAGE TWO ? «, t00=0x0007, t01=0x0112}
0x0c20…0c2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0138}
0x0c2a…0c6c Head {h00=0x003e, h01=0x0050, text=»** 2 FOR TRANSTYPE 51,53, REPETITION OF PAGE 3 ?«, t00=0x0007, t01=0x0142}
0x0c6c…0c76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0184}
0x0c76…0ca2 Head {h00=0x0028, h01=0x0050, text=»** 3 FIELD DEPENDENCE TEST«, t00=0x0007, t01=0x018e}
0x0ca2…0cac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x002a}
0x0cac…0ce0 Head {h00=0x0030, h01=0x0050, text=»** AND THEN PERFORM PROCEDURE SLUT, TO«, t00=0x0008, t01=0x0034}
0x0ce0…0d1a Head {h00=0x0036, h01=0x0050, text=»** WRITE TO DISK AND WRITE RELEVANT RECEIPTS«, t00=0x0008, t01=0x0068}
0x0d1a…0d24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00a2}
0x0d24…0d36 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0008, t01=0x00ac}
0x0d36…0d62 Head {h00=0x0028, h01=0x0050, text=» MOVE GTRETUR,CBIN0 SET RETURN CODE «, t00=0x0008, t01=0x00be}
0x0d62…0d7c Head {h00=0x0016, h01=0x0050, text=» TBT GTTYPE3,ENTY3«, t00=0x0008, t01=0x00ea}
0x0d7c…0d96 Head {h00=0x0016, h01=0x0050, text=» TBT GTTYPE2,ENTY2«, t00=0x0008, t01=0x0104}
0x0d96…0dbe Head {h00=0x0024, h01=0x0050, text=»* TYPE 1 - ONE PAGE TRANSACTION «, t00=0x0008, t01=0x011e}
0x0dbe…0dcc Head {h00=0x000a, h01=0x0050, text=»ENTY1 «, t00=0x0008, t01=0x0146}
0x0dcc…0df6 Head {h00=0x0026, h01=0x0050, text=» PERF FLDTST TEST FIELD DEPENDENCE«, t00=0x0008, t01=0x0154}
0x0df6…0e0a Head {h00=0x0010, h01=0x0050, text=» BNOK ENTNOK«, t00=0x0008, t01=0x017e}
0x0e0a…0e20 (9, 0, 400) Head {h00=0x0012, h01=0x0050, text=» PERF SLUT OK «, t00=0x0009, t01=0x0004}
0x0e20…0e34 Head {h00=0x0010, h01=0x0050, text=» BNOK ENTNOK«, t00=0x0009, t01=0x001a}
0x0e34…0e50 Head {h00=0x0018, h01=0x0050, text=» TBT GTKORTFL,ENT01 «, t00=0x0009, t01=0x002e}
0x0e50…0e7c Head {h00=0x0028, h01=0x0050, text=» CBE GTRETUR,=W'3',ENT01 IF LINE 91 «, t00=0x0009, t01=0x004a}
0x0e7c…0e98 Head {h00=0x0018, h01=0x0050, text=» MOVE GTRETUR,=W'1' «, t00=0x0009, t01=0x0076}
0x0e98…0eb2 Head {h00=0x0016, h01=0x0050, text=» TBF CKTAUTO,ENTOK«, t00=0x0009, t01=0x0092}
0x0eb2…0ed4 Head {h00=0x001e, h01=0x0050, text=» CBNE GTREGDEX,=W'4',ENTOK«, t00=0x0009, t01=0x00ac}
0x0ed4…0ee2 Head {h00=0x000a, h01=0x0050, text=»ENT01 «, t00=0x0009, t01=0x00ce}
0x0ee2…0f08 Head {h00=0x0022, h01=0x0050, text=» PERF KORT TRANS 4: KONTOKORT «, t00=0x0009, t01=0x00dc}
0x0f08…0f30 Head {h00=0x0024, h01=0x0050, text=» MOVE GTRETUR,=W'3' RESET SCREEN«, t00=0x0009, t01=0x0102}
0x0f30…0f48 Head {h00=0x0014, h01=0x0050, text=» CLEAR GTKORTFL «, t00=0x0009, t01=0x012a}
0x0f48…0f58 Head {h00=0x000c, h01=0x0050, text=» B ENTOK«, t00=0x0009, t01=0x0142}
0x0f58…0f80 Head {h00=0x0024, h01=0x0050, text=»* TYPE 2 - TWO PAGE TRANSACTION «, t00=0x0009, t01=0x0152}
0x0f80…0f8e Head {h00=0x000a, h01=0x0050, text=»ENTY2 «, t00=0x0009, t01=0x017a}
0x0f8e…0fae Head {h00=0x001c, h01=0x0050, text=» CBNE GTPAGE,CBIN1,ENT10«, t00=0x0009, t01=0x0188}
0x0fae…0fc6 Head {h00=0x0014, h01=0x0050, text=»* GET PAGE 2«, t00=0x000a, t01=0x0018}
0x0fc6…0fe2 Head {h00=0x0018, h01=0x0050, text=» TBT GTSLUTFL,ENTY1 «, t00=0x000a, t01=0x0030}
0x0fe2…0ff8 Head {h00=0x0012, h01=0x0050, text=» SET GTSLUTFL «, t00=0x000a, t01=0x004c}
0x0ff8…1012 Head {h00=0x0016, h01=0x0050, text=» PERF FMTNXT,CBIN1«, t00=0x000a, t01=0x0062}
0x1012…102e Head {h00=0x0018, h01=0x0050, text=» MOVE GTRETUR,=W'2' «, t00=0x000a, t01=0x007c}
0x102e…103e Head {h00=0x000c, h01=0x0050, text=» B ENTOK«, t00=0x000a, t01=0x0098}
0x103e…1048 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00a8}
0x1048…1056 Head {h00=0x000a, h01=0x0050, text=»ENT10 «, t00=0x000a, t01=0x00b2}
0x1056…106a Head {h00=0x0010, h01=0x0050, text=» PERF FLDTST«, t00=0x000a, t01=0x00c0}
0x106a…107e Head {h00=0x0010, h01=0x0050, text=» BNOK ENTNOK«, t00=0x000a, t01=0x00d4}
0x107e…1090 Head {h00=0x000e, h01=0x0050, text=» PERF SLUT«, t00=0x000a, t01=0x00e8}
0x1090…10a4 Head {h00=0x0010, h01=0x0050, text=» BNOK ENTNOK«, t00=0x000a, t01=0x00fa}
0x10a4…10c0 Head {h00=0x0018, h01=0x0050, text=» TBT GTKORTFL,ENT01 «, t00=0x000a, t01=0x010e}
0x10c0…10e0 Head {h00=0x001c, h01=0x0050, text=» CBE GTRETUR,=W'3',ENT01«, t00=0x000a, t01=0x012a}
0x10e0…10fc Head {h00=0x0018, h01=0x0050, text=» MOVE GTRETUR,=W'3' «, t00=0x000a, t01=0x014a}
0x10fc…110c Head {h00=0x000c, h01=0x0050, text=» B ENTOK«, t00=0x000a, t01=0x0166}
0x110c…1136 Head {h00=0x0026, h01=0x0050, text=»* TYPE 3 - THREE PAGE TRANSACTION «, t00=0x000a, t01=0x0176}
0x1136…1144 Head {h00=0x000a, h01=0x0050, text=»ENTY3 «, t00=0x000b, t01=0x0010}
0x1144…1164 Head {h00=0x001c, h01=0x0050, text=» CBNE GTPAGE,CBIN1,ENT20«, t00=0x000b, t01=0x001e}
0x1164…1180 Head {h00=0x0018, h01=0x0050, text=» TBT GTSLUTFL,ENTY1 «, t00=0x000b, t01=0x003e}
0x1180…11aa Head {h00=0x0026, h01=0x0050, text=»* AFTER PAGE 1, GET NEXT PAGE «, t00=0x000b, t01=0x005a}
0x11aa…11c4 Head {h00=0x0016, h01=0x0050, text=» PERF FMTNXT,CBIN2«, t00=0x000b, t01=0x0084}
0x11c4…11e0 Head {h00=0x0018, h01=0x0050, text=» MOVE GTRETUR,=W'2' «, t00=0x000b, t01=0x009e}
0x11e0…11f0 Head {h00=0x000c, h01=0x0050, text=» B ENTOK«, t00=0x000b, t01=0x00ba}
0x11f0…11fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00ca}
0x11fa…1208 Head {h00=0x000a, h01=0x0050, text=»ENT20 «, t00=0x000b, t01=0x00d4}
0x1208…1228 Head {h00=0x001c, h01=0x0050, text=» CBNE GTPAGE,CBIN2,ENT30«, t00=0x000b, t01=0x00e2}
0x1228…1244 Head {h00=0x0018, h01=0x0050, text=» TBT GTSLUTFL,ENT30 «, t00=0x000b, t01=0x0102}
0x1244…126e Head {h00=0x0026, h01=0x0050, text=»* AFTER PAGE 2, GET LAST PAGE «, t00=0x000b, t01=0x011e}
0x126e…1288 Head {h00=0x0016, h01=0x0050, text=» PERF FMTNXT,CBIN3«, t00=0x000b, t01=0x0148}
0x1288…12a4 Head {h00=0x0018, h01=0x0050, text=» MOVE GTRETUR,=W'2' «, t00=0x000b, t01=0x0162}
0x12a4…12b4 Head {h00=0x000c, h01=0x0050, text=» B ENTOK«, t00=0x000b, t01=0x017e}
0x12b4…12c2 Head {h00=0x000a, h01=0x0050, text=»ENT30 «, t00=0x000b, t01=0x018e}
0x12c2…12d4 Head {h00=0x000e, h01=0x0050, text=» B ENT10 «, t00=0x000c, t01=0x000c}
0x12d4…12e2 Head {h00=0x000a, h01=0x0050, text=»ENT40 «, t00=0x000c, t01=0x001e}
0x12e2…12fe Head {h00=0x0018, h01=0x0050, text=»* CORRECT PAGE 3«, t00=0x000c, t01=0x002c}
0x12fe…1310 Head {h00=0x000e, h01=0x0050, text=» PERF SLUT«, t00=0x000c, t01=0x0048}
0x1310…1324 Head {h00=0x0010, h01=0x0050, text=» BNOK ENTNOK«, t00=0x000c, t01=0x005a}
0x1324…133c Head {h00=0x0014, h01=0x0050, text=» CLEAR GTKORTFL «, t00=0x000c, t01=0x006e}
0x133c…135a Head {h00=0x001a, h01=0x0050, text=» CBE GTSUM,=D'0',ENT50«, t00=0x000c, t01=0x0086}
0x135a…1374 Head {h00=0x0016, h01=0x0050, text=» MOVE GTPAGE,CBIN4«, t00=0x000c, t01=0x00a4}
0x1374…1390 Head {h00=0x0018, h01=0x0050, text=» MOVE GTRETUR,=W'1' «, t00=0x000c, t01=0x00be}
0x1390…13a0 Head {h00=0x000c, h01=0x0050, text=» B ENTWC«, t00=0x000c, t01=0x00da}
0x13a0…13ae Head {h00=0x000a, h01=0x0050, text=»ENT50 «, t00=0x000c, t01=0x00ea}
0x13ae…13c4 Head {h00=0x0012, h01=0x0050, text=»* FINISHED«, t00=0x000c, t01=0x00f8}
0x13c4…13e0 Head {h00=0x0018, h01=0x0050, text=» MOVE GTRETUR,=W'3' «, t00=0x000c, t01=0x010e}
0x13e0…13ee Head {h00=0x000a, h01=0x0050, text=»ENTWC «, t00=0x000c, t01=0x012a}
0x13ee…1408 Head {h00=0x0016, h01=0x0050, text=» PERF WCHECK,CBIN1«, t00=0x000c, t01=0x0138}
0x1408…141c Head {h00=0x0010, h01=0x0050, text=» BNOK ENTNOK«, t00=0x000c, t01=0x0152}
0x141c…142a Head {h00=0x000a, h01=0x0050, text=»ENT60 «, t00=0x000c, t01=0x0166}
0x142a…144a Head {h00=0x001c, h01=0x0050, text=» PERF FRMTSP FULL FORMAT«, t00=0x000c, t01=0x0174}
0x144a…1458 (13, 0, 400) Head {h00=0x000a, h01=0x0050, text=»ENTOK «, t00=0x000d, t01=0x0004}
0x1458…147e Head {h00=0x0022, h01=0x0050, text=» CMP CBIN0,CBIN0 OK, SET CR =0«, t00=0x000d, t01=0x0012}
0x147e…148a Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000d, t01=0x0038}
0x148a…1498 Head {h00=0x000a, h01=0x0050, text=»ENTNOK«, t00=0x000d, t01=0x0044}
0x1498…14c0 Head {h00=0x0024, h01=0x0050, text=» CMP CBIN1,CBIN0 NOK, SET CR<>0 «, t00=0x000d, t01=0x0052}
0x14c0…14cc Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000d, t01=0x007a}
0x14cc…14e2 Head {h00=0x0012, h01=0x0050, text=» PEND «, t00=0x000d, t01=0x0086}
0x14e2…14f8 Head {h00=0x0012, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x009c}
0x14f8…1516 Head {h00=0x001a, h01=0x0050, text=»FMTNXT PROC FORMAL1 «, t00=0x000d, t01=0x00b2}
0x1516…1532 Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x000d, t01=0x00d0}
0x1532…153c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00ec}
0x153c…157a Head {h00=0x003a, h01=0x0050, text=»** FMTNXT - ATTACHES FORMATS FOR PAGE 2 AND 3 «, t00=0x000d, t01=0x00f6}
0x157a…15a6 Head {h00=0x0028, h01=0x0050, text=»** TRANSTYPES 8,9,51 AND 53 «, t00=0x000d, t01=0x0134}
0x15a6…15cc Head {h00=0x0022, h01=0x0050, text=»** (DEX 8,9,21,23)«, t00=0x000d, t01=0x0160}
0x15cc…15d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0186}
0x15d6…15f2 Head {h00=0x0018, h01=0x0050, text=»****-************** «, t00=0x000d, t01=0x0190}
0x15f2…161c Head {h00=0x0026, h01=0x0050, text=» MOVE GSWBIN1,FORMAL1 WHICH PAGE? «, t00=0x000e, t01=0x001c}
0x161c…1642 Head {h00=0x0022, h01=0x0050, text=» IB GSWBIN1,NXTATT,NXT20,NXT30«, t00=0x000e, t01=0x0046}
0x1642…1650 Head {h00=0x000a, h01=0x0050, text=»NXT20 «, t00=0x000e, t01=0x006c}
0x1650…166a Head {h00=0x0016, h01=0x0050, text=» MOVE GTPAGE,CBIN2«, t00=0x000e, t01=0x007a}
0x166a…168c Head {h00=0x001e, h01=0x0050, text=» CBE GTREGDEX,CBIN8,NXT208«, t00=0x000e, t01=0x0094}
0x168c…16ae Head {h00=0x001e, h01=0x0050, text=» CBE GTREGDEX,CBIN9,NXT209«, t00=0x000e, t01=0x00b6}
0x16ae…16d2 Head {h00=0x0020, h01=0x0050, text=» CBE GTREGDEX,=W'24',NXT251 «, t00=0x000e, t01=0x00d8}
0x16d2…16e4 Head {h00=0x000e, h01=0x0050, text=» B NXT253 «, t00=0x000e, t01=0x00fc}
0x16e4…16f2 Head {h00=0x000a, h01=0x0050, text=»NXT208«, t00=0x000e, t01=0x010e}
0x16f2…170e Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN7 «, t00=0x000e, t01=0x011c}
0x170e…1720 Head {h00=0x000e, h01=0x0050, text=» B NXTATT «, t00=0x000e, t01=0x0138}
0x1720…172e Head {h00=0x000a, h01=0x0050, text=»NXT209«, t00=0x000e, t01=0x014a}
0x172e…174a Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN8 «, t00=0x000e, t01=0x0158}
0x174a…175c Head {h00=0x000e, h01=0x0050, text=» B NXTATT «, t00=0x000e, t01=0x0174}
0x175c…176a Head {h00=0x000a, h01=0x0050, text=»NXT251«, t00=0x000e, t01=0x0186}
0x176a…1786 (15, 0, 398) Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN3 «, t00=0x000f, t01=0x0004}
0x1786…1798 Head {h00=0x000e, h01=0x0050, text=» B NXTATT «, t00=0x000f, t01=0x0020}
0x1798…17a6 Head {h00=0x000a, h01=0x0050, text=»NXT253«, t00=0x000f, t01=0x0032}
0x17a6…17c2 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN4 «, t00=0x000f, t01=0x0040}
0x17c2…17d4 Head {h00=0x000e, h01=0x0050, text=» B NXTATT «, t00=0x000f, t01=0x005c}
0x17d4…17e2 Head {h00=0x000a, h01=0x0050, text=»NXT30 «, t00=0x000f, t01=0x006e}
0x17e2…17fc Head {h00=0x0016, h01=0x0050, text=» MOVE GTPAGE,CBIN3«, t00=0x000f, t01=0x007c}
0x17fc…181e Head {h00=0x001e, h01=0x0050, text=» CBE GTREGDEX,CBIN8,NXT308«, t00=0x000f, t01=0x0096}
0x181e…1840 Head {h00=0x001e, h01=0x0050, text=» CBE GTREGDEX,CBIN9,NXT309«, t00=0x000f, t01=0x00b8}
0x1840…1864 Head {h00=0x0020, h01=0x0050, text=» CBE GTREGDEX,=W'24',NXT351 «, t00=0x000f, t01=0x00da}
0x1864…1876 Head {h00=0x000e, h01=0x0050, text=» B NXT353 «, t00=0x000f, t01=0x00fe}
0x1876…1884 Head {h00=0x000a, h01=0x0050, text=»NXT308«, t00=0x000f, t01=0x0110}
0x1884…18a0 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN1 «, t00=0x000f, t01=0x011e}
0x18a0…18b2 Head {h00=0x000e, h01=0x0050, text=» B NXTATT «, t00=0x000f, t01=0x013a}
0x18b2…18c0 Head {h00=0x000a, h01=0x0050, text=»NXT309«, t00=0x000f, t01=0x014c}
0x18c0…18dc Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN2 «, t00=0x000f, t01=0x015a}
0x18dc…18ee Head {h00=0x000e, h01=0x0050, text=» B NXTATT «, t00=0x000f, t01=0x0176}
0x18ee…18fc Head {h00=0x000a, h01=0x0050, text=»NXT351«, t00=0x000f, t01=0x0188}
0x18fc…1918 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN5 «, t00=0x0010, t01=0x0008}
0x1918…192a Head {h00=0x000e, h01=0x0050, text=» B NXTATT «, t00=0x0010, t01=0x0024}
0x192a…1938 Head {h00=0x000a, h01=0x0050, text=»NXT353«, t00=0x0010, t01=0x0036}
0x1938…1954 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN6 «, t00=0x0010, t01=0x0044}
0x1954…1962 Head {h00=0x000a, h01=0x0050, text=»NXTATT«, t00=0x0010, t01=0x0060}
0x1962…197e Head {h00=0x0018, h01=0x0050, text=» PERF FRMXSP,GSWBIN1«, t00=0x0010, t01=0x006e}
0x197e…1992 Head {h00=0x0010, h01=0x0050, text=» RET«, t00=0x0010, t01=0x008a}
0x1992…19a8 Head {h00=0x0012, h01=0x0050, text=» PEND «, t00=0x0010, t01=0x009e}
0x19a8…19be Head {h00=0x0012, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x00b4}
0x19be…19d2 Head {h00=0x0010, h01=0x0050, text=»LSTINT PROC «, t00=0x0010, t01=0x00ca}
0x19d2…19ee Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0010, t01=0x00de}
0x19ee…1a1e Head {h00=0x002c, h01=0x0050, text=»** LSTINT - INITIATE LISTFUNCTION «, t00=0x0010, t01=0x00fa}
0x1a1e…1a3a Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0010, t01=0x012a}
0x1a3a…1a56 Head {h00=0x0018, h01=0x0050, text=» TBT GTCYFLG,LSTNOK «, t00=0x0010, t01=0x0146}
0x1a56…1a7e Head {h00=0x0024, h01=0x0050, text=» TBT TTLSTFLG,LSTEND«, t00=0x0010, t01=0x0162}
0x1a7e…1a92 Head {h00=0x0010, h01=0x0050, text=»* FIRST TIME«, t00=0x0010, t01=0x018a}
0x1a92…1ab4 Head {h00=0x001e, h01=0x0050, text=» SET TTSUMFLG «, t00=0x0011, t01=0x000e}
0x1ab4…1ad6 Head {h00=0x001e, h01=0x0050, text=» SET TTLSTFLG «, t00=0x0011, t01=0x0030}
0x1ad6…1b16 Head {h00=0x003c, h01=0x0050, text=» MOVE GTSUM,=D'0' INITIATE SUM «, t00=0x0011, t01=0x0052}
0x1b16…1b62 Head {h00=0x0048, h01=0x0050, text=» PERF FRMXTA,CBIN1 GET HEADER FOR TALLY ROLL«, t00=0x0011, t01=0x0092}
0x1b62…1ba8 Head {h00=0x0042, h01=0x0050, text=» PERF WTALLY WRITE ON TALLY ROLL«, t00=0x0011, t01=0x00de}
0x1ba8…1bd2 Head {h00=0x0026, h01=0x0050, text=» MOVE GTTEXT,=C'LISTE '«, t00=0x0011, t01=0x0124}
0x1bd2…1be2 Head {h00=0x000c, h01=0x0050, text=» B LSTOK«, t00=0x0011, t01=0x014e}
0x1be2…1bf6 Head {h00=0x0010, h01=0x0050, text=»* LAST TIME «, t00=0x0011, t01=0x015e}
0x1bf6…1c04 Head {h00=0x000a, h01=0x0050, text=»LSTEND«, t00=0x0011, t01=0x0172}
0x1c04…1c18 Head {h00=0x0010, h01=0x0050, text=» WAIT KTALLY«, t00=0x0011, t01=0x0180}
0x1c18…1c34 (18, 0, 400) Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD6,GTSUM «, t00=0x0012, t01=0x0004}
0x1c34…1c56 Head {h00=0x001e, h01=0x0050, text=» MOVE GSWSTR9,=C'TOTAL '«, t00=0x0012, t01=0x0020}
0x1c56…1c88 Head {h00=0x002e, h01=0x0050, text=» PERF FRMXTA,CBIN2 GET TOTALLINE FOR TALLY«, t00=0x0012, t01=0x0042}
0x1c88…1ca8 Head {h00=0x001c, h01=0x0050, text=» PERF WTALLY «, t00=0x0012, t01=0x0074}
0x1ca8…1cc4 Head {h00=0x0018, h01=0x0050, text=» ERASE 0,CBIN8,CBIN8«, t00=0x0012, t01=0x0094}
0x1cc4…1ce6 Head {h00=0x001e, h01=0x0050, text=» CLEAR TTLSTFLG «, t00=0x0012, t01=0x00b0}
0x1ce6…1d08 Head {h00=0x001e, h01=0x0050, text=» CLEAR TTSUMFLG «, t00=0x0012, t01=0x00d2}
0x1d08…1d2e Head {h00=0x0022, h01=0x0050, text=» MOVE GTTEXT,=C' ' «, t00=0x0012, t01=0x00f4}
0x1d2e…1d3c Head {h00=0x000a, h01=0x0050, text=»LSTOK «, t00=0x0012, t01=0x011a}
0x1d3c…1d50 Head {h00=0x0010, h01=0x0050, text=» PERF SPINF1«, t00=0x0012, t01=0x0128}
0x1d50…1d76 Head {h00=0x0022, h01=0x0050, text=» CMP CBIN0,CBIN0 OK, SET CR=0 «, t00=0x0012, t01=0x013c}
0x1d76…1d82 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0012, t01=0x0162}
0x1d82…1d90 Head {h00=0x000a, h01=0x0050, text=»LSTNOK«, t00=0x0012, t01=0x016e}
0x1d90…1db8 Head {h00=0x0024, h01=0x0050, text=» CMP CBIN1,CBIN0 NOK, SET CR<>0 «, t00=0x0012, t01=0x017c}
0x1db8…1dcc Head {h00=0x0010, h01=0x0050, text=» RET«, t00=0x0013, t01=0x0014}
0x1dcc…1de2 Head {h00=0x0012, h01=0x0050, text=» PEND «, t00=0x0013, t01=0x0028}
0x1de2…1df8 Head {h00=0x0012, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x003e}
0x1df8…1e0e Head {h00=0x0012, h01=0x0050, text=»SUBTOT PROC «, t00=0x0013, t01=0x0054}
0x1e0e…1e2a Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x0013, t01=0x006a}
0x1e2a…1e34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0086}
0x1e34…1e56 Head {h00=0x001e, h01=0x0050, text=»** SUBTOT - SUBTOTAL«, t00=0x0013, t01=0x0090}
0x1e56…1e60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00b2}
0x1e60…1e9a Head {h00=0x0036, h01=0x0050, text=»** LISTFUNCTION- WRITE SUBTOTAL ON TALLY «, t00=0x0013, t01=0x00bc}
0x1e9a…1ea4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00f6}
0x1ea4…1eda Head {h00=0x0032, h01=0x0050, text=»** CYCLEFUNCTION- SAVE CYCLE INFORMATION«, t00=0x0013, t01=0x0100}
0x1eda…1f02 Head {h00=0x0024, h01=0x0050, text=»** WRITE SUBTOTAL «, t00=0x0013, t01=0x0136}
0x1f02…1f30 Head {h00=0x002a, h01=0x0050, text=»** IN CYCLE-PAUSE-STATE «, t00=0x0013, t01=0x015e}
0x1f30…1f3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x018c}
0x1f3a…1f56 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0014, t01=0x0008}
0x1f56…1f7a Head {h00=0x0020, h01=0x0050, text=» MOVE GSWSTR9,=C'SUBTOTAL ' «, t00=0x0014, t01=0x0024}
0x1f7a…1fbe Head {h00=0x0040, h01=0x0050, text=» TBT TTLSTFLG,SUBTLST IN LIST FUNCTION «, t00=0x0014, t01=0x0048}
0x1fbe…1fe4 Head {h00=0x0022, h01=0x0050, text=» TBT GTCYFLG,SUBTCYC IN CYCLE «, t00=0x0014, t01=0x008c}
0x1fe4…2008 Head {h00=0x0020, h01=0x0050, text=» TBF GTSUMKEY,SUBTNOK IN SUM«, t00=0x0014, t01=0x00b2}
0x2008…2022 Head {h00=0x0016, h01=0x0050, text=»* SUBTOTAL IN SUM «, t00=0x0014, t01=0x00d6}
0x2022…2038 Head {h00=0x0012, h01=0x0050, text=» SET GTSUBFLG «, t00=0x0014, t01=0x00f0}
0x2038…204a Head {h00=0x000e, h01=0x0050, text=» PERF SUM «, t00=0x0014, t01=0x0106}
0x204a…2062 Head {h00=0x0014, h01=0x0050, text=» CLEAR GTSUBFLG «, t00=0x0014, t01=0x0118}
0x2062…2076 Head {h00=0x0010, h01=0x0050, text=» B SUBTOK10 «, t00=0x0014, t01=0x0130}
0x2076…2092 Head {h00=0x0018, h01=0x0050, text=»* SET PAUSE IN CYCLE«, t00=0x0014, t01=0x0144}
0x2092…20a2 Head {h00=0x000c, h01=0x0050, text=»SUBTCYC «, t00=0x0014, t01=0x0160}
0x20a2…20bc Head {h00=0x0016, h01=0x0050, text=» PERF CYOUT,CBIN0 «, t00=0x0014, t01=0x0170}
0x20bc…20f2 Head {h00=0x0032, h01=0x0050, text=» MOVE TTARKSAV,GTDUPF(CBIN9) SAVE ARKIV KNT NR«, t00=0x0014, t01=0x018a}
0x20f2…2134 Head {h00=0x003e, h01=0x0050, text=» SET TTPSEFLG INDICATE BREAK «, t00=0x0015, t01=0x0030}
0x2134…2160 Head {h00=0x0028, h01=0x0050, text=» PERF FRMXVO,CBIN3 GET SUBTOT FORMAT«, t00=0x0015, t01=0x0072}
0x2160…2176 Head {h00=0x0012, h01=0x0050, text=» SET GTCYWRTF «, t00=0x0015, t01=0x009e}
0x2176…21ba Head {h00=0x0040, h01=0x0050, text=» PERF WRITVO WRITE SUBTOT LINE«, t00=0x0015, t01=0x00b4}
0x21ba…21ce Head {h00=0x0010, h01=0x0050, text=» WAIT KVOUCH«, t00=0x0015, t01=0x00f8}
0x21ce…2212 Head {h00=0x0040, h01=0x0050, text=» DSC0 KVOUCH,RLEAS RELEASE VOUCHER«, t00=0x0015, t01=0x010c}
0x2212…224e Head {h00=0x0038, h01=0x0050, text=» MOVE GTCYSUM,GTSUM SAVE SUM «, t00=0x0015, t01=0x0150}
0x224e…2268 Head {h00=0x0016, h01=0x0050, text=» SUB TTLINNR,=D'4'«, t00=0x0015, t01=0x018c}
0x2268…22a6 Head {h00=0x003a, h01=0x0050, text=» MOVE TTCYKPOS,TTLINNR SAVE LINNR «, t00=0x0016, t01=0x0016}
0x22a6…22c4 Head {h00=0x001a, h01=0x0050, text=» MOVE GTPSELIN,TTLINNR«, t00=0x0016, t01=0x0054}
0x22c4…22ee Head {h00=0x0026, h01=0x0050, text=» MOVE GTCYIN,GTUWB INITIATE CYSET «, t00=0x0016, t01=0x0072}
0x22ee…2308 Head {h00=0x0016, h01=0x0050, text=» SUB GTCYIN,CBIN1 «, t00=0x0016, t01=0x009c}
0x2308…2324 Head {h00=0x0018, h01=0x0050, text=» MUL GTCYIN,CCYSIZE «, t00=0x0016, t01=0x00b6}
0x2324…233e Head {h00=0x0016, h01=0x0050, text=» ADD GTCYIN,CBIN1 «, t00=0x0016, t01=0x00d2}
0x233e…235a Head {h00=0x0018, h01=0x0050, text=» MOVE GTCYOUT,GTCYIN«, t00=0x0016, t01=0x00ec}
0x235a…236e Head {h00=0x0010, h01=0x0050, text=» PERF CYCLR «, t00=0x0016, t01=0x0108}
0x236e…2380 Head {h00=0x000e, h01=0x0050, text=» B SUBTOK «, t00=0x0016, t01=0x011c}
0x2380…239a Head {h00=0x0016, h01=0x0050, text=»* SUBTOTAL IN LIST«, t00=0x0016, t01=0x012e}
0x239a…23aa Head {h00=0x000c, h01=0x0050, text=»SUBTLST «, t00=0x0016, t01=0x0148}
0x23aa…23be Head {h00=0x0010, h01=0x0050, text=» WAIT KTALLY«, t00=0x0016, t01=0x0158}
0x23be…23da Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD6,GTSUM «, t00=0x0016, t01=0x016c}
0x23da…2400 Head {h00=0x0022, h01=0x0050, text=» PERF FRMXTA,CBIN3 GET FORMAT «, t00=0x0016, t01=0x0188}
0x2400…2446 Head {h00=0x0042, h01=0x0050, text=» PERF WTALLY WRITE ON TALLY ROLL«, t00=0x0017, t01=0x001e}
0x2446…2454 Head {h00=0x000a, h01=0x0050, text=»SUBTOK«, t00=0x0017, t01=0x0064}
0x2454…247e Head {h00=0x0026, h01=0x0050, text=» ERASE 0,CBIN8,CBIN8 ERASE LINE 8 «, t00=0x0017, t01=0x0072}
0x247e…2492 Head {h00=0x0010, h01=0x0050, text=» PERF SPINF1«, t00=0x0017, t01=0x009c}
0x2492…24a2 Head {h00=0x000c, h01=0x0050, text=»SUBTOK10«, t00=0x0017, t01=0x00b0}
0x24a2…24c8 Head {h00=0x0022, h01=0x0050, text=» CMP CBIN0,CBIN0 OK, SET CR=0 «, t00=0x0017, t01=0x00c0}
0x24c8…24d4 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0017, t01=0x00e6}
0x24d4…24e4 Head {h00=0x000c, h01=0x0050, text=»SUBTNOK «, t00=0x0017, t01=0x00f2}
0x24e4…250c Head {h00=0x0024, h01=0x0050, text=» CMP CBIN1,CBIN0 NOK, SET CR<>0 «, t00=0x0017, t01=0x0102}
0x250c…2520 Head {h00=0x0010, h01=0x0050, text=» RET «, t00=0x0017, t01=0x012a}
0x2520…252e Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0017, t01=0x013e}
0x252e…253c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0017, t01=0x014c}
0x253c…254c Head {h00=0x000c, h01=0x0050, text=»SUM PROC«, t00=0x0017, t01=0x015a}
0x254c…2568 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0017, t01=0x016a}
0x2568…2572 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0186}
0x2572…25ac Head {h00=0x0036, h01=0x0050, text=»** SUM - PROCEDURE FOR SUMMING UP FOR ALL «, t00=0x0017, t01=0x0190}
0x25ac…25e0 Head {h00=0x0030, h01=0x0050, text=»** TRANSACTIONS FROM THE INITIATING «, t00=0x0018, t01=0x003a}
0x25e0…260a Head {h00=0x0026, h01=0x0050, text=»** POINT TO THE RELEASING.«, t00=0x0018, t01=0x006e}
0x260a…2634 Head {h00=0x0026, h01=0x0050, text=»** FIRST TIME: INITIATING «, t00=0x0018, t01=0x0098}
0x2634…2668 Head {h00=0x0030, h01=0x0050, text=»** LAST TIME: WRITE SUM ON VOUCHER «, t00=0x0018, t01=0x00c2}
0x2668…2672 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00f6}
0x2672…268e Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0018, t01=0x0100}
0x268e…26aa Head {h00=0x0018, h01=0x0050, text=» TBT GTSUMKEY,SUM50 «, t00=0x0018, t01=0x011c}
0x26aa…26c2 Head {h00=0x0014, h01=0x0050, text=»* FIRST TIME«, t00=0x0018, t01=0x0138}
0x26c2…26f6 Head {h00=0x0030, h01=0x0050, text=» PERF WRITJT,=W'3' WRITE START SUM FUNCTION «, t00=0x0018, t01=0x0150}
0x26f6…2712 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'28'«, t00=0x0018, t01=0x0184}
0x2712…272e Head {h00=0x0018, h01=0x0050, text=» PERF WRITLO,GSWBIN1«, t00=0x0019, t01=0x0010}
0x272e…273c Head {h00=0x000a, h01=0x0050, text=»SUM10 «, t00=0x0019, t01=0x002c}
0x273c…2758 Head {h00=0x0018, h01=0x0050, text=» MOVE TTSUMMRK,=C'*'«, t00=0x0019, t01=0x003a}
0x2758…276e Head {h00=0x0012, h01=0x0050, text=» SET GTSUMKEY «, t00=0x0019, t01=0x0056}
0x276e…278a Head {h00=0x0018, h01=0x0050, text=» MOVE GTSUMST,TTLBNR«, t00=0x0019, t01=0x006c}
0x278a…27ba Head {h00=0x002c, h01=0x0050, text=» ADD GTSUMST,=D'1' INITIATE FIRST NUMBER«, t00=0x0019, t01=0x0088}
0x27ba…27e4 Head {h00=0x0026, h01=0x0050, text=» MOVE GTSUMCNT,=D'0' INITIATE SUM «, t00=0x0019, t01=0x00b8}
0x27e4…27f4 Head {h00=0x000c, h01=0x0050, text=» B SUMOK«, t00=0x0019, t01=0x00e2}
0x27f4…280c Head {h00=0x0014, h01=0x0050, text=»* LAST TIME «, t00=0x0019, t01=0x00f2}
0x280c…281a Head {h00=0x000a, h01=0x0050, text=»SUM50 «, t00=0x0019, t01=0x010a}
0x281a…284c Head {h00=0x002e, h01=0x0050, text=» PERF WRITJT,=W'4' WRITE SLUT SUM FUNCTION«, t00=0x0019, t01=0x0118}
0x284c…2868 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'29'«, t00=0x0019, t01=0x014a}
0x2868…2884 Head {h00=0x0018, h01=0x0050, text=» PERF WRITLO,GSWBIN1«, t00=0x0019, t01=0x0166}
0x2884…28a0 Head {h00=0x0018, h01=0x0050, text=» TBT GTSUBFLG,SUM60 «, t00=0x0019, t01=0x0182}
0x28a0…28bc Head {h00=0x0018, h01=0x0050, text=» MOVE TTSUMMRK,=C' '«, t00=0x001a, t01=0x000e}
0x28bc…28d4 Head {h00=0x0014, h01=0x0050, text=» CLEAR GTSUMKEY «, t00=0x001a, t01=0x002a}
0x28d4…28e2 Head {h00=0x000a, h01=0x0050, text=»SUM60 «, t00=0x001a, t01=0x0042}
0x28e2…290e Head {h00=0x0028, h01=0x0050, text=» PERF SPLIN8,CBIN2,CBIN0 WRITE BILAG«, t00=0x001a, t01=0x0050}
0x290e…2934 Head {h00=0x0022, h01=0x0050, text=» TBF GTCYFLG,SUM70 IF IN CYCLE«, t00=0x001a, t01=0x007c}
0x2934…294e Head {h00=0x0016, h01=0x0050, text=» DSC0 KVOUCH,RLEAS«, t00=0x001a, t01=0x00a2}
0x294e…2976 Head {h00=0x0024, h01=0x0050, text=» MOVE GSWBCD5,TTLINNR SAVE LINNR«, t00=0x001a, t01=0x00bc}
0x2976…298e Head {h00=0x0014, h01=0x0050, text=» CLEAR TTTSTFLG «, t00=0x001a, t01=0x00e4}
0x298e…299c Head {h00=0x000a, h01=0x0050, text=»SUM70 «, t00=0x001a, t01=0x00fc}
0x299c…29b0 Head {h00=0x0010, h01=0x0050, text=» PERF GRASPV«, t00=0x001a, t01=0x010a}
0x29b0…29c8 Head {h00=0x0014, h01=0x0050, text=» CLEAR GTSWFLAG «, t00=0x001a, t01=0x011e}
0x29c8…29dc Head {h00=0x0010, h01=0x0050, text=» PERF LINOPT«, t00=0x001a, t01=0x0136}
0x29dc…29f0 Head {h00=0x0010, h01=0x0050, text=» BNOK SUM60 «, t00=0x001a, t01=0x014a}
0x29f0…2a12 Head {h00=0x001e, h01=0x0050, text=» CBG GSWBIN1,=W'90',SUM75 «, t00=0x001a, t01=0x015e}
0x2a12…2a42 Head {h00=0x002c, h01=0x0050, text=» CBNE GSWBIN1,=W'0',SUM80 DEFAULT LINE? «, t00=0x001a, t01=0x0180}
0x2a42…2a50 Head {h00=0x000a, h01=0x0050, text=»SUM75 «, t00=0x001b, t01=0x0020}
0x2a50…2a78 Head {h00=0x0024, h01=0x0050, text=» MOVE TTLINNR,=D'6' SET LINE 26 «, t00=0x001b, t01=0x002e}
0x2a78…2a86 Head {h00=0x000a, h01=0x0050, text=»SUM80 «, t00=0x001b, t01=0x0056}
0x2a86…2aa4 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,TTLINNR «, t00=0x001b, t01=0x0064}
0x2aa4…2ac4 Head {h00=0x001c, h01=0x0050, text=» DSC1 KVOUCH,POS,GSWBIN1«, t00=0x001b, t01=0x0082}
0x2ac4…2af0 Head {h00=0x0028, h01=0x0050, text=» MOVE TTLINNR,GSWBCD5 RESTORE LINNR «, t00=0x001b, t01=0x00a2}
0x2af0…2b0a Head {h00=0x0016, h01=0x0050, text=» PERF FRMXVO,CBIN7«, t00=0x001b, t01=0x00ce}
0x2b0a…2b28 Head {h00=0x001a, h01=0x0050, text=» EDWRT KVOUCH,GTSTRFMT«, t00=0x001b, t01=0x00e8}
0x2b28…2b3a Head {h00=0x000e, h01=0x0050, text=» PERF CRVO«, t00=0x001b, t01=0x0106}
0x2b3a…2b58 Head {h00=0x001a, h01=0x0050, text=» DSC0 .NW,KVOUCH,RLEAS«, t00=0x001b, t01=0x0118}
0x2b58…2b76 Head {h00=0x001a, h01=0x0050, text=» TBT GTSUBFLG,SUMOK10 «, t00=0x001b, t01=0x0136}
0x2b76…2b92 Head {h00=0x0018, h01=0x0050, text=» TBT GTASUMFL,SUM10 «, t00=0x001b, t01=0x0154}
0x2b92…2ba0 Head {h00=0x000a, h01=0x0050, text=»SUMOK «, t00=0x001b, t01=0x0170}
0x2ba0…2bb4 Head {h00=0x0010, h01=0x0050, text=» PERF SPINF1«, t00=0x001b, t01=0x017e}
0x2bb4…2bc4 (28, 0, 398) Head {h00=0x000c, h01=0x0050, text=»SUMOK10 «, t00=0x001c, t01=0x0004}
0x2bc4…2bea Head {h00=0x0022, h01=0x0050, text=» CMP CBIN0,CBIN0 OK, SET CR=0 «, t00=0x001c, t01=0x0014}
0x2bea…2bf6 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001c, t01=0x003a}
0x2bf6…2c04 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x001c, t01=0x0046}
0x2c04…2c12 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001c, t01=0x0054}
0x2c12…2c24 Head {h00=0x000e, h01=0x0050, text=»DIVTR PROC«, t00=0x001c, t01=0x0062}
0x2c24…2c40 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x001c, t01=0x0074}
0x2c40…2c4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0090}
0x2c4a…2c7c Head {h00=0x002e, h01=0x0050, text=»** DIVTR - SET OR CLEAR DIVTR FLAG«, t00=0x001c, t01=0x009a}
0x2c7c…2c86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00cc}
0x2c86…2ca2 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x001c, t01=0x00d6}
0x2ca2…2cc0 Head {h00=0x001a, h01=0x0050, text=» TBT CTRVALG,DIVTRNOK «, t00=0x001c, t01=0x00f2}
0x2cc0…2cdc Head {h00=0x0018, h01=0x0050, text=» TBT GTDIVTR,DIVEND «, t00=0x001c, t01=0x0110}
0x2cdc…2cfa Head {h00=0x001a, h01=0x0050, text=»* SET DIVTR «, t00=0x001c, t01=0x012c}
0x2cfa…2d0e Head {h00=0x0010, h01=0x0050, text=» SET GTDIVTR«, t00=0x001c, t01=0x014a}
0x2d0e…2d22 Head {h00=0x0010, h01=0x0050, text=» SET GTTRSEL«, t00=0x001c, t01=0x015e}
0x2d22…2d42 Head {h00=0x001c, h01=0x0050, text=» CBE TTDKDEX,=W'1',DIV10«, t00=0x001c, t01=0x0172}
0x2d42…2d56 (29, 0, 396) Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x001d, t01=0x0004}
0x2d56…2d68 Head {h00=0x000e, h01=0x0050, text=» B DIVTROK«, t00=0x001d, t01=0x0018}
0x2d68…2d76 Head {h00=0x000a, h01=0x0050, text=»DIV10 «, t00=0x001d, t01=0x002a}
0x2d76…2d8a Head {h00=0x0010, h01=0x0050, text=» PERF SETKRE«, t00=0x001d, t01=0x0038}
0x2d8a…2d9c Head {h00=0x000e, h01=0x0050, text=» B DIVTROK«, t00=0x001d, t01=0x004c}
0x2d9c…2db6 Head {h00=0x0016, h01=0x0050, text=»* CLEAR DIVTR «, t00=0x001d, t01=0x005e}
0x2db6…2dc4 Head {h00=0x000a, h01=0x0050, text=»DIVEND«, t00=0x001d, t01=0x0078}
0x2dc4…2dda Head {h00=0x0012, h01=0x0050, text=» CLEAR GTDIVTR«, t00=0x001d, t01=0x0086}
0x2dda…2df6 Head {h00=0x0018, h01=0x0050, text=» MOVE TTSTYRDX,=W'1'«, t00=0x001d, t01=0x009c}
0x2df6…2e08 Head {h00=0x000e, h01=0x0050, text=» B DIVTROK«, t00=0x001d, t01=0x00b8}
0x2e08…2e12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00ca}
0x2e12…2e22 Head {h00=0x000c, h01=0x0050, text=»DIVTROK «, t00=0x001d, t01=0x00d4}
0x2e22…2e48 Head {h00=0x0022, h01=0x0050, text=» CMP CBIN0,CBIN0 OK, SET CR=0 «, t00=0x001d, t01=0x00e4}
0x2e48…2e54 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001d, t01=0x010a}
0x2e54…2e64 Head {h00=0x000c, h01=0x0050, text=»DIVTRNOK«, t00=0x001d, t01=0x0116}
0x2e64…2e8c Head {h00=0x0024, h01=0x0050, text=» CMP CBIN1,CBIN0 NOK, SET CR<>0 «, t00=0x001d, t01=0x0126}
0x2e8c…2e98 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001d, t01=0x014e}
0x2e98…2ea6 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x001d, t01=0x015a}
0x2ea6…2eb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0168}
0x2eb0…2eba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0172}
0x2eba…2ece Head {h00=0x0010, h01=0x0050, text=» END«, t00=0x001d, t01=0x017c}
0x2ece…2ed2 (30, 2, 8) Head {h00=0x4004, h01=0x0000}
0x2ed2…2ed6 00 1e 00 04 ┆ ┆
0x2ed6…2ede (31, 1, 8) 20 04 00 00 00 1f 00 04 ┆ ┆
0x2ede…2f2e (32, 0, 400) 1b 0f 50 02 13 0f 93 10 e2 34 84 08 b5 07 56 04 e9 94 57 02 ed 06 51 0a 50 02 04 00 02 00 e2 5b ff ff 22 f0 1a f0 58 0a 12 f0 24 0f 1c 0f 50 02 14 0f 83 8e 54 46 93 10 eb 20 00 0a 52 02 13 06 93 04 93 08 eb 20 00 a0 52 02 13 60 ab 3b 84 0c ┆ P 4 V W Q P [ " X $ P TF R R ` ; ┆
0x2f2e…2f7e 3c 28 82 1c 9a 02 82 08 51 18 50 04 23 ff 57 0e 82 0c 22 0f e1 3c 21 f0 a9 08 e1 3d 23 f0 54 36 57 02 e3 3d 82 5a ff fe 50 12 5f a6 9b 10 56 02 1b 06 93 04 9b 08 5e 3c 1b 60 5f 40 03 00 82 1c 9a 02 1f 01 1a 01 52 0a 51 04 e3 3c 23 f0 e3 3d ┆<( Q P # W " <! =# T6W = Z P _ V ^< `_@ R Q <# =┆
0x2f7e…2fce 5f 10 84 10 50 02 04 03 03 00 82 3a 22 ff 50 1e e1 2a 83 8e 55 06 e8 8a 50 02 31 60 21 f0 54 02 01 b0 e3 22 23 0f ab 04 39 65 21 03 ac 04 e3 23 82 d6 00 02 e4 4b ff fe f0 3a 80 d6 00 02 82 10 83 0c b3 10 23 30 8c 20 b3 70 01 20 a2 05 50 38 ┆_ P :" P * U P 1`! T "# 9e! # K : #0 p P8┆
0x2fce…301e 22 10 54 0a 81 2a e9 26 f0 81 01 00 f0 3a 03 c0 e1 2a e2 26 b1 08 21 60 50 08 3a 4a 5c 16 eb 2b 5f 1a eb 2b 51 0c 81 18 86 14 85 04 81 0a 82 86 81 84 f6 a1 a5 dc 5f 30 83 0a 84 06 e1 2c b3 19 56 04 ee 0c 57 02 eb 18 52 04 02 00 01 20 b4 15 ┆" T * & : * & !`P :J +_ +Q _0 , V W R ┆
0x301e…306e 56 04 ed 10 57 02 ec 14 52 08 12 00 58 56 19 20 57 02 e9 31 5c 5e 13 01 14 01 5f 30 96 a0 00 04 82 0a 83 06 81 18 99 0a 84 14 9c 06 99 10 52 04 9b 04 57 06 92 04 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 08 00 00 00 20 00 00 00 00 0c ┆V W R XV W 1 ^ _0 R W ┆
0x306e…30be (33, 0, 400) 04 00 e1 28 b2 0b 56 04 ea 88 57 02 ea 0a 51 0a 50 04 01 00 57 10 21 0f 57 06 19 f0 56 02 11 f0 19 0f 50 02 11 0f e4 2c b3 07 56 04 e9 88 57 02 eb 06 51 0a 50 04 04 00 57 10 24 0f 57 06 1c f0 56 02 14 f0 1c 0f 50 02 14 0f e9 10 54 10 12 01 ┆ ( V W Q P W ! W V P , V W Q P W $ W V P T ┆
0x30be…310e 13 01 b2 19 56 04 ee 08 57 02 ea 18 5a 5c 8f 3a 24 30 23 30 3b 62 ac 0c 1c 0c 88 20 a7 be 1c 20 50 a0 1c 04 50 ec 1c 08 50 4e 1c 04 50 1e 83 0a 84 06 e1 30 e1 2d 13 01 eb 18 50 3a 14 01 b4 15 56 04 ed 10 57 02 ec 14 5a 18 5f 18 1e 01 1d 01 ┆ V W Z :$0#0;b P P PN P 0 - P: V W Z _ ┆
0x310e…315e e1 34 b5 07 56 04 e9 94 57 02 ed 06 51 06 50 02 01 ff 29 f0 ee 0a 50 04 e1 39 5f 20 e2 26 22 f0 21 0f a9 08 e1 39 f0 3a 81 26 04 00 02 00 50 20 02 b0 51 04 99 05 02 d0 83 20 a7 02 14 01 99 2c 5e 06 91 2c 1c 01 3c c4 13 02 eb 20 a7 0a 5c 14 ┆ 4 V W Q P ) P 9_ &" ! 9 : & P Q ,^ , < ┆
0x315e…31ae 83 10 23 0f b4 0c ac 04 aa 0c 84 3b e2 5b ff ff 85 1a 1d 01 81 94 15 03 5f 6e 27 10 03 e8 00 64 00 0a 80 94 1d 03 b5 07 56 04 e9 94 57 02 ed 06 56 02 85 06 03 00 07 00 e1 34 21 0f 19 0f 50 02 11 0f 93 0c 84 0c 3c 02 53 88 93 10 53 84 93 04 ┆ # ; [ _n' d V W V 4! P < S S ┆
0x31ae…31fe 53 80 81 08 ff 1c 58 1e 15 01 e2 34 81 08 39 64 ed 02 5c 2a e1 26 e9 21 c0 00 52 02 9b 0d 83 2b f0 3a 07 00 02 b0 1e 01 81 0c 1d 01 03 0f b5 07 56 04 e9 94 57 02 ed 06 00 00 00 00 00 00 02 00 00 00 00 00 00 04 02 00 00 00 00 00 00 00 00 05 ┆S X 4 9d * & ! R + : V W ┆
0x31fe…324e (34, 0, 400) 52 10 e3 34 1b 30 52 1e eb 20 00 09 59 1c ac 0c 02 b0 37 01 59 26 ee 0a 50 14 87 1c 5a 2c 3b 44 a9 0c e1 39 5f 38 13 03 5c 38 02 d0 5f 3c af 20 80 00 b5 07 56 04 e9 94 57 02 ed 06 59 4c 14 00 54 02 02 00 aa 04 e2 39 f0 3a 8f 20 b3 8c e1 26 ┆R 4 0R Y 7 Y& P Z,;D 9_8 8 _< V W YL T 9 : &┆
0x324e…329e 39 64 21 0f 11 20 e1 2b 92 a0 00 01 ea 98 50 8c b2 08 87 20 80 00 e1 26 ef 08 54 02 39 64 21 0f e9 20 00 0f 54 14 37 01 56 02 b7 1c ef 08 59 1a 91 a0 00 01 e9 94 50 5c 5f 24 82 14 9a 06 92 08 53 5a 81 18 99 0a a7 1c 51 04 56 04 07 01 1a 01 ┆9d! + P & T 9d! T 7 V Y P _$ SZ Q V ┆
0x329e…32ee e9 08 50 1c b1 09 56 06 ea 04 51 14 57 04 e9 08 51 0e 37 01 59 18 91 a0 00 01 e9 94 50 2e 5f 36 e1 26 a7 1c 51 02 39 64 21 0f 29 30 e1 2b 92 a0 00 01 ea 98 50 16 37 01 59 1a 5a 10 91 a0 00 01 e9 94 5c 24 01 00 af 20 80 00 5f 20 f0 3a 82 56 ┆ P V Q W Q 7 Y P._6 & Q 9d! )0 + P 7 Y Z $ _ : V┆
0x32ee…333e 00 02 a0 29 82 0c a2 10 01 30 a1 09 88 20 b3 74 81 0c b1 10 21 30 8c 20 b3 70 22 10 54 56 06 00 81 2a 56 04 99 05 fe 18 82 26 56 04 9a 09 fe 18 9f 1c 9c 10 3a e1 56 08 97 04 53 02 57 02 14 01 a2 20 7f ff 50 0a 39 01 53 02 57 02 14 01 5f 1c ┆ ) 0 t !0 p" TV *V &V : V S W P 9 S W _ ┆
0x333e…338e 02 01 86 18 56 04 9f 1d 02 02 a4 10 50 04 02 03 57 06 a7 1c 54 02 02 00 81 56 00 02 e2 45 ff fe 87 2b f0 3a 9e 0a 16 01 26 fe 81 1a 99 18 99 18 99 36 19 1c 8a 20 b3 90 00 00 00 00 02 00 00 00 00 00 00 00 00 00 00 01 08 00 00 00 00 00 00 1c ┆ V P W T V E + : & 6 ┆
0x338e…33de (35, 0, 400) 9e 98 82 1a 9e 98 84 5b ff f0 82 db ff f2 83 5b ff ec 81 db ff ee 12 02 82 5b ff f6 9a 18 82 5b ff fa e6 18 24 f0 ac 18 84 5b ff f4 84 5b ff f8 3e 68 96 18 86 5b ff fe a0 5b 00 00 9e a0 00 16 f6 a1 ac 32 a6 58 0c 08 f6 a1 ac 32 a6 58 10 04 ┆ [ [ [ [ $ [ [ >h [ [ 2 X 2 X ┆
0x33de…342e f6 a1 ac 32 a3 f4 08 08 81 5a 00 14 19 01 50 50 82 04 81 5b 00 14 39 61 91 5a 00 10 e1 24 22 01 54 02 39 64 21 0f 19 0f 50 36 11 0f 50 28 f9 04 81 5b 00 12 81 5a 00 16 a9 77 00 02 90 5b 00 12 50 14 f6 a1 ac 32 a3 ee 08 0c 82 56 00 02 81 48 ┆ 2 Z PP [ 9a Z $" T 9d! P6 P( [ Z w [ P 2 V H┆
0x342e…347e ff fe a9 29 5f 1a f6 a1 ac 32 a9 d8 0c 0c 5f 58 e1 7a 00 10 19 c0 52 0e e1 7a 00 08 21 ff 50 06 31 60 e1 7b 00 08 82 56 00 02 81 28 39 68 19 03 54 04 11 03 57 08 e1 7a 00 08 39 65 21 03 e1 49 ff fe e1 5a 00 0a 21 ff 91 04 11 16 96 84 f0 3a ┆ )_ 2 _X z R z ! P 1` { V (9h T W z 9e! I Z ! :┆
0x347e…34ce 01 00 1d 01 e1 34 ed 06 50 08 39 c4 e1 35 39 44 5f 10 82 04 22 0f 50 0c 1a 0f 50 08 82 20 03 00 aa 5b 00 1a e2 04 21 f0 3a 64 22 0f a9 08 e1 35 f0 3a 82 0c a2 10 01 30 a1 09 88 20 b3 74 81 0c b1 10 21 30 8c 20 b3 70 22 10 54 7a 06 00 84 2a ┆ 4 P 9 59D_ " P P [ ! :d" 5 : 0 t !0 p" Tz *┆
0x34ce…351e 56 04 9c 11 fe 18 85 26 56 04 9d 15 fe 18 9f 1c 82 14 a2 20 7f ff 50 50 3d 84 82 20 3b 40 92 04 03 01 f0 09 82 10 81 10 9c 14 b4 05 52 0a 97 0c a3 0c 50 0c 82 10 57 02 00 00 00 00 66 60 00 00 00 30 0c 00 00 00 00 00 00 00 02 10 00 00 00 05 ┆V &V PP= ;@ R P W f` 0 ┆
0x351e…356e (36, 0, 400) 94 14 3b 61 3d 61 5c 1a 81 08 50 12 82 0e 22 ff 1a 0c 52 0a 82 26 91 04 e9 08 52 02 17 01 02 01 86 18 56 04 9f 1d 02 02 a7 1c 54 06 02 00 57 02 02 03 81 56 00 02 e2 45 ff fe 87 2b f0 3a 9e 0a 9d 06 ee 14 56 02 86 14 16 02 26 fe 81 1a 99 18 ┆ ;a=a P " R & R V T W V E + : V & ┆
0x356e…35be 99 18 99 36 19 1e 8a 20 b3 90 9e 98 82 1a 12 02 9e 98 82 db ff f0 84 5b ff ee 81 db ff ec 83 5b ff ea 82 5b ff f8 9a 18 82 5b ff f4 e6 18 24 f0 ac 18 84 5b ff f6 84 5b ff f2 9e a0 00 18 e3 db 00 14 f6 a1 ac 32 a6 58 10 08 f6 a1 ac 32 a6 58 ┆ 6 [ [ [ [ $ [ [ 2 X 2 X┆
0x35be…360e 0c 04 f6 a1 ac 32 a3 f4 08 08 e2 7a 00 0c 22 ff 81 08 21 f0 ea 21 c0 00 52 06 32 60 e2 7b 00 0c e2 7a 00 10 22 ff 50 c8 b1 08 ea 21 c0 00 52 06 32 60 e2 7b 00 10 31 b0 21 f0 e1 7b 00 08 e1 5b 00 15 07 00 e7 5a 00 0a 97 1c 80 9c f6 a1 ac 32 ┆ 2 z " ! ! R 2` { z " P ! R 2` { 1 ! { [ Z 2┆
0x360e…365e a5 dc 0c 10 51 0e f6 a1 ac 32 a9 d8 0c 0c 1f 01 50 a6 5f 18 9f 02 54 04 e7 7b 00 08 87 5b 00 18 f6 a1 ac 32 ac 14 0c 00 90 5b 00 18 51 40 a0 5b 00 12 f6 a1 ac 32 a3 f4 10 0c 01 c0 e9 7b 00 10 52 06 90 5b 00 12 5f 16 f6 a1 ac 32 a3 ee 10 0c ┆ Q 2 P _ T { [ 2 [ Q@ [ 2 { R [ _ 2 ┆
0x365e…36ae f6 a1 ac 32 a9 d8 08 08 e1 5a 00 06 21 ff 91 5a 00 08 19 01 e2 24 92 5a 00 12 e2 25 5f 4e 01 0c e9 5b 00 14 51 2a f6 a1 ac 32 a3 ee 10 10 f6 a1 ac 32 a5 dc 10 04 52 18 00 00 00 00 00 08 00 00 00 33 30 00 00 00 01 8c 00 60 30 06 60 00 0c cc ┆ 2 Z ! Z $ Z %_N [ Q* 2 2 R 30 `0 ` ┆