|
|
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: 7814 (0x1e86)
Notes: pts_type(SC)
Names: »RGSUB3.SC«
└─⟦f445cacdf⟧ Bits:30009666 Philips computer tape "600111"
└─⟦this⟧ »NJ-AMT/RGSUB3.SC«
IDENT RGSUB3 02.03.XXX.1 DDUM KMD08 PDIV * ENTRY ASGVOL ENTRY CLSVOL 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 PERF ASSG,CBIN2,DK02,CBIN2 REG DATASET B ASGRET * ASG300 ASSIGN ALL FILES - VOLUME 3 B ASGOK * ASG400 ASSIGN ALL FILES - VOLUME 4 B ASGOK * ASGNOK CMP CBIN1,CBIN0 RET * ASGOK CMP CBIN0,CBIN0 ASGRET RET PEND * EJECT CLSVOL PROC VOL ******************** * * CLOSE ROUTINE - PER VOLUME * * CLOSES ALL FILES ON SPECIFIED VOLUME * * CALL: PERF CLSVOL,<VOLUME NUMBER> * ******************** * 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 DSC0 DK02,CLOSE DSC0 FD02,UNLOD B CLSRET * CLS300 CLOSE ALL FILES - VOLUME 3 B CLSRET * CLS400 CLOSE ALL FILES - VOLUME 4 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,GTUWB CBNL GTCYOUT,GSWBIN1,CYLINNOK MOVE GSWBIN1,=W'32' CYLIN000 TBF CCYPFLG,CYLIN010 WAIT FOR BUFFER DELAY CBIN2 SUB GSWBIN1,CBIN2 CBL GSWBIN1,CBIN0,CYLINNOK B CYLIN000 * CYLIN010 SET CCYPFLG RESERVE BUFFER MOVE CCYBUF,=X'00' CLEAR BUFFER EDIT CCYBUF,GTSTRFMT PERF RAWRIT,DK03,=D'3',CCYBUF,GTCYOUT BNOK CYLIN100 ADD GTCYOUT,CBIN1 CLEAR CCYPFLG RELEASE BUFFER CMP CBIN0,CBIN0 RET * CYLIN100 CLEAR CCYPFLG RELEASE BUFFER CYLINNOK CMP CBIN1,CBIN0 RET PEND * EJECT CYOUT PROC ******************** * * 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,GTUWB 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
0x0000…0022 (0, 0, 400) Head {h00=0x001e, h01=0x0050, text=» IDENT RGSUB3 02.03.XXX.1«, t00=0x0000, t01=0x0004}
0x0022…0036 Head {h00=0x0010, h01=0x0050, text=» DDUM KMD08 «, t00=0x0000, t01=0x0026}
0x0036…0044 Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x0000, t01=0x003a}
0x0044…004e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0048}
0x004e…0064 Head {h00=0x0012, h01=0x0050, text=» ENTRY ASGVOL «, t00=0x0000, t01=0x0052}
0x0064…007a Head {h00=0x0012, h01=0x0050, text=» ENTRY CLSVOL «, t00=0x0000, t01=0x0068}
0x007a…0090 Head {h00=0x0012, h01=0x0050, text=» ENTRY CYLINE «, t00=0x0000, t01=0x007e}
0x0090…00a4 Head {h00=0x0010, h01=0x0050, text=» ENTRY CYOUT«, t00=0x0000, t01=0x0094}
0x00a4…00b8 Head {h00=0x0010, h01=0x0050, text=» ENTRY CYWRT«, t00=0x0000, t01=0x00a8}
0x00b8…00cc Head {h00=0x0010, h01=0x0050, text=» ENTRY CYRD «, t00=0x0000, t01=0x00bc}
0x00cc…00e0 Head {h00=0x0010, h01=0x0050, text=» ENTRY CYTRP«, t00=0x0000, t01=0x00d0}
0x00e0…00ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00e4}
0x00ea…00fc Head {h00=0x000e, h01=0x0050, text=» EXT ABORT«, t00=0x0000, t01=0x00ee}
0x00fc…010e Head {h00=0x000e, h01=0x0050, text=» EXT ASSG «, t00=0x0000, t01=0x0100}
0x010e…0122 Head {h00=0x0010, h01=0x0050, text=» EXT RAWRIT «, t00=0x0000, t01=0x0112}
0x0122…0136 Head {h00=0x0010, h01=0x0050, text=» EXT RAREAD «, t00=0x0000, t01=0x0126}
0x0136…014a Head {h00=0x0010, h01=0x0050, text=» EXT SPLIN8 «, t00=0x0000, t01=0x013a}
0x014a…015e Head {h00=0x0010, h01=0x0050, text=» EXT CLEAR8 «, t00=0x0000, t01=0x014e}
0x015e…0172 Head {h00=0x0010, h01=0x0050, text=» EXT GRASPV «, t00=0x0000, t01=0x0162}
0x0172…0186 Head {h00=0x0010, h01=0x0050, text=» EXT FRMXVO «, t00=0x0000, t01=0x0176}
0x0186…0198 Head {h00=0x000e, h01=0x0050, text=» EXT CRVO «, t00=0x0000, t01=0x018a}
0x0198…01a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x000c}
0x01a2…01ba Head {h00=0x0014, h01=0x0050, text=» INCLUDE EQUATE «, t00=0x0001, t01=0x0016}
0x01ba…01c8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x002e}
0x01c8…01e0 Head {h00=0x0014, h01=0x0050, text=»ASGVOL PROC VOL «, t00=0x0001, t01=0x003c}
0x01e0…01fc Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0001, t01=0x0054}
0x01fc…0206 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0070}
0x0206…0234 Head {h00=0x002a, h01=0x0050, text=»* ASSIGN ROUTINE - PER VOLUME«, t00=0x0001, t01=0x007a}
0x0234…023e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00a8}
0x023e…0276 Head {h00=0x0034, h01=0x0050, text=»* ASSIGNS ALL FILES ON SPECIFIED VOLUME«, t00=0x0001, t01=0x00b2}
0x0276…0280 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00ea}
0x0280…02b8 Head {h00=0x0034, h01=0x0050, text=»* IF VOL=0, ONLY CONFIGURATION DATA SET«, t00=0x0001, t01=0x00f4}
0x02b8…02c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x012c}
0x02c2…02cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0136}
0x02cc…0304 Head {h00=0x0034, h01=0x0050, text=»* CALL: PERF ASGVOL,<VOLUME NUMBER>«, t00=0x0001, t01=0x0140}
0x0304…030e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0178}
0x030e…032a Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0001, t01=0x0182}
0x032a…0334 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x000e}
0x0334…0348 Head {h00=0x0010, h01=0x0050, text=» IB VOL, C «, t00=0x0002, t01=0x0018}
0x0348…036e Head {h00=0x0022, h01=0x0050, text=» ASG100,ASG200,ASG300,ASG400 «, t00=0x0002, t01=0x002c}
0x036e…038c Head {h00=0x001a, h01=0x0050, text=» CBNE VOL,CBIN0,ASGNOK«, t00=0x0002, t01=0x0052}
0x038c…0396 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0070}
0x0396…03ba Head {h00=0x0020, h01=0x0050, text=»ASG000 ASSIGN CONF DATASET«, t00=0x0002, t01=0x007a}
0x03ba…03de Head {h00=0x0020, h01=0x0050, text=» PERF ASSG,CBIN1,DK01,CBIN1 «, t00=0x0002, t01=0x009e}
0x03de…03f0 Head {h00=0x000e, h01=0x0050, text=» B ASGRET «, t00=0x0002, t01=0x00c2}
0x03f0…03fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00d4}
0x03fa…0426 Head {h00=0x0028, h01=0x0050, text=»ASG100 ASSIGN ALL FILES - VOLUME 1«, t00=0x0002, t01=0x00de}
0x0426…0456 Head {h00=0x002c, h01=0x0050, text=» PERF ASSG,CBIN1,DK01,CBIN1 CONF DATASET«, t00=0x0002, t01=0x010a}
0x0456…046a Head {h00=0x0010, h01=0x0050, text=» BNOK ASGRET«, t00=0x0002, t01=0x013a}
0x046a…049c Head {h00=0x002e, h01=0x0050, text=» PERF ASSG,CBIN1,DK03,CBIN3 CYCLE DATASET «, t00=0x0002, t01=0x014e}
0x049c…04b0 Head {h00=0x0010, h01=0x0050, text=» BNOK ASGRET«, t00=0x0002, t01=0x0180}
0x04b0…04dc (3, 0, 400) Head {h00=0x0028, h01=0x0050, text=» PERF ASSG,CBIN1,DK04,CBIN4 KT PLAN «, t00=0x0003, t01=0x0004}
0x04dc…04f0 Head {h00=0x0010, h01=0x0050, text=» BNOK ASGRET«, t00=0x0003, t01=0x0030}
0x04f0…050c Head {h00=0x0018, h01=0x0050, text=» TBF CGLREGFL,ASGRET«, t00=0x0003, t01=0x0044}
0x050c…0528 Head {h00=0x0018, h01=0x0050, text=» MOVE CGLRECNR,=D'0'«, t00=0x0003, t01=0x0060}
0x0528…0556 Head {h00=0x002a, h01=0x0050, text=» PERF ASSG,CBIN1,DK05,CBIN5 OLD REGSET«, t00=0x0003, t01=0x007c}
0x0556…056a Head {h00=0x0010, h01=0x0050, text=» BNOK ASGRET«, t00=0x0003, t01=0x00aa}
0x056a…0588 Head {h00=0x001a, h01=0x0050, text=» MOVE CGLRECNR,TTGLREC«, t00=0x0003, t01=0x00be}
0x0588…059a Head {h00=0x000e, h01=0x0050, text=» B ASGRET «, t00=0x0003, t01=0x00dc}
0x059a…05a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00ee}
0x05a4…05d0 Head {h00=0x0028, h01=0x0050, text=»ASG200 ASSIGN ALL FILES - VOLUME 2«, t00=0x0003, t01=0x00f8}
0x05d0…0600 Head {h00=0x002c, h01=0x0050, text=» PERF ASSG,CBIN2,DK02,CBIN2 REG DATASET «, t00=0x0003, t01=0x0124}
0x0600…0612 Head {h00=0x000e, h01=0x0050, text=» B ASGRET «, t00=0x0003, t01=0x0154}
0x0612…061c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0166}
0x061c…0648 Head {h00=0x0028, h01=0x0050, text=»ASG300 ASSIGN ALL FILES - VOLUME 3«, t00=0x0003, t01=0x0170}
0x0648…0658 Head {h00=0x000c, h01=0x0050, text=» B ASGOK«, t00=0x0004, t01=0x000c}
0x0658…0662 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x001c}
0x0662…068e Head {h00=0x0028, h01=0x0050, text=»ASG400 ASSIGN ALL FILES - VOLUME 4«, t00=0x0004, t01=0x0026}
0x068e…069e Head {h00=0x000c, h01=0x0050, text=» B ASGOK«, t00=0x0004, t01=0x0052}
0x069e…06a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0062}
0x06a8…06b6 Head {h00=0x000a, h01=0x0050, text=»ASGNOK«, t00=0x0004, t01=0x006c}
0x06b6…06ce Head {h00=0x0014, h01=0x0050, text=» CMP CBIN1,CBIN0«, t00=0x0004, t01=0x007a}
0x06ce…06da Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0004, t01=0x0092}
0x06da…06e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x009e}
0x06e4…06f2 Head {h00=0x000a, h01=0x0050, text=»ASGOK «, t00=0x0004, t01=0x00a8}
0x06f2…070a Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x0004, t01=0x00b6}
0x070a…0718 Head {h00=0x000a, h01=0x0050, text=»ASGRET«, t00=0x0004, t01=0x00ce}
0x0718…0724 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0004, t01=0x00dc}
0x0724…0732 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0004, t01=0x00e8}
0x0732…073c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00f6}
0x073c…074a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x0100}
0x074a…0762 Head {h00=0x0014, h01=0x0050, text=»CLSVOL PROC VOL «, t00=0x0004, t01=0x010e}
0x0762…077e Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0004, t01=0x0126}
0x077e…0788 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0142}
0x0788…07b6 Head {h00=0x002a, h01=0x0050, text=»* CLOSE ROUTINE - PER VOLUME «, t00=0x0004, t01=0x014c}
0x07b6…07c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x017a}
0x07c0…07f8 Head {h00=0x0034, h01=0x0050, text=»* CLOSES ALL FILES ON SPECIFIED VOLUME «, t00=0x0004, t01=0x0184}
0x07f8…0802 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x002c}
0x0802…083a Head {h00=0x0034, h01=0x0050, text=»* CALL: PERF CLSVOL,<VOLUME NUMBER>«, t00=0x0005, t01=0x0036}
0x083a…0844 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x006e}
0x0844…0860 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0005, t01=0x0078}
0x0860…086a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0094}
0x086a…087e Head {h00=0x0010, h01=0x0050, text=» IB VOL, C «, t00=0x0005, t01=0x009e}
0x087e…08a4 Head {h00=0x0022, h01=0x0050, text=» CLS100,CLS200,CLS300,CLS400 «, t00=0x0005, t01=0x00b2}
0x08a4…08b6 Head {h00=0x000e, h01=0x0050, text=» B CLSRET «, t00=0x0005, t01=0x00d8}
0x08b6…08c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00ea}
0x08c0…08ec Head {h00=0x0028, h01=0x0050, text=»CLS100 CLOSE ALL FILES - VOLUME 1 «, t00=0x0005, t01=0x00f4}
0x08ec…0904 Head {h00=0x0014, h01=0x0050, text=» DSC0 DK01,CLOSE«, t00=0x0005, t01=0x0120}
0x0904…091c Head {h00=0x0014, h01=0x0050, text=» DSC0 DK02,CLOSE«, t00=0x0005, t01=0x0138}
0x091c…0934 Head {h00=0x0014, h01=0x0050, text=» DSC0 DK04,CLOSE«, t00=0x0005, t01=0x0150}
0x0934…0950 Head {h00=0x0018, h01=0x0050, text=» TBF CGLREGFL,CLS150«, t00=0x0005, t01=0x0168}
0x0950…0968 Head {h00=0x0014, h01=0x0050, text=» DSC0 DK05,CLOSE«, t00=0x0005, t01=0x0184}
0x0968…0976 Head {h00=0x000a, h01=0x0050, text=»CLS150«, t00=0x0006, t01=0x000c}
0x0976…098e Head {h00=0x0014, h01=0x0050, text=» DSC0 FD01,UNLOD«, t00=0x0006, t01=0x001a}
0x098e…09a0 Head {h00=0x000e, h01=0x0050, text=» B CLSRET «, t00=0x0006, t01=0x0032}
0x09a0…09aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0044}
0x09aa…09d6 Head {h00=0x0028, h01=0x0050, text=»CLS200 CLOSE ALL FILES - VOLUME 2 «, t00=0x0006, t01=0x004e}
0x09d6…09ee Head {h00=0x0014, h01=0x0050, text=» DSC0 DK02,CLOSE«, t00=0x0006, t01=0x007a}
0x09ee…0a06 Head {h00=0x0014, h01=0x0050, text=» DSC0 FD02,UNLOD«, t00=0x0006, t01=0x0092}
0x0a06…0a18 Head {h00=0x000e, h01=0x0050, text=» B CLSRET «, t00=0x0006, t01=0x00aa}
0x0a18…0a22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00bc}
0x0a22…0a4e Head {h00=0x0028, h01=0x0050, text=»CLS300 CLOSE ALL FILES - VOLUME 3 «, t00=0x0006, t01=0x00c6}
0x0a4e…0a60 Head {h00=0x000e, h01=0x0050, text=» B CLSRET «, t00=0x0006, t01=0x00f2}
0x0a60…0a6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0104}
0x0a6a…0a96 Head {h00=0x0028, h01=0x0050, text=»CLS400 CLOSE ALL FILES - VOLUME 4 «, t00=0x0006, t01=0x010e}
0x0a96…0aa8 Head {h00=0x000e, h01=0x0050, text=» B CLSRET «, t00=0x0006, t01=0x013a}
0x0aa8…0ab2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x014c}
0x0ab2…0ac0 Head {h00=0x000a, h01=0x0050, text=»CLSRET«, t00=0x0006, t01=0x0156}
0x0ac0…0acc Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0006, t01=0x0164}
0x0acc…0ada Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0006, t01=0x0170}
0x0ada…0ae4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x017e}
0x0ae4…0af2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x0188}
0x0af2…0b06 Head {h00=0x0010, h01=0x0050, text=»CYLINE PROC «, t00=0x0007, t01=0x0008}
0x0b06…0b22 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0007, t01=0x001c}
0x0b22…0b2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0038}
0x0b2c…0b5e Head {h00=0x002e, h01=0x0050, text=»* WRITE ONE LINE TO CYCLE DATASET«, t00=0x0007, t01=0x0042}
0x0b5e…0b68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0074}
0x0b68…0ba0 Head {h00=0x0034, h01=0x0050, text=»* ON ENTRY DATA IN SEPARATE FIELDS «, t00=0x0007, t01=0x007e}
0x0ba0…0baa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00b6}
0x0baa…0be8 Head {h00=0x003a, h01=0x0050, text=»* ON EXIT CR= OK DATA WRITTEN TO CYSET «, t00=0x0007, t01=0x00c0}
0x0be8…0c2a Head {h00=0x003e, h01=0x0050, text=»* CR=NOK DATA NOT WRITTEN TO CYSET «, t00=0x0007, t01=0x00fe}
0x0c2a…0c5c Head {h00=0x002e, h01=0x0050, text=»* E.G. ERROR ON DISK«, t00=0x0007, t01=0x0140}
0x0c5c…0c8e Head {h00=0x002e, h01=0x0050, text=»* DATASET FULL «, t00=0x0007, t01=0x0172}
0x0c8e…0cce Head {h00=0x003c, h01=0x0050, text=»* WAITED TOO LONG FOR BUFFER «, t00=0x0008, t01=0x0014}
0x0cce…0cd8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0054}
0x0cd8…0cf4 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0008, t01=0x005e}
0x0cf4…0d12 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,CCYSIZE «, t00=0x0008, t01=0x007a}
0x0d12…0d2c Head {h00=0x0016, h01=0x0050, text=» MUL GSWBIN1,GTUWB«, t00=0x0008, t01=0x0098}
0x0d2c…0d52 Head {h00=0x0022, h01=0x0050, text=» CBNL GTCYOUT,GSWBIN1,CYLINNOK«, t00=0x0008, t01=0x00b2}
0x0d52…0d6e Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'32'«, t00=0x0008, t01=0x00d8}
0x0d6e…0d7e Head {h00=0x000c, h01=0x0050, text=»CYLIN000«, t00=0x0008, t01=0x00f4}
0x0d7e…0dac Head {h00=0x002a, h01=0x0050, text=» TBF CCYPFLG,CYLIN010 WAIT FOR BUFFER «, t00=0x0008, t01=0x0104}
0x0dac…0dc0 Head {h00=0x0010, h01=0x0050, text=» DELAY CBIN2«, t00=0x0008, t01=0x0132}
0x0dc0…0dda Head {h00=0x0016, h01=0x0050, text=» SUB GSWBIN1,CBIN2«, t00=0x0008, t01=0x0146}
0x0dda…0dfe Head {h00=0x0020, h01=0x0050, text=» CBL GSWBIN1,CBIN0,CYLINNOK «, t00=0x0008, t01=0x0160}
0x0dfe…0e12 Head {h00=0x0010, h01=0x0050, text=» B CYLIN000 «, t00=0x0008, t01=0x0184}
0x0e12…0e1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0008}
0x0e1c…0e2c Head {h00=0x000c, h01=0x0050, text=»CYLIN010«, t00=0x0009, t01=0x0012}
0x0e2c…0e50 Head {h00=0x0020, h01=0x0050, text=» SET CCYPFLG RESERVE BUFFER «, t00=0x0009, t01=0x0022}
0x0e50…0e78 Head {h00=0x0024, h01=0x0050, text=» MOVE CCYBUF,=X'00' CLEAR BUFFER«, t00=0x0009, t01=0x0046}
0x0e78…0e96 Head {h00=0x001a, h01=0x0050, text=» EDIT CCYBUF,GTSTRFMT «, t00=0x0009, t01=0x006e}
0x0e96…0ec4 Head {h00=0x002a, h01=0x0050, text=» PERF RAWRIT,DK03,=D'3',CCYBUF,GTCYOUT«, t00=0x0009, t01=0x008c}
0x0ec4…0eda Head {h00=0x0012, h01=0x0050, text=» BNOK CYLIN100«, t00=0x0009, t01=0x00ba}
0x0eda…0ef4 Head {h00=0x0016, h01=0x0050, text=» ADD GTCYOUT,CBIN1«, t00=0x0009, t01=0x00d0}
0x0ef4…0f1a Head {h00=0x0022, h01=0x0050, text=» CLEAR CCYPFLG RELEASE BUFFER «, t00=0x0009, t01=0x00ea}
0x0f1a…0f32 Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x0009, t01=0x0110}
0x0f32…0f3e Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0009, t01=0x0128}
0x0f3e…0f48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0134}
0x0f48…0f58 Head {h00=0x000c, h01=0x0050, text=»CYLIN100«, t00=0x0009, t01=0x013e}
0x0f58…0f7e Head {h00=0x0022, h01=0x0050, text=» CLEAR CCYPFLG RELEASE BUFFER «, t00=0x0009, t01=0x014e}
0x0f7e…0f8e Head {h00=0x000c, h01=0x0050, text=»CYLINNOK«, t00=0x0009, t01=0x0174}
0x0f8e…0fa6 Head {h00=0x0014, h01=0x0050, text=» CMP CBIN1,CBIN0«, t00=0x0009, t01=0x0184}
0x0fa6…0fb2 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000a, t01=0x000c}
0x0fb2…0fc0 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000a, t01=0x0018}
0x0fc0…0fca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0026}
0x0fca…0fd8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x0030}
0x0fd8…0fea Head {h00=0x000e, h01=0x0050, text=»CYOUT PROC«, t00=0x000a, t01=0x003e}
0x0fea…1006 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000a, t01=0x0050}
0x1006…1010 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x006c}
0x1010…1048 Head {h00=0x0034, h01=0x0050, text=»* WRITE OUT THE WHOLE CONTENT OF CYSET «, t00=0x000a, t01=0x0076}
0x1048…1070 Head {h00=0x0024, h01=0x0050, text=»* (LESS THAN ONE PAGE) «, t00=0x000a, t01=0x00ae}
0x1070…107a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00d6}
0x107a…1096 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000a, t01=0x00e0}
0x1096…10b4 Head {h00=0x001a, h01=0x0050, text=» TBT GTCYWRTF,CYOUT050«, t00=0x000a, t01=0x00fc}
0x10b4…10d2 Head {h00=0x001a, h01=0x0050, text=» TBT TTTSTFLG,CYOUT005«, t00=0x000a, t01=0x011a}
0x10d2…10e8 Head {h00=0x0012, h01=0x0050, text=» SET TTTSTFLG «, t00=0x000a, t01=0x0138}
0x10e8…1108 Head {h00=0x001c, h01=0x0050, text=» PERF SPLIN8,CBIN5,CBIN2«, t00=0x000a, t01=0x014e}
0x1108…111c Head {h00=0x0010, h01=0x0050, text=» PERF GRASPV«, t00=0x000a, t01=0x016e}
0x111c…1130 Head {h00=0x0010, h01=0x0050, text=» PERF CLEAR8«, t00=0x000a, t01=0x0182}
0x1130…1140 Head {h00=0x000c, h01=0x0050, text=»CYOUT005«, t00=0x000b, t01=0x0008}
0x1140…115e Head {h00=0x001a, h01=0x0050, text=» MOVE TTLINNR,TTCYKPOS«, t00=0x000b, t01=0x0018}
0x115e…117c Head {h00=0x001a, h01=0x0050, text=» TBF GTCYTRPF,CYOUT010«, t00=0x000b, t01=0x0036}
0x117c…11b2 Head {h00=0x0032, h01=0x0050, text=» SUB GTCYOUT,CBIN1 ADJUST FOR TRP LINE, -TOTAL«, t00=0x000b, t01=0x0054}
0x11b2…11c2 Head {h00=0x000c, h01=0x0050, text=»CYOUT010«, t00=0x000b, t01=0x008a}
0x11c2…11e0 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,TTLINNR «, t00=0x000b, t01=0x009a}
0x11e0…1200 Head {h00=0x001c, h01=0x0050, text=» DSC1 KVOUCH,POS,GSWBIN1«, t00=0x000b, t01=0x00b8}
0x1200…1226 Head {h00=0x0022, h01=0x0050, text=» CBNL GTCYIN,GTCYOUT,CYOUT050 «, t00=0x000b, t01=0x00d8}
0x1226…1238 Head {h00=0x000e, h01=0x0050, text=» PERF CYRD«, t00=0x000b, t01=0x00fe}
0x1238…1252 Head {h00=0x0016, h01=0x0050, text=» SUB TTLINNR,=D'2'«, t00=0x000b, t01=0x0110}
0x1252…1266 Head {h00=0x0010, h01=0x0050, text=» WAIT KVOUCH«, t00=0x000b, t01=0x012a}
0x1266…127a Head {h00=0x0010, h01=0x0050, text=» B CYOUT010 «, t00=0x000b, t01=0x013e}
0x127a…1284 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0152}
0x1284…1294 Head {h00=0x000c, h01=0x0050, text=»CYOUT050«, t00=0x000b, t01=0x015c}
0x1294…12a0 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000b, t01=0x016c}
0x12a0…12ae Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000b, t01=0x0178}
0x12ae…12b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0186}
0x12b8…12c6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x0190}
0x12c6…12d8 Head {h00=0x000e, h01=0x0050, text=»CYWRT PROC«, t00=0x000c, t01=0x000e}
0x12d8…12f4 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000c, t01=0x0020}
0x12f4…12fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x003c}
0x12fe…132e Head {h00=0x002c, h01=0x0050, text=»* WRITE A LINE ON CYCLE DATASET«, t00=0x000c, t01=0x0046}
0x132e…136c Head {h00=0x003a, h01=0x0050, text=»* IN NOK EMPTY THE CYCLE DATASET TO VOUCHER «, t00=0x000c, t01=0x0076}
0x136c…13a0 Head {h00=0x0030, h01=0x0050, text=»* AND WRITE LINE TO VOUCHER«, t00=0x000c, t01=0x00b4}
0x13a0…13aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00e8}
0x13aa…13c6 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000c, t01=0x00f2}
0x13c6…13ee Head {h00=0x0024, h01=0x0050, text=» PERF CYLINE WRITE LINE TO CYSET«, t00=0x000c, t01=0x010e}
0x13ee…1404 Head {h00=0x0012, h01=0x0050, text=» BNOK CYWRT100«, t00=0x000c, t01=0x0136}
0x1404…141e Head {h00=0x0016, h01=0x0050, text=» SUB TTLINNR,=D'2'«, t00=0x000c, t01=0x014c}
0x141e…144e Head {h00=0x002c, h01=0x0050, text=» CBL TTLINNR,=D'4',CYWRT010 IF PAGE FULL«, t00=0x000c, t01=0x0166}
0x144e…146a Head {h00=0x0018, h01=0x0050, text=» CMP CBIN0,CBIN0 OK «, t00=0x000d, t01=0x0008}
0x146a…1476 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000d, t01=0x0024}
0x1476…1480 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0030}
0x1480…1490 Head {h00=0x000c, h01=0x0050, text=»CYWRT010«, t00=0x000d, t01=0x003a}
0x1490…14b8 Head {h00=0x0024, h01=0x0050, text=» MOVE GSWSTR9,=C'TRP ' NEW PAGE «, t00=0x000d, t01=0x004a}
0x14b8…14d2 Head {h00=0x0016, h01=0x0050, text=» PERF FRMXVO,CBIN2«, t00=0x000d, t01=0x0072}
0x14d2…14e6 Head {h00=0x0010, h01=0x0050, text=» PERF CYLINE«, t00=0x000d, t01=0x008c}
0x14e6…150a Head {h00=0x0020, h01=0x0050, text=» SET GTCYTRPF INITIATE PRINT«, t00=0x000d, t01=0x00a0}
0x150a…1526 Head {h00=0x0018, h01=0x0050, text=» CMP CBIN0,CBIN0 OK «, t00=0x000d, t01=0x00c4}
0x1526…1532 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000d, t01=0x00e0}
0x1532…153c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00ec}
0x153c…154c Head {h00=0x000c, h01=0x0050, text=»CYWRT100«, t00=0x000d, t01=0x00f6}
0x154c…1560 Head {h00=0x0010, h01=0x0050, text=» PERF CYOUT «, t00=0x000d, t01=0x0106}
0x1560…1576 Head {h00=0x0012, h01=0x0050, text=» SET GTCYWRTF «, t00=0x000d, t01=0x011a}
0x1576…158e Head {h00=0x0014, h01=0x0050, text=» CMP CBIN1,CBIN0«, t00=0x000d, t01=0x0130}
0x158e…159a Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000d, t01=0x0148}
0x159a…15a8 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000d, t01=0x0154}
0x15a8…15b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0162}
0x15b2…15c0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x016c}
0x15c0…15d2 Head {h00=0x000e, h01=0x0050, text=»CYRD PROC «, t00=0x000d, t01=0x017a}
0x15d2…15ee Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000d, t01=0x018c}
0x15ee…15f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0018}
0x15f8…1630 Head {h00=0x0034, h01=0x0050, text=»* READ ONE LINE FROM CYCLE DATASET AND «, t00=0x000e, t01=0x0022}
0x1630…1656 Head {h00=0x0022, h01=0x0050, text=»* WRITE IT TO VOUCHER«, t00=0x000e, t01=0x005a}
0x1656…1660 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0080}
0x1660…169c Head {h00=0x0038, h01=0x0050, text=»* VOUCHER SHOULD BE POSITIONED BEFORE PRINT«, t00=0x000e, t01=0x008a}
0x169c…16a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00c6}
0x16a6…16c2 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000e, t01=0x00d0}
0x16c2…16d2 Head {h00=0x000c, h01=0x0050, text=»CYRD000 «, t00=0x000e, t01=0x00ec}
0x16d2…16ee Head {h00=0x0018, h01=0x0050, text=» TBF CCYPFLG,CYRD010«, t00=0x000e, t01=0x00fc}
0x16ee…1718 Head {h00=0x0026, h01=0x0050, text=» DELAY CBIN2 WAIT FOR CYCLE BUFFER«, t00=0x000e, t01=0x0118}
0x1718…172a Head {h00=0x000e, h01=0x0050, text=» B CYRD000«, t00=0x000e, t01=0x0142}
0x172a…173a Head {h00=0x000c, h01=0x0050, text=»CYRD010 «, t00=0x000e, t01=0x0154}
0x173a…1764 Head {h00=0x0026, h01=0x0050, text=» SET CCYPFLG RESERVE CYCLE BUFFER «, t00=0x000e, t01=0x0164}
0x1764…178c Head {h00=0x0024, h01=0x0050, text=» MOVE GSWBIN1,=W'128' SET LENGTH«, t00=0x000e, t01=0x018e}
0x178c…17c2 Head {h00=0x0032, h01=0x0050, text=» PERF RAREAD,DK03,=D'3',CCYBUF,GSWBIN1,GTCYIN «, t00=0x000f, t01=0x0026}
0x17c2…17d8 Head {h00=0x0012, h01=0x0050, text=» BNOK CYRDNOK «, t00=0x000f, t01=0x005c}
0x17d8…17f8 Head {h00=0x001c, h01=0x0050, text=» EDWRT .NW,KVOUCH,CYEDT «, t00=0x000f, t01=0x0072}
0x17f8…180e Head {h00=0x0012, h01=0x0050, text=» CLEAR CCYPFLG«, t00=0x000f, t01=0x0092}
0x180e…1820 Head {h00=0x000e, h01=0x0050, text=» B CYRD100«, t00=0x000f, t01=0x00a8}
0x1820…1830 Head {h00=0x000c, h01=0x0050, text=»CYRDNOK «, t00=0x000f, t01=0x00ba}
0x1830…184a Head {h00=0x0016, h01=0x0050, text=» ADD GTCYIN,CBIN1 «, t00=0x000f, t01=0x00ca}
0x184a…1860 Head {h00=0x0012, h01=0x0050, text=» CLEAR CCYPFLG«, t00=0x000f, t01=0x00e4}
0x1860…1872 Head {h00=0x000e, h01=0x0050, text=» PERF CRVO«, t00=0x000f, t01=0x00fa}
0x1872…188e Head {h00=0x0018, h01=0x0050, text=» CMP CBIN1,CBIN0 NOK«, t00=0x000f, t01=0x010c}
0x188e…189a Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000f, t01=0x0128}
0x189a…18a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0134}
0x18a4…18b4 Head {h00=0x000c, h01=0x0050, text=»CYRD100 «, t00=0x000f, t01=0x013e}
0x18b4…18c8 Head {h00=0x0010, h01=0x0050, text=» WAIT KVOUCH«, t00=0x000f, t01=0x014e}
0x18c8…18da Head {h00=0x000e, h01=0x0050, text=» PERF CRVO«, t00=0x000f, t01=0x0162}
0x18da…18f4 Head {h00=0x0016, h01=0x0050, text=» ADD GTCYIN,CBIN1 «, t00=0x000f, t01=0x0174}
0x18f4…1910 Head {h00=0x0018, h01=0x0050, text=» CMP CBIN0,CBIN0 OK «, t00=0x000f, t01=0x018e}
0x1910…191c Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0010, t01=0x001a}
0x191c…192a Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0010, t01=0x0026}
0x192a…1934 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0034}
0x1934…193e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x003e}
0x193e…1950 Head {h00=0x000e, h01=0x0050, text=»CYEDT FRMT«, t00=0x0010, t01=0x0048}
0x1950…1966 Head {h00=0x0012, h01=0x0050, text=» FCOPY CCYBUF «, t00=0x0010, t01=0x005a}
0x1966…1974 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0010, t01=0x0070}
0x1974…197e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x007e}
0x197e…198c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x0088}
0x198c…199e Head {h00=0x000e, h01=0x0050, text=»CYTRP PROC«, t00=0x0010, t01=0x0096}
0x199e…19ba Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0010, t01=0x00a8}
0x19ba…19c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00c4}
0x19c4…19ea Head {h00=0x0022, h01=0x0050, text=»* PRINT A WHOLE PAGE «, t00=0x0010, t01=0x00ce}
0x19ea…19f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00f4}
0x19f4…1a2e Head {h00=0x0036, h01=0x0050, text=»* AND WRITE TRANSPORT LINE FIRST ON CYSET«, t00=0x0010, t01=0x00fe}
0x1a2e…1a38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0138}
0x1a38…1a54 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0010, t01=0x0142}
0x1a54…1a72 Head {h00=0x001a, h01=0x0050, text=» TBF GTCYTRPF,CYTRP200«, t00=0x0010, t01=0x015e}
0x1a72…1aa2 Head {h00=0x002c, h01=0x0050, text=» TBT GTCYWRTF,CYTRP100 T=ALREADY WRITTEN«, t00=0x0010, t01=0x017c}
0x1aa2…1aba Head {h00=0x0014, h01=0x0050, text=» CLEAR GTCYTRPF «, t00=0x0011, t01=0x001c}
0x1aba…1ad2 Head {h00=0x0014, h01=0x0050, text=» CLEAR TTTSTFLG «, t00=0x0011, t01=0x0034}
0x1ad2…1ae6 Head {h00=0x0010, h01=0x0050, text=» PERF CYOUT «, t00=0x0011, t01=0x004c}
0x1ae6…1afa Head {h00=0x0010, h01=0x0050, text=» WAIT KVOUCH«, t00=0x0011, t01=0x0060}
0x1afa…1b18 Head {h00=0x001a, h01=0x0050, text=» DSC0 .NW,KVOUCH,RLEAS«, t00=0x0011, t01=0x0074}
0x1b18…1b30 Head {h00=0x0014, h01=0x0050, text=» CLEAR TTTSTFLG «, t00=0x0011, t01=0x0092}
0x1b30…1b4e Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR9,=C'TRP '«, t00=0x0011, t01=0x00aa}
0x1b4e…1b68 Head {h00=0x0016, h01=0x0050, text=» PERF FRMXVO,CBIN2«, t00=0x0011, t01=0x00c8}
0x1b68…1b82 Head {h00=0x0016, h01=0x0050, text=» MOVE GTCYIN,GTUWB«, t00=0x0011, t01=0x00e2}
0x1b82…1b9c Head {h00=0x0016, h01=0x0050, text=» SUB GTCYIN,CBIN1 «, t00=0x0011, t01=0x00fc}
0x1b9c…1bb8 Head {h00=0x0018, h01=0x0050, text=» MUL GTCYIN,CCYSIZE «, t00=0x0011, t01=0x0116}
0x1bb8…1bd2 Head {h00=0x0016, h01=0x0050, text=» ADD GTCYIN,CBIN1 «, t00=0x0011, t01=0x0132}
0x1bd2…1bee Head {h00=0x0018, h01=0x0050, text=» MOVE GTCYOUT,GTCYIN«, t00=0x0011, t01=0x014c}
0x1bee…1c0c Head {h00=0x001a, h01=0x0050, text=» MOVE TTLINNR,TTCYKST «, t00=0x0011, t01=0x0168}
0x1c0c…1c2a Head {h00=0x001a, h01=0x0050, text=» MOVE TTCYKPOS,TTLINNR«, t00=0x0011, t01=0x0186}
0x1c2a…1c3e Head {h00=0x0010, h01=0x0050, text=» PERF CYLINE«, t00=0x0012, t01=0x0014}
0x1c3e…1c54 Head {h00=0x0012, h01=0x0050, text=» BNOK CYTRP100«, t00=0x0012, t01=0x0028}
0x1c54…1c68 Head {h00=0x0010, h01=0x0050, text=» B CYTRP150 «, t00=0x0012, t01=0x003e}
0x1c68…1c72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0052}
0x1c72…1c82 Head {h00=0x000c, h01=0x0050, text=»CYTRP100«, t00=0x0012, t01=0x005c}
0x1c82…1c9a Head {h00=0x0014, h01=0x0050, text=» CLEAR GTCYTRPF «, t00=0x0012, t01=0x006c}
0x1c9a…1cb0 Head {h00=0x0012, h01=0x0050, text=» SET GTCYWRTF «, t00=0x0012, t01=0x0084}
0x1cb0…1ce2 Head {h00=0x002e, h01=0x0050, text=» PERF SPLIN8,CBIN3,CBIN2 ASK FOR 'NY SIDE'«, t00=0x0012, t01=0x009a}
0x1ce2…1cfc Head {h00=0x0016, h01=0x0050, text=» PERF GRASPV GRASP«, t00=0x0012, t01=0x00cc}
0x1cfc…1d1a Head {h00=0x001a, h01=0x0050, text=» MOVE TTCYKPOS,TTCYKST«, t00=0x0012, t01=0x00e6}
0x1d1a…1d48 Head {h00=0x002a, h01=0x0050, text=» MOVE TTLINNR,TTCYKST POSITION VOUCHER«, t00=0x0012, t01=0x0104}
0x1d48…1d66 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,TTLINNR «, t00=0x0012, t01=0x0132}
0x1d66…1d86 Head {h00=0x001c, h01=0x0050, text=» DSC1 KVOUCH,POS,GSWBIN1«, t00=0x0012, t01=0x0150}
0x1d86…1dba Head {h00=0x0030, h01=0x0050, text=» MOVE GSWSTR9,=C'TRP ' SET UP TRANSPORT LINE«, t00=0x0012, t01=0x0170}
0x1dba…1dd4 Head {h00=0x0016, h01=0x0050, text=» PERF FRMXVO,CBIN2«, t00=0x0013, t01=0x0014}
0x1dd4…1e02 Head {h00=0x002a, h01=0x0050, text=» EDWRT KVOUCH,GTSTRFMT WRITE TRP LINE «, t00=0x0013, t01=0x002e}
0x1e02…1e0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x005c}
0x1e0c…1e1c Head {h00=0x000c, h01=0x0050, text=»CYTRP150«, t00=0x0013, t01=0x0066}
0x1e1c…1e36 Head {h00=0x0016, h01=0x0050, text=» SUB TTLINNR,=D'2'«, t00=0x0013, t01=0x0076}
0x1e36…1e46 Head {h00=0x000c, h01=0x0050, text=»CYTRP200«, t00=0x0013, t01=0x0090}
0x1e46…1e52 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0013, t01=0x00a0}
0x1e52…1e60 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0013, t01=0x00ac}
0x1e60…1e6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00ba}
0x1e6a…1e76 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0013, t01=0x00c4}
0x1e76…1e7a Head {h00=0x4004, h01=0x0000}
0x1e7a…1e7e 00 13 00 d0 ┆ ┆
0x1e7e…1e86 (20, 1, 8) 20 04 00 00 00 14 00 04 ┆ ┆