DataMuseum.dk

Presents historical artifacts from the history of:

Philips Data Systems

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Philips Data Systems

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦6ca3df893⟧

    Length: 10898 (0x2a92)
    Notes: pts_type(SC)
    Names: »RGSUB3.SC«

Derivation

└─⟦d2cdd233a⟧ Bits:30009674 Philips computer tape "600204"
    └─⟦this⟧ »OD-KOM/RGSUB3.SC« 

PTS(SC)

	IDENT RGSUB3 830929 EV 
 DDUM KMD08 
 PDIV 
* 
 ENTRY ASGVOL 
 ENTRY CLSVOL 
 ENTRY ASGFIL 
 ENTRY CYLINE 
 ENTRY CYOUT
 ENTRY CYWRT
 ENTRY CYRD 
 ENTRY CYTRP
* 
 EXT ABORT
 EXT ASSG 
 EXT RAWRIT 
 EXT RAREAD 
 EXT SPLIN8 
 EXT CLEAR8 
 EXT GRASPV 
 EXT FRMXVO 
 EXT CRVO 
* 
 INCLUDE EQUATE 
 EJECT
ASGVOL PROC VOL 
********************
* 
*          ASSIGN ROUTINE - PER VOLUME
* 
*          ASSIGNS ALL FILES ON SPECIFIED VOLUME
* 
*          IF VOL=0, ONLY CONFIGURATION DATA SET
* 
* 
*          CALL:     PERF ASGVOL,<VOLUME NUMBER>
* 
********************
* 
 IB VOL,		C 
		ASG100,ASG200,ASG300,ASG400 
 CBNE VOL,CBIN0,ASGNOK
* 
ASG000			ASSIGN CONF DATASET
 PERF ASSG,CBIN1,DK01,CBIN1 
 B ASGRET 
* 
ASG100			ASSIGN ALL FILES - VOLUME 1
 PERF ASSG,CBIN1,DK01,CBIN1 CONF DATASET
 BNOK ASGRET
 PERF ASSG,CBIN1,DK03,CBIN3 CYCLE DATASET 
 BNOK ASGRET
 PERF ASSG,CBIN1,DK04,CBIN4 KT PLAN 
 BNOK ASGRET
 TBF CGLREGFL,ASGRET
 MOVE CGLRECNR,=D'0'
 PERF ASSG,CBIN1,DK05,CBIN5 OLD REGSET
 BNOK ASGRET
 MOVE CGLRECNR,TTGLREC
 B ASGRET 
* 
ASG200			ASSIGN ALL FILES - VOLUME 2
 CBE CREGVOL,=W'4',ASG400 
 PERF ASSG,CBIN2,DK02,CBIN2 REG DATASET 
 B ASGRET 
* 
ASG300			ASSIGN ALL FILES - VOLUME 3
 B ASGOK
* 
ASG400			ASSIGN ALL FILES - VOLUME 4
 PERF ASSG,CBIN4,DK02,CBIN2 SECOND REG DATASET
 B ASGRET 
* 
ASGNOK
 CMP CBIN1,CBIN0
 RET
* 
ASGOK 
 CMP CBIN0,CBIN0
ASGRET
 RET
 PEND 
* 
 EJECT
ASGFIL PROC FILNR 
**********
* 
*     ASSIGNS FILE REGSET ON EITHER 
*     VOLUME 2 OR 4 
* 
**********
* 
 IB FILNR,		C 
		ASGFRET,ASGF200 
 B ASGFRET
* 
ASGF200			FILE REGSET 
 CBNL CREGVOL,=W'2',ASGF250 
*     ONLY VOLUME 2 
 PERF ASGVOL,CBIN2
 B ASGFRET
* 
ASGF250 
*     VOLUME 2 AND 4
*     FIRST ALTERNATE 
 MOVE GSWBIN2,CBIN6 
 SUB GSWBIN2,CREGVOL
 MOVE CREGVOL,GSWBIN2 
 PERF ASGVOL,CBIN2
 BOK ASGFRET
 MOVE GSWBIN2,CBIN6 
 SUB GSWBIN2,CREGVOL
 MOVE CREGVOL,GSWBIN2 
 PERF ASGVOL,CBIN2
ASGFRET 
 RET
 PEND 
* 
 EJECT
CLSVOL PROC VOL 
********************
* 
*          CLOSE ROUTINE - PER VOLUME 
* 
*          CLOSES ALL FILES ON SPECIFIED VOLUME 
* 
*          CALL:     PERF CLSVOL,<VOLUME NUMBER>
* 
********************
* 
 SET CDKOFF 
 TBF CWFLAG,CLS050
 DELAY CBIN20 
CLS050
* 
* 
 IB VOL,		C 
		CLS100,CLS200,CLS300,CLS400 
 B CLSRET 
* 
CLS100			CLOSE ALL FILES - VOLUME 1 
 DSC0 DK01,CLOSE
 DSC0 DK02,CLOSE
 DSC0 DK04,CLOSE
 TBF CGLREGFL,CLS150
 DSC0 DK05,CLOSE
CLS150
 DSC0 FD01,UNLOD
 B CLSRET 
* 
CLS200			CLOSE ALL FILES - VOLUME 2 
 CBE CREGVOL,=W'4',CLS400 
 DSC0 DK02,CLOSE
 DSC0 FD02,UNLOD
 B CLSRET 
* 
CLS300			CLOSE ALL FILES - VOLUME 3 
 B CLSRET 
* 
CLS400			CLOSE ALL FILES - VOLUME 4 
 DSC0 DK02,CLOSE SECOND REG DATASET 
 DSC0 FD03,UNLOD
 B CLSRET 
* 
CLSRET
 RET
 PEND 
* 
 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,TTASKNR
 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
********************
* 
*          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
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
 CMP CBIN0,CBIN0 OK 
 RET
* 
CYWRT100
 PERF CYOUT 
 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 
 TBF CCYPFLG,CYRD010
 DELAY CBIN2 WAIT FOR CYCLE BUFFER
 B CYRD000
CYRD010 
 SET CCYPFLG RESERVE CYCLE BUFFER 
 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 
 WAIT KVOUCH
 DSC0 .NW,KVOUCH,RLEAS
 CLEAR TTTSTFLG 
 MOVE GSWSTR9,=C'TRP '
 PERF FRMXVO,CBIN2
 MOVE GTCYIN,TTASKNR
 SUB GTCYIN,CBIN1 
 MUL GTCYIN,CCYSIZE 
 ADD GTCYIN,CBIN1 
 MOVE GTCYOUT,GTCYIN
 MOVE TTLINNR,TTCYKST 
 MOVE TTCYKPOS,TTLINNR
 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 
* 
 END

HexDump

0x0000…0020 (0, 0, 400)  Head {h00=0x001c, h01=0x0050, text=» IDENT RGSUB3 830929 EV «, t00=0x0000, t01=0x0004}
0x0020…0034              Head {h00=0x0010, h01=0x0050, text=» DDUM KMD08 «, t00=0x0000, t01=0x0024}
0x0034…0042              Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x0000, t01=0x0038}
0x0042…004c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0046}
0x004c…0062              Head {h00=0x0012, h01=0x0050, text=» ENTRY ASGVOL «, t00=0x0000, t01=0x0050}
0x0062…0078              Head {h00=0x0012, h01=0x0050, text=» ENTRY CLSVOL «, t00=0x0000, t01=0x0066}
0x0078…008e              Head {h00=0x0012, h01=0x0050, text=» ENTRY ASGFIL «, t00=0x0000, t01=0x007c}
0x008e…00a4              Head {h00=0x0012, h01=0x0050, text=» ENTRY CYLINE «, t00=0x0000, t01=0x0092}
0x00a4…00b8              Head {h00=0x0010, h01=0x0050, text=» ENTRY CYOUT«, t00=0x0000, t01=0x00a8}
0x00b8…00cc              Head {h00=0x0010, h01=0x0050, text=» ENTRY CYWRT«, t00=0x0000, t01=0x00bc}
0x00cc…00e0              Head {h00=0x0010, h01=0x0050, text=» ENTRY CYRD «, t00=0x0000, t01=0x00d0}
0x00e0…00f4              Head {h00=0x0010, h01=0x0050, text=» ENTRY CYTRP«, t00=0x0000, t01=0x00e4}
0x00f4…00fe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00f8}
0x00fe…0110              Head {h00=0x000e, h01=0x0050, text=» EXT ABORT«, t00=0x0000, t01=0x0102}
0x0110…0122              Head {h00=0x000e, h01=0x0050, text=» EXT ASSG «, t00=0x0000, t01=0x0114}
0x0122…0136              Head {h00=0x0010, h01=0x0050, text=» EXT RAWRIT «, t00=0x0000, t01=0x0126}
0x0136…014a              Head {h00=0x0010, h01=0x0050, text=» EXT RAREAD «, t00=0x0000, t01=0x013a}
0x014a…015e              Head {h00=0x0010, h01=0x0050, text=» EXT SPLIN8 «, t00=0x0000, t01=0x014e}
0x015e…0172              Head {h00=0x0010, h01=0x0050, text=» EXT CLEAR8 «, t00=0x0000, t01=0x0162}
0x0172…0186              Head {h00=0x0010, h01=0x0050, text=» EXT GRASPV «, t00=0x0000, t01=0x0176}
0x0186…019a              Head {h00=0x0010, h01=0x0050, text=» EXT FRMXVO «, t00=0x0000, t01=0x018a}
0x019a…01ac              Head {h00=0x000e, h01=0x0050, text=» EXT CRVO «, t00=0x0001, t01=0x000e}
0x01ac…01b6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0020}
0x01b6…01ce              Head {h00=0x0014, h01=0x0050, text=» INCLUDE EQUATE «, t00=0x0001, t01=0x002a}
0x01ce…01dc              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x0042}
0x01dc…01f4              Head {h00=0x0014, h01=0x0050, text=»ASGVOL PROC VOL «, t00=0x0001, t01=0x0050}
0x01f4…0210              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0001, t01=0x0068}
0x0210…021a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0084}
0x021a…0248              Head {h00=0x002a, h01=0x0050, text=»*          ASSIGN ROUTINE - PER VOLUME«, t00=0x0001, t01=0x008e}
0x0248…0252              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00bc}
0x0252…028a              Head {h00=0x0034, h01=0x0050, text=»*          ASSIGNS ALL FILES ON SPECIFIED VOLUME«, t00=0x0001, t01=0x00c6}
0x028a…0294              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00fe}
0x0294…02cc              Head {h00=0x0034, h01=0x0050, text=»*          IF VOL=0, ONLY CONFIGURATION DATA SET«, t00=0x0001, t01=0x0108}
0x02cc…02d6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0140}
0x02d6…02e0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x014a}
0x02e0…0318              Head {h00=0x0034, h01=0x0050, text=»*          CALL:     PERF ASGVOL,<VOLUME NUMBER>«, t00=0x0001, t01=0x0154}
0x0318…0322              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x018c}
0x0322…033e              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0002, t01=0x0008}
0x033e…0348              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0024}
0x0348…035c              Head {h00=0x0010, h01=0x0050, text=» IB VOL,  C «, t00=0x0002, t01=0x002e}
0x035c…0382              Head {h00=0x0022, h01=0x0050, text=»  ASG100,ASG200,ASG300,ASG400 «, t00=0x0002, t01=0x0042}
0x0382…03a0              Head {h00=0x001a, h01=0x0050, text=» CBNE VOL,CBIN0,ASGNOK«, t00=0x0002, t01=0x0068}
0x03a0…03aa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0086}
0x03aa…03ce              Head {h00=0x0020, h01=0x0050, text=»ASG000   ASSIGN CONF DATASET«, t00=0x0002, t01=0x0090}
0x03ce…03f2              Head {h00=0x0020, h01=0x0050, text=» PERF ASSG,CBIN1,DK01,CBIN1 «, t00=0x0002, t01=0x00b4}
0x03f2…0404              Head {h00=0x000e, h01=0x0050, text=» B ASGRET «, t00=0x0002, t01=0x00d8}
0x0404…040e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00ea}
0x040e…043a              Head {h00=0x0028, h01=0x0050, text=»ASG100   ASSIGN ALL FILES - VOLUME 1«, t00=0x0002, t01=0x00f4}
0x043a…046a              Head {h00=0x002c, h01=0x0050, text=» PERF ASSG,CBIN1,DK01,CBIN1 CONF DATASET«, t00=0x0002, t01=0x0120}
0x046a…047e              Head {h00=0x0010, h01=0x0050, text=» BNOK ASGRET«, t00=0x0002, t01=0x0150}
0x047e…04b0              Head {h00=0x002e, h01=0x0050, text=» PERF ASSG,CBIN1,DK03,CBIN3 CYCLE DATASET «, t00=0x0002, t01=0x0164}
0x04b0…04c4              Head {h00=0x0010, h01=0x0050, text=» BNOK ASGRET«, t00=0x0003, t01=0x0008}
0x04c4…04f0              Head {h00=0x0028, h01=0x0050, text=» PERF ASSG,CBIN1,DK04,CBIN4 KT PLAN «, t00=0x0003, t01=0x001c}
0x04f0…0504              Head {h00=0x0010, h01=0x0050, text=» BNOK ASGRET«, t00=0x0003, t01=0x0048}
0x0504…0520              Head {h00=0x0018, h01=0x0050, text=» TBF CGLREGFL,ASGRET«, t00=0x0003, t01=0x005c}
0x0520…053c              Head {h00=0x0018, h01=0x0050, text=» MOVE CGLRECNR,=D'0'«, t00=0x0003, t01=0x0078}
0x053c…056a              Head {h00=0x002a, h01=0x0050, text=» PERF ASSG,CBIN1,DK05,CBIN5 OLD REGSET«, t00=0x0003, t01=0x0094}
0x056a…057e              Head {h00=0x0010, h01=0x0050, text=» BNOK ASGRET«, t00=0x0003, t01=0x00c2}
0x057e…059c              Head {h00=0x001a, h01=0x0050, text=» MOVE CGLRECNR,TTGLREC«, t00=0x0003, t01=0x00d6}
0x059c…05ae              Head {h00=0x000e, h01=0x0050, text=» B ASGRET «, t00=0x0003, t01=0x00f4}
0x05ae…05b8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0106}
0x05b8…05e4              Head {h00=0x0028, h01=0x0050, text=»ASG200   ASSIGN ALL FILES - VOLUME 2«, t00=0x0003, t01=0x0110}
0x05e4…0606              Head {h00=0x001e, h01=0x0050, text=» CBE CREGVOL,=W'4',ASG400 «, t00=0x0003, t01=0x013c}
0x0606…0636              Head {h00=0x002c, h01=0x0050, text=» PERF ASSG,CBIN2,DK02,CBIN2 REG DATASET «, t00=0x0003, t01=0x015e}
0x0636…0648              Head {h00=0x000e, h01=0x0050, text=» B ASGRET «, t00=0x0003, t01=0x018e}
0x0648…0652              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0010}
0x0652…067e              Head {h00=0x0028, h01=0x0050, text=»ASG300   ASSIGN ALL FILES - VOLUME 3«, t00=0x0004, t01=0x001a}
0x067e…068e              Head {h00=0x000c, h01=0x0050, text=» B ASGOK«, t00=0x0004, t01=0x0046}
0x068e…0698              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0056}
0x0698…06c4              Head {h00=0x0028, h01=0x0050, text=»ASG400   ASSIGN ALL FILES - VOLUME 4«, t00=0x0004, t01=0x0060}
0x06c4…06fa              Head {h00=0x0032, h01=0x0050, text=» PERF ASSG,CBIN4,DK02,CBIN2 SECOND REG DATASET«, t00=0x0004, t01=0x008c}
0x06fa…070c              Head {h00=0x000e, h01=0x0050, text=» B ASGRET «, t00=0x0004, t01=0x00c2}
0x070c…0716              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00d4}
0x0716…0724              Head {h00=0x000a, h01=0x0050, text=»ASGNOK«, t00=0x0004, t01=0x00de}
0x0724…073c              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN1,CBIN0«, t00=0x0004, t01=0x00ec}
0x073c…0748              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0004, t01=0x0104}
0x0748…0752              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0110}
0x0752…0760              Head {h00=0x000a, h01=0x0050, text=»ASGOK «, t00=0x0004, t01=0x011a}
0x0760…0778              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x0004, t01=0x0128}
0x0778…0786              Head {h00=0x000a, h01=0x0050, text=»ASGRET«, t00=0x0004, t01=0x0140}
0x0786…0792              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0004, t01=0x014e}
0x0792…07a0              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0004, t01=0x015a}
0x07a0…07aa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0168}
0x07aa…07b8              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x0172}
0x07b8…07d2              Head {h00=0x0016, h01=0x0050, text=»ASGFIL PROC FILNR «, t00=0x0004, t01=0x0180}
0x07d2…07e4              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0005, t01=0x000a}
0x07e4…07ee              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x001c}
0x07ee…081a              Head {h00=0x0028, h01=0x0050, text=»*     ASSIGNS FILE REGSET ON EITHER «, t00=0x0005, t01=0x0026}
0x081a…0836              Head {h00=0x0018, h01=0x0050, text=»*     VOLUME 2 OR 4 «, t00=0x0005, t01=0x0052}
0x0836…0840              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x006e}
0x0840…0852              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0005, t01=0x0078}
0x0852…085c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x008a}
0x085c…0872              Head {h00=0x0012, h01=0x0050, text=» IB FILNR,  C «, t00=0x0005, t01=0x0094}
0x0872…088c              Head {h00=0x0016, h01=0x0050, text=»  ASGFRET,ASGF200 «, t00=0x0005, t01=0x00aa}
0x088c…089e              Head {h00=0x000e, h01=0x0050, text=» B ASGFRET«, t00=0x0005, t01=0x00c4}
0x089e…08a8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00d6}
0x08a8…08c6              Head {h00=0x001a, h01=0x0050, text=»ASGF200   FILE REGSET «, t00=0x0005, t01=0x00e0}
0x08c6…08ea              Head {h00=0x0020, h01=0x0050, text=» CBNL CREGVOL,=W'2',ASGF250 «, t00=0x0005, t01=0x00fe}
0x08ea…0906              Head {h00=0x0018, h01=0x0050, text=»*     ONLY VOLUME 2 «, t00=0x0005, t01=0x0122}
0x0906…0920              Head {h00=0x0016, h01=0x0050, text=» PERF ASGVOL,CBIN2«, t00=0x0005, t01=0x013e}
0x0920…0932              Head {h00=0x000e, h01=0x0050, text=» B ASGFRET«, t00=0x0005, t01=0x0158}
0x0932…093c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x016a}
0x093c…094c              Head {h00=0x000c, h01=0x0050, text=»ASGF250 «, t00=0x0005, t01=0x0174}
0x094c…0968              Head {h00=0x0018, h01=0x0050, text=»*     VOLUME 2 AND 4«, t00=0x0005, t01=0x0184}
0x0968…0986              Head {h00=0x001a, h01=0x0050, text=»*     FIRST ALTERNATE «, t00=0x0006, t01=0x0010}
0x0986…09a2              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,CBIN6 «, t00=0x0006, t01=0x002e}
0x09a2…09be              Head {h00=0x0018, h01=0x0050, text=» SUB GSWBIN2,CREGVOL«, t00=0x0006, t01=0x004a}
0x09be…09dc              Head {h00=0x001a, h01=0x0050, text=» MOVE CREGVOL,GSWBIN2 «, t00=0x0006, t01=0x0066}
0x09dc…09f6              Head {h00=0x0016, h01=0x0050, text=» PERF ASGVOL,CBIN2«, t00=0x0006, t01=0x0084}
0x09f6…0a0a              Head {h00=0x0010, h01=0x0050, text=» BOK ASGFRET«, t00=0x0006, t01=0x009e}
0x0a0a…0a26              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,CBIN6 «, t00=0x0006, t01=0x00b2}
0x0a26…0a42              Head {h00=0x0018, h01=0x0050, text=» SUB GSWBIN2,CREGVOL«, t00=0x0006, t01=0x00ce}
0x0a42…0a60              Head {h00=0x001a, h01=0x0050, text=» MOVE CREGVOL,GSWBIN2 «, t00=0x0006, t01=0x00ea}
0x0a60…0a7a              Head {h00=0x0016, h01=0x0050, text=» PERF ASGVOL,CBIN2«, t00=0x0006, t01=0x0108}
0x0a7a…0a8a              Head {h00=0x000c, h01=0x0050, text=»ASGFRET «, t00=0x0006, t01=0x0122}
0x0a8a…0a96              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0006, t01=0x0132}
0x0a96…0aa4              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0006, t01=0x013e}
0x0aa4…0aae              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x014c}
0x0aae…0abc              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x0156}
0x0abc…0ad4              Head {h00=0x0014, h01=0x0050, text=»CLSVOL PROC VOL «, t00=0x0006, t01=0x0164}
0x0ad4…0af0              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0006, t01=0x017c}
0x0af0…0afa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0008}
0x0afa…0b28              Head {h00=0x002a, h01=0x0050, text=»*          CLOSE ROUTINE - PER VOLUME «, t00=0x0007, t01=0x0012}
0x0b28…0b32              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0040}
0x0b32…0b6a              Head {h00=0x0034, h01=0x0050, text=»*          CLOSES ALL FILES ON SPECIFIED VOLUME «, t00=0x0007, t01=0x004a}
0x0b6a…0b74              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0082}
0x0b74…0bac              Head {h00=0x0034, h01=0x0050, text=»*          CALL:     PERF CLSVOL,<VOLUME NUMBER>«, t00=0x0007, t01=0x008c}
0x0bac…0bb6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00c4}
0x0bb6…0bd2              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0007, t01=0x00ce}
0x0bd2…0bdc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00ea}
0x0bdc…0bf0              Head {h00=0x0010, h01=0x0050, text=» SET CDKOFF «, t00=0x0007, t01=0x00f4}
0x0bf0…0c0a              Head {h00=0x0016, h01=0x0050, text=» TBF CWFLAG,CLS050«, t00=0x0007, t01=0x0108}
0x0c0a…0c20              Head {h00=0x0012, h01=0x0050, text=» DELAY CBIN20 «, t00=0x0007, t01=0x0122}
0x0c20…0c2e              Head {h00=0x000a, h01=0x0050, text=»CLS050«, t00=0x0007, t01=0x0138}
0x0c2e…0c38              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0146}
0x0c38…0c42              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0150}
0x0c42…0c56              Head {h00=0x0010, h01=0x0050, text=» IB VOL,  C «, t00=0x0007, t01=0x015a}
0x0c56…0c7c              Head {h00=0x0022, h01=0x0050, text=»  CLS100,CLS200,CLS300,CLS400 «, t00=0x0007, t01=0x016e}
0x0c7c…0c8e (8, 0, 400)  Head {h00=0x000e, h01=0x0050, text=» B CLSRET «, t00=0x0008, t01=0x0004}
0x0c8e…0c98              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0016}
0x0c98…0cc4              Head {h00=0x0028, h01=0x0050, text=»CLS100   CLOSE ALL FILES - VOLUME 1 «, t00=0x0008, t01=0x0020}
0x0cc4…0cdc              Head {h00=0x0014, h01=0x0050, text=» DSC0 DK01,CLOSE«, t00=0x0008, t01=0x004c}
0x0cdc…0cf4              Head {h00=0x0014, h01=0x0050, text=» DSC0 DK02,CLOSE«, t00=0x0008, t01=0x0064}
0x0cf4…0d0c              Head {h00=0x0014, h01=0x0050, text=» DSC0 DK04,CLOSE«, t00=0x0008, t01=0x007c}
0x0d0c…0d28              Head {h00=0x0018, h01=0x0050, text=» TBF CGLREGFL,CLS150«, t00=0x0008, t01=0x0094}
0x0d28…0d40              Head {h00=0x0014, h01=0x0050, text=» DSC0 DK05,CLOSE«, t00=0x0008, t01=0x00b0}
0x0d40…0d4e              Head {h00=0x000a, h01=0x0050, text=»CLS150«, t00=0x0008, t01=0x00c8}
0x0d4e…0d66              Head {h00=0x0014, h01=0x0050, text=» DSC0 FD01,UNLOD«, t00=0x0008, t01=0x00d6}
0x0d66…0d78              Head {h00=0x000e, h01=0x0050, text=» B CLSRET «, t00=0x0008, t01=0x00ee}
0x0d78…0d82              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0100}
0x0d82…0dae              Head {h00=0x0028, h01=0x0050, text=»CLS200   CLOSE ALL FILES - VOLUME 2 «, t00=0x0008, t01=0x010a}
0x0dae…0dd0              Head {h00=0x001e, h01=0x0050, text=» CBE CREGVOL,=W'4',CLS400 «, t00=0x0008, t01=0x0136}
0x0dd0…0de8              Head {h00=0x0014, h01=0x0050, text=» DSC0 DK02,CLOSE«, t00=0x0008, t01=0x0158}
0x0de8…0e00              Head {h00=0x0014, h01=0x0050, text=» DSC0 FD02,UNLOD«, t00=0x0008, t01=0x0170}
0x0e00…0e12              Head {h00=0x000e, h01=0x0050, text=» B CLSRET «, t00=0x0008, t01=0x0188}
0x0e12…0e1c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x000a}
0x0e1c…0e48              Head {h00=0x0028, h01=0x0050, text=»CLS300   CLOSE ALL FILES - VOLUME 3 «, t00=0x0009, t01=0x0014}
0x0e48…0e5a              Head {h00=0x000e, h01=0x0050, text=» B CLSRET «, t00=0x0009, t01=0x0040}
0x0e5a…0e64              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0052}
0x0e64…0e90              Head {h00=0x0028, h01=0x0050, text=»CLS400   CLOSE ALL FILES - VOLUME 4 «, t00=0x0009, t01=0x005c}
0x0e90…0ebc              Head {h00=0x0028, h01=0x0050, text=» DSC0 DK02,CLOSE SECOND REG DATASET «, t00=0x0009, t01=0x0088}
0x0ebc…0ed4              Head {h00=0x0014, h01=0x0050, text=» DSC0 FD03,UNLOD«, t00=0x0009, t01=0x00b4}
0x0ed4…0ee6              Head {h00=0x000e, h01=0x0050, text=» B CLSRET «, t00=0x0009, t01=0x00cc}
0x0ee6…0ef0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00de}
0x0ef0…0efe              Head {h00=0x000a, h01=0x0050, text=»CLSRET«, t00=0x0009, t01=0x00e8}
0x0efe…0f0a              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0009, t01=0x00f6}
0x0f0a…0f18              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0009, t01=0x0102}
0x0f18…0f22              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0110}
0x0f22…0f30              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x011a}
0x0f30…0f44              Head {h00=0x0010, h01=0x0050, text=»CYLINE PROC «, t00=0x0009, t01=0x0128}
0x0f44…0f60              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0009, t01=0x013c}
0x0f60…0f6a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0158}
0x0f6a…0f9c              Head {h00=0x002e, h01=0x0050, text=»*          WRITE ONE LINE TO CYCLE DATASET«, t00=0x0009, t01=0x0162}
0x0f9c…0fa6 (10, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0004}
0x0fa6…0fde              Head {h00=0x0034, h01=0x0050, text=»*          ON ENTRY     DATA IN SEPARATE FIELDS «, t00=0x000a, t01=0x000e}
0x0fde…0fe8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0046}
0x0fe8…1026              Head {h00=0x003a, h01=0x0050, text=»*          ON EXIT      CR= OK  DATA WRITTEN TO CYSET «, t00=0x000a, t01=0x0050}
0x1026…1068              Head {h00=0x003e, h01=0x0050, text=»*                       CR=NOK  DATA NOT WRITTEN TO CYSET «, t00=0x000a, t01=0x008e}
0x1068…109a              Head {h00=0x002e, h01=0x0050, text=»*                       E.G. ERROR ON DISK«, t00=0x000a, t01=0x00d0}
0x109a…10cc              Head {h00=0x002e, h01=0x0050, text=»*                            DATASET FULL «, t00=0x000a, t01=0x0102}
0x10cc…110c              Head {h00=0x003c, h01=0x0050, text=»*                            WAITED TOO LONG FOR BUFFER «, t00=0x000a, t01=0x0134}
0x110c…1116              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0174}
0x1116…1132              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000a, t01=0x017e}
0x1132…1150              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,CCYSIZE «, t00=0x000b, t01=0x000a}
0x1150…116c              Head {h00=0x0018, h01=0x0050, text=» MUL GSWBIN1,TTASKNR«, t00=0x000b, t01=0x0028}
0x116c…1192              Head {h00=0x0022, h01=0x0050, text=» CBNL GTCYOUT,GSWBIN1,CYLINNOK«, t00=0x000b, t01=0x0044}
0x1192…11ae              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'32'«, t00=0x000b, t01=0x006a}
0x11ae…11be              Head {h00=0x000c, h01=0x0050, text=»CYLIN000«, t00=0x000b, t01=0x0086}
0x11be…11ec              Head {h00=0x002a, h01=0x0050, text=» TBF CCYPFLG,CYLIN010 WAIT FOR BUFFER «, t00=0x000b, t01=0x0096}
0x11ec…1200              Head {h00=0x0010, h01=0x0050, text=» DELAY CBIN2«, t00=0x000b, t01=0x00c4}
0x1200…121a              Head {h00=0x0016, h01=0x0050, text=» SUB GSWBIN1,CBIN2«, t00=0x000b, t01=0x00d8}
0x121a…123e              Head {h00=0x0020, h01=0x0050, text=» CBL GSWBIN1,CBIN0,CYLINNOK «, t00=0x000b, t01=0x00f2}
0x123e…1252              Head {h00=0x0010, h01=0x0050, text=» B CYLIN000 «, t00=0x000b, t01=0x0116}
0x1252…125c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x012a}
0x125c…126c              Head {h00=0x000c, h01=0x0050, text=»CYLIN010«, t00=0x000b, t01=0x0134}
0x126c…1290              Head {h00=0x0020, h01=0x0050, text=» SET CCYPFLG RESERVE BUFFER «, t00=0x000b, t01=0x0144}
0x1290…12b8              Head {h00=0x0024, h01=0x0050, text=» MOVE CCYBUF,=X'00' CLEAR BUFFER«, t00=0x000b, t01=0x0168}
0x12b8…12d6              Head {h00=0x001a, h01=0x0050, text=» EDIT CCYBUF,GTSTRFMT «, t00=0x000b, t01=0x0190}
0x12d6…1304              Head {h00=0x002a, h01=0x0050, text=» PERF RAWRIT,DK03,=D'3',CCYBUF,GTCYOUT«, t00=0x000c, t01=0x001e}
0x1304…131a              Head {h00=0x0012, h01=0x0050, text=» BNOK CYLIN100«, t00=0x000c, t01=0x004c}
0x131a…1334              Head {h00=0x0016, h01=0x0050, text=» ADD GTCYOUT,CBIN1«, t00=0x000c, t01=0x0062}
0x1334…135a              Head {h00=0x0022, h01=0x0050, text=» CLEAR CCYPFLG RELEASE BUFFER «, t00=0x000c, t01=0x007c}
0x135a…1372              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x000c, t01=0x00a2}
0x1372…137e              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000c, t01=0x00ba}
0x137e…1388              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00c6}
0x1388…1398              Head {h00=0x000c, h01=0x0050, text=»CYLIN100«, t00=0x000c, t01=0x00d0}
0x1398…13be              Head {h00=0x0022, h01=0x0050, text=» CLEAR CCYPFLG RELEASE BUFFER «, t00=0x000c, t01=0x00e0}
0x13be…13ce              Head {h00=0x000c, h01=0x0050, text=»CYLINNOK«, t00=0x000c, t01=0x0106}
0x13ce…13e6              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN1,CBIN0«, t00=0x000c, t01=0x0116}
0x13e6…13f2              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000c, t01=0x012e}
0x13f2…1400              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000c, t01=0x013a}
0x1400…140a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0148}
0x140a…1418              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x0152}
0x1418…142a              Head {h00=0x000e, h01=0x0050, text=»CYOUT PROC«, t00=0x000c, t01=0x0160}
0x142a…1446              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000c, t01=0x0172}
0x1446…1450              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x018e}
0x1450…1488              Head {h00=0x0034, h01=0x0050, text=»*          WRITE OUT THE WHOLE CONTENT OF CYSET «, t00=0x000d, t01=0x0008}
0x1488…14b0              Head {h00=0x0024, h01=0x0050, text=»*          (LESS THAN ONE PAGE) «, t00=0x000d, t01=0x0040}
0x14b0…14ba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0068}
0x14ba…14d6              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000d, t01=0x0072}
0x14d6…14f4              Head {h00=0x001a, h01=0x0050, text=» TBT GTCYWRTF,CYOUT050«, t00=0x000d, t01=0x008e}
0x14f4…1512              Head {h00=0x001a, h01=0x0050, text=» TBT TTTSTFLG,CYOUT005«, t00=0x000d, t01=0x00ac}
0x1512…1528              Head {h00=0x0012, h01=0x0050, text=» SET TTTSTFLG «, t00=0x000d, t01=0x00ca}
0x1528…1548              Head {h00=0x001c, h01=0x0050, text=» PERF SPLIN8,CBIN5,CBIN2«, t00=0x000d, t01=0x00e0}
0x1548…155c              Head {h00=0x0010, h01=0x0050, text=» PERF GRASPV«, t00=0x000d, t01=0x0100}
0x155c…1570              Head {h00=0x0010, h01=0x0050, text=» PERF CLEAR8«, t00=0x000d, t01=0x0114}
0x1570…1580              Head {h00=0x000c, h01=0x0050, text=»CYOUT005«, t00=0x000d, t01=0x0128}
0x1580…159e              Head {h00=0x001a, h01=0x0050, text=» MOVE TTLINNR,TTCYKPOS«, t00=0x000d, t01=0x0138}
0x159e…15bc              Head {h00=0x001a, h01=0x0050, text=» TBF GTCYTRPF,CYOUT010«, t00=0x000d, t01=0x0156}
0x15bc…15f2              Head {h00=0x0032, h01=0x0050, text=» SUB GTCYOUT,CBIN1 ADJUST FOR TRP LINE, -TOTAL«, t00=0x000d, t01=0x0174}
0x15f2…1602              Head {h00=0x000c, h01=0x0050, text=»CYOUT010«, t00=0x000e, t01=0x001a}
0x1602…1620              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,TTLINNR «, t00=0x000e, t01=0x002a}
0x1620…1640              Head {h00=0x001c, h01=0x0050, text=» DSC1 KVOUCH,POS,GSWBIN1«, t00=0x000e, t01=0x0048}
0x1640…1666              Head {h00=0x0022, h01=0x0050, text=» CBNL GTCYIN,GTCYOUT,CYOUT050 «, t00=0x000e, t01=0x0068}
0x1666…1678              Head {h00=0x000e, h01=0x0050, text=» PERF CYRD«, t00=0x000e, t01=0x008e}
0x1678…1692              Head {h00=0x0016, h01=0x0050, text=» SUB TTLINNR,=D'2'«, t00=0x000e, t01=0x00a0}
0x1692…16a6              Head {h00=0x0010, h01=0x0050, text=» WAIT KVOUCH«, t00=0x000e, t01=0x00ba}
0x16a6…16ba              Head {h00=0x0010, h01=0x0050, text=» B CYOUT010 «, t00=0x000e, t01=0x00ce}
0x16ba…16c4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00e2}
0x16c4…16d4              Head {h00=0x000c, h01=0x0050, text=»CYOUT050«, t00=0x000e, t01=0x00ec}
0x16d4…16e0              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000e, t01=0x00fc}
0x16e0…16ee              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000e, t01=0x0108}
0x16ee…16f8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0116}
0x16f8…1706              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x0120}
0x1706…1718              Head {h00=0x000e, h01=0x0050, text=»CYWRT PROC«, t00=0x000e, t01=0x012e}
0x1718…1734              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000e, t01=0x0140}
0x1734…173e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x015c}
0x173e…176e              Head {h00=0x002c, h01=0x0050, text=»*          WRITE A LINE ON CYCLE DATASET«, t00=0x000e, t01=0x0166}
0x176e…17ac              Head {h00=0x003a, h01=0x0050, text=»*          IN NOK  EMPTY THE CYCLE DATASET TO VOUCHER «, t00=0x000f, t01=0x0008}
0x17ac…17e0              Head {h00=0x0030, h01=0x0050, text=»*                  AND WRITE LINE TO VOUCHER«, t00=0x000f, t01=0x0046}
0x17e0…17ea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x007a}
0x17ea…1806              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000f, t01=0x0084}
0x1806…182e              Head {h00=0x0024, h01=0x0050, text=» PERF CYLINE WRITE LINE TO CYSET«, t00=0x000f, t01=0x00a0}
0x182e…1844              Head {h00=0x0012, h01=0x0050, text=» BNOK CYWRT100«, t00=0x000f, t01=0x00c8}
0x1844…185e              Head {h00=0x0016, h01=0x0050, text=» SUB TTLINNR,=D'2'«, t00=0x000f, t01=0x00de}
0x185e…188e              Head {h00=0x002c, h01=0x0050, text=» CBL TTLINNR,=D'4',CYWRT010 IF PAGE FULL«, t00=0x000f, t01=0x00f8}
0x188e…18aa              Head {h00=0x0018, h01=0x0050, text=» CMP CBIN0,CBIN0 OK «, t00=0x000f, t01=0x0128}
0x18aa…18b6              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000f, t01=0x0144}
0x18b6…18c0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0150}
0x18c0…18d0              Head {h00=0x000c, h01=0x0050, text=»CYWRT010«, t00=0x000f, t01=0x015a}
0x18d0…18f8              Head {h00=0x0024, h01=0x0050, text=» MOVE GSWSTR9,=C'TRP ' NEW PAGE «, t00=0x000f, t01=0x016a}
0x18f8…1912 (16, 0, 400) Head {h00=0x0016, h01=0x0050, text=» PERF FRMXVO,CBIN2«, t00=0x0010, t01=0x0004}
0x1912…1926              Head {h00=0x0010, h01=0x0050, text=» PERF CYLINE«, t00=0x0010, t01=0x001e}
0x1926…194a              Head {h00=0x0020, h01=0x0050, text=» SET GTCYTRPF INITIATE PRINT«, t00=0x0010, t01=0x0032}
0x194a…1966              Head {h00=0x0018, h01=0x0050, text=» CMP CBIN0,CBIN0 OK «, t00=0x0010, t01=0x0056}
0x1966…1972              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0010, t01=0x0072}
0x1972…197c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x007e}
0x197c…198c              Head {h00=0x000c, h01=0x0050, text=»CYWRT100«, t00=0x0010, t01=0x0088}
0x198c…19a0              Head {h00=0x0010, h01=0x0050, text=» PERF CYOUT «, t00=0x0010, t01=0x0098}
0x19a0…19b6              Head {h00=0x0012, h01=0x0050, text=» SET GTCYWRTF «, t00=0x0010, t01=0x00ac}
0x19b6…19ce              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN1,CBIN0«, t00=0x0010, t01=0x00c2}
0x19ce…19da              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0010, t01=0x00da}
0x19da…19e8              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0010, t01=0x00e6}
0x19e8…19f2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00f4}
0x19f2…1a00              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x00fe}
0x1a00…1a12              Head {h00=0x000e, h01=0x0050, text=»CYRD PROC «, t00=0x0010, t01=0x010c}
0x1a12…1a2e              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0010, t01=0x011e}
0x1a2e…1a38              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x013a}
0x1a38…1a70              Head {h00=0x0034, h01=0x0050, text=»*          READ ONE LINE FROM CYCLE DATASET AND «, t00=0x0010, t01=0x0144}
0x1a70…1a96              Head {h00=0x0022, h01=0x0050, text=»*          WRITE IT TO VOUCHER«, t00=0x0010, t01=0x017c}
0x1a96…1aa0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0012}
0x1aa0…1adc              Head {h00=0x0038, h01=0x0050, text=»*          VOUCHER SHOULD BE POSITIONED BEFORE PRINT«, t00=0x0011, t01=0x001c}
0x1adc…1ae6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0058}
0x1ae6…1b02              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0011, t01=0x0062}
0x1b02…1b12              Head {h00=0x000c, h01=0x0050, text=»CYRD000 «, t00=0x0011, t01=0x007e}
0x1b12…1b2e              Head {h00=0x0018, h01=0x0050, text=» TBF CCYPFLG,CYRD010«, t00=0x0011, t01=0x008e}
0x1b2e…1b58              Head {h00=0x0026, h01=0x0050, text=» DELAY CBIN2 WAIT FOR CYCLE BUFFER«, t00=0x0011, t01=0x00aa}
0x1b58…1b6a              Head {h00=0x000e, h01=0x0050, text=» B CYRD000«, t00=0x0011, t01=0x00d4}
0x1b6a…1b7a              Head {h00=0x000c, h01=0x0050, text=»CYRD010 «, t00=0x0011, t01=0x00e6}
0x1b7a…1ba4              Head {h00=0x0026, h01=0x0050, text=» SET CCYPFLG RESERVE CYCLE BUFFER «, t00=0x0011, t01=0x00f6}
0x1ba4…1bcc              Head {h00=0x0024, h01=0x0050, text=» MOVE GSWBIN1,=W'128' SET LENGTH«, t00=0x0011, t01=0x0120}
0x1bcc…1c02              Head {h00=0x0032, h01=0x0050, text=» PERF RAREAD,DK03,=D'3',CCYBUF,GSWBIN1,GTCYIN «, t00=0x0011, t01=0x0148}
0x1c02…1c18              Head {h00=0x0012, h01=0x0050, text=» BNOK CYRDNOK «, t00=0x0011, t01=0x017e}
0x1c18…1c38 (18, 0, 398) Head {h00=0x001c, h01=0x0050, text=» EDWRT .NW,KVOUCH,CYEDT «, t00=0x0012, t01=0x0004}
0x1c38…1c4e              Head {h00=0x0012, h01=0x0050, text=» CLEAR CCYPFLG«, t00=0x0012, t01=0x0024}
0x1c4e…1c60              Head {h00=0x000e, h01=0x0050, text=» B CYRD100«, t00=0x0012, t01=0x003a}
0x1c60…1c70              Head {h00=0x000c, h01=0x0050, text=»CYRDNOK «, t00=0x0012, t01=0x004c}
0x1c70…1c8a              Head {h00=0x0016, h01=0x0050, text=» ADD GTCYIN,CBIN1 «, t00=0x0012, t01=0x005c}
0x1c8a…1ca0              Head {h00=0x0012, h01=0x0050, text=» CLEAR CCYPFLG«, t00=0x0012, t01=0x0076}
0x1ca0…1cb2              Head {h00=0x000e, h01=0x0050, text=» PERF CRVO«, t00=0x0012, t01=0x008c}
0x1cb2…1cce              Head {h00=0x0018, h01=0x0050, text=» CMP CBIN1,CBIN0 NOK«, t00=0x0012, t01=0x009e}
0x1cce…1cda              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0012, t01=0x00ba}
0x1cda…1ce4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00c6}
0x1ce4…1cf4              Head {h00=0x000c, h01=0x0050, text=»CYRD100 «, t00=0x0012, t01=0x00d0}
0x1cf4…1d08              Head {h00=0x0010, h01=0x0050, text=» WAIT KVOUCH«, t00=0x0012, t01=0x00e0}
0x1d08…1d1a              Head {h00=0x000e, h01=0x0050, text=» PERF CRVO«, t00=0x0012, t01=0x00f4}
0x1d1a…1d34              Head {h00=0x0016, h01=0x0050, text=» ADD GTCYIN,CBIN1 «, t00=0x0012, t01=0x0106}
0x1d34…1d50              Head {h00=0x0018, h01=0x0050, text=» CMP CBIN0,CBIN0 OK «, t00=0x0012, t01=0x0120}
0x1d50…1d5c              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0012, t01=0x013c}
0x1d5c…1d6a              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0012, t01=0x0148}
0x1d6a…1d74              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0156}
0x1d74…1d7e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0160}
0x1d7e…1d90              Head {h00=0x000e, h01=0x0050, text=»CYEDT FRMT«, t00=0x0012, t01=0x016a}
0x1d90…1da6              Head {h00=0x0012, h01=0x0050, text=» FCOPY CCYBUF «, t00=0x0012, t01=0x017c}
0x1da6…1db4 (19, 0, 400) Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0013, t01=0x0004}
0x1db4…1dbe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0012}
0x1dbe…1dcc              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x001c}
0x1dcc…1dde              Head {h00=0x000e, h01=0x0050, text=»CYTRP PROC«, t00=0x0013, t01=0x002a}
0x1dde…1dfa              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0013, t01=0x003c}
0x1dfa…1e04              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0058}
0x1e04…1e2a              Head {h00=0x0022, h01=0x0050, text=»*          PRINT A WHOLE PAGE «, t00=0x0013, t01=0x0062}
0x1e2a…1e34              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0088}
0x1e34…1e6e              Head {h00=0x0036, h01=0x0050, text=»*          AND WRITE TRANSPORT LINE FIRST ON CYSET«, t00=0x0013, t01=0x0092}
0x1e6e…1e78              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00cc}
0x1e78…1e94              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0013, t01=0x00d6}
0x1e94…1eb2              Head {h00=0x001a, h01=0x0050, text=» TBF GTCYTRPF,CYTRP200«, t00=0x0013, t01=0x00f2}
0x1eb2…1ee2              Head {h00=0x002c, h01=0x0050, text=» TBT GTCYWRTF,CYTRP100 T=ALREADY WRITTEN«, t00=0x0013, t01=0x0110}
0x1ee2…1efa              Head {h00=0x0014, h01=0x0050, text=» CLEAR GTCYTRPF «, t00=0x0013, t01=0x0140}
0x1efa…1f12              Head {h00=0x0014, h01=0x0050, text=» CLEAR TTTSTFLG «, t00=0x0013, t01=0x0158}
0x1f12…1f26              Head {h00=0x0010, h01=0x0050, text=» PERF CYOUT «, t00=0x0013, t01=0x0170}
0x1f26…1f3a              Head {h00=0x0010, h01=0x0050, text=» WAIT KVOUCH«, t00=0x0013, t01=0x0184}
0x1f3a…1f58              Head {h00=0x001a, h01=0x0050, text=» DSC0 .NW,KVOUCH,RLEAS«, t00=0x0014, t01=0x0008}
0x1f58…1f70              Head {h00=0x0014, h01=0x0050, text=» CLEAR TTTSTFLG «, t00=0x0014, t01=0x0026}
0x1f70…1f8e              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR9,=C'TRP '«, t00=0x0014, t01=0x003e}
0x1f8e…1fa8              Head {h00=0x0016, h01=0x0050, text=» PERF FRMXVO,CBIN2«, t00=0x0014, t01=0x005c}
0x1fa8…1fc4              Head {h00=0x0018, h01=0x0050, text=» MOVE GTCYIN,TTASKNR«, t00=0x0014, t01=0x0076}
0x1fc4…1fde              Head {h00=0x0016, h01=0x0050, text=» SUB GTCYIN,CBIN1 «, t00=0x0014, t01=0x0092}
0x1fde…1ffa              Head {h00=0x0018, h01=0x0050, text=» MUL GTCYIN,CCYSIZE «, t00=0x0014, t01=0x00ac}
0x1ffa…2014              Head {h00=0x0016, h01=0x0050, text=» ADD GTCYIN,CBIN1 «, t00=0x0014, t01=0x00c8}
0x2014…2030              Head {h00=0x0018, h01=0x0050, text=» MOVE GTCYOUT,GTCYIN«, t00=0x0014, t01=0x00e2}
0x2030…204e              Head {h00=0x001a, h01=0x0050, text=» MOVE TTLINNR,TTCYKST «, t00=0x0014, t01=0x00fe}
0x204e…206c              Head {h00=0x001a, h01=0x0050, text=» MOVE TTCYKPOS,TTLINNR«, t00=0x0014, t01=0x011c}
0x206c…2080              Head {h00=0x0010, h01=0x0050, text=» PERF CYLINE«, t00=0x0014, t01=0x013a}
0x2080…2096              Head {h00=0x0012, h01=0x0050, text=» BNOK CYTRP100«, t00=0x0014, t01=0x014e}
0x2096…20aa              Head {h00=0x0010, h01=0x0050, text=» B CYTRP150 «, t00=0x0014, t01=0x0164}
0x20aa…20b4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0178}
0x20b4…20c4              Head {h00=0x000c, h01=0x0050, text=»CYTRP100«, t00=0x0014, t01=0x0182}
0x20c4…20dc (21, 0, 400) Head {h00=0x0014, h01=0x0050, text=» CLEAR GTCYTRPF «, t00=0x0015, t01=0x0004}
0x20dc…20f2              Head {h00=0x0012, h01=0x0050, text=» SET GTCYWRTF «, t00=0x0015, t01=0x001c}
0x20f2…2124              Head {h00=0x002e, h01=0x0050, text=» PERF SPLIN8,CBIN3,CBIN2 ASK FOR 'NY SIDE'«, t00=0x0015, t01=0x0032}
0x2124…213e              Head {h00=0x0016, h01=0x0050, text=» PERF GRASPV GRASP«, t00=0x0015, t01=0x0064}
0x213e…215c              Head {h00=0x001a, h01=0x0050, text=» MOVE TTCYKPOS,TTCYKST«, t00=0x0015, t01=0x007e}
0x215c…218a              Head {h00=0x002a, h01=0x0050, text=» MOVE TTLINNR,TTCYKST POSITION VOUCHER«, t00=0x0015, t01=0x009c}
0x218a…21a8              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,TTLINNR «, t00=0x0015, t01=0x00ca}
0x21a8…21c8              Head {h00=0x001c, h01=0x0050, text=» DSC1 KVOUCH,POS,GSWBIN1«, t00=0x0015, t01=0x00e8}
0x21c8…21fc              Head {h00=0x0030, h01=0x0050, text=» MOVE GSWSTR9,=C'TRP ' SET UP TRANSPORT LINE«, t00=0x0015, t01=0x0108}
0x21fc…2216              Head {h00=0x0016, h01=0x0050, text=» PERF FRMXVO,CBIN2«, t00=0x0015, t01=0x013c}
0x2216…2244              Head {h00=0x002a, h01=0x0050, text=» EDWRT KVOUCH,GTSTRFMT WRITE TRP LINE «, t00=0x0015, t01=0x0156}
0x2244…224e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0184}
0x224e…225e              Head {h00=0x000c, h01=0x0050, text=»CYTRP150«, t00=0x0015, t01=0x018e}
0x225e…2278              Head {h00=0x0016, h01=0x0050, text=» SUB TTLINNR,=D'2'«, t00=0x0016, t01=0x000e}
0x2278…2288              Head {h00=0x000c, h01=0x0050, text=»CYTRP200«, t00=0x0016, t01=0x0028}
0x2288…2294              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0016, t01=0x0038}
0x2294…22a2              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0016, t01=0x0044}
0x22a2…22ac              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0052}
0x22ac…22b8              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0016, t01=0x005c}
0x22b8…22bc              Head {h00=0x4004, h01=0x0000}
0x22bc…22c0              00 16 00 68                                                                                                                                                                                                                                       ┆   h┆
0x22c0…22c8 (23, 1, 8)   20 04 00 00 00 17 00 04                                                                                                                                                                                                                           ┆        ┆
0x22c8…2318 (24, 0, 398) e1 00 00 6f 01 8c 00 0e 00 09 00 04 26 07 f0 01 00 00 00 00 00 70 00 0a 00 0e 00 09 00 04 1a 07 00 02 10 01 42 00 00 70 00 1c 00 0c 00 07 00 03 22 05 00 02 dd 00 00 70 00 2e 00 08 00 04 00 01 28 02 00 70 00 3e 00 0c 00 08 00 03 20 06 00 03   ┆   o        &        p              B  p        "      p .      (  p >          ┆
0x2318…2368              00 10 00 70 00 4a 00 0c 00 07 00 03 26 05 db 29 07 00 00 70 00 5a 00 0a 00 06 00 02 26 04 a8 20 00 70 00 6a 00 0a 00 06 00 02 26 04 a8 20 00 70 00 78 00 0a 00 06 00 02 26 04 b0 00 00 70 00 86 00 0a 00 05 00 02 26 03 e9 00 00 70 00 94 00 0a   ┆   p J      &  )   p Z      &    p j      &    p x      &    p        &    p    ┆
0x2368…23b8              00 06 00 02 26 04 a8 20 00 70 00 a2 00 0a 00 06 00 02 26 04 a8 20 00 70 00 b0 00 0a 00 06 00 02 26 04 b0 20 00 70 00 be 00 08 00 04 00 01 28 02 00 70 00 cc 00 0c 00 08 00 03 20 06 00 04 00 07 00 70 00 d8 00 0a 00 05 00 02 26 03 e0 20 00 70   ┆    &    p        &    p        &    p        (  p               p        &    p┆
0x23b8…2408              00 e8 00 18 00 15 00 0a 16 13 00 05 00 0d 4b 4f 4e 56 45 52 54 45 52 49 4e 47 00 70 00 f6 00 0c 00 07 00 03 24 05 c1 00 05 00 00 70 01 12 00 0a 00 06 00 02 26 04 81 07 00 70 01 22 00 0c 00 07 00 03 24 05 df 00 01 00 00 70 01 30 00 08 00 04   ┆              KONVERTERING p        $      p        &    p "      $      p 0    ┆
0x2408…2456              00 01 28 02 00 70 01 40 00 0c 00 08 00 03 20 06 00 06 00 09 00 70 01 4c 00 0a 00 05 00 02 26 03 e0 00 00 70 01 5c 00 14 00 0f 00 07 16 0d 00 07 00 07 4b 4f 52 52 45 4b 54 45 00 70 01 6a 00 0c 00 07 00 03 24 05 c1 00 07 00 00 70 01 82         ┆  (  p @             p L      &    p              KORREKTE p j      $      p  ┆
0x2456…24a6 (25, 0, 398) 00 0a 00 06 00 02 26 04 81 3f 00 71 00 04 00 0a 00 06 00 02 26 04 81 07 00 71 00 12 00 0c 00 07 00 03 24 05 df 00 01 00 00 71 00 20 00 08 00 04 00 01 28 02 00 71 00 30 00 0c 00 08 00 03 20 06 00 08 00 04 00 71 00 3c 00 12 00 0e 00 06 1a 0c   ┆      &  ? q        &    q        $      q        (  q 0             q <        ┆
0x24a6…24f6              00 09 10 06 39 39 39 39 39 39 00 71 00 4c 00 0c 00 07 00 03 22 05 00 09 8a 00 00 71 00 62 00 12 00 0e 00 06 1a 0c 00 0a 10 06 42 39 39 39 39 39 00 71 00 72 00 0c 00 07 00 03 22 05 00 0a 98 00 00 71 00 88 00 08 00 04 00 01 28 02 00 71 00 98   ┆    999999 q L      "      q b            B99999 q r      "      q        (  q  ┆
0x24f6…2546              00 0c 00 08 00 03 20 06 00 0b 00 04 00 71 00 a4 00 12 00 0d 00 06 16 0b 00 0c 00 05 53 4c 55 54 44 00 00 71 00 b4 00 0c 00 07 00 03 24 05 c1 00 0c 00 00 71 00 ca 00 12 00 0d 00 06 1a 0b 00 0d 10 05 39 39 39 39 39 00 00 71 00 da 00 0c 00 07   ┆             q              SLUTD  q        $      q              99999  q      ┆
0x2546…2596              00 03 22 05 00 0d 45 00 00 71 00 f0 00 08 00 04 00 01 28 02 00 71 01 00 00 0c 00 08 00 03 20 06 00 0e 00 0f 00 71 01 0c 00 10 00 0d 00 06 16 0b 00 0f 00 05 5a 33 30 30 00 71 01 1c 00 0c 00 07 00 03 24 05 c1 00 0f 00 00 71 01 30 00 10 00 0c   ┆  "   E  q        (  q               q              Z300 q        $      q 0    ┆
0x2596…25e4              00 05 1a 0a 00 10 10 04 39 39 39 39 00 71 01 40 00 0c 00 07 00 03 22 05 00 10 89 00 00 71 01 54 00 0a 00 06 00 02 26 04 81 32 00 71 01 64 00 0c 00 07 00 03 26 05 c0 8b 95 00 00 71 01 72 00 10 00 0b 00 05 1a 09 00 11 10 03 39 39 39 00         ┆        9999 q @      "      q T      &  2 q d      &      q r            999 ┆
0x25e4…2634 (26, 0, 400) 00 71 01 82 00 0c 00 07 00 03 22 05 00 11 77 00 00 72 00 08 00 0a 00 06 00 02 26 04 81 31 00 72 00 18 00 0a 00 06 00 02 26 04 86 20 00 72 00 26 00 08 00 04 00 01 28 02 00 72 00 34 00 0c 00 08 00 03 20 06 00 12 00 0c 00 72 00 40 00 0a 00 05   ┆ q        "   w  r        &  1 r        &    r &      (  r 4             r @    ┆
0x2634…2684              00 02 26 03 e0 20 00 72 00 50 00 10 00 0d 00 06 16 0b 00 13 00 05 4b 4c 41 52 00 72 00 5e 00 0c 00 07 00 03 24 05 c1 00 13 00 00 72 00 72 00 10 00 0d 00 06 16 0b 00 14 00 05 41 44 4d 20 00 72 00 82 00 0c 00 07 00 03 24 05 c1 00 14 00 00 72   ┆  &    r P            KLAR r ^      $      r r            ADM  r        $      r┆
0x2684…26d4              00 96 00 0e 00 09 00 04 26 07 f0 0c 01 02 00 00 00 72 00 a6 00 0e 00 0a 00 04 1a 08 00 15 10 02 5a 5a 00 72 00 b8 00 0c 00 07 00 03 22 05 00 15 98 02 00 72 00 ca 00 08 00 04 00 01 28 02 00 72 00 da 00 0c 00 08 00 03 20 06 00 16 00 2d 00 72   ┆        &        r              ZZ r        "      r        (  r             - r┆
0x26d4…2724              00 e6 00 0a 00 05 00 02 26 03 e0 15 00 72 00 f6 00 10 00 0d 00 06 16 0b 00 17 00 05 41 44 4d 20 00 72 01 04 00 0c 00 07 00 03 24 05 c1 00 17 02 00 72 01 18 00 0c 00 07 00 03 26 05 db b3 04 02 00 72 01 28 00 0a 00 06 00 02 26 04 c4 01 00 72   ┆        &    r              ADM  r        $      r        &      r (      &    r┆
0x2724…2774              01 38 00 18 00 13 00 09 16 11 00 18 00 0b 4b 41 53 53 45 5d 42 4e 49 4e 47 47 00 72 01 46 00 0c 00 07 00 03 24 05 c1 00 18 02 00 72 01 62 00 0a 00 05 00 02 26 03 e1 00 00 72 01 72 00 0c 00 07 00 03 26 05 da 9d 15 02 00 72 01 80 00 16 00 11   ┆ 8            KASSE]BNINGG r F      $      r b      &    r r      &      r      ┆
0x2774…27c4 (27, 0, 398) 00 08 16 0f 00 19 00 09 44 41 47 53 2d 44 41 54 4f 4e 00 72 01 90 00 0c 00 07 00 03 24 05 c1 00 19 02 00 73 00 1a 00 0e 00 09 00 04 26 07 f0 0b 86 06 c2 00 00 73 00 2a 00 16 00 12 00 08 1a 10 00 1a 10 0a 39 39 45 2d 39 39 45 2d 39 39 00 73   ┆        DAGS-DATON r        $      s        &        s *            99E-99E-99 s┆
0x27c4…2814              00 3c 00 0c 00 07 00 03 22 05 00 1a 8a 06 00 73 00 56 00 0a 00 05 00 02 26 03 e1 1a 00 73 00 66 00 12 00 0e 00 06 16 0c 00 1b 00 06 44 41 47 20 4e 52 00 73 00 74 00 0c 00 07 00 03 24 05 c1 00 1b 06 00 73 00 8a 00 0e 00 0a 00 04 26 08 f2 0b   ┆ <      "      s V      &    s f            DAG NR s t      $      s        &   ┆
0x2814…2864              66 81 03 00 00 73 00 9a 00 10 00 0b 00 05 1a 09 00 1c 10 03 5a 5a 5a 00 00 73 00 ac 00 0c 00 07 00 03 22 05 00 1c 77 81 00 73 00 c0 00 0a 00 05 00 02 26 03 e1 1c 00 73 00 d0 00 16 00 11 00 08 16 0f 00 1d 00 09 50 4f 53 54 2d 44 41 54 4f 00   ┆f    s              ZZZ  s        "   w  s        &    s              POST-DATO ┆
0x2864…28b4              00 73 00 de 00 0c 00 07 00 03 24 05 c1 00 1d 81 00 73 00 f8 00 0e 00 0a 00 04 26 08 f2 0b 6b 86 06 82 00 73 01 08 00 16 00 12 00 08 1a 10 00 1e 10 0a 39 39 45 2d 39 39 45 2d 39 39 00 73 01 1a 00 0c 00 07 00 03 22 05 00 1e dc 86 00 73 01 34   ┆ s        $      s        &   k    s              99E-99E-99 s        "      s 4┆
0x28b4…2902              00 08 00 04 00 01 28 02 00 73 01 44 00 0c 00 08 00 03 20 06 00 1f 00 28 00 73 01 50 00 0a 00 05 00 02 26 03 e0 1e 00 73 01 60 00 0c 00 07 00 03 26 05 db b4 02 86 00 73 01 6e 00 10 00 0d 00 06 16 0b 00 20 00 05 41 44 4d 20 00 73 01 7e         ┆      (  s D           ( s P      &    s `      &      s n            ADM  s ~┆
0x2902…2952 (28, 0, 400) 00 0a 00 07 00 03 24 05 c1 00 00 74 00 04 00 0a 00 06 00 02 26 04 c4 06 00 74 00 12 00 1a 00 16 00 0a 16 14 00 21 00 0e 45 4a 2d 45 44 42 20 54 5b 4c 4c 45 52 20 00 74 00 20 00 0c 00 07 00 03 24 05 c1 00 21 86 00 74 00 3e 00 0a 00 05 00 02   ┆      $    t        &    t           !  EJ-EDB T[LLER  t        $   !  t >      ┆
0x2952…29a2              26 03 e1 00 00 74 00 4e 00 0e 00 0a 00 04 16 08 00 22 00 02 4e 52 00 74 00 5c 00 0c 00 07 00 03 24 05 c1 00 22 86 00 74 00 6e 00 0a 00 06 00 02 26 04 82 20 00 74 00 7e 00 14 00 0f 00 07 16 0d 00 23 00 07 4b 4f 4e 54 4f 4e 52 54 00 74 00 8c   ┆&    t N         "  NR t        $   "  t n      &    t ~         #  KONTONRT t  ┆
0x29a2…29f2              00 0c 00 07 00 03 24 05 c1 00 23 86 00 74 00 a4 00 0a 00 05 00 02 26 03 e1 00 00 74 00 b4 00 0c 00 07 00 03 26 05 da b3 06 86 00 74 00 c2 00 0e 00 0a 00 04 26 08 f2 01 64 83 03 00 00 74 00 d2 00 10 00 0b 00 05 1a 09 00 24 10 03 5a 5a 5a 00   ┆      $   #  t        &    t        &      t        &   d    t           $  ZZZ ┆
0x29f2…2a42              00 74 00 e4 00 0c 00 07 00 03 22 05 00 24 96 83 00 74 00 f8 00 0c 00 07 00 03 26 05 db b3 08 83 00 74 01 08 00 0e 00 09 00 04 26 07 f0 05 8a 0a 81 00 00 74 01 18 00 18 00 14 00 09 1a 12 00 25 10 0c 39 39 39 39 39 39 39 39 45 2d 39 39 00 74   ┆ t        "  $   t        &      t        &        t           %  99999999E-99 t┆
0x2a42…2a92              01 2a 00 0c 00 08 00 03 22 06 00 25 75 95 00 74 01 46 00 08 00 04 00 01 28 02 00 74 01 56 00 0c 00 08 00 03 20 06 00 26 00 46 00 74 01 62 00 0a 00 05 00 02 26 03 e0 25 00 74 01 72 00 0c 00 07 00 03 26 05 db b4 02 95 00 74 01 80 00 10 00 0d   ┆ *      "  %u  t F      (  t V         & F t b      &  % t r      &      t      ┆

Reduced view