|
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: 14276 (0x37c4)
Notes: pts_type(SC)
Names: »CYK.SC«
└─⟦22f4dea89⟧ Bits:30009702 Philips computer tape "DOS_PTS_4.2_M_FL"
└─⟦this⟧ »NJ-AMT/CYK.SC«
└─⟦dab19bdd7⟧ Bits:30009677 Philips computer tape "600218"
└─⟦this⟧ »NJ-AMT/CYK.SC«
IDENT CYK 831031 EV
DDUM KMD08
PDIV
ENTRY CYK
ENTRY CYCLR
ENTRY CYOUT
ENTRY CYWRT
ENTRY CYTRP
EXT SUBTOT
EXT CLRSW
EXT FRMXSP
EXT FRMXVO
EXT WRITJT
EXT WCHECK
EXT LINOPT
EXT SPCLRA
EXT SPCLRN
EXT SPERR
EXT SPINF1
EXT SPCHK5
EXT WRITLO
EXT ABORT
EXT RAWRIT
EXT RAREAD
EXT SPLIN8
EXT CLEAR8
EXT GRASPV
EXT CRVO
EXT WAITF
INCLUDE EQUATE
EJECT
CYLINE PROC
********************
*
* WRITE ONE LINE TO CYCLE DATASET
*
* ON ENTRY DATA IN SEPARATE FIELDS
*
* ON EXIT CR= OK DATA WRITTEN TO CYSET
* CR=NOK DATA NOT WRITTEN TO CYSET
* E.G. ERROR ON DISK
* DATASET FULL
* WAITED TOO LONG FOR BUFFER
*
********************
MOVE GSWBIN1,CCYSIZE
MUL GSWBIN1,GTUWB
CBNL GTCYOUT,GSWBIN1,CYLINNOK
MOVE GSWBIN1,=W'32'
CYLIN000
TBF CCYPFLG,CYLIN010 WAIT FOR BUFFER
DELAY CBIN2
SUB GSWBIN1,CBIN2
CBL GSWBIN1,CBIN0,CYLINNOK
B CYLIN000
*
CYLIN010
SET CCYPFLG RESERVE BUFFER
MOVE CCYBUF,=X'00' CLEAR BUFFER
EDIT CCYBUF,GTSTRFMT
PERF RAWRIT,DK03,=D'3',CCYBUF,GTCYOUT
BNOK CYLIN100
ADD GTCYOUT,CBIN1
CLEAR CCYPFLG RELEASE BUFFER
CMP CBIN0,CBIN0
RET
*
CYLIN100
CLEAR CCYPFLG RELEASE BUFFER
CYLINNOK
CMP CBIN1,CBIN0
RET
PEND
EJECT
CYOUT PROC P
********************
*
* WRITE OUT THE WHOLE CONTENT OF CYSET
* (LESS THAN ONE PAGE)
*
********************
TBT GTCYWRTF,CYOUT050
TBT TTTSTFLG,CYOUT005
SET TTTSTFLG
PERF SPLIN8,CBIN5,CBIN2
PERF GRASPV
PERF CLEAR8
CBNE P,CBIN1,CYOUT005
DSC0 KEYB,SKIB SKIP CIRCUL. BUFFER
CYOUT005
MOVE TTLINNR,TTCYKPOS
TBF GTCYTRPF,CYOUT010
SUB GTCYOUT,CBIN1 ADJUST FOR TRP LINE, -TOTAL
CYOUT010
MOVE GSWBIN1,TTLINNR
DSC1 KVOUCH,POS,GSWBIN1
CBNL GTCYIN,GTCYOUT,CYOUT050
PERF CYRD
SUB TTLINNR,=D'2'
WAIT KVOUCH
B CYOUT010
*
CYOUT050
RET
PEND
EJECT
CYWRT PROC
********************
*
* WRITE A LINE ON CYCLE DATASET
* IN NOK EMPTY THE CYCLE DATASET TO VOUCHER
* AND WRITE LINE TO VOUCHER
*
********************
PERF CYLINE WRITE LINE TO CYSET
BNOK CYWRT100
SUB TTLINNR,=D'2'
CBL TTLINNR,=D'4',CYWRT010 IF PAGE FULL
CMP CBIN0,CBIN0 OK
RET
*
CYWRT010
MOVE GSWSTR9,=C'TRP ' NEW PAGE
PERF FRMXVO,CBIN2
PERF CYLINE
SET GTCYTRPF INITIATE PRINT
PERF CYTRP
CMP CBIN0,CBIN0 OK
RET
*
CYWRT100
CLEAR TTTSTFLG ASK FOR BILAG
PERF CYOUT,CBIN1
SET GTCYWRTF
CMP CBIN1,CBIN0
RET
PEND
EJECT
CYRD PROC
********************
* READ ONE LINE FROM CYCLE DATASET AND
* WRITE IT TO VOUCHER
* VOUCHER SHOULD BE POSITIONED BEFORE PRINT
********************
CYRD000
PERF WAITF,CCYPFLG
MOVE GSWBIN1,=W'128' SET LENGTH
PERF RAREAD,DK03,=D'3',CCYBUF,GSWBIN1,GTCYIN
BNOK CYRDNOK
EDWRT .NW,KVOUCH,CYEDT
CLEAR CCYPFLG
B CYRD100
CYRDNOK
ADD GTCYIN,CBIN1
CLEAR CCYPFLG
PERF CRVO
CMP CBIN1,CBIN0 NOK
RET
CYRD100
WAIT KVOUCH
PERF CRVO
ADD GTCYIN,CBIN1
CMP CBIN0,CBIN0 OK
RET
PEND
CYEDT FRMT
FCOPY CCYBUF
FMEND
EJECT
CYTRP PROC
********************
*
* PRINT A WHOLE PAGE
*
* AND WRITE TRANSPORT LINE FIRST ON CYSET
*
********************
TBF GTCYTRPF,CYTRP200
TBT GTCYWRTF,CYTRP100 T=ALREADY WRITTEN
CLEAR GTCYTRPF
CLEAR TTTSTFLG
PERF CYOUT,CBIN0
WAIT KVOUCH
DSC0 .NW,KVOUCH,RLEAS
CLEAR TTTSTFLG
CYTRP010
MOVE TTLINNR,TTCYKST
MOVE TTCYKPOS,TTLINNR
MOVE GTCYIN,GTUWB
SUB GTCYIN,CBIN1
MUL GTCYIN,CCYSIZE
ADD GTCYIN,CBIN1
MOVE GTCYOUT,GTCYIN
MOVE GSWSTR9,=C'TRP '
PERF FRMXVO,CBIN2
PERF CYLINE
BNOK CYTRP100
B CYTRP150
*
CYTRP100
CLEAR GTCYTRPF
SET GTCYWRTF
PERF SPLIN8,CBIN3,CBIN2 ASK FOR 'NY SIDE'
PERF GRASPV GRASP
MOVE TTCYKPOS,TTCYKST
MOVE TTLINNR,TTCYKST POSITION VOUCHER
MOVE GSWBIN1,TTLINNR
DSC1 KVOUCH,POS,GSWBIN1
MOVE GSWSTR9,=C'TRP ' SET UP TRANSPORT LINE
PERF FRMXVO,CBIN2
EDWRT KVOUCH,GTSTRFMT WRITE TRP LINE
*
CYTRP150
SUB TTLINNR,=D'2'
CYTRP200
RET
PEND
EJECT
CYK PROC CYTYPE
********************
*
* HANDLE DIFFERENT TYPES OF CYCLES
*
********************
IB CYTYPE, C
CYK1, C
CYK2, C
CYKNOK, C
CYK4, C
CYK5, C
CYKNOK,CYKNOK,CYKNOK,CYK9,CYEND
B CYKNOK
CYK1
********************
*
** CYK1 - START OF CYCLE FUNCTION
*
********************
TBT TTLSTFLG,CYK1NOK IN LISTE
TBT TTCY2FLG,CYK1NOK IN CYCLE 2
TBT TTCY5FLG,CYK1NOK
SET TTCY0FLG
SET TTCY1FLG
MOVE TTCYM,=C'C' FOR JOURNAL
MOVE GTTEXT,=C'CYKLE ' FOR SCREEN
PERF CYKINT
B CYKOK
CYK1NOK
B CYKNOK
CYK2
********************
*
** CYK2 - START OF STABEL FUNCTION
*
********************
TBT TTLSTFLG,CYK2NOK IN LISTE
TBT TTCY1FLG,CYK2NOK IN CYCLE 1
TBT TTCY5FLG,CYK2NOK
SET TTCY0FLG
SET TTCY2FLG
MOVE TTCYM,=C'S' FOR JOURNAL
MOVE GTTEXT,=C'STABEL' FOR SCREEN
PERF CYKINT
B CYKOK
CYK2NOK
B CYKNOK
CYK4
********************
*
* CYK4 - PAUSE IN CYCLE / STABEL
*
********************
TBF GTCYFLG,CYK4NOK
TBT GTCYWRTF,CYKSUB
MOVE TTARKSAV,GTDUPF(CBIN9) SAVE ARKIV KNT NR
SET TTPSEFLG INDICATE BREAK
MOVE GTCYSUM,GTSUM
MOVE GTPSELIN,TTLINNR
PERF CYCLR
ERASE 0,CBIN8,CBIN8 ERASE LINE 8
PERF SPINF1
B CYKOK
CYK4NOK
B CYKNOK
CYKSUB
PERF SUBTOT
B CYKOK
CYK5
********************
*
* CYK5 - VIBORG ONLY
*
********************
* TRANS 8-9
* MOST FIELDS AUTODUPPED
* NOT DUPPED:
* REGKONTONR
* BELOB
* CPR/CIRNR
*
TBF CCYK5,CYK5NOK
CBL GTREGDEX,CBIN8,CYK5NOK
CBG GTREGDEX,CBIN9,CYK5NOK
TBT TTLSTFLG,CYK5NOK LISTE?
TBT TTCY2FLG,CYK5NOK
TBT TTCY5FLG,CYK510
TBT TTCY1FLG,CYK5NOK
CYK510
SET TTCY0FLG
SET TTCY1FLG
SET TTCY5FLG
PERF CLRSW
MOVE TTCYM,=C'C'
MOVE GTTEXT,=C'CYK 5 '
PERF CYKINT
B CYKOK
CYK5NOK
B CYKNOK
CYK9
********************
*
** CYK9 - CLEAR ARKIV KONTO NR
*
********************
TBT TTCY1FLG,CYK9A
TBT TTCY5FLG,CYK9A
B CYK9NOK
CYK9A
MOVE TTARKSAV,=D'0' CLEAR NUMBER
B CYKOK
CYK9NOK
B CYKNOK
CYEND
********************
*
** CYEND - END OF CYCLE
*
** WRITE TOTAL LINE ON VOUCHER
*
********************
TBF GTCYFLG,CYENDNOK ONLY IF IN CYCLE
TBT TTCY2FLG,CYEND10
CBNE GTSUM,=D'0',CYEND30 SUM CORRECT? (ONLY CY1)
CYEND10
CLEAR TTSUMFLG CLEAR FLAGS
CLEAR GTCYFLG
TBF TTCYTRFL,CYEND20
PERF CYOUT,CBIN0
CLEAR TTTSTFLG
WAIT KVOUCH
MOVE GSWBIN1,TTLINNR
DSC1 KVOUCH,POS,GSWBIN1 POSITION VOUCHER
MOVE GSWSTR9,=C'TOTAL '
PERF FRMXVO,CBIN2 GET TOTAL FORMAT
EDWRT KVOUCH,GTSTRFMT EDWRT ON VOUCHER
DSC0 KVOUCH,RLEAS RELEASE VOUCHER
TBF TSPOOL,CYEND14
TBT CSPOOL,CYEND15
CYEND14
PERF WRITJT,=W'15'
CYEND15
MOVE GSWBIN1,=W'26'
PERF WRITLO,GSWBIN1
CBL GTREGNR,=D'18',CYEND20 CHECKS?
SET TTTSTFLG
MOVE GTREGF(CBIN4),GTSUM FIND TOTAL VALUE
PERF WCHECK WRITE CHECK
CYEND20
CLEAR TTTSTFLG
PERF CLRSW
CLEAR TTCY0FLG
CLEAR TTCY5FLG
CLEAR TTCY1FLG
CLEAR TTCY2FLG
PERF CYCLR
B CYENDOK
CYEND30
MOVE SPBINW4,=W'12' SET ERRORCODE
PERF SPERR
IB SPBINW2,CYENDCNT,CYEND10
CYENDOK
MOVE GSWBIN1,=W'24'
ERASE 0,GSWBIN1,GSWBIN1 LINE 24
ERASE 0,CBIN8,CBIN8 ERASE LINE 8
PERF SPINF1
CYENDCNT
CYKOK
CMP CBIN0,CBIN0 OK
RET
CYENDNOK
CYKNOK
CMP CBIN1,CBIN0 NOK
RET
PEND
CYKINT PROC
********************
*
** CYKINT - START OR END OF CYCLE
*
** START SET RELEVANT INFORMATION AND READ
** ARKIV KNT.NR, KONTROLSUM AND LRER-9
*
** END CLEAR RELEVANT INFORMATION
*
********************
TBF GTCYFLG,CY10 TRUE- ALREADY IN CYCLE
TBT TTPSEFLG,CY05 TRUE- IN PAUSE STATE
PERF CYK,CBIN10
RET
CY05
PERF CYCLR
RET
CY10
SET TTSUMFLG INDICATE SUM ON SCREEN
SET GTCYFLG INDICATE CYCLE
TBF TTPSEFLG,CY30 TRUE- PAUSE STATE
MOVE GTSUM,GTCYSUM GET SAVED SUM
MOVE GTREGF(CBIN9),TTARKSAV GET SAVED ARKIV KNT.NR
CBG GTPSELIN,CBIN0,CY20
MOVE GTPSELIN,TTCYKST RESET START LINE
MOVE TTCYKPOS,TTCYKST
CY20
MOVE TTLINNR,GTPSELIN
CLEAR TTPSEFLG OUT OF PAUSE STATE
B CY90
CY30
MOVE GTREGF(CBIN9),=D'0' INITIATE VALUES
MOVE GSWBCD6,=D'0'
MOVE GTSUM,=D'0'
MOVE TTCYKTOT,=D'0'
CLEAR TTCYTRFL
MOVE TTCYKST,=D'1' START LINE NEW PAGE
MOVE TTLINNR,=D'1'
PERF FRMXSP,CBIN11 GET FORMAT FOR CYCLE INF
SET SPPROMPT
PERF SPCLRN WRITE AND READ ON SCREEN
CLEAR SPPROMPT
IB SPBINW2,CY45,CY45,CY50
MOVE SPBINW4,=W'4'
PERF SPERR
B CY30
CY45 MAK
CLEAR TTCY1FLG
CLEAR TTCY2FLG
CLEAR TTCY5FLG
B CY05
CY50
CBL TTCYKST,=D'25',CY54
MOVE TTCYKST,=D'1'
CY54
MOVE SPINPUT,TTCYKST
PERF SPCHK5
MOVE TTCYKST,GSWBIN1
CBL TTLINNR,=D'27',CY55
MOVE TTLINNR,=D'1'
CY55
MOVE SPINPUT,TTLINNR
PERF SPCHK5
MOVE TTLINNR,GSWBIN1 FIND LINNE NUMBER
MOVE GTSUM,GSWBCD6
MOVE TTARKSAV,GTREGF(CBIN9)
MOVE TTCYKPOS,TTLINNR
MOVE GTCYIN,GTUWB
SUB GTCYIN,CBIN1
MUL GTCYIN,CCYSIZE
ADD GTCYIN,CBIN1
MOVE GTCYOUT,GTCYIN
CY90
CLEAR TTTSTFLG
SET GTCYWRTF
TBT CCYWRTF,CY95
CLEAR GTCYWRTF
CY95
RET
PEND
CYCLR PROC
*******************
*
** CYCLR - CLEAR CYCLEINFORMATION
*
******************
MOVE GTTEXT,=C' '
MOVE TTCYM,=C' '
MOVE GTREGF(CBIN9),=D'0'
MOVE GTSUM,=D'0'
CLEAR GTCYFLG
CLEAR TTSUMFLG
CLEAR TTTSTFLG
CLEAR GTCYTRPF
DSC0 KVOUCH,RLEAS RELEASE VOUCHER
RET
PEND
END
0x0000…001c (0, 0, 400) Head {h00=0x0018, h01=0x0050, text=» IDENT CYK 831031 EV«, t00=0x0000, t01=0x0004}
0x001c…003a Head {h00=0x001a, h01=0x0050, text=» DDUM KMD08«, t00=0x0000, t01=0x0020}
0x003a…0050 Head {h00=0x0012, h01=0x0050, text=» PDIV «, t00=0x0000, t01=0x003e}
0x0050…0062 Head {h00=0x000e, h01=0x0050, text=» ENTRY CYK«, t00=0x0000, t01=0x0054}
0x0062…0076 Head {h00=0x0010, h01=0x0050, text=» ENTRY CYCLR«, t00=0x0000, t01=0x0066}
0x0076…008a Head {h00=0x0010, h01=0x0050, text=» ENTRY CYOUT«, t00=0x0000, t01=0x007a}
0x008a…009e Head {h00=0x0010, h01=0x0050, text=» ENTRY CYWRT«, t00=0x0000, t01=0x008e}
0x009e…00b2 Head {h00=0x0010, h01=0x0050, text=» ENTRY CYTRP«, t00=0x0000, t01=0x00a2}
0x00b2…00ba Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x00b6}
0x00ba…00c2 Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x00be}
0x00c2…00ca Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x00c6}
0x00ca…00de Head {h00=0x0010, h01=0x0050, text=» EXT SUBTOT «, t00=0x0000, t01=0x00ce}
0x00de…00f0 Head {h00=0x000e, h01=0x0050, text=» EXT CLRSW«, t00=0x0000, t01=0x00e2}
0x00f0…0104 Head {h00=0x0010, h01=0x0050, text=» EXT FRMXSP «, t00=0x0000, t01=0x00f4}
0x0104…0118 Head {h00=0x0010, h01=0x0050, text=» EXT FRMXVO «, t00=0x0000, t01=0x0108}
0x0118…012c Head {h00=0x0010, h01=0x0050, text=» EXT WRITJT «, t00=0x0000, t01=0x011c}
0x012c…014c Head {h00=0x001c, h01=0x0050, text=» EXT WCHECK «, t00=0x0000, t01=0x0130}
0x014c…0160 Head {h00=0x0010, h01=0x0050, text=» EXT LINOPT «, t00=0x0000, t01=0x0150}
0x0160…0180 Head {h00=0x001c, h01=0x0050, text=» EXT SPCLRA «, t00=0x0000, t01=0x0164}
0x0180…0194 Head {h00=0x0010, h01=0x0050, text=» EXT SPCLRN «, t00=0x0000, t01=0x0184}
0x0194…01b2 Head {h00=0x001a, h01=0x0050, text=» EXT SPERR«, t00=0x0001, t01=0x0008}
0x01b2…01c6 Head {h00=0x0010, h01=0x0050, text=» EXT SPINF1 «, t00=0x0001, t01=0x0026}
0x01c6…01da Head {h00=0x0010, h01=0x0050, text=» EXT SPCHK5 «, t00=0x0001, t01=0x003a}
0x01da…01ee Head {h00=0x0010, h01=0x0050, text=» EXT WRITLO «, t00=0x0001, t01=0x004e}
0x01ee…0200 Head {h00=0x000e, h01=0x0050, text=» EXT ABORT«, t00=0x0001, t01=0x0062}
0x0200…0214 Head {h00=0x0010, h01=0x0050, text=» EXT RAWRIT «, t00=0x0001, t01=0x0074}
0x0214…0228 Head {h00=0x0010, h01=0x0050, text=» EXT RAREAD «, t00=0x0001, t01=0x0088}
0x0228…023c Head {h00=0x0010, h01=0x0050, text=» EXT SPLIN8 «, t00=0x0001, t01=0x009c}
0x023c…0250 Head {h00=0x0010, h01=0x0050, text=» EXT CLEAR8 «, t00=0x0001, t01=0x00b0}
0x0250…0264 Head {h00=0x0010, h01=0x0050, text=» EXT GRASPV «, t00=0x0001, t01=0x00c4}
0x0264…0276 Head {h00=0x000e, h01=0x0050, text=» EXT CRVO «, t00=0x0001, t01=0x00d8}
0x0276…0288 Head {h00=0x000e, h01=0x0050, text=» EXT WAITF«, t00=0x0001, t01=0x00ea}
0x0288…0290 Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x00fc}
0x0290…0298 Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x0104}
0x0298…02b8 Head {h00=0x001c, h01=0x0050, text=» INCLUDE EQUATE «, t00=0x0001, t01=0x010c}
0x02b8…02c6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x012c}
0x02c6…02da Head {h00=0x0010, h01=0x0050, text=»CYLINE PROC «, t00=0x0001, t01=0x013a}
0x02da…02f6 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0001, t01=0x014e}
0x02f6…0300 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x016a}
0x0300…0332 Head {h00=0x002e, h01=0x0050, text=»* WRITE ONE LINE TO CYCLE DATASET«, t00=0x0001, t01=0x0174}
0x0332…033c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0016}
0x033c…0374 Head {h00=0x0034, h01=0x0050, text=»* ON ENTRY DATA IN SEPARATE FIELDS «, t00=0x0002, t01=0x0020}
0x0374…037e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0058}
0x037e…03bc Head {h00=0x003a, h01=0x0050, text=»* ON EXIT CR= OK DATA WRITTEN TO CYSET «, t00=0x0002, t01=0x0062}
0x03bc…03fe Head {h00=0x003e, h01=0x0050, text=»* CR=NOK DATA NOT WRITTEN TO CYSET «, t00=0x0002, t01=0x00a0}
0x03fe…0430 Head {h00=0x002e, h01=0x0050, text=»* E.G. ERROR ON DISK«, t00=0x0002, t01=0x00e2}
0x0430…0462 Head {h00=0x002e, h01=0x0050, text=»* DATASET FULL «, t00=0x0002, t01=0x0114}
0x0462…04a2 Head {h00=0x003c, h01=0x0050, text=»* WAITED TOO LONG FOR BUFFER «, t00=0x0002, t01=0x0146}
0x04a2…04ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0186}
0x04ac…04c8 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0002, t01=0x0190}
0x04c8…04e6 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,CCYSIZE «, t00=0x0003, t01=0x001c}
0x04e6…0500 Head {h00=0x0016, h01=0x0050, text=» MUL GSWBIN1,GTUWB«, t00=0x0003, t01=0x003a}
0x0500…0526 Head {h00=0x0022, h01=0x0050, text=» CBNL GTCYOUT,GSWBIN1,CYLINNOK«, t00=0x0003, t01=0x0054}
0x0526…0542 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'32'«, t00=0x0003, t01=0x007a}
0x0542…0552 Head {h00=0x000c, h01=0x0050, text=»CYLIN000«, t00=0x0003, t01=0x0096}
0x0552…0580 Head {h00=0x002a, h01=0x0050, text=» TBF CCYPFLG,CYLIN010 WAIT FOR BUFFER «, t00=0x0003, t01=0x00a6}
0x0580…0594 Head {h00=0x0010, h01=0x0050, text=» DELAY CBIN2«, t00=0x0003, t01=0x00d4}
0x0594…05ae Head {h00=0x0016, h01=0x0050, text=» SUB GSWBIN1,CBIN2«, t00=0x0003, t01=0x00e8}
0x05ae…05d2 Head {h00=0x0020, h01=0x0050, text=» CBL GSWBIN1,CBIN0,CYLINNOK «, t00=0x0003, t01=0x0102}
0x05d2…05e6 Head {h00=0x0010, h01=0x0050, text=» B CYLIN000 «, t00=0x0003, t01=0x0126}
0x05e6…05f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x013a}
0x05f0…0600 Head {h00=0x000c, h01=0x0050, text=»CYLIN010«, t00=0x0003, t01=0x0144}
0x0600…0624 Head {h00=0x0020, h01=0x0050, text=» SET CCYPFLG RESERVE BUFFER «, t00=0x0003, t01=0x0154}
0x0624…064c Head {h00=0x0024, h01=0x0050, text=» MOVE CCYBUF,=X'00' CLEAR BUFFER«, t00=0x0003, t01=0x0178}
0x064c…066a Head {h00=0x001a, h01=0x0050, text=» EDIT CCYBUF,GTSTRFMT «, t00=0x0004, t01=0x0010}
0x066a…0698 Head {h00=0x002a, h01=0x0050, text=» PERF RAWRIT,DK03,=D'3',CCYBUF,GTCYOUT«, t00=0x0004, t01=0x002e}
0x0698…06ae Head {h00=0x0012, h01=0x0050, text=» BNOK CYLIN100«, t00=0x0004, t01=0x005c}
0x06ae…06c8 Head {h00=0x0016, h01=0x0050, text=» ADD GTCYOUT,CBIN1«, t00=0x0004, t01=0x0072}
0x06c8…06ee Head {h00=0x0022, h01=0x0050, text=» CLEAR CCYPFLG RELEASE BUFFER «, t00=0x0004, t01=0x008c}
0x06ee…0706 Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x0004, t01=0x00b2}
0x0706…0712 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0004, t01=0x00ca}
0x0712…071c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00d6}
0x071c…072c Head {h00=0x000c, h01=0x0050, text=»CYLIN100«, t00=0x0004, t01=0x00e0}
0x072c…0752 Head {h00=0x0022, h01=0x0050, text=» CLEAR CCYPFLG RELEASE BUFFER «, t00=0x0004, t01=0x00f0}
0x0752…0762 Head {h00=0x000c, h01=0x0050, text=»CYLINNOK«, t00=0x0004, t01=0x0116}
0x0762…077a Head {h00=0x0014, h01=0x0050, text=» CMP CBIN1,CBIN0«, t00=0x0004, t01=0x0126}
0x077a…0786 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0004, t01=0x013e}
0x0786…0794 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0004, t01=0x014a}
0x0794…07a2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x0158}
0x07a2…07b6 Head {h00=0x0010, h01=0x0050, text=»CYOUT PROC P«, t00=0x0004, t01=0x0166}
0x07b6…07d2 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0004, t01=0x017a}
0x07d2…07dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0008}
0x07dc…0814 Head {h00=0x0034, h01=0x0050, text=»* WRITE OUT THE WHOLE CONTENT OF CYSET «, t00=0x0005, t01=0x0012}
0x0814…083c Head {h00=0x0024, h01=0x0050, text=»* (LESS THAN ONE PAGE) «, t00=0x0005, t01=0x004a}
0x083c…0846 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0072}
0x0846…0862 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0005, t01=0x007c}
0x0862…0880 Head {h00=0x001a, h01=0x0050, text=» TBT GTCYWRTF,CYOUT050«, t00=0x0005, t01=0x0098}
0x0880…089e Head {h00=0x001a, h01=0x0050, text=» TBT TTTSTFLG,CYOUT005«, t00=0x0005, t01=0x00b6}
0x089e…08b4 Head {h00=0x0012, h01=0x0050, text=» SET TTTSTFLG «, t00=0x0005, t01=0x00d4}
0x08b4…08d4 Head {h00=0x001c, h01=0x0050, text=» PERF SPLIN8,CBIN5,CBIN2«, t00=0x0005, t01=0x00ea}
0x08d4…08e8 Head {h00=0x0010, h01=0x0050, text=» PERF GRASPV«, t00=0x0005, t01=0x010a}
0x08e8…08fc Head {h00=0x0010, h01=0x0050, text=» PERF CLEAR8«, t00=0x0005, t01=0x011e}
0x08fc…091a Head {h00=0x001a, h01=0x0050, text=» CBNE P,CBIN1,CYOUT005«, t00=0x0005, t01=0x0132}
0x091a…0946 Head {h00=0x0028, h01=0x0050, text=» DSC0 KEYB,SKIB SKIP CIRCUL. BUFFER «, t00=0x0005, t01=0x0150}
0x0946…0956 Head {h00=0x000c, h01=0x0050, text=»CYOUT005«, t00=0x0005, t01=0x017c}
0x0956…0974 Head {h00=0x001a, h01=0x0050, text=» MOVE TTLINNR,TTCYKPOS«, t00=0x0005, t01=0x018c}
0x0974…0992 Head {h00=0x001a, h01=0x0050, text=» TBF GTCYTRPF,CYOUT010«, t00=0x0006, t01=0x001a}
0x0992…09c8 Head {h00=0x0032, h01=0x0050, text=» SUB GTCYOUT,CBIN1 ADJUST FOR TRP LINE, -TOTAL«, t00=0x0006, t01=0x0038}
0x09c8…09d8 Head {h00=0x000c, h01=0x0050, text=»CYOUT010«, t00=0x0006, t01=0x006e}
0x09d8…09f6 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,TTLINNR «, t00=0x0006, t01=0x007e}
0x09f6…0a16 Head {h00=0x001c, h01=0x0050, text=» DSC1 KVOUCH,POS,GSWBIN1«, t00=0x0006, t01=0x009c}
0x0a16…0a3c Head {h00=0x0022, h01=0x0050, text=» CBNL GTCYIN,GTCYOUT,CYOUT050 «, t00=0x0006, t01=0x00bc}
0x0a3c…0a4e Head {h00=0x000e, h01=0x0050, text=» PERF CYRD«, t00=0x0006, t01=0x00e2}
0x0a4e…0a68 Head {h00=0x0016, h01=0x0050, text=» SUB TTLINNR,=D'2'«, t00=0x0006, t01=0x00f4}
0x0a68…0a7c Head {h00=0x0010, h01=0x0050, text=» WAIT KVOUCH«, t00=0x0006, t01=0x010e}
0x0a7c…0a90 Head {h00=0x0010, h01=0x0050, text=» B CYOUT010 «, t00=0x0006, t01=0x0122}
0x0a90…0a9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0136}
0x0a9a…0aaa Head {h00=0x000c, h01=0x0050, text=»CYOUT050«, t00=0x0006, t01=0x0140}
0x0aaa…0ab6 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0006, t01=0x0150}
0x0ab6…0ac4 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0006, t01=0x015c}
0x0ac4…0ad2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x016a}
0x0ad2…0ae4 Head {h00=0x000e, h01=0x0050, text=»CYWRT PROC«, t00=0x0006, t01=0x0178}
0x0ae4…0b00 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0006, t01=0x018a}
0x0b00…0b0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0016}
0x0b0a…0b3a Head {h00=0x002c, h01=0x0050, text=»* WRITE A LINE ON CYCLE DATASET«, t00=0x0007, t01=0x0020}
0x0b3a…0b78 Head {h00=0x003a, h01=0x0050, text=»* IN NOK EMPTY THE CYCLE DATASET TO VOUCHER «, t00=0x0007, t01=0x0050}
0x0b78…0bac Head {h00=0x0030, h01=0x0050, text=»* AND WRITE LINE TO VOUCHER«, t00=0x0007, t01=0x008e}
0x0bac…0bb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00c2}
0x0bb6…0bd2 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0007, t01=0x00cc}
0x0bd2…0bfa Head {h00=0x0024, h01=0x0050, text=» PERF CYLINE WRITE LINE TO CYSET«, t00=0x0007, t01=0x00e8}
0x0bfa…0c10 Head {h00=0x0012, h01=0x0050, text=» BNOK CYWRT100«, t00=0x0007, t01=0x0110}
0x0c10…0c2a Head {h00=0x0016, h01=0x0050, text=» SUB TTLINNR,=D'2'«, t00=0x0007, t01=0x0126}
0x0c2a…0c5a Head {h00=0x002c, h01=0x0050, text=» CBL TTLINNR,=D'4',CYWRT010 IF PAGE FULL«, t00=0x0007, t01=0x0140}
0x0c5a…0c76 Head {h00=0x0018, h01=0x0050, text=» CMP CBIN0,CBIN0 OK «, t00=0x0007, t01=0x0170}
0x0c76…0c82 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0007, t01=0x018c}
0x0c82…0c8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0008}
0x0c8c…0c9c Head {h00=0x000c, h01=0x0050, text=»CYWRT010«, t00=0x0008, t01=0x0012}
0x0c9c…0cc4 Head {h00=0x0024, h01=0x0050, text=» MOVE GSWSTR9,=C'TRP ' NEW PAGE «, t00=0x0008, t01=0x0022}
0x0cc4…0cde Head {h00=0x0016, h01=0x0050, text=» PERF FRMXVO,CBIN2«, t00=0x0008, t01=0x004a}
0x0cde…0cf2 Head {h00=0x0010, h01=0x0050, text=» PERF CYLINE«, t00=0x0008, t01=0x0064}
0x0cf2…0d16 Head {h00=0x0020, h01=0x0050, text=» SET GTCYTRPF INITIATE PRINT«, t00=0x0008, t01=0x0078}
0x0d16…0d2a Head {h00=0x0010, h01=0x0050, text=» PERF CYTRP «, t00=0x0008, t01=0x009c}
0x0d2a…0d46 Head {h00=0x0018, h01=0x0050, text=» CMP CBIN0,CBIN0 OK «, t00=0x0008, t01=0x00b0}
0x0d46…0d52 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0008, t01=0x00cc}
0x0d52…0d5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00d8}
0x0d5c…0d6c Head {h00=0x000c, h01=0x0050, text=»CYWRT100«, t00=0x0008, t01=0x00e2}
0x0d6c…0d92 Head {h00=0x0022, h01=0x0050, text=» CLEAR TTTSTFLG ASK FOR BILAG «, t00=0x0008, t01=0x00f2}
0x0d92…0dac Head {h00=0x0016, h01=0x0050, text=» PERF CYOUT,CBIN1 «, t00=0x0008, t01=0x0118}
0x0dac…0dc2 Head {h00=0x0012, h01=0x0050, text=» SET GTCYWRTF «, t00=0x0008, t01=0x0132}
0x0dc2…0dda Head {h00=0x0014, h01=0x0050, text=» CMP CBIN1,CBIN0«, t00=0x0008, t01=0x0148}
0x0dda…0de6 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0008, t01=0x0160}
0x0de6…0df4 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0008, t01=0x016c}
0x0df4…0e02 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x017a}
0x0e02…0e14 Head {h00=0x000e, h01=0x0050, text=»CYRD PROC «, t00=0x0008, t01=0x0188}
0x0e14…0e30 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0009, t01=0x000a}
0x0e30…0e68 Head {h00=0x0034, h01=0x0050, text=»* READ ONE LINE FROM CYCLE DATASET AND «, t00=0x0009, t01=0x0026}
0x0e68…0e8e Head {h00=0x0022, h01=0x0050, text=»* WRITE IT TO VOUCHER«, t00=0x0009, t01=0x005e}
0x0e8e…0eca Head {h00=0x0038, h01=0x0050, text=»* VOUCHER SHOULD BE POSITIONED BEFORE PRINT«, t00=0x0009, t01=0x0084}
0x0eca…0ee6 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0009, t01=0x00c0}
0x0ee6…0ef6 Head {h00=0x000c, h01=0x0050, text=»CYRD000 «, t00=0x0009, t01=0x00dc}
0x0ef6…0f12 Head {h00=0x0018, h01=0x0050, text=» PERF WAITF,CCYPFLG «, t00=0x0009, t01=0x00ec}
0x0f12…0f3a Head {h00=0x0024, h01=0x0050, text=» MOVE GSWBIN1,=W'128' SET LENGTH«, t00=0x0009, t01=0x0108}
0x0f3a…0f70 Head {h00=0x0032, h01=0x0050, text=» PERF RAREAD,DK03,=D'3',CCYBUF,GSWBIN1,GTCYIN «, t00=0x0009, t01=0x0130}
0x0f70…0f86 Head {h00=0x0012, h01=0x0050, text=» BNOK CYRDNOK «, t00=0x0009, t01=0x0166}
0x0f86…0fa6 Head {h00=0x001c, h01=0x0050, text=» EDWRT .NW,KVOUCH,CYEDT «, t00=0x0009, t01=0x017c}
0x0fa6…0fbc Head {h00=0x0012, h01=0x0050, text=» CLEAR CCYPFLG«, t00=0x000a, t01=0x000c}
0x0fbc…0fce Head {h00=0x000e, h01=0x0050, text=» B CYRD100«, t00=0x000a, t01=0x0022}
0x0fce…0fde Head {h00=0x000c, h01=0x0050, text=»CYRDNOK «, t00=0x000a, t01=0x0034}
0x0fde…0ff8 Head {h00=0x0016, h01=0x0050, text=» ADD GTCYIN,CBIN1 «, t00=0x000a, t01=0x0044}
0x0ff8…100e Head {h00=0x0012, h01=0x0050, text=» CLEAR CCYPFLG«, t00=0x000a, t01=0x005e}
0x100e…1020 Head {h00=0x000e, h01=0x0050, text=» PERF CRVO«, t00=0x000a, t01=0x0074}
0x1020…103c Head {h00=0x0018, h01=0x0050, text=» CMP CBIN1,CBIN0 NOK«, t00=0x000a, t01=0x0086}
0x103c…1048 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000a, t01=0x00a2}
0x1048…1058 Head {h00=0x000c, h01=0x0050, text=»CYRD100 «, t00=0x000a, t01=0x00ae}
0x1058…106c Head {h00=0x0010, h01=0x0050, text=» WAIT KVOUCH«, t00=0x000a, t01=0x00be}
0x106c…107e Head {h00=0x000e, h01=0x0050, text=» PERF CRVO«, t00=0x000a, t01=0x00d2}
0x107e…1098 Head {h00=0x0016, h01=0x0050, text=» ADD GTCYIN,CBIN1 «, t00=0x000a, t01=0x00e4}
0x1098…10b4 Head {h00=0x0018, h01=0x0050, text=» CMP CBIN0,CBIN0 OK «, t00=0x000a, t01=0x00fe}
0x10b4…10c0 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000a, t01=0x011a}
0x10c0…10ce Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000a, t01=0x0126}
0x10ce…10e0 Head {h00=0x000e, h01=0x0050, text=»CYEDT FRMT«, t00=0x000a, t01=0x0134}
0x10e0…10f6 Head {h00=0x0012, h01=0x0050, text=» FCOPY CCYBUF «, t00=0x000a, t01=0x0146}
0x10f6…1104 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x000a, t01=0x015c}
0x1104…1112 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x016a}
0x1112…1124 Head {h00=0x000e, h01=0x0050, text=»CYTRP PROC«, t00=0x000a, t01=0x0178}
0x1124…1140 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000a, t01=0x018a}
0x1140…114a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0016}
0x114a…1170 Head {h00=0x0022, h01=0x0050, text=»* PRINT A WHOLE PAGE «, t00=0x000b, t01=0x0020}
0x1170…117a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0046}
0x117a…11b4 Head {h00=0x0036, h01=0x0050, text=»* AND WRITE TRANSPORT LINE FIRST ON CYSET«, t00=0x000b, t01=0x0050}
0x11b4…11be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x008a}
0x11be…11da Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000b, t01=0x0094}
0x11da…11f8 Head {h00=0x001a, h01=0x0050, text=» TBF GTCYTRPF,CYTRP200«, t00=0x000b, t01=0x00b0}
0x11f8…1228 Head {h00=0x002c, h01=0x0050, text=» TBT GTCYWRTF,CYTRP100 T=ALREADY WRITTEN«, t00=0x000b, t01=0x00ce}
0x1228…1240 Head {h00=0x0014, h01=0x0050, text=» CLEAR GTCYTRPF «, t00=0x000b, t01=0x00fe}
0x1240…1258 Head {h00=0x0014, h01=0x0050, text=» CLEAR TTTSTFLG «, t00=0x000b, t01=0x0116}
0x1258…1272 Head {h00=0x0016, h01=0x0050, text=» PERF CYOUT,CBIN0 «, t00=0x000b, t01=0x012e}
0x1272…1286 Head {h00=0x0010, h01=0x0050, text=» WAIT KVOUCH«, t00=0x000b, t01=0x0148}
0x1286…12a4 Head {h00=0x001a, h01=0x0050, text=» DSC0 .NW,KVOUCH,RLEAS«, t00=0x000b, t01=0x015c}
0x12a4…12bc Head {h00=0x0014, h01=0x0050, text=» CLEAR TTTSTFLG «, t00=0x000b, t01=0x017a}
0x12bc…12cc (12, 0, 400) Head {h00=0x000c, h01=0x0050, text=»CYTRP010«, t00=0x000c, t01=0x0004}
0x12cc…12ea Head {h00=0x001a, h01=0x0050, text=» MOVE TTLINNR,TTCYKST «, t00=0x000c, t01=0x0014}
0x12ea…1308 Head {h00=0x001a, h01=0x0050, text=» MOVE TTCYKPOS,TTLINNR«, t00=0x000c, t01=0x0032}
0x1308…1322 Head {h00=0x0016, h01=0x0050, text=» MOVE GTCYIN,GTUWB«, t00=0x000c, t01=0x0050}
0x1322…133c Head {h00=0x0016, h01=0x0050, text=» SUB GTCYIN,CBIN1 «, t00=0x000c, t01=0x006a}
0x133c…1358 Head {h00=0x0018, h01=0x0050, text=» MUL GTCYIN,CCYSIZE «, t00=0x000c, t01=0x0084}
0x1358…1372 Head {h00=0x0016, h01=0x0050, text=» ADD GTCYIN,CBIN1 «, t00=0x000c, t01=0x00a0}
0x1372…138e Head {h00=0x0018, h01=0x0050, text=» MOVE GTCYOUT,GTCYIN«, t00=0x000c, t01=0x00ba}
0x138e…13ac Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR9,=C'TRP '«, t00=0x000c, t01=0x00d6}
0x13ac…13c6 Head {h00=0x0016, h01=0x0050, text=» PERF FRMXVO,CBIN2«, t00=0x000c, t01=0x00f4}
0x13c6…13da Head {h00=0x0010, h01=0x0050, text=» PERF CYLINE«, t00=0x000c, t01=0x010e}
0x13da…13f0 Head {h00=0x0012, h01=0x0050, text=» BNOK CYTRP100«, t00=0x000c, t01=0x0122}
0x13f0…1404 Head {h00=0x0010, h01=0x0050, text=» B CYTRP150 «, t00=0x000c, t01=0x0138}
0x1404…140e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x014c}
0x140e…141e Head {h00=0x000c, h01=0x0050, text=»CYTRP100«, t00=0x000c, t01=0x0156}
0x141e…1436 Head {h00=0x0014, h01=0x0050, text=» CLEAR GTCYTRPF «, t00=0x000c, t01=0x0166}
0x1436…144c Head {h00=0x0012, h01=0x0050, text=» SET GTCYWRTF «, t00=0x000c, t01=0x017e}
0x144c…147e (13, 0, 400) Head {h00=0x002e, h01=0x0050, text=» PERF SPLIN8,CBIN3,CBIN2 ASK FOR 'NY SIDE'«, t00=0x000d, t01=0x0004}
0x147e…1498 Head {h00=0x0016, h01=0x0050, text=» PERF GRASPV GRASP«, t00=0x000d, t01=0x0036}
0x1498…14b6 Head {h00=0x001a, h01=0x0050, text=» MOVE TTCYKPOS,TTCYKST«, t00=0x000d, t01=0x0050}
0x14b6…14e4 Head {h00=0x002a, h01=0x0050, text=» MOVE TTLINNR,TTCYKST POSITION VOUCHER«, t00=0x000d, t01=0x006e}
0x14e4…1502 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,TTLINNR «, t00=0x000d, t01=0x009c}
0x1502…1522 Head {h00=0x001c, h01=0x0050, text=» DSC1 KVOUCH,POS,GSWBIN1«, t00=0x000d, t01=0x00ba}
0x1522…1556 Head {h00=0x0030, h01=0x0050, text=» MOVE GSWSTR9,=C'TRP ' SET UP TRANSPORT LINE«, t00=0x000d, t01=0x00da}
0x1556…1570 Head {h00=0x0016, h01=0x0050, text=» PERF FRMXVO,CBIN2«, t00=0x000d, t01=0x010e}
0x1570…159e Head {h00=0x002a, h01=0x0050, text=» EDWRT KVOUCH,GTSTRFMT WRITE TRP LINE «, t00=0x000d, t01=0x0128}
0x159e…15a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0156}
0x15a8…15b8 Head {h00=0x000c, h01=0x0050, text=»CYTRP150«, t00=0x000d, t01=0x0160}
0x15b8…15d2 Head {h00=0x0016, h01=0x0050, text=» SUB TTLINNR,=D'2'«, t00=0x000d, t01=0x0170}
0x15d2…15e2 Head {h00=0x000c, h01=0x0050, text=»CYTRP200«, t00=0x000d, t01=0x018a}
0x15e2…15ee Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000e, t01=0x000a}
0x15ee…15fc Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000e, t01=0x0016}
0x15fc…160a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x0024}
0x160a…1612 Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x0032}
0x1612…162a Head {h00=0x0014, h01=0x0050, text=»CYK PROC CYTYPE «, t00=0x000e, t01=0x003a}
0x162a…1646 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000e, t01=0x0052}
0x1646…1650 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x006e}
0x1650…1684 Head {h00=0x0030, h01=0x0050, text=»* HANDLE DIFFERENT TYPES OF CYCLES «, t00=0x000e, t01=0x0078}
0x1684…168e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00ac}
0x168e…16aa Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000e, t01=0x00b6}
0x16aa…16c0 Head {h00=0x0012, h01=0x0050, text=» IB CYTYPE, C«, t00=0x000e, t01=0x00d2}
0x16c0…16d2 Head {h00=0x000e, h01=0x0050, text=» CYK1, C«, t00=0x000e, t01=0x00e8}
0x16d2…16e4 Head {h00=0x000e, h01=0x0050, text=» CYK2, C«, t00=0x000e, t01=0x00fa}
0x16e4…16f8 Head {h00=0x0010, h01=0x0050, text=» CYKNOK, C«, t00=0x000e, t01=0x010c}
0x16f8…170a Head {h00=0x000e, h01=0x0050, text=» CYK4, C«, t00=0x000e, t01=0x0120}
0x170a…171c Head {h00=0x000e, h01=0x0050, text=» CYK5, C«, t00=0x000e, t01=0x0132}
0x171c…1746 Head {h00=0x0026, h01=0x0050, text=» CYKNOK,CYKNOK,CYKNOK,CYK9,CYEND «, t00=0x000e, t01=0x0144}
0x1746…1758 Head {h00=0x000e, h01=0x0050, text=» B CYKNOK «, t00=0x000e, t01=0x016e}
0x1758…1760 Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x0180}
0x1760…1768 Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x0188}
0x1768…1774 Head {h00=0x0008, h01=0x0050, text=»CYK1«, t00=0x000e, t01=0x0190}
0x1774…1790 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000f, t01=0x000c}
0x1790…179a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0028}
0x179a…17cc Head {h00=0x002e, h01=0x0050, text=»** CYK1 - START OF CYCLE FUNCTION«, t00=0x000f, t01=0x0032}
0x17cc…17d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0064}
0x17d6…17f2 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000f, t01=0x006e}
0x17f2…1818 Head {h00=0x0022, h01=0x0050, text=» TBT TTLSTFLG,CYK1NOK IN LISTE«, t00=0x000f, t01=0x008a}
0x1818…1840 Head {h00=0x0024, h01=0x0050, text=» TBT TTCY2FLG,CYK1NOK IN CYCLE 2«, t00=0x000f, t01=0x00b0}
0x1840…185e Head {h00=0x001a, h01=0x0050, text=» TBT TTCY5FLG,CYK1NOK «, t00=0x000f, t01=0x00d8}
0x185e…1874 Head {h00=0x0012, h01=0x0050, text=» SET TTCY0FLG «, t00=0x000f, t01=0x00f6}
0x1874…188a Head {h00=0x0012, h01=0x0050, text=» SET TTCY1FLG «, t00=0x000f, t01=0x010c}
0x188a…18b0 Head {h00=0x0022, h01=0x0050, text=» MOVE TTCYM,=C'C' FOR JOURNAL «, t00=0x000f, t01=0x0122}
0x18b0…18da Head {h00=0x0026, h01=0x0050, text=» MOVE GTTEXT,=C'CYKLE ' FOR SCREEN«, t00=0x000f, t01=0x0148}
0x18da…18ee Head {h00=0x0010, h01=0x0050, text=» PERF CYKINT«, t00=0x000f, t01=0x0172}
0x18ee…18fe Head {h00=0x000c, h01=0x0050, text=» B CYKOK«, t00=0x000f, t01=0x0186}
0x18fe…190e Head {h00=0x000c, h01=0x0050, text=»CYK1NOK «, t00=0x0010, t01=0x0008}
0x190e…1920 Head {h00=0x000e, h01=0x0050, text=» B CYKNOK «, t00=0x0010, t01=0x0018}
0x1920…1928 Head {h00=0x0004, h01=0x0050, t00=0x0010, t01=0x002a}
0x1928…1930 Head {h00=0x0004, h01=0x0050, t00=0x0010, t01=0x0032}
0x1930…193c Head {h00=0x0008, h01=0x0050, text=»CYK2«, t00=0x0010, t01=0x003a}
0x193c…1958 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0010, t01=0x0046}
0x1958…1962 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0062}
0x1962…1994 Head {h00=0x002e, h01=0x0050, text=»** CYK2 - START OF STABEL FUNCTION«, t00=0x0010, t01=0x006c}
0x1994…199e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x009e}
0x199e…19ba Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0010, t01=0x00a8}
0x19ba…19e0 Head {h00=0x0022, h01=0x0050, text=» TBT TTLSTFLG,CYK2NOK IN LISTE«, t00=0x0010, t01=0x00c4}
0x19e0…1a08 Head {h00=0x0024, h01=0x0050, text=» TBT TTCY1FLG,CYK2NOK IN CYCLE 1«, t00=0x0010, t01=0x00ea}
0x1a08…1a26 Head {h00=0x001a, h01=0x0050, text=» TBT TTCY5FLG,CYK2NOK «, t00=0x0010, t01=0x0112}
0x1a26…1a3c Head {h00=0x0012, h01=0x0050, text=» SET TTCY0FLG «, t00=0x0010, t01=0x0130}
0x1a3c…1a52 Head {h00=0x0012, h01=0x0050, text=» SET TTCY2FLG «, t00=0x0010, t01=0x0146}
0x1a52…1a78 Head {h00=0x0022, h01=0x0050, text=» MOVE TTCYM,=C'S' FOR JOURNAL «, t00=0x0010, t01=0x015c}
0x1a78…1aa2 Head {h00=0x0026, h01=0x0050, text=» MOVE GTTEXT,=C'STABEL' FOR SCREEN«, t00=0x0010, t01=0x0182}
0x1aa2…1ab6 Head {h00=0x0010, h01=0x0050, text=» PERF CYKINT«, t00=0x0011, t01=0x001c}
0x1ab6…1ac6 Head {h00=0x000c, h01=0x0050, text=» B CYKOK«, t00=0x0011, t01=0x0030}
0x1ac6…1ad6 Head {h00=0x000c, h01=0x0050, text=»CYK2NOK «, t00=0x0011, t01=0x0040}
0x1ad6…1ae8 Head {h00=0x000e, h01=0x0050, text=» B CYKNOK «, t00=0x0011, t01=0x0050}
0x1ae8…1af0 Head {h00=0x0004, h01=0x0050, t00=0x0011, t01=0x0062}
0x1af0…1af8 Head {h00=0x0004, h01=0x0050, t00=0x0011, t01=0x006a}
0x1af8…1b04 Head {h00=0x0008, h01=0x0050, text=»CYK4«, t00=0x0011, t01=0x0072}
0x1b04…1b20 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0011, t01=0x007e}
0x1b20…1b2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x009a}
0x1b2a…1b5c Head {h00=0x002e, h01=0x0050, text=»* CYK4 - PAUSE IN CYCLE / STABEL «, t00=0x0011, t01=0x00a4}
0x1b5c…1b66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00d6}
0x1b66…1b82 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0011, t01=0x00e0}
0x1b82…1b9e Head {h00=0x0018, h01=0x0050, text=» TBF GTCYFLG,CYK4NOK«, t00=0x0011, t01=0x00fc}
0x1b9e…1bba Head {h00=0x0018, h01=0x0050, text=» TBT GTCYWRTF,CYKSUB«, t00=0x0011, t01=0x0118}
0x1bba…1bf0 Head {h00=0x0032, h01=0x0050, text=» MOVE TTARKSAV,GTDUPF(CBIN9) SAVE ARKIV KNT NR«, t00=0x0011, t01=0x0134}
0x1bf0…1c32 Head {h00=0x003e, h01=0x0050, text=» SET TTPSEFLG INDICATE BREAK «, t00=0x0011, t01=0x016a}
0x1c32…1c4e Head {h00=0x0018, h01=0x0050, text=» MOVE GTCYSUM,GTSUM «, t00=0x0012, t01=0x001c}
0x1c4e…1c6c Head {h00=0x001a, h01=0x0050, text=» MOVE GTPSELIN,TTLINNR«, t00=0x0012, t01=0x0038}
0x1c6c…1c80 Head {h00=0x0010, h01=0x0050, text=» PERF CYCLR «, t00=0x0012, t01=0x0056}
0x1c80…1caa Head {h00=0x0026, h01=0x0050, text=» ERASE 0,CBIN8,CBIN8 ERASE LINE 8 «, t00=0x0012, t01=0x006a}
0x1caa…1cbe Head {h00=0x0010, h01=0x0050, text=» PERF SPINF1«, t00=0x0012, t01=0x0094}
0x1cbe…1cce Head {h00=0x000c, h01=0x0050, text=» B CYKOK«, t00=0x0012, t01=0x00a8}
0x1cce…1cde Head {h00=0x000c, h01=0x0050, text=»CYK4NOK «, t00=0x0012, t01=0x00b8}
0x1cde…1cf0 Head {h00=0x000e, h01=0x0050, text=» B CYKNOK «, t00=0x0012, t01=0x00c8}
0x1cf0…1cfe Head {h00=0x000a, h01=0x0050, text=»CYKSUB«, t00=0x0012, t01=0x00da}
0x1cfe…1d12 Head {h00=0x0010, h01=0x0050, text=» PERF SUBTOT«, t00=0x0012, t01=0x00e8}
0x1d12…1d22 Head {h00=0x000c, h01=0x0050, text=» B CYKOK«, t00=0x0012, t01=0x00fc}
0x1d22…1d2a Head {h00=0x0004, h01=0x0050, t00=0x0012, t01=0x010c}
0x1d2a…1d32 Head {h00=0x0004, h01=0x0050, t00=0x0012, t01=0x0114}
0x1d32…1d3e Head {h00=0x0008, h01=0x0050, text=»CYK5«, t00=0x0012, t01=0x011c}
0x1d3e…1d5a Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0012, t01=0x0128}
0x1d5a…1d64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0144}
0x1d64…1d88 Head {h00=0x0020, h01=0x0050, text=»* CYK5 - VIBORG ONLY «, t00=0x0012, t01=0x014e}
0x1d88…1d92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0172}
0x1d92…1dae Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0012, t01=0x017c}
0x1dae…1dc2 Head {h00=0x0010, h01=0x0050, text=»* TRANS 8-9 «, t00=0x0013, t01=0x0008}
0x1dc2…1de2 Head {h00=0x001c, h01=0x0050, text=»* MOST FIELDS AUTODUPPED«, t00=0x0013, t01=0x001c}
0x1de2…1df8 Head {h00=0x0012, h01=0x0050, text=»* NOT DUPPED: «, t00=0x0013, t01=0x003c}
0x1df8…1e10 Head {h00=0x0014, h01=0x0050, text=»* REGKONTONR«, t00=0x0013, t01=0x0052}
0x1e10…1e24 Head {h00=0x0010, h01=0x0050, text=»* BELOB «, t00=0x0013, t01=0x006a}
0x1e24…1e3c Head {h00=0x0014, h01=0x0050, text=»* CPR/CIRNR «, t00=0x0013, t01=0x007e}
0x1e3c…1e46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0096}
0x1e46…1e60 Head {h00=0x0016, h01=0x0050, text=» TBF CCYK5,CYK5NOK«, t00=0x0013, t01=0x00a0}
0x1e60…1e84 Head {h00=0x0020, h01=0x0050, text=» CBL GTREGDEX,CBIN8,CYK5NOK «, t00=0x0013, t01=0x00ba}
0x1e84…1ea8 Head {h00=0x0020, h01=0x0050, text=» CBG GTREGDEX,CBIN9,CYK5NOK «, t00=0x0013, t01=0x00de}
0x1ea8…1ecc Head {h00=0x0020, h01=0x0050, text=» TBT TTLSTFLG,CYK5NOK LISTE?«, t00=0x0013, t01=0x0102}
0x1ecc…1eea Head {h00=0x001a, h01=0x0050, text=» TBT TTCY2FLG,CYK5NOK «, t00=0x0013, t01=0x0126}
0x1eea…1f06 Head {h00=0x0018, h01=0x0050, text=» TBT TTCY5FLG,CYK510«, t00=0x0013, t01=0x0144}
0x1f06…1f24 Head {h00=0x001a, h01=0x0050, text=» TBT TTCY1FLG,CYK5NOK «, t00=0x0013, t01=0x0160}
0x1f24…1f32 Head {h00=0x000a, h01=0x0050, text=»CYK510«, t00=0x0013, t01=0x017e}
0x1f32…1f48 Head {h00=0x0012, h01=0x0050, text=» SET TTCY0FLG «, t00=0x0013, t01=0x018c}
0x1f48…1f5e Head {h00=0x0012, h01=0x0050, text=» SET TTCY1FLG «, t00=0x0014, t01=0x0012}
0x1f5e…1f74 Head {h00=0x0012, h01=0x0050, text=» SET TTCY5FLG «, t00=0x0014, t01=0x0028}
0x1f74…1f88 Head {h00=0x0010, h01=0x0050, text=» PERF CLRSW «, t00=0x0014, t01=0x003e}
0x1f88…1fa2 Head {h00=0x0016, h01=0x0050, text=» MOVE TTCYM,=C'C' «, t00=0x0014, t01=0x0052}
0x1fa2…1fc2 Head {h00=0x001c, h01=0x0050, text=» MOVE GTTEXT,=C'CYK 5 ' «, t00=0x0014, t01=0x006c}
0x1fc2…1fd6 Head {h00=0x0010, h01=0x0050, text=» PERF CYKINT«, t00=0x0014, t01=0x008c}
0x1fd6…1fe6 Head {h00=0x000c, h01=0x0050, text=» B CYKOK«, t00=0x0014, t01=0x00a0}
0x1fe6…1ff6 Head {h00=0x000c, h01=0x0050, text=»CYK5NOK «, t00=0x0014, t01=0x00b0}
0x1ff6…2008 Head {h00=0x000e, h01=0x0050, text=» B CYKNOK «, t00=0x0014, t01=0x00c0}
0x2008…2010 Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x00d2}
0x2010…2018 Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x00da}
0x2018…2020 Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x00e2}
0x2020…202c Head {h00=0x0008, h01=0x0050, text=»CYK9«, t00=0x0014, t01=0x00ea}
0x202c…2048 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0014, t01=0x00f6}
0x2048…2052 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0112}
0x2052…2080 Head {h00=0x002a, h01=0x0050, text=»** CYK9 - CLEAR ARKIV KONTO NR«, t00=0x0014, t01=0x011c}
0x2080…208a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x014a}
0x208a…20a6 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0014, t01=0x0154}
0x20a6…20c2 Head {h00=0x0018, h01=0x0050, text=» TBT TTCY1FLG,CYK9A «, t00=0x0014, t01=0x0170}
0x20c2…20de Head {h00=0x0018, h01=0x0050, text=» TBT TTCY5FLG,CYK9A «, t00=0x0014, t01=0x018c}
0x20de…20f0 Head {h00=0x000e, h01=0x0050, text=» B CYK9NOK«, t00=0x0015, t01=0x0018}
0x20f0…20fe Head {h00=0x000a, h01=0x0050, text=»CYK9A «, t00=0x0015, t01=0x002a}
0x20fe…2128 Head {h00=0x0026, h01=0x0050, text=» MOVE TTARKSAV,=D'0' CLEAR NUMBER «, t00=0x0015, t01=0x0038}
0x2128…2138 Head {h00=0x000c, h01=0x0050, text=» B CYKOK«, t00=0x0015, t01=0x0062}
0x2138…2148 Head {h00=0x000c, h01=0x0050, text=»CYK9NOK «, t00=0x0015, t01=0x0072}
0x2148…215a Head {h00=0x000e, h01=0x0050, text=» B CYKNOK «, t00=0x0015, t01=0x0082}
0x215a…2162 Head {h00=0x0004, h01=0x0050, t00=0x0015, t01=0x0094}
0x2162…216a Head {h00=0x0004, h01=0x0050, t00=0x0015, t01=0x009c}
0x216a…2178 Head {h00=0x000a, h01=0x0050, text=»CYEND «, t00=0x0015, t01=0x00a4}
0x2178…2194 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0015, t01=0x00b2}
0x2194…219e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00ce}
0x219e…21c6 Head {h00=0x0024, h01=0x0050, text=»** CYEND - END OF CYCLE«, t00=0x0015, t01=0x00d8}
0x21c6…21d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0100}
0x21d0…21fc Head {h00=0x0028, h01=0x0050, text=»** WRITE TOTAL LINE ON VOUCHER«, t00=0x0015, t01=0x010a}
0x21fc…2206 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0136}
0x2206…2222 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0015, t01=0x0140}
0x2222…2250 Head {h00=0x002a, h01=0x0050, text=» TBF GTCYFLG,CYENDNOK ONLY IF IN CYCLE«, t00=0x0015, t01=0x015c}
0x2250…226e Head {h00=0x001a, h01=0x0050, text=» TBT TTCY2FLG,CYEND10 «, t00=0x0015, t01=0x018a}
0x226e…22a8 Head {h00=0x0036, h01=0x0050, text=» CBNE GTSUM,=D'0',CYEND30 SUM CORRECT? (ONLY CY1) «, t00=0x0016, t01=0x0018}
0x22a8…22b8 Head {h00=0x000c, h01=0x0050, text=»CYEND10 «, t00=0x0016, t01=0x0052}
0x22b8…22f6 Head {h00=0x003a, h01=0x0050, text=» CLEAR TTSUMFLG CLEAR FLAGS«, t00=0x0016, t01=0x0062}
0x22f6…2316 Head {h00=0x001c, h01=0x0050, text=» CLEAR GTCYFLG«, t00=0x0016, t01=0x00a0}
0x2316…2334 Head {h00=0x001a, h01=0x0050, text=» TBF TTCYTRFL,CYEND20 «, t00=0x0016, t01=0x00c0}
0x2334…234e Head {h00=0x0016, h01=0x0050, text=» PERF CYOUT,CBIN0 «, t00=0x0016, t01=0x00de}
0x234e…2370 Head {h00=0x001e, h01=0x0050, text=» CLEAR TTTSTFLG «, t00=0x0016, t01=0x00f8}
0x2370…2384 Head {h00=0x0010, h01=0x0050, text=» WAIT KVOUCH«, t00=0x0016, t01=0x011a}
0x2384…23a2 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,TTLINNR «, t00=0x0016, t01=0x012e}
0x23a2…23d4 Head {h00=0x002e, h01=0x0050, text=» DSC1 KVOUCH,POS,GSWBIN1 POSITION VOUCHER «, t00=0x0016, t01=0x014c}
0x23d4…23f6 Head {h00=0x001e, h01=0x0050, text=» MOVE GSWSTR9,=C'TOTAL '«, t00=0x0016, t01=0x017e}
0x23f6…2422 Head {h00=0x0028, h01=0x0050, text=» PERF FRMXVO,CBIN2 GET TOTAL FORMAT «, t00=0x0017, t01=0x0010}
0x2422…2452 Head {h00=0x002c, h01=0x0050, text=» EDWRT KVOUCH,GTSTRFMT EDWRT ON VOUCHER «, t00=0x0017, t01=0x003c}
0x2452…2496 Head {h00=0x0040, h01=0x0050, text=» DSC0 KVOUCH,RLEAS RELEASE VOUCHER«, t00=0x0017, t01=0x006c}
0x2496…24b2 Head {h00=0x0018, h01=0x0050, text=» TBF TSPOOL,CYEND14 «, t00=0x0017, t01=0x00b0}
0x24b2…24ce Head {h00=0x0018, h01=0x0050, text=» TBT CSPOOL,CYEND15 «, t00=0x0017, t01=0x00cc}
0x24ce…24de Head {h00=0x000c, h01=0x0050, text=»CYEND14 «, t00=0x0017, t01=0x00e8}
0x24de…24fa Head {h00=0x0018, h01=0x0050, text=» PERF WRITJT,=W'15' «, t00=0x0017, t01=0x00f8}
0x24fa…250a Head {h00=0x000c, h01=0x0050, text=»CYEND15 «, t00=0x0017, t01=0x0114}
0x250a…2526 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'26'«, t00=0x0017, t01=0x0124}
0x2526…2542 Head {h00=0x0018, h01=0x0050, text=» PERF WRITLO,GSWBIN1«, t00=0x0017, t01=0x0140}
0x2542…257c Head {h00=0x0036, h01=0x0050, text=» CBL GTREGNR,=D'18',CYEND20 CHECKS?«, t00=0x0017, t01=0x015c}
0x257c…259e Head {h00=0x001e, h01=0x0050, text=» SET TTTSTFLG «, t00=0x0018, t01=0x0008}
0x259e…25e2 Head {h00=0x0040, h01=0x0050, text=» MOVE GTREGF(CBIN4),GTSUM FIND TOTAL VALUE «, t00=0x0018, t01=0x002a}
0x25e2…2620 Head {h00=0x003a, h01=0x0050, text=» PERF WCHECK WRITE CHECK«, t00=0x0018, t01=0x006e}
0x2620…2630 Head {h00=0x000c, h01=0x0050, text=»CYEND20 «, t00=0x0018, t01=0x00ac}
0x2630…2648 Head {h00=0x0014, h01=0x0050, text=» CLEAR TTTSTFLG «, t00=0x0018, t01=0x00bc}
0x2648…265c Head {h00=0x0010, h01=0x0050, text=» PERF CLRSW «, t00=0x0018, t01=0x00d4}
0x265c…2674 Head {h00=0x0014, h01=0x0050, text=» CLEAR TTCY0FLG «, t00=0x0018, t01=0x00e8}
0x2674…268c Head {h00=0x0014, h01=0x0050, text=» CLEAR TTCY5FLG «, t00=0x0018, t01=0x0100}
0x268c…26a4 Head {h00=0x0014, h01=0x0050, text=» CLEAR TTCY1FLG «, t00=0x0018, t01=0x0118}
0x26a4…26c6 Head {h00=0x001e, h01=0x0050, text=» CLEAR TTCY2FLG «, t00=0x0018, t01=0x0130}
0x26c6…26da Head {h00=0x0010, h01=0x0050, text=» PERF CYCLR «, t00=0x0018, t01=0x0152}
0x26da…26ec Head {h00=0x000e, h01=0x0050, text=» B CYENDOK«, t00=0x0018, t01=0x0166}
0x26ec…26fc Head {h00=0x000c, h01=0x0050, text=»CYEND30 «, t00=0x0018, t01=0x0178}
0x26fc…273e Head {h00=0x003e, h01=0x0050, text=» MOVE SPBINW4,=W'12' SET ERRORCODE «, t00=0x0018, t01=0x0188}
0x273e…275c Head {h00=0x001a, h01=0x0050, text=» PERF SPERR«, t00=0x0019, t01=0x003a}
0x275c…2780 Head {h00=0x0020, h01=0x0050, text=» IB SPBINW2,CYENDCNT,CYEND10«, t00=0x0019, t01=0x0058}
0x2780…2790 Head {h00=0x000c, h01=0x0050, text=»CYENDOK «, t00=0x0019, t01=0x007c}
0x2790…27ac Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'24'«, t00=0x0019, t01=0x008c}
0x27ac…27d4 Head {h00=0x0024, h01=0x0050, text=» ERASE 0,GSWBIN1,GSWBIN1 LINE 24«, t00=0x0019, t01=0x00a8}
0x27d4…27fe Head {h00=0x0026, h01=0x0050, text=» ERASE 0,CBIN8,CBIN8 ERASE LINE 8 «, t00=0x0019, t01=0x00d0}
0x27fe…2812 Head {h00=0x0010, h01=0x0050, text=» PERF SPINF1«, t00=0x0019, t01=0x00fa}
0x2812…2822 Head {h00=0x000c, h01=0x0050, text=»CYENDCNT«, t00=0x0019, t01=0x010e}
0x2822…2830 Head {h00=0x000a, h01=0x0050, text=»CYKOK «, t00=0x0019, t01=0x011e}
0x2830…284c Head {h00=0x0018, h01=0x0050, text=» CMP CBIN0,CBIN0 OK «, t00=0x0019, t01=0x012c}
0x284c…2858 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0019, t01=0x0148}
0x2858…2868 Head {h00=0x000c, h01=0x0050, text=»CYENDNOK«, t00=0x0019, t01=0x0154}
0x2868…2876 Head {h00=0x000a, h01=0x0050, text=»CYKNOK«, t00=0x0019, t01=0x0164}
0x2876…2892 Head {h00=0x0018, h01=0x0050, text=» CMP CBIN1,CBIN0 NOK«, t00=0x0019, t01=0x0172}
0x2892…289e Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0019, t01=0x018e}
0x289e…28ac Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x001a, t01=0x000a}
0x28ac…28b4 Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x0018}
0x28b4…28bc Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x0020}
0x28bc…28d2 Head {h00=0x0012, h01=0x0050, text=»CYKINT PROC «, t00=0x001a, t01=0x0028}
0x28d2…28ee Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x001a, t01=0x003e}
0x28ee…28f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x005a}
0x28f8…292a Head {h00=0x002e, h01=0x0050, text=»** CYKINT - START OR END OF CYCLE«, t00=0x001a, t01=0x0064}
0x292a…2934 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0096}
0x2934…296e Head {h00=0x0036, h01=0x0050, text=»** START SET RELEVANT INFORMATION AND READ«, t00=0x001a, t01=0x00a0}
0x296e…29aa Head {h00=0x0038, h01=0x0050, text=»** ARKIV KNT.NR, KONTROLSUM AND LRER-9«, t00=0x001a, t01=0x00da}
0x29aa…29b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0116}
0x29b4…29e8 Head {h00=0x0030, h01=0x0050, text=»** END CLEAR RELEVANT INFORMATION «, t00=0x001a, t01=0x0120}
0x29e8…29f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0154}
0x29f2…2a0e Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x001a, t01=0x015e}
0x2a0e…2a3e Head {h00=0x002c, h01=0x0050, text=» TBF GTCYFLG,CY10 TRUE- ALREADY IN CYCLE«, t00=0x001a, t01=0x017a}
0x2a3e…2a84 Head {h00=0x0042, h01=0x0050, text=» TBT TTPSEFLG,CY05 TRUE- IN PAUSE STATE«, t00=0x001b, t01=0x001a}
0x2a84…2a9c Head {h00=0x0014, h01=0x0050, text=» PERF CYK,CBIN10«, t00=0x001b, t01=0x0060}
0x2a9c…2aa8 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001b, t01=0x0078}
0x2aa8…2ab4 Head {h00=0x0008, h01=0x0050, text=»CY05«, t00=0x001b, t01=0x0084}
0x2ab4…2ac8 Head {h00=0x0010, h01=0x0050, text=» PERF CYCLR «, t00=0x001b, t01=0x0090}
0x2ac8…2ad4 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001b, t01=0x00a4}
0x2ad4…2ae0 Head {h00=0x0008, h01=0x0050, text=»CY10«, t00=0x001b, t01=0x00b0}
0x2ae0…2b0c Head {h00=0x0028, h01=0x0050, text=» SET TTSUMFLG INDICATE SUM ON SCREEN«, t00=0x001b, t01=0x00bc}
0x2b0c…2b30 Head {h00=0x0020, h01=0x0050, text=» SET GTCYFLG INDICATE CYCLE «, t00=0x001b, t01=0x00e8}
0x2b30…2b74 Head {h00=0x0040, h01=0x0050, text=» TBF TTPSEFLG,CY30 TRUE- PAUSE STATE«, t00=0x001b, t01=0x010c}
0x2b74…2bb4 Head {h00=0x003c, h01=0x0050, text=» MOVE GTSUM,GTCYSUM GET SAVED SUM«, t00=0x001b, t01=0x0150}
0x2bb4…2bfe Head {h00=0x0046, h01=0x0050, text=» MOVE GTREGF(CBIN9),TTARKSAV GET SAVED ARKIV KNT.NR «, t00=0x001b, t01=0x0190}
0x2bfe…2c1e Head {h00=0x001c, h01=0x0050, text=» CBG GTPSELIN,CBIN0,CY20«, t00=0x001c, t01=0x004a}
0x2c1e…2c4e Head {h00=0x002c, h01=0x0050, text=» MOVE GTPSELIN,TTCYKST RESET START LINE «, t00=0x001c, t01=0x006a}
0x2c4e…2c6c Head {h00=0x001a, h01=0x0050, text=» MOVE TTCYKPOS,TTCYKST«, t00=0x001c, t01=0x009a}
0x2c6c…2c78 Head {h00=0x0008, h01=0x0050, text=»CY20«, t00=0x001c, t01=0x00b8}
0x2c78…2c96 Head {h00=0x001a, h01=0x0050, text=» MOVE TTLINNR,GTPSELIN«, t00=0x001c, t01=0x00c4}
0x2c96…2cdc Head {h00=0x0042, h01=0x0050, text=» CLEAR TTPSEFLG OUT OF PAUSE STATE «, t00=0x001c, t01=0x00e2}
0x2cdc…2cec Head {h00=0x000c, h01=0x0050, text=» B CY90 «, t00=0x001c, t01=0x0128}
0x2cec…2cf8 Head {h00=0x0008, h01=0x0050, text=»CY30«, t00=0x001c, t01=0x0138}
0x2cf8…2d2a Head {h00=0x002e, h01=0x0050, text=» MOVE GTREGF(CBIN9),=D'0' INITIATE VALUES «, t00=0x001c, t01=0x0144}
0x2d2a…2d46 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD6,=D'0' «, t00=0x001c, t01=0x0176}
0x2d46…2d6a (29, 0, 400) Head {h00=0x0020, h01=0x0050, text=» MOVE GTSUM,=D'0'«, t00=0x001d, t01=0x0004}
0x2d6a…2d86 Head {h00=0x0018, h01=0x0050, text=» MOVE TTCYKTOT,=D'0'«, t00=0x001d, t01=0x0028}
0x2d86…2d9e Head {h00=0x0014, h01=0x0050, text=» CLEAR TTCYTRFL «, t00=0x001d, t01=0x0044}
0x2d9e…2dce Head {h00=0x002c, h01=0x0050, text=» MOVE TTCYKST,=D'1' START LINE NEW PAGE «, t00=0x001d, t01=0x005c}
0x2dce…2df4 Head {h00=0x0022, h01=0x0050, text=» MOVE TTLINNR,=D'1'«, t00=0x001d, t01=0x008c}
0x2df4…2e40 Head {h00=0x0048, h01=0x0050, text=» PERF FRMXSP,CBIN11 GET FORMAT FOR CYCLE INF«, t00=0x001d, t01=0x00b2}
0x2e40…2e5e Head {h00=0x001a, h01=0x0050, text=» SET SPPROMPT «, t00=0x001d, t01=0x00fe}
0x2e5e…2eaa Head {h00=0x0048, h01=0x0050, text=» PERF SPCLRN WRITE AND READ ON SCREEN «, t00=0x001d, t01=0x011c}
0x2eaa…2eca Head {h00=0x001c, h01=0x0050, text=» CLEAR SPPROMPT «, t00=0x001d, t01=0x0168}
0x2eca…2efa Head {h00=0x002c, h01=0x0050, text=» IB SPBINW2,CY45,CY45,CY50 «, t00=0x001d, t01=0x0188}
0x2efa…2f16 Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW4,=W'4' «, t00=0x001e, t01=0x0028}
0x2f16…2f34 Head {h00=0x001a, h01=0x0050, text=» PERF SPERR«, t00=0x001e, t01=0x0044}
0x2f34…2f52 Head {h00=0x001a, h01=0x0050, text=» B CY30 «, t00=0x001e, t01=0x0062}
0x2f52…2f64 Head {h00=0x000e, h01=0x0050, text=»CY45 MAK«, t00=0x001e, t01=0x0080}
0x2f64…2f7c Head {h00=0x0014, h01=0x0050, text=» CLEAR TTCY1FLG «, t00=0x001e, t01=0x0092}
0x2f7c…2f94 Head {h00=0x0014, h01=0x0050, text=» CLEAR TTCY2FLG «, t00=0x001e, t01=0x00aa}
0x2f94…2fac Head {h00=0x0014, h01=0x0050, text=» CLEAR TTCY5FLG «, t00=0x001e, t01=0x00c2}
0x2fac…2fbc Head {h00=0x000c, h01=0x0050, text=» B CY05 «, t00=0x001e, t01=0x00da}
0x2fbc…2fc8 Head {h00=0x0008, h01=0x0050, text=»CY50«, t00=0x001e, t01=0x00ea}
0x2fc8…2fe8 Head {h00=0x001c, h01=0x0050, text=» CBL TTCYKST,=D'25',CY54«, t00=0x001e, t01=0x00f6}
0x2fe8…3004 Head {h00=0x0018, h01=0x0050, text=» MOVE TTCYKST,=D'1' «, t00=0x001e, t01=0x0116}
0x3004…3010 Head {h00=0x0008, h01=0x0050, text=»CY54«, t00=0x001e, t01=0x0132}
0x3010…302e Head {h00=0x001a, h01=0x0050, text=» MOVE SPINPUT,TTCYKST «, t00=0x001e, t01=0x013e}
0x302e…3042 Head {h00=0x0010, h01=0x0050, text=» PERF SPCHK5«, t00=0x001e, t01=0x015c}
0x3042…3060 Head {h00=0x001a, h01=0x0050, text=» MOVE TTCYKST,GSWBIN1 «, t00=0x001e, t01=0x0170}
0x3060…3080 Head {h00=0x001c, h01=0x0050, text=» CBL TTLINNR,=D'27',CY55«, t00=0x001e, t01=0x018e}
0x3080…309c Head {h00=0x0018, h01=0x0050, text=» MOVE TTLINNR,=D'1' «, t00=0x001f, t01=0x001e}
0x309c…30a8 Head {h00=0x0008, h01=0x0050, text=»CY55«, t00=0x001f, t01=0x003a}
0x30a8…30c6 Head {h00=0x001a, h01=0x0050, text=» MOVE SPINPUT,TTLINNR «, t00=0x001f, t01=0x0046}
0x30c6…30da Head {h00=0x0010, h01=0x0050, text=» PERF SPCHK5«, t00=0x001f, t01=0x0064}
0x30da…310a Head {h00=0x002c, h01=0x0050, text=» MOVE TTLINNR,GSWBIN1 FIND LINNE NUMBER «, t00=0x001f, t01=0x0078}
0x310a…3126 Head {h00=0x0018, h01=0x0050, text=» MOVE GTSUM,GSWBCD6 «, t00=0x001f, t01=0x00a8}
0x3126…314a Head {h00=0x0020, h01=0x0050, text=» MOVE TTARKSAV,GTREGF(CBIN9)«, t00=0x001f, t01=0x00c4}
0x314a…3168 Head {h00=0x001a, h01=0x0050, text=» MOVE TTCYKPOS,TTLINNR«, t00=0x001f, t01=0x00e8}
0x3168…3182 Head {h00=0x0016, h01=0x0050, text=» MOVE GTCYIN,GTUWB«, t00=0x001f, t01=0x0106}
0x3182…319c Head {h00=0x0016, h01=0x0050, text=» SUB GTCYIN,CBIN1 «, t00=0x001f, t01=0x0120}
0x319c…31b8 Head {h00=0x0018, h01=0x0050, text=» MUL GTCYIN,CCYSIZE «, t00=0x001f, t01=0x013a}
0x31b8…31d2 Head {h00=0x0016, h01=0x0050, text=» ADD GTCYIN,CBIN1 «, t00=0x001f, t01=0x0156}
0x31d2…31ee Head {h00=0x0018, h01=0x0050, text=» MOVE GTCYOUT,GTCYIN«, t00=0x001f, t01=0x0170}
0x31ee…31fa Head {h00=0x0008, h01=0x0050, text=»CY90«, t00=0x001f, t01=0x018c}
0x31fa…3212 Head {h00=0x0014, h01=0x0050, text=» CLEAR TTTSTFLG «, t00=0x0020, t01=0x0008}
0x3212…3228 Head {h00=0x0012, h01=0x0050, text=» SET GTCYWRTF «, t00=0x0020, t01=0x0020}
0x3228…3242 Head {h00=0x0016, h01=0x0050, text=» TBT CCYWRTF,CY95 «, t00=0x0020, t01=0x0036}
0x3242…325a Head {h00=0x0014, h01=0x0050, text=» CLEAR GTCYWRTF «, t00=0x0020, t01=0x0050}
0x325a…3266 Head {h00=0x0008, h01=0x0050, text=»CY95«, t00=0x0020, t01=0x0068}
0x3266…327a Head {h00=0x0010, h01=0x0050, text=» RET«, t00=0x0020, t01=0x0074}
0x327a…3290 Head {h00=0x0012, h01=0x0050, text=» PEND «, t00=0x0020, t01=0x0088}
0x3290…329a Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0020, t01=0x009e}
0x329a…32ac Head {h00=0x000e, h01=0x0050, text=»CYCLR PROC«, t00=0x0020, t01=0x00a8}
0x32ac…32c8 Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x0020, t01=0x00ba}
0x32c8…32d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00d6}
0x32d2…3304 Head {h00=0x002e, h01=0x0050, text=»** CYCLR - CLEAR CYCLEINFORMATION «, t00=0x0020, t01=0x00e0}
0x3304…330e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0112}
0x330e…3328 Head {h00=0x0016, h01=0x0050, text=»******************«, t00=0x0020, t01=0x011c}
0x3328…334e Head {h00=0x0022, h01=0x0050, text=» MOVE GTTEXT,=C' ' «, t00=0x0020, t01=0x0136}
0x334e…3372 Head {h00=0x0020, h01=0x0050, text=» MOVE TTCYM,=C' '«, t00=0x0020, t01=0x015c}
0x3372…339e Head {h00=0x0028, h01=0x0050, text=» MOVE GTREGF(CBIN9),=D'0'«, t00=0x0020, t01=0x0180}
0x339e…33c2 Head {h00=0x0020, h01=0x0050, text=» MOVE GTSUM,=D'0'«, t00=0x0021, t01=0x001c}
0x33c2…33e2 Head {h00=0x001c, h01=0x0050, text=» CLEAR GTCYFLG«, t00=0x0021, t01=0x0040}
0x33e2…3404 Head {h00=0x001e, h01=0x0050, text=» CLEAR TTSUMFLG «, t00=0x0021, t01=0x0060}
0x3404…341c Head {h00=0x0014, h01=0x0050, text=» CLEAR TTTSTFLG «, t00=0x0021, t01=0x0082}
0x341c…3434 Head {h00=0x0014, h01=0x0050, text=» CLEAR GTCYTRPF «, t00=0x0021, t01=0x009a}
0x3434…345e Head {h00=0x0026, h01=0x0050, text=» DSC0 KVOUCH,RLEAS RELEASE VOUCHER«, t00=0x0021, t01=0x00b2}
0x345e…346a Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0021, t01=0x00dc}
0x346a…3480 Head {h00=0x0012, h01=0x0050, text=» PEND «, t00=0x0021, t01=0x00e8}
0x3480…3494 Head {h00=0x0010, h01=0x0050, text=» END«, t00=0x0021, t01=0x00fe}
0x3494…3498 Head {h00=0x4004, h01=0x0000}
0x3498…349c 00 21 01 12 ┆ ! ┆
0x349c…34a4 (34, 1, 8) 20 04 00 00 00 22 00 04 ┆ " ┆
0x34a4…34f4 (35, 0, 400) 20 4f 4e 20 50 52 49 4e 54 45 52 20 00 22 01 80 00 06 00 50 2a 20 00 23 00 14 00 28 00 50 2a 5c 41 39 3d 4e 55 4d 42 45 52 20 4f 46 20 43 48 41 52 20 49 4e 20 50 52 49 4e 54 20 42 55 46 46 45 52 20 00 23 00 1e 00 06 00 50 2a 20 00 23 00 4a ┆ ON PRINTER " P* # ( P* A9=NUMBER OF CHAR IN PRINT BUFFER # P* # J┆
0x34f4…3544 00 06 00 50 2a 20 00 23 00 54 00 10 00 50 50 52 4c 49 4e 45 5c 45 51 55 5c 2a 00 23 00 5e 00 16 00 50 5c 49 46 54 5c 53 55 53 50 41 3d 31 5c 5c 44 4b 34 20 00 23 00 72 00 18 00 50 5c 43 46 5c 41 31 34 2c 53 4b 49 50 53 50 5c 5c 44 4b 34 20 ┆ P* # T PPRLINE EQU * # ^ P IFT SUSPA=1 DK4 # r P CF A14,SKIPSP DK4 ┆
0x3544…3594 00 23 00 8c 00 0e 00 50 5c 58 49 46 5c 5c 5c 44 4b 34 00 23 00 a8 00 2e 00 50 5c 49 4d 5c 4c 49 4e 43 4e 54 2c 54 43 41 42 41 53 5c 43 4f 55 4e 54 20 4e 42 52 20 4f 46 20 50 52 49 4e 54 4c 49 4e 45 53 20 00 23 00 ba 00 22 00 50 5c 52 46 28 ┆ # P XIF DK4 # . P IM LINCNT,TCABAS COUNT NBR OF PRINTLINES # " P RF(┆
0x3594…35e4 4e 29 5c 50 52 4c 31 30 30 5c 4e 4f 54 20 45 4e 44 20 4f 46 20 50 41 47 45 20 00 23 00 ec 00 1e 00 50 5c 4c 44 4b 5c 41 37 2c 4c 50 41 47 45 5c 45 4e 44 20 4f 46 20 50 41 47 45 20 00 23 01 12 00 0e 00 50 5c 4e 47 52 5c 41 37 2c 41 37 00 23 ┆N) PRL100 NOT END OF PAGE # P LDK A7,LPAGE END OF PAGE # P NGR A7,A7 #┆
0x35e4…3634 01 34 00 2c 00 50 5c 53 54 5c 41 37 2c 4c 49 4e 43 4e 54 2c 54 43 41 42 41 53 5c 52 45 53 45 54 20 4c 49 4e 45 20 43 4f 55 4e 54 45 52 20 00 23 01 46 00 1a 00 50 50 52 4c 31 30 30 5c 4c 44 5c 41 37 2c 45 43 42 42 41 2c 41 38 20 00 23 01 76 ┆ 4 , P ST A7,LINCNT,TCABAS RESET LINE COUNTER # F PPRL100 LD A7,ECBBA,A8 # v┆
0x3634…3684 (36, 0, 400) 00 36 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 4c 50 20 34 30 30 20 53 55 50 50 4f 52 54 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 5c 44 4b 00 24 00 04 00 28 00 50 5c 4c 43 5c 41 32 2c 32 2c 41 37 5c 47 45 54 20 46 4f ┆ 6 P********************* LP 400 SUPPORT ********* DK $ ( P LC A2,2,A7 GET FO┆
0x3684…36d4 52 4d 43 4f 4e 54 52 4f 4c 20 43 48 41 52 5c 44 4b 20 00 24 00 3e 00 24 00 50 5c 41 4e 4b 5c 41 32 2c 2f 37 46 5c 52 45 4d 4f 56 45 20 50 41 52 49 54 59 20 42 49 54 5c 44 4b 00 24 00 6a 00 16 00 50 5c 43 57 4b 5c 41 32 2c 46 4f 52 4d 46 44 ┆RMCONTROL CHAR DK $ > $ P ANK A2,/7F REMOVE PARITY BIT DK $ j P CWK A2,FORMFD┆
0x36d4…3724 5c 5c 44 4b 00 24 00 92 00 26 00 50 5c 52 46 28 4e 45 29 5c 50 52 4c 31 30 36 5c 4e 4f 2c 20 4e 4f 52 4d 41 4c 20 50 52 49 4e 54 5c 44 4b 00 24 00 ac 00 14 00 50 5c 4c 44 4b 5c 41 32 2c 2f 33 31 5c 5c 44 4b 20 00 24 00 d6 00 26 00 50 5c 53 ┆ DK $ & P RF(NE) PRL106 NO, NORMAL PRINT DK $ P LDK A2,/31 DK $ & P S┆
0x3724…3774 43 5c 41 32 2c 31 2c 41 37 5c 43 48 41 4e 47 45 20 54 4f 20 46 4f 52 4d 46 45 45 44 5c 44 4b 20 00 24 00 ee 00 12 00 50 5c 4c 44 4b 5c 41 37 2c 32 5c 5c 44 4b 20 00 24 01 18 00 26 00 50 5c 53 54 5c 41 37 2c 45 43 42 52 4c 2c 41 38 5c 52 45 ┆C A2,1,A7 CHANGE TO FORMFEED DK $ P LDK A7,2 DK $ & P ST A7,ECBRL,A8 RE┆
0x3774…37c4 51 20 4c 45 4e 47 54 48 20 3d 20 32 5c 44 4b 20 00 24 01 2e 00 16 00 50 5c 43 46 5c 41 31 34 2c 50 52 4c 4b 4d 5c 5c 44 4b 33 00 24 01 58 00 16 00 50 5c 4c 44 4b 5c 41 37 2c 4c 50 41 47 45 5c 5c 44 4b 20 00 24 01 72 00 12 00 50 5c 4e 47 52 ┆Q LENGTH = 2 DK $ . P CF A14,PRLKM DK3 $ X P LDK A7,LPAGE DK $ r P NGR┆