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

⟦3d00dc45d⟧

    Length: 10938 (0x2aba)
    Notes: pts_type(SC)
    Names: »DENTER.SC«

Derivation

└─⟦48601905a⟧ Bits:30009668 Philips computer tape "600121"
    └─⟦this⟧ »S:DU/DENTER.SC« 
└─⟦79fbed147⟧ Bits:30009697 Philips computer tape "600414"
    └─⟦this⟧ »S:DU/DENTER.SC« 
└─⟦d2a299635⟧ Bits:30009698 Philips computer tape "600415"
    └─⟦this⟧ »S:DU/DENTER.SC« 

PTS(SC)

	IDENT	DENTER	UPD 80-03-04/CHST 
* 
*    A STANDARD PROGRAM PACKAGE HANDLING
*    A COMPLETE PICTURE ON A DISPLAY SCREEN 
* 
*    RUNNING UNDER:  CREDIT REL 3.1 
*                    TOSS   REL 8.1 
* 
	DDUM	DDINIT
 PDIV 
* 
 ENTRY DECLRA CLEAR ALL VARIABLE FIELDS 
 ENTRY DECLRS CLEAR SOME VARIABLE FIELDS
 ENTRY DECLRN CLEAR NO VARIABLE FIELDS
 ENTRY DECLRD 
	ENTRY	DERR	DENTER-ERROR
	EXT	DERROR	ERROR-MESSAGES
	EXT	CANC	-ROUTINES 
* 
 EXT DESTAT BUILD THE STATUSLINE
 EXT DECHK1 STANDARD CHECK ROUTINE NO. 1
 EXT DECHK2 STANDARD CHECK ROUTINE NO. 2
 EXT DECHK3 STANDARD CHECK ROUTINE NO. 3
 EXT DECHK4 STANDARD CHECK ROUTINE NO. 4
 EXT DECHK5 STANDARD CHECK ROUTINE NO.5 
 EXT DECHK6 STANDARD CHECK ROUTINE NO. 6
 EXT DECHK7 STANDARD CHECK ROUTINE NO. 7
 EXT APP USER ROUTINE TO HANDLE 
			APPL VALUES
 EXT DETCHK USER ROUTINE TO EVALUATE
			CONDITIONAL TABULATION 
* 
	EXT	EMPTYT	ASSEMBLY SUBROUTINE EMPTYT  - 
			TEST IF DATA ITEM IS EMPTY 
 EXT MASK 
* 
 INCLUDE DELITT,LIST
 EJECT
* 
*    CLEAR ALL VARIABLE FIELD BEFORE HANDLING THE PICTURE 
* 
DECLRA PROC 
	PERF	DENTER,W1 
	RET
 PEND 
* 
*    CLEAR SOME VARIABLE FIELDS BEFORE HANDLING THE PICTURE 
* 
DECLRS PROC 
	PERF	DENTER,W2 
	RET
 PEND 
* 
*    CLEAR NO VARIABLE FIELDS BEFORE HANDLING THE PICTURE 
* 
DECLRN PROC 
	PERF	DENTER,W3 
	RET
 PEND 
* 
*    CLEAR SOME VARIABLE FILEDS AND DISPLAY THE REST
*    OF THE VARIABLE FIELDS BEFORE HANDLING THE PICTURE 
* 
DECLRD PROC 
* 
 PERF DENTER,W4 
 RET
 PEND 
* 
*     ERROR PRINTOUT
* 
DERR	PROC 
	PERF	DENTER,W0 
	RET
	PEND 
 EJECT
DENTER PROC OPT 

	MOVE	DEBINW2,OPT	MOVE TO VARIABLE
			TO ALLOW INSTR.S CMP AND IB
	CMP	DEBINW2,W0	"DEERR" ENTRY ? 
	BE	ERRPRINT	YES !

 TBT DEPROMPT,ENTIRE JUMP IF ENTIRE FORMAT
			SHOULD BE DIDELAYED
* 
*    ONLY VARIABLE FIELDS 
* 
 IB DEBINW2		C
		CLEARA		C 
		CLEARS		C 
		CONT		C 
		CLEARD
* 
CLEARA
 ERASE 2,W1,W0 ERASE ALL FROM 1 AND UP
 B CONT 
* 
CLEARS
 ERASE 5,W1,W0 ERASE SOME FROM 1 AND UP 
	B	CONT 
CLEARD
 DISPLAY 3,W1,W0 DISPLAY FROM 1 AND UP
 B CONT 
 EJECT
* 
*    DISPLAY ENTIRE FORMAT
* 
ENTIRE
	CLEAR	DEPROMPT 
 IB DEBINW2	JUMP	C
		ECLRA	ON	C
		ECLRS	ROUTINE	C 
		ECLRN	INDEX	C 
		ECLRN 
* 
*    CLEAR ALL VARIABLES
* 
ECLRA 
 ERASE 3,W1,W0 CLEAR ALL FROM 1 AND UP
			IN MEMORY
 B ECLRN CONTINUE 
* 
*    CLEAR SOME VARIABLES 
* 
ECLRS 
 ERASE 6,W1,W0 CLEAR SOME FIELDS FROM 
			1 AND UP IN MEMORY 
* 
*    CLEAR NO VARIABLES IN MEMORY 
* 
ECLRN 
 DISPLAY 0,W1,W0 DISPLAY ENTIRE FORM
	EJECT
* 
CONT
 GETABX DEBINW4 GET CURRENT INDEX 
 BL KTHOME JUMP IF NO CURRENT FIELD 
CONT5 
 GETFLD 0,DEBINW4,DEBINW3 SEARCH CURRENT POSITION 
 BZ SETCREAD JUMP IF FOUND
 BL KTHOME POSITION NOT FOUND 
* 
*    COMPULSORY FIELD FOUND 
* 
 MOVE DEBINW4,DEBINW3 CHANGE INDEX
 B CONT5 SEARCH AGAIN 
* 
 EJECT
* 
*    SET CURSOR AND READ KEYBOARD 
* 
SETCREAD
	SETCUR		SET CURSOR ON CURRENT FIELD

* 
*    READ TO CURRENT FIELD ON DISPLAY 
* 
READIN
 TBF DENOCHAN,READ50
READ10 MOVE DEBINW1,W0
	MOVE	DEBINW3,W1
 NKI .NE,DEDSDYKB,DEINPUT,DEKTAB5,DEBINW3,DEBINW2 
 BOK READ30 
 XSTAT DEDSDYKB,DEBINW3 
 CALL MASK,DEBINW3,W64
 BNZ READ10 
READ20 EDWRT DEDSSCRN,BELL
 B READ10 
READ30 CBL DEBINW2,W0,READ20
 CBNE DEBINW2,W0,READ40 
 DISPLAY 0,W1,W1 POWER OFF
 B SETCREAD 
READ40 IB DEBINW2,READ10,STATUS,KCOPY 
 SUB DEBINW2,W3 
 CLEAR DENOCHAN 
 RET
READ50
 DYKI DEINPUT,DEKTAB1,DEKTAB2,DEBINW1,		C 
		DEBINW2,DEBINW4 
DYKOUT
 BL ERRPRT ERROR
 CBNL DEBINW2,W0,DYK100 
DYK050
 MOVE DEBINW2,W2
 B ERRCAN 
DYK100
 CBE DEBINW2,W0,ECLRN 
			KEY SWITCHES 
 IB DEBINW2,UPD300,CLEA20 JUMP ON	C 
		UPDATE,ERRCAN,ERRCAN,		C
		UPDATE,UPDATE,UPDATE,UPDATE CONVERTED	C 
		UPDATE,UPDATE,UPDATE,UPDATE END-OF-ITEM-KEY	C 
		UPDATE,KDUPL,KEDIT
	EJECT
* 
*    HANDLE THE RESPECTIVE KEY AS EOI-KEY FIRST 
* 
UPDATE
 CBE DEBINW1,W0,UPD350 JUMP IF LENGTH = 0 
 GETCTL 3,DEBINW4 GET SCHK-NUMBER 
 CBE DEBINW4,W0,UPD050 JUMP IF NOT STANDARD CHECK 
 PERFI DEBINW4,DECHK1,DECHK2,DECHK3		C
		DECHK4,DECHK5,DECHK6,DECHK7 
 IB DEBINW3,UPD100,UPD070,ERRPRINT
* 
*    CONDITIONAL DISPLAYING 
* 
UPD050
 MOVE DEBINW4,W1 INDICATE COND. DIDEL 
 B UPD200 
UPD070
 GETCTL 0,DEBINW3 GET APPL-VALUE
 CBNE DEBINW3,W0,UPD210 JUMP IF APPL VALUE
 B SETCREAD 
* 
*    UNCONDITIONAL DISPLAYING 
* 
UPD100
 MOVE DEBINW4,W2 INDICATE UNCONDITIONAL DIDELAY 
UPD200
 GETCTL 0,DEBINW3 GET APPL-VALUE
 CBE DEBINW3,W0,UPD400 JUMP IF NO APPL VALUE
* 
*    APPL-VALUE DIFFERENT FROM ZERO 
* 
UPD210
	PERF	APP 
 IB DEBINW3,UPD260,SETCREAD,ERRPRINT
 B UPD400 
* 
*    OK AFTER APPL CONTROL
*    UNCONDITIONAL DIDELAYING 
* 
UPD260
 UPDFLD 1,DEINPUT UPDATE FIELD WITH DIDELAYING
UPD300 SET DECHANGE INDICATE CHANGED ITEM 
UPD350
*    JUMP ON FUNCTION KEY INDEX 
 IB DEBINW2,KTFWD,DUMMY,		C 
		KEOI,DUMMY,DUMMY,KTFWD,		C
		KTBWD,KTHOME,KERASE,KKEEP,KTRIGHT,		C 
		KTDOWN,STATUS,KCOPY,DUMMY,DUMMY,KENTER
 SUB DEBINW2,W14 ADJUST EOI-KEY INDEX 
	B	RETUR
RETUR1
	SUB	DEBINW2,W1	ADJUST KEY INDEX
DUMMY 
RETUR 
	CLEAR	DENOCHAN 
 RET
* 
UPD400
 CBE DEBINW4,W2,UPD260 JUMP IF UNCONDITIONAL DIDEL
 UPDFLD 0,DEINPUT UPDATE FIELD DIDEL. COND. 
 B UPD300 
* 
 EJECT
KEOI			COMMON END-OF-ITEM KEY 
KTFWD			TAB. FORWARD 1 STEP 
 TFWD 
	B	TSTTAB 
* 
KTBWD			TABULATION 1 STEP BACKW.
 TBWD 
 B TSTTAB 
* 
KTHOME			TAB. TO HOME POSITION
 THOME
 B TSTTAB 
* 
KTLDOWN			TAB. TO FIRST ON NEXT LINE
 TLDOWN 
 B TSTTAB 
* 
KTLEFT			TAB. TO LEFTMOST 
 TLEFT
 B TSTTAB 
* 
KTRIGHT			TAB. TO RIGHTMOST 
 TRIGHT 
 B TSTTAB 
* 
KTDOWN			TAB 1 DOWN 
 TDOWN
 B TSTTAB 
* 
KTUP			TAB 1 UP 
 TUP

TSTTAB			TEST TAB OUTPUT
 BE READIN OK 
 BL SETCREAD NOT FOUND
 BOFL SETCREAD EMPTY COMPULSORY FIELD 
* 
* 
*    CONDITIONAL TABULATION 
* 
 PERF DETCHK
 CBE DEBINW3,W0,KCOP10
 IB DEBINW2,DUMMY,DUMMY,		C 
		KTFWD,DUMMY,DUMMY,KTFWD,		C 
		KTBWD,KTFWD,KTFWD,KTFWD,		C 
		KTBWD,KTFWD,KTBWD 
*    BRANCH LIST EXHAUSTED - DEBINW2 CLOBBERED BY DETCHK

	B	SETCREAD 


STATUS PERF DESTAT
 B ERRPRT 
	EJECT
KCOPY			HARD COPY 
 MOVE DEBINW3,W1
 PRINT DEDSPRT,DEBINW3,W0 
KCOP10
 B SETCREAD SET CURSOR AND READ 
* 
KDUPL			DUPLICATION 
 MOVE DEBINW2,W3 INDICATE COMMON EOI-KEY
 DUPL DEINPUT DUPLICATION 
 BZ UPD260 DUPL ALLOWED 
 MOVE DEBINW4,W0 INDICATE ILLEGAL EOI-KEY 
 B ERRPRINT DUPL NOT ALLOWED
 EJECT
* 
*    EDIT FIELD 
* 
KEDITX
	MOVE	DEBINW1,W1
KEDIT 
 GETCTL 1,DEBINW3 GET MAXL
 CBNE DEBINW3,W0,KED100 
 EDWRT DEDSSCRN,BELL ACOUSTIC ALARM 
 B SETCREAD 
KED100
 EDFLD DEINPUT,DEKTAB3,DEBINW1,		C
		DEBINW2,DEBINW4 
 B DYKOUT CONTINUE AS FOR DYKI
* 
*       ERASE KEY 
* 
KERASE
	GETABX	DEBINW4 
	ERASE	2,DEBINW4,W0 
* 
*    ENTER KEY
* 
KKEEP 
KENTER
 MOVE DEBINW4,W5 INDICATE COMP.FIELD FOUND
 MOVE DEBINW1,W0 INDICATE NO CLEARING 
 GETFLD 0,DEBINW1,DEBINW3 SEARCH FOR EMPTY COMP. FIELDS 
 BOFL KENT10 EMPTY COMP. FIELD FOUND
 TSTCTL 2 LOOK IF COMPULSORY FIELD
 BZ KENT05 NO!
 CALL EMPTYT,:FMTITEM LOOK IF EMPTY FIELD 
 BP KENT10 YES! 
KENT05
	CBE	DEBINW2,W9,KCOP10
	CBE	DEBINW2,W10,KCOP10 
 MOVE DEBINW2,W3 INDICATE ENTER KEY DEPRESSED 
 RET
* 
*    EMPTY COMPULSORY FIELD FOUND 
* 
KENT10
	MOVE	DEBINW2,W0
 GETFLD 0,DEBINW3,DEBINW2 GET THE COMPULSORY FIELD
	MOVE	DEBINW1,W0
	EJECT
ERRPRT
	CBE	DEBINW2,W16,KEDIT	JUMP IF EDIT 
 CBE DEBINW2,W4,ERRCAN JUMP IF ERRCANEL1
 CBE DEBINW2,W5,ERRCAN JUMP IF ERRCANEL2
 XSTAT DEDSDYKB,DEBINW3 
 CALL MASK,DEBINW3,W64
 BNZ DYK050 
* 
*    ERROR HANDLING 
* 
ERRPRINT
	PERF	DERROR,DEKTAB4
	IB	DEBINW2,SETCREAD,RETUR2,RETUR2,KEDITX 
	B	SETCREAD 
* 
*       CLEAR LAST LINE 
* 
ERRCAN	PERF	CANC
	IB	DEBINW2,SETCREAD,SETCREAD 
 SUB DEBINW2,W3 ADJUST FOR CANCEL1,CANCEL2
 RET
CLEA20
 GETABX DEBINW4 GET CURRENT TAB INDEX 
 DISPLAY 1,DEBINW4,DEBINW4 DISPLAY FIELD
 B SETCREAD CONTINUE
* 
RETUR2
	SUB	DEBINW2,W1 
	RET
* 
BELL FRMT 
 FSL
 FILLR X'07',1
 FMEND

	PEND 

 END

HexDump

0x0000…0028 (0, 0, 398)  Head {h00=0x0024, h01=0x0050, text=» IDENT DENTER UPD 80-03-04/CHST «, t00=0x0000, t01=0x0004}
0x0028…0032              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x002c}
0x0032…0062              Head {h00=0x002c, h01=0x0050, text=»*    A STANDARD PROGRAM PACKAGE HANDLING«, t00=0x0000, t01=0x0036}
0x0062…0096              Head {h00=0x0030, h01=0x0050, text=»*    A COMPLETE PICTURE ON A DISPLAY SCREEN «, t00=0x0000, t01=0x0066}
0x0096…00a0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x009a}
0x00a0…00cc              Head {h00=0x0028, h01=0x0050, text=»*    RUNNING UNDER:  CREDIT REL 3.1 «, t00=0x0000, t01=0x00a4}
0x00cc…00f8              Head {h00=0x0028, h01=0x0050, text=»*                    TOSS   REL 8.1 «, t00=0x0000, t01=0x00d0}
0x00f8…0102              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00fc}
0x0102…0116              Head {h00=0x0010, h01=0x0050, text=» DDUM DDINIT«, t00=0x0000, t01=0x0106}
0x0116…0124              Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x0000, t01=0x011a}
0x0124…012e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0128}
0x012e…015e              Head {h00=0x002c, h01=0x0050, text=» ENTRY DECLRA CLEAR ALL VARIABLE FIELDS «, t00=0x0000, t01=0x0132}
0x015e…018e              Head {h00=0x002c, h01=0x0050, text=» ENTRY DECLRS CLEAR SOME VARIABLE FIELDS«, t00=0x0000, t01=0x0162}
0x018e…01bc (1, 0, 400)  Head {h00=0x002a, h01=0x0050, text=» ENTRY DECLRN CLEAR NO VARIABLE FIELDS«, t00=0x0001, t01=0x0004}
0x01bc…01d2              Head {h00=0x0012, h01=0x0050, text=» ENTRY DECLRD «, t00=0x0001, t01=0x0032}
0x01d2…01f2              Head {h00=0x001c, h01=0x0050, text=» ENTRY DERR DENTER-ERROR«, t00=0x0001, t01=0x0048}
0x01f2…0214              Head {h00=0x001e, h01=0x0050, text=» EXT DERROR ERROR-MESSAGES«, t00=0x0001, t01=0x0068}
0x0214…0230              Head {h00=0x0018, h01=0x0050, text=» EXT CANC -ROUTINES «, t00=0x0001, t01=0x008a}
0x0230…023a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00a6}
0x023a…0262              Head {h00=0x0024, h01=0x0050, text=» EXT DESTAT BUILD THE STATUSLINE«, t00=0x0001, t01=0x00b0}
0x0262…0292              Head {h00=0x002c, h01=0x0050, text=» EXT DECHK1 STANDARD CHECK ROUTINE NO. 1«, t00=0x0001, t01=0x00d8}
0x0292…02c2              Head {h00=0x002c, h01=0x0050, text=» EXT DECHK2 STANDARD CHECK ROUTINE NO. 2«, t00=0x0001, t01=0x0108}
0x02c2…02f2              Head {h00=0x002c, h01=0x0050, text=» EXT DECHK3 STANDARD CHECK ROUTINE NO. 3«, t00=0x0001, t01=0x0138}
0x02f2…0322              Head {h00=0x002c, h01=0x0050, text=» EXT DECHK4 STANDARD CHECK ROUTINE NO. 4«, t00=0x0001, t01=0x0168}
0x0322…0352              Head {h00=0x002c, h01=0x0050, text=» EXT DECHK5 STANDARD CHECK ROUTINE NO.5 «, t00=0x0002, t01=0x0008}
0x0352…0382              Head {h00=0x002c, h01=0x0050, text=» EXT DECHK6 STANDARD CHECK ROUTINE NO. 6«, t00=0x0002, t01=0x0038}
0x0382…03b2              Head {h00=0x002c, h01=0x0050, text=» EXT DECHK7 STANDARD CHECK ROUTINE NO. 7«, t00=0x0002, t01=0x0068}
0x03b2…03da              Head {h00=0x0024, h01=0x0050, text=» EXT APP USER ROUTINE TO HANDLE «, t00=0x0002, t01=0x0098}
0x03da…03f0              Head {h00=0x0012, h01=0x0050, text=»   APPL VALUES«, t00=0x0002, t01=0x00c0}
0x03f0…041c              Head {h00=0x0028, h01=0x0050, text=» EXT DETCHK USER ROUTINE TO EVALUATE«, t00=0x0002, t01=0x00d6}
0x041c…043e              Head {h00=0x001e, h01=0x0050, text=»   CONDITIONAL TABULATION «, t00=0x0002, t01=0x0102}
0x043e…0448              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0124}
0x0448…047a              Head {h00=0x002e, h01=0x0050, text=» EXT EMPTYT ASSEMBLY SUBROUTINE EMPTYT  - «, t00=0x0002, t01=0x012e}
0x047a…04a0              Head {h00=0x0022, h01=0x0050, text=»   TEST IF DATA ITEM IS EMPTY «, t00=0x0002, t01=0x0160}
0x04a0…04b2              Head {h00=0x000e, h01=0x0050, text=» EXT MASK «, t00=0x0002, t01=0x0186}
0x04b2…04bc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0008}
0x04bc…04d8              Head {h00=0x0018, h01=0x0050, text=» INCLUDE DELITT,LIST«, t00=0x0003, t01=0x0012}
0x04d8…04e6              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x002e}
0x04e6…04f0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x003c}
0x04f0…0532              Head {h00=0x003e, h01=0x0050, text=»*    CLEAR ALL VARIABLE FIELD BEFORE HANDLING THE PICTURE «, t00=0x0003, t01=0x0046}
0x0532…053c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0088}
0x053c…0550              Head {h00=0x0010, h01=0x0050, text=»DECLRA PROC «, t00=0x0003, t01=0x0092}
0x0550…0568              Head {h00=0x0014, h01=0x0050, text=» PERF DENTER,W1 «, t00=0x0003, t01=0x00a6}
0x0568…0574              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0003, t01=0x00be}
0x0574…0582              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0003, t01=0x00ca}
0x0582…058c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00d8}
0x058c…05d0              Head {h00=0x0040, h01=0x0050, text=»*    CLEAR SOME VARIABLE FIELDS BEFORE HANDLING THE PICTURE «, t00=0x0003, t01=0x00e2}
0x05d0…05da              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0126}
0x05da…05ee              Head {h00=0x0010, h01=0x0050, text=»DECLRS PROC «, t00=0x0003, t01=0x0130}
0x05ee…0606              Head {h00=0x0014, h01=0x0050, text=» PERF DENTER,W2 «, t00=0x0003, t01=0x0144}
0x0606…0612              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0003, t01=0x015c}
0x0612…0620              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0003, t01=0x0168}
0x0620…062a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0176}
0x062a…066c              Head {h00=0x003e, h01=0x0050, text=»*    CLEAR NO VARIABLE FIELDS BEFORE HANDLING THE PICTURE «, t00=0x0003, t01=0x0180}
0x066c…0676              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0032}
0x0676…068a              Head {h00=0x0010, h01=0x0050, text=»DECLRN PROC «, t00=0x0004, t01=0x003c}
0x068a…06a2              Head {h00=0x0014, h01=0x0050, text=» PERF DENTER,W3 «, t00=0x0004, t01=0x0050}
0x06a2…06ae              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0004, t01=0x0068}
0x06ae…06bc              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0004, t01=0x0074}
0x06bc…06c6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0082}
0x06c6…0702              Head {h00=0x0038, h01=0x0050, text=»*    CLEAR SOME VARIABLE FILEDS AND DISPLAY THE REST«, t00=0x0004, t01=0x008c}
0x0702…0742              Head {h00=0x003c, h01=0x0050, text=»*    OF THE VARIABLE FIELDS BEFORE HANDLING THE PICTURE «, t00=0x0004, t01=0x00c8}
0x0742…074c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0108}
0x074c…0760              Head {h00=0x0010, h01=0x0050, text=»DECLRD PROC «, t00=0x0004, t01=0x0112}
0x0760…076a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0126}
0x076a…0782              Head {h00=0x0014, h01=0x0050, text=» PERF DENTER,W4 «, t00=0x0004, t01=0x0130}
0x0782…078e              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0004, t01=0x0148}
0x078e…079c              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0004, t01=0x0154}
0x079c…07a6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0162}
0x07a6…07c2              Head {h00=0x0018, h01=0x0050, text=»*     ERROR PRINTOUT«, t00=0x0004, t01=0x016c}
0x07c2…07cc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0188}
0x07cc…07de (5, 0, 398)  Head {h00=0x000e, h01=0x0050, text=»DERR PROC «, t00=0x0005, t01=0x0004}
0x07de…07f6              Head {h00=0x0014, h01=0x0050, text=» PERF DENTER,W0 «, t00=0x0005, t01=0x0016}
0x07f6…0802              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0005, t01=0x002e}
0x0802…0810              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0005, t01=0x003a}
0x0810…081e              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x0048}
0x081e…0836              Head {h00=0x0014, h01=0x0050, text=»DENTER PROC OPT «, t00=0x0005, t01=0x0056}
0x0836…083e              Head {h00=0x0004, h01=0x0050, t00=0x0005, t01=0x006e}
0x083e…0868              Head {h00=0x0026, h01=0x0050, text=» MOVE DEBINW2,OPT MOVE TO VARIABLE«, t00=0x0005, t01=0x0076}
0x0868…088e              Head {h00=0x0022, h01=0x0050, text=»   TO ALLOW INSTR.S CMP AND IB«, t00=0x0005, t01=0x00a0}
0x088e…08b6              Head {h00=0x0024, h01=0x0050, text=» CMP DEBINW2,W0 "DEERR" ENTRY ? «, t00=0x0005, t01=0x00c6}
0x08b6…08d0              Head {h00=0x0016, h01=0x0050, text=» BE ERRPRINT YES !«, t00=0x0005, t01=0x00ee}
0x08d0…08d8              Head {h00=0x0004, h01=0x0050, t00=0x0005, t01=0x0108}
0x08d8…090a              Head {h00=0x002e, h01=0x0050, text=» TBT DEPROMPT,ENTIRE JUMP IF ENTIRE FORMAT«, t00=0x0005, t01=0x0110}
0x090a…0928              Head {h00=0x001a, h01=0x0050, text=»   SHOULD BE DIDELAYED«, t00=0x0005, t01=0x0142}
0x0928…0932              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0160}
0x0932…0954              Head {h00=0x001e, h01=0x0050, text=»*    ONLY VARIABLE FIELDS «, t00=0x0005, t01=0x016a}
0x0954…095e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x018c}
0x095e…0974              Head {h00=0x0012, h01=0x0050, text=» IB DEBINW2  C«, t00=0x0006, t01=0x0008}
0x0974…0988              Head {h00=0x0010, h01=0x0050, text=»  CLEARA  C «, t00=0x0006, t01=0x001e}
0x0988…099c              Head {h00=0x0010, h01=0x0050, text=»  CLEARS  C «, t00=0x0006, t01=0x0032}
0x099c…09ae              Head {h00=0x000e, h01=0x0050, text=»  CONT  C «, t00=0x0006, t01=0x0046}
0x09ae…09be              Head {h00=0x000c, h01=0x0050, text=»  CLEARD«, t00=0x0006, t01=0x0058}
0x09be…09c8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0068}
0x09c8…09d6              Head {h00=0x000a, h01=0x0050, text=»CLEARA«, t00=0x0006, t01=0x0072}
0x09d6…0a04              Head {h00=0x002a, h01=0x0050, text=» ERASE 2,W1,W0 ERASE ALL FROM 1 AND UP«, t00=0x0006, t01=0x0080}
0x0a04…0a14              Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x0006, t01=0x00ae}
0x0a14…0a1e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00be}
0x0a1e…0a2c              Head {h00=0x000a, h01=0x0050, text=»CLEARS«, t00=0x0006, t01=0x00c8}
0x0a2c…0a5c              Head {h00=0x002c, h01=0x0050, text=» ERASE 5,W1,W0 ERASE SOME FROM 1 AND UP «, t00=0x0006, t01=0x00d6}
0x0a5c…0a6c              Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x0006, t01=0x0106}
0x0a6c…0a7a              Head {h00=0x000a, h01=0x0050, text=»CLEARD«, t00=0x0006, t01=0x0116}
0x0a7a…0aa8              Head {h00=0x002a, h01=0x0050, text=» DISPLAY 3,W1,W0 DISPLAY FROM 1 AND UP«, t00=0x0006, t01=0x0124}
0x0aa8…0ab8              Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x0006, t01=0x0152}
0x0ab8…0ac6              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x0162}
0x0ac6…0ad0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0170}
0x0ad0…0af2              Head {h00=0x001e, h01=0x0050, text=»*    DISPLAY ENTIRE FORMAT«, t00=0x0006, t01=0x017a}
0x0af2…0afc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x000c}
0x0afc…0b0a              Head {h00=0x000a, h01=0x0050, text=»ENTIRE«, t00=0x0007, t01=0x0016}
0x0b0a…0b22              Head {h00=0x0014, h01=0x0050, text=» CLEAR DEPROMPT «, t00=0x0007, t01=0x0024}
0x0b22…0b3c              Head {h00=0x0016, h01=0x0050, text=» IB DEBINW2 JUMP C«, t00=0x0007, t01=0x003c}
0x0b3c…0b50              Head {h00=0x0010, h01=0x0050, text=»  ECLRA ON C«, t00=0x0007, t01=0x0056}
0x0b50…0b6a              Head {h00=0x0016, h01=0x0050, text=»  ECLRS ROUTINE C «, t00=0x0007, t01=0x006a}
0x0b6a…0b82              Head {h00=0x0014, h01=0x0050, text=»  ECLRN INDEX C «, t00=0x0007, t01=0x0084}
0x0b82…0b92              Head {h00=0x000c, h01=0x0050, text=»  ECLRN «, t00=0x0007, t01=0x009c}
0x0b92…0b9c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00ac}
0x0b9c…0bbc              Head {h00=0x001c, h01=0x0050, text=»*    CLEAR ALL VARIABLES«, t00=0x0007, t01=0x00b6}
0x0bbc…0bc6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00d6}
0x0bc6…0bd4              Head {h00=0x000a, h01=0x0050, text=»ECLRA «, t00=0x0007, t01=0x00e0}
0x0bd4…0c02              Head {h00=0x002a, h01=0x0050, text=» ERASE 3,W1,W0 CLEAR ALL FROM 1 AND UP«, t00=0x0007, t01=0x00ee}
0x0c02…0c16              Head {h00=0x0010, h01=0x0050, text=»   IN MEMORY«, t00=0x0007, t01=0x011c}
0x0c16…0c30              Head {h00=0x0016, h01=0x0050, text=» B ECLRN CONTINUE «, t00=0x0007, t01=0x0130}
0x0c30…0c3a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x014a}
0x0c3a…0c5c              Head {h00=0x001e, h01=0x0050, text=»*    CLEAR SOME VARIABLES «, t00=0x0007, t01=0x0154}
0x0c5c…0c66              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0176}
0x0c66…0c74              Head {h00=0x000a, h01=0x0050, text=»ECLRS «, t00=0x0007, t01=0x0180}
0x0c74…0ca2              Head {h00=0x002a, h01=0x0050, text=» ERASE 6,W1,W0 CLEAR SOME FIELDS FROM «, t00=0x0007, t01=0x018e}
0x0ca2…0cc0              Head {h00=0x001a, h01=0x0050, text=»   1 AND UP IN MEMORY «, t00=0x0008, t01=0x002c}
0x0cc0…0cca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x004a}
0x0cca…0cf4              Head {h00=0x0026, h01=0x0050, text=»*    CLEAR NO VARIABLES IN MEMORY «, t00=0x0008, t01=0x0054}
0x0cf4…0cfe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x007e}
0x0cfe…0d0c              Head {h00=0x000a, h01=0x0050, text=»ECLRN «, t00=0x0008, t01=0x0088}
0x0d0c…0d38              Head {h00=0x0028, h01=0x0050, text=» DISPLAY 0,W1,W0 DISPLAY ENTIRE FORM«, t00=0x0008, t01=0x0096}
0x0d38…0d46              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x00c2}
0x0d46…0d50              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00d0}
0x0d50…0d5c              Head {h00=0x0008, h01=0x0050, text=»CONT«, t00=0x0008, t01=0x00da}
0x0d5c…0d86              Head {h00=0x0026, h01=0x0050, text=» GETABX DEBINW4 GET CURRENT INDEX «, t00=0x0008, t01=0x00e6}
0x0d86…0db2              Head {h00=0x0028, h01=0x0050, text=» BL KTHOME JUMP IF NO CURRENT FIELD «, t00=0x0008, t01=0x0110}
0x0db2…0dc0              Head {h00=0x000a, h01=0x0050, text=»CONT5 «, t00=0x0008, t01=0x013c}
0x0dc0…0dfa              Head {h00=0x0036, h01=0x0050, text=» GETFLD 0,DEBINW4,DEBINW3 SEARCH CURRENT POSITION «, t00=0x0008, t01=0x014a}
0x0dfa…0e1c              Head {h00=0x001e, h01=0x0050, text=» BZ SETCREAD JUMP IF FOUND«, t00=0x0008, t01=0x0184}
0x0e1c…0e42              Head {h00=0x0022, h01=0x0050, text=» BL KTHOME POSITION NOT FOUND «, t00=0x0009, t01=0x0016}
0x0e42…0e4c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x003c}
0x0e4c…0e70              Head {h00=0x0020, h01=0x0050, text=»*    COMPULSORY FIELD FOUND «, t00=0x0009, t01=0x0046}
0x0e70…0e7a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x006a}
0x0e7a…0ea4              Head {h00=0x0026, h01=0x0050, text=» MOVE DEBINW4,DEBINW3 CHANGE INDEX«, t00=0x0009, t01=0x0074}
0x0ea4…0ec2              Head {h00=0x001a, h01=0x0050, text=» B CONT5 SEARCH AGAIN «, t00=0x0009, t01=0x009e}
0x0ec2…0ecc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00bc}
0x0ecc…0eda              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x00c6}
0x0eda…0ee4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00d4}
0x0ee4…0f0e              Head {h00=0x0026, h01=0x0050, text=»*    SET CURSOR AND READ KEYBOARD «, t00=0x0009, t01=0x00de}
0x0f0e…0f18              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0108}
0x0f18…0f28              Head {h00=0x000c, h01=0x0050, text=»SETCREAD«, t00=0x0009, t01=0x0112}
0x0f28…0f54              Head {h00=0x0028, h01=0x0050, text=» SETCUR  SET CURSOR ON CURRENT FIELD«, t00=0x0009, t01=0x0122}
0x0f54…0f5c              Head {h00=0x0004, h01=0x0050, t00=0x0009, t01=0x014e}
0x0f5c…0f66              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0156}
0x0f66…0f94              Head {h00=0x002a, h01=0x0050, text=»*    READ TO CURRENT FIELD ON DISPLAY «, t00=0x0009, t01=0x0160}
0x0f94…0f9e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x018e}
0x0f9e…0fac              Head {h00=0x000a, h01=0x0050, text=»READIN«, t00=0x000a, t01=0x0008}
0x0fac…0fc8              Head {h00=0x0018, h01=0x0050, text=» TBF DENOCHAN,READ50«, t00=0x000a, t01=0x0016}
0x0fc8…0fe6              Head {h00=0x001a, h01=0x0050, text=»READ10 MOVE DEBINW1,W0«, t00=0x000a, t01=0x0032}
0x0fe6…0ffe              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW3,W1«, t00=0x000a, t01=0x0050}
0x0ffe…1038              Head {h00=0x0036, h01=0x0050, text=» NKI .NE,DEDSDYKB,DEINPUT,DEKTAB5,DEBINW3,DEBINW2 «, t00=0x000a, t01=0x0068}
0x1038…104c              Head {h00=0x0010, h01=0x0050, text=» BOK READ30 «, t00=0x000a, t01=0x00a2}
0x104c…106c              Head {h00=0x001c, h01=0x0050, text=» XSTAT DEDSDYKB,DEBINW3 «, t00=0x000a, t01=0x00b6}
0x106c…108a              Head {h00=0x001a, h01=0x0050, text=» CALL MASK,DEBINW3,W64«, t00=0x000a, t01=0x00d6}
0x108a…109e              Head {h00=0x0010, h01=0x0050, text=» BNZ READ10 «, t00=0x000a, t01=0x00f4}
0x109e…10c0              Head {h00=0x001e, h01=0x0050, text=»READ20 EDWRT DEDSSCRN,BELL«, t00=0x000a, t01=0x0108}
0x10c0…10d2              Head {h00=0x000e, h01=0x0050, text=» B READ10 «, t00=0x000a, t01=0x012a}
0x10d2…10f6              Head {h00=0x0020, h01=0x0050, text=»READ30 CBL DEBINW2,W0,READ20«, t00=0x000a, t01=0x013c}
0x10f6…1116              Head {h00=0x001c, h01=0x0050, text=» CBNE DEBINW2,W0,READ40 «, t00=0x000a, t01=0x0160}
0x1116…1138              Head {h00=0x001e, h01=0x0050, text=» DISPLAY 0,W1,W1 POWER OFF«, t00=0x000a, t01=0x0180}
0x1138…114c              Head {h00=0x0010, h01=0x0050, text=» B SETCREAD «, t00=0x000b, t01=0x0012}
0x114c…117a              Head {h00=0x002a, h01=0x0050, text=»READ40 IB DEBINW2,READ10,STATUS,KCOPY «, t00=0x000b, t01=0x0026}
0x117a…1192              Head {h00=0x0014, h01=0x0050, text=» SUB DEBINW2,W3 «, t00=0x000b, t01=0x0054}
0x1192…11aa              Head {h00=0x0014, h01=0x0050, text=» CLEAR DENOCHAN «, t00=0x000b, t01=0x006c}
0x11aa…11b6              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000b, t01=0x0084}
0x11b6…11c4              Head {h00=0x000a, h01=0x0050, text=»READ50«, t00=0x000b, t01=0x0090}
0x11c4…11f6              Head {h00=0x002e, h01=0x0050, text=» DYKI DEINPUT,DEKTAB1,DEKTAB2,DEBINW1,  C «, t00=0x000b, t01=0x009e}
0x11f6…1210              Head {h00=0x0016, h01=0x0050, text=»  DEBINW2,DEBINW4 «, t00=0x000b, t01=0x00d0}
0x1210…121e              Head {h00=0x000a, h01=0x0050, text=»DYKOUT«, t00=0x000b, t01=0x00ea}
0x121e…1236              Head {h00=0x0014, h01=0x0050, text=» BL ERRPRT ERROR«, t00=0x000b, t01=0x00f8}
0x1236…1256              Head {h00=0x001c, h01=0x0050, text=» CBNL DEBINW2,W0,DYK100 «, t00=0x000b, t01=0x0110}
0x1256…1264              Head {h00=0x000a, h01=0x0050, text=»DYK050«, t00=0x000b, t01=0x0130}
0x1264…127c              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW2,W2«, t00=0x000b, t01=0x013e}
0x127c…128e              Head {h00=0x000e, h01=0x0050, text=» B ERRCAN «, t00=0x000b, t01=0x0156}
0x128e…129c              Head {h00=0x000a, h01=0x0050, text=»DYK100«, t00=0x000b, t01=0x0168}
0x129c…12ba              Head {h00=0x001a, h01=0x0050, text=» CBE DEBINW2,W0,ECLRN «, t00=0x000b, t01=0x0176}
0x12ba…12d2 (12, 0, 400) Head {h00=0x0014, h01=0x0050, text=»   KEY SWITCHES «, t00=0x000c, t01=0x0004}
0x12d2…12fe              Head {h00=0x0028, h01=0x0050, text=» IB DEBINW2,UPD300,CLEA20 JUMP ON C «, t00=0x000c, t01=0x001c}
0x12fe…1320              Head {h00=0x001e, h01=0x0050, text=»  UPDATE,ERRCAN,ERRCAN,  C«, t00=0x000c, t01=0x0048}
0x1320…1352              Head {h00=0x002e, h01=0x0050, text=»  UPDATE,UPDATE,UPDATE,UPDATE CONVERTED C «, t00=0x000c, t01=0x006a}
0x1352…138a              Head {h00=0x0034, h01=0x0050, text=»  UPDATE,UPDATE,UPDATE,UPDATE END-OF-ITEM-KEY C «, t00=0x000c, t01=0x009c}
0x138a…13a6              Head {h00=0x0018, h01=0x0050, text=»  UPDATE,KDUPL,KEDIT«, t00=0x000c, t01=0x00d4}
0x13a6…13b4              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x00f0}
0x13b4…13be              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00fe}
0x13be…13f6              Head {h00=0x0034, h01=0x0050, text=»*    HANDLE THE RESPECTIVE KEY AS EOI-KEY FIRST «, t00=0x000c, t01=0x0108}
0x13f6…1400              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0140}
0x1400…140e              Head {h00=0x000a, h01=0x0050, text=»UPDATE«, t00=0x000c, t01=0x014a}
0x140e…1440              Head {h00=0x002e, h01=0x0050, text=» CBE DEBINW1,W0,UPD350 JUMP IF LENGTH = 0 «, t00=0x000c, t01=0x0158}
0x1440…146a              Head {h00=0x0026, h01=0x0050, text=» GETCTL 3,DEBINW4 GET SCHK-NUMBER «, t00=0x000c, t01=0x018a}
0x146a…14a4              Head {h00=0x0036, h01=0x0050, text=» CBE DEBINW4,W0,UPD050 JUMP IF NOT STANDARD CHECK «, t00=0x000d, t01=0x0024}
0x14a4…14d2              Head {h00=0x002a, h01=0x0050, text=» PERFI DEBINW4,DECHK1,DECHK2,DECHK3  C«, t00=0x000d, t01=0x005e}
0x14d2…14f8              Head {h00=0x0022, h01=0x0050, text=»  DECHK4,DECHK5,DECHK6,DECHK7 «, t00=0x000d, t01=0x008c}
0x14f8…1522              Head {h00=0x0026, h01=0x0050, text=» IB DEBINW3,UPD100,UPD070,ERRPRINT«, t00=0x000d, t01=0x00b2}
0x1522…152c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00dc}
0x152c…1550              Head {h00=0x0020, h01=0x0050, text=»*    CONDITIONAL DISPLAYING «, t00=0x000d, t01=0x00e6}
0x1550…155a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x010a}
0x155a…1568              Head {h00=0x000a, h01=0x0050, text=»UPD050«, t00=0x000d, t01=0x0114}
0x1568…1596              Head {h00=0x002a, h01=0x0050, text=» MOVE DEBINW4,W1 INDICATE COND. DIDEL «, t00=0x000d, t01=0x0122}
0x1596…15a8              Head {h00=0x000e, h01=0x0050, text=» B UPD200 «, t00=0x000d, t01=0x0150}
0x15a8…15b6              Head {h00=0x000a, h01=0x0050, text=»UPD070«, t00=0x000d, t01=0x0162}
0x15b6…15de              Head {h00=0x0024, h01=0x0050, text=» GETCTL 0,DEBINW3 GET APPL-VALUE«, t00=0x000d, t01=0x0170}
0x15de…1610              Head {h00=0x002e, h01=0x0050, text=» CBNE DEBINW3,W0,UPD210 JUMP IF APPL VALUE«, t00=0x000e, t01=0x0008}
0x1610…1624              Head {h00=0x0010, h01=0x0050, text=» B SETCREAD «, t00=0x000e, t01=0x003a}
0x1624…162e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x004e}
0x162e…1654              Head {h00=0x0022, h01=0x0050, text=»*    UNCONDITIONAL DISPLAYING «, t00=0x000e, t01=0x0058}
0x1654…165e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x007e}
0x165e…166c              Head {h00=0x000a, h01=0x0050, text=»UPD100«, t00=0x000e, t01=0x0088}
0x166c…16a4              Head {h00=0x0034, h01=0x0050, text=» MOVE DEBINW4,W2 INDICATE UNCONDITIONAL DIDELAY «, t00=0x000e, t01=0x0096}
0x16a4…16b2              Head {h00=0x000a, h01=0x0050, text=»UPD200«, t00=0x000e, t01=0x00ce}
0x16b2…16da              Head {h00=0x0024, h01=0x0050, text=» GETCTL 0,DEBINW3 GET APPL-VALUE«, t00=0x000e, t01=0x00dc}
0x16da…170e              Head {h00=0x0030, h01=0x0050, text=» CBE DEBINW3,W0,UPD400 JUMP IF NO APPL VALUE«, t00=0x000e, t01=0x0104}
0x170e…1718              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0138}
0x1718…1744              Head {h00=0x0028, h01=0x0050, text=»*    APPL-VALUE DIFFERENT FROM ZERO «, t00=0x000e, t01=0x0142}
0x1744…174e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x016e}
0x174e…175c              Head {h00=0x000a, h01=0x0050, text=»UPD210«, t00=0x000e, t01=0x0178}
0x175c…176e              Head {h00=0x000e, h01=0x0050, text=» PERF APP «, t00=0x000e, t01=0x0186}
0x176e…179a              Head {h00=0x0028, h01=0x0050, text=» IB DEBINW3,UPD260,SETCREAD,ERRPRINT«, t00=0x000f, t01=0x0008}
0x179a…17ac              Head {h00=0x000e, h01=0x0050, text=» B UPD400 «, t00=0x000f, t01=0x0034}
0x17ac…17b6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0046}
0x17b6…17d8              Head {h00=0x001e, h01=0x0050, text=»*    OK AFTER APPL CONTROL«, t00=0x000f, t01=0x0050}
0x17d8…17fe              Head {h00=0x0022, h01=0x0050, text=»*    UNCONDITIONAL DIDELAYING «, t00=0x000f, t01=0x0072}
0x17fe…1808              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0098}
0x1808…1816              Head {h00=0x000a, h01=0x0050, text=»UPD260«, t00=0x000f, t01=0x00a2}
0x1816…184c              Head {h00=0x0032, h01=0x0050, text=» UPDFLD 1,DEINPUT UPDATE FIELD WITH DIDELAYING«, t00=0x000f, t01=0x00b0}
0x184c…187e              Head {h00=0x002e, h01=0x0050, text=»UPD300 SET DECHANGE INDICATE CHANGED ITEM «, t00=0x000f, t01=0x00e6}
0x187e…188c              Head {h00=0x000a, h01=0x0050, text=»UPD350«, t00=0x000f, t01=0x0118}
0x188c…18b4              Head {h00=0x0024, h01=0x0050, text=»*    JUMP ON FUNCTION KEY INDEX «, t00=0x000f, t01=0x0126}
0x18b4…18d8              Head {h00=0x0020, h01=0x0050, text=» IB DEBINW2,KTFWD,DUMMY,  C «, t00=0x000f, t01=0x014e}
0x18d8…18fc              Head {h00=0x0020, h01=0x0050, text=»  KEOI,DUMMY,DUMMY,KTFWD,  C«, t00=0x000f, t01=0x0172}
0x18fc…192c              Head {h00=0x002c, h01=0x0050, text=»  KTBWD,KTHOME,KERASE,KKEEP,KTRIGHT,  C «, t00=0x0010, t01=0x0008}
0x192c…195c              Head {h00=0x002c, h01=0x0050, text=»  KTDOWN,STATUS,KCOPY,DUMMY,DUMMY,KENTER«, t00=0x0010, t01=0x0038}
0x195c…198a              Head {h00=0x002a, h01=0x0050, text=» SUB DEBINW2,W14 ADJUST EOI-KEY INDEX «, t00=0x0010, t01=0x0068}
0x198a…199a              Head {h00=0x000c, h01=0x0050, text=» B RETUR«, t00=0x0010, t01=0x0096}
0x199a…19a8              Head {h00=0x000a, h01=0x0050, text=»RETUR1«, t00=0x0010, t01=0x00a6}
0x19a8…19d0              Head {h00=0x0024, h01=0x0050, text=» SUB DEBINW2,W1 ADJUST KEY INDEX«, t00=0x0010, t01=0x00b4}
0x19d0…19de              Head {h00=0x000a, h01=0x0050, text=»DUMMY «, t00=0x0010, t01=0x00dc}
0x19de…19ec              Head {h00=0x000a, h01=0x0050, text=»RETUR «, t00=0x0010, t01=0x00ea}
0x19ec…1a04              Head {h00=0x0014, h01=0x0050, text=» CLEAR DENOCHAN «, t00=0x0010, t01=0x00f8}
0x1a04…1a10              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0010, t01=0x0110}
0x1a10…1a1a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x011c}
0x1a1a…1a28              Head {h00=0x000a, h01=0x0050, text=»UPD400«, t00=0x0010, t01=0x0126}
0x1a28…1a62              Head {h00=0x0036, h01=0x0050, text=» CBE DEBINW4,W2,UPD260 JUMP IF UNCONDITIONAL DIDEL«, t00=0x0010, t01=0x0134}
0x1a62…1a96              Head {h00=0x0030, h01=0x0050, text=» UPDFLD 0,DEINPUT UPDATE FIELD DIDEL. COND. «, t00=0x0010, t01=0x016e}
0x1a96…1aa8              Head {h00=0x000e, h01=0x0050, text=» B UPD300 «, t00=0x0011, t01=0x0012}
0x1aa8…1ab2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0024}
0x1ab2…1ac0              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x002e}
0x1ac0…1ae6              Head {h00=0x0022, h01=0x0050, text=»KEOI   COMMON END-OF-ITEM KEY «, t00=0x0011, t01=0x003c}
0x1ae6…1b0a              Head {h00=0x0020, h01=0x0050, text=»KTFWD   TAB. FORWARD 1 STEP «, t00=0x0011, t01=0x0062}
0x1b0a…1b18              Head {h00=0x000a, h01=0x0050, text=» TFWD «, t00=0x0011, t01=0x0086}
0x1b18…1b2a              Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0011, t01=0x0094}
0x1b2a…1b34              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00a6}
0x1b34…1b5c              Head {h00=0x0024, h01=0x0050, text=»KTBWD   TABULATION 1 STEP BACKW.«, t00=0x0011, t01=0x00b0}
0x1b5c…1b6a              Head {h00=0x000a, h01=0x0050, text=» TBWD «, t00=0x0011, t01=0x00d8}
0x1b6a…1b7c              Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0011, t01=0x00e6}
0x1b7c…1b86              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00f8}
0x1b86…1bac              Head {h00=0x0022, h01=0x0050, text=»KTHOME   TAB. TO HOME POSITION«, t00=0x0011, t01=0x0102}
0x1bac…1bba              Head {h00=0x000a, h01=0x0050, text=» THOME«, t00=0x0011, t01=0x0128}
0x1bba…1bcc              Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0011, t01=0x0136}
0x1bcc…1bd6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0148}
0x1bd6…1c02              Head {h00=0x0028, h01=0x0050, text=»KTLDOWN   TAB. TO FIRST ON NEXT LINE«, t00=0x0011, t01=0x0152}
0x1c02…1c12              Head {h00=0x000c, h01=0x0050, text=» TLDOWN «, t00=0x0011, t01=0x017e}
0x1c12…1c24              Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0011, t01=0x018e}
0x1c24…1c2e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0010}
0x1c2e…1c50              Head {h00=0x001e, h01=0x0050, text=»KTLEFT   TAB. TO LEFTMOST «, t00=0x0012, t01=0x001a}
0x1c50…1c5e              Head {h00=0x000a, h01=0x0050, text=» TLEFT«, t00=0x0012, t01=0x003c}
0x1c5e…1c70              Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0012, t01=0x004a}
0x1c70…1c7a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x005c}
0x1c7a…1c9e              Head {h00=0x0020, h01=0x0050, text=»KTRIGHT   TAB. TO RIGHTMOST «, t00=0x0012, t01=0x0066}
0x1c9e…1cae              Head {h00=0x000c, h01=0x0050, text=» TRIGHT «, t00=0x0012, t01=0x008a}
0x1cae…1cc0              Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0012, t01=0x009a}
0x1cc0…1cca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00ac}
0x1cca…1ce6              Head {h00=0x0018, h01=0x0050, text=»KTDOWN   TAB 1 DOWN «, t00=0x0012, t01=0x00b6}
0x1ce6…1cf4              Head {h00=0x000a, h01=0x0050, text=» TDOWN«, t00=0x0012, t01=0x00d2}
0x1cf4…1d06              Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0012, t01=0x00e0}
0x1d06…1d10              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00f2}
0x1d10…1d28              Head {h00=0x0014, h01=0x0050, text=»KTUP   TAB 1 UP «, t00=0x0012, t01=0x00fc}
0x1d28…1d34              Head {h00=0x0008, h01=0x0050, text=» TUP«, t00=0x0012, t01=0x0114}
0x1d34…1d3c              Head {h00=0x0004, h01=0x0050, t00=0x0012, t01=0x0120}
0x1d3c…1d5c              Head {h00=0x001c, h01=0x0050, text=»TSTTAB   TEST TAB OUTPUT«, t00=0x0012, t01=0x0128}
0x1d5c…1d72              Head {h00=0x0012, h01=0x0050, text=» BE READIN OK «, t00=0x0012, t01=0x0148}
0x1d72…1d90              Head {h00=0x001a, h01=0x0050, text=» BL SETCREAD NOT FOUND«, t00=0x0012, t01=0x015e}
0x1d90…1dbe              Head {h00=0x002a, h01=0x0050, text=» BOFL SETCREAD EMPTY COMPULSORY FIELD «, t00=0x0012, t01=0x017c}
0x1dbe…1dc8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x001a}
0x1dc8…1dd2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0024}
0x1dd2…1df6              Head {h00=0x0020, h01=0x0050, text=»*    CONDITIONAL TABULATION «, t00=0x0013, t01=0x002e}
0x1df6…1e00              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0052}
0x1e00…1e14              Head {h00=0x0010, h01=0x0050, text=» PERF DETCHK«, t00=0x0013, t01=0x005c}
0x1e14…1e32              Head {h00=0x001a, h01=0x0050, text=» CBE DEBINW3,W0,KCOP10«, t00=0x0013, t01=0x0070}
0x1e32…1e56              Head {h00=0x0020, h01=0x0050, text=» IB DEBINW2,DUMMY,DUMMY,  C «, t00=0x0013, t01=0x008e}
0x1e56…1e7c              Head {h00=0x0022, h01=0x0050, text=»  KTFWD,DUMMY,DUMMY,KTFWD,  C «, t00=0x0013, t01=0x00b2}
0x1e7c…1ea2              Head {h00=0x0022, h01=0x0050, text=»  KTBWD,KTFWD,KTFWD,KTFWD,  C «, t00=0x0013, t01=0x00d8}
0x1ea2…1ebe              Head {h00=0x0018, h01=0x0050, text=»  KTBWD,KTFWD,KTBWD «, t00=0x0013, t01=0x00fe}
0x1ebe…1efe              Head {h00=0x003c, h01=0x0050, text=»*    BRANCH LIST EXHAUSTED - DEBINW2 CLOBBERED BY DETCHK«, t00=0x0013, t01=0x011a}
0x1efe…1f06              Head {h00=0x0004, h01=0x0050, t00=0x0013, t01=0x015a}
0x1f06…1f1a              Head {h00=0x0010, h01=0x0050, text=» B SETCREAD «, t00=0x0013, t01=0x0162}
0x1f1a…1f22              Head {h00=0x0004, h01=0x0050, t00=0x0013, t01=0x0176}
0x1f22…1f2a              Head {h00=0x0004, h01=0x0050, t00=0x0013, t01=0x017e}
0x1f2a…1f44              Head {h00=0x0016, h01=0x0050, text=»STATUS PERF DESTAT«, t00=0x0013, t01=0x0186}
0x1f44…1f56              Head {h00=0x000e, h01=0x0050, text=» B ERRPRT «, t00=0x0014, t01=0x0010}
0x1f56…1f64              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x0022}
0x1f64…1f7e              Head {h00=0x0016, h01=0x0050, text=»KCOPY   HARD COPY «, t00=0x0014, t01=0x0030}
0x1f7e…1f96              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW3,W1«, t00=0x0014, t01=0x004a}
0x1f96…1fb8              Head {h00=0x001e, h01=0x0050, text=» PRINT DEDSPRT,DEBINW3,W0 «, t00=0x0014, t01=0x0062}
0x1fb8…1fc6              Head {h00=0x000a, h01=0x0050, text=»KCOP10«, t00=0x0014, t01=0x0084}
0x1fc6…1fee              Head {h00=0x0024, h01=0x0050, text=» B SETCREAD SET CURSOR AND READ «, t00=0x0014, t01=0x0092}
0x1fee…1ff8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00ba}
0x1ff8…2014              Head {h00=0x0018, h01=0x0050, text=»KDUPL   DUPLICATION «, t00=0x0014, t01=0x00c4}
0x2014…2044              Head {h00=0x002c, h01=0x0050, text=» MOVE DEBINW2,W3 INDICATE COMMON EOI-KEY«, t00=0x0014, t01=0x00e0}
0x2044…2066              Head {h00=0x001e, h01=0x0050, text=» DUPL DEINPUT DUPLICATION «, t00=0x0014, t01=0x0110}
0x2066…2086              Head {h00=0x001c, h01=0x0050, text=» BZ UPD260 DUPL ALLOWED «, t00=0x0014, t01=0x0132}
0x2086…20b8              Head {h00=0x002e, h01=0x0050, text=» MOVE DEBINW4,W0 INDICATE ILLEGAL EOI-KEY «, t00=0x0014, t01=0x0152}
0x20b8…20dc              Head {h00=0x0020, h01=0x0050, text=» B ERRPRINT DUPL NOT ALLOWED«, t00=0x0014, t01=0x0184}
0x20dc…20ea              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x0018}
0x20ea…20f4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0026}
0x20f4…210c              Head {h00=0x0014, h01=0x0050, text=»*    EDIT FIELD «, t00=0x0015, t01=0x0030}
0x210c…2116              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0048}
0x2116…2124              Head {h00=0x000a, h01=0x0050, text=»KEDITX«, t00=0x0015, t01=0x0052}
0x2124…213c              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW1,W1«, t00=0x0015, t01=0x0060}
0x213c…214a              Head {h00=0x000a, h01=0x0050, text=»KEDIT «, t00=0x0015, t01=0x0078}
0x214a…216c              Head {h00=0x001e, h01=0x0050, text=» GETCTL 1,DEBINW3 GET MAXL«, t00=0x0015, t01=0x0086}
0x216c…218c              Head {h00=0x001c, h01=0x0050, text=» CBNE DEBINW3,W0,KED100 «, t00=0x0015, t01=0x00a8}
0x218c…21b8              Head {h00=0x0028, h01=0x0050, text=» EDWRT DEDSSCRN,BELL ACOUSTIC ALARM «, t00=0x0015, t01=0x00c8}
0x21b8…21cc              Head {h00=0x0010, h01=0x0050, text=» B SETCREAD «, t00=0x0015, t01=0x00f4}
0x21cc…21da              Head {h00=0x000a, h01=0x0050, text=»KED100«, t00=0x0015, t01=0x0108}
0x21da…2204              Head {h00=0x0026, h01=0x0050, text=» EDFLD DEINPUT,DEKTAB3,DEBINW1,  C«, t00=0x0015, t01=0x0116}
0x2204…221e              Head {h00=0x0016, h01=0x0050, text=»  DEBINW2,DEBINW4 «, t00=0x0015, t01=0x0140}
0x221e…2244              Head {h00=0x0022, h01=0x0050, text=» B DYKOUT CONTINUE AS FOR DYKI«, t00=0x0015, t01=0x015a}
0x2244…224e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0180}
0x224e…2268              Head {h00=0x0016, h01=0x0050, text=»*       ERASE KEY «, t00=0x0015, t01=0x018a}
0x2268…2272              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0014}
0x2272…2280              Head {h00=0x000a, h01=0x0050, text=»KERASE«, t00=0x0016, t01=0x001e}
0x2280…2298              Head {h00=0x0014, h01=0x0050, text=» GETABX DEBINW4 «, t00=0x0016, t01=0x002c}
0x2298…22b4              Head {h00=0x0018, h01=0x0050, text=» ERASE 2,DEBINW4,W0 «, t00=0x0016, t01=0x0044}
0x22b4…22be              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0060}
0x22be…22d4              Head {h00=0x0012, h01=0x0050, text=»*    ENTER KEY«, t00=0x0016, t01=0x006a}
0x22d4…22de              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0080}
0x22de…22ec              Head {h00=0x000a, h01=0x0050, text=»KKEEP «, t00=0x0016, t01=0x008a}
0x22ec…22fa              Head {h00=0x000a, h01=0x0050, text=»KENTER«, t00=0x0016, t01=0x0098}
0x22fa…232c              Head {h00=0x002e, h01=0x0050, text=» MOVE DEBINW4,W5 INDICATE COMP.FIELD FOUND«, t00=0x0016, t01=0x00a6}
0x232c…235a              Head {h00=0x002a, h01=0x0050, text=» MOVE DEBINW1,W0 INDICATE NO CLEARING «, t00=0x0016, t01=0x00d8}
0x235a…239a              Head {h00=0x003c, h01=0x0050, text=» GETFLD 0,DEBINW1,DEBINW3 SEARCH FOR EMPTY COMP. FIELDS «, t00=0x0016, t01=0x0106}
0x239a…23c6              Head {h00=0x0028, h01=0x0050, text=» BOFL KENT10 EMPTY COMP. FIELD FOUND«, t00=0x0016, t01=0x0146}
0x23c6…23f0              Head {h00=0x0026, h01=0x0050, text=» TSTCTL 2 LOOK IF COMPULSORY FIELD«, t00=0x0016, t01=0x0172}
0x23f0…2406              Head {h00=0x0012, h01=0x0050, text=» BZ KENT05 NO!«, t00=0x0017, t01=0x000c}
0x2406…2438              Head {h00=0x002e, h01=0x0050, text=» CALL EMPTYT,:FMTITEM LOOK IF EMPTY FIELD «, t00=0x0017, t01=0x0022}
0x2438…2450              Head {h00=0x0014, h01=0x0050, text=» BP KENT10 YES! «, t00=0x0017, t01=0x0054}
0x2450…245e              Head {h00=0x000a, h01=0x0050, text=»KENT05«, t00=0x0017, t01=0x006c}
0x245e…247c              Head {h00=0x001a, h01=0x0050, text=» CBE DEBINW2,W9,KCOP10«, t00=0x0017, t01=0x007a}
0x247c…249c              Head {h00=0x001c, h01=0x0050, text=» CBE DEBINW2,W10,KCOP10 «, t00=0x0017, t01=0x0098}
0x249c…24d2              Head {h00=0x0032, h01=0x0050, text=» MOVE DEBINW2,W3 INDICATE ENTER KEY DEPRESSED «, t00=0x0017, t01=0x00b8}
0x24d2…24de              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0017, t01=0x00ee}
0x24de…24e8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00fa}
0x24e8…2512              Head {h00=0x0026, h01=0x0050, text=»*    EMPTY COMPULSORY FIELD FOUND «, t00=0x0017, t01=0x0104}
0x2512…251c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x012e}
0x251c…252a              Head {h00=0x000a, h01=0x0050, text=»KENT10«, t00=0x0017, t01=0x0138}
0x252a…2542              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW2,W0«, t00=0x0017, t01=0x0146}
0x2542…257c              Head {h00=0x0036, h01=0x0050, text=» GETFLD 0,DEBINW3,DEBINW2 GET THE COMPULSORY FIELD«, t00=0x0017, t01=0x015e}
0x257c…2594              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW1,W0«, t00=0x0018, t01=0x0008}
0x2594…25a2              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0018, t01=0x0020}
0x25a2…25b0              Head {h00=0x000a, h01=0x0050, text=»ERRPRT«, t00=0x0018, t01=0x002e}
0x25b0…25dc              Head {h00=0x0028, h01=0x0050, text=» CBE DEBINW2,W16,KEDIT JUMP IF EDIT «, t00=0x0018, t01=0x003c}
0x25dc…260c              Head {h00=0x002c, h01=0x0050, text=» CBE DEBINW2,W4,ERRCAN JUMP IF ERRCANEL1«, t00=0x0018, t01=0x0068}
0x260c…263c              Head {h00=0x002c, h01=0x0050, text=» CBE DEBINW2,W5,ERRCAN JUMP IF ERRCANEL2«, t00=0x0018, t01=0x0098}
0x263c…265c              Head {h00=0x001c, h01=0x0050, text=» XSTAT DEDSDYKB,DEBINW3 «, t00=0x0018, t01=0x00c8}
0x265c…267a              Head {h00=0x001a, h01=0x0050, text=» CALL MASK,DEBINW3,W64«, t00=0x0018, t01=0x00e8}
0x267a…268e              Head {h00=0x0010, h01=0x0050, text=» BNZ DYK050 «, t00=0x0018, t01=0x0106}
0x268e…2698              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x011a}
0x2698…26b4              Head {h00=0x0018, h01=0x0050, text=»*    ERROR HANDLING «, t00=0x0018, t01=0x0124}
0x26b4…26be              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0140}
0x26be…26ce              Head {h00=0x000c, h01=0x0050, text=»ERRPRINT«, t00=0x0018, t01=0x014a}
0x26ce…26ea              Head {h00=0x0018, h01=0x0050, text=» PERF DERROR,DEKTAB4«, t00=0x0018, t01=0x015a}
0x26ea…271c              Head {h00=0x002e, h01=0x0050, text=» IB DEBINW2,SETCREAD,RETUR2,RETUR2,KEDITX «, t00=0x0018, t01=0x0176}
0x271c…2730              Head {h00=0x0010, h01=0x0050, text=» B SETCREAD «, t00=0x0019, t01=0x0018}
0x2730…273a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x002c}
0x273a…275a              Head {h00=0x001c, h01=0x0050, text=»*       CLEAR LAST LINE «, t00=0x0019, t01=0x0036}
0x275a…2764              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0056}
0x2764…277c              Head {h00=0x0014, h01=0x0050, text=»ERRCAN PERF CANC«, t00=0x0019, t01=0x0060}
0x277c…27a2              Head {h00=0x0022, h01=0x0050, text=» IB DEBINW2,SETCREAD,SETCREAD «, t00=0x0019, t01=0x0078}
0x27a2…27d4              Head {h00=0x002e, h01=0x0050, text=» SUB DEBINW2,W3 ADJUST FOR CANCEL1,CANCEL2«, t00=0x0019, t01=0x009e}
0x27d4…27e0              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0019, t01=0x00d0}
0x27e0…27ee              Head {h00=0x000a, h01=0x0050, text=»CLEA20«, t00=0x0019, t01=0x00dc}
0x27ee…281c              Head {h00=0x002a, h01=0x0050, text=» GETABX DEBINW4 GET CURRENT TAB INDEX «, t00=0x0019, t01=0x00ea}
0x281c…284c              Head {h00=0x002c, h01=0x0050, text=» DISPLAY 1,DEBINW4,DEBINW4 DISPLAY FIELD«, t00=0x0019, t01=0x0118}
0x284c…2868              Head {h00=0x0018, h01=0x0050, text=» B SETCREAD CONTINUE«, t00=0x0019, t01=0x0148}
0x2868…2872              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0164}
0x2872…2880              Head {h00=0x000a, h01=0x0050, text=»RETUR2«, t00=0x0019, t01=0x016e}
0x2880…2898              Head {h00=0x0014, h01=0x0050, text=» SUB DEBINW2,W1 «, t00=0x0019, t01=0x017c}
0x2898…28a4 (26, 2, 138) Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001a, t01=0x0004}
0x28a4…28ae              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0010}
0x28ae…28c0              Head {h00=0x000e, h01=0x0050, text=»BELL FRMT «, t00=0x001a, t01=0x001a}
0x28c0…28cc              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x001a, t01=0x002c}
0x28cc…28e2              Head {h00=0x0012, h01=0x0050, text=» FILLR X'07',1«, t00=0x001a, t01=0x0038}
0x28e2…28f0              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x001a, t01=0x004e}
0x28f0…28f8              Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x005c}
0x28f8…2906              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x001a, t01=0x0064}
0x2906…290e              Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x0072}
0x290e…291a              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x001a, t01=0x007a}
0x291a…291e              Head {h00=0x4004, h01=0x0000}
0x291e…2922              00 1a 00 86                                                                                                                                                                                                                                       ┆    ┆
0x2922…292a (27, 1, 8)   20 04 00 00 00 1b 00 04                                                                                                                                                                                                                           ┆        ┆
0x292a…297a (28, 0, 400) 00 00 a0 02 00 02 00 18 00 00 b0 02 00 32 00 08 00 00 b0 0b 00 42 00 02 00 00 00 78 00 58 80 19 00 d0 00 03 00 00 00 40 01 1b 01 04 00 00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆             2       B     x X         @                                        ┆
0x297a…29ca              20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆                                                                                ┆
                         […0x1…]
0x2a1a…2a6a              20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 06 01 00 00 00 00 24 00 00 00 00 00 00 00 00 00 00   ┆                                                                     $          ┆
0x2a6a…2aba              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 42 20 02 00 00 20 02 00 02 20 02 00 04 20 02 00 06 20 02 00 08 20 02 00 0a 20 02 00 0c 20 02 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 08   ┆                         B                                                      ┆

Reduced view