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

⟦16164dba1⟧

    Length: 20782 (0x512e)
    Notes: pts_type(SC)
    Names: »RGSTRT.SC«

Derivation

└─⟦38a30a456⟧ Bits:30009662 Philips computer tape "600104"
    └─⟦this⟧ »OD-KOM/RGSTRT.SC« 

PTS(SC)

	IDENT RGSTRT 840130 EV 
 DDUM KMD08 
 PDIV 
 ENTRY T1GO 
 ENTRY TCONFW 
	ENTRY	TCONFR 
	ENTRY	CONFRD 
	ENTRY	CONFWR 
 ENTRY CNFWRT 
 ENTRY CONRDX 
 EXT ASGVOL 
 EXT ASGFIL 
 EXT SPCLRA 
 EXT SPCLRN 
 EXT SPLIN8 
 EXT RAWRIT 
 EXT RGREAD 
 EXT RAREAD 
 EXT LAMPON 
 EXT LAMPOF 
 EXT SOPRD
 EXT SETMK
 EXT RSTORE 
 EXT INITRG 
 EXT CLSVOL 
 EXT UPDAKK 
 EXT CLEJ 
 EXT CLEDB
 EXT CLBEH
 EXT ZERO 
 EXT ADM
 EXT RGA120 
 EXT RGADM
 EXT RADEL
 EXT WRITID 
 EXT STARTID
 EXT SKIFT
 EXT STRTWR 
 EXT SETMK
 EXT ELOPST START EL. JOURNAL 
 INCLUDE EQUATE 
 EJECT
T1GO
 MOVE SPKEY,CBIN2 INDICATE KEYSWITCH IN POS 2 
 ADD CMAXTASK,CBIN1 
 GETID GSWSTR2
 MOVE TTASKNR,CBIN0 
T1005 
 ADD TTASKNR,CBIN1
 CBE GSWSTR2,CTID(TTASKNR),T1005A 
 B T1005
T1005A
 USE TB2,TTASKNR
 CBE TTASKNR,CBIN1,T1010
 MOVE GSWBIN6,TTASKNR 
 PERF SPLIN8,CBIN9,CBIN2 'OPSTART'
 PAUSE
 B T1400 BRANCH TO NON-MASTER CODE
T1010 
 MOVE CTRANBUF,=X'00' 
 PERF CLSVOL,CBIN1
 PERF CLSVOL,CBIN2
 PERF CLSVOL,CBIN3
 PERF CLSVOL,CBIN4
 CLEAR CSKIFTFL 
 SET GTMASTFL INDICATE MASTER TERM
 DSC0 KEYB,SKIB 
 SET SPPROMPT 
 ATTFMT CSFRM01 
 PERF SPCLRA
 MOVE GSWBIN2,SPBINW2 
 IB SPBINW2,T1011,T1011,T1012,T1012,T1011,		C 
		T1012,T1011,T1011,T1012 
T1011 
 B T1010
T1012 
 MOVE GTTEXT,=C'FD' INSERT PREFIX IN DSNAME 
 MOVE GSWBIN1,CBIN1 
 INSRT CFNAME(GSWBIN1),CBIN0,CBIN2,GTTEXT,CBIN0 
 PERF ASGVOL,CBIN0 ASSIGN CONFDATA
 BNOK T1010 
 CLEAR CSWFLAG
 IB GSWBIN2,T1013,T1013,T1025,T1014,T1013,		C 
		T1013,T1013,T1013,T1018 
T1013 
 B T1010
T1014			KRE KEY 
 MOVE CCONBUF0,=X'00' 
 MOVE GSWBIN2,CBIN0 
T10140
 ADD GSWBIN2,CBIN1
			IF FINISH: TO VERY COLD START
 CBG GSWBIN2,=W'32',T1025 
 PERF RAWRIT,DK01,=D'1',CCONBUF0,GSWBIN2
 BNOK T1010 
 B T10140 
* 
T1018			ADM KEY 
*          ONLY CHANGE VOLUME, DATASET
 SET CSWFLAG
 B T1025
* 
T1020			KVIT KEY
* 
*     RESTORE DATASETS
* 
* 
 CLEAR CSWFLAG
RST000
 PERF LAMPOF,=W'2047' LAMPS OFF 
RST005
 PERF LAMPON,=W'1024' LAMP 1
 PERF LAMPON,=W'128' LAMP 4 
 PERF LAMPON,=W'8' LAMP 8 
RST010
 PERF SOPRD 
 IB GSWBIN2,		C 
		RSOP10,RSOP09,RSOP08,RSOP07,RSOP06,		C
		RSOP05,RSOP04,RSOP03,RSOP02,RSOP01
RSOP02
RSOP03
RSOP05
RSOP06
RSOP07
RSOP09
RSOP10
 B RST010 OTHER LAMPS 
* 
RSOP01			RESTORE FD999001 
 PERF LAMPOF,=W'2047' LAMPS OFF 
 PERF LAMPON,=W'1024' LAMP 1
 PERF RSTORE,DK01,=D'1',=W'32',CCONBUF0,=W'199' 
 BNOK RST005 NOT OK 
 PERF CONFRD
 B RST000 OK
* 
RSOP04			RESTORE FD999004 
 PERF LAMPOF,=W'2047' LAMPS OFF 
 PERF LAMPON,=W'128' LAMP 4 
 PERF RSTORE,DK04,=D'4',=W'30',CKTBUF,=W'128' 
 BNOK RST005 NOT OK 
 PERF SETMK INIT MASTER INDEX 
 B RST000 OK
* 
RSOP08			FINISH RESTORING 
 PERF LAMPOF,=W'2047' LAMPS OFF 
 PERF ASGVOL,CBIN0 ASSIGN KONF DATASET
 BNOK T1010 
 B T1028
* 
* 
* 
* 
* 
T1025			SLUT KEY
 PERF CONFRD READ CONFDATA
 BNOK T1010 
 CBNE CVOLNO,=D'0',T1028
 MOVE CVOLNO,=D'0'
T1028 
 MOVE CFNAME(CBIN1),ASFNAME RESTORE 
 MOVE CVOL(CBIN1),ASVOL 
 TBT CSWFLAG,T1030
 CBG CKMDNR,=D'0',T1050 VERY FIRST START
* 
* 
* 
T1030 
 MOVE GSWBIN1,CBIN1 
T1031 
 DLETE CFNAME(GSWBIN1),CBIN0,CBIN2
 ADD GSWBIN1,CBIN1
 CBL GSWBIN1,CBIN9,T1031
T1033 
 SET CCOLDFLG 
 SET SPPROMPT 
 DSC0 KEYB,SKIB 
 ATTFMT CSFRM02 YES 
 PERF SPCLRN
 IB SPBINW2,T1034,T1034,T1032 
T1034 
 B T1033
T1032 
 MOVE GTTEXT,=C'FD' INSERT PREFIX IN DSNAME 
 MOVE GSWBIN1,CBIN1 
T1035 
 INSRT CFNAME(GSWBIN1),CBIN0,CBIN2,GTTEXT,CBIN0 
 ADD GSWBIN1,CBIN1
 CBL GSWBIN1,CBIN9,T1035
 TBT CSWFLAG,T1020
T1037 
 MOVE CBEH(CBIN1,CBIN1),CBIN0 
 MOVE CTR12(CBIN1,CBIN1),CBIN0
 MOVE GSWBIN5,CBIN0 
T1040 
 ADD GSWBIN5,CBIN1
 CBG GSWBIN5,CMAXTASK,T1045 
 MOVE GSWBCD5,GSWBIN5 
 MOVE GSWBIN1,GSWBIN5 
 DSC0 KEYB,SKIB 
 SET SPPROMPT 
 USE TB2,GSWBIN5
 ATTFMT CSFRM03 
 PERF SPCLRA SET TR 12 AND BEH COUNTERS 
 IB SPBINW2,T1042,T1042,T1043 
T1042 
 B T1037
T1043 
 MUL TTSTLBNR,=D'-1' SIMULATE CLOSE 
 PERF TCONFW,GSWBIN5
 BNOK T1037 
 B T1040
T1045 
 USE TB2,TTASKNR
 PERF CONFWR REWRITE CONFDATA 
 BNOK T1010 
* 
*          READ TERMINAL CONF 
T1050 
 MOVE CTWBIN2,CMAXTASK
 MOVE CTASKNR,CBIN0 
 MOVE GSWBIN5,CBIN0 
T1052 
 ADD GSWBIN5,CBIN1
 CBG GSWBIN5,CMAXTASK,T1060 
 CBNL CMASK(GSWBIN5),=D'0',T1055
 MUL CMASK(GSWBIN5),=D'-1' SET POSITIVE (OPEN)
T1055 
			GET TERMINAL BLOCK 
 USE TB2,GSWBIN5
 PERF TCONFR,GSWBIN5 READ TERMINAL CONF 
 BOK T1052
 USE TB2,TTASKNR NOT OK 
 B T1010
* 
*          CONF DATA HAS BEEN READ
* 
T1060 
 USE TB2,TTASKNR GET OWN USER BLOCK 
 MOVE GTMSK,CMASK(CBIN1) SET MACNINE NO, MASTER 
* 
*          CHECK VOLUME NO
* 
T1062 
 PERF CLSVOL,CBIN2
 PERF CLSVOL,CBIN3
 PERF CLSVOL,CBIN4
 DSC0 KEYB,SKIB 
 SET SPPROMPT 
 ATTFMT INIT1FMT
 PERF SPCLRA
 IB SPBINW2,T1065,T1065,T1070 
 B T1062 OTHER KEYS 
T1065			MAK 
 B T1010
T1070			SLUT KEY, OK
* 
* 
*          ASSIGN OTHER FILES 
* 
* 
 MOVE GTWBCD1,=D'2' 
 MOVE GTTEXT,=C' '
 PERF ASGVOL,CBIN1
 BNOK T1010 
 PERF ASGFIL,CBIN2
 BNOK T1010 
* 
* 
*          CHECK IF DISKETTE IS CORRECT 
* 
* 
 PERF SETMK SET MASTER INDEX, KTPLAN
T1200 
 MOVE CRECNR,CBIN1
 MOVE CRECBCD,=D'1' 
 MOVE GSWBIN1,=W'128' 
 PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,CRECNR
 BNOK T1062 
 MOVE GSWBCD3,CVOLNO
 CBE GTWBCD1,=D'4',T1210 NO DATA
 PERF WRITID,CPCKBUF,CBIN1,CBIN1 PRINT 1. RECORD
 MOVE GSWSTR20,=X'00' 
 MOVE GSWBIN1,CBIN0 
 MOVE GSWBIN2,=W'47'
 COPY GSWSTR20,GSWBIN1,CBIN5,CPCKBUF,GSWBIN2
 MOVE GSWBCD3,GSWSTR20 GET VOLUME NO FROM START 
 TBT CCONVERT,T1219 CONVERT-VERSION 
 CBE CVOLNO,GSWBCD3,T1230 
T1210			NOT EQUAL NOS.
			OR NO DATA 
 TBT CCONVERT,T1219 CONVERT-VERSION 
 DSC0 KEYB,SKIB 
 SET SPPROMPT 
 ATTFMT INIT2FMT
 PERF SPCLRA
 IB SPBINW2,T1215,T1215,T1220,T1212,		C 
		T1212,T1212,T1212,T1212,T1225 
T1212			OTHER KEYS
 B T1210
T1215			MAK 
 B T1062
* 
T1219			CONVERT-VERSION 
			NO OPSTART 
			DIRECTLY TO ADM
 B T1560
* 
T1220			SLUT, OK
 CBE GTWBCD1,=D'4',T1210 NO DATA
 MOVE CVOLNO,GSWBCD3 NEW VOL NO 
 B T1240 TO OPSTART 
* 
T1225			KVIT
 PERF STRTWR NEW START RECORD 
 BNOK T1010 
 PERF WRITID,CPCKBUF,CBIN1,CBIN1
 B T1240 TO OPSTART 
* 
* 
T1230			EQUAL VOL NOS.
 DSC0 KEYB,SKIB 
 SET SPPROMPT 
 ATTFMT INIT3FMT
 PERF SPCLRA
 IB SPBINW2,T1235,T1235,T1240 
 B T1230 OTHER KEYS 
T1235			MAK 
 B T1062
* 
* 
* 
*          OPSTART
* 
* 
T1240 
 MOVE CRECBCD,=D'0' 
 MOVE CRECNR,CBIN1
 CLEAR CERRORFL 
T1242 
 MOVE GTWBCD2,CRECNR
 PERF SPLIN8,CBIN10,CBIN3 
 ADD CRECNR,CBIN1 
 MOVE GSWBIN1,=W'128' READ NEXT RECORD
 PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,CRECNR
 BNOK T1300 NOT OK
			IF FLAG: TO REPRINT
 TBT CERRORFL,T1300 
 CMP GTWBCD1,=D'4'
 BE T1500 NO DATA, CONTINUE REG.
 MOVE GSWSTR20,=C'SLUTD'
 MOVE GSWBIN5,CBIN0 
 MATCH GSWSTR20,GSWBIN5,CBIN5,CPCKBUF,CBIN0,CBIN5 
 BE T1350 SLUTD 
 MOVE GSWSTR20,=X'00' 
 COPY GSWSTR20,CBIN0,CBIN3,CPCKBUF,CBIN0
 MOVE GSWBCD5,GSWSTR20 GET MACHINE NO.
 MOVE GSWBIN6,CBIN0 
T1245 
 ADD GSWBIN6,CBIN1
 CBE GSWBCD5,CMASK(GSWBIN6),T1247 
 CBL GSWBIN6,CBIN12,T1245 
 B T1242
T1247 
 CBE GSWBCD5,=D'0',T1250 CHECK WRONG MACHINE NO.
 CBE GSWBIN6,CBIN1,T1250 IF MASTER
 RSTRT CTID(GSWBIN6) NO, START RELEVANT TASK
 PAUSE
 B T1242
T1250 
 PERF RGREAD,DK02,=D'2' READ TRANSACTION
 BERR T1290 
 MOVE CRECBCD,GSWBCD3 GET LOG. REC. NO. 
 BOK T1251 TR 1-10
 TBT GTSWFLAG,T1251 TEST FOR TR 11
 B T1290 TR >=12
T1251 
 CBL CRECBCD,TTRECOPN,T1290 BEFORE REWRITE? 
 TBT GTSWFLAG,T1270 IF TR 11
 CBG TTSTLBNR,=D'0',T1260 OPEN? 
 MUL TTSTLBNR,=D'-1' NO, SET POSITIVE (OPEN)
 MOVE TTCASH,TTSTCASH 
 MOVE TTRECOPN,CRECBCD
 PERF TCONFW,TTASKNR
 PERF CONFWR
T1260 
 CLEAR GTTESTFL 
 CBNL CRECBCD,CCONFREC,T1262
 SET GTTESTFL BEFORE BEH., REWRITE
T1262 
 PERF UPDAKK
 CLEAR GTTESTFL 
 B T1290
* 
* 
* 
T1270 
			TR 11
 CBNG TTSTLBNR,=D'0',T1290 CLOSED?
			NO 
 MOVE TTSTCASH,TTCASH 
 MOVE TTSTLBNR,TTLBNR 
 ADD TTSTLBNR,=D'1' 
 MUL TTSTLBNR,=D'-1'
 MOVE TTRECOPN,CRECBCD
 PERF TCONFW,TTASKNR
 PERF CONFWR
 PERF ZERO
T1290 
 TBT GTMASTFL,T1242 MASTER
 B T1450 NON-MASTER 
* 
* 
* 
* 
T1300 
 PERF WRITID,CPCKBUF,CBIN4,CBIN2 PRINT 1. PART OF 
			LAST CORRECT RECORD
 SET SPPROMPT 
 ATTFMT INIT4FMT
 PERF SPCLRA
 IB SPBINW2,T1310,T1310,T1315,T1320,T1310,		C 
		T1310,T1310,T1310,T1330 
 B T1300
T1310			MAK 
 B T1300
* 
T1315			SLUT, CONTINUE
 SUB CRECNR,CBIN1 READ AGAIN
 CLEAR CERRORFL 
 B T1242
* 
T1320			KRE, TRY NEXT 
 SET CERRORFL 
 B T1242
* 
T1330			TO NEW DISK 
 CLEAR CERRORFL 
 B T1350
T1350			SLUTD 
* 
* 
* 
*          DISKETTE SKIFT 
* 
* 
 TBT C5MDISK,T1500
 SET CSKIFTFL 
 PERF SKIFT 
 B T1200
	EJECT
T1400 
********************
* 
*          RESTART OF 
*          FOR NON-MASTER 
* 
********************
 MOVE GTMSK,CMASK(TTASKNR)
T1440 
 TBT CWFLAG,T1530 IF COLDSTART FINISHED 
 B T1250
T1450 
 RSTRT CTID(CBIN1) RESTART MASTER 
 PAUSE
 B T1440
* 
* 
* 
T1500 
 ADD CRECBCD,=D'1'
 SET CWFLAG 
 MOVE GSWBIN6,CBIN1 
T1510 
 ADD GSWBIN6,CBIN1
 CBG GSWBIN6,CMAXTASK,T1540 
 PERF SPLIN8,CBIN9,CBIN3
 RSTRT CTID(GSWBIN6)
 PAUSE
 B T1510
T1530 
* 
* SET POINTERS IN EL. JOURNAL FILES 
 PERF ELOPST
 RSTRT CTID(CBIN1) RESTART MASTER 
 PAUSE
 B T1550 START

* 
T1540			START MASTER
 PERF ELOPST

 MOVE GSWBIN6,CBIN1 
T1545			RESTART ALL TASKS 
 ADD GSWBIN6,CBIN1
 CBG GSWBIN6,CMAXTASK,T1550 
 RSTRT CTID(GSWBIN6)
 B T1545


* 
* 

T1550			START POINT 

* 
 CBL TTASKNR,CBIN6,T1555
 SET TREMFLG
T1555 
 DSC0 KEYB,SKIB 
 MOVE TTEJEDB,=D'0' 
 CBNG TTSTLBNR,=D'0',T1560 IF TASK WAS CLOSED 
 ADD CTASKNR,CBIN1
 SET GTSPGFLG 
 MOVE GSWSTR9,=C'SUBTOTAL ' 
 PERF CLEJ
 PERF CLEDB 
 PERF CLBEH 
 MOVE GSWSTR9,=C' ' 
 CLEAR GTSPGFLG 
 SET GTKASSE
 MOVE GSWBIN1,CBIN14
 PERF ADM,GSWBIN1 
 B RGA120 
T1560 
 MUL CMASK(TTASKNR),=D'-1' SET < 0, CLOSE 
 B RGADM
 EJECT
******************************************************
* 
*      TCONFR - READING OF CONFIGURATION DEPENDENT DATA 
* 
* CALL:    PERF TCONFR,<CONFIGURATION NBR>
* 
* THE DATA IS READ RANDOM FROM DK01 
* 
* ALTERED FIELDS: GSWBIN6 - <CONF> + 12 
*                 GSWBIN1 - 199 
* 
* CR:      OK - 0,   NOK - <> 0 
* 
******************************************************
TCONFR PROC TCONFRNO
 MOVE GSWBIN6,TCONFRNO
 ADD GSWBIN6,CBIN12 
 MOVE GSWBIN1,=W'199' 
 PERF RAREAD,DK01,=D'1',TCONBUF,GSWBIN1,GSWBIN6 
 BNOK TCONRET1
 CBNL TTSTLBNR,=D'10001',TCONFR1
 CBL TTSTLBNR,=D'-10001',TCONFR1
 CBL TTSTLBNR,=D'0',TCONFR2 
 MOVE TTSTLBNR,=D'10001'
 B TCONFR1
TCONFR2 
 MOVE TTSTLBNR,=D'-10001' 
TCONFR1 
 CMP CBIN0,CBIN0
 RET
TCONRET1
 CMP CBIN0,CBIN1 SET CR 
 RET
 PEND 
* 
 EJECT
*************************************************** 
* 
*     TCONFW - WRITE CONFIGURATION-DEPENDENT DATA 
* 
*    CALL:    PERF  TCONFW,<CONFIGURATION NBR>
* 
* IF NOT IN TESTMODE, DATA IS WRITTEN TO DK01 
* ALTERED FIELDS: 
*        GSWBIN6 - <CONF> + 12
* 
*************************************************** 
TCONFW PROC TCONFWNO
 MOVE GSWBIN6,TCONFWNO
 ADD GSWBIN6,CBIN12 
 CBE GTTESTMK,=C'T',TCFWRET IF IN TEST MODE 
 CBNL TTSTLBNR,=D'10001',TCONFW1
 CBL TTSTLBNR,=D'-10001',TCONFW1
 CBL TTSTLBNR,=D'0',TCONFW2 
 MOVE TTSTLBNR,=D'10001'
 MOVE TTLBNR,=D'10000'
 B TCONFW1
TCONFW2 
 MOVE TTSTLBNR,=D'-10001' 
 MOVE TTLBNR,=D'-10000' 
TCONFW1 
 PERF RAWRIT,DK01,=D'1',TCONBUF,GSWBIN6 
TCFWRET 
 RET
 PEND 
 EJECT
********************************************************
* 
*        CONFRD - READING OF COMMON CONFDATA
* 
********************************************************* 
CONFRD PROC 
 PERF CONRDX,CCONBUF0,CBIN1 
 BNOK CONFRET 
 PERF CONRDX,CCONBUF1,CBIN2 
 BNOK CONFRET 
 PERF CONRDX,CCONBUF2,CBIN3 
 BNOK CONFRET 
 PERF CONRDX,CCONBUF3,CBIN4 
 BNOK CONFRET 
 PERF CONRDX,CCONBUF4,CBIN5 
 BNOK CONFRET 
 PERF CONRDX,CCONBUF5,CBIN6 
 BNOK CONFRET 
 PERF CONRDX,CCONBUF6,CBIN7 
 BNOK CONFRET 
 PERF CONRDX,CCONBUF7,CBIN8 
 BNOK CONFRET 
 PERF CONRDX,CCONBUF8,CBIN9 
 BNOK CONFRET 
 PERF CONRDX,CCONBUF9,CBIN10
CONFRET 
 RET
 PEND 
* 
CONRDX PROC CBUFRD,CBUFNO 
* 
 MOVE GSWBIN1,=W'199' 
 PERF RAREAD,DK01,=D'1',CBUFRD,GSWBIN1,CBUFNO 
 RET
 PEND 
 EJECT
**********************************************************
* 
*       CONFWR - WRITING OF CONFDATA
* 
**********************************************************
CONFWR PROC 
 MOVE CCONFREC,CRECBCD
 PERF RAWRIT,DK01,=D'1',CCONBUF0,CBIN1
 BNOK WRET
 PERF RAWRIT,DK01,=D'1',CCONBUF1,CBIN2
 BNOK WRET
 PERF RAWRIT,DK01,=D'1',CCONBUF2,CBIN3
 BNOK WRET
 PERF RAWRIT,DK01,=D'1',CCONBUF3,CBIN4
 BNOK WRET
 PERF RAWRIT,DK01,=D'1',CCONBUF4,CBIN5
 BNOK WRET
 PERF RAWRIT,DK01,=D'1',CCONBUF5,CBIN6
 BNOK WRET
 PERF RAWRIT,DK01,=D'1',CCONBUF6,CBIN7
 BNOK WRET
 PERF RAWRIT,DK01,=D'1',CCONBUF7,CBIN8
 BNOK WRET
 PERF RAWRIT,DK01,=D'1',CCONBUF8,CBIN9
 BNOK WRET
 PERF RAWRIT,DK01,=D'1',CCONBUF9,CBIN10 
WRET
 RET
 PEND 
 EJECT
********************
* 
*          CONFWRT - REWRITE CONFDATA 
* 
*    ALTERED FIELDS: GSWBIN5 - SET TO CMAXTASK
*                    TTRECOPN -       0 
* 
********************
CNFWRT PROC 
 MOVE GSWBIN5,CBIN0 
CNF1
 ADD GSWBIN5,CBIN1
 CBG GSWBIN5,CMAXTASK,CNF100
 USE TB2,GSWBIN5
 MOVE TTRECOPN,=D'0' IF OPEN
 PERF TCONFW,GSWBIN5
 B CNF1 
CNF100
 USE TB2,TTASKNR
 PERF CONFWR
 RET
 PEND 
 EJECT
************************************************************
* 
*       FORMATS USED
* 
************************************************************* 
* 
FMTFKI FRMT 
 FNL
 FKI 2
 FMEL 'B',TSWBCD2 
 FMEND
* 
CSFRM01 FRMT
 FSL
 FTEXT 'START'
 FNL
 FTEXT 'VOLUME='
 FKI 9,MINL=6,MAXL=6,ME 
 FCOPY CVOL(CBIN1)
 FNL
 FTEXT 'DATASET=' 
 FKI 9,MINL=6,MAXL=6,ME 
 FCOPY CFNAME(CBIN1)
 FMEND
* 
CSFRM02 FRMT
 FSL
 FCOPY ='KOMMUNE NR'
 FKI 12,MINL=3,MAXL=4,ME
 FMEL 'ZZZZ',CKMDNR 
 FNL
 FCOPY ='VOL 2  VOL 3  VOL 4' 
 FNL
 FKI 1,MINL=6,MAXL=6,ME 
 FCOPY CVOL(CBIN2)
 FKI 8,MINL=6,MAXL=6
 FCOPY CVOL(CBIN3)
 FKI 15,MINL=6,MAXL=6 
 FCOPY CVOL(CBIN4)
 FNL
 FCOPY ='DSN02    DSN03    DSN04' 
 FNL
 FKI 1,MINL=6,MAXL=6,ME 
 FCOPY CFNAME(CBIN2)
 FKI 10,MINL=6,MAXL=6 
 FCOPY CFNAME(CBIN3)
 FKI 19,MINL=6,MAXL=6 
 FCOPY CFNAME(CBIN4)
 FNL
 FCOPY ='DSN05    DSN06    DSN07    DSN08'
 FNL
 FKI 1,MINL=6,MAXL=6
 FCOPY CFNAME(CBIN5)
 FKI 10,MINL=6,MAXL=6 
 FCOPY CFNAME(CBIN6)
 FKI 19,MINL=6,MAXL=6 
 FCOPY CFNAME(CBIN7)
 FKI 28,MINL=6,MAXL=6 
 FCOPY CFNAME(CBIN8)
 FMEND
* 
CSFRM03 FRMT
 FSL
 FMEL '99',GSWBCD5
 FNL
 FCOPY ='MASKIN NR' 
 FKI 22,MINL=3,MAXL=3,ME
 FMEL '999',CMASK(GSWBIN1)
 FNL
 FCOPY ='BEHOLDNINGST[LLERE'
 FKI 23,MAXL=2,ME,APPL=103
 FMEL '99',GSWBCD3
 FNL
 FCOPY ='EJ-EDB T[LLER '
 FKI 23,MAXL=2,ME,APPL=104
 FMEL '99',GSWBCD4
 FNL
 FCOPY =' EKS.LBNR' 
 FKI 20,MAXL=5,ME 
 FMEL 'ZZZZ9',TTSTLBNR
 FMEND
* 
INIT1FMT FRMT 
 FSL
 FCOPY ='VOLUME NR '
 FMEL '99999',CVOLNO
 FNL
 FCOPY =C'DAGS-DATO'
 FKI 11,MINL=6,MAXL=6,ME,SCHK=2,REWRT,NCLR
 FMEL '99E-99E-99',CMASKDAT 
 FNL
 FCOPY =C'DAG NR' 
 FKI 11,MINL=1,MAXL=3,ME,APPL=102 
 FMEL 'ZZZ',CRELDAY 
 FMEND
* 
INIT2FMT FRMT 
 FSL
 FCOPY ='VOLUME NR '
 FTEXT 'OK' 
 FILLR '?',1
 FILLR X'07',1
 FLINK FMTFKI 
 FMEND
* 
INIT3FMT FRMT 
 FSL
 FCOPY ='OPSTART '
 FILLR '?',1
 FILLR X'07',1
 FLINK FMTFKI 
 FMEND
* 
INIT4FMT FRMT 
 FSL
 FCOPY ='KORREKT' 
 FILLR '?',1
 FILLR X'07',1
 FLINK FMTFKI 
 FMEND
* 
 END

HexDump

0x0000…0020 (0, 0, 398)  Head {h00=0x001c, h01=0x0050, text=» IDENT RGSTRT 840130 EV «, t00=0x0000, t01=0x0004}
0x0020…0034              Head {h00=0x0010, h01=0x0050, text=» DDUM KMD08 «, t00=0x0000, t01=0x0024}
0x0034…0042              Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x0000, t01=0x0038}
0x0042…0056              Head {h00=0x0010, h01=0x0050, text=» ENTRY T1GO «, t00=0x0000, t01=0x0046}
0x0056…006c              Head {h00=0x0012, h01=0x0050, text=» ENTRY TCONFW «, t00=0x0000, t01=0x005a}
0x006c…0082              Head {h00=0x0012, h01=0x0050, text=» ENTRY TCONFR «, t00=0x0000, t01=0x0070}
0x0082…0098              Head {h00=0x0012, h01=0x0050, text=» ENTRY CONFRD «, t00=0x0000, t01=0x0086}
0x0098…00ae              Head {h00=0x0012, h01=0x0050, text=» ENTRY CONFWR «, t00=0x0000, t01=0x009c}
0x00ae…00c4              Head {h00=0x0012, h01=0x0050, text=» ENTRY CNFWRT «, t00=0x0000, t01=0x00b2}
0x00c4…00da              Head {h00=0x0012, h01=0x0050, text=» ENTRY CONRDX «, t00=0x0000, t01=0x00c8}
0x00da…00ee              Head {h00=0x0010, h01=0x0050, text=» EXT ASGVOL «, t00=0x0000, t01=0x00de}
0x00ee…0102              Head {h00=0x0010, h01=0x0050, text=» EXT ASGFIL «, t00=0x0000, t01=0x00f2}
0x0102…0116              Head {h00=0x0010, h01=0x0050, text=» EXT SPCLRA «, t00=0x0000, t01=0x0106}
0x0116…012a              Head {h00=0x0010, h01=0x0050, text=» EXT SPCLRN «, t00=0x0000, t01=0x011a}
0x012a…013e              Head {h00=0x0010, h01=0x0050, text=» EXT SPLIN8 «, t00=0x0000, t01=0x012e}
0x013e…0152              Head {h00=0x0010, h01=0x0050, text=» EXT RAWRIT «, t00=0x0000, t01=0x0142}
0x0152…0166              Head {h00=0x0010, h01=0x0050, text=» EXT RGREAD «, t00=0x0000, t01=0x0156}
0x0166…017a              Head {h00=0x0010, h01=0x0050, text=» EXT RAREAD «, t00=0x0000, t01=0x016a}
0x017a…018e              Head {h00=0x0010, h01=0x0050, text=» EXT LAMPON «, t00=0x0000, t01=0x017e}
0x018e…01a2 (1, 0, 400)  Head {h00=0x0010, h01=0x0050, text=» EXT LAMPOF «, t00=0x0001, t01=0x0004}
0x01a2…01b4              Head {h00=0x000e, h01=0x0050, text=» EXT SOPRD«, t00=0x0001, t01=0x0018}
0x01b4…01c6              Head {h00=0x000e, h01=0x0050, text=» EXT SETMK«, t00=0x0001, t01=0x002a}
0x01c6…01da              Head {h00=0x0010, h01=0x0050, text=» EXT RSTORE «, t00=0x0001, t01=0x003c}
0x01da…01ee              Head {h00=0x0010, h01=0x0050, text=» EXT INITRG «, t00=0x0001, t01=0x0050}
0x01ee…0202              Head {h00=0x0010, h01=0x0050, text=» EXT CLSVOL «, t00=0x0001, t01=0x0064}
0x0202…0216              Head {h00=0x0010, h01=0x0050, text=» EXT UPDAKK «, t00=0x0001, t01=0x0078}
0x0216…0228              Head {h00=0x000e, h01=0x0050, text=» EXT CLEJ «, t00=0x0001, t01=0x008c}
0x0228…023a              Head {h00=0x000e, h01=0x0050, text=» EXT CLEDB«, t00=0x0001, t01=0x009e}
0x023a…024c              Head {h00=0x000e, h01=0x0050, text=» EXT CLBEH«, t00=0x0001, t01=0x00b0}
0x024c…025e              Head {h00=0x000e, h01=0x0050, text=» EXT ZERO «, t00=0x0001, t01=0x00c2}
0x025e…026e              Head {h00=0x000c, h01=0x0050, text=» EXT ADM«, t00=0x0001, t01=0x00d4}
0x026e…0282              Head {h00=0x0010, h01=0x0050, text=» EXT RGA120 «, t00=0x0001, t01=0x00e4}
0x0282…0294              Head {h00=0x000e, h01=0x0050, text=» EXT RGADM«, t00=0x0001, t01=0x00f8}
0x0294…02a6              Head {h00=0x000e, h01=0x0050, text=» EXT RADEL«, t00=0x0001, t01=0x010a}
0x02a6…02ba              Head {h00=0x0010, h01=0x0050, text=» EXT WRITID «, t00=0x0001, t01=0x011c}
0x02ba…02ce              Head {h00=0x0010, h01=0x0050, text=» EXT STARTID«, t00=0x0001, t01=0x0130}
0x02ce…02e0              Head {h00=0x000e, h01=0x0050, text=» EXT SKIFT«, t00=0x0001, t01=0x0144}
0x02e0…02f4              Head {h00=0x0010, h01=0x0050, text=» EXT STRTWR «, t00=0x0001, t01=0x0156}
0x02f4…0306              Head {h00=0x000e, h01=0x0050, text=» EXT SETMK«, t00=0x0001, t01=0x016a}
0x0306…032c              Head {h00=0x0022, h01=0x0050, text=» EXT ELOPST START EL. JOURNAL «, t00=0x0001, t01=0x017c}
0x032c…0344              Head {h00=0x0014, h01=0x0050, text=» INCLUDE EQUATE «, t00=0x0002, t01=0x0012}
0x0344…0352              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x002a}
0x0352…035e              Head {h00=0x0008, h01=0x0050, text=»T1GO«, t00=0x0002, t01=0x0038}
0x035e…0394              Head {h00=0x0032, h01=0x0050, text=» MOVE SPKEY,CBIN2 INDICATE KEYSWITCH IN POS 2 «, t00=0x0002, t01=0x0044}
0x0394…03b0              Head {h00=0x0018, h01=0x0050, text=» ADD CMAXTASK,CBIN1 «, t00=0x0002, t01=0x007a}
0x03b0…03c6              Head {h00=0x0012, h01=0x0050, text=» GETID GSWSTR2«, t00=0x0002, t01=0x0096}
0x03c6…03e2              Head {h00=0x0018, h01=0x0050, text=» MOVE TTASKNR,CBIN0 «, t00=0x0002, t01=0x00ac}
0x03e2…03f0              Head {h00=0x000a, h01=0x0050, text=»T1005 «, t00=0x0002, t01=0x00c8}
0x03f0…040a              Head {h00=0x0016, h01=0x0050, text=» ADD TTASKNR,CBIN1«, t00=0x0002, t01=0x00d6}
0x040a…0434              Head {h00=0x0026, h01=0x0050, text=» CBE GSWSTR2,CTID(TTASKNR),T1005A «, t00=0x0002, t01=0x00f0}
0x0434…0444              Head {h00=0x000c, h01=0x0050, text=» B T1005«, t00=0x0002, t01=0x011a}
0x0444…0452              Head {h00=0x000a, h01=0x0050, text=»T1005A«, t00=0x0002, t01=0x012a}
0x0452…046a              Head {h00=0x0014, h01=0x0050, text=» USE TB2,TTASKNR«, t00=0x0002, t01=0x0138}
0x046a…048a              Head {h00=0x001c, h01=0x0050, text=» CBE TTASKNR,CBIN1,T1010«, t00=0x0002, t01=0x0150}
0x048a…04a8              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN6,TTASKNR «, t00=0x0002, t01=0x0170}
0x04a8…04d2              Head {h00=0x0026, h01=0x0050, text=» PERF SPLIN8,CBIN9,CBIN2 'OPSTART'«, t00=0x0002, t01=0x018e}
0x04d2…04e0              Head {h00=0x000a, h01=0x0050, text=» PAUSE«, t00=0x0003, t01=0x0028}
0x04e0…050a              Head {h00=0x0026, h01=0x0050, text=» B T1400 BRANCH TO NON-MASTER CODE«, t00=0x0003, t01=0x0036}
0x050a…0518              Head {h00=0x000a, h01=0x0050, text=»T1010 «, t00=0x0003, t01=0x0060}
0x0518…0536              Head {h00=0x001a, h01=0x0050, text=» MOVE CTRANBUF,=X'00' «, t00=0x0003, t01=0x006e}
0x0536…0550              Head {h00=0x0016, h01=0x0050, text=» PERF CLSVOL,CBIN1«, t00=0x0003, t01=0x008c}
0x0550…056a              Head {h00=0x0016, h01=0x0050, text=» PERF CLSVOL,CBIN2«, t00=0x0003, t01=0x00a6}
0x056a…0584              Head {h00=0x0016, h01=0x0050, text=» PERF CLSVOL,CBIN3«, t00=0x0003, t01=0x00c0}
0x0584…059e              Head {h00=0x0016, h01=0x0050, text=» PERF CLSVOL,CBIN4«, t00=0x0003, t01=0x00da}
0x059e…05b6              Head {h00=0x0014, h01=0x0050, text=» CLEAR CSKIFTFL «, t00=0x0003, t01=0x00f4}
0x05b6…05e0              Head {h00=0x0026, h01=0x0050, text=» SET GTMASTFL INDICATE MASTER TERM«, t00=0x0003, t01=0x010c}
0x05e0…05f8              Head {h00=0x0014, h01=0x0050, text=» DSC0 KEYB,SKIB «, t00=0x0003, t01=0x0136}
0x05f8…060e              Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0003, t01=0x014e}
0x060e…0626              Head {h00=0x0014, h01=0x0050, text=» ATTFMT CSFRM01 «, t00=0x0003, t01=0x0164}
0x0626…063a              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0003, t01=0x017c}
0x063a…0658              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN2,SPBINW2 «, t00=0x0003, t01=0x0190}
0x0658…068e              Head {h00=0x0032, h01=0x0050, text=» IB SPBINW2,T1011,T1011,T1012,T1012,T1011,  C «, t00=0x0004, t01=0x001e}
0x068e…06b0              Head {h00=0x001e, h01=0x0050, text=»  T1012,T1011,T1011,T1012 «, t00=0x0004, t01=0x0054}
0x06b0…06be              Head {h00=0x000a, h01=0x0050, text=»T1011 «, t00=0x0004, t01=0x0076}
0x06be…06ce              Head {h00=0x000c, h01=0x0050, text=» B T1010«, t00=0x0004, t01=0x0084}
0x06ce…06dc              Head {h00=0x000a, h01=0x0050, text=»T1012 «, t00=0x0004, t01=0x0094}
0x06dc…0710              Head {h00=0x0030, h01=0x0050, text=» MOVE GTTEXT,=C'FD' INSERT PREFIX IN DSNAME «, t00=0x0004, t01=0x00a2}
0x0710…072c              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN1 «, t00=0x0004, t01=0x00d6}
0x072c…0764              Head {h00=0x0034, h01=0x0050, text=» INSRT CFNAME(GSWBIN1),CBIN0,CBIN2,GTTEXT,CBIN0 «, t00=0x0004, t01=0x00f2}
0x0764…078e              Head {h00=0x0026, h01=0x0050, text=» PERF ASGVOL,CBIN0 ASSIGN CONFDATA«, t00=0x0004, t01=0x012a}
0x078e…07a2              Head {h00=0x0010, h01=0x0050, text=» BNOK T1010 «, t00=0x0004, t01=0x0154}
0x07a2…07b8              Head {h00=0x0012, h01=0x0050, text=» CLEAR CSWFLAG«, t00=0x0004, t01=0x0168}
0x07b8…07ee              Head {h00=0x0032, h01=0x0050, text=» IB GSWBIN2,T1013,T1013,T1025,T1014,T1013,  C «, t00=0x0004, t01=0x017e}
0x07ee…0810              Head {h00=0x001e, h01=0x0050, text=»  T1013,T1013,T1013,T1018 «, t00=0x0005, t01=0x0024}
0x0810…081e              Head {h00=0x000a, h01=0x0050, text=»T1013 «, t00=0x0005, t01=0x0046}
0x081e…082e              Head {h00=0x000c, h01=0x0050, text=» B T1010«, t00=0x0005, t01=0x0054}
0x082e…0846              Head {h00=0x0014, h01=0x0050, text=»T1014   KRE KEY «, t00=0x0005, t01=0x0064}
0x0846…0864              Head {h00=0x001a, h01=0x0050, text=» MOVE CCONBUF0,=X'00' «, t00=0x0005, t01=0x007c}
0x0864…0880              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,CBIN0 «, t00=0x0005, t01=0x009a}
0x0880…088e              Head {h00=0x000a, h01=0x0050, text=»T10140«, t00=0x0005, t01=0x00b6}
0x088e…08a8              Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN2,CBIN1«, t00=0x0005, t01=0x00c4}
0x08a8…08d0              Head {h00=0x0024, h01=0x0050, text=»   IF FINISH: TO VERY COLD START«, t00=0x0005, t01=0x00de}
0x08d0…08f2              Head {h00=0x001e, h01=0x0050, text=» CBG GSWBIN2,=W'32',T1025 «, t00=0x0005, t01=0x0106}
0x08f2…0922              Head {h00=0x002c, h01=0x0050, text=» PERF RAWRIT,DK01,=D'1',CCONBUF0,GSWBIN2«, t00=0x0005, t01=0x0128}
0x0922…0936              Head {h00=0x0010, h01=0x0050, text=» BNOK T1010 «, t00=0x0005, t01=0x0158}
0x0936…0948              Head {h00=0x000e, h01=0x0050, text=» B T10140 «, t00=0x0005, t01=0x016c}
0x0948…0952              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x017e}
0x0952…096a              Head {h00=0x0014, h01=0x0050, text=»T1018   ADM KEY «, t00=0x0005, t01=0x0188}
0x096a…0998              Head {h00=0x002a, h01=0x0050, text=»*          ONLY CHANGE VOLUME, DATASET«, t00=0x0006, t01=0x0010}
0x0998…09ac              Head {h00=0x0010, h01=0x0050, text=» SET CSWFLAG«, t00=0x0006, t01=0x003e}
0x09ac…09bc              Head {h00=0x000c, h01=0x0050, text=» B T1025«, t00=0x0006, t01=0x0052}
0x09bc…09c6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0062}
0x09c6…09de              Head {h00=0x0014, h01=0x0050, text=»T1020   KVIT KEY«, t00=0x0006, t01=0x006c}
0x09de…09e8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0084}
0x09e8…0a06              Head {h00=0x001a, h01=0x0050, text=»*     RESTORE DATASETS«, t00=0x0006, t01=0x008e}
0x0a06…0a10              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00ac}
0x0a10…0a1a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00b6}
0x0a1a…0a30              Head {h00=0x0012, h01=0x0050, text=» CLEAR CSWFLAG«, t00=0x0006, t01=0x00c0}
0x0a30…0a3e              Head {h00=0x000a, h01=0x0050, text=»RST000«, t00=0x0006, t01=0x00d6}
0x0a3e…0a66              Head {h00=0x0024, h01=0x0050, text=» PERF LAMPOF,=W'2047' LAMPS OFF «, t00=0x0006, t01=0x00e4}
0x0a66…0a74              Head {h00=0x000a, h01=0x0050, text=»RST005«, t00=0x0006, t01=0x010c}
0x0a74…0a98              Head {h00=0x0020, h01=0x0050, text=» PERF LAMPON,=W'1024' LAMP 1«, t00=0x0006, t01=0x011a}
0x0a98…0abc              Head {h00=0x0020, h01=0x0050, text=» PERF LAMPON,=W'128' LAMP 4 «, t00=0x0006, t01=0x013e}
0x0abc…0ade              Head {h00=0x001e, h01=0x0050, text=» PERF LAMPON,=W'8' LAMP 8 «, t00=0x0006, t01=0x0162}
0x0ade…0aec              Head {h00=0x000a, h01=0x0050, text=»RST010«, t00=0x0006, t01=0x0184}
0x0aec…0b00 (7, 0, 400)  Head {h00=0x0010, h01=0x0050, text=» PERF SOPRD «, t00=0x0007, t01=0x0004}
0x0b00…0b18              Head {h00=0x0014, h01=0x0050, text=» IB GSWBIN2,  C «, t00=0x0007, t01=0x0018}
0x0b18…0b48              Head {h00=0x002c, h01=0x0050, text=»  RSOP10,RSOP09,RSOP08,RSOP07,RSOP06,  C«, t00=0x0007, t01=0x0030}
0x0b48…0b74              Head {h00=0x0028, h01=0x0050, text=»  RSOP05,RSOP04,RSOP03,RSOP02,RSOP01«, t00=0x0007, t01=0x0060}
0x0b74…0b82              Head {h00=0x000a, h01=0x0050, text=»RSOP02«, t00=0x0007, t01=0x008c}
0x0b82…0b90              Head {h00=0x000a, h01=0x0050, text=»RSOP03«, t00=0x0007, t01=0x009a}
0x0b90…0b9e              Head {h00=0x000a, h01=0x0050, text=»RSOP05«, t00=0x0007, t01=0x00a8}
0x0b9e…0bac              Head {h00=0x000a, h01=0x0050, text=»RSOP06«, t00=0x0007, t01=0x00b6}
0x0bac…0bba              Head {h00=0x000a, h01=0x0050, text=»RSOP07«, t00=0x0007, t01=0x00c4}
0x0bba…0bc8              Head {h00=0x000a, h01=0x0050, text=»RSOP09«, t00=0x0007, t01=0x00d2}
0x0bc8…0bd6              Head {h00=0x000a, h01=0x0050, text=»RSOP10«, t00=0x0007, t01=0x00e0}
0x0bd6…0bf4              Head {h00=0x001a, h01=0x0050, text=» B RST010 OTHER LAMPS «, t00=0x0007, t01=0x00ee}
0x0bf4…0bfe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x010c}
0x0bfe…0c20              Head {h00=0x001e, h01=0x0050, text=»RSOP01   RESTORE FD999001 «, t00=0x0007, t01=0x0116}
0x0c20…0c48              Head {h00=0x0024, h01=0x0050, text=» PERF LAMPOF,=W'2047' LAMPS OFF «, t00=0x0007, t01=0x0138}
0x0c48…0c6c              Head {h00=0x0020, h01=0x0050, text=» PERF LAMPON,=W'1024' LAMP 1«, t00=0x0007, t01=0x0160}
0x0c6c…0ca4              Head {h00=0x0034, h01=0x0050, text=» PERF RSTORE,DK01,=D'1',=W'32',CCONBUF0,=W'199' «, t00=0x0007, t01=0x0184}
0x0ca4…0cc0              Head {h00=0x0018, h01=0x0050, text=» BNOK RST005 NOT OK «, t00=0x0008, t01=0x002c}
0x0cc0…0cd4              Head {h00=0x0010, h01=0x0050, text=» PERF CONFRD«, t00=0x0008, t01=0x0048}
0x0cd4…0ce8              Head {h00=0x0010, h01=0x0050, text=» B RST000 OK«, t00=0x0008, t01=0x005c}
0x0ce8…0cf2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0070}
0x0cf2…0d14              Head {h00=0x001e, h01=0x0050, text=»RSOP04   RESTORE FD999004 «, t00=0x0008, t01=0x007a}
0x0d14…0d3c              Head {h00=0x0024, h01=0x0050, text=» PERF LAMPOF,=W'2047' LAMPS OFF «, t00=0x0008, t01=0x009c}
0x0d3c…0d60              Head {h00=0x0020, h01=0x0050, text=» PERF LAMPON,=W'128' LAMP 4 «, t00=0x0008, t01=0x00c4}
0x0d60…0d96              Head {h00=0x0032, h01=0x0050, text=» PERF RSTORE,DK04,=D'4',=W'30',CKTBUF,=W'128' «, t00=0x0008, t01=0x00e8}
0x0d96…0db2              Head {h00=0x0018, h01=0x0050, text=» BNOK RST005 NOT OK «, t00=0x0008, t01=0x011e}
0x0db2…0dd8              Head {h00=0x0022, h01=0x0050, text=» PERF SETMK INIT MASTER INDEX «, t00=0x0008, t01=0x013a}
0x0dd8…0dec              Head {h00=0x0010, h01=0x0050, text=» B RST000 OK«, t00=0x0008, t01=0x0160}
0x0dec…0df6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0174}
0x0df6…0e18              Head {h00=0x001e, h01=0x0050, text=»RSOP08   FINISH RESTORING «, t00=0x0008, t01=0x017e}
0x0e18…0e40              Head {h00=0x0024, h01=0x0050, text=» PERF LAMPOF,=W'2047' LAMPS OFF «, t00=0x0009, t01=0x0010}
0x0e40…0e6e              Head {h00=0x002a, h01=0x0050, text=» PERF ASGVOL,CBIN0 ASSIGN KONF DATASET«, t00=0x0009, t01=0x0038}
0x0e6e…0e82              Head {h00=0x0010, h01=0x0050, text=» BNOK T1010 «, t00=0x0009, t01=0x0066}
0x0e82…0e92              Head {h00=0x000c, h01=0x0050, text=» B T1028«, t00=0x0009, t01=0x007a}
0x0e92…0e9c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x008a}
0x0e9c…0ea6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0094}
0x0ea6…0eb0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x009e}
0x0eb0…0eba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00a8}
0x0eba…0ec4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00b2}
0x0ec4…0edc              Head {h00=0x0014, h01=0x0050, text=»T1025   SLUT KEY«, t00=0x0009, t01=0x00bc}
0x0edc…0efe              Head {h00=0x001e, h01=0x0050, text=» PERF CONFRD READ CONFDATA«, t00=0x0009, t01=0x00d4}
0x0efe…0f12              Head {h00=0x0010, h01=0x0050, text=» BNOK T1010 «, t00=0x0009, t01=0x00f6}
0x0f12…0f32              Head {h00=0x001c, h01=0x0050, text=» CBNE CVOLNO,=D'0',T1028«, t00=0x0009, t01=0x010a}
0x0f32…0f4c              Head {h00=0x0016, h01=0x0050, text=» MOVE CVOLNO,=D'0'«, t00=0x0009, t01=0x012a}
0x0f4c…0f5a              Head {h00=0x000a, h01=0x0050, text=»T1028 «, t00=0x0009, t01=0x0144}
0x0f5a…0f86              Head {h00=0x0028, h01=0x0050, text=» MOVE CFNAME(CBIN1),ASFNAME RESTORE «, t00=0x0009, t01=0x0152}
0x0f86…0fa6              Head {h00=0x001c, h01=0x0050, text=» MOVE CVOL(CBIN1),ASVOL «, t00=0x0009, t01=0x017e}
0x0fa6…0fc0              Head {h00=0x0016, h01=0x0050, text=» TBT CSWFLAG,T1030«, t00=0x000a, t01=0x000e}
0x0fc0…0ff0              Head {h00=0x002c, h01=0x0050, text=» CBG CKMDNR,=D'0',T1050 VERY FIRST START«, t00=0x000a, t01=0x0028}
0x0ff0…0ffa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0058}
0x0ffa…1004              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0062}
0x1004…100e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x006c}
0x100e…101c              Head {h00=0x000a, h01=0x0050, text=»T1030 «, t00=0x000a, t01=0x0076}
0x101c…1038              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN1 «, t00=0x000a, t01=0x0084}
0x1038…1046              Head {h00=0x000a, h01=0x0050, text=»T1031 «, t00=0x000a, t01=0x00a0}
0x1046…1070              Head {h00=0x0026, h01=0x0050, text=» DLETE CFNAME(GSWBIN1),CBIN0,CBIN2«, t00=0x000a, t01=0x00ae}
0x1070…108a              Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN1,CBIN1«, t00=0x000a, t01=0x00d8}
0x108a…10aa              Head {h00=0x001c, h01=0x0050, text=» CBL GSWBIN1,CBIN9,T1031«, t00=0x000a, t01=0x00f2}
0x10aa…10b8              Head {h00=0x000a, h01=0x0050, text=»T1033 «, t00=0x000a, t01=0x0112}
0x10b8…10ce              Head {h00=0x0012, h01=0x0050, text=» SET CCOLDFLG «, t00=0x000a, t01=0x0120}
0x10ce…10e4              Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x000a, t01=0x0136}
0x10e4…10fc              Head {h00=0x0014, h01=0x0050, text=» DSC0 KEYB,SKIB «, t00=0x000a, t01=0x014c}
0x10fc…1118              Head {h00=0x0018, h01=0x0050, text=» ATTFMT CSFRM02 YES «, t00=0x000a, t01=0x0164}
0x1118…112c              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x000a, t01=0x0180}
0x112c…1152 (11, 0, 400) Head {h00=0x0022, h01=0x0050, text=» IB SPBINW2,T1034,T1034,T1032 «, t00=0x000b, t01=0x0004}
0x1152…1160              Head {h00=0x000a, h01=0x0050, text=»T1034 «, t00=0x000b, t01=0x002a}
0x1160…1170              Head {h00=0x000c, h01=0x0050, text=» B T1033«, t00=0x000b, t01=0x0038}
0x1170…117e              Head {h00=0x000a, h01=0x0050, text=»T1032 «, t00=0x000b, t01=0x0048}
0x117e…11b2              Head {h00=0x0030, h01=0x0050, text=» MOVE GTTEXT,=C'FD' INSERT PREFIX IN DSNAME «, t00=0x000b, t01=0x0056}
0x11b2…11ce              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN1 «, t00=0x000b, t01=0x008a}
0x11ce…11dc              Head {h00=0x000a, h01=0x0050, text=»T1035 «, t00=0x000b, t01=0x00a6}
0x11dc…1214              Head {h00=0x0034, h01=0x0050, text=» INSRT CFNAME(GSWBIN1),CBIN0,CBIN2,GTTEXT,CBIN0 «, t00=0x000b, t01=0x00b4}
0x1214…122e              Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN1,CBIN1«, t00=0x000b, t01=0x00ec}
0x122e…124e              Head {h00=0x001c, h01=0x0050, text=» CBL GSWBIN1,CBIN9,T1035«, t00=0x000b, t01=0x0106}
0x124e…1268              Head {h00=0x0016, h01=0x0050, text=» TBT CSWFLAG,T1020«, t00=0x000b, t01=0x0126}
0x1268…1276              Head {h00=0x000a, h01=0x0050, text=»T1037 «, t00=0x000b, t01=0x0140}
0x1276…129c              Head {h00=0x0022, h01=0x0050, text=» MOVE CBEH(CBIN1,CBIN1),CBIN0 «, t00=0x000b, t01=0x014e}
0x129c…12c2              Head {h00=0x0022, h01=0x0050, text=» MOVE CTR12(CBIN1,CBIN1),CBIN0«, t00=0x000b, t01=0x0174}
0x12c2…12de              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN5,CBIN0 «, t00=0x000c, t01=0x000a}
0x12de…12ec              Head {h00=0x000a, h01=0x0050, text=»T1040 «, t00=0x000c, t01=0x0026}
0x12ec…1306              Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN5,CBIN1«, t00=0x000c, t01=0x0034}
0x1306…132a              Head {h00=0x0020, h01=0x0050, text=» CBG GSWBIN5,CMAXTASK,T1045 «, t00=0x000c, t01=0x004e}
0x132a…1348              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD5,GSWBIN5 «, t00=0x000c, t01=0x0072}
0x1348…1366              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GSWBIN5 «, t00=0x000c, t01=0x0090}
0x1366…137e              Head {h00=0x0014, h01=0x0050, text=» DSC0 KEYB,SKIB «, t00=0x000c, t01=0x00ae}
0x137e…1394              Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x000c, t01=0x00c6}
0x1394…13ac              Head {h00=0x0014, h01=0x0050, text=» USE TB2,GSWBIN5«, t00=0x000c, t01=0x00dc}
0x13ac…13c4              Head {h00=0x0014, h01=0x0050, text=» ATTFMT CSFRM03 «, t00=0x000c, t01=0x00f4}
0x13c4…13f4              Head {h00=0x002c, h01=0x0050, text=» PERF SPCLRA SET TR 12 AND BEH COUNTERS «, t00=0x000c, t01=0x010c}
0x13f4…141a              Head {h00=0x0022, h01=0x0050, text=» IB SPBINW2,T1042,T1042,T1043 «, t00=0x000c, t01=0x013c}
0x141a…1428              Head {h00=0x000a, h01=0x0050, text=»T1042 «, t00=0x000c, t01=0x0162}
0x1428…1438              Head {h00=0x000c, h01=0x0050, text=» B T1037«, t00=0x000c, t01=0x0170}
0x1438…1446              Head {h00=0x000a, h01=0x0050, text=»T1043 «, t00=0x000c, t01=0x0180}
0x1446…1472              Head {h00=0x0028, h01=0x0050, text=» MUL TTSTLBNR,=D'-1' SIMULATE CLOSE «, t00=0x000c, t01=0x018e}
0x1472…148e              Head {h00=0x0018, h01=0x0050, text=» PERF TCONFW,GSWBIN5«, t00=0x000d, t01=0x002a}
0x148e…14a2              Head {h00=0x0010, h01=0x0050, text=» BNOK T1037 «, t00=0x000d, t01=0x0046}
0x14a2…14b2              Head {h00=0x000c, h01=0x0050, text=» B T1040«, t00=0x000d, t01=0x005a}
0x14b2…14c0              Head {h00=0x000a, h01=0x0050, text=»T1045 «, t00=0x000d, t01=0x006a}
0x14c0…14d8              Head {h00=0x0014, h01=0x0050, text=» USE TB2,TTASKNR«, t00=0x000d, t01=0x0078}
0x14d8…14fe              Head {h00=0x0022, h01=0x0050, text=» PERF CONFWR REWRITE CONFDATA «, t00=0x000d, t01=0x0090}
0x14fe…1512              Head {h00=0x0010, h01=0x0050, text=» BNOK T1010 «, t00=0x000d, t01=0x00b6}
0x1512…151c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00ca}
0x151c…1542              Head {h00=0x0022, h01=0x0050, text=»*          READ TERMINAL CONF «, t00=0x000d, t01=0x00d4}
0x1542…1550              Head {h00=0x000a, h01=0x0050, text=»T1050 «, t00=0x000d, t01=0x00fa}
0x1550…156e              Head {h00=0x001a, h01=0x0050, text=» MOVE CTWBIN2,CMAXTASK«, t00=0x000d, t01=0x0108}
0x156e…158a              Head {h00=0x0018, h01=0x0050, text=» MOVE CTASKNR,CBIN0 «, t00=0x000d, t01=0x0126}
0x158a…15a6              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN5,CBIN0 «, t00=0x000d, t01=0x0142}
0x15a6…15b4              Head {h00=0x000a, h01=0x0050, text=»T1052 «, t00=0x000d, t01=0x015e}
0x15b4…15ce              Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN5,CBIN1«, t00=0x000d, t01=0x016c}
0x15ce…15f2              Head {h00=0x0020, h01=0x0050, text=» CBG GSWBIN5,CMAXTASK,T1060 «, t00=0x000d, t01=0x0186}
0x15f2…161a              Head {h00=0x0024, h01=0x0050, text=» CBNL CMASK(GSWBIN5),=D'0',T1055«, t00=0x000e, t01=0x001a}
0x161a…1650              Head {h00=0x0032, h01=0x0050, text=» MUL CMASK(GSWBIN5),=D'-1' SET POSITIVE (OPEN)«, t00=0x000e, t01=0x0042}
0x1650…165e              Head {h00=0x000a, h01=0x0050, text=»T1055 «, t00=0x000e, t01=0x0078}
0x165e…167c              Head {h00=0x001a, h01=0x0050, text=»   GET TERMINAL BLOCK «, t00=0x000e, t01=0x0086}
0x167c…1694              Head {h00=0x0014, h01=0x0050, text=» USE TB2,GSWBIN5«, t00=0x000e, t01=0x00a4}
0x1694…16c4              Head {h00=0x002c, h01=0x0050, text=» PERF TCONFR,GSWBIN5 READ TERMINAL CONF «, t00=0x000e, t01=0x00bc}
0x16c4…16d6              Head {h00=0x000e, h01=0x0050, text=» BOK T1052«, t00=0x000e, t01=0x00ec}
0x16d6…16f6              Head {h00=0x001c, h01=0x0050, text=» USE TB2,TTASKNR NOT OK «, t00=0x000e, t01=0x00fe}
0x16f6…1706              Head {h00=0x000c, h01=0x0050, text=» B T1010«, t00=0x000e, t01=0x011e}
0x1706…1710              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x012e}
0x1710…173a              Head {h00=0x0026, h01=0x0050, text=»*          CONF DATA HAS BEEN READ«, t00=0x000e, t01=0x0138}
0x173a…1744              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0162}
0x1744…1752              Head {h00=0x000a, h01=0x0050, text=»T1060 «, t00=0x000e, t01=0x016c}
0x1752…177e              Head {h00=0x0028, h01=0x0050, text=» USE TB2,TTASKNR GET OWN USER BLOCK «, t00=0x000e, t01=0x017a}
0x177e…17b6              Head {h00=0x0034, h01=0x0050, text=» MOVE GTMSK,CMASK(CBIN1) SET MACNINE NO, MASTER «, t00=0x000f, t01=0x0016}
0x17b6…17c0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x004e}
0x17c0…17e2              Head {h00=0x001e, h01=0x0050, text=»*          CHECK VOLUME NO«, t00=0x000f, t01=0x0058}
0x17e2…17ec              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x007a}
0x17ec…17fa              Head {h00=0x000a, h01=0x0050, text=»T1062 «, t00=0x000f, t01=0x0084}
0x17fa…1814              Head {h00=0x0016, h01=0x0050, text=» PERF CLSVOL,CBIN2«, t00=0x000f, t01=0x0092}
0x1814…182e              Head {h00=0x0016, h01=0x0050, text=» PERF CLSVOL,CBIN3«, t00=0x000f, t01=0x00ac}
0x182e…1848              Head {h00=0x0016, h01=0x0050, text=» PERF CLSVOL,CBIN4«, t00=0x000f, t01=0x00c6}
0x1848…1860              Head {h00=0x0014, h01=0x0050, text=» DSC0 KEYB,SKIB «, t00=0x000f, t01=0x00e0}
0x1860…1876              Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x000f, t01=0x00f8}
0x1876…188e              Head {h00=0x0014, h01=0x0050, text=» ATTFMT INIT1FMT«, t00=0x000f, t01=0x010e}
0x188e…18a2              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x000f, t01=0x0126}
0x18a2…18c8              Head {h00=0x0022, h01=0x0050, text=» IB SPBINW2,T1065,T1065,T1070 «, t00=0x000f, t01=0x013a}
0x18c8…18e4              Head {h00=0x0018, h01=0x0050, text=» B T1062 OTHER KEYS «, t00=0x000f, t01=0x0160}
0x18e4…18f8              Head {h00=0x0010, h01=0x0050, text=»T1065   MAK «, t00=0x000f, t01=0x017c}
0x18f8…1908              Head {h00=0x000c, h01=0x0050, text=» B T1010«, t00=0x000f, t01=0x0190}
0x1908…1924              Head {h00=0x0018, h01=0x0050, text=»T1070   SLUT KEY, OK«, t00=0x0010, t01=0x0010}
0x1924…192e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x002c}
0x192e…1938              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0036}
0x1938…195e              Head {h00=0x0022, h01=0x0050, text=»*          ASSIGN OTHER FILES «, t00=0x0010, t01=0x0040}
0x195e…1968              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0066}
0x1968…1972              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0070}
0x1972…198e              Head {h00=0x0018, h01=0x0050, text=» MOVE GTWBCD1,=D'2' «, t00=0x0010, t01=0x007a}
0x198e…19a8              Head {h00=0x0016, h01=0x0050, text=» MOVE GTTEXT,=C' '«, t00=0x0010, t01=0x0096}
0x19a8…19c2              Head {h00=0x0016, h01=0x0050, text=» PERF ASGVOL,CBIN1«, t00=0x0010, t01=0x00b0}
0x19c2…19d6              Head {h00=0x0010, h01=0x0050, text=» BNOK T1010 «, t00=0x0010, t01=0x00ca}
0x19d6…19f0              Head {h00=0x0016, h01=0x0050, text=» PERF ASGFIL,CBIN2«, t00=0x0010, t01=0x00de}
0x19f0…1a04              Head {h00=0x0010, h01=0x0050, text=» BNOK T1010 «, t00=0x0010, t01=0x00f8}
0x1a04…1a0e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x010c}
0x1a0e…1a18              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0116}
0x1a18…1a48              Head {h00=0x002c, h01=0x0050, text=»*          CHECK IF DISKETTE IS CORRECT «, t00=0x0010, t01=0x0120}
0x1a48…1a52              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0150}
0x1a52…1a5c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x015a}
0x1a5c…1a88              Head {h00=0x0028, h01=0x0050, text=» PERF SETMK SET MASTER INDEX, KTPLAN«, t00=0x0010, t01=0x0164}
0x1a88…1a96              Head {h00=0x000a, h01=0x0050, text=»T1200 «, t00=0x0010, t01=0x0190}
0x1a96…1ab0              Head {h00=0x0016, h01=0x0050, text=» MOVE CRECNR,CBIN1«, t00=0x0011, t01=0x000e}
0x1ab0…1acc              Head {h00=0x0018, h01=0x0050, text=» MOVE CRECBCD,=D'1' «, t00=0x0011, t01=0x0028}
0x1acc…1aea              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,=W'128' «, t00=0x0011, t01=0x0044}
0x1aea…1b20              Head {h00=0x0032, h01=0x0050, text=» PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,CRECNR«, t00=0x0011, t01=0x0062}
0x1b20…1b34              Head {h00=0x0010, h01=0x0050, text=» BNOK T1062 «, t00=0x0011, t01=0x0098}
0x1b34…1b50              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD3,CVOLNO«, t00=0x0011, t01=0x00ac}
0x1b50…1b78              Head {h00=0x0024, h01=0x0050, text=» CBE GTWBCD1,=D'4',T1210 NO DATA«, t00=0x0011, t01=0x00c8}
0x1b78…1bb0              Head {h00=0x0034, h01=0x0050, text=» PERF WRITID,CPCKBUF,CBIN1,CBIN1 PRINT 1. RECORD«, t00=0x0011, t01=0x00f0}
0x1bb0…1bce              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR20,=X'00' «, t00=0x0011, t01=0x0128}
0x1bce…1bea              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN0 «, t00=0x0011, t01=0x0146}
0x1bea…1c06              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,=W'47'«, t00=0x0011, t01=0x0162}
0x1c06…1c3a              Head {h00=0x0030, h01=0x0050, text=» COPY GSWSTR20,GSWBIN1,CBIN5,CPCKBUF,GSWBIN2«, t00=0x0011, t01=0x017e}
0x1c3a…1c72              Head {h00=0x0034, h01=0x0050, text=» MOVE GSWBCD3,GSWSTR20 GET VOLUME NO FROM START «, t00=0x0012, t01=0x0022}
0x1c72…1c9e              Head {h00=0x0028, h01=0x0050, text=» TBT CCONVERT,T1219 CONVERT-VERSION «, t00=0x0012, t01=0x005a}
0x1c9e…1cc0              Head {h00=0x001e, h01=0x0050, text=» CBE CVOLNO,GSWBCD3,T1230 «, t00=0x0012, t01=0x0086}
0x1cc0…1cde              Head {h00=0x001a, h01=0x0050, text=»T1210   NOT EQUAL NOS.«, t00=0x0012, t01=0x00a8}
0x1cde…1cf4              Head {h00=0x0012, h01=0x0050, text=»   OR NO DATA «, t00=0x0012, t01=0x00c6}
0x1cf4…1d20              Head {h00=0x0028, h01=0x0050, text=» TBT CCONVERT,T1219 CONVERT-VERSION «, t00=0x0012, t01=0x00dc}
0x1d20…1d38              Head {h00=0x0014, h01=0x0050, text=» DSC0 KEYB,SKIB «, t00=0x0012, t01=0x0108}
0x1d38…1d4e              Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0012, t01=0x0120}
0x1d4e…1d66              Head {h00=0x0014, h01=0x0050, text=» ATTFMT INIT2FMT«, t00=0x0012, t01=0x0136}
0x1d66…1d7a              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0012, t01=0x014e}
0x1d7a…1daa              Head {h00=0x002c, h01=0x0050, text=» IB SPBINW2,T1215,T1215,T1220,T1212,  C «, t00=0x0012, t01=0x0162}
0x1daa…1dd2 (19, 0, 400) Head {h00=0x0024, h01=0x0050, text=»  T1212,T1212,T1212,T1212,T1225 «, t00=0x0013, t01=0x0004}
0x1dd2…1dec              Head {h00=0x0016, h01=0x0050, text=»T1212   OTHER KEYS«, t00=0x0013, t01=0x002c}
0x1dec…1dfc              Head {h00=0x000c, h01=0x0050, text=» B T1210«, t00=0x0013, t01=0x0046}
0x1dfc…1e10              Head {h00=0x0010, h01=0x0050, text=»T1215   MAK «, t00=0x0013, t01=0x0056}
0x1e10…1e20              Head {h00=0x000c, h01=0x0050, text=» B T1062«, t00=0x0013, t01=0x006a}
0x1e20…1e2a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x007a}
0x1e2a…1e4a              Head {h00=0x001c, h01=0x0050, text=»T1219   CONVERT-VERSION «, t00=0x0013, t01=0x0084}
0x1e4a…1e60              Head {h00=0x0012, h01=0x0050, text=»   NO OPSTART «, t00=0x0013, t01=0x00a4}
0x1e60…1e7a              Head {h00=0x0016, h01=0x0050, text=»   DIRECTLY TO ADM«, t00=0x0013, t01=0x00ba}
0x1e7a…1e8a              Head {h00=0x000c, h01=0x0050, text=» B T1560«, t00=0x0013, t01=0x00d4}
0x1e8a…1e94              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00e4}
0x1e94…1eac              Head {h00=0x0014, h01=0x0050, text=»T1220   SLUT, OK«, t00=0x0013, t01=0x00ee}
0x1eac…1ed4              Head {h00=0x0024, h01=0x0050, text=» CBE GTWBCD1,=D'4',T1210 NO DATA«, t00=0x0013, t01=0x0106}
0x1ed4…1efc              Head {h00=0x0024, h01=0x0050, text=» MOVE CVOLNO,GSWBCD3 NEW VOL NO «, t00=0x0013, t01=0x012e}
0x1efc…1f18              Head {h00=0x0018, h01=0x0050, text=» B T1240 TO OPSTART «, t00=0x0013, t01=0x0156}
0x1f18…1f22              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0172}
0x1f22…1f36              Head {h00=0x0010, h01=0x0050, text=»T1225   KVIT«, t00=0x0013, t01=0x017c}
0x1f36…1f5c              Head {h00=0x0022, h01=0x0050, text=» PERF STRTWR NEW START RECORD «, t00=0x0013, t01=0x0190}
0x1f5c…1f70              Head {h00=0x0010, h01=0x0050, text=» BNOK T1010 «, t00=0x0014, t01=0x0026}
0x1f70…1f98              Head {h00=0x0024, h01=0x0050, text=» PERF WRITID,CPCKBUF,CBIN1,CBIN1«, t00=0x0014, t01=0x003a}
0x1f98…1fb4              Head {h00=0x0018, h01=0x0050, text=» B T1240 TO OPSTART «, t00=0x0014, t01=0x0062}
0x1fb4…1fbe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x007e}
0x1fbe…1fc8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0088}
0x1fc8…1fe6              Head {h00=0x001a, h01=0x0050, text=»T1230   EQUAL VOL NOS.«, t00=0x0014, t01=0x0092}
0x1fe6…1ffe              Head {h00=0x0014, h01=0x0050, text=» DSC0 KEYB,SKIB «, t00=0x0014, t01=0x00b0}
0x1ffe…2014              Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0014, t01=0x00c8}
0x2014…202c              Head {h00=0x0014, h01=0x0050, text=» ATTFMT INIT3FMT«, t00=0x0014, t01=0x00de}
0x202c…2040              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0014, t01=0x00f6}
0x2040…2066              Head {h00=0x0022, h01=0x0050, text=» IB SPBINW2,T1235,T1235,T1240 «, t00=0x0014, t01=0x010a}
0x2066…2082              Head {h00=0x0018, h01=0x0050, text=» B T1230 OTHER KEYS «, t00=0x0014, t01=0x0130}
0x2082…2096              Head {h00=0x0010, h01=0x0050, text=»T1235   MAK «, t00=0x0014, t01=0x014c}
0x2096…20a6              Head {h00=0x000c, h01=0x0050, text=» B T1062«, t00=0x0014, t01=0x0160}
0x20a6…20b0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0170}
0x20b0…20ba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x017a}
0x20ba…20c4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0184}
0x20c4…20de              Head {h00=0x0016, h01=0x0050, text=»*          OPSTART«, t00=0x0014, t01=0x018e}
0x20de…20e8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0018}
0x20e8…20f2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0022}
0x20f2…2100              Head {h00=0x000a, h01=0x0050, text=»T1240 «, t00=0x0015, t01=0x002c}
0x2100…211c              Head {h00=0x0018, h01=0x0050, text=» MOVE CRECBCD,=D'0' «, t00=0x0015, t01=0x003a}
0x211c…2136              Head {h00=0x0016, h01=0x0050, text=» MOVE CRECNR,CBIN1«, t00=0x0015, t01=0x0056}
0x2136…214e              Head {h00=0x0014, h01=0x0050, text=» CLEAR CERRORFL «, t00=0x0015, t01=0x0070}
0x214e…215c              Head {h00=0x000a, h01=0x0050, text=»T1242 «, t00=0x0015, t01=0x0088}
0x215c…2178              Head {h00=0x0018, h01=0x0050, text=» MOVE GTWBCD2,CRECNR«, t00=0x0015, t01=0x0096}
0x2178…219a              Head {h00=0x001e, h01=0x0050, text=» PERF SPLIN8,CBIN10,CBIN3 «, t00=0x0015, t01=0x00b2}
0x219a…21b4              Head {h00=0x0016, h01=0x0050, text=» ADD CRECNR,CBIN1 «, t00=0x0015, t01=0x00d4}
0x21b4…21e2              Head {h00=0x002a, h01=0x0050, text=» MOVE GSWBIN1,=W'128' READ NEXT RECORD«, t00=0x0015, t01=0x00ee}
0x21e2…2218              Head {h00=0x0032, h01=0x0050, text=» PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,CRECNR«, t00=0x0015, t01=0x011c}
0x2218…2232              Head {h00=0x0016, h01=0x0050, text=» BNOK T1300 NOT OK«, t00=0x0015, t01=0x0152}
0x2232…2250              Head {h00=0x001a, h01=0x0050, text=»   IF FLAG: TO REPRINT«, t00=0x0015, t01=0x016c}
0x2250…226c              Head {h00=0x0018, h01=0x0050, text=» TBT CERRORFL,T1300 «, t00=0x0015, t01=0x018a}
0x226c…2286              Head {h00=0x0016, h01=0x0050, text=» CMP GTWBCD1,=D'4'«, t00=0x0016, t01=0x0016}
0x2286…22ae              Head {h00=0x0024, h01=0x0050, text=» BE T1500 NO DATA, CONTINUE REG.«, t00=0x0016, t01=0x0030}
0x22ae…22ce              Head {h00=0x001c, h01=0x0050, text=» MOVE GSWSTR20,=C'SLUTD'«, t00=0x0016, t01=0x0058}
0x22ce…22ea              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN5,CBIN0 «, t00=0x0016, t01=0x0078}
0x22ea…2324              Head {h00=0x0036, h01=0x0050, text=» MATCH GSWSTR20,GSWBIN5,CBIN5,CPCKBUF,CBIN0,CBIN5 «, t00=0x0016, t01=0x0094}
0x2324…233c              Head {h00=0x0014, h01=0x0050, text=» BE T1350 SLUTD «, t00=0x0016, t01=0x00ce}
0x233c…235a              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR20,=X'00' «, t00=0x0016, t01=0x00e6}
0x235a…238a              Head {h00=0x002c, h01=0x0050, text=» COPY GSWSTR20,CBIN0,CBIN3,CPCKBUF,CBIN0«, t00=0x0016, t01=0x0104}
0x238a…23b8              Head {h00=0x002a, h01=0x0050, text=» MOVE GSWBCD5,GSWSTR20 GET MACHINE NO.«, t00=0x0016, t01=0x0134}
0x23b8…23d4              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN6,CBIN0 «, t00=0x0016, t01=0x0162}
0x23d4…23e2              Head {h00=0x000a, h01=0x0050, text=»T1245 «, t00=0x0016, t01=0x017e}
0x23e2…23fc              Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN6,CBIN1«, t00=0x0016, t01=0x018c}
0x23fc…2426              Head {h00=0x0026, h01=0x0050, text=» CBE GSWBCD5,CMASK(GSWBIN6),T1247 «, t00=0x0017, t01=0x0016}
0x2426…2448              Head {h00=0x001e, h01=0x0050, text=» CBL GSWBIN6,CBIN12,T1245 «, t00=0x0017, t01=0x0040}
0x2448…2458              Head {h00=0x000c, h01=0x0050, text=» B T1242«, t00=0x0017, t01=0x0062}
0x2458…2466              Head {h00=0x000a, h01=0x0050, text=»T1247 «, t00=0x0017, t01=0x0072}
0x2466…249e              Head {h00=0x0034, h01=0x0050, text=» CBE GSWBCD5,=D'0',T1250 CHECK WRONG MACHINE NO.«, t00=0x0017, t01=0x0080}
0x249e…24c8              Head {h00=0x0026, h01=0x0050, text=» CBE GSWBIN6,CBIN1,T1250 IF MASTER«, t00=0x0017, t01=0x00b8}
0x24c8…24fc              Head {h00=0x0030, h01=0x0050, text=» RSTRT CTID(GSWBIN6) NO, START RELEVANT TASK«, t00=0x0017, t01=0x00e2}
0x24fc…250a              Head {h00=0x000a, h01=0x0050, text=» PAUSE«, t00=0x0017, t01=0x0116}
0x250a…251a              Head {h00=0x000c, h01=0x0050, text=» B T1242«, t00=0x0017, t01=0x0124}
0x251a…2528              Head {h00=0x000a, h01=0x0050, text=»T1250 «, t00=0x0017, t01=0x0134}
0x2528…2558              Head {h00=0x002c, h01=0x0050, text=» PERF RGREAD,DK02,=D'2' READ TRANSACTION«, t00=0x0017, t01=0x0142}
0x2558…256c              Head {h00=0x0010, h01=0x0050, text=» BERR T1290 «, t00=0x0017, t01=0x0172}
0x256c…259c              Head {h00=0x002c, h01=0x0050, text=» MOVE CRECBCD,GSWBCD3 GET LOG. REC. NO. «, t00=0x0017, t01=0x0186}
0x259c…25b6              Head {h00=0x0016, h01=0x0050, text=» BOK T1251 TR 1-10«, t00=0x0018, t01=0x0026}
0x25b6…25e0              Head {h00=0x0026, h01=0x0050, text=» TBT GTSWFLAG,T1251 TEST FOR TR 11«, t00=0x0018, t01=0x0040}
0x25e0…25f8              Head {h00=0x0014, h01=0x0050, text=» B T1290 TR >=12«, t00=0x0018, t01=0x006a}
0x25f8…2606              Head {h00=0x000a, h01=0x0050, text=»T1251 «, t00=0x0018, t01=0x0082}
0x2606…263a              Head {h00=0x0030, h01=0x0050, text=» CBL CRECBCD,TTRECOPN,T1290 BEFORE REWRITE? «, t00=0x0018, t01=0x0090}
0x263a…265e              Head {h00=0x0020, h01=0x0050, text=» TBT GTSWFLAG,T1270 IF TR 11«, t00=0x0018, t01=0x00c4}
0x265e…2686              Head {h00=0x0024, h01=0x0050, text=» CBG TTSTLBNR,=D'0',T1260 OPEN? «, t00=0x0018, t01=0x00e8}
0x2686…26ba              Head {h00=0x0030, h01=0x0050, text=» MUL TTSTLBNR,=D'-1' NO, SET POSITIVE (OPEN)«, t00=0x0018, t01=0x0110}
0x26ba…26d8              Head {h00=0x001a, h01=0x0050, text=» MOVE TTCASH,TTSTCASH «, t00=0x0018, t01=0x0144}
0x26d8…26f6              Head {h00=0x001a, h01=0x0050, text=» MOVE TTRECOPN,CRECBCD«, t00=0x0018, t01=0x0162}
0x26f6…2712              Head {h00=0x0018, h01=0x0050, text=» PERF TCONFW,TTASKNR«, t00=0x0018, t01=0x0180}
0x2712…2726              Head {h00=0x0010, h01=0x0050, text=» PERF CONFWR«, t00=0x0019, t01=0x000c}
0x2726…2734              Head {h00=0x000a, h01=0x0050, text=»T1260 «, t00=0x0019, t01=0x0020}
0x2734…274c              Head {h00=0x0014, h01=0x0050, text=» CLEAR GTTESTFL «, t00=0x0019, t01=0x002e}
0x274c…2770              Head {h00=0x0020, h01=0x0050, text=» CBNL CRECBCD,CCONFREC,T1262«, t00=0x0019, t01=0x0046}
0x2770…279a              Head {h00=0x0026, h01=0x0050, text=» SET GTTESTFL BEFORE BEH., REWRITE«, t00=0x0019, t01=0x006a}
0x279a…27a8              Head {h00=0x000a, h01=0x0050, text=»T1262 «, t00=0x0019, t01=0x0094}
0x27a8…27bc              Head {h00=0x0010, h01=0x0050, text=» PERF UPDAKK«, t00=0x0019, t01=0x00a2}
0x27bc…27d4              Head {h00=0x0014, h01=0x0050, text=» CLEAR GTTESTFL «, t00=0x0019, t01=0x00b6}
0x27d4…27e4              Head {h00=0x000c, h01=0x0050, text=» B T1290«, t00=0x0019, t01=0x00ce}
0x27e4…27ee              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00de}
0x27ee…27f8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00e8}
0x27f8…2802              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00f2}
0x2802…2810              Head {h00=0x000a, h01=0x0050, text=»T1270 «, t00=0x0019, t01=0x00fc}
0x2810…2820              Head {h00=0x000c, h01=0x0050, text=»   TR 11«, t00=0x0019, t01=0x010a}
0x2820…284a              Head {h00=0x0026, h01=0x0050, text=» CBNG TTSTLBNR,=D'0',T1290 CLOSED?«, t00=0x0019, t01=0x011a}
0x284a…2858              Head {h00=0x000a, h01=0x0050, text=»   NO «, t00=0x0019, t01=0x0144}
0x2858…2876              Head {h00=0x001a, h01=0x0050, text=» MOVE TTSTCASH,TTCASH «, t00=0x0019, t01=0x0152}
0x2876…2894              Head {h00=0x001a, h01=0x0050, text=» MOVE TTSTLBNR,TTLBNR «, t00=0x0019, t01=0x0170}
0x2894…28b0              Head {h00=0x0018, h01=0x0050, text=» ADD TTSTLBNR,=D'1' «, t00=0x0019, t01=0x018e}
0x28b0…28cc              Head {h00=0x0018, h01=0x0050, text=» MUL TTSTLBNR,=D'-1'«, t00=0x001a, t01=0x001a}
0x28cc…28ea              Head {h00=0x001a, h01=0x0050, text=» MOVE TTRECOPN,CRECBCD«, t00=0x001a, t01=0x0036}
0x28ea…2906              Head {h00=0x0018, h01=0x0050, text=» PERF TCONFW,TTASKNR«, t00=0x001a, t01=0x0054}
0x2906…291a              Head {h00=0x0010, h01=0x0050, text=» PERF CONFWR«, t00=0x001a, t01=0x0070}
0x291a…292c              Head {h00=0x000e, h01=0x0050, text=» PERF ZERO«, t00=0x001a, t01=0x0084}
0x292c…293a              Head {h00=0x000a, h01=0x0050, text=»T1290 «, t00=0x001a, t01=0x0096}
0x293a…295c              Head {h00=0x001e, h01=0x0050, text=» TBT GTMASTFL,T1242 MASTER«, t00=0x001a, t01=0x00a4}
0x295c…2978              Head {h00=0x0018, h01=0x0050, text=» B T1450 NON-MASTER «, t00=0x001a, t01=0x00c6}
0x2978…2982              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00e2}
0x2982…298c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00ec}
0x298c…2996              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00f6}
0x2996…29a0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0100}
0x29a0…29ae              Head {h00=0x000a, h01=0x0050, text=»T1300 «, t00=0x001a, t01=0x010a}
0x29ae…29e8              Head {h00=0x0036, h01=0x0050, text=» PERF WRITID,CPCKBUF,CBIN4,CBIN2 PRINT 1. PART OF «, t00=0x001a, t01=0x0118}
0x29e8…2a06              Head {h00=0x001a, h01=0x0050, text=»   LAST CORRECT RECORD«, t00=0x001a, t01=0x0152}
0x2a06…2a1c              Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x001a, t01=0x0170}
0x2a1c…2a34              Head {h00=0x0014, h01=0x0050, text=» ATTFMT INIT4FMT«, t00=0x001a, t01=0x0186}
0x2a34…2a48              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x001b, t01=0x000e}
0x2a48…2a7e              Head {h00=0x0032, h01=0x0050, text=» IB SPBINW2,T1310,T1310,T1315,T1320,T1310,  C «, t00=0x001b, t01=0x0022}
0x2a7e…2aa0              Head {h00=0x001e, h01=0x0050, text=»  T1310,T1310,T1310,T1330 «, t00=0x001b, t01=0x0058}
0x2aa0…2ab0              Head {h00=0x000c, h01=0x0050, text=» B T1300«, t00=0x001b, t01=0x007a}
0x2ab0…2ac4              Head {h00=0x0010, h01=0x0050, text=»T1310   MAK «, t00=0x001b, t01=0x008a}
0x2ac4…2ad4              Head {h00=0x000c, h01=0x0050, text=» B T1300«, t00=0x001b, t01=0x009e}
0x2ad4…2ade              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00ae}
0x2ade…2afc              Head {h00=0x001a, h01=0x0050, text=»T1315   SLUT, CONTINUE«, t00=0x001b, t01=0x00b8}
0x2afc…2b20              Head {h00=0x0020, h01=0x0050, text=» SUB CRECNR,CBIN1 READ AGAIN«, t00=0x001b, t01=0x00d6}
0x2b20…2b38              Head {h00=0x0014, h01=0x0050, text=» CLEAR CERRORFL «, t00=0x001b, t01=0x00fa}
0x2b38…2b48              Head {h00=0x000c, h01=0x0050, text=» B T1242«, t00=0x001b, t01=0x0112}
0x2b48…2b52              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0122}
0x2b52…2b70              Head {h00=0x001a, h01=0x0050, text=»T1320   KRE, TRY NEXT «, t00=0x001b, t01=0x012c}
0x2b70…2b86              Head {h00=0x0012, h01=0x0050, text=» SET CERRORFL «, t00=0x001b, t01=0x014a}
0x2b86…2b96              Head {h00=0x000c, h01=0x0050, text=» B T1242«, t00=0x001b, t01=0x0160}
0x2b96…2ba0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0170}
0x2ba0…2bbc              Head {h00=0x0018, h01=0x0050, text=»T1330   TO NEW DISK «, t00=0x001b, t01=0x017a}
0x2bbc…2bd4              Head {h00=0x0014, h01=0x0050, text=» CLEAR CERRORFL «, t00=0x001c, t01=0x0008}
0x2bd4…2be4              Head {h00=0x000c, h01=0x0050, text=» B T1350«, t00=0x001c, t01=0x0020}
0x2be4…2bfa              Head {h00=0x0012, h01=0x0050, text=»T1350   SLUTD «, t00=0x001c, t01=0x0030}
0x2bfa…2c04              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0046}
0x2c04…2c0e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0050}
0x2c0e…2c18              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x005a}
0x2c18…2c3a              Head {h00=0x001e, h01=0x0050, text=»*          DISKETTE SKIFT «, t00=0x001c, t01=0x0064}
0x2c3a…2c44              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0086}
0x2c44…2c4e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0090}
0x2c4e…2c68              Head {h00=0x0016, h01=0x0050, text=» TBT C5MDISK,T1500«, t00=0x001c, t01=0x009a}
0x2c68…2c7e              Head {h00=0x0012, h01=0x0050, text=» SET CSKIFTFL «, t00=0x001c, t01=0x00b4}
0x2c7e…2c92              Head {h00=0x0010, h01=0x0050, text=» PERF SKIFT «, t00=0x001c, t01=0x00ca}
0x2c92…2ca2              Head {h00=0x000c, h01=0x0050, text=» B T1200«, t00=0x001c, t01=0x00de}
0x2ca2…2cb0              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001c, t01=0x00ee}
0x2cb0…2cbe              Head {h00=0x000a, h01=0x0050, text=»T1400 «, t00=0x001c, t01=0x00fc}
0x2cbe…2cda              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x001c, t01=0x010a}
0x2cda…2ce4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0126}
0x2ce4…2d02              Head {h00=0x001a, h01=0x0050, text=»*          RESTART OF «, t00=0x001c, t01=0x0130}
0x2d02…2d24              Head {h00=0x001e, h01=0x0050, text=»*          FOR NON-MASTER «, t00=0x001c, t01=0x014e}
0x2d24…2d2e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0170}
0x2d2e…2d4a              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x001c, t01=0x017a}
0x2d4a…2d6c              Head {h00=0x001e, h01=0x0050, text=» MOVE GTMSK,CMASK(TTASKNR)«, t00=0x001d, t01=0x0008}
0x2d6c…2d7a              Head {h00=0x000a, h01=0x0050, text=»T1440 «, t00=0x001d, t01=0x002a}
0x2d7a…2daa              Head {h00=0x002c, h01=0x0050, text=» TBT CWFLAG,T1530 IF COLDSTART FINISHED «, t00=0x001d, t01=0x0038}
0x2daa…2dba              Head {h00=0x000c, h01=0x0050, text=» B T1250«, t00=0x001d, t01=0x0068}
0x2dba…2dc8              Head {h00=0x000a, h01=0x0050, text=»T1450 «, t00=0x001d, t01=0x0078}
0x2dc8…2df2              Head {h00=0x0026, h01=0x0050, text=» RSTRT CTID(CBIN1) RESTART MASTER «, t00=0x001d, t01=0x0086}
0x2df2…2e00              Head {h00=0x000a, h01=0x0050, text=» PAUSE«, t00=0x001d, t01=0x00b0}
0x2e00…2e10              Head {h00=0x000c, h01=0x0050, text=» B T1440«, t00=0x001d, t01=0x00be}
0x2e10…2e1a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00ce}
0x2e1a…2e24              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00d8}
0x2e24…2e2e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00e2}
0x2e2e…2e3c              Head {h00=0x000a, h01=0x0050, text=»T1500 «, t00=0x001d, t01=0x00ec}
0x2e3c…2e56              Head {h00=0x0016, h01=0x0050, text=» ADD CRECBCD,=D'1'«, t00=0x001d, t01=0x00fa}
0x2e56…2e6a              Head {h00=0x0010, h01=0x0050, text=» SET CWFLAG «, t00=0x001d, t01=0x0114}
0x2e6a…2e86              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN6,CBIN1 «, t00=0x001d, t01=0x0128}
0x2e86…2e94              Head {h00=0x000a, h01=0x0050, text=»T1510 «, t00=0x001d, t01=0x0144}
0x2e94…2eae              Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN6,CBIN1«, t00=0x001d, t01=0x0152}
0x2eae…2ed2              Head {h00=0x0020, h01=0x0050, text=» CBG GSWBIN6,CMAXTASK,T1540 «, t00=0x001d, t01=0x016c}
0x2ed2…2ef2              Head {h00=0x001c, h01=0x0050, text=» PERF SPLIN8,CBIN9,CBIN3«, t00=0x001d, t01=0x0190}
0x2ef2…2f0e              Head {h00=0x0018, h01=0x0050, text=» RSTRT CTID(GSWBIN6)«, t00=0x001e, t01=0x0020}
0x2f0e…2f1c              Head {h00=0x000a, h01=0x0050, text=» PAUSE«, t00=0x001e, t01=0x003c}
0x2f1c…2f2c              Head {h00=0x000c, h01=0x0050, text=» B T1510«, t00=0x001e, t01=0x004a}
0x2f2c…2f3a              Head {h00=0x000a, h01=0x0050, text=»T1530 «, t00=0x001e, t01=0x005a}
0x2f3a…2f44              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0068}
0x2f44…2f70              Head {h00=0x0028, h01=0x0050, text=»* SET POINTERS IN EL. JOURNAL FILES «, t00=0x001e, t01=0x0072}
0x2f70…2f84              Head {h00=0x0010, h01=0x0050, text=» PERF ELOPST«, t00=0x001e, t01=0x009e}
0x2f84…2fae              Head {h00=0x0026, h01=0x0050, text=» RSTRT CTID(CBIN1) RESTART MASTER «, t00=0x001e, t01=0x00b2}
0x2fae…2fbc              Head {h00=0x000a, h01=0x0050, text=» PAUSE«, t00=0x001e, t01=0x00dc}
0x2fbc…2fd2              Head {h00=0x0012, h01=0x0050, text=» B T1550 START«, t00=0x001e, t01=0x00ea}
0x2fd2…2fda              Head {h00=0x0004, h01=0x0050, t00=0x001e, t01=0x0100}
0x2fda…2fe4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0108}
0x2fe4…3000              Head {h00=0x0018, h01=0x0050, text=»T1540   START MASTER«, t00=0x001e, t01=0x0112}
0x3000…3014              Head {h00=0x0010, h01=0x0050, text=» PERF ELOPST«, t00=0x001e, t01=0x012e}
0x3014…301c              Head {h00=0x0004, h01=0x0050, t00=0x001e, t01=0x0142}
0x301c…3038              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN6,CBIN1 «, t00=0x001e, t01=0x014a}
0x3038…305a              Head {h00=0x001e, h01=0x0050, text=»T1545   RESTART ALL TASKS «, t00=0x001e, t01=0x0166}
0x305a…3074              Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN6,CBIN1«, t00=0x001e, t01=0x0188}
0x3074…3098              Head {h00=0x0020, h01=0x0050, text=» CBG GSWBIN6,CMAXTASK,T1550 «, t00=0x001f, t01=0x0012}
0x3098…30b4              Head {h00=0x0018, h01=0x0050, text=» RSTRT CTID(GSWBIN6)«, t00=0x001f, t01=0x0036}
0x30b4…30c4              Head {h00=0x000c, h01=0x0050, text=» B T1545«, t00=0x001f, t01=0x0052}
0x30c4…30cc              Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x0062}
0x30cc…30d4              Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x006a}
0x30d4…30de              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0072}
0x30de…30e8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x007c}
0x30e8…30f0              Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x0086}
0x30f0…310c              Head {h00=0x0018, h01=0x0050, text=»T1550   START POINT «, t00=0x001f, t01=0x008e}
0x310c…3114              Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x00aa}
0x3114…311e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00b2}
0x311e…313e              Head {h00=0x001c, h01=0x0050, text=» CBL TTASKNR,CBIN6,T1555«, t00=0x001f, t01=0x00bc}
0x313e…3152              Head {h00=0x0010, h01=0x0050, text=» SET TREMFLG«, t00=0x001f, t01=0x00dc}
0x3152…3160              Head {h00=0x000a, h01=0x0050, text=»T1555 «, t00=0x001f, t01=0x00f0}
0x3160…3178              Head {h00=0x0014, h01=0x0050, text=» DSC0 KEYB,SKIB «, t00=0x001f, t01=0x00fe}
0x3178…3194              Head {h00=0x0018, h01=0x0050, text=» MOVE TTEJEDB,=D'0' «, t00=0x001f, t01=0x0116}
0x3194…31ca              Head {h00=0x0032, h01=0x0050, text=» CBNG TTSTLBNR,=D'0',T1560 IF TASK WAS CLOSED «, t00=0x001f, t01=0x0132}
0x31ca…31e4              Head {h00=0x0016, h01=0x0050, text=» ADD CTASKNR,CBIN1«, t00=0x001f, t01=0x0168}
0x31e4…31fa              Head {h00=0x0012, h01=0x0050, text=» SET GTSPGFLG «, t00=0x001f, t01=0x0182}
0x31fa…321e              Head {h00=0x0020, h01=0x0050, text=» MOVE GSWSTR9,=C'SUBTOTAL ' «, t00=0x0020, t01=0x0008}
0x321e…3230              Head {h00=0x000e, h01=0x0050, text=» PERF CLEJ«, t00=0x0020, t01=0x002c}
0x3230…3244              Head {h00=0x0010, h01=0x0050, text=» PERF CLEDB «, t00=0x0020, t01=0x003e}
0x3244…3258              Head {h00=0x0010, h01=0x0050, text=» PERF CLBEH «, t00=0x0020, t01=0x0052}
0x3258…3274              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWSTR9,=C' ' «, t00=0x0020, t01=0x0066}
0x3274…328c              Head {h00=0x0014, h01=0x0050, text=» CLEAR GTSPGFLG «, t00=0x0020, t01=0x0082}
0x328c…32a0              Head {h00=0x0010, h01=0x0050, text=» SET GTKASSE«, t00=0x0020, t01=0x009a}
0x32a0…32bc              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN14«, t00=0x0020, t01=0x00ae}
0x32bc…32d6              Head {h00=0x0016, h01=0x0050, text=» PERF ADM,GSWBIN1 «, t00=0x0020, t01=0x00ca}
0x32d6…32e8              Head {h00=0x000e, h01=0x0050, text=» B RGA120 «, t00=0x0020, t01=0x00e4}
0x32e8…32f6              Head {h00=0x000a, h01=0x0050, text=»T1560 «, t00=0x0020, t01=0x00f6}
0x32f6…3328              Head {h00=0x002e, h01=0x0050, text=» MUL CMASK(TTASKNR),=D'-1' SET < 0, CLOSE «, t00=0x0020, t01=0x0104}
0x3328…3338              Head {h00=0x000c, h01=0x0050, text=» B RGADM«, t00=0x0020, t01=0x0136}
0x3338…3346              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0020, t01=0x0146}
0x3346…3384              Head {h00=0x003a, h01=0x0050, text=»******************************************************«, t00=0x0020, t01=0x0154}
0x3384…338e (33, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0004}
0x338e…33ce              Head {h00=0x003c, h01=0x0050, text=»*      TCONFR - READING OF CONFIGURATION DEPENDENT DATA «, t00=0x0021, t01=0x000e}
0x33ce…33d8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x004e}
0x33d8…340a              Head {h00=0x002e, h01=0x0050, text=»* CALL:    PERF TCONFR,<CONFIGURATION NBR>«, t00=0x0021, t01=0x0058}
0x340a…3414              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x008a}
0x3414…3440              Head {h00=0x0028, h01=0x0050, text=»* THE DATA IS READ RANDOM FROM DK01 «, t00=0x0021, t01=0x0094}
0x3440…344a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00c0}
0x344a…347a              Head {h00=0x002c, h01=0x0050, text=»* ALTERED FIELDS: GSWBIN6 - <CONF> + 12 «, t00=0x0021, t01=0x00ca}
0x347a…34a2              Head {h00=0x0024, h01=0x0050, text=»*                 GSWBIN1 - 199 «, t00=0x0021, t01=0x00fa}
0x34a2…34ac              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0122}
0x34ac…34d4              Head {h00=0x0024, h01=0x0050, text=»* CR:      OK - 0,   NOK - <> 0 «, t00=0x0021, t01=0x012c}
0x34d4…34de              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0154}
0x34de…351c              Head {h00=0x003a, h01=0x0050, text=»******************************************************«, t00=0x0021, t01=0x015e}
0x351c…3538              Head {h00=0x0018, h01=0x0050, text=»TCONFR PROC TCONFRNO«, t00=0x0022, t01=0x000c}
0x3538…3556              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN6,TCONFRNO«, t00=0x0022, t01=0x0028}
0x3556…3572              Head {h00=0x0018, h01=0x0050, text=» ADD GSWBIN6,CBIN12 «, t00=0x0022, t01=0x0046}
0x3572…3590              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,=W'199' «, t00=0x0022, t01=0x0062}
0x3590…35c8              Head {h00=0x0034, h01=0x0050, text=» PERF RAREAD,DK01,=D'1',TCONBUF,GSWBIN1,GSWBIN6 «, t00=0x0022, t01=0x0080}
0x35c8…35de              Head {h00=0x0012, h01=0x0050, text=» BNOK TCONRET1«, t00=0x0022, t01=0x00b8}
0x35de…3606              Head {h00=0x0024, h01=0x0050, text=» CBNL TTSTLBNR,=D'10001',TCONFR1«, t00=0x0022, t01=0x00ce}
0x3606…362e              Head {h00=0x0024, h01=0x0050, text=» CBL TTSTLBNR,=D'-10001',TCONFR1«, t00=0x0022, t01=0x00f6}
0x362e…3652              Head {h00=0x0020, h01=0x0050, text=» CBL TTSTLBNR,=D'0',TCONFR2 «, t00=0x0022, t01=0x011e}
0x3652…3672              Head {h00=0x001c, h01=0x0050, text=» MOVE TTSTLBNR,=D'10001'«, t00=0x0022, t01=0x0142}
0x3672…3684              Head {h00=0x000e, h01=0x0050, text=» B TCONFR1«, t00=0x0022, t01=0x0162}
0x3684…3694              Head {h00=0x000c, h01=0x0050, text=»TCONFR2 «, t00=0x0022, t01=0x0174}
0x3694…36b6              Head {h00=0x001e, h01=0x0050, text=» MOVE TTSTLBNR,=D'-10001' «, t00=0x0022, t01=0x0184}
0x36b6…36c6              Head {h00=0x000c, h01=0x0050, text=»TCONFR1 «, t00=0x0023, t01=0x0016}
0x36c6…36de              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x0023, t01=0x0026}
0x36de…36ea              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0023, t01=0x003e}
0x36ea…36fa              Head {h00=0x000c, h01=0x0050, text=»TCONRET1«, t00=0x0023, t01=0x004a}
0x36fa…371a              Head {h00=0x001c, h01=0x0050, text=» CMP CBIN0,CBIN1 SET CR «, t00=0x0023, t01=0x005a}
0x371a…3726              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0023, t01=0x007a}
0x3726…3734              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0023, t01=0x0086}
0x3734…373e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0094}
0x373e…374c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0023, t01=0x009e}
0x374c…3788              Head {h00=0x0038, h01=0x0050, text=»*************************************************** «, t00=0x0023, t01=0x00ac}
0x3788…3792              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00e8}
0x3792…37cc              Head {h00=0x0036, h01=0x0050, text=»*     TCONFW - WRITE CONFIGURATION-DEPENDENT DATA «, t00=0x0023, t01=0x00f2}
0x37cc…37d6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x012c}
0x37d6…380c              Head {h00=0x0032, h01=0x0050, text=»*    CALL:    PERF  TCONFW,<CONFIGURATION NBR>«, t00=0x0023, t01=0x0136}
0x380c…3816              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x016c}
0x3816…384c              Head {h00=0x0032, h01=0x0050, text=»* IF NOT IN TESTMODE, DATA IS WRITTEN TO DK01 «, t00=0x0023, t01=0x0176}
0x384c…3866              Head {h00=0x0016, h01=0x0050, text=»* ALTERED FIELDS: «, t00=0x0024, t01=0x001c}
0x3866…388c              Head {h00=0x0022, h01=0x0050, text=»*        GSWBIN6 - <CONF> + 12«, t00=0x0024, t01=0x0036}
0x388c…3896              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x005c}
0x3896…38d2              Head {h00=0x0038, h01=0x0050, text=»*************************************************** «, t00=0x0024, t01=0x0066}
0x38d2…38ee              Head {h00=0x0018, h01=0x0050, text=»TCONFW PROC TCONFWNO«, t00=0x0024, t01=0x00a2}
0x38ee…390c              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN6,TCONFWNO«, t00=0x0024, t01=0x00be}
0x390c…3928              Head {h00=0x0018, h01=0x0050, text=» ADD GSWBIN6,CBIN12 «, t00=0x0024, t01=0x00dc}
0x3928…395c              Head {h00=0x0030, h01=0x0050, text=» CBE GTTESTMK,=C'T',TCFWRET IF IN TEST MODE «, t00=0x0024, t01=0x00f8}
0x395c…3984              Head {h00=0x0024, h01=0x0050, text=» CBNL TTSTLBNR,=D'10001',TCONFW1«, t00=0x0024, t01=0x012c}
0x3984…39ac              Head {h00=0x0024, h01=0x0050, text=» CBL TTSTLBNR,=D'-10001',TCONFW1«, t00=0x0024, t01=0x0154}
0x39ac…39d0              Head {h00=0x0020, h01=0x0050, text=» CBL TTSTLBNR,=D'0',TCONFW2 «, t00=0x0024, t01=0x017c}
0x39d0…39f0              Head {h00=0x001c, h01=0x0050, text=» MOVE TTSTLBNR,=D'10001'«, t00=0x0025, t01=0x0010}
0x39f0…3a0e              Head {h00=0x001a, h01=0x0050, text=» MOVE TTLBNR,=D'10000'«, t00=0x0025, t01=0x0030}
0x3a0e…3a20              Head {h00=0x000e, h01=0x0050, text=» B TCONFW1«, t00=0x0025, t01=0x004e}
0x3a20…3a30              Head {h00=0x000c, h01=0x0050, text=»TCONFW2 «, t00=0x0025, t01=0x0060}
0x3a30…3a52              Head {h00=0x001e, h01=0x0050, text=» MOVE TTSTLBNR,=D'-10001' «, t00=0x0025, t01=0x0070}
0x3a52…3a72              Head {h00=0x001c, h01=0x0050, text=» MOVE TTLBNR,=D'-10000' «, t00=0x0025, t01=0x0092}
0x3a72…3a82              Head {h00=0x000c, h01=0x0050, text=»TCONFW1 «, t00=0x0025, t01=0x00b2}
0x3a82…3ab2              Head {h00=0x002c, h01=0x0050, text=» PERF RAWRIT,DK01,=D'1',TCONBUF,GSWBIN6 «, t00=0x0025, t01=0x00c2}
0x3ab2…3ac2              Head {h00=0x000c, h01=0x0050, text=»TCFWRET «, t00=0x0025, t01=0x00f2}
0x3ac2…3ace              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0025, t01=0x0102}
0x3ace…3adc              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0025, t01=0x010e}
0x3adc…3aea              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0025, t01=0x011c}
0x3aea…3b2a              Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0025, t01=0x012a}
0x3b2a…3b34              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x016a}
0x3b34…3b68              Head {h00=0x0030, h01=0x0050, text=»*        CONFRD - READING OF COMMON CONFDATA«, t00=0x0025, t01=0x0174}
0x3b68…3b72              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0018}
0x3b72…3bb4              Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x0026, t01=0x0022}
0x3bb4…3bc8              Head {h00=0x0010, h01=0x0050, text=»CONFRD PROC «, t00=0x0026, t01=0x0064}
0x3bc8…3bec              Head {h00=0x0020, h01=0x0050, text=» PERF CONRDX,CCONBUF0,CBIN1 «, t00=0x0026, t01=0x0078}
0x3bec…3c02              Head {h00=0x0012, h01=0x0050, text=» BNOK CONFRET «, t00=0x0026, t01=0x009c}
0x3c02…3c26              Head {h00=0x0020, h01=0x0050, text=» PERF CONRDX,CCONBUF1,CBIN2 «, t00=0x0026, t01=0x00b2}
0x3c26…3c3c              Head {h00=0x0012, h01=0x0050, text=» BNOK CONFRET «, t00=0x0026, t01=0x00d6}
0x3c3c…3c60              Head {h00=0x0020, h01=0x0050, text=» PERF CONRDX,CCONBUF2,CBIN3 «, t00=0x0026, t01=0x00ec}
0x3c60…3c76              Head {h00=0x0012, h01=0x0050, text=» BNOK CONFRET «, t00=0x0026, t01=0x0110}
0x3c76…3c9a              Head {h00=0x0020, h01=0x0050, text=» PERF CONRDX,CCONBUF3,CBIN4 «, t00=0x0026, t01=0x0126}
0x3c9a…3cb0              Head {h00=0x0012, h01=0x0050, text=» BNOK CONFRET «, t00=0x0026, t01=0x014a}
0x3cb0…3cd4              Head {h00=0x0020, h01=0x0050, text=» PERF CONRDX,CCONBUF4,CBIN5 «, t00=0x0026, t01=0x0160}
0x3cd4…3cea              Head {h00=0x0012, h01=0x0050, text=» BNOK CONFRET «, t00=0x0026, t01=0x0184}
0x3cea…3d0e              Head {h00=0x0020, h01=0x0050, text=» PERF CONRDX,CCONBUF5,CBIN6 «, t00=0x0027, t01=0x000a}
0x3d0e…3d24              Head {h00=0x0012, h01=0x0050, text=» BNOK CONFRET «, t00=0x0027, t01=0x002e}
0x3d24…3d48              Head {h00=0x0020, h01=0x0050, text=» PERF CONRDX,CCONBUF6,CBIN7 «, t00=0x0027, t01=0x0044}
0x3d48…3d5e              Head {h00=0x0012, h01=0x0050, text=» BNOK CONFRET «, t00=0x0027, t01=0x0068}
0x3d5e…3d82              Head {h00=0x0020, h01=0x0050, text=» PERF CONRDX,CCONBUF7,CBIN8 «, t00=0x0027, t01=0x007e}
0x3d82…3d98              Head {h00=0x0012, h01=0x0050, text=» BNOK CONFRET «, t00=0x0027, t01=0x00a2}
0x3d98…3dbc              Head {h00=0x0020, h01=0x0050, text=» PERF CONRDX,CCONBUF8,CBIN9 «, t00=0x0027, t01=0x00b8}
0x3dbc…3dd2              Head {h00=0x0012, h01=0x0050, text=» BNOK CONFRET «, t00=0x0027, t01=0x00dc}
0x3dd2…3df6              Head {h00=0x0020, h01=0x0050, text=» PERF CONRDX,CCONBUF9,CBIN10«, t00=0x0027, t01=0x00f2}
0x3df6…3e06              Head {h00=0x000c, h01=0x0050, text=»CONFRET «, t00=0x0027, t01=0x0116}
0x3e06…3e12              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0027, t01=0x0126}
0x3e12…3e20              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0027, t01=0x0132}
0x3e20…3e2a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0140}
0x3e2a…3e4c              Head {h00=0x001e, h01=0x0050, text=»CONRDX PROC CBUFRD,CBUFNO «, t00=0x0027, t01=0x014a}
0x3e4c…3e56              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x016c}
0x3e56…3e74              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,=W'199' «, t00=0x0027, t01=0x0176}
0x3e74…3eaa (40, 0, 400) Head {h00=0x0032, h01=0x0050, text=» PERF RAREAD,DK01,=D'1',CBUFRD,GSWBIN1,CBUFNO «, t00=0x0028, t01=0x0004}
0x3eaa…3eb6              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0028, t01=0x003a}
0x3eb6…3ec4              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0028, t01=0x0046}
0x3ec4…3ed2              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x0054}
0x3ed2…3f14              Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x0028, t01=0x0062}
0x3f14…3f1e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00a4}
0x3f1e…3f4a              Head {h00=0x0028, h01=0x0050, text=»*       CONFWR - WRITING OF CONFDATA«, t00=0x0028, t01=0x00ae}
0x3f4a…3f54              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00da}
0x3f54…3f96              Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x0028, t01=0x00e4}
0x3f96…3faa              Head {h00=0x0010, h01=0x0050, text=»CONFWR PROC «, t00=0x0028, t01=0x0126}
0x3faa…3fc8              Head {h00=0x001a, h01=0x0050, text=» MOVE CCONFREC,CRECBCD«, t00=0x0028, t01=0x013a}
0x3fc8…3ff6              Head {h00=0x002a, h01=0x0050, text=» PERF RAWRIT,DK01,=D'1',CCONBUF0,CBIN1«, t00=0x0028, t01=0x0158}
0x3ff6…4008              Head {h00=0x000e, h01=0x0050, text=» BNOK WRET«, t00=0x0028, t01=0x0186}
0x4008…4036              Head {h00=0x002a, h01=0x0050, text=» PERF RAWRIT,DK01,=D'1',CCONBUF1,CBIN2«, t00=0x0029, t01=0x0008}
0x4036…4048              Head {h00=0x000e, h01=0x0050, text=» BNOK WRET«, t00=0x0029, t01=0x0036}
0x4048…4076              Head {h00=0x002a, h01=0x0050, text=» PERF RAWRIT,DK01,=D'1',CCONBUF2,CBIN3«, t00=0x0029, t01=0x0048}
0x4076…4088              Head {h00=0x000e, h01=0x0050, text=» BNOK WRET«, t00=0x0029, t01=0x0076}
0x4088…40b6              Head {h00=0x002a, h01=0x0050, text=» PERF RAWRIT,DK01,=D'1',CCONBUF3,CBIN4«, t00=0x0029, t01=0x0088}
0x40b6…40c8              Head {h00=0x000e, h01=0x0050, text=» BNOK WRET«, t00=0x0029, t01=0x00b6}
0x40c8…40f6              Head {h00=0x002a, h01=0x0050, text=» PERF RAWRIT,DK01,=D'1',CCONBUF4,CBIN5«, t00=0x0029, t01=0x00c8}
0x40f6…4108              Head {h00=0x000e, h01=0x0050, text=» BNOK WRET«, t00=0x0029, t01=0x00f6}
0x4108…4136              Head {h00=0x002a, h01=0x0050, text=» PERF RAWRIT,DK01,=D'1',CCONBUF5,CBIN6«, t00=0x0029, t01=0x0108}
0x4136…4148              Head {h00=0x000e, h01=0x0050, text=» BNOK WRET«, t00=0x0029, t01=0x0136}
0x4148…4176              Head {h00=0x002a, h01=0x0050, text=» PERF RAWRIT,DK01,=D'1',CCONBUF6,CBIN7«, t00=0x0029, t01=0x0148}
0x4176…4188              Head {h00=0x000e, h01=0x0050, text=» BNOK WRET«, t00=0x0029, t01=0x0176}
0x4188…41b6              Head {h00=0x002a, h01=0x0050, text=» PERF RAWRIT,DK01,=D'1',CCONBUF7,CBIN8«, t00=0x0029, t01=0x0188}
0x41b6…41c8              Head {h00=0x000e, h01=0x0050, text=» BNOK WRET«, t00=0x002a, t01=0x0026}
0x41c8…41f6              Head {h00=0x002a, h01=0x0050, text=» PERF RAWRIT,DK01,=D'1',CCONBUF8,CBIN9«, t00=0x002a, t01=0x0038}
0x41f6…4208              Head {h00=0x000e, h01=0x0050, text=» BNOK WRET«, t00=0x002a, t01=0x0066}
0x4208…4238              Head {h00=0x002c, h01=0x0050, text=» PERF RAWRIT,DK01,=D'1',CCONBUF9,CBIN10 «, t00=0x002a, t01=0x0078}
0x4238…4244              Head {h00=0x0008, h01=0x0050, text=»WRET«, t00=0x002a, t01=0x00a8}
0x4244…4250              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x002a, t01=0x00b4}
0x4250…425e              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x002a, t01=0x00c0}
0x425e…426c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002a, t01=0x00ce}
0x426c…4288              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x002a, t01=0x00dc}
0x4288…4292              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00f8}
0x4292…42c0              Head {h00=0x002a, h01=0x0050, text=»*          CONFWRT - REWRITE CONFDATA «, t00=0x002a, t01=0x0102}
0x42c0…42ca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0130}
0x42ca…4300              Head {h00=0x0032, h01=0x0050, text=»*    ALTERED FIELDS: GSWBIN5 - SET TO CMAXTASK«, t00=0x002a, t01=0x013a}
0x4300…4330              Head {h00=0x002c, h01=0x0050, text=»*                    TTRECOPN -       0 «, t00=0x002a, t01=0x0170}
0x4330…433a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0010}
0x433a…4356              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x002b, t01=0x001a}
0x4356…436a              Head {h00=0x0010, h01=0x0050, text=»CNFWRT PROC «, t00=0x002b, t01=0x0036}
0x436a…4386              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN5,CBIN0 «, t00=0x002b, t01=0x004a}
0x4386…4392              Head {h00=0x0008, h01=0x0050, text=»CNF1«, t00=0x002b, t01=0x0066}
0x4392…43ac              Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN5,CBIN1«, t00=0x002b, t01=0x0072}
0x43ac…43d0              Head {h00=0x0020, h01=0x0050, text=» CBG GSWBIN5,CMAXTASK,CNF100«, t00=0x002b, t01=0x008c}
0x43d0…43e8              Head {h00=0x0014, h01=0x0050, text=» USE TB2,GSWBIN5«, t00=0x002b, t01=0x00b0}
0x43e8…440c              Head {h00=0x0020, h01=0x0050, text=» MOVE TTRECOPN,=D'0' IF OPEN«, t00=0x002b, t01=0x00c8}
0x440c…4428              Head {h00=0x0018, h01=0x0050, text=» PERF TCONFW,GSWBIN5«, t00=0x002b, t01=0x00ec}
0x4428…4438              Head {h00=0x000c, h01=0x0050, text=» B CNF1 «, t00=0x002b, t01=0x0108}
0x4438…4446              Head {h00=0x000a, h01=0x0050, text=»CNF100«, t00=0x002b, t01=0x0118}
0x4446…445e              Head {h00=0x0014, h01=0x0050, text=» USE TB2,TTASKNR«, t00=0x002b, t01=0x0126}
0x445e…4472              Head {h00=0x0010, h01=0x0050, text=» PERF CONFWR«, t00=0x002b, t01=0x013e}
0x4472…447e              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x002b, t01=0x0152}
0x447e…448c              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x002b, t01=0x015e}
0x448c…449a              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002b, t01=0x016c}
0x449a…44de              Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x002b, t01=0x017a}
0x44de…44e8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x002e}
0x44e8…4504              Head {h00=0x0018, h01=0x0050, text=»*       FORMATS USED«, t00=0x002c, t01=0x0038}
0x4504…450e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0054}
0x450e…4554              Head {h00=0x0042, h01=0x0050, text=»************************************************************* «, t00=0x002c, t01=0x005e}
0x4554…455e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00a4}
0x455e…4572              Head {h00=0x0010, h01=0x0050, text=»FMTFKI FRMT «, t00=0x002c, t01=0x00ae}
0x4572…457e              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x002c, t01=0x00c2}
0x457e…458c              Head {h00=0x000a, h01=0x0050, text=» FKI 2«, t00=0x002c, t01=0x00ce}
0x458c…45a6              Head {h00=0x0016, h01=0x0050, text=» FMEL 'B',TSWBCD2 «, t00=0x002c, t01=0x00dc}
0x45a6…45b4              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002c, t01=0x00f6}
0x45b4…45be              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0104}
0x45be…45d2              Head {h00=0x0010, h01=0x0050, text=»CSFRM01 FRMT«, t00=0x002c, t01=0x010e}
0x45d2…45de              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x002c, t01=0x0122}
0x45de…45f4              Head {h00=0x0012, h01=0x0050, text=» FTEXT 'START'«, t00=0x002c, t01=0x012e}
0x45f4…4600              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x002c, t01=0x0144}
0x4600…4618              Head {h00=0x0014, h01=0x0050, text=» FTEXT 'VOLUME='«, t00=0x002c, t01=0x0150}
0x4618…4638              Head {h00=0x001c, h01=0x0050, text=» FKI 9,MINL=6,MAXL=6,ME «, t00=0x002c, t01=0x0168}
0x4638…4652              Head {h00=0x0016, h01=0x0050, text=» FCOPY CVOL(CBIN1)«, t00=0x002c, t01=0x0188}
0x4652…465e              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x002d, t01=0x0012}
0x465e…4678              Head {h00=0x0016, h01=0x0050, text=» FTEXT 'DATASET=' «, t00=0x002d, t01=0x001e}
0x4678…4698              Head {h00=0x001c, h01=0x0050, text=» FKI 9,MINL=6,MAXL=6,ME «, t00=0x002d, t01=0x0038}
0x4698…46b4              Head {h00=0x0018, h01=0x0050, text=» FCOPY CFNAME(CBIN1)«, t00=0x002d, t01=0x0058}
0x46b4…46c2              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002d, t01=0x0074}
0x46c2…46cc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0082}
0x46cc…46e0              Head {h00=0x0010, h01=0x0050, text=»CSFRM02 FRMT«, t00=0x002d, t01=0x008c}
0x46e0…46ec              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x002d, t01=0x00a0}
0x46ec…4708              Head {h00=0x0018, h01=0x0050, text=» FCOPY ='KOMMUNE NR'«, t00=0x002d, t01=0x00ac}
0x4708…4728              Head {h00=0x001c, h01=0x0050, text=» FKI 12,MINL=3,MAXL=4,ME«, t00=0x002d, t01=0x00c8}
0x4728…4744              Head {h00=0x0018, h01=0x0050, text=» FMEL 'ZZZZ',CKMDNR «, t00=0x002d, t01=0x00e8}
0x4744…4750              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x002d, t01=0x0104}
0x4750…4776              Head {h00=0x0022, h01=0x0050, text=» FCOPY ='VOL 2  VOL 3  VOL 4' «, t00=0x002d, t01=0x0110}
0x4776…4782              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x002d, t01=0x0136}
0x4782…47a2              Head {h00=0x001c, h01=0x0050, text=» FKI 1,MINL=6,MAXL=6,ME «, t00=0x002d, t01=0x0142}
0x47a2…47bc              Head {h00=0x0016, h01=0x0050, text=» FCOPY CVOL(CBIN2)«, t00=0x002d, t01=0x0162}
0x47bc…47d8              Head {h00=0x0018, h01=0x0050, text=» FKI 8,MINL=6,MAXL=6«, t00=0x002d, t01=0x017c}
0x47d8…47f2              Head {h00=0x0016, h01=0x0050, text=» FCOPY CVOL(CBIN3)«, t00=0x002e, t01=0x0008}
0x47f2…4810              Head {h00=0x001a, h01=0x0050, text=» FKI 15,MINL=6,MAXL=6 «, t00=0x002e, t01=0x0022}
0x4810…482a              Head {h00=0x0016, h01=0x0050, text=» FCOPY CVOL(CBIN4)«, t00=0x002e, t01=0x0040}
0x482a…4836              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x002e, t01=0x005a}
0x4836…4860              Head {h00=0x0026, h01=0x0050, text=» FCOPY ='DSN02    DSN03    DSN04' «, t00=0x002e, t01=0x0066}
0x4860…486c              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x002e, t01=0x0090}
0x486c…488c              Head {h00=0x001c, h01=0x0050, text=» FKI 1,MINL=6,MAXL=6,ME «, t00=0x002e, t01=0x009c}
0x488c…48a8              Head {h00=0x0018, h01=0x0050, text=» FCOPY CFNAME(CBIN2)«, t00=0x002e, t01=0x00bc}
0x48a8…48c6              Head {h00=0x001a, h01=0x0050, text=» FKI 10,MINL=6,MAXL=6 «, t00=0x002e, t01=0x00d8}
0x48c6…48e2              Head {h00=0x0018, h01=0x0050, text=» FCOPY CFNAME(CBIN3)«, t00=0x002e, t01=0x00f6}
0x48e2…4900              Head {h00=0x001a, h01=0x0050, text=» FKI 19,MINL=6,MAXL=6 «, t00=0x002e, t01=0x0112}
0x4900…491c              Head {h00=0x0018, h01=0x0050, text=» FCOPY CFNAME(CBIN4)«, t00=0x002e, t01=0x0130}
0x491c…4928              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x002e, t01=0x014c}
0x4928…495a              Head {h00=0x002e, h01=0x0050, text=» FCOPY ='DSN05    DSN06    DSN07    DSN08'«, t00=0x002e, t01=0x0158}
0x495a…4966              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x002e, t01=0x018a}
0x4966…4982              Head {h00=0x0018, h01=0x0050, text=» FKI 1,MINL=6,MAXL=6«, t00=0x002f, t01=0x0008}
0x4982…499e              Head {h00=0x0018, h01=0x0050, text=» FCOPY CFNAME(CBIN5)«, t00=0x002f, t01=0x0024}
0x499e…49bc              Head {h00=0x001a, h01=0x0050, text=» FKI 10,MINL=6,MAXL=6 «, t00=0x002f, t01=0x0040}
0x49bc…49d8              Head {h00=0x0018, h01=0x0050, text=» FCOPY CFNAME(CBIN6)«, t00=0x002f, t01=0x005e}
0x49d8…49f6              Head {h00=0x001a, h01=0x0050, text=» FKI 19,MINL=6,MAXL=6 «, t00=0x002f, t01=0x007a}
0x49f6…4a12              Head {h00=0x0018, h01=0x0050, text=» FCOPY CFNAME(CBIN7)«, t00=0x002f, t01=0x0098}
0x4a12…4a30              Head {h00=0x001a, h01=0x0050, text=» FKI 28,MINL=6,MAXL=6 «, t00=0x002f, t01=0x00b4}
0x4a30…4a4c              Head {h00=0x0018, h01=0x0050, text=» FCOPY CFNAME(CBIN8)«, t00=0x002f, t01=0x00d2}
0x4a4c…4a5a              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002f, t01=0x00ee}
0x4a5a…4a64              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00fc}
0x4a64…4a78              Head {h00=0x0010, h01=0x0050, text=»CSFRM03 FRMT«, t00=0x002f, t01=0x0106}
0x4a78…4a84              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x002f, t01=0x011a}
0x4a84…4a9e              Head {h00=0x0016, h01=0x0050, text=» FMEL '99',GSWBCD5«, t00=0x002f, t01=0x0126}
0x4a9e…4aaa              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x002f, t01=0x0140}
0x4aaa…4ac6              Head {h00=0x0018, h01=0x0050, text=» FCOPY ='MASKIN NR' «, t00=0x002f, t01=0x014c}
0x4ac6…4ae6              Head {h00=0x001c, h01=0x0050, text=» FKI 22,MINL=3,MAXL=3,ME«, t00=0x002f, t01=0x0168}
0x4ae6…4b08              Head {h00=0x001e, h01=0x0050, text=» FMEL '999',CMASK(GSWBIN1)«, t00=0x002f, t01=0x0188}
0x4b08…4b14              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0030, t01=0x001a}
0x4b14…4b38              Head {h00=0x0020, h01=0x0050, text=» FCOPY ='BEHOLDNINGST[LLERE'«, t00=0x0030, t01=0x0026}
0x4b38…4b5a              Head {h00=0x001e, h01=0x0050, text=» FKI 23,MAXL=2,ME,APPL=103«, t00=0x0030, t01=0x004a}
0x4b5a…4b74              Head {h00=0x0016, h01=0x0050, text=» FMEL '99',GSWBCD3«, t00=0x0030, t01=0x006c}
0x4b74…4b80              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0030, t01=0x0086}
0x4b80…4ba0              Head {h00=0x001c, h01=0x0050, text=» FCOPY ='EJ-EDB T[LLER '«, t00=0x0030, t01=0x0092}
0x4ba0…4bc2              Head {h00=0x001e, h01=0x0050, text=» FKI 23,MAXL=2,ME,APPL=104«, t00=0x0030, t01=0x00b2}
0x4bc2…4bdc              Head {h00=0x0016, h01=0x0050, text=» FMEL '99',GSWBCD4«, t00=0x0030, t01=0x00d4}
0x4bdc…4be8              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0030, t01=0x00ee}
0x4be8…4c04              Head {h00=0x0018, h01=0x0050, text=» FCOPY =' EKS.LBNR' «, t00=0x0030, t01=0x00fa}
0x4c04…4c1e              Head {h00=0x0016, h01=0x0050, text=» FKI 20,MAXL=5,ME «, t00=0x0030, t01=0x0116}
0x4c1e…4c3c              Head {h00=0x001a, h01=0x0050, text=» FMEL 'ZZZZ9',TTSTLBNR«, t00=0x0030, t01=0x0130}
0x4c3c…4c4a              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0030, t01=0x014e}
0x4c4a…4c54              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x015c}
0x4c54…4c6a              Head {h00=0x0012, h01=0x0050, text=»INIT1FMT FRMT «, t00=0x0030, t01=0x0166}
0x4c6a…4c76              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0030, t01=0x017c}
0x4c76…4c92              Head {h00=0x0018, h01=0x0050, text=» FCOPY ='VOLUME NR '«, t00=0x0030, t01=0x0188}
0x4c92…4cae              Head {h00=0x0018, h01=0x0050, text=» FMEL '99999',CVOLNO«, t00=0x0031, t01=0x0014}
0x4cae…4cba              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0031, t01=0x0030}
0x4cba…4cd6              Head {h00=0x0018, h01=0x0050, text=» FCOPY =C'DAGS-DATO'«, t00=0x0031, t01=0x003c}
0x4cd6…4d08              Head {h00=0x002e, h01=0x0050, text=» FKI 11,MINL=6,MAXL=6,ME,SCHK=2,REWRT,NCLR«, t00=0x0031, t01=0x0058}
0x4d08…4d2c              Head {h00=0x0020, h01=0x0050, text=» FMEL '99E-99E-99',CMASKDAT «, t00=0x0031, t01=0x008a}
0x4d2c…4d38              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0031, t01=0x00ae}
0x4d38…4d52              Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'DAG NR' «, t00=0x0031, t01=0x00ba}
0x4d52…4d7c              Head {h00=0x0026, h01=0x0050, text=» FKI 11,MINL=1,MAXL=3,ME,APPL=102 «, t00=0x0031, t01=0x00d4}
0x4d7c…4d98              Head {h00=0x0018, h01=0x0050, text=» FMEL 'ZZZ',CRELDAY «, t00=0x0031, t01=0x00fe}
0x4d98…4da6              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0031, t01=0x011a}
0x4da6…4db0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0128}
0x4db0…4dc6              Head {h00=0x0012, h01=0x0050, text=»INIT2FMT FRMT «, t00=0x0031, t01=0x0132}
0x4dc6…4dd2              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0031, t01=0x0148}
0x4dd2…4dee              Head {h00=0x0018, h01=0x0050, text=» FCOPY ='VOLUME NR '«, t00=0x0031, t01=0x0154}
0x4dee…4e02              Head {h00=0x0010, h01=0x0050, text=» FTEXT 'OK' «, t00=0x0031, t01=0x0170}
0x4e02…4e16              Head {h00=0x0010, h01=0x0050, text=» FILLR '?',1«, t00=0x0031, t01=0x0184}
0x4e16…4e2c              Head {h00=0x0012, h01=0x0050, text=» FILLR X'07',1«, t00=0x0032, t01=0x0008}
0x4e2c…4e42              Head {h00=0x0012, h01=0x0050, text=» FLINK FMTFKI «, t00=0x0032, t01=0x001e}
0x4e42…4e50              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0032, t01=0x0034}
0x4e50…4e5a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0042}
0x4e5a…4e70              Head {h00=0x0012, h01=0x0050, text=»INIT3FMT FRMT «, t00=0x0032, t01=0x004c}
0x4e70…4e7c              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0032, t01=0x0062}
0x4e7c…4e96              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='OPSTART '«, t00=0x0032, t01=0x006e}
0x4e96…4eaa              Head {h00=0x0010, h01=0x0050, text=» FILLR '?',1«, t00=0x0032, t01=0x0088}
0x4eaa…4ec0              Head {h00=0x0012, h01=0x0050, text=» FILLR X'07',1«, t00=0x0032, t01=0x009c}
0x4ec0…4ed6              Head {h00=0x0012, h01=0x0050, text=» FLINK FMTFKI «, t00=0x0032, t01=0x00b2}
0x4ed6…4ee4              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0032, t01=0x00c8}
0x4ee4…4eee              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00d6}
0x4eee…4f04              Head {h00=0x0012, h01=0x0050, text=»INIT4FMT FRMT «, t00=0x0032, t01=0x00e0}
0x4f04…4f10              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0032, t01=0x00f6}
0x4f10…4f2a              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='KORREKT' «, t00=0x0032, t01=0x0102}
0x4f2a…4f3e              Head {h00=0x0010, h01=0x0050, text=» FILLR '?',1«, t00=0x0032, t01=0x011c}
0x4f3e…4f54              Head {h00=0x0012, h01=0x0050, text=» FILLR X'07',1«, t00=0x0032, t01=0x0130}
0x4f54…4f6a              Head {h00=0x0012, h01=0x0050, text=» FLINK FMTFKI «, t00=0x0032, t01=0x0146}
0x4f6a…4f78              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0032, t01=0x015c}
0x4f78…4f82              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x016a}
0x4f82…4f8e              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0032, t01=0x0174}
0x4f8e…4f92              Head {h00=0x4004, h01=0x0000}
0x4f92…4f96              00 32 01 80                                                                                                                                                                                                                                       ┆ 2  ┆
0x4f96…4f9e (51, 1, 8)   20 04 00 00 00 33 00 04                                                                                                                                                                                                                           ┆     3  ┆
0x4f9e…4fee (52, 0, 400) 20 52 47 52 30 33 30 20 00 33 01 8e 00 1a 00 50 52 47 52 30 36 30 5c 5c 5c 53 45 54 20 44 2f 4b 20 49 4e 46 4f 20 00 34 00 10 00 22 00 50 20 4d 4f 56 45 20 47 53 57 42 49 4e 33 2c 47 54 44 55 50 46 28 47 53 57 42 49 4e 34 29 20 00 34 00 2e   ┆ RGR030  3     PRGR060   SET D/K INFO  4   " P MOVE GSWBIN3,GTDUPF(GSWBIN4)  4 .┆
0x4fee…503e              00 20 00 50 20 50 45 52 46 49 20 47 53 57 42 49 4e 33 2c 53 45 54 4b 52 45 2c 53 45 54 44 45 42 00 34 00 54 00 0e 00 50 20 42 20 52 47 52 30 33 30 20 00 34 00 78 00 0a 00 50 52 47 52 31 30 30 00 34 00 8a 00 14 00 50 5c 5c 5c 45 4e 44 20 4f   ┆   P PERFI GSWBIN3,SETKRE,SETDEB 4 T   P B RGR030  4 x   PRGR100 4     P   END O┆
0x503e…508e              46 20 52 45 43 4f 52 44 00 34 00 98 00 18 00 50 20 4d 4f 56 45 20 47 53 57 53 54 52 32 2c 3d 58 27 37 46 27 00 34 00 b0 00 22 00 50 20 4d 4f 56 45 20 47 53 57 42 49 4e 36 2c 47 53 57 42 49 4e 34 20 52 45 53 54 4f 52 45 20 00 34 00 cc 00 36   ┆F RECORD 4     P MOVE GSWSTR2,=X'7F' 4   " P MOVE GSWBIN6,GSWBIN4 RESTORE  4   6┆
0x508e…50de              00 50 20 4d 41 54 43 48 20 43 50 43 4b 42 55 46 2c 47 53 57 42 49 4e 36 2c 47 53 57 42 49 4e 35 2c 47 53 57 53 54 52 32 2c 43 42 49 4e 30 2c 43 42 49 4e 31 00 34 00 f2 00 10 00 50 20 42 4e 45 20 52 47 52 31 31 30 20 00 34 01 2c 00 10 00 50   ┆ P MATCH CPCKBUF,GSWBIN6,GSWBIN5,GSWSTR2,CBIN0,CBIN1 4     P BNE RGR110  4 ,   P┆
0x50de…512e              20 53 45 54 20 43 45 4f 52 46 4c 47 00 34 01 40 00 0e 00 50 20 42 20 52 47 52 30 33 35 20 00 34 01 54 00 0a 00 50 52 47 52 31 31 30 00 34 01 66 00 26 00 50 20 4d 4f 56 45 20 47 53 57 53 54 52 32 2c 3d 58 27 32 31 27 20 43 4f 4e 54 2e 20 52   ┆ SET CEORFLG 4 @   P B RGR035  4 T   PRGR110 4 f & P MOVE GSWSTR2,=X'21' CONT. R┆

Reduced view