|
|
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: 10402 (0x28a2)
Notes: pts_type(SC)
Names: »RGSUB3.SC«
└─⟦b6546aa17⟧ Bits:30009689 Philips computer tape "600325"
└─⟦this⟧ »REMIT2/RGSUB3.SC«
IDENT RGSUB3 03.01.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,ASG160 MOVE CGLRECNR,=D'0' PERF ASSG,CBIN1,DK05,CBIN5 OLD REGSET BNOK ASGRET MOVE CGLRECNR,TTGLREC ASG160 TBF CTEXTFLG,ASGRET PERF ASSG,CBIN1,DK06,CBIN6 TEXT REG BNOK ASGRET TBF CSTRKFLG,ASGRET PERF ASSG,CBIN1,DK07,CBIN7 INDEX FILE BNOK ASGRET PERF ASSG,CBIN1,DK08,CBIN8 STAM REG BNOK ASGRET PERF ASSG,CBIN1,DK09,CBIN9 VAR REG BNOK ASGRET TBF CBUDTFLG,ASGRET PERF ASSG,CBIN1,DK10,CBIN10 POST REG BNOK ASGRET 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 TBF CTEXTFLG,CLS190 DSC0 DK06,CLOSE TBF CSTRKFLG,CLS190 DSC0 DK07,CLOSE DSC0 DK08,CLOSE DSC0 DK09,CLOSE TBF CBUDTFLG,CLS190 DSC0 DK10,CLOSE CLS190 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,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
0x0000…0022 (0, 0, 400) Head {h00=0x001e, h01=0x0050, text=» IDENT RGSUB3 03.01.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,ASG160«, 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…0596 Head {h00=0x000a, h01=0x0050, text=»ASG160«, t00=0x0003, t01=0x00dc}
0x0596…05b2 Head {h00=0x0018, h01=0x0050, text=» TBF CTEXTFLG,ASGRET«, t00=0x0003, t01=0x00ea}
0x05b2…05de Head {h00=0x0028, h01=0x0050, text=» PERF ASSG,CBIN1,DK06,CBIN6 TEXT REG«, t00=0x0003, t01=0x0106}
0x05de…05f2 Head {h00=0x0010, h01=0x0050, text=» BNOK ASGRET«, t00=0x0003, t01=0x0132}
0x05f2…060e Head {h00=0x0018, h01=0x0050, text=» TBF CSTRKFLG,ASGRET«, t00=0x0003, t01=0x0146}
0x060e…063c Head {h00=0x002a, h01=0x0050, text=» PERF ASSG,CBIN1,DK07,CBIN7 INDEX FILE«, t00=0x0003, t01=0x0162}
0x063c…0650 Head {h00=0x0010, h01=0x0050, text=» BNOK ASGRET«, t00=0x0003, t01=0x0190}
0x0650…067c Head {h00=0x0028, h01=0x0050, text=» PERF ASSG,CBIN1,DK08,CBIN8 STAM REG«, t00=0x0004, t01=0x0014}
0x067c…0690 Head {h00=0x0010, h01=0x0050, text=» BNOK ASGRET«, t00=0x0004, t01=0x0040}
0x0690…06bc Head {h00=0x0028, h01=0x0050, text=» PERF ASSG,CBIN1,DK09,CBIN9 VAR REG «, t00=0x0004, t01=0x0054}
0x06bc…06d0 Head {h00=0x0010, h01=0x0050, text=» BNOK ASGRET«, t00=0x0004, t01=0x0080}
0x06d0…06ec Head {h00=0x0018, h01=0x0050, text=» TBF CBUDTFLG,ASGRET«, t00=0x0004, t01=0x0094}
0x06ec…071a Head {h00=0x002a, h01=0x0050, text=» PERF ASSG,CBIN1,DK10,CBIN10 POST REG «, t00=0x0004, t01=0x00b0}
0x071a…072e Head {h00=0x0010, h01=0x0050, text=» BNOK ASGRET«, t00=0x0004, t01=0x00de}
0x072e…0740 Head {h00=0x000e, h01=0x0050, text=» B ASGRET «, t00=0x0004, t01=0x00f2}
0x0740…074a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0104}
0x074a…0776 Head {h00=0x0028, h01=0x0050, text=»ASG200 ASSIGN ALL FILES - VOLUME 2«, t00=0x0004, t01=0x010e}
0x0776…07a6 Head {h00=0x002c, h01=0x0050, text=» PERF ASSG,CBIN2,DK02,CBIN2 REG DATASET «, t00=0x0004, t01=0x013a}
0x07a6…07b8 Head {h00=0x000e, h01=0x0050, text=» B ASGRET «, t00=0x0004, t01=0x016a}
0x07b8…07c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x017c}
0x07c2…07ee Head {h00=0x0028, h01=0x0050, text=»ASG300 ASSIGN ALL FILES - VOLUME 3«, t00=0x0004, t01=0x0186}
0x07ee…07fe Head {h00=0x000c, h01=0x0050, text=» B ASGOK«, t00=0x0005, t01=0x0022}
0x07fe…0808 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0032}
0x0808…0834 Head {h00=0x0028, h01=0x0050, text=»ASG400 ASSIGN ALL FILES - VOLUME 4«, t00=0x0005, t01=0x003c}
0x0834…0844 Head {h00=0x000c, h01=0x0050, text=» B ASGOK«, t00=0x0005, t01=0x0068}
0x0844…084e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0078}
0x084e…085c Head {h00=0x000a, h01=0x0050, text=»ASGNOK«, t00=0x0005, t01=0x0082}
0x085c…0874 Head {h00=0x0014, h01=0x0050, text=» CMP CBIN1,CBIN0«, t00=0x0005, t01=0x0090}
0x0874…0880 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0005, t01=0x00a8}
0x0880…088a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00b4}
0x088a…0898 Head {h00=0x000a, h01=0x0050, text=»ASGOK «, t00=0x0005, t01=0x00be}
0x0898…08b0 Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x0005, t01=0x00cc}
0x08b0…08be Head {h00=0x000a, h01=0x0050, text=»ASGRET«, t00=0x0005, t01=0x00e4}
0x08be…08ca Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0005, t01=0x00f2}
0x08ca…08d8 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0005, t01=0x00fe}
0x08d8…08e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x010c}
0x08e2…08f0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x0116}
0x08f0…0908 Head {h00=0x0014, h01=0x0050, text=»CLSVOL PROC VOL «, t00=0x0005, t01=0x0124}
0x0908…0924 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0005, t01=0x013c}
0x0924…092e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0158}
0x092e…095c Head {h00=0x002a, h01=0x0050, text=»* CLOSE ROUTINE - PER VOLUME «, t00=0x0005, t01=0x0162}
0x095c…0966 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0190}
0x0966…099e Head {h00=0x0034, h01=0x0050, text=»* CLOSES ALL FILES ON SPECIFIED VOLUME «, t00=0x0006, t01=0x000a}
0x099e…09a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0042}
0x09a8…09e0 Head {h00=0x0034, h01=0x0050, text=»* CALL: PERF CLSVOL,<VOLUME NUMBER>«, t00=0x0006, t01=0x004c}
0x09e0…09ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0084}
0x09ea…0a06 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0006, t01=0x008e}
0x0a06…0a10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00aa}
0x0a10…0a24 Head {h00=0x0010, h01=0x0050, text=» IB VOL, C «, t00=0x0006, t01=0x00b4}
0x0a24…0a4a Head {h00=0x0022, h01=0x0050, text=» CLS100,CLS200,CLS300,CLS400 «, t00=0x0006, t01=0x00c8}
0x0a4a…0a5c Head {h00=0x000e, h01=0x0050, text=» B CLSRET «, t00=0x0006, t01=0x00ee}
0x0a5c…0a66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0100}
0x0a66…0a92 Head {h00=0x0028, h01=0x0050, text=»CLS100 CLOSE ALL FILES - VOLUME 1 «, t00=0x0006, t01=0x010a}
0x0a92…0aaa Head {h00=0x0014, h01=0x0050, text=» DSC0 DK01,CLOSE«, t00=0x0006, t01=0x0136}
0x0aaa…0ac2 Head {h00=0x0014, h01=0x0050, text=» DSC0 DK02,CLOSE«, t00=0x0006, t01=0x014e}
0x0ac2…0ada Head {h00=0x0014, h01=0x0050, text=» DSC0 DK04,CLOSE«, t00=0x0006, t01=0x0166}
0x0ada…0af6 Head {h00=0x0018, h01=0x0050, text=» TBF CGLREGFL,CLS150«, t00=0x0006, t01=0x017e}
0x0af6…0b0e Head {h00=0x0014, h01=0x0050, text=» DSC0 DK05,CLOSE«, t00=0x0007, t01=0x000a}
0x0b0e…0b1c Head {h00=0x000a, h01=0x0050, text=»CLS150«, t00=0x0007, t01=0x0022}
0x0b1c…0b38 Head {h00=0x0018, h01=0x0050, text=» TBF CTEXTFLG,CLS190«, t00=0x0007, t01=0x0030}
0x0b38…0b50 Head {h00=0x0014, h01=0x0050, text=» DSC0 DK06,CLOSE«, t00=0x0007, t01=0x004c}
0x0b50…0b6c Head {h00=0x0018, h01=0x0050, text=» TBF CSTRKFLG,CLS190«, t00=0x0007, t01=0x0064}
0x0b6c…0b84 Head {h00=0x0014, h01=0x0050, text=» DSC0 DK07,CLOSE«, t00=0x0007, t01=0x0080}
0x0b84…0b9c Head {h00=0x0014, h01=0x0050, text=» DSC0 DK08,CLOSE«, t00=0x0007, t01=0x0098}
0x0b9c…0bb4 Head {h00=0x0014, h01=0x0050, text=» DSC0 DK09,CLOSE«, t00=0x0007, t01=0x00b0}
0x0bb4…0bd0 Head {h00=0x0018, h01=0x0050, text=» TBF CBUDTFLG,CLS190«, t00=0x0007, t01=0x00c8}
0x0bd0…0be8 Head {h00=0x0014, h01=0x0050, text=» DSC0 DK10,CLOSE«, t00=0x0007, t01=0x00e4}
0x0be8…0bf6 Head {h00=0x000a, h01=0x0050, text=»CLS190«, t00=0x0007, t01=0x00fc}
0x0bf6…0c0e Head {h00=0x0014, h01=0x0050, text=» DSC0 FD01,UNLOD«, t00=0x0007, t01=0x010a}
0x0c0e…0c20 Head {h00=0x000e, h01=0x0050, text=» B CLSRET «, t00=0x0007, t01=0x0122}
0x0c20…0c2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0134}
0x0c2a…0c56 Head {h00=0x0028, h01=0x0050, text=»CLS200 CLOSE ALL FILES - VOLUME 2 «, t00=0x0007, t01=0x013e}
0x0c56…0c6e Head {h00=0x0014, h01=0x0050, text=» DSC0 DK02,CLOSE«, t00=0x0007, t01=0x016a}
0x0c6e…0c86 Head {h00=0x0014, h01=0x0050, text=» DSC0 FD02,UNLOD«, t00=0x0007, t01=0x0182}
0x0c86…0c98 Head {h00=0x000e, h01=0x0050, text=» B CLSRET «, t00=0x0008, t01=0x000a}
0x0c98…0ca2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x001c}
0x0ca2…0cce Head {h00=0x0028, h01=0x0050, text=»CLS300 CLOSE ALL FILES - VOLUME 3 «, t00=0x0008, t01=0x0026}
0x0cce…0ce0 Head {h00=0x000e, h01=0x0050, text=» B CLSRET «, t00=0x0008, t01=0x0052}
0x0ce0…0cea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0064}
0x0cea…0d16 Head {h00=0x0028, h01=0x0050, text=»CLS400 CLOSE ALL FILES - VOLUME 4 «, t00=0x0008, t01=0x006e}
0x0d16…0d28 Head {h00=0x000e, h01=0x0050, text=» B CLSRET «, t00=0x0008, t01=0x009a}
0x0d28…0d32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00ac}
0x0d32…0d40 Head {h00=0x000a, h01=0x0050, text=»CLSRET«, t00=0x0008, t01=0x00b6}
0x0d40…0d4c Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0008, t01=0x00c4}
0x0d4c…0d5a Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0008, t01=0x00d0}
0x0d5a…0d64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00de}
0x0d64…0d72 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x00e8}
0x0d72…0d86 Head {h00=0x0010, h01=0x0050, text=»CYLINE PROC «, t00=0x0008, t01=0x00f6}
0x0d86…0da2 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0008, t01=0x010a}
0x0da2…0dac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0126}
0x0dac…0dde Head {h00=0x002e, h01=0x0050, text=»* WRITE ONE LINE TO CYCLE DATASET«, t00=0x0008, t01=0x0130}
0x0dde…0de8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0162}
0x0de8…0e20 Head {h00=0x0034, h01=0x0050, text=»* ON ENTRY DATA IN SEPARATE FIELDS «, t00=0x0008, t01=0x016c}
0x0e20…0e2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0014}
0x0e2a…0e68 Head {h00=0x003a, h01=0x0050, text=»* ON EXIT CR= OK DATA WRITTEN TO CYSET «, t00=0x0009, t01=0x001e}
0x0e68…0eaa Head {h00=0x003e, h01=0x0050, text=»* CR=NOK DATA NOT WRITTEN TO CYSET «, t00=0x0009, t01=0x005c}
0x0eaa…0edc Head {h00=0x002e, h01=0x0050, text=»* E.G. ERROR ON DISK«, t00=0x0009, t01=0x009e}
0x0edc…0f0e Head {h00=0x002e, h01=0x0050, text=»* DATASET FULL «, t00=0x0009, t01=0x00d0}
0x0f0e…0f4e Head {h00=0x003c, h01=0x0050, text=»* WAITED TOO LONG FOR BUFFER «, t00=0x0009, t01=0x0102}
0x0f4e…0f58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0142}
0x0f58…0f74 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0009, t01=0x014c}
0x0f74…0f92 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,CCYSIZE «, t00=0x0009, t01=0x0168}
0x0f92…0fae Head {h00=0x0018, h01=0x0050, text=» MUL GSWBIN1,TTASKNR«, t00=0x0009, t01=0x0186}
0x0fae…0fd4 Head {h00=0x0022, h01=0x0050, text=» CBNL GTCYOUT,GSWBIN1,CYLINNOK«, t00=0x000a, t01=0x0012}
0x0fd4…0ff0 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'32'«, t00=0x000a, t01=0x0038}
0x0ff0…1000 Head {h00=0x000c, h01=0x0050, text=»CYLIN000«, t00=0x000a, t01=0x0054}
0x1000…102e Head {h00=0x002a, h01=0x0050, text=» TBF CCYPFLG,CYLIN010 WAIT FOR BUFFER «, t00=0x000a, t01=0x0064}
0x102e…1042 Head {h00=0x0010, h01=0x0050, text=» DELAY CBIN2«, t00=0x000a, t01=0x0092}
0x1042…105c Head {h00=0x0016, h01=0x0050, text=» SUB GSWBIN1,CBIN2«, t00=0x000a, t01=0x00a6}
0x105c…1080 Head {h00=0x0020, h01=0x0050, text=» CBL GSWBIN1,CBIN0,CYLINNOK «, t00=0x000a, t01=0x00c0}
0x1080…1094 Head {h00=0x0010, h01=0x0050, text=» B CYLIN000 «, t00=0x000a, t01=0x00e4}
0x1094…109e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00f8}
0x109e…10ae Head {h00=0x000c, h01=0x0050, text=»CYLIN010«, t00=0x000a, t01=0x0102}
0x10ae…10d2 Head {h00=0x0020, h01=0x0050, text=» SET CCYPFLG RESERVE BUFFER «, t00=0x000a, t01=0x0112}
0x10d2…10fa Head {h00=0x0024, h01=0x0050, text=» MOVE CCYBUF,=X'00' CLEAR BUFFER«, t00=0x000a, t01=0x0136}
0x10fa…1118 Head {h00=0x001a, h01=0x0050, text=» EDIT CCYBUF,GTSTRFMT «, t00=0x000a, t01=0x015e}
0x1118…1146 Head {h00=0x002a, h01=0x0050, text=» PERF RAWRIT,DK03,=D'3',CCYBUF,GTCYOUT«, t00=0x000a, t01=0x017c}
0x1146…115c Head {h00=0x0012, h01=0x0050, text=» BNOK CYLIN100«, t00=0x000b, t01=0x001a}
0x115c…1176 Head {h00=0x0016, h01=0x0050, text=» ADD GTCYOUT,CBIN1«, t00=0x000b, t01=0x0030}
0x1176…119c Head {h00=0x0022, h01=0x0050, text=» CLEAR CCYPFLG RELEASE BUFFER «, t00=0x000b, t01=0x004a}
0x119c…11b4 Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x000b, t01=0x0070}
0x11b4…11c0 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000b, t01=0x0088}
0x11c0…11ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0094}
0x11ca…11da Head {h00=0x000c, h01=0x0050, text=»CYLIN100«, t00=0x000b, t01=0x009e}
0x11da…1200 Head {h00=0x0022, h01=0x0050, text=» CLEAR CCYPFLG RELEASE BUFFER «, t00=0x000b, t01=0x00ae}
0x1200…1210 Head {h00=0x000c, h01=0x0050, text=»CYLINNOK«, t00=0x000b, t01=0x00d4}
0x1210…1228 Head {h00=0x0014, h01=0x0050, text=» CMP CBIN1,CBIN0«, t00=0x000b, t01=0x00e4}
0x1228…1234 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000b, t01=0x00fc}
0x1234…1242 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000b, t01=0x0108}
0x1242…124c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0116}
0x124c…125a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x0120}
0x125a…126c Head {h00=0x000e, h01=0x0050, text=»CYOUT PROC«, t00=0x000b, t01=0x012e}
0x126c…1288 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000b, t01=0x0140}
0x1288…1292 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x015c}
0x1292…12ca Head {h00=0x0034, h01=0x0050, text=»* WRITE OUT THE WHOLE CONTENT OF CYSET «, t00=0x000b, t01=0x0166}
0x12ca…12f2 Head {h00=0x0024, h01=0x0050, text=»* (LESS THAN ONE PAGE) «, t00=0x000c, t01=0x000e}
0x12f2…12fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0036}
0x12fc…1318 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000c, t01=0x0040}
0x1318…1336 Head {h00=0x001a, h01=0x0050, text=» TBT GTCYWRTF,CYOUT050«, t00=0x000c, t01=0x005c}
0x1336…1354 Head {h00=0x001a, h01=0x0050, text=» TBT TTTSTFLG,CYOUT005«, t00=0x000c, t01=0x007a}
0x1354…136a Head {h00=0x0012, h01=0x0050, text=» SET TTTSTFLG «, t00=0x000c, t01=0x0098}
0x136a…138a Head {h00=0x001c, h01=0x0050, text=» PERF SPLIN8,CBIN5,CBIN2«, t00=0x000c, t01=0x00ae}
0x138a…139e Head {h00=0x0010, h01=0x0050, text=» PERF GRASPV«, t00=0x000c, t01=0x00ce}
0x139e…13b2 Head {h00=0x0010, h01=0x0050, text=» PERF CLEAR8«, t00=0x000c, t01=0x00e2}
0x13b2…13c2 Head {h00=0x000c, h01=0x0050, text=»CYOUT005«, t00=0x000c, t01=0x00f6}
0x13c2…13e0 Head {h00=0x001a, h01=0x0050, text=» MOVE TTLINNR,TTCYKPOS«, t00=0x000c, t01=0x0106}
0x13e0…13fe Head {h00=0x001a, h01=0x0050, text=» TBF GTCYTRPF,CYOUT010«, t00=0x000c, t01=0x0124}
0x13fe…1434 Head {h00=0x0032, h01=0x0050, text=» SUB GTCYOUT,CBIN1 ADJUST FOR TRP LINE, -TOTAL«, t00=0x000c, t01=0x0142}
0x1434…1444 Head {h00=0x000c, h01=0x0050, text=»CYOUT010«, t00=0x000c, t01=0x0178}
0x1444…1462 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,TTLINNR «, t00=0x000c, t01=0x0188}
0x1462…1482 Head {h00=0x001c, h01=0x0050, text=» DSC1 KVOUCH,POS,GSWBIN1«, t00=0x000d, t01=0x0016}
0x1482…14a8 Head {h00=0x0022, h01=0x0050, text=» CBNL GTCYIN,GTCYOUT,CYOUT050 «, t00=0x000d, t01=0x0036}
0x14a8…14ba Head {h00=0x000e, h01=0x0050, text=» PERF CYRD«, t00=0x000d, t01=0x005c}
0x14ba…14d4 Head {h00=0x0016, h01=0x0050, text=» SUB TTLINNR,=D'2'«, t00=0x000d, t01=0x006e}
0x14d4…14e8 Head {h00=0x0010, h01=0x0050, text=» WAIT KVOUCH«, t00=0x000d, t01=0x0088}
0x14e8…14fc Head {h00=0x0010, h01=0x0050, text=» B CYOUT010 «, t00=0x000d, t01=0x009c}
0x14fc…1506 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00b0}
0x1506…1516 Head {h00=0x000c, h01=0x0050, text=»CYOUT050«, t00=0x000d, t01=0x00ba}
0x1516…1522 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000d, t01=0x00ca}
0x1522…1530 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000d, t01=0x00d6}
0x1530…153a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00e4}
0x153a…1548 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x00ee}
0x1548…155a Head {h00=0x000e, h01=0x0050, text=»CYWRT PROC«, t00=0x000d, t01=0x00fc}
0x155a…1576 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000d, t01=0x010e}
0x1576…1580 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x012a}
0x1580…15b0 Head {h00=0x002c, h01=0x0050, text=»* WRITE A LINE ON CYCLE DATASET«, t00=0x000d, t01=0x0134}
0x15b0…15ee Head {h00=0x003a, h01=0x0050, text=»* IN NOK EMPTY THE CYCLE DATASET TO VOUCHER «, t00=0x000d, t01=0x0164}
0x15ee…1622 Head {h00=0x0030, h01=0x0050, text=»* AND WRITE LINE TO VOUCHER«, t00=0x000e, t01=0x0012}
0x1622…162c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0046}
0x162c…1648 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000e, t01=0x0050}
0x1648…1670 Head {h00=0x0024, h01=0x0050, text=» PERF CYLINE WRITE LINE TO CYSET«, t00=0x000e, t01=0x006c}
0x1670…1686 Head {h00=0x0012, h01=0x0050, text=» BNOK CYWRT100«, t00=0x000e, t01=0x0094}
0x1686…16a0 Head {h00=0x0016, h01=0x0050, text=» SUB TTLINNR,=D'2'«, t00=0x000e, t01=0x00aa}
0x16a0…16d0 Head {h00=0x002c, h01=0x0050, text=» CBL TTLINNR,=D'4',CYWRT010 IF PAGE FULL«, t00=0x000e, t01=0x00c4}
0x16d0…16ec Head {h00=0x0018, h01=0x0050, text=» CMP CBIN0,CBIN0 OK «, t00=0x000e, t01=0x00f4}
0x16ec…16f8 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000e, t01=0x0110}
0x16f8…1702 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x011c}
0x1702…1712 Head {h00=0x000c, h01=0x0050, text=»CYWRT010«, t00=0x000e, t01=0x0126}
0x1712…173a Head {h00=0x0024, h01=0x0050, text=» MOVE GSWSTR9,=C'TRP ' NEW PAGE «, t00=0x000e, t01=0x0136}
0x173a…1754 Head {h00=0x0016, h01=0x0050, text=» PERF FRMXVO,CBIN2«, t00=0x000e, t01=0x015e}
0x1754…1768 Head {h00=0x0010, h01=0x0050, text=» PERF CYLINE«, t00=0x000e, t01=0x0178}
0x1768…178c Head {h00=0x0020, h01=0x0050, text=» SET GTCYTRPF INITIATE PRINT«, t00=0x000e, t01=0x018c}
0x178c…17a8 Head {h00=0x0018, h01=0x0050, text=» CMP CBIN0,CBIN0 OK «, t00=0x000f, t01=0x0020}
0x17a8…17b4 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000f, t01=0x003c}
0x17b4…17be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0048}
0x17be…17ce Head {h00=0x000c, h01=0x0050, text=»CYWRT100«, t00=0x000f, t01=0x0052}
0x17ce…17e2 Head {h00=0x0010, h01=0x0050, text=» PERF CYOUT «, t00=0x000f, t01=0x0062}
0x17e2…17f8 Head {h00=0x0012, h01=0x0050, text=» SET GTCYWRTF «, t00=0x000f, t01=0x0076}
0x17f8…1810 Head {h00=0x0014, h01=0x0050, text=» CMP CBIN1,CBIN0«, t00=0x000f, t01=0x008c}
0x1810…181c Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000f, t01=0x00a4}
0x181c…182a Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000f, t01=0x00b0}
0x182a…1834 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00be}
0x1834…1842 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x00c8}
0x1842…1854 Head {h00=0x000e, h01=0x0050, text=»CYRD PROC «, t00=0x000f, t01=0x00d6}
0x1854…1870 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000f, t01=0x00e8}
0x1870…187a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0104}
0x187a…18b2 Head {h00=0x0034, h01=0x0050, text=»* READ ONE LINE FROM CYCLE DATASET AND «, t00=0x000f, t01=0x010e}
0x18b2…18d8 Head {h00=0x0022, h01=0x0050, text=»* WRITE IT TO VOUCHER«, t00=0x000f, t01=0x0146}
0x18d8…18e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x016c}
0x18e2…191e Head {h00=0x0038, h01=0x0050, text=»* VOUCHER SHOULD BE POSITIONED BEFORE PRINT«, t00=0x000f, t01=0x0176}
0x191e…1928 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0022}
0x1928…1944 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0010, t01=0x002c}
0x1944…1954 Head {h00=0x000c, h01=0x0050, text=»CYRD000 «, t00=0x0010, t01=0x0048}
0x1954…1970 Head {h00=0x0018, h01=0x0050, text=» TBF CCYPFLG,CYRD010«, t00=0x0010, t01=0x0058}
0x1970…199a Head {h00=0x0026, h01=0x0050, text=» DELAY CBIN2 WAIT FOR CYCLE BUFFER«, t00=0x0010, t01=0x0074}
0x199a…19ac Head {h00=0x000e, h01=0x0050, text=» B CYRD000«, t00=0x0010, t01=0x009e}
0x19ac…19bc Head {h00=0x000c, h01=0x0050, text=»CYRD010 «, t00=0x0010, t01=0x00b0}
0x19bc…19e6 Head {h00=0x0026, h01=0x0050, text=» SET CCYPFLG RESERVE CYCLE BUFFER «, t00=0x0010, t01=0x00c0}
0x19e6…1a0e Head {h00=0x0024, h01=0x0050, text=» MOVE GSWBIN1,=W'128' SET LENGTH«, t00=0x0010, t01=0x00ea}
0x1a0e…1a44 Head {h00=0x0032, h01=0x0050, text=» PERF RAREAD,DK03,=D'3',CCYBUF,GSWBIN1,GTCYIN «, t00=0x0010, t01=0x0112}
0x1a44…1a5a Head {h00=0x0012, h01=0x0050, text=» BNOK CYRDNOK «, t00=0x0010, t01=0x0148}
0x1a5a…1a7a Head {h00=0x001c, h01=0x0050, text=» EDWRT .NW,KVOUCH,CYEDT «, t00=0x0010, t01=0x015e}
0x1a7a…1a90 Head {h00=0x0012, h01=0x0050, text=» CLEAR CCYPFLG«, t00=0x0010, t01=0x017e}
0x1a90…1aa2 (17, 0, 400) Head {h00=0x000e, h01=0x0050, text=» B CYRD100«, t00=0x0011, t01=0x0004}
0x1aa2…1ab2 Head {h00=0x000c, h01=0x0050, text=»CYRDNOK «, t00=0x0011, t01=0x0016}
0x1ab2…1acc Head {h00=0x0016, h01=0x0050, text=» ADD GTCYIN,CBIN1 «, t00=0x0011, t01=0x0026}
0x1acc…1ae2 Head {h00=0x0012, h01=0x0050, text=» CLEAR CCYPFLG«, t00=0x0011, t01=0x0040}
0x1ae2…1af4 Head {h00=0x000e, h01=0x0050, text=» PERF CRVO«, t00=0x0011, t01=0x0056}
0x1af4…1b10 Head {h00=0x0018, h01=0x0050, text=» CMP CBIN1,CBIN0 NOK«, t00=0x0011, t01=0x0068}
0x1b10…1b1c Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0011, t01=0x0084}
0x1b1c…1b26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0090}
0x1b26…1b36 Head {h00=0x000c, h01=0x0050, text=»CYRD100 «, t00=0x0011, t01=0x009a}
0x1b36…1b4a Head {h00=0x0010, h01=0x0050, text=» WAIT KVOUCH«, t00=0x0011, t01=0x00aa}
0x1b4a…1b5c Head {h00=0x000e, h01=0x0050, text=» PERF CRVO«, t00=0x0011, t01=0x00be}
0x1b5c…1b76 Head {h00=0x0016, h01=0x0050, text=» ADD GTCYIN,CBIN1 «, t00=0x0011, t01=0x00d0}
0x1b76…1b92 Head {h00=0x0018, h01=0x0050, text=» CMP CBIN0,CBIN0 OK «, t00=0x0011, t01=0x00ea}
0x1b92…1b9e Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0011, t01=0x0106}
0x1b9e…1bac Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0011, t01=0x0112}
0x1bac…1bb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0120}
0x1bb6…1bc0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x012a}
0x1bc0…1bd2 Head {h00=0x000e, h01=0x0050, text=»CYEDT FRMT«, t00=0x0011, t01=0x0134}
0x1bd2…1be8 Head {h00=0x0012, h01=0x0050, text=» FCOPY CCYBUF «, t00=0x0011, t01=0x0146}
0x1be8…1bf6 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0011, t01=0x015c}
0x1bf6…1c00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x016a}
0x1c00…1c0e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x0174}
0x1c0e…1c20 Head {h00=0x000e, h01=0x0050, text=»CYTRP PROC«, t00=0x0011, t01=0x0182}
0x1c20…1c3c (18, 0, 398) Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0012, t01=0x0004}
0x1c3c…1c46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0020}
0x1c46…1c6c Head {h00=0x0022, h01=0x0050, text=»* PRINT A WHOLE PAGE «, t00=0x0012, t01=0x002a}
0x1c6c…1c76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0050}
0x1c76…1cb0 Head {h00=0x0036, h01=0x0050, text=»* AND WRITE TRANSPORT LINE FIRST ON CYSET«, t00=0x0012, t01=0x005a}
0x1cb0…1cba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0094}
0x1cba…1cd6 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0012, t01=0x009e}
0x1cd6…1cf4 Head {h00=0x001a, h01=0x0050, text=» TBF GTCYTRPF,CYTRP200«, t00=0x0012, t01=0x00ba}
0x1cf4…1d24 Head {h00=0x002c, h01=0x0050, text=» TBT GTCYWRTF,CYTRP100 T=ALREADY WRITTEN«, t00=0x0012, t01=0x00d8}
0x1d24…1d3c Head {h00=0x0014, h01=0x0050, text=» CLEAR GTCYTRPF «, t00=0x0012, t01=0x0108}
0x1d3c…1d54 Head {h00=0x0014, h01=0x0050, text=» CLEAR TTTSTFLG «, t00=0x0012, t01=0x0120}
0x1d54…1d68 Head {h00=0x0010, h01=0x0050, text=» PERF CYOUT «, t00=0x0012, t01=0x0138}
0x1d68…1d7c Head {h00=0x0010, h01=0x0050, text=» WAIT KVOUCH«, t00=0x0012, t01=0x014c}
0x1d7c…1d9a Head {h00=0x001a, h01=0x0050, text=» DSC0 .NW,KVOUCH,RLEAS«, t00=0x0012, t01=0x0160}
0x1d9a…1db2 Head {h00=0x0014, h01=0x0050, text=» CLEAR TTTSTFLG «, t00=0x0012, t01=0x017e}
0x1db2…1dd0 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR9,=C'TRP '«, t00=0x0013, t01=0x0008}
0x1dd0…1dea Head {h00=0x0016, h01=0x0050, text=» PERF FRMXVO,CBIN2«, t00=0x0013, t01=0x0026}
0x1dea…1e06 Head {h00=0x0018, h01=0x0050, text=» MOVE GTCYIN,TTASKNR«, t00=0x0013, t01=0x0040}
0x1e06…1e20 Head {h00=0x0016, h01=0x0050, text=» SUB GTCYIN,CBIN1 «, t00=0x0013, t01=0x005c}
0x1e20…1e3c Head {h00=0x0018, h01=0x0050, text=» MUL GTCYIN,CCYSIZE «, t00=0x0013, t01=0x0076}
0x1e3c…1e56 Head {h00=0x0016, h01=0x0050, text=» ADD GTCYIN,CBIN1 «, t00=0x0013, t01=0x0092}
0x1e56…1e72 Head {h00=0x0018, h01=0x0050, text=» MOVE GTCYOUT,GTCYIN«, t00=0x0013, t01=0x00ac}
0x1e72…1e90 Head {h00=0x001a, h01=0x0050, text=» MOVE TTLINNR,TTCYKST «, t00=0x0013, t01=0x00c8}
0x1e90…1eae Head {h00=0x001a, h01=0x0050, text=» MOVE TTCYKPOS,TTLINNR«, t00=0x0013, t01=0x00e6}
0x1eae…1ec2 Head {h00=0x0010, h01=0x0050, text=» PERF CYLINE«, t00=0x0013, t01=0x0104}
0x1ec2…1ed8 Head {h00=0x0012, h01=0x0050, text=» BNOK CYTRP100«, t00=0x0013, t01=0x0118}
0x1ed8…1eec Head {h00=0x0010, h01=0x0050, text=» B CYTRP150 «, t00=0x0013, t01=0x012e}
0x1eec…1ef6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0142}
0x1ef6…1f06 Head {h00=0x000c, h01=0x0050, text=»CYTRP100«, t00=0x0013, t01=0x014c}
0x1f06…1f1e Head {h00=0x0014, h01=0x0050, text=» CLEAR GTCYTRPF «, t00=0x0013, t01=0x015c}
0x1f1e…1f34 Head {h00=0x0012, h01=0x0050, text=» SET GTCYWRTF «, t00=0x0013, t01=0x0174}
0x1f34…1f66 Head {h00=0x002e, h01=0x0050, text=» PERF SPLIN8,CBIN3,CBIN2 ASK FOR 'NY SIDE'«, t00=0x0013, t01=0x018a}
0x1f66…1f80 Head {h00=0x0016, h01=0x0050, text=» PERF GRASPV GRASP«, t00=0x0014, t01=0x002c}
0x1f80…1f9e Head {h00=0x001a, h01=0x0050, text=» MOVE TTCYKPOS,TTCYKST«, t00=0x0014, t01=0x0046}
0x1f9e…1fcc Head {h00=0x002a, h01=0x0050, text=» MOVE TTLINNR,TTCYKST POSITION VOUCHER«, t00=0x0014, t01=0x0064}
0x1fcc…1fea Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,TTLINNR «, t00=0x0014, t01=0x0092}
0x1fea…200a Head {h00=0x001c, h01=0x0050, text=» DSC1 KVOUCH,POS,GSWBIN1«, t00=0x0014, t01=0x00b0}
0x200a…203e Head {h00=0x0030, h01=0x0050, text=» MOVE GSWSTR9,=C'TRP ' SET UP TRANSPORT LINE«, t00=0x0014, t01=0x00d0}
0x203e…2058 Head {h00=0x0016, h01=0x0050, text=» PERF FRMXVO,CBIN2«, t00=0x0014, t01=0x0104}
0x2058…2086 Head {h00=0x002a, h01=0x0050, text=» EDWRT KVOUCH,GTSTRFMT WRITE TRP LINE «, t00=0x0014, t01=0x011e}
0x2086…2090 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x014c}
0x2090…20a0 Head {h00=0x000c, h01=0x0050, text=»CYTRP150«, t00=0x0014, t01=0x0156}
0x20a0…20ba Head {h00=0x0016, h01=0x0050, text=» SUB TTLINNR,=D'2'«, t00=0x0014, t01=0x0166}
0x20ba…20ca Head {h00=0x000c, h01=0x0050, text=»CYTRP200«, t00=0x0014, t01=0x0180}
0x20ca…20d6 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0014, t01=0x0190}
0x20d6…20e4 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0015, t01=0x000c}
0x20e4…20ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x001a}
0x20ee…20fa Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0015, t01=0x0024}
0x20fa…20fe Head {h00=0x4004, h01=0x0000}
0x20fe…2102 00 15 00 30 ┆ 0┆
0x2102…210a (22, 1, 8) 20 04 00 00 00 16 00 04 ┆ ┆
0x210a…215a (23, 2, 104) 00 1a 00 1a 00 1a 00 1a 00 1a 00 1a 00 1a 00 1a 00 01 00 1e 01 7c 00 20 00 1c 03 0d 00 00 00 d3 00 00 00 02 00 03 00 04 00 05 00 01 00 05 00 06 00 06 00 05 00 00 00 1f 00 1a 00 10 00 0c 04 05 00 00 00 01 00 e6 00 03 00 00 00 1f 00 3e 00 0e ┆ | > ┆
0x215a…2172 00 0a 07 04 00 00 00 d3 00 e6 00 00 00 1f 00 52 40 04 00 00 00 1f 00 64 ┆ R@ d┆
0x2172…21c2 (24, 2, 240) 00 3a 00 48 20 49 44 45 4e 54 20 44 3a 43 42 32 30 20 20 54 52 41 20 34 2e 32 20 20 38 30 2d 30 33 2d 31 38 20 46 32 20 4f 32 32 32 32 20 20 30 33 2e 30 31 2e 58 58 58 2e 31 00 20 00 04 00 0e 00 0a 01 04 c8 44 3a 43 42 32 30 00 00 20 00 42 ┆ : H IDENT D:CB20 TRA 4.2 80-03-18 F2 O2222 03.01.XXX.1 D:CB20 B┆
0x21c2…2212 00 10 00 0c 05 05 c8 44 3a 43 42 32 30 43 00 02 00 20 00 54 00 2a 00 26 03 12 00 00 00 01 00 00 00 42 20 02 00 00 20 02 00 02 20 02 00 04 20 02 00 06 20 02 00 08 20 02 00 0a 20 02 00 0c 00 20 00 68 00 2a 00 26 03 12 00 00 00 1f 00 00 20 02 ┆ D:CB20C T * & B h * & ┆
0x2212…2262 00 0e 20 02 00 10 20 02 00 12 20 02 00 14 20 02 00 16 a0 02 00 18 00 5a 00 00 a0 02 00 20 00 96 00 12 00 0e 03 06 00 00 00 3d 00 00 00 cc 00 0b 00 00 00 20 00 c4 00 0e 00 0a 07 04 00 00 00 1f 00 42 00 00 00 20 00 da 40 04 00 00 00 20 00 ec ┆ Z = B @ ┆
0x2262…22b2 (25, 0, 400) 00 3a 00 48 20 49 44 45 4e 54 20 43 3a 43 42 33 30 20 20 54 52 41 20 34 2e 32 20 20 38 30 2d 30 33 2d 31 38 20 46 32 20 4f 32 32 32 32 20 20 30 33 2e 30 31 2e 58 58 58 2e 31 00 21 00 04 00 0e 00 0a 01 04 c8 43 3a 43 42 33 30 00 00 21 00 42 ┆ : H IDENT C:CB30 TRA 4.2 80-03-18 F2 O2222 03.01.XXX.1 ! C:CB30 ! B┆
0x22b2…2302 00 10 00 0c 05 05 c8 43 3a 43 42 33 30 43 00 04 00 21 00 54 00 2a 00 26 03 12 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 38 00 36 00 02 ff 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 21 00 68 00 2a 00 26 03 12 00 00 00 1f 00 00 00 00 ┆ C:CB30C ! T * & 8 6 ! h * & ┆
0x2302…2352 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 21 00 96 00 2a 00 26 03 12 00 00 00 3d 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 21 00 c4 00 2a ┆ ! * & = ! *┆
0x2352…23a2 00 26 03 12 00 00 00 5b 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 21 00 f2 00 2a 00 26 03 12 00 00 00 79 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 ┆ & [ ! * & y ┆
0x23a2…23f2 00 00 00 00 00 00 00 21 01 20 00 2a 00 26 03 12 00 00 00 97 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 21 01 4e 00 2a 00 26 03 12 00 00 00 b5 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ! * & ! N * & ┆
0x23f2…2442 (26, 0, 400) 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 21 01 7c 00 2a 00 26 03 12 00 00 00 d3 00 00 00 00 00 ff 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 22 00 1a 00 2a 00 26 03 12 00 00 00 f1 00 00 ┆ ! | * & " * & ┆
0x2442…2492 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 22 00 48 00 2a 00 26 03 12 00 00 01 0f 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 22 00 76 ┆ " H * & " v┆
0x2492…24e2 00 2a 00 26 03 12 00 00 01 2d 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 22 00 a4 00 2a 00 26 03 12 00 00 01 4b 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ * & - " * & K ┆
0x24e2…2532 00 00 00 00 00 00 00 00 00 22 00 d2 00 2a 00 26 03 12 00 00 01 69 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 22 01 00 00 2a 00 26 03 12 00 00 01 87 00 00 00 00 00 00 00 00 00 00 00 00 ┆ " * & i " * & ┆
0x2532…2582 00 00 00 00 00 00 00 00 00 00 00 00 ff 00 00 00 00 00 00 00 00 22 01 2e 00 2a 00 26 03 12 00 00 01 a5 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 22 01 5c 00 2a 00 26 03 12 00 00 01 c3 ┆ " . * & " * & ┆
0x2582…25d2 (27, 0, 400) 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 22 01 8a 00 2a 00 26 03 12 00 00 01 e1 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 23 ┆ " * & #┆
0x25d2…2622 00 28 00 2a 00 26 03 12 00 00 01 ff 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 23 00 56 00 2a 00 26 03 12 00 00 02 1d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ( * & # V * & ┆
0x2622…2672 00 00 00 00 00 00 00 00 00 00 00 23 00 84 00 2a 00 26 03 12 00 00 02 3b 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 23 00 b2 00 2a 00 26 03 12 00 00 02 59 00 00 00 00 00 00 00 00 00 00 ┆ # * & ; # * & Y ┆
0x2672…26c2 00 00 00 ff 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 23 00 e0 00 2a 00 26 03 12 00 00 02 77 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 23 01 0e 00 2a 00 26 03 12 00 00 ┆ # * & w # * & ┆
0x26c2…2712 02 95 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 23 01 3c 00 2a 00 26 03 12 00 00 02 b3 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 ┆ # < * & ┆
0x2712…2762 (28, 0, 400) 00 23 01 6a 00 2a 00 26 03 12 00 00 02 d1 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 24 00 08 00 2a 00 26 03 12 00 00 02 ef 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ # j * & $ * & ┆
0x2762…27b2 00 00 00 00 00 00 00 00 00 00 00 00 00 24 00 36 00 2a 00 26 03 12 00 00 03 0d 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 24 00 64 00 2a 00 26 03 12 00 00 03 2b 00 00 ff 00 00 00 00 00 ┆ $ 6 * & $ d * & + ┆
0x27b2…2802 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 24 00 92 00 2a 00 26 03 12 00 00 03 49 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 24 00 c0 00 2a 00 26 03 12 ┆ $ * & I $ * & ┆
0x2802…2852 00 00 03 67 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 24 00 ee 00 2a 00 26 03 12 00 00 03 85 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 ┆ g $ * & ┆
0x2852…28a2 00 00 00 24 01 1c 00 2a 00 26 03 12 00 00 03 a3 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 24 01 4a 00 2a 00 26 03 12 00 00 03 c1 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ $ * & $ J * & ┆