|
|
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: 19422 (0x4bde)
Notes: pts_type(SC)
Names: »KMDIO.SC«
└─⟦f445cacdf⟧ Bits:30009666 Philips computer tape "600111"
└─⟦this⟧ »NJ-AMT/KMDIO.SC«
IDENT KMDIO 02.03.XXX.1
DDUM KMD08
PDIV
ENTRY WRITFD
ENTRY WRITVO
ENTRY WRITJT
ENTRY WTALLY
ENTRY WRITID
ENTRY CRKJ
ENTRY GRASPV
ENTRY LINOPT
ENTRY CRVO
ENTRY WCHECK
ENTRY CLEAR8
ENTRY EDATNR
EXT RADEL
EXT SPCHK5
EXT SPLIN8
EXT SPERR
EXT FRMTJT
EXT FRMXJT
EXT ADM
EXT CYWRT
EXT FRMXVO
EXT FRMXTA
EXT ABORT
EXT RAWRIT
INCLUDE EQUATE
*
WRITFD PROC
TBF CSKIFTWN,WRFD00
PERF ADM,CBIN12 DISKETTE SKIFT
TBF CSKIFTWN,WRFD00
CMP CBIN1,CBIN0
RET
WRFD00
TBF CPFLG,WRFD010 DISC OCUPIED ?
DELAY CBIN2 YES DELAY 200 MS
B WRFD00
WRFD010
SET CPFLG
CLEAR TFELT901
CLEAR TFELT911
CLEAR TFELT921
CLEAR TFELT931
CLEAR TFELT941
CLEAR CSPLITFL
MOVE CTWBIN1,CBIN0 NO. OF WRITTEN RECORDS
PERF EDATNR
MOVE GSWBIN5,CBIN0
WRFD005
SET CSWFLAG
CBE CRECLGD,=W'128',WRFD006
CLEAR CSWFLAG
WRFD006
EDIT CPCKBUF,PCKINIT
EDIT CPCKBUF,TREC1 INSERT HEADER INF
MOVE GSWBIN3,CBIN10
MOVE GSWBIN4,CRECLGD
SUB GSWBIN4,CBIN11
MATCH CPCKBUF,GSWBIN3,GSWBIN4,CBLANKS,CBIN0,CBIN2
MOVE GSWBIN4,CRECLGD
SUB GSWBIN4,CBIN1
SUB GSWBIN4,GSWBIN3 REMAINING LENGTH
CBE GTREGNR,=D'12',WRFD070
TBT CSPLITFL,WRFD025 IF SPLIT PACK REST
WRFD020
ADD GSWBIN5,CBIN1
CBNL GSWBIN5,CBINMAX,WRFD070
CBE GTUSED(GSWBIN5),CBIN0,WRFD020 USED FIELD ?
MOVE SPINPUT,=X'00' YES
MOVE GSWBCD3,GTUSED(GSWBIN5) CONVERT
EDIT SPINPUT,PFRM1
WRFD025
MOVE GSWSTR1,=X'00'
MOVE GSWBIN6,CBIN0 FIND LENGTH
MOVE GSWBIN7,=W'26'
MATCH SPINPUT,GSWBIN6,GSWBIN7,GSWSTR1,CBIN0,CBIN1
CLEAR CSPLITFL
CBG GSWBIN6,GSWBIN4,WRFD030 OVERFLOW ?
COPY CPCKBUF,GSWBIN3,GSWBIN6,SPINPUT,CBIN0 NO
ADD GSWBIN3,GSWBIN6
SUB GSWBIN4,GSWBIN6 ADJUST POINTERS
B WRFD020 SEE IF MORE
WRFD030
COPY CPCKBUF,GSWBIN3,GSWBIN4,SPINPUT,CBIN0
MOVE GSWSTR1,=X'21' CONTINUATION MARK
ADD GSWBIN3,GSWBIN4
COPY CPCKBUF,GSWBIN3,CBIN1,GSWSTR1,CBIN0
DLETE SPINPUT,CBIN0,GSWBIN4
SET CSPLITFL
PERF RAWRIT,DK02,=D'2',CPCKBUF,CRECNR
BNOK WRFDERR
TBT GTTESTFL,WRFD005
ADD CTWBIN1,CBIN1
ADD CRECNR,CBIN1
ADD CRECBCD,=D'1'
B WRFD005 GO AND PACK REST
WRFD070
TBT TFELT90,WRFD090
TBT TFELT91,WRFD091
TBT TFELT92,WRFD092
TBT TFELT93,WRFD093
TBT TFELT94,WRFD094
MOVE GSWSTR1,=X'7F'
COPY CPCKBUF,GSWBIN3,CBIN1,GSWSTR1,CBIN0
PERF RAWRIT,DK02,=D'2',CPCKBUF,CRECNR
BNOK WRFDERR
TBT GTTESTFL,WRFD080
ADD CTWBIN1,CBIN1
ADD CRECNR,CBIN1
ADD CRECBCD,=D'1'
PERF RADEL,DK02,CRECNR
BNOK WRFDERR
*
* LOOK FOR ACCOUNT NO
* IN KONTOPLAN. IF FOUND,
* SET FLAG GTKORTFL
*
CBL CRECNR,CMAXREC,WRFD080
*
* HERE MUST BEE A WAARNING 'DISC NAESTEN FYLDT'
WRFD075 DISK N[STEN FULD
CLEAR CPFLG
CLEAR CSPLITFL
MOVE SPBINW4,CBIN21
MOVE GTWBCD2,=D'02' FILE CODE
MOVE GTWBCD1,=D'50' ERROR CODE
MOVE GSWSTR9,=C'DISCFEJL '
PERF SPERR
CMP CBIN0,CBIN0
RET
*
WRFD080
CLEAR CSPLITFL
CLEAR CPFLG
CMP CBIN0,CBIN0 OK, SET CR=0
RET
*
WRFD090
MOVE SPINPUT,=X'26393000'
XCOPY SPINPUT,CBIN3,CBIN22,GTFELT90,CBIN0
CLEAR TFELT90
SET TFELT901
B WRFD095
WRFD091
MOVE SPINPUT,=X'26393100'
XCOPY SPINPUT,CBIN3,CBIN22,GTFELT91,CBIN0
CLEAR TFELT91
SET TFELT911
B WRFD095
WRFD092
MOVE SPINPUT,=X'26393200'
XCOPY SPINPUT,CBIN3,CBIN22,GTFELT92,CBIN0
CLEAR TFELT92
SET TFELT921
B WRFD095
WRFD093
MOVE SPINPUT,=X'26393300'
XCOPY SPINPUT,CBIN3,CBIN22,GTFELT93,CBIN0
CLEAR TFELT93
SET TFELT931
B WRFD095
WRFD094
MOVE SPINPUT,=X'26393400'
XCOPY SPINPUT,CBIN3,CBIN22,GTFELT94,CBIN0
CLEAR TFELT94
SET TFELT941
WRFD095
B WRFD025
*
WRFDERR
*
* HERE MUST BEE RECOVERRY
SUB CRECNR,CTWBIN1
MOVE GSWBCD1,CTWBIN1
SUB CRECBCD,GSWBCD1
SET CSKIFTWN
CLEAR CPFLG
SET GTREGFLG
CMP CBIN1,CBIN0 NOK, CR<>0
RET
PEND
EJECT
********************************************
*
* EDATNR
* FINDS DATASETNR FOR THE TRANSACTIONS
* AND PUT THE INFORMATION IN RELEVANT FIELDS
*
************************************************
EDATNR PROC
CLEAR TTR11FLG
CBG GTREGNR,=D'12',EDAT100
MOVE CEDATNR,=D'1'
CBG GTREGNR,=D'10',EDAT010
MOVE GTUSED(CBIN5),CBIN9 UPDATE D/K MARK
MOVE GTDUPF(CBIN5),TTDKBCD
EDAT010
CBNE GTREGNR,=D'11',EDAT020
SET TTR11FLG
EDAT020
RET
EDAT100
CBG GTREGNR,=D'42',EDAT110
MOVE CEDATNR,=D'3' TR 40-42
B EDAT020
EDAT110
CBG GTREGNR,=D'47',EDAT120
MOVE CEDATNR,=D'5' TR 45-47
B EDAT020
EDAT120
CBG GTREGNR,=D'49',EDAT130
MOVE CEDATNR,=D'4' TR 48-49
B EDAT020
EDAT130
MOVE CEDATNR,=D'2' TR 50-54
B EDAT020
PEND
EJECT
*
*
WCHECK PROC
RET
PEND
EJECT
WRITJT PROC $JTLIT
PLIT $JTLIT
********************
*
* THIS ROUTINE MAKES OUTPUT ON JOURNAL TAPE
* DEPENDING ON TRANSACTION TYPE
*
********************
WAIT KVOUCH
WAIT KTALLY
TBT GTSPGFLG,JTRET
MOVE GSWBIN1,$JTLIT
CBG GSWBIN1,CBIN0,JT10
PERF FRMTJT GET FORMAT ACORDING TO TYPE
B JT20
JT10 PERF FRMXJT,GSWBIN1 GET SPECIAL FORMAT
JT20
MOVE GSWBIN1,TTCNTNR 'TAELLER' NR IN BINARY
TBT GTNWFLG,JT50
EDWRT KJTAPE,GTSTRFMT EDWRT JOURNAL
JT30
TBF CF9094,JT35
CBL GTREGDEX,CBIN8,JT35
CBG GTREGDEX,CBIN9,JT35
TBF TFELT901,JT31
MOVE SPINPUT,=X'00'
XCOPY SPINPUT,CBIN3,CBIN22,GTFELT90,CBIN0
WRITE KJTAPE,SPINPUT
CLEAR TFELT901
JT31
TBF TFELT911,JT32
MOVE SPINPUT,=X'00'
XCOPY SPINPUT,CBIN3,CBIN22,GTFELT91,CBIN0
WRITE KJTAPE,SPINPUT
CLEAR TFELT911
JT32
TBF TFELT921,JT33
MOVE SPINPUT,=X'00'
XCOPY SPINPUT,CBIN3,CBIN22,GTFELT92,CBIN0
WRITE KJTAPE,SPINPUT
CLEAR TFELT921
JT33
TBF TFELT931,JT34
MOVE SPINPUT,=X'00'
XCOPY SPINPUT,CBIN3,CBIN22,GTFELT93,CBIN0
WRITE KJTAPE,SPINPUT
CLEAR TFELT931
JT34
TBF TFELT941,JT35
MOVE SPINPUT,=X'00'
XCOPY SPINPUT,CBIN3,CBIN22,GTFELT94,CBIN0
WRITE KJTAPE,SPINPUT
CLEAR TFELT941
JT35
*
DSC0 KJTAPE,TSTAT TEST STATUS OF JOURNAL
BOK JTRET
PERF SPLIN8,CBIN1,CBIN1 'SKIFT JOURNAL'
SET TTJTEND
JTRET
RET
JT50
EDWRT .NW,KJTAPE,GTSTRFMT
RET
PEND
EJECT
WTALLY PROC
*******************
*
* WRITE TALLY ROLL
*
********************
WAIT KVOUCH
WAIT KTALLY
EDWRT .NW,KTALLY,GTSTRFMT EDWRT WITH THE FORMAT
RET STORED IN GTSTRFMT
PEND
*
*
EJECT
CRKJ PROC
********************
*
* DOES A CARRIAGE RETURN ON TTP WITHOUT WAIT
*
********************
EDWRT .NW,KJTAPE,CRJTFMT
RET
CRJTFMT FRMT
FILLR ' ',2
FILLR X'0D',1
FMEND
PEND
*
*
CRVO PROC
*******************
*
* DOES A CARRIAGE RETURN ON VOUCHER WITH WAIT
*
********************
EDWRT KVOUCH,CRVOFMT
RET
CRVOFMT FRMT
FILLR ' ',2
FILLR X'09',1
FMEND
PEND
*
*
EJECT
WRITVO PROC
*
* WRITE VOUCHER
*
* IN CYCLE POSITION AND WRITE
* (MAY BE NEW PAGE)
*
* NOT CYCLE GET LINE NR
* POSITION VOUCHER
* WRITE
* AND RELEASE VOUCHER
*
********************
TBT GTCYFLG,CYVOUCH
* NOT IN CYCLE
WOBILAG
PERF SPLIN8,CBIN2,CBIN0 WRITE BILAG
PERF GRASPV
CLEAR GTSWFLAG
PERF LINOPT SEE IF DEFAULT LINE
BNOK WOBILAG
CBG GSWBIN1,=W'90',WO90
MOVE GSWBIN1,TTLINNR
B WO100
WO90 MOVE GSWBIN2,=W'100'
SUB GSWBIN2,GSWBIN1
IB GSWBIN2, C
WO99,WO98,WO97,WO96,WO95, C
WO94,WO93,WO92,WO91
WO99
PERF FRMXVO,CBIN6
MOVE GSWBIN1,=W'35'
B WO100
WO98
PERF FRMXVO,CBIN4
MOVE GSWBIN1,=W'14'
B WO100
WO97
PERF FRMXVO,CBIN5
MOVE GSWBIN1,=W'14'
B WO100
WO96
PERF FRMXVO,CBIN17
MOVE GSWBIN1,=W'37'
B WO100
WO95
WO94
WO93
DSC0 KVOUCH,RLEAS
B WOBILAG
WO92 SHORT 'BILAG'
PERF SPLIN8,CBIN2,CBIN0
PERF GRASPV
SET GTSWFLAG
PERF LINOPT
BNOK WO92
CBG GSWBIN1,=W'90',WO92
MOVE GSWBIN1,TTLINNR
CLEAR GTSWFLAG
PERF FRMXVO,CBIN19
B WO100
WO91
MOVE GTRETUR,=W'3' INDICATE KONTOKORT
RET
*
WO100
DSC1 KVOUCH,POS,GSWBIN1 POSITION VOUCHER
EDWRT KVOUCH,GTSTRFMT EDWRT WITH CURRENT FORMAT
PERF CRVO
WO110
DSC0 .NW,KVOUCH,RLEAS RELEASE VOUCHER
RET
* IN CYCLE
CYVOUCH
TBT GTCYWRTF,WO5
PERF CYWRT
BNOK WO5
RET
*
WO5
TBT TTTSTFLG,WO10
SET TTTSTFLG
PERF SPLIN8,CBIN5,CBIN2 WRITE 'BILAG'
PERF GRASPV
PERF CLEAR8
WO10
MOVE GSWBIN1,TTLINNR
DSC1 KVOUCH,POS,GSWBIN1 POSITION VOUCHER
EDWRT .NW,KVOUCH,GTSTRFMT
*****
*
* WRITING OF TEXTLINE
* FOR CHECK ON WORKSET
*
*****
*
* SEE OLD SUBS LINES 700 - 719
*
*
WO20
SUB TTLINNR,=D'2' NEXT LINE
CBL TTLINNR,=D'4',NEWPG NEW PAGE?
RET NO
*
NEWPG NEW PAGE
TBT TTPSEFLG,WORET T: IF SUBTOTAL
WAIT KVOUCH
MOVE GSWBIN1,TTLINNR
DSC1 KVOUCH,POS,GSWBIN1
MOVE GSWSTR9,=C'TRP '
PERF FRMXVO,CBIN2
EDWRT KVOUCH,GTSTRFMT
DSC0 KVOUCH,RLEAS
SET GTCYTRPF
WORET
RET
PEND
*
*
EJECT
GRASPV PROC
********************
*
* GRASP VOUCHER
*
********************
WAIT KVOUCH
DSC0 KVOUCH,GRASP GRASP VOUCHER
RET
PEND
*
*
EJECT
LINOPT PROC
********************
*
* CHECK LINE NUMBER, IF ANY
*
********************
TBT GTSWFLAG,LINST
TESTIO KEYB SEE IF INPUT FINISHED
BNOK LINOP1 NO, ABORT
LINST
WAIT KEYB
CBE SPBINW2,=W'18',LINOP0 SLUT KEY
CBNE SPBINW2,=W'4',LINOP2 ONLY ENTER KEY ALLOWED
LINOP0
CBG SPBINW1,=W'3',LINOP2 CHECK LENGTH
MOVE GSWBCD3,SPINPUT GET LINE NR
CBG GSWBCD3,=D'90',LINOP4 SPECIAL FORMATS?
PERF SPCHK5 OK, CHECK LINENR
CBE SPBINW3,=W'3',LINOP2 ERROR IN LINE NR
MOVE TTLINNR,GSWBIN1 GET CONVERTED LINE NO.
LIN90
CMP CBIN0,CBIN0 SET CR=0,OK
B LINRET
LINOP1
CALL ABORT,KEYB ABORT I/O
CBL GTDFLIN,=W'90',LINOP101
MOVE GSWBCD3,GTDFLIN
B LINOP4
LINOP101
MOVE GSWBCD3,GTDFLIN
MOVE SPINPUT,GSWBCD3
PERF SPCHK5
MOVE TTLINNR,GSWBIN1 SET DEFAULT LINE NO
CMP CBIN0,CBIN0 SET CR=0, OK
MOVE GSWBIN1,=W'0'
B LINRET
LINOP2
DSC0 KVOUCH,RLEAS RELEASE VOUCHER
DSC0 KEYB,SKIB
CMP CBIN0,CBIN1 SET CR<>0, NOT OK
RET
LINOP4
MOVE GSWBIN1,GSWBCD3
B LIN90
LINRET
PERF CLEAR8 DELETE LINE 8
RET
PEND
*
EJECT
WRITID PROC WRITVAR1,WRITVAR2
********************
*
* PRINTS HEADING IDENTIFIED BY WRITVAR1
* PRINTS ID IDENTIFIED BY WRITVAR2
*
* PRINTS ON JOURNAL AND TALLY
*
*
* WRITVAR1:
* 1 FEJL
* 2 OPSTART
* 3 DISKETTE SKIFT
* 4 KONVERTERING
* 5 DATATRANSMISSION
* 6 BACKUP
*
* WRITVAR2:
* CHARACTERS PRINTED FROM PACKBUFFER:
* 1 1-20 + 40-59
* 2 1-20 + 23-42, IF KONVERTERING
* 2 1-20 + VOLID, IF NOT KONVERTERING
* 3 NOTHING
* 4 VOLID
*
*
*
********************
*
WAIT KJTAPE
IB WRITVAR1,WRID31,WRID32,WRID33,WRID34,WRID35,WRID36
B WRID50
WRID34
MOVE GSWSTR20,=C'FEJL '
B WRID50
WRID31
MOVE GSWSTR20,=C'OPSTART '
B WRID40
WRID32
MOVE GSWSTR20,=C'DISKETTE SKIFT '
B WRID40
WRID33
MOVE GSWSTR20,=C'KONVERTERING '
B WRID40
WRID35
MOVE GSWSTR20,=C'DATATRANSMISSION '
B WRID40
WRID36
MOVE GSWSTR20,=C'BACKUP '
B WRID40
WRID40
PERF WRITJT,=W'12'
PERF FRMXTA,CBIN6
PERF WTALLY
*
*
WRID50
WAIT KTALLY
CBE WRITVAR2,CBIN3,WRID80
CBE WRITVAR2,CBIN4,WRID73
MOVE GSWSTR20,CPCKBUF
PERF WRITJT,=W'12'
CBG WRITVAR1,=W'3',WRID60
PERF FRMXTA,CBIN6
PERF WTALLY
WAIT KTALLY
*
WRID60
CBE WRITVAR2,CBIN2,WRID70
MOVE GSWBIN2,CBIN20
MOVE GSWBIN1,=W'40'
COPY GSWSTR20,CBIN0,GSWBIN2,CPCKBUF,GSWBIN1
B WRID75
*
WRID70
CBNE WRITVAR1,CBIN4,WRID72
MOVE GSWBIN2,CBIN20
MOVE GSWBIN1,=W'23'
COPY GSWSTR20,CBIN0,GSWBIN2,CPCKBUF,GSWBIN1
B WRID75
WRID72
CBG WRITVAR1,CBIN2,WRID80
WRID73
MOVE GSWSTR20,CBLANKS
MOVE GSWBCD3,CVOLNO
EDIT GSWSTR20,FRVOLID
WRID75
PERF WRITJT,=W'12'
CBL WRITVAR1,=W'4',WRID76 1,2,3,6
CBL WRITVAR1,=W'6',WRID90 4,5
WRID76
PERF FRMXTA,CBIN6
PERF WTALLY
WAIT KTALLY
B WRID85
WRID80
CBG WRITVAR1,=W'3',WRID90
WRID85
PERF FRMXTA,CBIN7
PERF WTALLY
WAIT KTALLY
WRID90
RET
PEND
EJECT
CLEAR8 PROC
* DELETE FIRST 14 CHARACTERS
* OF LINE 8
MOVE GSWBIN2,=X'0801' INDICATE LAST LINE
DSC1 SCREEN,06,GSWBIN2
MOVE GSWBIN2,CBIN14
DSC1 SCREEN,02,GSWBIN2 ERASE 14 CHARS
RET
PEND
*
*************************************************
*
* FORMATS FOR WRITFD
*
********************************************************
*
PCKINIT FRMT
FILLR ' ',40
FILLR ' ',40
FBT CSWFLAG,INIT10
FILLR X'00',48
FEXIT
INIT10
FILLR ' ',48
FMEND
*
FRVOLID FRMT
FMEL '999999',CMASKDAT
FMEL 'B99999',GSWBCD3
FMEND
*
TREC1 FRMT
FMEL '999',GTMSK
FILLR C'G',1
FMEL '99',CEDATNR
FMEL '99999',CRECBCD
FBT CSPLITFL,TREC40
FMEL '99',GTREGNR
FCOPY =C'&01'
FMEL '9999',CKMDNR
FBF GTKASSE,TREC40
FBT TTR11FLG,TREC10
FCOPY =C'&02'
FMEL '999999',GTDATO
TREC10
FCOPY =C'&03'
FMEL '999',GTMSK
FBT TTR11FLG,TREC40
FCOPY =C'&04'
FMEL '99999',TTLBNR
TREC40
FMEND
*
PFRM1 FRMT
FCOPY =C'&'
FMEL '99',GSWBCD3
FBP GSWBCD3,PLAB10
FMEL 'TTTTTTTTTTTTT9-',GTDUPF(GSWBIN5)
FEXIT
PLAB10
FMEL 'TTTTTTTTTTTTT9',GTDUPF(GSWBIN5)
FMEND
END
0x0000…0022 (0, 0, 400) Head {h00=0x001e, h01=0x0050, text=» IDENT KMDIO 02.03.XXX.1 «, t00=0x0000, t01=0x0004}
0x0022…0040 Head {h00=0x001a, h01=0x0050, text=» DDUM KMD08«, t00=0x0000, t01=0x0026}
0x0040…004e Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x0000, t01=0x0044}
0x004e…0064 Head {h00=0x0012, h01=0x0050, text=» ENTRY WRITFD «, t00=0x0000, t01=0x0052}
0x0064…0084 Head {h00=0x001c, h01=0x0050, text=» ENTRY WRITVO «, t00=0x0000, t01=0x0068}
0x0084…00a4 Head {h00=0x001c, h01=0x0050, text=» ENTRY WRITJT «, t00=0x0000, t01=0x0088}
0x00a4…00c4 Head {h00=0x001c, h01=0x0050, text=» ENTRY WTALLY «, t00=0x0000, t01=0x00a8}
0x00c4…00da Head {h00=0x0012, h01=0x0050, text=» ENTRY WRITID «, t00=0x0000, t01=0x00c8}
0x00da…00f8 Head {h00=0x001a, h01=0x0050, text=» ENTRY CRKJ «, t00=0x0000, t01=0x00de}
0x00f8…010e Head {h00=0x0012, h01=0x0050, text=» ENTRY GRASPV «, t00=0x0000, t01=0x00fc}
0x010e…0124 Head {h00=0x0012, h01=0x0050, text=» ENTRY LINOPT «, t00=0x0000, t01=0x0112}
0x0124…0138 Head {h00=0x0010, h01=0x0050, text=» ENTRY CRVO «, t00=0x0000, t01=0x0128}
0x0138…0158 Head {h00=0x001c, h01=0x0050, text=» ENTRY WCHECK «, t00=0x0000, t01=0x013c}
0x0158…016e Head {h00=0x0012, h01=0x0050, text=» ENTRY CLEAR8 «, t00=0x0000, t01=0x015c}
0x016e…0184 Head {h00=0x0012, h01=0x0050, text=» ENTRY EDATNR «, t00=0x0000, t01=0x0172}
0x0184…0196 Head {h00=0x000e, h01=0x0050, text=» EXT RADEL«, t00=0x0000, t01=0x0188}
0x0196…01aa Head {h00=0x0010, h01=0x0050, text=» EXT SPCHK5 «, t00=0x0001, t01=0x000a}
0x01aa…01be Head {h00=0x0010, h01=0x0050, text=» EXT SPLIN8 «, t00=0x0001, t01=0x001e}
0x01be…01d0 Head {h00=0x000e, h01=0x0050, text=» EXT SPERR«, t00=0x0001, t01=0x0032}
0x01d0…01f0 Head {h00=0x001c, h01=0x0050, text=» EXT FRMTJT «, t00=0x0001, t01=0x0044}
0x01f0…0204 Head {h00=0x0010, h01=0x0050, text=» EXT FRMXJT «, t00=0x0001, t01=0x0064}
0x0204…0214 Head {h00=0x000c, h01=0x0050, text=» EXT ADM«, t00=0x0001, t01=0x0078}
0x0214…0226 Head {h00=0x000e, h01=0x0050, text=» EXT CYWRT«, t00=0x0001, t01=0x0088}
0x0226…023a Head {h00=0x0010, h01=0x0050, text=» EXT FRMXVO «, t00=0x0001, t01=0x009a}
0x023a…024e Head {h00=0x0010, h01=0x0050, text=» EXT FRMXTA «, t00=0x0001, t01=0x00ae}
0x024e…026c Head {h00=0x001a, h01=0x0050, text=» EXT ABORT«, t00=0x0001, t01=0x00c2}
0x026c…0280 Head {h00=0x0010, h01=0x0050, text=» EXT RAWRIT «, t00=0x0001, t01=0x00e0}
0x0280…02a0 Head {h00=0x001c, h01=0x0050, text=» INCLUDE EQUATE «, t00=0x0001, t01=0x00f4}
0x02a0…02aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0114}
0x02aa…02be Head {h00=0x0010, h01=0x0050, text=»WRITFD PROC «, t00=0x0001, t01=0x011e}
0x02be…02da Head {h00=0x0018, h01=0x0050, text=» TBF CSKIFTWN,WRFD00«, t00=0x0001, t01=0x0132}
0x02da…0302 Head {h00=0x0024, h01=0x0050, text=» PERF ADM,CBIN12 DISKETTE SKIFT «, t00=0x0001, t01=0x014e}
0x0302…031e Head {h00=0x0018, h01=0x0050, text=» TBF CSKIFTWN,WRFD00«, t00=0x0001, t01=0x0176}
0x031e…0336 (2, 0, 400) Head {h00=0x0014, h01=0x0050, text=» CMP CBIN1,CBIN0«, t00=0x0002, t01=0x0004}
0x0336…0342 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0002, t01=0x001c}
0x0342…0350 Head {h00=0x000a, h01=0x0050, text=»WRFD00«, t00=0x0002, t01=0x0028}
0x0350…037a Head {h00=0x0026, h01=0x0050, text=» TBF CPFLG,WRFD010 DISC OCUPIED ? «, t00=0x0002, t01=0x0036}
0x037a…03a0 Head {h00=0x0022, h01=0x0050, text=» DELAY CBIN2 YES DELAY 200 MS «, t00=0x0002, t01=0x0060}
0x03a0…03b2 Head {h00=0x000e, h01=0x0050, text=» B WRFD00 «, t00=0x0002, t01=0x0086}
0x03b2…03c2 Head {h00=0x000c, h01=0x0050, text=»WRFD010 «, t00=0x0002, t01=0x0098}
0x03c2…03d4 Head {h00=0x000e, h01=0x0050, text=» SET CPFLG«, t00=0x0002, t01=0x00a8}
0x03d4…03ec Head {h00=0x0014, h01=0x0050, text=» CLEAR TFELT901 «, t00=0x0002, t01=0x00ba}
0x03ec…0404 Head {h00=0x0014, h01=0x0050, text=» CLEAR TFELT911 «, t00=0x0002, t01=0x00d2}
0x0404…041c Head {h00=0x0014, h01=0x0050, text=» CLEAR TFELT921 «, t00=0x0002, t01=0x00ea}
0x041c…0434 Head {h00=0x0014, h01=0x0050, text=» CLEAR TFELT931 «, t00=0x0002, t01=0x0102}
0x0434…044c Head {h00=0x0014, h01=0x0050, text=» CLEAR TFELT941 «, t00=0x0002, t01=0x011a}
0x044c…0464 Head {h00=0x0014, h01=0x0050, text=» CLEAR CSPLITFL «, t00=0x0002, t01=0x0132}
0x0464…0496 Head {h00=0x002e, h01=0x0050, text=» MOVE CTWBIN1,CBIN0 NO. OF WRITTEN RECORDS«, t00=0x0002, t01=0x014a}
0x0496…04aa Head {h00=0x0010, h01=0x0050, text=» PERF EDATNR«, t00=0x0002, t01=0x017c}
0x04aa…04c6 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN5,CBIN0 «, t00=0x0002, t01=0x0190}
0x04c6…04d6 Head {h00=0x000c, h01=0x0050, text=»WRFD005 «, t00=0x0003, t01=0x001c}
0x04d6…04ea Head {h00=0x0010, h01=0x0050, text=» SET CSWFLAG«, t00=0x0003, t01=0x002c}
0x04ea…050e Head {h00=0x0020, h01=0x0050, text=» CBE CRECLGD,=W'128',WRFD006«, t00=0x0003, t01=0x0040}
0x050e…0524 Head {h00=0x0012, h01=0x0050, text=» CLEAR CSWFLAG«, t00=0x0003, t01=0x0064}
0x0524…0534 Head {h00=0x000c, h01=0x0050, text=»WRFD006 «, t00=0x0003, t01=0x007a}
0x0534…0552 Head {h00=0x001a, h01=0x0050, text=» EDIT CPCKBUF,PCKINIT «, t00=0x0003, t01=0x008a}
0x0552…0580 Head {h00=0x002a, h01=0x0050, text=» EDIT CPCKBUF,TREC1 INSERT HEADER INF «, t00=0x0003, t01=0x00a8}
0x0580…059c Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN3,CBIN10«, t00=0x0003, t01=0x00d6}
0x059c…05ba Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN4,CRECLGD «, t00=0x0003, t01=0x00f2}
0x05ba…05d6 Head {h00=0x0018, h01=0x0050, text=» SUB GSWBIN4,CBIN11 «, t00=0x0003, t01=0x0110}
0x05d6…0610 Head {h00=0x0036, h01=0x0050, text=» MATCH CPCKBUF,GSWBIN3,GSWBIN4,CBLANKS,CBIN0,CBIN2«, t00=0x0003, t01=0x012c}
0x0610…062e Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN4,CRECLGD «, t00=0x0003, t01=0x0166}
0x062e…0648 Head {h00=0x0016, h01=0x0050, text=» SUB GSWBIN4,CBIN1«, t00=0x0003, t01=0x0184}
0x0648…0676 Head {h00=0x002a, h01=0x0050, text=» SUB GSWBIN4,GSWBIN3 REMAINING LENGTH «, t00=0x0004, t01=0x000e}
0x0676…069a Head {h00=0x0020, h01=0x0050, text=» CBE GTREGNR,=D'12',WRFD070 «, t00=0x0004, t01=0x003c}
0x069a…06ca Head {h00=0x002c, h01=0x0050, text=» TBT CSPLITFL,WRFD025 IF SPLIT PACK REST«, t00=0x0004, t01=0x0060}
0x06ca…06da Head {h00=0x000c, h01=0x0050, text=»WRFD020 «, t00=0x0004, t01=0x0090}
0x06da…06f4 Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN5,CBIN1«, t00=0x0004, t01=0x00a0}
0x06f4…071a Head {h00=0x0022, h01=0x0050, text=» CBNL GSWBIN5,CBINMAX,WRFD070 «, t00=0x0004, t01=0x00ba}
0x071a…0752 Head {h00=0x0034, h01=0x0050, text=» CBE GTUSED(GSWBIN5),CBIN0,WRFD020 USED FIELD ? «, t00=0x0004, t01=0x00e0}
0x0752…0772 Head {h00=0x001c, h01=0x0050, text=» MOVE SPINPUT,=X'00' YES«, t00=0x0004, t01=0x0118}
0x0772…07a0 Head {h00=0x002a, h01=0x0050, text=» MOVE GSWBCD3,GTUSED(GSWBIN5) CONVERT «, t00=0x0004, t01=0x0138}
0x07a0…07bc Head {h00=0x0018, h01=0x0050, text=» EDIT SPINPUT,PFRM1 «, t00=0x0004, t01=0x0166}
0x07bc…07cc Head {h00=0x000c, h01=0x0050, text=»WRFD025 «, t00=0x0004, t01=0x0182}
0x07cc…07e8 (5, 0, 398) Head {h00=0x0018, h01=0x0050, text=» MOVE GSWSTR1,=X'00'«, t00=0x0005, t01=0x0004}
0x07e8…0810 Head {h00=0x0024, h01=0x0050, text=» MOVE GSWBIN6,CBIN0 FIND LENGTH «, t00=0x0005, t01=0x0020}
0x0810…082c Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN7,=W'26'«, t00=0x0005, t01=0x0048}
0x082c…0866 Head {h00=0x0036, h01=0x0050, text=» MATCH SPINPUT,GSWBIN6,GSWBIN7,GSWSTR1,CBIN0,CBIN1«, t00=0x0005, t01=0x0064}
0x0866…087e Head {h00=0x0014, h01=0x0050, text=» CLEAR CSPLITFL «, t00=0x0005, t01=0x009e}
0x087e…08ae Head {h00=0x002c, h01=0x0050, text=» CBG GSWBIN6,GSWBIN4,WRFD030 OVERFLOW ? «, t00=0x0005, t01=0x00b6}
0x08ae…08e4 Head {h00=0x0032, h01=0x0050, text=» COPY CPCKBUF,GSWBIN3,GSWBIN6,SPINPUT,CBIN0 NO«, t00=0x0005, t01=0x00e6}
0x08e4…0900 Head {h00=0x0018, h01=0x0050, text=» ADD GSWBIN3,GSWBIN6«, t00=0x0005, t01=0x011c}
0x0900…092c Head {h00=0x0028, h01=0x0050, text=» SUB GSWBIN4,GSWBIN6 ADJUST POINTERS«, t00=0x0005, t01=0x0138}
0x092c…094a Head {h00=0x001a, h01=0x0050, text=» B WRFD020 SEE IF MORE«, t00=0x0005, t01=0x0164}
0x094a…095a Head {h00=0x000c, h01=0x0050, text=»WRFD030 «, t00=0x0005, t01=0x0182}
0x095a…098e (6, 0, 400) Head {h00=0x0030, h01=0x0050, text=» COPY CPCKBUF,GSWBIN3,GSWBIN4,SPINPUT,CBIN0 «, t00=0x0006, t01=0x0004}
0x098e…09bc Head {h00=0x002a, h01=0x0050, text=» MOVE GSWSTR1,=X'21' CONTINUATION MARK«, t00=0x0006, t01=0x0038}
0x09bc…09d8 Head {h00=0x0018, h01=0x0050, text=» ADD GSWBIN3,GSWBIN4«, t00=0x0006, t01=0x0066}
0x09d8…0a0a Head {h00=0x002e, h01=0x0050, text=» COPY CPCKBUF,GSWBIN3,CBIN1,GSWSTR1,CBIN0 «, t00=0x0006, t01=0x0082}
0x0a0a…0a2e Head {h00=0x0020, h01=0x0050, text=» DLETE SPINPUT,CBIN0,GSWBIN4«, t00=0x0006, t01=0x00b4}
0x0a2e…0a44 Head {h00=0x0012, h01=0x0050, text=» SET CSPLITFL «, t00=0x0006, t01=0x00d8}
0x0a44…0a72 Head {h00=0x002a, h01=0x0050, text=» PERF RAWRIT,DK02,=D'2',CPCKBUF,CRECNR«, t00=0x0006, t01=0x00ee}
0x0a72…0a88 Head {h00=0x0012, h01=0x0050, text=» BNOK WRFDERR «, t00=0x0006, t01=0x011c}
0x0a88…0aa6 Head {h00=0x001a, h01=0x0050, text=» TBT GTTESTFL,WRFD005 «, t00=0x0006, t01=0x0132}
0x0aa6…0ac0 Head {h00=0x0016, h01=0x0050, text=» ADD CTWBIN1,CBIN1«, t00=0x0006, t01=0x0150}
0x0ac0…0ada Head {h00=0x0016, h01=0x0050, text=» ADD CRECNR,CBIN1 «, t00=0x0006, t01=0x016a}
0x0ada…0af4 Head {h00=0x0016, h01=0x0050, text=» ADD CRECBCD,=D'1'«, t00=0x0006, t01=0x0184}
0x0af4…0b18 Head {h00=0x0020, h01=0x0050, text=» B WRFD005 GO AND PACK REST «, t00=0x0007, t01=0x000e}
0x0b18…0b28 Head {h00=0x000c, h01=0x0050, text=»WRFD070 «, t00=0x0007, t01=0x0032}
0x0b28…0b44 Head {h00=0x0018, h01=0x0050, text=» TBT TFELT90,WRFD090«, t00=0x0007, t01=0x0042}
0x0b44…0b60 Head {h00=0x0018, h01=0x0050, text=» TBT TFELT91,WRFD091«, t00=0x0007, t01=0x005e}
0x0b60…0b7c Head {h00=0x0018, h01=0x0050, text=» TBT TFELT92,WRFD092«, t00=0x0007, t01=0x007a}
0x0b7c…0b98 Head {h00=0x0018, h01=0x0050, text=» TBT TFELT93,WRFD093«, t00=0x0007, t01=0x0096}
0x0b98…0bb4 Head {h00=0x0018, h01=0x0050, text=» TBT TFELT94,WRFD094«, t00=0x0007, t01=0x00b2}
0x0bb4…0bd0 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWSTR1,=X'7F'«, t00=0x0007, t01=0x00ce}
0x0bd0…0c02 Head {h00=0x002e, h01=0x0050, text=» COPY CPCKBUF,GSWBIN3,CBIN1,GSWSTR1,CBIN0 «, t00=0x0007, t01=0x00ea}
0x0c02…0c30 Head {h00=0x002a, h01=0x0050, text=» PERF RAWRIT,DK02,=D'2',CPCKBUF,CRECNR«, t00=0x0007, t01=0x011c}
0x0c30…0c46 Head {h00=0x0012, h01=0x0050, text=» BNOK WRFDERR «, t00=0x0007, t01=0x014a}
0x0c46…0c64 Head {h00=0x001a, h01=0x0050, text=» TBT GTTESTFL,WRFD080 «, t00=0x0007, t01=0x0160}
0x0c64…0c7e Head {h00=0x0016, h01=0x0050, text=» ADD CTWBIN1,CBIN1«, t00=0x0007, t01=0x017e}
0x0c7e…0c98 Head {h00=0x0016, h01=0x0050, text=» ADD CRECNR,CBIN1 «, t00=0x0008, t01=0x0008}
0x0c98…0cb2 Head {h00=0x0016, h01=0x0050, text=» ADD CRECBCD,=D'1'«, t00=0x0008, t01=0x0022}
0x0cb2…0cd2 Head {h00=0x001c, h01=0x0050, text=» PERF RADEL,DK02,CRECNR «, t00=0x0008, t01=0x003c}
0x0cd2…0ce8 Head {h00=0x0012, h01=0x0050, text=» BNOK WRFDERR «, t00=0x0008, t01=0x005c}
0x0ce8…0cf2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0072}
0x0cf2…0d16 Head {h00=0x0020, h01=0x0050, text=»* LOOK FOR ACCOUNT NO«, t00=0x0008, t01=0x007c}
0x0d16…0d3e Head {h00=0x0024, h01=0x0050, text=»* IN KONTOPLAN. IF FOUND,«, t00=0x0008, t01=0x00a0}
0x0d3e…0d60 Head {h00=0x001e, h01=0x0050, text=»* SET FLAG GTKORTFL«, t00=0x0008, t01=0x00c8}
0x0d60…0d6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00ea}
0x0d6a…0d8e Head {h00=0x0020, h01=0x0050, text=» CBL CRECNR,CMAXREC,WRFD080 «, t00=0x0008, t01=0x00f4}
0x0d8e…0d98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0118}
0x0d98…0dd6 Head {h00=0x003a, h01=0x0050, text=»* HERE MUST BEE A WAARNING 'DISC NAESTEN FYLDT' «, t00=0x0008, t01=0x0122}
0x0dd6…0df8 Head {h00=0x001e, h01=0x0050, text=»WRFD075 DISK N[STEN FULD«, t00=0x0008, t01=0x0160}
0x0df8…0e0c Head {h00=0x0010, h01=0x0050, text=» CLEAR CPFLG«, t00=0x0008, t01=0x0182}
0x0e0c…0e24 Head {h00=0x0014, h01=0x0050, text=» CLEAR CSPLITFL «, t00=0x0009, t01=0x0008}
0x0e24…0e40 Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW4,CBIN21«, t00=0x0009, t01=0x0020}
0x0e40…0e66 Head {h00=0x0022, h01=0x0050, text=» MOVE GTWBCD2,=D'02' FILE CODE«, t00=0x0009, t01=0x003c}
0x0e66…0e8e Head {h00=0x0024, h01=0x0050, text=» MOVE GTWBCD1,=D'50' ERROR CODE «, t00=0x0009, t01=0x0062}
0x0e8e…0eb2 Head {h00=0x0020, h01=0x0050, text=» MOVE GSWSTR9,=C'DISCFEJL ' «, t00=0x0009, t01=0x008a}
0x0eb2…0ec6 Head {h00=0x0010, h01=0x0050, text=» PERF SPERR «, t00=0x0009, t01=0x00ae}
0x0ec6…0ede Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x0009, t01=0x00c2}
0x0ede…0eea Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0009, t01=0x00da}
0x0eea…0ef4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00e6}
0x0ef4…0f04 Head {h00=0x000c, h01=0x0050, text=»WRFD080 «, t00=0x0009, t01=0x00f0}
0x0f04…0f1c Head {h00=0x0014, h01=0x0050, text=» CLEAR CSPLITFL «, t00=0x0009, t01=0x0100}
0x0f1c…0f30 Head {h00=0x0010, h01=0x0050, text=» CLEAR CPFLG«, t00=0x0009, t01=0x0118}
0x0f30…0f56 Head {h00=0x0022, h01=0x0050, text=» CMP CBIN0,CBIN0 OK, SET CR=0 «, t00=0x0009, t01=0x012c}
0x0f56…0f62 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0009, t01=0x0152}
0x0f62…0f6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x015e}
0x0f6c…0f7c Head {h00=0x000c, h01=0x0050, text=»WRFD090 «, t00=0x0009, t01=0x0168}
0x0f7c…0f9e Head {h00=0x001e, h01=0x0050, text=» MOVE SPINPUT,=X'26393000'«, t00=0x0009, t01=0x0178}
0x0f9e…0fd0 Head {h00=0x002e, h01=0x0050, text=» XCOPY SPINPUT,CBIN3,CBIN22,GTFELT90,CBIN0«, t00=0x000a, t01=0x000a}
0x0fd0…0fe6 Head {h00=0x0012, h01=0x0050, text=» CLEAR TFELT90«, t00=0x000a, t01=0x003c}
0x0fe6…0ffc Head {h00=0x0012, h01=0x0050, text=» SET TFELT901 «, t00=0x000a, t01=0x0052}
0x0ffc…100e Head {h00=0x000e, h01=0x0050, text=» B WRFD095«, t00=0x000a, t01=0x0068}
0x100e…101e Head {h00=0x000c, h01=0x0050, text=»WRFD091 «, t00=0x000a, t01=0x007a}
0x101e…1040 Head {h00=0x001e, h01=0x0050, text=» MOVE SPINPUT,=X'26393100'«, t00=0x000a, t01=0x008a}
0x1040…1072 Head {h00=0x002e, h01=0x0050, text=» XCOPY SPINPUT,CBIN3,CBIN22,GTFELT91,CBIN0«, t00=0x000a, t01=0x00ac}
0x1072…1088 Head {h00=0x0012, h01=0x0050, text=» CLEAR TFELT91«, t00=0x000a, t01=0x00de}
0x1088…109e Head {h00=0x0012, h01=0x0050, text=» SET TFELT911 «, t00=0x000a, t01=0x00f4}
0x109e…10b0 Head {h00=0x000e, h01=0x0050, text=» B WRFD095«, t00=0x000a, t01=0x010a}
0x10b0…10c0 Head {h00=0x000c, h01=0x0050, text=»WRFD092 «, t00=0x000a, t01=0x011c}
0x10c0…10e2 Head {h00=0x001e, h01=0x0050, text=» MOVE SPINPUT,=X'26393200'«, t00=0x000a, t01=0x012c}
0x10e2…1114 Head {h00=0x002e, h01=0x0050, text=» XCOPY SPINPUT,CBIN3,CBIN22,GTFELT92,CBIN0«, t00=0x000a, t01=0x014e}
0x1114…112a Head {h00=0x0012, h01=0x0050, text=» CLEAR TFELT92«, t00=0x000a, t01=0x0180}
0x112a…1140 Head {h00=0x0012, h01=0x0050, text=» SET TFELT921 «, t00=0x000b, t01=0x0008}
0x1140…1152 Head {h00=0x000e, h01=0x0050, text=» B WRFD095«, t00=0x000b, t01=0x001e}
0x1152…1162 Head {h00=0x000c, h01=0x0050, text=»WRFD093 «, t00=0x000b, t01=0x0030}
0x1162…1184 Head {h00=0x001e, h01=0x0050, text=» MOVE SPINPUT,=X'26393300'«, t00=0x000b, t01=0x0040}
0x1184…11b6 Head {h00=0x002e, h01=0x0050, text=» XCOPY SPINPUT,CBIN3,CBIN22,GTFELT93,CBIN0«, t00=0x000b, t01=0x0062}
0x11b6…11cc Head {h00=0x0012, h01=0x0050, text=» CLEAR TFELT93«, t00=0x000b, t01=0x0094}
0x11cc…11e2 Head {h00=0x0012, h01=0x0050, text=» SET TFELT931 «, t00=0x000b, t01=0x00aa}
0x11e2…11f4 Head {h00=0x000e, h01=0x0050, text=» B WRFD095«, t00=0x000b, t01=0x00c0}
0x11f4…1204 Head {h00=0x000c, h01=0x0050, text=»WRFD094 «, t00=0x000b, t01=0x00d2}
0x1204…1226 Head {h00=0x001e, h01=0x0050, text=» MOVE SPINPUT,=X'26393400'«, t00=0x000b, t01=0x00e2}
0x1226…1258 Head {h00=0x002e, h01=0x0050, text=» XCOPY SPINPUT,CBIN3,CBIN22,GTFELT94,CBIN0«, t00=0x000b, t01=0x0104}
0x1258…126e Head {h00=0x0012, h01=0x0050, text=» CLEAR TFELT94«, t00=0x000b, t01=0x0136}
0x126e…1284 Head {h00=0x0012, h01=0x0050, text=» SET TFELT941 «, t00=0x000b, t01=0x014c}
0x1284…1294 Head {h00=0x000c, h01=0x0050, text=»WRFD095 «, t00=0x000b, t01=0x0162}
0x1294…12a6 Head {h00=0x000e, h01=0x0050, text=» B WRFD025«, t00=0x000b, t01=0x0172}
0x12a6…12b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0184}
0x12b0…12c0 Head {h00=0x000c, h01=0x0050, text=»WRFDERR «, t00=0x000b, t01=0x018e}
0x12c0…12ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x000e}
0x12ca…12f0 Head {h00=0x0022, h01=0x0050, text=»* HERE MUST BEE RECOVERRY «, t00=0x000c, t01=0x0018}
0x12f0…130c Head {h00=0x0018, h01=0x0050, text=» SUB CRECNR,CTWBIN1 «, t00=0x000c, t01=0x003e}
0x130c…132a Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD1,CTWBIN1 «, t00=0x000c, t01=0x005a}
0x132a…1346 Head {h00=0x0018, h01=0x0050, text=» SUB CRECBCD,GSWBCD1«, t00=0x000c, t01=0x0078}
0x1346…135c Head {h00=0x0012, h01=0x0050, text=» SET CSKIFTWN «, t00=0x000c, t01=0x0094}
0x135c…1370 Head {h00=0x0010, h01=0x0050, text=» CLEAR CPFLG«, t00=0x000c, t01=0x00aa}
0x1370…1386 Head {h00=0x0012, h01=0x0050, text=» SET GTREGFLG «, t00=0x000c, t01=0x00be}
0x1386…13aa Head {h00=0x0020, h01=0x0050, text=» CMP CBIN1,CBIN0 NOK, CR<>0 «, t00=0x000c, t01=0x00d4}
0x13aa…13b6 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000c, t01=0x00f8}
0x13b6…13c4 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000c, t01=0x0104}
0x13c4…13d2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x0112}
0x13d2…1406 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x000c, t01=0x0120}
0x1406…1410 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0154}
0x1410…1424 Head {h00=0x0010, h01=0x0050, text=»* EDATNR«, t00=0x000c, t01=0x015e}
0x1424…145c Head {h00=0x0034, h01=0x0050, text=»* FINDS DATASETNR FOR THE TRANSACTIONS «, t00=0x000c, t01=0x0172}
0x145c…149a Head {h00=0x003a, h01=0x0050, text=»* AND PUT THE INFORMATION IN RELEVANT FIELDS «, t00=0x000d, t01=0x001a}
0x149a…14a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0058}
0x14a4…14dc Head {h00=0x0034, h01=0x0050, text=»************************************************«, t00=0x000d, t01=0x0062}
0x14dc…14f0 Head {h00=0x0010, h01=0x0050, text=»EDATNR PROC «, t00=0x000d, t01=0x009a}
0x14f0…1508 Head {h00=0x0014, h01=0x0050, text=» CLEAR TTR11FLG «, t00=0x000d, t01=0x00ae}
0x1508…152c Head {h00=0x0020, h01=0x0050, text=» CBG GTREGNR,=D'12',EDAT100 «, t00=0x000d, t01=0x00c6}
0x152c…1548 Head {h00=0x0018, h01=0x0050, text=» MOVE CEDATNR,=D'1' «, t00=0x000d, t01=0x00ea}
0x1548…156c Head {h00=0x0020, h01=0x0050, text=» CBG GTREGNR,=D'10',EDAT010 «, t00=0x000d, t01=0x0106}
0x156c…159e Head {h00=0x002e, h01=0x0050, text=» MOVE GTUSED(CBIN5),CBIN9 UPDATE D/K MARK «, t00=0x000d, t01=0x012a}
0x159e…15c2 Head {h00=0x0020, h01=0x0050, text=» MOVE GTDUPF(CBIN5),TTDKBCD «, t00=0x000d, t01=0x015c}
0x15c2…15d2 Head {h00=0x000c, h01=0x0050, text=»EDAT010 «, t00=0x000d, t01=0x0180}
0x15d2…15f6 Head {h00=0x0020, h01=0x0050, text=» CBNE GTREGNR,=D'11',EDAT020«, t00=0x000d, t01=0x0190}
0x15f6…160c Head {h00=0x0012, h01=0x0050, text=» SET TTR11FLG «, t00=0x000e, t01=0x0024}
0x160c…161c Head {h00=0x000c, h01=0x0050, text=»EDAT020 «, t00=0x000e, t01=0x003a}
0x161c…1628 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000e, t01=0x004a}
0x1628…1638 Head {h00=0x000c, h01=0x0050, text=»EDAT100 «, t00=0x000e, t01=0x0056}
0x1638…165c Head {h00=0x0020, h01=0x0050, text=» CBG GTREGNR,=D'42',EDAT110 «, t00=0x000e, t01=0x0066}
0x165c…1680 Head {h00=0x0020, h01=0x0050, text=» MOVE CEDATNR,=D'3' TR 40-42«, t00=0x000e, t01=0x008a}
0x1680…1692 Head {h00=0x000e, h01=0x0050, text=» B EDAT020«, t00=0x000e, t01=0x00ae}
0x1692…16a2 Head {h00=0x000c, h01=0x0050, text=»EDAT110 «, t00=0x000e, t01=0x00c0}
0x16a2…16c6 Head {h00=0x0020, h01=0x0050, text=» CBG GTREGNR,=D'47',EDAT120 «, t00=0x000e, t01=0x00d0}
0x16c6…16ea Head {h00=0x0020, h01=0x0050, text=» MOVE CEDATNR,=D'5' TR 45-47«, t00=0x000e, t01=0x00f4}
0x16ea…16fc Head {h00=0x000e, h01=0x0050, text=» B EDAT020«, t00=0x000e, t01=0x0118}
0x16fc…170c Head {h00=0x000c, h01=0x0050, text=»EDAT120 «, t00=0x000e, t01=0x012a}
0x170c…1730 Head {h00=0x0020, h01=0x0050, text=» CBG GTREGNR,=D'49',EDAT130 «, t00=0x000e, t01=0x013a}
0x1730…1754 Head {h00=0x0020, h01=0x0050, text=» MOVE CEDATNR,=D'4' TR 48-49«, t00=0x000e, t01=0x015e}
0x1754…1766 Head {h00=0x000e, h01=0x0050, text=» B EDAT020«, t00=0x000e, t01=0x0182}
0x1766…1776 (15, 0, 400) Head {h00=0x000c, h01=0x0050, text=»EDAT130 «, t00=0x000f, t01=0x0004}
0x1776…179a Head {h00=0x0020, h01=0x0050, text=» MOVE CEDATNR,=D'2' TR 50-54«, t00=0x000f, t01=0x0014}
0x179a…17ac Head {h00=0x000e, h01=0x0050, text=» B EDAT020«, t00=0x000f, t01=0x0038}
0x17ac…17ba Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000f, t01=0x004a}
0x17ba…17c8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x0058}
0x17c8…17d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0066}
0x17d2…17dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0070}
0x17dc…17f0 Head {h00=0x0010, h01=0x0050, text=»WCHECK PROC «, t00=0x000f, t01=0x007a}
0x17f0…17fc Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000f, t01=0x008e}
0x17fc…180a Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000f, t01=0x009a}
0x180a…1818 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x00a8}
0x1818…1836 Head {h00=0x001a, h01=0x0050, text=»WRITJT PROC $JTLIT «, t00=0x000f, t01=0x00b6}
0x1836…184a Head {h00=0x0010, h01=0x0050, text=» PLIT $JTLIT«, t00=0x000f, t01=0x00d4}
0x184a…1866 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000f, t01=0x00e8}
0x1866…1870 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0104}
0x1870…18aa Head {h00=0x0036, h01=0x0050, text=»* THIS ROUTINE MAKES OUTPUT ON JOURNAL TAPE«, t00=0x000f, t01=0x010e}
0x18aa…18d8 Head {h00=0x002a, h01=0x0050, text=»* DEPENDING ON TRANSACTION TYPE«, t00=0x000f, t01=0x0148}
0x18d8…18e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0176}
0x18e2…18fe Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000f, t01=0x0180}
0x18fe…1912 Head {h00=0x0010, h01=0x0050, text=» WAIT KVOUCH«, t00=0x0010, t01=0x000c}
0x1912…1926 Head {h00=0x0010, h01=0x0050, text=» WAIT KTALLY«, t00=0x0010, t01=0x0020}
0x1926…1942 Head {h00=0x0018, h01=0x0050, text=» TBT GTSPGFLG,JTRET «, t00=0x0010, t01=0x0034}
0x1942…1968 Head {h00=0x0022, h01=0x0050, text=» MOVE GSWBIN1,$JTLIT «, t00=0x0010, t01=0x0050}
0x1968…1992 Head {h00=0x0026, h01=0x0050, text=» CBG GSWBIN1,CBIN0,JT10 «, t00=0x0010, t01=0x0076}
0x1992…19dc Head {h00=0x0046, h01=0x0050, text=» PERF FRMTJT GET FORMAT ACORDING TO TYPE«, t00=0x0010, t01=0x00a0}
0x19dc…19f8 Head {h00=0x0018, h01=0x0050, text=» B JT20 «, t00=0x0010, t01=0x00ea}
0x19f8…1a2c Head {h00=0x0030, h01=0x0050, text=»JT10 PERF FRMXJT,GSWBIN1 GET SPECIAL FORMAT «, t00=0x0010, t01=0x0106}
0x1a2c…1a38 Head {h00=0x0008, h01=0x0050, text=»JT20«, t00=0x0010, t01=0x013a}
0x1a38…1a6c Head {h00=0x0030, h01=0x0050, text=» MOVE GSWBIN1,TTCNTNR 'TAELLER' NR IN BINARY«, t00=0x0010, t01=0x0146}
0x1a6c…1a86 Head {h00=0x0016, h01=0x0050, text=» TBT GTNWFLG,JT50 «, t00=0x0010, t01=0x017a}
0x1a86…1ab2 (17, 0, 400) Head {h00=0x0028, h01=0x0050, text=» EDWRT KJTAPE,GTSTRFMT EDWRT JOURNAL«, t00=0x0011, t01=0x0004}
0x1ab2…1abe Head {h00=0x0008, h01=0x0050, text=»JT30«, t00=0x0011, t01=0x0030}
0x1abe…1ad6 Head {h00=0x0014, h01=0x0050, text=» TBF CF9094,JT35«, t00=0x0011, t01=0x003c}
0x1ad6…1af6 Head {h00=0x001c, h01=0x0050, text=» CBL GTREGDEX,CBIN8,JT35«, t00=0x0011, t01=0x0054}
0x1af6…1b16 Head {h00=0x001c, h01=0x0050, text=» CBG GTREGDEX,CBIN9,JT35«, t00=0x0011, t01=0x0074}
0x1b16…1b30 Head {h00=0x0016, h01=0x0050, text=» TBF TFELT901,JT31«, t00=0x0011, t01=0x0094}
0x1b30…1b4c Head {h00=0x0018, h01=0x0050, text=» MOVE SPINPUT,=X'00'«, t00=0x0011, t01=0x00ae}
0x1b4c…1b7e Head {h00=0x002e, h01=0x0050, text=» XCOPY SPINPUT,CBIN3,CBIN22,GTFELT90,CBIN0«, t00=0x0011, t01=0x00ca}
0x1b7e…1b9c Head {h00=0x001a, h01=0x0050, text=» WRITE KJTAPE,SPINPUT «, t00=0x0011, t01=0x00fc}
0x1b9c…1bb4 Head {h00=0x0014, h01=0x0050, text=» CLEAR TFELT901 «, t00=0x0011, t01=0x011a}
0x1bb4…1bc0 Head {h00=0x0008, h01=0x0050, text=»JT31«, t00=0x0011, t01=0x0132}
0x1bc0…1bda Head {h00=0x0016, h01=0x0050, text=» TBF TFELT911,JT32«, t00=0x0011, t01=0x013e}
0x1bda…1bf6 Head {h00=0x0018, h01=0x0050, text=» MOVE SPINPUT,=X'00'«, t00=0x0011, t01=0x0158}
0x1bf6…1c28 Head {h00=0x002e, h01=0x0050, text=» XCOPY SPINPUT,CBIN3,CBIN22,GTFELT91,CBIN0«, t00=0x0011, t01=0x0174}
0x1c28…1c46 Head {h00=0x001a, h01=0x0050, text=» WRITE KJTAPE,SPINPUT «, t00=0x0012, t01=0x0016}
0x1c46…1c5e Head {h00=0x0014, h01=0x0050, text=» CLEAR TFELT911 «, t00=0x0012, t01=0x0034}
0x1c5e…1c6a Head {h00=0x0008, h01=0x0050, text=»JT32«, t00=0x0012, t01=0x004c}
0x1c6a…1c84 Head {h00=0x0016, h01=0x0050, text=» TBF TFELT921,JT33«, t00=0x0012, t01=0x0058}
0x1c84…1ca0 Head {h00=0x0018, h01=0x0050, text=» MOVE SPINPUT,=X'00'«, t00=0x0012, t01=0x0072}
0x1ca0…1cd2 Head {h00=0x002e, h01=0x0050, text=» XCOPY SPINPUT,CBIN3,CBIN22,GTFELT92,CBIN0«, t00=0x0012, t01=0x008e}
0x1cd2…1cf0 Head {h00=0x001a, h01=0x0050, text=» WRITE KJTAPE,SPINPUT «, t00=0x0012, t01=0x00c0}
0x1cf0…1d08 Head {h00=0x0014, h01=0x0050, text=» CLEAR TFELT921 «, t00=0x0012, t01=0x00de}
0x1d08…1d14 Head {h00=0x0008, h01=0x0050, text=»JT33«, t00=0x0012, t01=0x00f6}
0x1d14…1d2e Head {h00=0x0016, h01=0x0050, text=» TBF TFELT931,JT34«, t00=0x0012, t01=0x0102}
0x1d2e…1d4a Head {h00=0x0018, h01=0x0050, text=» MOVE SPINPUT,=X'00'«, t00=0x0012, t01=0x011c}
0x1d4a…1d7c Head {h00=0x002e, h01=0x0050, text=» XCOPY SPINPUT,CBIN3,CBIN22,GTFELT93,CBIN0«, t00=0x0012, t01=0x0138}
0x1d7c…1d9a Head {h00=0x001a, h01=0x0050, text=» WRITE KJTAPE,SPINPUT «, t00=0x0012, t01=0x016a}
0x1d9a…1db2 Head {h00=0x0014, h01=0x0050, text=» CLEAR TFELT931 «, t00=0x0012, t01=0x0188}
0x1db2…1dbe Head {h00=0x0008, h01=0x0050, text=»JT34«, t00=0x0013, t01=0x0010}
0x1dbe…1dd8 Head {h00=0x0016, h01=0x0050, text=» TBF TFELT941,JT35«, t00=0x0013, t01=0x001c}
0x1dd8…1df4 Head {h00=0x0018, h01=0x0050, text=» MOVE SPINPUT,=X'00'«, t00=0x0013, t01=0x0036}
0x1df4…1e26 Head {h00=0x002e, h01=0x0050, text=» XCOPY SPINPUT,CBIN3,CBIN22,GTFELT94,CBIN0«, t00=0x0013, t01=0x0052}
0x1e26…1e44 Head {h00=0x001a, h01=0x0050, text=» WRITE KJTAPE,SPINPUT «, t00=0x0013, t01=0x0084}
0x1e44…1e5c Head {h00=0x0014, h01=0x0050, text=» CLEAR TFELT941 «, t00=0x0013, t01=0x00a2}
0x1e5c…1e68 Head {h00=0x0008, h01=0x0050, text=»JT35«, t00=0x0013, t01=0x00ba}
0x1e68…1e72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00c6}
0x1e72…1ea4 Head {h00=0x002e, h01=0x0050, text=» DSC0 KJTAPE,TSTAT TEST STATUS OF JOURNAL «, t00=0x0013, t01=0x00d0}
0x1ea4…1ec0 Head {h00=0x0018, h01=0x0050, text=» BOK JTRET«, t00=0x0013, t01=0x0102}
0x1ec0…1ef0 Head {h00=0x002c, h01=0x0050, text=» PERF SPLIN8,CBIN1,CBIN1 'SKIFT JOURNAL'«, t00=0x0013, t01=0x011e}
0x1ef0…1f04 Head {h00=0x0010, h01=0x0050, text=» SET TTJTEND«, t00=0x0013, t01=0x014e}
0x1f04…1f12 Head {h00=0x000a, h01=0x0050, text=»JTRET «, t00=0x0013, t01=0x0162}
0x1f12…1f1e Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0013, t01=0x0170}
0x1f1e…1f2a Head {h00=0x0008, h01=0x0050, text=»JT50«, t00=0x0013, t01=0x017c}
0x1f2a…1f4c Head {h00=0x001e, h01=0x0050, text=» EDWRT .NW,KJTAPE,GTSTRFMT«, t00=0x0013, t01=0x0188}
0x1f4c…1f58 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0014, t01=0x001a}
0x1f58…1f6e Head {h00=0x0012, h01=0x0050, text=» PEND «, t00=0x0014, t01=0x0026}
0x1f6e…1f84 Head {h00=0x0012, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x003c}
0x1f84…1f9a Head {h00=0x0012, h01=0x0050, text=»WTALLY PROC «, t00=0x0014, t01=0x0052}
0x1f9a…1fb6 Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x0014, t01=0x0068}
0x1fb6…1fc0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0084}
0x1fc0…1fe2 Head {h00=0x001e, h01=0x0050, text=»* WRITE TALLY ROLL «, t00=0x0014, t01=0x008e}
0x1fe2…1fec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00b0}
0x1fec…2008 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0014, t01=0x00ba}
0x2008…201c Head {h00=0x0010, h01=0x0050, text=» WAIT KVOUCH«, t00=0x0014, t01=0x00d6}
0x201c…2030 Head {h00=0x0010, h01=0x0050, text=» WAIT KTALLY«, t00=0x0014, t01=0x00ea}
0x2030…207c Head {h00=0x0048, h01=0x0050, text=» EDWRT .NW,KTALLY,GTSTRFMT EDWRT WITH THE FORMAT«, t00=0x0014, t01=0x00fe}
0x207c…209c Head {h00=0x001c, h01=0x0050, text=» RET STORED IN GTSTRFMT«, t00=0x0014, t01=0x014a}
0x209c…20b0 Head {h00=0x0010, h01=0x0050, text=» PEND«, t00=0x0014, t01=0x016a}
0x20b0…20ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x017e}
0x20ba…20c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0188}
0x20c4…20da (21, 0, 398) Head {h00=0x0012, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x0004}
0x20da…20f0 Head {h00=0x0012, h01=0x0050, text=»CRKJ PROC «, t00=0x0015, t01=0x001a}
0x20f0…210c Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0015, t01=0x0030}
0x210c…2116 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x004c}
0x2116…2152 Head {h00=0x0038, h01=0x0050, text=»* DOES A CARRIAGE RETURN ON TTP WITHOUT WAIT«, t00=0x0015, t01=0x0056}
0x2152…215c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0092}
0x215c…2178 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0015, t01=0x009c}
0x2178…21a4 Head {h00=0x0028, h01=0x0050, text=» EDWRT .NW,KJTAPE,CRJTFMT «, t00=0x0015, t01=0x00b8}
0x21a4…21b8 Head {h00=0x0010, h01=0x0050, text=» RET«, t00=0x0015, t01=0x00e4}
0x21b8…21cc Head {h00=0x0010, h01=0x0050, text=»CRJTFMT FRMT«, t00=0x0015, t01=0x00f8}
0x21cc…21ea Head {h00=0x001a, h01=0x0050, text=» FILLR ' ',2«, t00=0x0015, t01=0x010c}
0x21ea…2200 Head {h00=0x0012, h01=0x0050, text=» FILLR X'0D',1«, t00=0x0015, t01=0x012a}
0x2200…2216 Head {h00=0x0012, h01=0x0050, text=» FMEND «, t00=0x0015, t01=0x0140}
0x2216…222c Head {h00=0x0012, h01=0x0050, text=» PEND «, t00=0x0015, t01=0x0156}
0x222c…2236 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x016c}
0x2236…2240 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0176}
0x2240…2252 Head {h00=0x000e, h01=0x0050, text=»CRVO PROC «, t00=0x0015, t01=0x0180}
0x2252…226e (22, 0, 400) Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x0016, t01=0x0004}
0x226e…2278 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0020}
0x2278…22b6 Head {h00=0x003a, h01=0x0050, text=»* DOES A CARRIAGE RETURN ON VOUCHER WITH WAIT«, t00=0x0016, t01=0x002a}
0x22b6…22c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0068}
0x22c0…22dc Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0016, t01=0x0072}
0x22dc…22fa Head {h00=0x001a, h01=0x0050, text=» EDWRT KVOUCH,CRVOFMT «, t00=0x0016, t01=0x008e}
0x22fa…2306 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0016, t01=0x00ac}
0x2306…231a Head {h00=0x0010, h01=0x0050, text=»CRVOFMT FRMT«, t00=0x0016, t01=0x00b8}
0x231a…232e Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',2«, t00=0x0016, t01=0x00cc}
0x232e…2344 Head {h00=0x0012, h01=0x0050, text=» FILLR X'09',1«, t00=0x0016, t01=0x00e0}
0x2344…2352 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0016, t01=0x00f6}
0x2352…2360 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0016, t01=0x0104}
0x2360…236a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0112}
0x236a…2374 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x011c}
0x2374…238a Head {h00=0x0012, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x0126}
0x238a…239e Head {h00=0x0010, h01=0x0050, text=»WRITVO PROC «, t00=0x0016, t01=0x013c}
0x239e…23a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0150}
0x23a8…23c6 Head {h00=0x001a, h01=0x0050, text=»* WRITE VOUCHER«, t00=0x0016, t01=0x015a}
0x23c6…23d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0178}
0x23d0…23fe Head {h00=0x002a, h01=0x0050, text=»* IN CYCLE POSITION AND WRITE «, t00=0x0016, t01=0x0182}
0x23fe…242a Head {h00=0x0028, h01=0x0050, text=»* (MAY BE NEW PAGE)«, t00=0x0017, t01=0x0020}
0x242a…2434 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x004c}
0x2434…245c Head {h00=0x0024, h01=0x0050, text=»* NOT CYCLE GET LINE NR «, t00=0x0017, t01=0x0056}
0x245c…2488 Head {h00=0x0028, h01=0x0050, text=»* POSITION VOUCHER «, t00=0x0017, t01=0x007e}
0x2488…24a8 Head {h00=0x001c, h01=0x0050, text=»* WRITE«, t00=0x0017, t01=0x00aa}
0x24a8…24d6 Head {h00=0x002a, h01=0x0050, text=»* AND RELEASE VOUCHER«, t00=0x0017, t01=0x00ca}
0x24d6…24e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00f8}
0x24e0…24fc Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0017, t01=0x0102}
0x24fc…2524 Head {h00=0x0024, h01=0x0050, text=» TBT GTCYFLG,CYVOUCH«, t00=0x0017, t01=0x011e}
0x2524…253a Head {h00=0x0012, h01=0x0050, text=»* NOT IN CYCLE«, t00=0x0017, t01=0x0146}
0x253a…254a Head {h00=0x000c, h01=0x0050, text=»WOBILAG «, t00=0x0017, t01=0x015c}
0x254a…2576 Head {h00=0x0028, h01=0x0050, text=» PERF SPLIN8,CBIN2,CBIN0 WRITE BILAG«, t00=0x0017, t01=0x016c}
0x2576…2592 Head {h00=0x0018, h01=0x0050, text=» PERF GRASPV«, t00=0x0018, t01=0x0008}
0x2592…25aa Head {h00=0x0014, h01=0x0050, text=» CLEAR GTSWFLAG «, t00=0x0018, t01=0x0024}
0x25aa…25d2 Head {h00=0x0024, h01=0x0050, text=» PERF LINOPT SEE IF DEFAULT LINE«, t00=0x0018, t01=0x003c}
0x25d2…25f2 Head {h00=0x001c, h01=0x0050, text=» BNOK WOBILAG«, t00=0x0018, t01=0x0064}
0x25f2…2612 Head {h00=0x001c, h01=0x0050, text=» CBG GSWBIN1,=W'90',WO90«, t00=0x0018, t01=0x0084}
0x2612…2630 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,TTLINNR «, t00=0x0018, t01=0x00a4}
0x2630…2640 Head {h00=0x000c, h01=0x0050, text=» B WO100«, t00=0x0018, t01=0x00c2}
0x2640…2662 Head {h00=0x001e, h01=0x0050, text=»WO90 MOVE GSWBIN2,=W'100' «, t00=0x0018, t01=0x00d2}
0x2662…267e Head {h00=0x0018, h01=0x0050, text=» SUB GSWBIN2,GSWBIN1«, t00=0x0018, t01=0x00f4}
0x267e…2696 Head {h00=0x0014, h01=0x0050, text=» IB GSWBIN2, C «, t00=0x0018, t01=0x0110}
0x2696…26bc Head {h00=0x0022, h01=0x0050, text=» WO99,WO98,WO97,WO96,WO95, C«, t00=0x0018, t01=0x0128}
0x26bc…26da Head {h00=0x001a, h01=0x0050, text=» WO94,WO93,WO92,WO91 «, t00=0x0018, t01=0x014e}
0x26da…26e6 Head {h00=0x0008, h01=0x0050, text=»WO99«, t00=0x0018, t01=0x016c}
0x26e6…2700 Head {h00=0x0016, h01=0x0050, text=» PERF FRMXVO,CBIN6«, t00=0x0018, t01=0x0178}
0x2700…271c (25, 0, 400) Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'35'«, t00=0x0019, t01=0x0004}
0x271c…272c Head {h00=0x000c, h01=0x0050, text=» B WO100«, t00=0x0019, t01=0x0020}
0x272c…2738 Head {h00=0x0008, h01=0x0050, text=»WO98«, t00=0x0019, t01=0x0030}
0x2738…2752 Head {h00=0x0016, h01=0x0050, text=» PERF FRMXVO,CBIN4«, t00=0x0019, t01=0x003c}
0x2752…276e Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'14'«, t00=0x0019, t01=0x0056}
0x276e…277e Head {h00=0x000c, h01=0x0050, text=» B WO100«, t00=0x0019, t01=0x0072}
0x277e…278a Head {h00=0x0008, h01=0x0050, text=»WO97«, t00=0x0019, t01=0x0082}
0x278a…27a4 Head {h00=0x0016, h01=0x0050, text=» PERF FRMXVO,CBIN5«, t00=0x0019, t01=0x008e}
0x27a4…27c0 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'14'«, t00=0x0019, t01=0x00a8}
0x27c0…27d0 Head {h00=0x000c, h01=0x0050, text=» B WO100«, t00=0x0019, t01=0x00c4}
0x27d0…27dc Head {h00=0x0008, h01=0x0050, text=»WO96«, t00=0x0019, t01=0x00d4}
0x27dc…27f8 Head {h00=0x0018, h01=0x0050, text=» PERF FRMXVO,CBIN17 «, t00=0x0019, t01=0x00e0}
0x27f8…2814 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'37'«, t00=0x0019, t01=0x00fc}
0x2814…2824 Head {h00=0x000c, h01=0x0050, text=» B WO100«, t00=0x0019, t01=0x0118}
0x2824…2830 Head {h00=0x0008, h01=0x0050, text=»WO95«, t00=0x0019, t01=0x0128}
0x2830…283c Head {h00=0x0008, h01=0x0050, text=»WO94«, t00=0x0019, t01=0x0134}
0x283c…2848 Head {h00=0x0008, h01=0x0050, text=»WO93«, t00=0x0019, t01=0x0140}
0x2848…2862 Head {h00=0x0016, h01=0x0050, text=» DSC0 KVOUCH,RLEAS«, t00=0x0019, t01=0x014c}
0x2862…2874 Head {h00=0x000e, h01=0x0050, text=» B WOBILAG«, t00=0x0019, t01=0x0166}
0x2874…2890 Head {h00=0x0018, h01=0x0050, text=»WO92 SHORT 'BILAG'«, t00=0x0019, t01=0x0178}
0x2890…28b0 (26, 0, 400) Head {h00=0x001c, h01=0x0050, text=» PERF SPLIN8,CBIN2,CBIN0«, t00=0x001a, t01=0x0004}
0x28b0…28c4 Head {h00=0x0010, h01=0x0050, text=» PERF GRASPV«, t00=0x001a, t01=0x0024}
0x28c4…28da Head {h00=0x0012, h01=0x0050, text=» SET GTSWFLAG «, t00=0x001a, t01=0x0038}
0x28da…28ee Head {h00=0x0010, h01=0x0050, text=» PERF LINOPT«, t00=0x001a, t01=0x004e}
0x28ee…2900 Head {h00=0x000e, h01=0x0050, text=» BNOK WO92«, t00=0x001a, t01=0x0062}
0x2900…2920 Head {h00=0x001c, h01=0x0050, text=» CBG GSWBIN1,=W'90',WO92«, t00=0x001a, t01=0x0074}
0x2920…293e Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,TTLINNR «, t00=0x001a, t01=0x0094}
0x293e…2956 Head {h00=0x0014, h01=0x0050, text=» CLEAR GTSWFLAG «, t00=0x001a, t01=0x00b2}
0x2956…2972 Head {h00=0x0018, h01=0x0050, text=» PERF FRMXVO,CBIN19 «, t00=0x001a, t01=0x00ca}
0x2972…2982 Head {h00=0x000c, h01=0x0050, text=» B WO100«, t00=0x001a, t01=0x00e6}
0x2982…298e Head {h00=0x0008, h01=0x0050, text=»WO91«, t00=0x001a, t01=0x00f6}
0x298e…29bc Head {h00=0x002a, h01=0x0050, text=» MOVE GTRETUR,=W'3' INDICATE KONTOKORT«, t00=0x001a, t01=0x0102}
0x29bc…29c8 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001a, t01=0x0130}
0x29c8…29d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x013c}
0x29d2…29e0 Head {h00=0x000a, h01=0x0050, text=»WO100 «, t00=0x001a, t01=0x0146}
0x29e0…2a12 Head {h00=0x002e, h01=0x0050, text=» DSC1 KVOUCH,POS,GSWBIN1 POSITION VOUCHER «, t00=0x001a, t01=0x0154}
0x2a12…2a4a Head {h00=0x0034, h01=0x0050, text=» EDWRT KVOUCH,GTSTRFMT EDWRT WITH CURRENT FORMAT«, t00=0x001a, t01=0x0186}
0x2a4a…2a5c Head {h00=0x000e, h01=0x0050, text=» PERF CRVO«, t00=0x001b, t01=0x002e}
0x2a5c…2a6a Head {h00=0x000a, h01=0x0050, text=»WO110 «, t00=0x001b, t01=0x0040}
0x2a6a…2ab2 Head {h00=0x0044, h01=0x0050, text=» DSC0 .NW,KVOUCH,RLEAS RELEASE VOUCHER«, t00=0x001b, t01=0x004e}
0x2ab2…2ac6 Head {h00=0x0010, h01=0x0050, text=» RET«, t00=0x001b, t01=0x0096}
0x2ac6…2ad8 Head {h00=0x000e, h01=0x0050, text=»* IN CYCLE«, t00=0x001b, t01=0x00aa}
0x2ad8…2ae8 Head {h00=0x000c, h01=0x0050, text=»CYVOUCH «, t00=0x001b, t01=0x00bc}
0x2ae8…2b02 Head {h00=0x0016, h01=0x0050, text=» TBT GTCYWRTF,WO5 «, t00=0x001b, t01=0x00cc}
0x2b02…2b16 Head {h00=0x0010, h01=0x0050, text=» PERF CYWRT «, t00=0x001b, t01=0x00e6}
0x2b16…2b28 Head {h00=0x000e, h01=0x0050, text=» BNOK WO5 «, t00=0x001b, t01=0x00fa}
0x2b28…2b34 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001b, t01=0x010c}
0x2b34…2b3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0118}
0x2b3e…2b4a Head {h00=0x0008, h01=0x0050, text=»WO5 «, t00=0x001b, t01=0x0122}
0x2b4a…2b70 Head {h00=0x0022, h01=0x0050, text=» TBT TTTSTFLG,WO10«, t00=0x001b, t01=0x012e}
0x2b70…2b92 Head {h00=0x001e, h01=0x0050, text=» SET TTTSTFLG «, t00=0x001b, t01=0x0154}
0x2b92…2bc0 Head {h00=0x002a, h01=0x0050, text=» PERF SPLIN8,CBIN5,CBIN2 WRITE 'BILAG'«, t00=0x001b, t01=0x0176}
0x2bc0…2be0 Head {h00=0x001c, h01=0x0050, text=» PERF GRASPV «, t00=0x001c, t01=0x0014}
0x2be0…2bf4 Head {h00=0x0010, h01=0x0050, text=» PERF CLEAR8«, t00=0x001c, t01=0x0034}
0x2bf4…2c00 Head {h00=0x0008, h01=0x0050, text=»WO10«, t00=0x001c, t01=0x0048}
0x2c00…2c1e Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,TTLINNR «, t00=0x001c, t01=0x0054}
0x2c1e…2c50 Head {h00=0x002e, h01=0x0050, text=» DSC1 KVOUCH,POS,GSWBIN1 POSITION VOUCHER «, t00=0x001c, t01=0x0072}
0x2c50…2c72 Head {h00=0x001e, h01=0x0050, text=» EDWRT .NW,KVOUCH,GTSTRFMT«, t00=0x001c, t01=0x00a4}
0x2c72…2c80 Head {h00=0x000a, h01=0x0050, text=»***** «, t00=0x001c, t01=0x00c6}
0x2c80…2c8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00d4}
0x2c8a…2cae Head {h00=0x0020, h01=0x0050, text=»* WRITING OF TEXTLINE«, t00=0x001c, t01=0x00de}
0x2cae…2cd4 Head {h00=0x0022, h01=0x0050, text=»* FOR CHECK ON WORKSET «, t00=0x001c, t01=0x0102}
0x2cd4…2cde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0128}
0x2cde…2cec Head {h00=0x000a, h01=0x0050, text=»***** «, t00=0x001c, t01=0x0132}
0x2cec…2cf6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0140}
0x2cf6…2d38 Head {h00=0x003e, h01=0x0050, text=»* SEE OLD SUBS LINES 700 - 719«, t00=0x001c, t01=0x014a}
0x2d38…2d42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x018c}
0x2d42…2d4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0008}
0x2d4c…2d58 Head {h00=0x0008, h01=0x0050, text=»WO20«, t00=0x001d, t01=0x0012}
0x2d58…2d94 Head {h00=0x0038, h01=0x0050, text=» SUB TTLINNR,=D'2' NEXT LINE«, t00=0x001d, t01=0x001e}
0x2d94…2dd0 Head {h00=0x0038, h01=0x0050, text=» CBL TTLINNR,=D'4',NEWPG NEW PAGE?«, t00=0x001d, t01=0x005a}
0x2dd0…2de0 Head {h00=0x000c, h01=0x0050, text=» RET NO«, t00=0x001d, t01=0x0096}
0x2de0…2dea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00a6}
0x2dea…2e02 Head {h00=0x0014, h01=0x0050, text=»NEWPG NEW PAGE«, t00=0x001d, t01=0x00b0}
0x2e02…2e2c Head {h00=0x0026, h01=0x0050, text=» TBT TTPSEFLG,WORET T: IF SUBTOTAL«, t00=0x001d, t01=0x00c8}
0x2e2c…2e40 Head {h00=0x0010, h01=0x0050, text=» WAIT KVOUCH«, t00=0x001d, t01=0x00f2}
0x2e40…2e5e Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,TTLINNR «, t00=0x001d, t01=0x0106}
0x2e5e…2e7e Head {h00=0x001c, h01=0x0050, text=» DSC1 KVOUCH,POS,GSWBIN1«, t00=0x001d, t01=0x0124}
0x2e7e…2e9c Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR9,=C'TRP '«, t00=0x001d, t01=0x0144}
0x2e9c…2eb6 Head {h00=0x0016, h01=0x0050, text=» PERF FRMXVO,CBIN2«, t00=0x001d, t01=0x0162}
0x2eb6…2ed4 Head {h00=0x001a, h01=0x0050, text=» EDWRT KVOUCH,GTSTRFMT«, t00=0x001d, t01=0x017c}
0x2ed4…2efa Head {h00=0x0022, h01=0x0050, text=» DSC0 KVOUCH,RLEAS «, t00=0x001e, t01=0x000a}
0x2efa…2f10 Head {h00=0x0012, h01=0x0050, text=» SET GTCYTRPF «, t00=0x001e, t01=0x0030}
0x2f10…2f1e Head {h00=0x000a, h01=0x0050, text=»WORET «, t00=0x001e, t01=0x0046}
0x2f1e…2f2a Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001e, t01=0x0054}
0x2f2a…2f40 Head {h00=0x0012, h01=0x0050, text=» PEND «, t00=0x001e, t01=0x0060}
0x2f40…2f4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0076}
0x2f4a…2f54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0080}
0x2f54…2f6a Head {h00=0x0012, h01=0x0050, text=» EJECT«, t00=0x001e, t01=0x008a}
0x2f6a…2f80 Head {h00=0x0012, h01=0x0050, text=»GRASPV PROC «, t00=0x001e, t01=0x00a0}
0x2f80…2f9c Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x001e, t01=0x00b6}
0x2f9c…2fa6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00d2}
0x2fa6…2fc4 Head {h00=0x001a, h01=0x0050, text=»* GRASP VOUCHER«, t00=0x001e, t01=0x00dc}
0x2fc4…2fce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00fa}
0x2fce…2fea Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x001e, t01=0x0104}
0x2fea…2ffe Head {h00=0x0010, h01=0x0050, text=» WAIT KVOUCH«, t00=0x001e, t01=0x0120}
0x2ffe…3026 Head {h00=0x0024, h01=0x0050, text=» DSC0 KVOUCH,GRASP GRASP VOUCHER«, t00=0x001e, t01=0x0134}
0x3026…303a Head {h00=0x0010, h01=0x0050, text=» RET«, t00=0x001e, t01=0x015c}
0x303a…3050 Head {h00=0x0012, h01=0x0050, text=» PEND «, t00=0x001e, t01=0x0170}
0x3050…305a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0186}
0x305a…3064 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0190}
0x3064…307a Head {h00=0x0012, h01=0x0050, text=» EJECT«, t00=0x001f, t01=0x000a}
0x307a…3090 Head {h00=0x0012, h01=0x0050, text=»LINOPT PROC «, t00=0x001f, t01=0x0020}
0x3090…30ac Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x001f, t01=0x0036}
0x30ac…30b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0052}
0x30b6…30e0 Head {h00=0x0026, h01=0x0050, text=»* CHECK LINE NUMBER, IF ANY«, t00=0x001f, t01=0x005c}
0x30e0…30ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0086}
0x30ea…3106 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x001f, t01=0x0090}
0x3106…3122 Head {h00=0x0018, h01=0x0050, text=» TBT GTSWFLAG,LINST «, t00=0x001f, t01=0x00ac}
0x3122…314c Head {h00=0x0026, h01=0x0050, text=» TESTIO KEYB SEE IF INPUT FINISHED«, t00=0x001f, t01=0x00c8}
0x314c…316a Head {h00=0x001a, h01=0x0050, text=» BNOK LINOP1 NO, ABORT«, t00=0x001f, t01=0x00f2}
0x316a…3178 Head {h00=0x000a, h01=0x0050, text=»LINST «, t00=0x001f, t01=0x0110}
0x3178…318a Head {h00=0x000e, h01=0x0050, text=» WAIT KEYB«, t00=0x001f, t01=0x011e}
0x318a…31b6 Head {h00=0x0028, h01=0x0050, text=» CBE SPBINW2,=W'18',LINOP0 SLUT KEY «, t00=0x001f, t01=0x0130}
0x31b6…31f0 Head {h00=0x0036, h01=0x0050, text=» CBNE SPBINW2,=W'4',LINOP2 ONLY ENTER KEY ALLOWED «, t00=0x001f, t01=0x015c}
0x31f0…31fe Head {h00=0x000a, h01=0x0050, text=»LINOP0«, t00=0x0020, t01=0x0008}
0x31fe…322c Head {h00=0x002a, h01=0x0050, text=» CBG SPBINW1,=W'3',LINOP2 CHECK LENGTH«, t00=0x0020, t01=0x0016}
0x322c…3256 Head {h00=0x0026, h01=0x0050, text=» MOVE GSWBCD3,SPINPUT GET LINE NR «, t00=0x0020, t01=0x0044}
0x3256…328a Head {h00=0x0030, h01=0x0050, text=» CBG GSWBCD3,=D'90',LINOP4 SPECIAL FORMATS? «, t00=0x0020, t01=0x006e}
0x328a…32b0 Head {h00=0x0022, h01=0x0050, text=» PERF SPCHK5 OK, CHECK LINENR «, t00=0x0020, t01=0x00a2}
0x32b0…32e2 Head {h00=0x002e, h01=0x0050, text=» CBE SPBINW3,=W'3',LINOP2 ERROR IN LINE NR«, t00=0x0020, t01=0x00c8}
0x32e2…3316 Head {h00=0x0030, h01=0x0050, text=» MOVE TTLINNR,GSWBIN1 GET CONVERTED LINE NO.«, t00=0x0020, t01=0x00fa}
0x3316…3324 Head {h00=0x000a, h01=0x0050, text=»LIN90 «, t00=0x0020, t01=0x012e}
0x3324…3348 Head {h00=0x0020, h01=0x0050, text=» CMP CBIN0,CBIN0 SET CR=0,OK«, t00=0x0020, t01=0x013c}
0x3348…335a Head {h00=0x000e, h01=0x0050, text=» B LINRET «, t00=0x0020, t01=0x0160}
0x335a…3368 Head {h00=0x000a, h01=0x0050, text=»LINOP1«, t00=0x0020, t01=0x0172}
0x3368…338a Head {h00=0x001e, h01=0x0050, text=» CALL ABORT,KEYB ABORT I/O«, t00=0x0020, t01=0x0180}
0x338a…33ae Head {h00=0x0020, h01=0x0050, text=» CBL GTDFLIN,=W'90',LINOP101«, t00=0x0021, t01=0x0012}
0x33ae…33cc Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD3,GTDFLIN «, t00=0x0021, t01=0x0036}
0x33cc…33de Head {h00=0x000e, h01=0x0050, text=» B LINOP4 «, t00=0x0021, t01=0x0054}
0x33de…33ee Head {h00=0x000c, h01=0x0050, text=»LINOP101«, t00=0x0021, t01=0x0066}
0x33ee…340c Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD3,GTDFLIN «, t00=0x0021, t01=0x0076}
0x340c…342a Head {h00=0x001a, h01=0x0050, text=» MOVE SPINPUT,GSWBCD3 «, t00=0x0021, t01=0x0094}
0x342a…343e Head {h00=0x0010, h01=0x0050, text=» PERF SPCHK5«, t00=0x0021, t01=0x00b2}
0x343e…3470 Head {h00=0x002e, h01=0x0050, text=» MOVE TTLINNR,GSWBIN1 SET DEFAULT LINE NO «, t00=0x0021, t01=0x00c6}
0x3470…3496 Head {h00=0x0022, h01=0x0050, text=» CMP CBIN0,CBIN0 SET CR=0, OK «, t00=0x0021, t01=0x00f8}
0x3496…34b2 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'0' «, t00=0x0021, t01=0x011e}
0x34b2…34c4 Head {h00=0x000e, h01=0x0050, text=» B LINRET «, t00=0x0021, t01=0x013a}
0x34c4…34d2 Head {h00=0x000a, h01=0x0050, text=»LINOP2«, t00=0x0021, t01=0x014c}
0x34d2…34fc Head {h00=0x0026, h01=0x0050, text=» DSC0 KVOUCH,RLEAS RELEASE VOUCHER«, t00=0x0021, t01=0x015a}
0x34fc…3514 Head {h00=0x0014, h01=0x0050, text=» DSC0 KEYB,SKIB «, t00=0x0021, t01=0x0184}
0x3514…353e Head {h00=0x0026, h01=0x0050, text=» CMP CBIN0,CBIN1 SET CR<>0, NOT OK«, t00=0x0022, t01=0x000c}
0x353e…3552 Head {h00=0x0010, h01=0x0050, text=» RET«, t00=0x0022, t01=0x0036}
0x3552…3560 Head {h00=0x000a, h01=0x0050, text=»LINOP4«, t00=0x0022, t01=0x004a}
0x3560…357e Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GSWBCD3 «, t00=0x0022, t01=0x0058}
0x357e…358e Head {h00=0x000c, h01=0x0050, text=» B LIN90«, t00=0x0022, t01=0x0076}
0x358e…359c Head {h00=0x000a, h01=0x0050, text=»LINRET«, t00=0x0022, t01=0x0086}
0x359c…35be Head {h00=0x001e, h01=0x0050, text=» PERF CLEAR8 DELETE LINE 8«, t00=0x0022, t01=0x0094}
0x35be…35ca Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0022, t01=0x00b6}
0x35ca…35de Head {h00=0x0010, h01=0x0050, text=» PEND«, t00=0x0022, t01=0x00c2}
0x35de…35e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00d6}
0x35e8…35f6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0022, t01=0x00e0}
0x35f6…361c Head {h00=0x0022, h01=0x0050, text=»WRITID PROC WRITVAR1,WRITVAR2 «, t00=0x0022, t01=0x00ee}
0x361c…3638 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0022, t01=0x0114}
0x3638…3642 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0130}
0x3642…367a Head {h00=0x0034, h01=0x0050, text=»* PRINTS HEADING IDENTIFIED BY WRITVAR1«, t00=0x0022, t01=0x013a}
0x367a…36ae Head {h00=0x0030, h01=0x0050, text=»* PRINTS ID IDENTIFIED BY WRITVAR2 «, t00=0x0022, t01=0x0172}
0x36ae…36b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0016}
0x36b8…36e6 Head {h00=0x002a, h01=0x0050, text=»* PRINTS ON JOURNAL AND TALLY«, t00=0x0023, t01=0x0020}
0x36e6…36f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x004e}
0x36f0…36fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0058}
0x36fa…3716 Head {h00=0x0018, h01=0x0050, text=»* WRITVAR1:«, t00=0x0023, t01=0x0062}
0x3716…3736 Head {h00=0x001c, h01=0x0050, text=»* 1 FEJL«, t00=0x0023, t01=0x007e}
0x3736…375a Head {h00=0x0020, h01=0x0050, text=»* 2 OPSTART «, t00=0x0023, t01=0x009e}
0x375a…3784 Head {h00=0x0026, h01=0x0050, text=»* 3 DISKETTE SKIFT«, t00=0x0023, t01=0x00c2}
0x3784…37ac Head {h00=0x0024, h01=0x0050, text=»* 4 KONVERTERING«, t00=0x0023, t01=0x00ec}
0x37ac…37d8 Head {h00=0x0028, h01=0x0050, text=»* 5 DATATRANSMISSION«, t00=0x0023, t01=0x0114}
0x37d8…37fa Head {h00=0x001e, h01=0x0050, text=»* 6 BACKUP«, t00=0x0023, t01=0x0140}
0x37fa…3804 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0162}
0x3804…3820 Head {h00=0x0018, h01=0x0050, text=»* WRITVAR2:«, t00=0x0023, t01=0x016c}
0x3820…3856 Head {h00=0x0032, h01=0x0050, text=»* CHARACTERS PRINTED FROM PACKBUFFER:«, t00=0x0023, t01=0x0188}
0x3856…387e Head {h00=0x0024, h01=0x0050, text=»* 1 1-20 + 40-59«, t00=0x0024, t01=0x002e}
0x387e…38b8 Head {h00=0x0036, h01=0x0050, text=»* 2 1-20 + 23-42, IF KONVERTERING «, t00=0x0024, t01=0x0056}
0x38b8…38f6 Head {h00=0x003a, h01=0x0050, text=»* 2 1-20 + VOLID, IF NOT KONVERTERING «, t00=0x0024, t01=0x0090}
0x38f6…391a Head {h00=0x0020, h01=0x0050, text=»* 3 NOTHING «, t00=0x0024, t01=0x00ce}
0x391a…393c Head {h00=0x001e, h01=0x0050, text=»* 4 VOLID «, t00=0x0024, t01=0x00f2}
0x393c…3946 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0114}
0x3946…3950 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x011e}
0x3950…395a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0128}
0x395a…3976 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0024, t01=0x0132}
0x3976…3980 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x014e}
0x3980…3994 Head {h00=0x0010, h01=0x0050, text=» WAIT KJTAPE«, t00=0x0024, t01=0x0158}
0x3994…39d2 Head {h00=0x003a, h01=0x0050, text=» IB WRITVAR1,WRID31,WRID32,WRID33,WRID34,WRID35,WRID36«, t00=0x0024, t01=0x016c}
0x39d2…39e4 Head {h00=0x000e, h01=0x0050, text=» B WRID50 «, t00=0x0025, t01=0x001a}
0x39e4…39f2 Head {h00=0x000a, h01=0x0050, text=»WRID34«, t00=0x0025, t01=0x002c}
0x39f2…3a12 Head {h00=0x001c, h01=0x0050, text=» MOVE GSWSTR20,=C'FEJL '«, t00=0x0025, t01=0x003a}
0x3a12…3a24 Head {h00=0x000e, h01=0x0050, text=» B WRID50 «, t00=0x0025, t01=0x005a}
0x3a24…3a32 Head {h00=0x000a, h01=0x0050, text=»WRID31«, t00=0x0025, t01=0x006c}
0x3a32…3a56 Head {h00=0x0020, h01=0x0050, text=» MOVE GSWSTR20,=C'OPSTART ' «, t00=0x0025, t01=0x007a}
0x3a56…3a68 Head {h00=0x000e, h01=0x0050, text=» B WRID40 «, t00=0x0025, t01=0x009e}
0x3a68…3a76 Head {h00=0x000a, h01=0x0050, text=»WRID32«, t00=0x0025, t01=0x00b0}
0x3a76…3aa0 Head {h00=0x0026, h01=0x0050, text=» MOVE GSWSTR20,=C'DISKETTE SKIFT '«, t00=0x0025, t01=0x00be}
0x3aa0…3ab2 Head {h00=0x000e, h01=0x0050, text=» B WRID40 «, t00=0x0025, t01=0x00e8}
0x3ab2…3ac0 Head {h00=0x000a, h01=0x0050, text=»WRID33«, t00=0x0025, t01=0x00fa}
0x3ac0…3ae8 Head {h00=0x0024, h01=0x0050, text=» MOVE GSWSTR20,=C'KONVERTERING '«, t00=0x0025, t01=0x0108}
0x3ae8…3afa Head {h00=0x000e, h01=0x0050, text=» B WRID40 «, t00=0x0025, t01=0x0130}
0x3afa…3b08 Head {h00=0x000a, h01=0x0050, text=»WRID35«, t00=0x0025, t01=0x0142}
0x3b08…3b34 Head {h00=0x0028, h01=0x0050, text=» MOVE GSWSTR20,=C'DATATRANSMISSION '«, t00=0x0025, t01=0x0150}
0x3b34…3b46 Head {h00=0x000e, h01=0x0050, text=» B WRID40 «, t00=0x0025, t01=0x017c}
0x3b46…3b54 Head {h00=0x000a, h01=0x0050, text=»WRID36«, t00=0x0025, t01=0x018e}
0x3b54…3b76 Head {h00=0x001e, h01=0x0050, text=» MOVE GSWSTR20,=C'BACKUP '«, t00=0x0026, t01=0x000c}
0x3b76…3b88 Head {h00=0x000e, h01=0x0050, text=» B WRID40 «, t00=0x0026, t01=0x002e}
0x3b88…3b96 Head {h00=0x000a, h01=0x0050, text=»WRID40«, t00=0x0026, t01=0x0040}
0x3b96…3bb2 Head {h00=0x0018, h01=0x0050, text=» PERF WRITJT,=W'12' «, t00=0x0026, t01=0x004e}
0x3bb2…3bcc Head {h00=0x0016, h01=0x0050, text=» PERF FRMXTA,CBIN6«, t00=0x0026, t01=0x006a}
0x3bcc…3be0 Head {h00=0x0010, h01=0x0050, text=» PERF WTALLY«, t00=0x0026, t01=0x0084}
0x3be0…3bea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0098}
0x3bea…3bf4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00a2}
0x3bf4…3c02 Head {h00=0x000a, h01=0x0050, text=»WRID50«, t00=0x0026, t01=0x00ac}
0x3c02…3c16 Head {h00=0x0010, h01=0x0050, text=» WAIT KTALLY«, t00=0x0026, t01=0x00ba}
0x3c16…3c38 Head {h00=0x001e, h01=0x0050, text=» CBE WRITVAR2,CBIN3,WRID80«, t00=0x0026, t01=0x00ce}
0x3c38…3c5a Head {h00=0x001e, h01=0x0050, text=» CBE WRITVAR2,CBIN4,WRID73«, t00=0x0026, t01=0x00f0}
0x3c5a…3c78 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR20,CPCKBUF«, t00=0x0026, t01=0x0112}
0x3c78…3c94 Head {h00=0x0018, h01=0x0050, text=» PERF WRITJT,=W'12' «, t00=0x0026, t01=0x0130}
0x3c94…3cb6 Head {h00=0x001e, h01=0x0050, text=» CBG WRITVAR1,=W'3',WRID60«, t00=0x0026, t01=0x014c}
0x3cb6…3cd0 Head {h00=0x0016, h01=0x0050, text=» PERF FRMXTA,CBIN6«, t00=0x0026, t01=0x016e}
0x3cd0…3ce4 Head {h00=0x0010, h01=0x0050, text=» PERF WTALLY«, t00=0x0026, t01=0x0188}
0x3ce4…3cf8 Head {h00=0x0010, h01=0x0050, text=» WAIT KTALLY«, t00=0x0027, t01=0x000c}
0x3cf8…3d02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0020}
0x3d02…3d10 Head {h00=0x000a, h01=0x0050, text=»WRID60«, t00=0x0027, t01=0x002a}
0x3d10…3d32 Head {h00=0x001e, h01=0x0050, text=» CBE WRITVAR2,CBIN2,WRID70«, t00=0x0027, t01=0x0038}
0x3d32…3d4e Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,CBIN20«, t00=0x0027, t01=0x005a}
0x3d4e…3d6a Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'40'«, t00=0x0027, t01=0x0076}
0x3d6a…3d9e Head {h00=0x0030, h01=0x0050, text=» COPY GSWSTR20,CBIN0,GSWBIN2,CPCKBUF,GSWBIN1«, t00=0x0027, t01=0x0092}
0x3d9e…3db0 Head {h00=0x000e, h01=0x0050, text=» B WRID75 «, t00=0x0027, t01=0x00c6}
0x3db0…3dba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00d8}
0x3dba…3dc8 Head {h00=0x000a, h01=0x0050, text=»WRID70«, t00=0x0027, t01=0x00e2}
0x3dc8…3dec Head {h00=0x0020, h01=0x0050, text=» CBNE WRITVAR1,CBIN4,WRID72 «, t00=0x0027, t01=0x00f0}
0x3dec…3e08 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,CBIN20«, t00=0x0027, t01=0x0114}
0x3e08…3e24 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'23'«, t00=0x0027, t01=0x0130}
0x3e24…3e58 Head {h00=0x0030, h01=0x0050, text=» COPY GSWSTR20,CBIN0,GSWBIN2,CPCKBUF,GSWBIN1«, t00=0x0027, t01=0x014c}
0x3e58…3e6a Head {h00=0x000e, h01=0x0050, text=» B WRID75 «, t00=0x0027, t01=0x0180}
0x3e6a…3e78 (40, 0, 400) Head {h00=0x000a, h01=0x0050, text=»WRID72«, t00=0x0028, t01=0x0004}
0x3e78…3e9a Head {h00=0x001e, h01=0x0050, text=» CBG WRITVAR1,CBIN2,WRID80«, t00=0x0028, t01=0x0012}
0x3e9a…3ea8 Head {h00=0x000a, h01=0x0050, text=»WRID73«, t00=0x0028, t01=0x0034}
0x3ea8…3ec6 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR20,CBLANKS«, t00=0x0028, t01=0x0042}
0x3ec6…3ee2 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD3,CVOLNO«, t00=0x0028, t01=0x0060}
0x3ee2…3f00 Head {h00=0x001a, h01=0x0050, text=» EDIT GSWSTR20,FRVOLID«, t00=0x0028, t01=0x007c}
0x3f00…3f0e Head {h00=0x000a, h01=0x0050, text=»WRID75«, t00=0x0028, t01=0x009a}
0x3f0e…3f2a Head {h00=0x0018, h01=0x0050, text=» PERF WRITJT,=W'12' «, t00=0x0028, t01=0x00a8}
0x3f2a…3f54 Head {h00=0x0026, h01=0x0050, text=» CBL WRITVAR1,=W'4',WRID76 1,2,3,6«, t00=0x0028, t01=0x00c4}
0x3f54…3f7a Head {h00=0x0022, h01=0x0050, text=» CBL WRITVAR1,=W'6',WRID90 4,5«, t00=0x0028, t01=0x00ee}
0x3f7a…3f88 Head {h00=0x000a, h01=0x0050, text=»WRID76«, t00=0x0028, t01=0x0114}
0x3f88…3fa2 Head {h00=0x0016, h01=0x0050, text=» PERF FRMXTA,CBIN6«, t00=0x0028, t01=0x0122}
0x3fa2…3fb6 Head {h00=0x0010, h01=0x0050, text=» PERF WTALLY«, t00=0x0028, t01=0x013c}
0x3fb6…3fca Head {h00=0x0010, h01=0x0050, text=» WAIT KTALLY«, t00=0x0028, t01=0x0150}
0x3fca…3fdc Head {h00=0x000e, h01=0x0050, text=» B WRID85 «, t00=0x0028, t01=0x0164}
0x3fdc…3fea Head {h00=0x000a, h01=0x0050, text=»WRID80«, t00=0x0028, t01=0x0176}
0x3fea…400c Head {h00=0x001e, h01=0x0050, text=» CBG WRITVAR1,=W'3',WRID90«, t00=0x0028, t01=0x0184}
0x400c…401a Head {h00=0x000a, h01=0x0050, text=»WRID85«, t00=0x0029, t01=0x0016}
0x401a…4034 Head {h00=0x0016, h01=0x0050, text=» PERF FRMXTA,CBIN7«, t00=0x0029, t01=0x0024}
0x4034…4048 Head {h00=0x0010, h01=0x0050, text=» PERF WTALLY«, t00=0x0029, t01=0x003e}
0x4048…405c Head {h00=0x0010, h01=0x0050, text=» WAIT KTALLY«, t00=0x0029, t01=0x0052}
0x405c…406a Head {h00=0x000a, h01=0x0050, text=»WRID90«, t00=0x0029, t01=0x0066}
0x406a…4076 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0029, t01=0x0074}
0x4076…4084 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0029, t01=0x0080}
0x4084…4092 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0029, t01=0x008e}
0x4092…40a6 Head {h00=0x0010, h01=0x0050, text=»CLEAR8 PROC «, t00=0x0029, t01=0x009c}
0x40a6…40ce Head {h00=0x0024, h01=0x0050, text=»* DELETE FIRST 14 CHARACTERS«, t00=0x0029, t01=0x00b0}
0x40ce…40e6 Head {h00=0x0014, h01=0x0050, text=»* OF LINE 8 «, t00=0x0029, t01=0x00d8}
0x40e6…4118 Head {h00=0x002e, h01=0x0050, text=» MOVE GSWBIN2,=X'0801' INDICATE LAST LINE «, t00=0x0029, t01=0x00f0}
0x4118…4138 Head {h00=0x001c, h01=0x0050, text=» DSC1 SCREEN,06,GSWBIN2 «, t00=0x0029, t01=0x0122}
0x4138…4154 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,CBIN14«, t00=0x0029, t01=0x0142}
0x4154…4182 Head {h00=0x002a, h01=0x0050, text=» DSC1 SCREEN,02,GSWBIN2 ERASE 14 CHARS«, t00=0x0029, t01=0x015e}
0x4182…4190 Head {h00=0x000a, h01=0x0050, text=» RET «, t00=0x0029, t01=0x018c}
0x4190…419e Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x002a, t01=0x000a}
0x419e…41a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0018}
0x41a8…41e2 Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x002a, t01=0x0022}
0x41e2…41ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x005c}
0x41ec…420e Head {h00=0x001e, h01=0x0050, text=»* FORMATS FOR WRITFD«, t00=0x002a, t01=0x0066}
0x420e…4218 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0088}
0x4218…4258 Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x002a, t01=0x0092}
0x4258…4262 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00d2}
0x4262…4276 Head {h00=0x0010, h01=0x0050, text=»PCKINIT FRMT«, t00=0x002a, t01=0x00dc}
0x4276…428c Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',40 «, t00=0x002a, t01=0x00f0}
0x428c…42a2 Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',40 «, t00=0x002a, t01=0x0106}
0x42a2…42be Head {h00=0x0018, h01=0x0050, text=» FBT CSWFLAG,INIT10 «, t00=0x002a, t01=0x011c}
0x42be…42d6 Head {h00=0x0014, h01=0x0050, text=» FILLR X'00',48 «, t00=0x002a, t01=0x0138}
0x42d6…42e4 Head {h00=0x000a, h01=0x0050, text=» FEXIT«, t00=0x002a, t01=0x0150}
0x42e4…42f2 Head {h00=0x000a, h01=0x0050, text=»INIT10«, t00=0x002a, t01=0x015e}
0x42f2…4308 Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',48 «, t00=0x002a, t01=0x016c}
0x4308…4316 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002a, t01=0x0182}
0x4316…4320 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0190}
0x4320…4334 Head {h00=0x0010, h01=0x0050, text=»FRVOLID FRMT«, t00=0x002b, t01=0x000a}
0x4334…4354 Head {h00=0x001c, h01=0x0050, text=» FMEL '999999',CMASKDAT «, t00=0x002b, t01=0x001e}
0x4354…4372 Head {h00=0x001a, h01=0x0050, text=» FMEL 'B99999',GSWBCD3«, t00=0x002b, t01=0x003e}
0x4372…4380 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002b, t01=0x005c}
0x4380…438a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x006a}
0x438a…439c Head {h00=0x000e, h01=0x0050, text=»TREC1 FRMT«, t00=0x002b, t01=0x0074}
0x439c…43b6 Head {h00=0x0016, h01=0x0050, text=» FMEL '999',GTMSK «, t00=0x002b, t01=0x0086}
0x43b6…43cc Head {h00=0x0012, h01=0x0050, text=» FILLR C'G',1 «, t00=0x002b, t01=0x00a0}
0x43cc…43e6 Head {h00=0x0016, h01=0x0050, text=» FMEL '99',CEDATNR«, t00=0x002b, t01=0x00b6}
0x43e6…4404 Head {h00=0x001a, h01=0x0050, text=» FMEL '99999',CRECBCD «, t00=0x002b, t01=0x00d0}
0x4404…4420 Head {h00=0x0018, h01=0x0050, text=» FBT CSPLITFL,TREC40«, t00=0x002b, t01=0x00ee}
0x4420…443a Head {h00=0x0016, h01=0x0050, text=» FMEL '99',GTREGNR«, t00=0x002b, t01=0x010a}
0x443a…4450 Head {h00=0x0012, h01=0x0050, text=» FCOPY =C'&01'«, t00=0x002b, t01=0x0124}
0x4450…446c Head {h00=0x0018, h01=0x0050, text=» FMEL '9999',CKMDNR «, t00=0x002b, t01=0x013a}
0x446c…4488 Head {h00=0x0018, h01=0x0050, text=» FBF GTKASSE,TREC40 «, t00=0x002b, t01=0x0156}
0x4488…44a4 Head {h00=0x0018, h01=0x0050, text=» FBT TTR11FLG,TREC10«, t00=0x002b, t01=0x0172}
0x44a4…44ba Head {h00=0x0012, h01=0x0050, text=» FCOPY =C'&02'«, t00=0x002b, t01=0x018e}
0x44ba…44d8 Head {h00=0x001a, h01=0x0050, text=» FMEL '999999',GTDATO «, t00=0x002c, t01=0x0014}
0x44d8…44e6 Head {h00=0x000a, h01=0x0050, text=»TREC10«, t00=0x002c, t01=0x0032}
0x44e6…44fc Head {h00=0x0012, h01=0x0050, text=» FCOPY =C'&03'«, t00=0x002c, t01=0x0040}
0x44fc…4516 Head {h00=0x0016, h01=0x0050, text=» FMEL '999',GTMSK «, t00=0x002c, t01=0x0056}
0x4516…4532 Head {h00=0x0018, h01=0x0050, text=» FBT TTR11FLG,TREC40«, t00=0x002c, t01=0x0070}
0x4532…4548 Head {h00=0x0012, h01=0x0050, text=» FCOPY =C'&04'«, t00=0x002c, t01=0x008c}
0x4548…4564 Head {h00=0x0018, h01=0x0050, text=» FMEL '99999',TTLBNR«, t00=0x002c, t01=0x00a2}
0x4564…4572 Head {h00=0x000a, h01=0x0050, text=»TREC40«, t00=0x002c, t01=0x00be}
0x4572…4580 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002c, t01=0x00cc}
0x4580…458a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00da}
0x458a…459c Head {h00=0x000e, h01=0x0050, text=»PFRM1 FRMT«, t00=0x002c, t01=0x00e4}
0x459c…45b0 Head {h00=0x0010, h01=0x0050, text=» FCOPY =C'&'«, t00=0x002c, t01=0x00f6}
0x45b0…45ca Head {h00=0x0016, h01=0x0050, text=» FMEL '99',GSWBCD3«, t00=0x002c, t01=0x010a}
0x45ca…45e6 Head {h00=0x0018, h01=0x0050, text=» FBP GSWBCD3,PLAB10 «, t00=0x002c, t01=0x0124}
0x45e6…4616 Head {h00=0x002c, h01=0x0050, text=» FMEL 'TTTTTTTTTTTTT9-',GTDUPF(GSWBIN5) «, t00=0x002c, t01=0x0140}
0x4616…4624 Head {h00=0x000a, h01=0x0050, text=» FEXIT«, t00=0x002c, t01=0x0170}
0x4624…4632 Head {h00=0x000a, h01=0x0050, text=»PLAB10«, t00=0x002c, t01=0x017e}
0x4632…4660 Head {h00=0x002a, h01=0x0050, text=» FMEL 'TTTTTTTTTTTTT9',GTDUPF(GSWBIN5)«, t00=0x002c, t01=0x018c}
0x4660…466e Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002d, t01=0x002a}
0x466e…4682 Head {h00=0x0010, h01=0x0050, text=» END«, t00=0x002d, t01=0x0038}
0x4682…4686 Head {h00=0x4004, h01=0x0000}
0x4686…468a 00 2d 00 4c ┆ - L┆
0x468a…4692 (46, 1, 8) 20 04 00 00 00 2e 00 04 ┆ . ┆
0x4692…46e2 (47, 2, 88) 00 00 00 00 00 00 00 00 00 00 00 00 00 2e 01 76 00 16 00 12 03 08 00 00 01 69 00 00 00 00 00 00 00 00 00 00 00 2a 00 2f 00 14 00 10 00 0c 04 05 00 00 00 01 01 72 00 03 00 00 00 2f 00 2e 00 0e 00 0a 07 04 00 00 01 69 01 72 00 00 00 2f 00 42 ┆ . v i * / r / . i r / B┆
0x46e2…46ea 40 04 00 00 00 2f 00 54 ┆@ / T┆
0x46ea…473a (48, 2, 216) 00 3a 00 48 20 49 44 45 4e 54 20 44 3a 43 42 36 30 20 20 54 52 41 20 34 2e 32 20 20 38 31 2d 30 35 2d 30 35 20 46 31 20 4f 31 31 31 31 20 20 30 32 2e 30 33 2e 58 58 58 2e 31 00 30 00 04 00 0e 00 0a 01 04 c8 44 3a 43 42 36 30 00 00 30 00 42 ┆ : H IDENT D:CB60 TRA 4.2 81-05-05 F1 O1111 02.03.XXX.1 0 D:CB60 0 B┆
0x473a…478a 00 10 00 0c 05 05 c8 44 3a 43 42 36 30 43 00 02 00 30 00 54 00 2a 00 26 03 12 00 00 00 01 00 00 00 3a 20 02 00 00 20 02 00 02 20 02 00 04 20 02 00 06 20 02 00 08 b0 07 00 0a 00 07 00 00 00 30 00 68 00 28 00 24 03 11 00 00 00 1f 00 00 00 80 ┆ D:CB60C 0 T * & : 0 h ( $ ┆
0x478a…47c2 00 3b 00 80 00 bb 30 02 01 3b 80 02 01 3d 00 0c 00 00 b0 02 01 55 00 0c 00 00 00 30 00 96 00 0e 00 0a 07 04 00 00 00 01 00 3a 00 00 00 30 00 c2 40 04 00 00 00 30 00 d4 ┆ ; 0 ; = U 0 : 0 @ 0 ┆
0x47c2…4812 (49, 0, 400) 00 3a 00 48 20 49 44 45 4e 54 20 5a 3a 54 42 31 30 20 20 54 52 41 20 34 2e 32 20 20 38 31 2d 30 35 2d 30 35 20 46 31 20 4f 31 31 31 31 20 20 30 32 2e 30 33 2e 58 58 58 2e 31 00 31 00 04 00 0e 00 0a 01 04 c8 5a 3a 54 42 31 30 00 00 31 00 42 ┆ : H IDENT Z:TB10 TRA 4.2 81-05-05 F1 O1111 02.03.XXX.1 1 Z:TB10 1 B┆
0x4812…4862 00 10 00 0c 05 05 c8 5a 3a 54 42 31 30 54 00 04 00 31 00 54 00 2a 00 26 03 12 00 00 00 01 00 00 00 00 00 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 31 00 68 00 2a 00 26 03 12 00 00 00 1f 00 00 00 00 ┆ Z:TB10T 1 T * & 1 h * & ┆
0x4862…48b2 00 00 00 00 00 00 00 00 00 00 ff ff ff ff 00 20 f0 00 00 00 00 00 00 00 f0 00 00 00 00 31 00 96 00 2a 00 26 03 12 00 00 00 3d 00 00 00 00 00 00 f0 00 00 00 00 00 00 00 f0 00 00 00 00 00 00 00 f0 00 00 00 00 00 00 00 f0 00 00 31 00 c4 00 2a ┆ 1 * & = 1 *┆
0x48b2…4902 00 26 03 12 00 00 00 5b 00 00 00 00 00 00 00 00 f0 00 00 00 00 00 00 00 f0 00 00 00 00 00 00 00 f0 00 00 00 00 00 00 00 00 31 00 f2 00 2a 00 26 03 12 00 00 00 79 00 00 f0 00 00 00 00 00 00 00 f0 00 00 00 00 00 00 00 f0 00 00 00 00 00 00 00 ┆ & [ 1 * & y ┆
0x4902…4952 f0 00 00 00 00 00 00 31 01 20 00 2a 00 26 03 12 00 00 00 97 00 00 00 00 f0 00 00 00 00 00 00 00 f0 00 00 00 00 00 00 00 f0 00 00 00 00 00 00 00 f0 00 00 00 00 31 01 4e 00 2a 00 26 03 12 00 00 00 b5 00 00 00 00 00 00 f0 00 00 00 00 00 00 00 ┆ 1 * & 1 N * & ┆
0x4952…49a2 (50, 2, 146) f0 00 00 00 00 00 00 00 f0 00 00 00 00 00 00 00 f0 00 00 31 01 7c 00 2a 00 26 03 12 00 00 00 d3 00 00 00 00 00 00 00 00 f0 00 00 00 00 00 00 00 f0 00 00 00 00 00 00 00 f0 00 00 00 00 00 00 00 00 32 00 1a 00 1c 00 18 03 0b 00 00 00 f1 00 00 ┆ 1 | * & 2 ┆
0x49a2…49e4 f0 00 00 00 00 00 00 00 f0 00 00 00 00 00 00 00 00 32 00 48 00 10 00 0c 04 05 00 00 00 01 01 00 00 03 00 00 00 32 00 68 00 0e 00 0a 07 04 00 00 00 f1 01 00 00 00 00 32 00 7c 40 04 00 00 00 32 00 8e ┆ 2 H 2 h 2 |@ 2 ┆
0x49e4…4a34 (51, 2, 244) 00 3a 00 48 20 49 44 45 4e 54 20 44 3a 54 42 31 30 20 20 54 52 41 20 34 2e 32 20 20 38 31 2d 30 35 2d 30 35 20 46 31 20 4f 31 31 31 31 20 20 30 32 2e 30 33 2e 58 58 58 2e 31 00 33 00 04 00 0e 00 0a 01 04 c8 44 3a 54 42 31 30 00 00 33 00 42 ┆ : H IDENT D:TB10 TRA 4.2 81-05-05 F1 O1111 02.03.XXX.1 3 D:TB10 3 B┆
0x4a34…4a84 00 10 00 0c 05 05 c8 44 3a 54 42 31 30 54 00 02 00 33 00 54 00 2a 00 26 03 12 00 00 00 01 00 00 00 46 20 02 00 00 20 02 00 02 20 02 00 04 20 02 00 06 30 01 00 08 30 06 00 09 30 07 00 0f 00 33 00 68 00 2a 00 26 03 12 00 00 00 1f 00 00 30 02 ┆ D:TB10T 3 T * & F 0 0 0 3 h * & 0 ┆
0x4a84…4ad4 00 16 30 02 00 18 30 02 00 1a 30 07 00 1c 30 03 00 23 30 04 00 26 30 01 00 2a 00 01 00 33 00 96 00 16 00 12 03 08 00 00 00 3d 00 00 00 2b b0 08 00 2c 00 1a 00 00 00 33 00 c4 00 0e 00 0a 07 04 00 00 00 1f 00 46 00 00 00 33 00 de 40 04 00 00 ┆ 0 0 0 0 #0 &0 * 3 = + , 3 F 3 @ ┆
0x4ad4…4ad8 00 33 00 f0 ┆ 3 ┆
0x4ad8…4b28 (52, 2, 262) 00 3a 00 48 20 49 44 45 4e 54 20 5a 3a 47 42 31 30 20 20 54 52 41 20 34 2e 32 20 20 38 31 2d 30 35 2d 30 35 20 46 31 20 4f 31 31 31 31 20 20 30 32 2e 30 33 2e 58 58 58 2e 31 00 34 00 04 00 0e 00 0a 01 04 c8 5a 3a 47 42 31 30 00 00 34 00 42 ┆ : H IDENT Z:GB10 TRA 4.2 81-05-05 F1 O1111 02.03.XXX.1 4 Z:GB10 4 B┆
0x4b28…4b78 00 10 00 0c 05 05 c8 5a 3a 47 42 31 30 47 00 04 00 34 00 54 00 2a 00 26 03 12 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 34 00 68 00 2a 00 26 03 12 00 00 00 1f 00 00 00 00 ┆ Z:GB10G 4 T * & 4 h * & ┆
0x4b78…4bc8 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 34 00 96 00 14 00 16 03 0a 00 00 00 3d 00 00 00 00 00 00 00 00 00 20 00 34 00 c4 00 10 00 0c 04 05 00 00 00 01 00 4a 00 03 04 00 00 34 00 dc 00 0e 00 0a ┆ 4 = 4 J 4 ┆
0x4bc8…4bde 07 04 00 00 00 3d 00 4a 00 00 00 34 00 f0 40 04 00 00 00 34 01 02 ┆ = J 4 @ 4 ┆