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

⟦8b61dc1c0⟧

    Length: 7914 (0x1eea)
    Notes: pts_type(SC)
    Names: »RGSUB4.SC«

Derivation

└─⟦75255755f⟧ Bits:30009693 Philips computer tape "600410"
    └─⟦this⟧ »NJREMIT/RGSUB4.SC« 
└─⟦b6546aa17⟧ Bits:30009689 Philips computer tape "600325"
    └─⟦this⟧ »REMIT2/RGSUB4.SC« 

PTS(SC)

	IDENT RGSUB4 	03.01.XXX.1
 DDUM KMD08 
 PDIV 
 ENTRY SOPRD
 ENTRY LAMPOF 
 ENTRY LAMPON 
 ENTRY ASSG 
 ENTRY ASGVOL 
 ENTRY CLSVOL 
* 
 EXT SPERR
* 
 INCLUDE EQUATE 
* 
          EJECT 
* 
*               ASSG - ASSIGN  ROUTINE
*        THE ROUTINE ATTEMPTS TO CONNECT THE SPECIFIED
*        DATASETNAME TO A VOLUMENAME. 
*-*        IT TRIES ON ALL VOLUMES CONNECTED. 
*          ON SPECIFIED VOLUME
* 
*        ALTERED PARAMETERS: NONE 
* 
*        ALTERED FIELDS: SPBINW4 - OK - DATASETNR    NOK - 21 
*                        GSWBIN1 - OK - ATTEMPTNR    NOK - 5
*                        ASFNAME - DATASETNAME
*                        ASVOL   - OK - VOLUMENAME   NOK - X'00'
*                        GTWBCD1 - OK - N/A          NOK - ATTEMPT+1
*                        GTWBCD2 - OK - N/A          NOK - DATASETNR
* 
*       C/R: OK - 0, NOK - 4
* 
*-*       CALL :    PERF ASSG,<DAT4ASETNAME>,<DATASETNR>
*          CALL:     PERF ASSG,<VOLUME>,<DSET>,<DATASET NO.>
* 
*********************************************************** 
* 
*-*ASSG PROC DK,DNR 
*-* MOVE SPBINW4,CBIN0 INITIATE 
*-* MOVE GSWBIN1,CBIN1
*-* DSC0 DK,CLOSE CLOSE FIRST 
* 
ASSG PROC VOL,DK,DNR
 MOVE SPBINW4,CBIN0 INITIATE
 MOVE GSWBIN1,VOL 
* 
ASSG10
 MOVE ASVOL,CVOL(GSWBIN1) 	MOVE VOLUMENAME
* 
 MOVE GSWBCD3,ASVOL 
 CBL GSWBCD3,=D'1',ASSGRET
 MOVE GTWBCD1,ASVOL GET VOLUME NAME 
 MOVE GTWBCD2,DNR GET DATASET NUMBER
 EDIT ASFNAME,FDFMT SET UP FILENAME 
 DSC0 DK,CLOSE CLOSE FIRST
* 
 ASSIGN DK,0,SPBINW4,ASFNAME,ASVOL
 BOK ASSGRET 	 IF OK, RETURN
*-* ADD GSWBIN1,CBIN1 
*-* CBG GSWBIN1,CBIN4,ASSGERR 
*-* MOVE ASVOL,=X'00' 
*-* CBNE CVOL(GSWBIN1),ASVOL,ASSG10 TRY ON NEW VOLUME 
ASSGERR 
*                                    ASSIGNMENT IMPOSSIBLE
 MOVE GTWBCD1,SPBINW4 	(MORE THEN 3 RETRIES)
 MOVE SPBINW4,CBIN21
 MOVE GTWBCD2,DNR 
 MOVE GSWSTR9,=C'ASSIGN ' 
 PERF SPERR 	'ASSIGN ERROR' 
 CMP CBIN1,CBIN0
 RET
ASSGRET 
 CLEAR CDKOFF DISK SWITCHED ON AGAIN
 CMP CBIN0,CBIN0
 RET
 PEND 
* 
* 
FDFMT FRMT		SET UP FILENAME 
 FCOPY =C'FD' 
 FMEL '999PPP',GTWBCD1 VOLUME PART
 FMEL '999',GTWBCD2 DATASET NUMBER
 FMEND
* 
* 
 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
 PERF ASSG,CBIN1,DK10,CBIN10 PENGEKONTI 
 BNOK ASGRET
 TBF CGLREGFL,ASG150
 MOVE CGLRECNR,=D'0'
 PERF ASSG,CBIN1,DK05,CBIN5 OLD REGSET
 BNOK ASGRET
 MOVE CGLRECNR,TTGLREC
ASG150
 TBF CBUDGET,ASG160 
 PERF ASSG,CBIN1,DK12,CBIN12
 BNOK ASGRET
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,DK11,CBIN11 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>
* 
********************
* 
 SET CDKOFF DISK SWITCH OFF 
 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 DK03,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
 DSC0 DK10,CLOSE
 TBF CBUDTFLG,CLS190
 DSC0 DK11,CLOSE
CLS190
 TBF CBUDGET,CLS195 
 DSC0 DK12,CLOSE
CLS195
 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
* 
LAMPON PROC $NR 
 PLIT $NR 
**************************************
* 
* LAMPON - FIRE LAMPS ON OPR. PANEL.
* CALL - PERF LAMPON,<$NR>
* 
* THE LAMPS ARE FIRED CORRESPONDING TO 1-BITS IN PARAM
* 
***************************************** 
 MOVE GSWBIN2,$NR 
 DSC1 DSSOPO,ON,GSWBIN2 
 RET
 PEND 
* 
LAMPOF PROC $NR 
 PLIT $NR 
***************************************** 
* 
* LAMPOF - EXTINGUISH LAMPS ON OPR. PANEL 
* CALL - PERF LAMPOF,<$NR>
* 
* THE LAMPS ARE EXTINGHUISHED CORRESPONDING TO 1-BITS IN PARAM
* 
********************************************
 MOVE GSWBIN2,$NR 
 DSC1 DSSOPO,OFF,GSWBIN2
 RET
 PEND 
* 
SOPRD PROC
********************************************* 
* 
* SOPRD - READ SYSTEMS OPERATOR PANEL 
* 
********************************************* 
SOPR10
 MOVE GSWBIN1,CBIN1 
 KI DSSOPI,SOPINP,DUMTAB,GSWBIN1,GSWBIN2
 BNOK SOPR10
 RET
 PEND 
* 
* 
* 
************************************************* 
* 
*         FORMATS 
* 
************************************************* 
EORKY1 EQU X'90'
* 
DUMTAB KTAB EORKY1
* 
* 
 END

HexDump

0x0000…0022 (0, 0, 400)  Head {h00=0x001e, h01=0x0050, text=» IDENT RGSUB4  03.01.XXX.1«, t00=0x0000, t01=0x0004}
0x0022…0036              Head {h00=0x0010, h01=0x000b, text=» DDUM KMD08 «, t00=0x0000, t01=0x0026}
0x0036…0044              Head {h00=0x000a, h01=0x0005, text=» PDIV «, t00=0x0000, t01=0x003a}
0x0044…0058              Head {h00=0x0010, h01=0x0050, text=» ENTRY SOPRD«, t00=0x0000, t01=0x0048}
0x0058…006e              Head {h00=0x0012, h01=0x0050, text=» ENTRY LAMPOF «, t00=0x0000, t01=0x005c}
0x006e…0084              Head {h00=0x0012, h01=0x0050, text=» ENTRY LAMPON «, t00=0x0000, t01=0x0072}
0x0084…0098              Head {h00=0x0010, h01=0x0050, text=» ENTRY ASSG «, t00=0x0000, t01=0x0088}
0x0098…00ae              Head {h00=0x0012, h01=0x0050, text=» ENTRY ASGVOL «, t00=0x0000, t01=0x009c}
0x00ae…00c4              Head {h00=0x0012, h01=0x0050, text=» ENTRY CLSVOL «, t00=0x0000, t01=0x00b2}
0x00c4…00ce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00c8}
0x00ce…00e0              Head {h00=0x000e, h01=0x0050, text=» EXT SPERR«, t00=0x0000, t01=0x00d2}
0x00e0…00ea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00e4}
0x00ea…0102              Head {h00=0x0014, h01=0x0050, text=» INCLUDE EQUATE «, t00=0x0000, t01=0x00ee}
0x0102…010c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0106}
0x010c…0124              Head {h00=0x0014, h01=0x0050, text=»          EJECT «, t00=0x0000, t01=0x0110}
0x0124…012e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0128}
0x012e…015c              Head {h00=0x002a, h01=0x0050, text=»*               ASSG - ASSIGN  ROUTINE«, t00=0x0000, t01=0x0132}
0x015c…019a              Head {h00=0x003a, h01=0x0050, text=»*        THE ROUTINE ATTEMPTS TO CONNECT THE SPECIFIED«, t00=0x0000, t01=0x0160}
0x019a…01c8              Head {h00=0x002a, h01=0x0050, text=»*        DATASETNAME TO A VOLUMENAME. «, t00=0x0001, t01=0x000e}
0x01c8…01fe              Head {h00=0x0032, h01=0x0050, text=»*-*        IT TRIES ON ALL VOLUMES CONNECTED. «, t00=0x0001, t01=0x003c}
0x01fe…0224              Head {h00=0x0022, h01=0x0050, text=»*          ON SPECIFIED VOLUME«, t00=0x0001, t01=0x0072}
0x0224…022e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0098}
0x022e…0258              Head {h00=0x0026, h01=0x0050, text=»*        ALTERED PARAMETERS: NONE «, t00=0x0001, t01=0x00a2}
0x0258…0262              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00cc}
0x0262…02a8              Head {h00=0x0042, h01=0x0050, text=»*        ALTERED FIELDS: SPBINW4 - OK - DATASETNR    NOK - 21 «, t00=0x0001, t01=0x00d6}
0x02a8…02ec              Head {h00=0x0040, h01=0x0050, text=»*                        GSWBIN1 - OK - ATTEMPTNR    NOK - 5«, t00=0x0001, t01=0x011c}
0x02ec…0322              Head {h00=0x0032, h01=0x0050, text=»*                        ASFNAME - DATASETNAME«, t00=0x0001, t01=0x0160}
0x0322…036a              Head {h00=0x0044, h01=0x0050, text=»*                        ASVOL   - OK - VOLUMENAME   NOK - X'00'«, t00=0x0002, t01=0x0008}
0x036a…03b6              Head {h00=0x0048, h01=0x0050, text=»*                        GTWBCD1 - OK - N/A          NOK - ATTEMPT+1«, t00=0x0002, t01=0x0050}
0x03b6…0402              Head {h00=0x0048, h01=0x0050, text=»*                        GTWBCD2 - OK - N/A          NOK - DATASETNR«, t00=0x0002, t01=0x009c}
0x0402…040c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00e8}
0x040c…0430              Head {h00=0x0020, h01=0x0050, text=»*       C/R: OK - 0, NOK - 4«, t00=0x0002, t01=0x00f2}
0x0430…043a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0116}
0x043a…047a              Head {h00=0x003c, h01=0x0050, text=»*-*       CALL :    PERF ASSG,<DAT4ASETNAME>,<DATASETNR>«, t00=0x0002, t01=0x0120}
0x047a…04be              Head {h00=0x0040, h01=0x0050, text=»*          CALL:     PERF ASSG,<VOLUME>,<DSET>,<DATASET NO.>«, t00=0x0002, t01=0x0160}
0x04be…04c8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0014}
0x04c8…050c              Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x0003, t01=0x001e}
0x050c…0516              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0062}
0x0516…0532              Head {h00=0x0018, h01=0x0050, text=»*-*ASSG PROC DK,DNR «, t00=0x0003, t01=0x006c}
0x0532…055a              Head {h00=0x0024, h01=0x0050, text=»*-* MOVE SPBINW4,CBIN0 INITIATE «, t00=0x0003, t01=0x0088}
0x055a…0578              Head {h00=0x001a, h01=0x0050, text=»*-* MOVE GSWBIN1,CBIN1«, t00=0x0003, t01=0x00b0}
0x0578…059e              Head {h00=0x0022, h01=0x0050, text=»*-* DSC0 DK,CLOSE CLOSE FIRST «, t00=0x0003, t01=0x00ce}
0x059e…05a8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00f4}
0x05a8…05c4              Head {h00=0x0018, h01=0x0050, text=»ASSG PROC VOL,DK,DNR«, t00=0x0003, t01=0x00fe}
0x05c4…05e8              Head {h00=0x0020, h01=0x0050, text=» MOVE SPBINW4,CBIN0 INITIATE«, t00=0x0003, t01=0x011a}
0x05e8…0602              Head {h00=0x0016, h01=0x0050, text=» MOVE GSWBIN1,VOL «, t00=0x0003, t01=0x013e}
0x0602…060c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0158}
0x060c…061a              Head {h00=0x000a, h01=0x0050, text=»ASSG10«, t00=0x0003, t01=0x0162}
0x061a…064c              Head {h00=0x002e, h01=0x0050, text=» MOVE ASVOL,CVOL(GSWBIN1)  MOVE VOLUMENAME«, t00=0x0003, t01=0x0170}
0x064c…0656              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0012}
0x0656…0672              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD3,ASVOL «, t00=0x0004, t01=0x001c}
0x0672…0694              Head {h00=0x001e, h01=0x0050, text=» CBL GSWBCD3,=D'1',ASSGRET«, t00=0x0004, t01=0x0038}
0x0694…06c0              Head {h00=0x0028, h01=0x0050, text=» MOVE GTWBCD1,ASVOL GET VOLUME NAME «, t00=0x0004, t01=0x005a}
0x06c0…06ec              Head {h00=0x0028, h01=0x0050, text=» MOVE GTWBCD2,DNR GET DATASET NUMBER«, t00=0x0004, t01=0x0086}
0x06ec…0718              Head {h00=0x0028, h01=0x0050, text=» EDIT ASFNAME,FDFMT SET UP FILENAME «, t00=0x0004, t01=0x00b2}
0x0718…073a              Head {h00=0x001e, h01=0x0050, text=» DSC0 DK,CLOSE CLOSE FIRST«, t00=0x0004, t01=0x00de}
0x073a…0744              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0100}
0x0744…076e              Head {h00=0x0026, h01=0x0050, text=» ASSIGN DK,0,SPBINW4,ASFNAME,ASVOL«, t00=0x0004, t01=0x010a}
0x076e…0792              Head {h00=0x0020, h01=0x0050, text=» BOK ASSGRET   IF OK, RETURN«, t00=0x0004, t01=0x0134}
0x0792…07b0              Head {h00=0x001a, h01=0x0050, text=»*-* ADD GSWBIN1,CBIN1 «, t00=0x0004, t01=0x0158}
0x07b0…07d6              Head {h00=0x0022, h01=0x0050, text=»*-* CBG GSWBIN1,CBIN4,ASSGERR «, t00=0x0004, t01=0x0176}
0x07d6…07f4              Head {h00=0x001a, h01=0x0050, text=»*-* MOVE ASVOL,=X'00' «, t00=0x0005, t01=0x000c}
0x07f4…0832              Head {h00=0x003a, h01=0x0050, text=»*-* CBNE CVOL(GSWBIN1),ASVOL,ASSG10 TRY ON NEW VOLUME «, t00=0x0005, t01=0x002a}
0x0832…0842              Head {h00=0x000c, h01=0x0050, text=»ASSGERR «, t00=0x0005, t01=0x0068}
0x0842…0884              Head {h00=0x003e, h01=0x0050, text=»*                                    ASSIGNMENT IMPOSSIBLE«, t00=0x0005, t01=0x0078}
0x0884…08b8              Head {h00=0x0030, h01=0x0050, text=» MOVE GTWBCD1,SPBINW4  (MORE THEN 3 RETRIES)«, t00=0x0005, t01=0x00ba}
0x08b8…08d4              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW4,CBIN21«, t00=0x0005, t01=0x00ee}
0x08d4…08ee              Head {h00=0x0016, h01=0x0050, text=» MOVE GTWBCD2,DNR «, t00=0x0005, t01=0x010a}
0x08ee…0910              Head {h00=0x001e, h01=0x0050, text=» MOVE GSWSTR9,=C'ASSIGN ' «, t00=0x0005, t01=0x0124}
0x0910…0934              Head {h00=0x0020, h01=0x0050, text=» PERF SPERR  'ASSIGN ERROR' «, t00=0x0005, t01=0x0146}
0x0934…094c              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN1,CBIN0«, t00=0x0005, t01=0x016a}
0x094c…0958              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0005, t01=0x0182}
0x0958…0968              Head {h00=0x000c, h01=0x0050, text=»ASSGRET «, t00=0x0005, t01=0x018e}
0x0968…0994              Head {h00=0x0028, h01=0x0050, text=» CLEAR CDKOFF DISK SWITCHED ON AGAIN«, t00=0x0006, t01=0x000e}
0x0994…09ac              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x0006, t01=0x003a}
0x09ac…09b8              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0006, t01=0x0052}
0x09b8…09c6              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0006, t01=0x005e}
0x09c6…09d0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x006c}
0x09d0…09da              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0076}
0x09da…09fe              Head {h00=0x0020, h01=0x0050, text=»FDFMT FRMT  SET UP FILENAME «, t00=0x0006, t01=0x0080}
0x09fe…0a14              Head {h00=0x0012, h01=0x0050, text=» FCOPY =C'FD' «, t00=0x0006, t01=0x00a4}
0x0a14…0a3e              Head {h00=0x0026, h01=0x0050, text=» FMEL '999PPP',GTWBCD1 VOLUME PART«, t00=0x0006, t01=0x00ba}
0x0a3e…0a68              Head {h00=0x0026, h01=0x0050, text=» FMEL '999',GTWBCD2 DATASET NUMBER«, t00=0x0006, t01=0x00e4}
0x0a68…0a76              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0006, t01=0x010e}
0x0a76…0a80              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x011c}
0x0a80…0a8a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0126}
0x0a8a…0a98              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x0130}
0x0a98…0ab0              Head {h00=0x0014, h01=0x0050, text=»ASGVOL PROC VOL «, t00=0x0006, t01=0x013e}
0x0ab0…0acc              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0006, t01=0x0156}
0x0acc…0ad6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0172}
0x0ad6…0b04              Head {h00=0x002a, h01=0x0050, text=»*          ASSIGN ROUTINE - PER VOLUME«, t00=0x0006, t01=0x017c}
0x0b04…0b0e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x001a}
0x0b0e…0b46              Head {h00=0x0034, h01=0x0050, text=»*          ASSIGNS ALL FILES ON SPECIFIED VOLUME«, t00=0x0007, t01=0x0024}
0x0b46…0b50              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x005c}
0x0b50…0b88              Head {h00=0x0034, h01=0x0050, text=»*          IF VOL=0, ONLY CONFIGURATION DATA SET«, t00=0x0007, t01=0x0066}
0x0b88…0b92              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x009e}
0x0b92…0b9c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00a8}
0x0b9c…0bd4              Head {h00=0x0034, h01=0x0050, text=»*          CALL:     PERF ASGVOL,<VOLUME NUMBER>«, t00=0x0007, t01=0x00b2}
0x0bd4…0bde              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00ea}
0x0bde…0bfa              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0007, t01=0x00f4}
0x0bfa…0c04              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0110}
0x0c04…0c18              Head {h00=0x0010, h01=0x0050, text=» IB VOL,  C «, t00=0x0007, t01=0x011a}
0x0c18…0c3e              Head {h00=0x0022, h01=0x0050, text=»  ASG100,ASG200,ASG300,ASG400 «, t00=0x0007, t01=0x012e}
0x0c3e…0c5c              Head {h00=0x001a, h01=0x0050, text=» CBNE VOL,CBIN0,ASGNOK«, t00=0x0007, t01=0x0154}
0x0c5c…0c66              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0172}
0x0c66…0c8a              Head {h00=0x0020, h01=0x0050, text=»ASG000   ASSIGN CONF DATASET«, t00=0x0007, t01=0x017c}
0x0c8a…0cae              Head {h00=0x0020, h01=0x0050, text=» PERF ASSG,CBIN1,DK01,CBIN1 «, t00=0x0008, t01=0x0010}
0x0cae…0cc0              Head {h00=0x000e, h01=0x0050, text=» B ASGRET «, t00=0x0008, t01=0x0034}
0x0cc0…0cca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0046}
0x0cca…0cf6              Head {h00=0x0028, h01=0x0050, text=»ASG100   ASSIGN ALL FILES - VOLUME 1«, t00=0x0008, t01=0x0050}
0x0cf6…0d26              Head {h00=0x002c, h01=0x0050, text=» PERF ASSG,CBIN1,DK01,CBIN1 CONF DATASET«, t00=0x0008, t01=0x007c}
0x0d26…0d3a              Head {h00=0x0010, h01=0x0050, text=» BNOK ASGRET«, t00=0x0008, t01=0x00ac}
0x0d3a…0d6c              Head {h00=0x002e, h01=0x0050, text=» PERF ASSG,CBIN1,DK03,CBIN3 CYCLE DATASET «, t00=0x0008, t01=0x00c0}
0x0d6c…0d80              Head {h00=0x0010, h01=0x0050, text=» BNOK ASGRET«, t00=0x0008, t01=0x00f2}
0x0d80…0dac              Head {h00=0x0028, h01=0x0050, text=» PERF ASSG,CBIN1,DK04,CBIN4 KT PLAN «, t00=0x0008, t01=0x0106}
0x0dac…0dc0              Head {h00=0x0010, h01=0x0050, text=» BNOK ASGRET«, t00=0x0008, t01=0x0132}
0x0dc0…0df0              Head {h00=0x002c, h01=0x0050, text=» PERF ASSG,CBIN1,DK10,CBIN10 PENGEKONTI «, t00=0x0008, t01=0x0146}
0x0df0…0e04              Head {h00=0x0010, h01=0x0050, text=» BNOK ASGRET«, t00=0x0008, t01=0x0176}
0x0e04…0e20              Head {h00=0x0018, h01=0x0050, text=» TBF CGLREGFL,ASG150«, t00=0x0008, t01=0x018a}
0x0e20…0e3c              Head {h00=0x0018, h01=0x0050, text=» MOVE CGLRECNR,=D'0'«, t00=0x0009, t01=0x0016}
0x0e3c…0e6a              Head {h00=0x002a, h01=0x0050, text=» PERF ASSG,CBIN1,DK05,CBIN5 OLD REGSET«, t00=0x0009, t01=0x0032}
0x0e6a…0e7e              Head {h00=0x0010, h01=0x0050, text=» BNOK ASGRET«, t00=0x0009, t01=0x0060}
0x0e7e…0e9c              Head {h00=0x001a, h01=0x0050, text=» MOVE CGLRECNR,TTGLREC«, t00=0x0009, t01=0x0074}
0x0e9c…0eaa              Head {h00=0x000a, h01=0x0050, text=»ASG150«, t00=0x0009, t01=0x0092}
0x0eaa…0ec6              Head {h00=0x0018, h01=0x0050, text=» TBF CBUDGET,ASG160 «, t00=0x0009, t01=0x00a0}
0x0ec6…0eea              Head {h00=0x0020, h01=0x0050, text=» PERF ASSG,CBIN1,DK12,CBIN12«, t00=0x0009, t01=0x00bc}
0x0eea…0efe              Head {h00=0x0010, h01=0x0050, text=» BNOK ASGRET«, t00=0x0009, t01=0x00e0}
0x0efe…0f0c              Head {h00=0x000a, h01=0x0050, text=»ASG160«, t00=0x0009, t01=0x00f4}
0x0f0c…0f28              Head {h00=0x0018, h01=0x0050, text=» TBF CTEXTFLG,ASGRET«, t00=0x0009, t01=0x0102}
0x0f28…0f54              Head {h00=0x0028, h01=0x0050, text=» PERF ASSG,CBIN1,DK06,CBIN6 TEXT REG«, t00=0x0009, t01=0x011e}
0x0f54…0f68              Head {h00=0x0010, h01=0x0050, text=» BNOK ASGRET«, t00=0x0009, t01=0x014a}
0x0f68…0f84              Head {h00=0x0018, h01=0x0050, text=» TBF CSTRKFLG,ASGRET«, t00=0x0009, t01=0x015e}
0x0f84…0fb2              Head {h00=0x002a, h01=0x0050, text=» PERF ASSG,CBIN1,DK07,CBIN7 INDEX FILE«, t00=0x0009, t01=0x017a}
0x0fb2…0fc6              Head {h00=0x0010, h01=0x0050, text=» BNOK ASGRET«, t00=0x000a, t01=0x0018}
0x0fc6…0ff2              Head {h00=0x0028, h01=0x0050, text=» PERF ASSG,CBIN1,DK08,CBIN8 STAM REG«, t00=0x000a, t01=0x002c}
0x0ff2…1006              Head {h00=0x0010, h01=0x0050, text=» BNOK ASGRET«, t00=0x000a, t01=0x0058}
0x1006…1032              Head {h00=0x0028, h01=0x0050, text=» PERF ASSG,CBIN1,DK09,CBIN9 VAR REG «, t00=0x000a, t01=0x006c}
0x1032…1046              Head {h00=0x0010, h01=0x0050, text=» BNOK ASGRET«, t00=0x000a, t01=0x0098}
0x1046…1062              Head {h00=0x0018, h01=0x0050, text=» TBF CBUDTFLG,ASGRET«, t00=0x000a, t01=0x00ac}
0x1062…1090              Head {h00=0x002a, h01=0x0050, text=» PERF ASSG,CBIN1,DK11,CBIN11 POST REG «, t00=0x000a, t01=0x00c8}
0x1090…10a4              Head {h00=0x0010, h01=0x0050, text=» BNOK ASGRET«, t00=0x000a, t01=0x00f6}
0x10a4…10b6              Head {h00=0x000e, h01=0x0050, text=» B ASGRET «, t00=0x000a, t01=0x010a}
0x10b6…10c0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x011c}
0x10c0…10ec              Head {h00=0x0028, h01=0x0050, text=»ASG200   ASSIGN ALL FILES - VOLUME 2«, t00=0x000a, t01=0x0126}
0x10ec…111c              Head {h00=0x002c, h01=0x0050, text=» PERF ASSG,CBIN2,DK02,CBIN2 REG DATASET «, t00=0x000a, t01=0x0152}
0x111c…112e              Head {h00=0x000e, h01=0x0050, text=» B ASGRET «, t00=0x000a, t01=0x0182}
0x112e…1138 (11, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0004}
0x1138…1164              Head {h00=0x0028, h01=0x0050, text=»ASG300   ASSIGN ALL FILES - VOLUME 3«, t00=0x000b, t01=0x000e}
0x1164…1174              Head {h00=0x000c, h01=0x0050, text=» B ASGOK«, t00=0x000b, t01=0x003a}
0x1174…117e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x004a}
0x117e…11aa              Head {h00=0x0028, h01=0x0050, text=»ASG400   ASSIGN ALL FILES - VOLUME 4«, t00=0x000b, t01=0x0054}
0x11aa…11ba              Head {h00=0x000c, h01=0x0050, text=» B ASGOK«, t00=0x000b, t01=0x0080}
0x11ba…11c4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0090}
0x11c4…11d2              Head {h00=0x000a, h01=0x0050, text=»ASGNOK«, t00=0x000b, t01=0x009a}
0x11d2…11ea              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN1,CBIN0«, t00=0x000b, t01=0x00a8}
0x11ea…11f6              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000b, t01=0x00c0}
0x11f6…1200              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00cc}
0x1200…120e              Head {h00=0x000a, h01=0x0050, text=»ASGOK «, t00=0x000b, t01=0x00d6}
0x120e…1226              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x000b, t01=0x00e4}
0x1226…1234              Head {h00=0x000a, h01=0x0050, text=»ASGRET«, t00=0x000b, t01=0x00fc}
0x1234…1240              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000b, t01=0x010a}
0x1240…124e              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000b, t01=0x0116}
0x124e…1258              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0124}
0x1258…1266              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x012e}
0x1266…127e              Head {h00=0x0014, h01=0x0050, text=»CLSVOL PROC VOL «, t00=0x000b, t01=0x013c}
0x127e…129a              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000b, t01=0x0154}
0x129a…12a4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0170}
0x12a4…12d2              Head {h00=0x002a, h01=0x0050, text=»*          CLOSE ROUTINE - PER VOLUME «, t00=0x000b, t01=0x017a}
0x12d2…12dc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0018}
0x12dc…1314              Head {h00=0x0034, h01=0x0050, text=»*          CLOSES ALL FILES ON SPECIFIED VOLUME «, t00=0x000c, t01=0x0022}
0x1314…131e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x005a}
0x131e…1356              Head {h00=0x0034, h01=0x0050, text=»*          CALL:     PERF CLSVOL,<VOLUME NUMBER>«, t00=0x000c, t01=0x0064}
0x1356…1360              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x009c}
0x1360…137c              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000c, t01=0x00a6}
0x137c…1386              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00c2}
0x1386…13aa              Head {h00=0x0020, h01=0x0050, text=» SET CDKOFF DISK SWITCH OFF «, t00=0x000c, t01=0x00cc}
0x13aa…13c4              Head {h00=0x0016, h01=0x0050, text=» TBF CWFLAG,CLS050«, t00=0x000c, t01=0x00f0}
0x13c4…13da              Head {h00=0x0012, h01=0x0050, text=» DELAY CBIN20 «, t00=0x000c, t01=0x010a}
0x13da…13e8              Head {h00=0x000a, h01=0x0050, text=»CLS050«, t00=0x000c, t01=0x0120}
0x13e8…13fc              Head {h00=0x0010, h01=0x0050, text=» IB VOL,  C «, t00=0x000c, t01=0x012e}
0x13fc…1422              Head {h00=0x0022, h01=0x0050, text=»  CLS100,CLS200,CLS300,CLS400 «, t00=0x000c, t01=0x0142}
0x1422…1434              Head {h00=0x000e, h01=0x0050, text=» B CLSRET «, t00=0x000c, t01=0x0168}
0x1434…143e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x017a}
0x143e…146a              Head {h00=0x0028, h01=0x0050, text=»CLS100   CLOSE ALL FILES - VOLUME 1 «, t00=0x000c, t01=0x0184}
0x146a…1482              Head {h00=0x0014, h01=0x0050, text=» DSC0 DK01,CLOSE«, t00=0x000d, t01=0x0020}
0x1482…149a              Head {h00=0x0014, h01=0x0050, text=» DSC0 DK03,CLOSE«, t00=0x000d, t01=0x0038}
0x149a…14b2              Head {h00=0x0014, h01=0x0050, text=» DSC0 DK04,CLOSE«, t00=0x000d, t01=0x0050}
0x14b2…14ce              Head {h00=0x0018, h01=0x0050, text=» TBF CGLREGFL,CLS150«, t00=0x000d, t01=0x0068}
0x14ce…14e6              Head {h00=0x0014, h01=0x0050, text=» DSC0 DK05,CLOSE«, t00=0x000d, t01=0x0084}
0x14e6…14f4              Head {h00=0x000a, h01=0x0050, text=»CLS150«, t00=0x000d, t01=0x009c}
0x14f4…1510              Head {h00=0x0018, h01=0x0050, text=» TBF CTEXTFLG,CLS190«, t00=0x000d, t01=0x00aa}
0x1510…1528              Head {h00=0x0014, h01=0x0050, text=» DSC0 DK06,CLOSE«, t00=0x000d, t01=0x00c6}
0x1528…1544              Head {h00=0x0018, h01=0x0050, text=» TBF CSTRKFLG,CLS190«, t00=0x000d, t01=0x00de}
0x1544…155c              Head {h00=0x0014, h01=0x0050, text=» DSC0 DK07,CLOSE«, t00=0x000d, t01=0x00fa}
0x155c…1574              Head {h00=0x0014, h01=0x0050, text=» DSC0 DK08,CLOSE«, t00=0x000d, t01=0x0112}
0x1574…158c              Head {h00=0x0014, h01=0x0050, text=» DSC0 DK09,CLOSE«, t00=0x000d, t01=0x012a}
0x158c…15a4              Head {h00=0x0014, h01=0x0050, text=» DSC0 DK10,CLOSE«, t00=0x000d, t01=0x0142}
0x15a4…15c0              Head {h00=0x0018, h01=0x0050, text=» TBF CBUDTFLG,CLS190«, t00=0x000d, t01=0x015a}
0x15c0…15d8              Head {h00=0x0014, h01=0x0050, text=» DSC0 DK11,CLOSE«, t00=0x000d, t01=0x0176}
0x15d8…15e6              Head {h00=0x000a, h01=0x0050, text=»CLS190«, t00=0x000d, t01=0x018e}
0x15e6…1602              Head {h00=0x0018, h01=0x0050, text=» TBF CBUDGET,CLS195 «, t00=0x000e, t01=0x000c}
0x1602…161a              Head {h00=0x0014, h01=0x0050, text=» DSC0 DK12,CLOSE«, t00=0x000e, t01=0x0028}
0x161a…1628              Head {h00=0x000a, h01=0x0050, text=»CLS195«, t00=0x000e, t01=0x0040}
0x1628…1640              Head {h00=0x0014, h01=0x0050, text=» DSC0 FD01,UNLOD«, t00=0x000e, t01=0x004e}
0x1640…1652              Head {h00=0x000e, h01=0x0050, text=» B CLSRET «, t00=0x000e, t01=0x0066}
0x1652…165c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0078}
0x165c…1688              Head {h00=0x0028, h01=0x0050, text=»CLS200   CLOSE ALL FILES - VOLUME 2 «, t00=0x000e, t01=0x0082}
0x1688…16a0              Head {h00=0x0014, h01=0x0050, text=» DSC0 DK02,CLOSE«, t00=0x000e, t01=0x00ae}
0x16a0…16b8              Head {h00=0x0014, h01=0x0050, text=» DSC0 FD02,UNLOD«, t00=0x000e, t01=0x00c6}
0x16b8…16ca              Head {h00=0x000e, h01=0x0050, text=» B CLSRET «, t00=0x000e, t01=0x00de}
0x16ca…16d4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00f0}
0x16d4…1700              Head {h00=0x0028, h01=0x0050, text=»CLS300   CLOSE ALL FILES - VOLUME 3 «, t00=0x000e, t01=0x00fa}
0x1700…1712              Head {h00=0x000e, h01=0x0050, text=» B CLSRET «, t00=0x000e, t01=0x0126}
0x1712…171c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0138}
0x171c…1748              Head {h00=0x0028, h01=0x0050, text=»CLS400   CLOSE ALL FILES - VOLUME 4 «, t00=0x000e, t01=0x0142}
0x1748…175a              Head {h00=0x000e, h01=0x0050, text=» B CLSRET «, t00=0x000e, t01=0x016e}
0x175a…1764              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0180}
0x1764…1772              Head {h00=0x000a, h01=0x0050, text=»CLSRET«, t00=0x000e, t01=0x018a}
0x1772…177e              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000f, t01=0x0008}
0x177e…178c              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000f, t01=0x0014}
0x178c…1796              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0022}
0x1796…17a4              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x002c}
0x17a4…17ae              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x003a}
0x17ae…17c6              Head {h00=0x0014, h01=0x0050, text=»LAMPON PROC $NR «, t00=0x000f, t01=0x0044}
0x17c6…17d8              Head {h00=0x000e, h01=0x0050, text=» PLIT $NR «, t00=0x000f, t01=0x005c}
0x17d8…1806              Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x000f, t01=0x006e}
0x1806…1810              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x009c}
0x1810…183c              Head {h00=0x0028, h01=0x0050, text=»* LAMPON - FIRE LAMPS ON OPR. PANEL.«, t00=0x000f, t01=0x00a6}
0x183c…185e              Head {h00=0x001e, h01=0x0050, text=»* CALL - PERF LAMPON,<$NR>«, t00=0x000f, t01=0x00d2}
0x185e…1868              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00f4}
0x1868…18a6              Head {h00=0x003a, h01=0x0050, text=»* THE LAMPS ARE FIRED CORRESPONDING TO 1-BITS IN PARAM«, t00=0x000f, t01=0x00fe}
0x18a6…18b0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x013c}
0x18b0…18e2              Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000f, t01=0x0146}
0x18e2…18fc              Head {h00=0x0016, h01=0x0050, text=» MOVE GSWBIN2,$NR «, t00=0x000f, t01=0x0178}
0x18fc…191c (16, 0, 400) Head {h00=0x001c, h01=0x0050, text=» DSC1 DSSOPO,ON,GSWBIN2 «, t00=0x0010, t01=0x0004}
0x191c…1928              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0010, t01=0x0024}
0x1928…1936              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0010, t01=0x0030}
0x1936…1940              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x003e}
0x1940…1958              Head {h00=0x0014, h01=0x0050, text=»LAMPOF PROC $NR «, t00=0x0010, t01=0x0048}
0x1958…196a              Head {h00=0x000e, h01=0x0050, text=» PLIT $NR «, t00=0x0010, t01=0x0060}
0x196a…199c              Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0010, t01=0x0072}
0x199c…19a6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00a4}
0x19a6…19d8              Head {h00=0x002e, h01=0x0050, text=»* LAMPOF - EXTINGUISH LAMPS ON OPR. PANEL «, t00=0x0010, t01=0x00ae}
0x19d8…19fa              Head {h00=0x001e, h01=0x0050, text=»* CALL - PERF LAMPOF,<$NR>«, t00=0x0010, t01=0x00e0}
0x19fa…1a04              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0102}
0x1a04…1a4a              Head {h00=0x0042, h01=0x0050, text=»* THE LAMPS ARE EXTINGHUISHED CORRESPONDING TO 1-BITS IN PARAM«, t00=0x0010, t01=0x010c}
0x1a4a…1a54              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0152}
0x1a54…1a88              Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0010, t01=0x015c}
0x1a88…1aa2              Head {h00=0x0016, h01=0x0050, text=» MOVE GSWBIN2,$NR «, t00=0x0010, t01=0x0190}
0x1aa2…1ac2              Head {h00=0x001c, h01=0x0050, text=» DSC1 DSSOPO,OFF,GSWBIN2«, t00=0x0011, t01=0x001a}
0x1ac2…1ace              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0011, t01=0x003a}
0x1ace…1adc              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0011, t01=0x0046}
0x1adc…1ae6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0054}
0x1ae6…1af8              Head {h00=0x000e, h01=0x0050, text=»SOPRD PROC«, t00=0x0011, t01=0x005e}
0x1af8…1b2e              Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0011, t01=0x0070}
0x1b2e…1b38              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00a6}
0x1b38…1b66              Head {h00=0x002a, h01=0x0050, text=»* SOPRD - READ SYSTEMS OPERATOR PANEL «, t00=0x0011, t01=0x00b0}
0x1b66…1b70              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00de}
0x1b70…1ba6              Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0011, t01=0x00e8}
0x1ba6…1bb4              Head {h00=0x000a, h01=0x0050, text=»SOPR10«, t00=0x0011, t01=0x011e}
0x1bb4…1bd0              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN1 «, t00=0x0011, t01=0x012c}
0x1bd0…1c00              Head {h00=0x002c, h01=0x0050, text=» KI DSSOPI,SOPINP,DUMTAB,GSWBIN1,GSWBIN2«, t00=0x0011, t01=0x0148}
0x1c00…1c14              Head {h00=0x0010, h01=0x0050, text=» BNOK SOPR10«, t00=0x0011, t01=0x0178}
0x1c14…1c20              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0011, t01=0x018c}
0x1c20…1c2e              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0012, t01=0x0008}
0x1c2e…1c38              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0016}
0x1c38…1c42              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0020}
0x1c42…1c4c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x002a}
0x1c4c…1c86              Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x0012, t01=0x0034}
0x1c86…1c90              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x006e}
0x1c90…1caa              Head {h00=0x0016, h01=0x0050, text=»*         FORMATS «, t00=0x0012, t01=0x0078}
0x1caa…1cb4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0092}
0x1cb4…1cee              Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x0012, t01=0x009c}
0x1cee…1d06              Head {h00=0x0014, h01=0x0050, text=»EORKY1 EQU X'90'«, t00=0x0012, t01=0x00d6}
0x1d06…1d10              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00ee}
0x1d10…1d2a              Head {h00=0x0016, h01=0x0050, text=»DUMTAB KTAB EORKY1«, t00=0x0012, t01=0x00f8}
0x1d2a…1d34              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0112}
0x1d34…1d3e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x011c}
0x1d3e…1d4a              Head {h00=0x0008, h01=0x0004, text=» END«, t00=0x0012, t01=0x0126}
0x1d4a…1d4e              Head {h00=0x4004, h01=0x0000}
0x1d4e…1d52              00 12 01 32                                                                                                                                                                                                                                       ┆   2┆
0x1d52…1d5a (19, 1, 8)   20 04 00 00 00 13 00 04                                                                                                                                                                                                                           ┆        ┆
0x1d5a…1daa (20, 0, 400) 00 12 00 0d 00 06 14 0b 04 66 30 05 b0 10 00 00 00 13 00 0e 00 04 00 0e 00 09 00 04 14 07 04 6a 30 01 b1 10 00 0e 00 1a 00 0e 00 09 00 04 14 07 04 70 30 01 b2 10 00 0e 00 2c 00 0c 00 08 00 03 02 06 04 7b 08 a6 00 0e 00 3e 00 0c 00 08 00 03   ┆         f0                    j0                p0      ,         {     >      ┆
0x1daa…1dfa              02 06 04 7d 08 66 00 0e 00 4e 00 4a 00 46 00 22 00 44 04 40 12 5c 10 02 a0 12 62 ee 10 15 4c a0 28 99 13 2c 02 a0 15 00 8e 44 62 8e 11 11 4c a0 00 86 8e 21 86 4c 19 25 df 12 4c 06 21 86 4c 10 57 09 21 86 4c 0a 57 03 49 10 05 00 93 1b 3f 52   ┆   } f   N J F " D @      b   L (  ,     Db   L    ! L %  L ! L W ! L W I     ?R┆
0x1dfa…1e4a              3f 52 20 99 00 0e 00 5e 00 0c 00 08 00 03 02 06 04 91 08 66 00 0e 00 ac 00 0c 00 08 00 03 07 06 04 99 00 02 00 0e 00 bc 00 0c 00 08 00 03 07 06 04 a1 00 02 00 0e 00 cc 00 0c 00 08 00 03 02 06 04 a6 08 66 00 0e 00 dc 00 0c 00 08 00 03 02 06   ┆?R     ^           f                                               f            ┆
0x1e4a…1e9a              04 ab 08 a6 00 0e 00 ec 00 0e 00 0a 00 04 14 08 04 b1 30 02 b0 70 00 0e 00 fc 00 0e 00 09 00 04 14 07 04 b8 30 01 b2 70 00 0e 01 0e 00 0e 00 09 00 04 14 07 04 c1 30 01 b2 70 00 0e 01 20 00 4a 00 46 00 22 00 44 04 80 13 10 20 99 14 0c 48 d0   ┆                  0  p              0  p              0  p     J F " D        H ┆
0x1e9a…1eea              07 48 b2 04 00 9d 17 11 3f 52 4a 5d 05 00 89 ad 80 52 00 84 8a 00 89 dc 80 52 06 84 8a 3d 52 00 93 17 3f 52 00 89 ad 25 89 4c 15 00 84 dc 01 86 4c 62 86 14 12 84 1c 03 00 0e 01 32 00 0c 00 08 00 03 02 06 04 c7 08 66 00 0e 01 80 00 0c 00 08   ┆ H      ?RJ]     R       R   =R   ?R   % L      Lb         2           f        ┆

Reduced view