|
DataMuseum.dkPresents historical artifacts from the history of: Philips Data Systems |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Philips Data Systems Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 20784 (0x5130)
Notes: pts_type(SC)
Names: »SCREEN.SC«
└─⟦38a30a456⟧ Bits:30009662 Philips computer tape "600104"
└─⟦this⟧ »OD-KOM/SCREEN.SC«
IDENT SCREEN 840124 EV 1.1,78-04-20,870138040310 * * A STANDARD PROGRAM PACKAGE HANDLING * A COMPLETE PICTURE ON A DISPLAY SCREEN * * RUNNING UNDER: CREDIT REL 3.1 * TOSS REL 8.1 * DDUM KMD08 PDIV * ENTRY SPCLRA CLEAR ALL VARIABLE FIELDS ENTRY SPCLRS CLEAR SOME VARIABLE FIELDS ENTRY SPCLRN CLEAR NO VARIABLE FIELDS ENTRY SPERR DISPLAY ERROR PRINTOUT AND CONTINUE HANDLING ENTRY SPLIN8 MESSAGE ON LINE 8 ENTRY SPCA AS SPCLRA-- ENTRY SPCN AS SPCLRN-- SPCA AND SPCN ARE ONLY ACTIVE BETWEEN LINES SPLINTOP AND SPLINLOW ENTRY SCREEN ENTRY SPINF1 INFORMATION ON LINE 1 ENTRY SPINF8 INFORMATION ON LINE 8 ENTRY BELL ENTRY DKTEST ENTRY KBTEST * EXT SPCHK1 STANDARD CHECK ROUTINE NO. 1 EXT SPCHK2 STANDARD CHECK ROUTINE NO. 2 EXT SPCHK3 STANDARD CHECK ROUTINE NO. 3 EXT SPCHK4 STANDARD CHECK ROUTINE NO. 4 EXT SPCHK5 STANDARD CHECK ROUTINE NO.5 EXT SPCHK6 STANDARD CHECK ROUTINE NO. 6 EXT SPCHK7 STANDARD CHECK ROUTINE NO. 7 EXT SPAPPL USER ROUTINE TO HANDLE APPL VALUES EXT SPTCHK USER ROUTINE TO EVALUATE CONDITIONAL TABULATION * EXT ABORT EXT EMPTYT ASSEMBLY SUBROUTINE EMPTYT - TEST IF DATA ITEM IS EMPTY EXT CLEAR8 * INCLUDE KEY461,LIST * FIRST INCLUDE KEY VALUES, * THEN INCLUDE SPECIAL SCREEN FORMATS INCLUDE SL461,LIST EJECT SPCLRA PROC * * SPCLRA - CLEAR ALL VARABLE FIELDS BEFORE HANDLING THE PICTURE * MOVE SPERASE,=W'0' MOVE SPLINTOP,=W'1' WHOLE SCREEN MOVE SPLINLOW,=W'0' PERF SCREEN,=W'1' RET PEND SPCLRS PROC * * SPCLRS - CLEAR SOME VARIABLE FIELDS BEFORE HANDLING THE PICTURE * MOVE SPERASE,=W'0' MOVE SPLINTOP,=W'1' WHOLE SCREEN MOVE SPLINLOW,=W'0' PERF SCREEN,=W'2' RET PEND SPCLRN PROC * * SPCLRN - CLEAR NO VARIABLE FIELDS BEFORE HANDLING THE PICTURE * MOVE SPERASE,=W'0' MOVE SPLINTOP,=W'1' WHOLE SCREEN MOVE SPLINLOW,=W'0' PERF SCREEN,=W'3' RET PEND SPERR PROC * * HANDLE ERRORS DETECTED OUTSIDE THE PACKAGE * TBT TBCTASK,SPERR90 PERF SCREEN,=W'0' SPERR90 RET PEND SPCA PROC * * SPCA - AS SPCLRA, BUT ONLY BETWEEN LINES SPLINTOPAND SPLINLOW * MOVE SPERASE,=W'4' PERF SCREEN,=W'1' RET PEND SPCN PROC * * SPCN - AS SPCLRN, BUT ONLY BETWEEN LINES SPLINTOP AND SPLINLOW * MOVE SPERASE,=W'4' PERF SCREEN,=W'3' RET PEND EJECT SCREEN PROC $OPT * * SCREEN SCREEN HANDLING MODULE * * CALL: PERF SCREEN,<$OPT> * PLIT $OPT OPTIO SELECTOR CLEAR SPWARNFL CLEAR WARNING FLAG MOVE SPBINW2,$OPT MOVE TO VARIABLE TO ALLOW INSTR.S CMP AND IB CMP SPBINW2,='0' "SPERR" ENTRY ? BE ERRPRINT YES ! TBT SPPROMPT,ENTIRE JUMP IF ENTIRE FORMAT SHOULD BE DISPLAYED * * ONLY VARIABLE FIELDS * IB SPBINW2,CLEARA,CLEARS,CONT JUMP ON ROUTINE INDEX * CLEARA ERASE 10,SPLINTOP,SPLINLOW ERASE ALL FROM 1 AND UP THOME B CONT * CLEARS ERASE 5,SPLINTOP,SPLINLOW ERASE SOME FROM 1 AND UP B CONT EJECT * * DISPLAY ENTIRE FORMAT * ENTIRE IB SPBINW2,ECLRA,ECLRS,ECLRN JUMP ON ROUTINE INDEX * * CLEAR ALL VARIABLES * ECLRA ERASE 11,SPLINTOP,SPLINLOW CLEAR ALL IN MEMORY B ECLRN * * CLEAR SOME VARIABLES * ECLRS ERASE 6,SPLINTOP,SPLINLOW CLEAR SOME FIELDS FROM 1 AND UP IN MEMORY * * CLEAR NO VARIABLES IN MEMORY * ECLRN IB SPERASE,ECLRN1,ECLRN2,ECLRN3,ECLRN4 DISPLAY 0,SPLINTOP,SPLINLOW B CONT ECLRN1 DISPLAY 1,SPLINTOP,SPLINLOW B CONT ECLRN2 DISPLAY 2,SPLINTOP,SPLINLOW B CONT ECLRN3 DISPLAY 3,SPLINTOP,SPLINLOW B CONT ECLRN4 DISPLAY 4,SPLINTOP,SPLINLOW B CONT EJECT CONT GETABX SPBINW4 GET CURRENT INDEX BL KTHOME JUMP IF NO CURRENT FIELD CONT5 GETFLD 0,SPBINW4,SPBINW3 SEARCH CURRENT POSITION BZ SETCREAD JUMP IF FOUND BL KTHOME POSITION NOT FOUND * * COMPULSORY FIELD FOUND * MOVE SPBINW4,SPBINW3 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 * SET FLAG IF AUTODUP * USES VERIF-FIELD MOVE SPBINW2,=W'3' MOVE SPBINW1,=W'1' TSTCTL 6 BOK DYKIN SET GTADUPFL B DYK20 * DYKIN IB SPKEY,DYK05,DYK10,DYK15 DYK05 DYKI SPINPUT,SPKTAB1,SPKTAB2,SPBINW1, C SPBINW2,SPBINW4 B DYKOUT DYK10 DYKI SPINPUT,SPKTAB12,SPKTAB22,SPBINW1, C SPBINW2,SPBINW4 B DYKOUT DYK15 DYKI SPINPUT,SPKTAB13,SPKTAB23,SPBINW1, C SPBINW2,SPBINW4 DYKOUT BL ERRPRT ERROR CLEAR SPDUPL CBNG SPBINW2,='0',RETUR JUMP IF POWER OFF OR * DYK20 * * PERF DKTEST BNOK SETCREAD * KEY SWITCHES IB SPBINW2,UPD300,CLEA20 JUMP ON C UPDATE,CANC,CANC, 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 SPBINW1,='0',UPD350 JUMP IF LENGTH = 0 GETCTL 3,SPBINW4 GET SCHK-NUMBER CBE SPBINW4,='0',UPD050 JUMP IF NOT STANDARD CHECK PERFI SPBINW4,SPCHK1,SPCHK2,SPCHK3 C SPCHK4,SPCHK5,SPCHK6,SPCHK7 IB SPBINW3,UPD050,UPD070,ERRPRINT * * CONDITIONAL DISPLAYING * UPD050 TBT SPDUPL,UPD100 MOVE SPBINW4,='1' INDICATE COND. DISPL B UPD200 UPD070 GETCTL 0,SPBINW3 GET APPL-VALUE CBNE SPBINW3,='0',UPD210 JUMP IF APPL VALUE B SETCREAD * * UNCONDITIONAL DISPLAYING * UPD100 MOVE SPBINW4,='2' INDICATE UNCONDITIONAL DISPLAY UPD200 GETCTL 0,SPBINW3 GET APPL-VALUE CBE SPBINW3,='0',UPD400 JUMP IF NO APPL VALUE * * APPL-VALUE DIFFERENT FROM ZERO * UPD210 PERF SPAPPL IB SPBINW3,UPD400,SETCREAD,ERRPRINT B UPD400 * * OK AFTER APPL CONTROL * UNCONDITIONAL DISPLAYING * UPD260 UPDFLD 1,SPINPUT UPDATE FIELD WITH DISPLAYING UPD300 CBE SPBINW1,='0',UPD350 SKIP NEXT IF LENGTH = 0 SET SPCHANGE INDICATE CHANGED ITEM UPD350 * TAKE CARE OF WARNING TBF SPWARNFL,UPD360 MOVE SPBINW1,SPBINW2 STORE KEY VALUE MOVE SPBINW4,=W'26' SET MESSAGE PERF SPERR CBNE SPBINW2,CBIN2,UPD360 KOR-KEY ? MOVE SPBINW2,SPBINW1 RESET OLD KEYVALUE UPD360 * JUMP ON FUNCTION KEY INDEX IB SPBINW2,READIN,DUMMY, C KEOI,DUMMY,DUMMY,KTFWD, C KTBWD,KTHOME,KTLDOWN,KTLEFT,KTRIGHT, C KTDOWN,KTUP,KCOPY,DUMMY,DUMMY,KENTER SUB SPBINW2,=W'14' ADJUST EOI-KEY INDEX DUMMY RETUR RET * UPD400 CBE SPBINW4,='2',UPD260 JUMP IF UNCONDITIONAL DISPL UPDFLD 0,SPINPUT UPDATE FIELD DISPL. 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 READIN NOT FOUND BOFL SETCREAD EMPTY COMPULSORY FIELD * * * CONDITIONAL TABULATION * PERF SPTCHK CMP SPBINW3,='0' BE SETCREAD IB SPBINW2,DUMMY,DUMMY, C KTFWD,DUMMY,DUMMY,KTFWD, C KTBWD,KTFWD,KTFWD,KTFWD, C KTBWD,KTFWD,KTBWD * BRANCH LIST EXHAUSTED - SPBINW2 CLOBBERED BY SPTCHK B SETCREAD EJECT KCOPY HARD COPY MOVE SPBINW3,='1' PRINT KVOUCH,SPBINW3,='0' B SETCREAD SET CURSOR AND READ * KDUPL DUPLICATION MOVE SPBINW2,='3' INDICATE COMMON EOI-KEY DUPL SPINPUT DUPLICATION BNZ KDUPL2 COPY GSWSTR1,CBIN0,CBIN1,SPINPUT,CBIN1 GET BYTE 1 CBE GSWSTR1,=X'00',KDUPL2 MOVE SPBINW1,='10' SET LENGTH IN DUPFIELD SET SPDUPL B UPDATE DUPL ALLOWED KDUPL2 MOVE SPBINW4,='4' INDICATE ILLEGAL EOI-KEY B ERRPRINT DUPL NOT ALLOWED EJECT * * EDIT FIELD * KEDIT GETCTL 1,SPBINW3 GET MAXL CBNE SPBINW3,='0',KED100 PERF BELL B SETCREAD KED100 EDFLD SPINPUT,SPKTAB3,SPBINW1, C SPBINW2,SPBINW4 B DYKOUT CONTINUE AS FOR DYKI * * ENTER KEY * KENTER TBT SPCHANGE,KENT00 NO TESTS ON ME TBF SPME,KENT05 FIELDS ? KENT00 MOVE SPBINW4,='5' INDICATE COMP.FIELD FOUND MOVE SPBINW1,='0' INDICATE NO CLEARING MOVE SPBINW2,='0' SET INDEX TO SEARCHED FIELD GETFLD 0,SPBINW2,SPBINW3 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 MOVE SPBINW2,='3' INDICATE ENTER KEY DEPRESSED RET * * EMPTY COMPULSORY FIELD FOUND * KENT10 GETFLD 0,SPBINW3,SPBINW2 GET THE COMPULSORY FIELD EJECT ERRPRT * PERF DKTEST BNOK SETCREAD * CBE SPBINW2,='16',KEDIT JUMP IF EDIT CBE SPBINW2,='4',CANC JUMP IF CANCEL1 CBE SPBINW2,='5',CANC JUMP IF CANCEL2 * * ERROR HANDLING * ERRPRINT * MOVE SPBINW2,=X'40' XSTAT KEYB,SPBINW3 CBNE SPBINW2,SPBINW3,ERRPRT20 TIMEOUT EDWRT SCREEN,ERAFMT ERASE SCREEN B ERRC20 ERRPRT20 CBE SPBINW4,='0',ERRC20 PERF BELL MOVE SPBINW3,=X'0801' ROW 24 COL. 1 DSC1 SCREEN,6,SPBINW3 SET CURSOR ON LAST ROW MOVE GSWBCD4,SPBINW4 ERRORCODE * EDWRT SCREEN,SPFTBERR(SPBINW4) TBF SPKEYFLG,SPERRRET * * READ AFTER ERROR * ERREAD SETCUR SET CURSOR AT THE BEGINNING OF THE CURRENT FIELD ERR100 MOVE SPBINW3,=W'14' REQUESTED LENGTH IB SPKEY,ERR105,ERR110,ERR115 ERR105 NKI .NE,KEYB,SPINPUT,SPKTAB1,SPBINW3,SPBINW2 B ERR120 ERR110 NKI .NE,KEYB,SPINPUT,SPKTAB12,SPBINW3,SPBINW2 B ERR120 ERR115 NKI .NE,KEYB,SPINPUT,SPKTAB13,SPBINW3,SPBINW2 ERR120 BNZ ERR100 JUMP IF NOT OK * PERF DKTEST BNOK SETCREAD * CMP SPBINW2,='0' JUMP IF POWER OFF BE RETUR IB SPBINW2,ERR100,ERRCONT C ERRCONT,ERR100,ERRCONT,ERRCONT B ERR100 CONTINUE * * CLEAR ERROR PRINTOUT * ERRCONT PERF CLEAR8 ERASE LAST LINE CBNL SPBINW4,=W'26',CANC IF WARNING SUB SPBINW2,='1' ADJUST KEY INDEX CANC CBE SPBINW1,='0',ERRC10 JUMP IF LENGTH = 0 MOVE SPINPUT,:FMTITEM SAVE CURRENT CONTENTS MOVE :FMTITEM,=C'1' PUT SOMETHING IN THE FIELD GETABX SPBINW4 GET CURRENT INDEX ERASE 10,SPBINW4,SPBINW4 CLEAR FIELD ERRC10 IB SPBINW2,CLEAR1,CLEAR2,DUMMY SUB SPBINW2,='3' ADJUST FOR CANCEL1,CANCEL2 RET CLEAR1 CBE SPBINW1,='0',ERRC20 JUMP IF LENGTH = 0 SET SPCHANGE INDICATE CHANGED FIELD ERRC20 MOVE SPBINW5,$OPT CHECHK IF SPERR CBE SPBINW5,=W'0',SPERRRET B SETCREAD CONTINUE * CLEAR2 MOVE :FMTITEM,SPINPUT RESTORE CURRENT CONTENTS CLEA20 GETABX SPBINW4 GET CURRENT TAB INDEX DISPLAY 1,SPBINW4,SPBINW4 DISPLAY FIELD MOVE SPBINW5,$OPT CHECK IF SPERR CBE SPBINW5,=W'0',SPERRRET B SETCREAD CONTINUE * SPERRRET RET * PEND * BELL PROC * ACUSTIC ALARM EDWRT SCREEN,BELLFMT RET * BELLFMT FRMT FSL FILLR X'07',1 FMEND PEND * ERAFMT FRMT FILLR '1',2 FMEND * EJECT KBTEST PROC * THE PROCEDURE SENSES THE KEYBOARD. * IF THE MAK-KEY HAS BEEN DEPRESSED, THE COND.REG * WILL BE SET TO ZERO, IN ORDER TO ENABLE THE CALLING * MODULE TO STOP THE LISTING ( OR FOR ANY OTHER PURPOSE) PERF SPLIN8,CBIN0,CBIN0 TESTIO KEYB BOK KBT10 CALL ABORT,KEYB B KBT20 KBT10 WAIT KEYB CBNE SPBINW2,CBIN6,KBT20 CMP CBIN0,CBIN0 B KBT99 KBT20 CMP CBIN0,CBIN1 KBT99 RET PEND EJECT SPLIN8 PROC WRTMES,WRTTYP ******************** * * SPLIN8 - WRITE ON LINE 8 * * MESSAGE DEFINED AS FORMAT NUMBER WRTMES * IN FORMAT TABLE SPFTBMES * * WRTTYP: =0 NO WAIT * =1 WAIT * =2 RETURN * =3 WRITE .NW AND RETURN * ******************* TBT TBCTASK,LINRET MOVE SPBINW1,=X'0801' DSC1 SCREEN,6,SPBINW1 SET CURSOR ON LAST ROW MOVE SPBINW1,CBIN0 CBE WRTMES,CBIN0,LIN800 CBL WRTTYP,CBIN3,LIN801 EDWRT .NW,SCREEN,SPFTBMES(WRTMES) B LINRET LIN801 EDWRT SCREEN,SPFTBMES(WRTMES) LIN800 CBE WRTTYP,=W'0',LIN8NW CBE WRTTYP,=W'2',LINRET * READ LIN8IN MOVE SPBINW1,=W'3' REQUESTED LENGTH IB SPKEY,LIN805,LIN810,LIN815 LIN805 NKI KEYB,SPINPUT,SPKTAB1,SPBINW1,SPBINW2 B LIN820 LIN810 NKI KEYB,SPINPUT,SPKTAB12,SPBINW1,SPBINW2 B LIN820 LIN815 NKI KEYB,SPINPUT,SPKTAB13,SPBINW1,SPBINW2 LIN820 BNOK LIN8IN JUMP IF NOT OK PERF DKTEST IB SPBINW2,LIN8IN,LIN8CT,LIN8IN B LIN8IN * CLEAR LINE LIN8CT PERF CLEAR8 ERASE LAST LINE RET * READ WITH NO WAIT LIN8NW MOVE SPBINW1,=W'3' REQUESTED LENGTH IB SPKEY,LIN855,LIN860,LIN865 LIN855 NKI .NW,KEYB,SPINPUT,SPKTAB1,SPBINW1,SPBINW2 B LIN870 LIN860 NKI .NW,KEYB,SPINPUT,SPKTAB12,SPBINW1,SPBINW2 B LIN870 LIN865 NKI .NW,KEYB,SPINPUT,SPKTAB13,SPBINW1,SPBINW2 LIN870 PERF DKTEST LINRET RET PEND EJECT SPINF1 PROC ******************** * * SPINF1 - WRITE INF ON FIRST LINE * ******************** MOVE SPBINW1,=X'0117' DSC1 SCREEN,6,SPBINW1 SET CURSOR ON FIRST LINE MOVE SPBINW1,CBIN0 EDWRT SCREEN,SPFTBMES(CBIN7) WRITE MESSAGE 7 RET PEND * * * SPINF8 PROC ******************** * * SPINF8 - WRITE INF ON LAST LINE * ******************** PERF SPLIN8,CBIN4,CBIN2 RET PEND * * EJECT ************************************ * * DKTEST TEST IF DISK IS READY * ************************************* * DKTEST PROC * TEST IF DISK IS SWITCHED OFF TBF CDKOFF,DKTRET TBT GTMASTFL,DKTRET TBF CDUOVL,DKTRET NO KI IF DISKOVL ON DU MOVE SPBINW5,=X'0801' DSC1 SCREEN,6,SPBINW5 EDWRT .NW,SCREEN,SPFTBMES(CBIN11) DKT10 DELAY CBIN10 TBT CDKOFF,DKT10 PERF CLEAR8 CMP CBIN1,CBIN0 NOK RET DKTRET CMP CBIN0,CBIN0 OK RET PEND * * END
0x0000…0020 (0, 0, 400) Head {h00=0x001c, h01=0x0050, text=» IDENT SCREEN 840124 EV «, t00=0x0000, t01=0x0004}
0x0020…0044 Head {h00=0x0020, h01=0x0050, text=» 1.1,78-04-20,870138040310«, t00=0x0000, t01=0x0024}
0x0044…004e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0048}
0x004e…007e Head {h00=0x002c, h01=0x0050, text=»* A STANDARD PROGRAM PACKAGE HANDLING«, t00=0x0000, t01=0x0052}
0x007e…00b2 Head {h00=0x0030, h01=0x0050, text=»* A COMPLETE PICTURE ON A DISPLAY SCREEN «, t00=0x0000, t01=0x0082}
0x00b2…00bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00b6}
0x00bc…00e8 Head {h00=0x0028, h01=0x0050, text=»* RUNNING UNDER: CREDIT REL 3.1 «, t00=0x0000, t01=0x00c0}
0x00e8…0114 Head {h00=0x0028, h01=0x0050, text=»* TOSS REL 8.1 «, t00=0x0000, t01=0x00ec}
0x0114…011e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0118}
0x011e…0132 Head {h00=0x0010, h01=0x0050, text=» DDUM KMD08 «, t00=0x0000, t01=0x0122}
0x0132…0140 Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x0000, t01=0x0136}
0x0140…014a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0144}
0x014a…017a Head {h00=0x002c, h01=0x0050, text=» ENTRY SPCLRA CLEAR ALL VARIABLE FIELDS «, t00=0x0000, t01=0x014e}
0x017a…01aa Head {h00=0x002c, h01=0x0050, text=» ENTRY SPCLRS CLEAR SOME VARIABLE FIELDS«, t00=0x0000, t01=0x017e}
0x01aa…01d8 Head {h00=0x002a, h01=0x0050, text=» ENTRY SPCLRN CLEAR NO VARIABLE FIELDS«, t00=0x0001, t01=0x001e}
0x01d8…0204 Head {h00=0x0028, h01=0x0050, text=» ENTRY SPERR DISPLAY ERROR PRINTOUT «, t00=0x0001, t01=0x004c}
0x0204…0224 Head {h00=0x001c, h01=0x0050, text=» AND CONTINUE HANDLING«, t00=0x0001, t01=0x0078}
0x0224…024c Head {h00=0x0024, h01=0x0050, text=» ENTRY SPLIN8 MESSAGE ON LINE 8 «, t00=0x0001, t01=0x0098}
0x024c…026c Head {h00=0x001c, h01=0x0050, text=» ENTRY SPCA AS SPCLRA-- «, t00=0x0001, t01=0x00c0}
0x026c…028c Head {h00=0x001c, h01=0x0050, text=» ENTRY SPCN AS SPCLRN-- «, t00=0x0001, t01=0x00e0}
0x028c…02b4 Head {h00=0x0024, h01=0x0050, text=» SPCA AND SPCN ARE ONLY ACTIVE«, t00=0x0001, t01=0x0100}
0x02b4…02cc Head {h00=0x0014, h01=0x0050, text=» BETWEEN LINES«, t00=0x0001, t01=0x0128}
0x02cc…02ec Head {h00=0x001c, h01=0x0050, text=» SPLINTOP AND SPLINLOW«, t00=0x0001, t01=0x0140}
0x02ec…0302 Head {h00=0x0012, h01=0x0050, text=» ENTRY SCREEN «, t00=0x0001, t01=0x0160}
0x0302…032e Head {h00=0x0028, h01=0x0050, text=» ENTRY SPINF1 INFORMATION ON LINE 1 «, t00=0x0001, t01=0x0176}
0x032e…035a Head {h00=0x0028, h01=0x0050, text=» ENTRY SPINF8 INFORMATION ON LINE 8 «, t00=0x0002, t01=0x0012}
0x035a…036e Head {h00=0x0010, h01=0x0050, text=» ENTRY BELL «, t00=0x0002, t01=0x003e}
0x036e…0384 Head {h00=0x0012, h01=0x0050, text=» ENTRY DKTEST «, t00=0x0002, t01=0x0052}
0x0384…039a Head {h00=0x0012, h01=0x0050, text=» ENTRY KBTEST «, t00=0x0002, t01=0x0068}
0x039a…03a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x007e}
0x03a4…03d4 Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK1 STANDARD CHECK ROUTINE NO. 1«, t00=0x0002, t01=0x0088}
0x03d4…0404 Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK2 STANDARD CHECK ROUTINE NO. 2«, t00=0x0002, t01=0x00b8}
0x0404…0434 Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK3 STANDARD CHECK ROUTINE NO. 3«, t00=0x0002, t01=0x00e8}
0x0434…0464 Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK4 STANDARD CHECK ROUTINE NO. 4«, t00=0x0002, t01=0x0118}
0x0464…0494 Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK5 STANDARD CHECK ROUTINE NO.5 «, t00=0x0002, t01=0x0148}
0x0494…04c4 Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK6 STANDARD CHECK ROUTINE NO. 6«, t00=0x0002, t01=0x0178}
0x04c4…04f4 Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK7 STANDARD CHECK ROUTINE NO. 7«, t00=0x0003, t01=0x0018}
0x04f4…051e Head {h00=0x0026, h01=0x0050, text=» EXT SPAPPL USER ROUTINE TO HANDLE«, t00=0x0003, t01=0x0048}
0x051e…0534 Head {h00=0x0012, h01=0x0050, text=» APPL VALUES«, t00=0x0003, t01=0x0072}
0x0534…0560 Head {h00=0x0028, h01=0x0050, text=» EXT SPTCHK USER ROUTINE TO EVALUATE«, t00=0x0003, t01=0x0088}
0x0560…0582 Head {h00=0x001e, h01=0x0050, text=» CONDITIONAL TABULATION «, t00=0x0003, t01=0x00b4}
0x0582…058c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00d6}
0x058c…059e Head {h00=0x000e, h01=0x0050, text=» EXT ABORT«, t00=0x0003, t01=0x00e0}
0x059e…05d0 Head {h00=0x002e, h01=0x0050, text=» EXT EMPTYT ASSEMBLY SUBROUTINE EMPTYT - «, t00=0x0003, t01=0x00f2}
0x05d0…05f6 Head {h00=0x0022, h01=0x0050, text=» TEST IF DATA ITEM IS EMPTY «, t00=0x0003, t01=0x0124}
0x05f6…060a Head {h00=0x0010, h01=0x0050, text=» EXT CLEAR8 «, t00=0x0003, t01=0x014a}
0x060a…0614 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x015e}
0x0614…0630 Head {h00=0x0018, h01=0x0050, text=» INCLUDE KEY461,LIST«, t00=0x0003, t01=0x0168}
0x0630…0658 Head {h00=0x0024, h01=0x0050, text=»* FIRST INCLUDE KEY VALUES, «, t00=0x0003, t01=0x0184}
0x0658…068a Head {h00=0x002e, h01=0x0050, text=»* THEN INCLUDE SPECIAL SCREEN FORMATS «, t00=0x0004, t01=0x001c}
0x068a…06a6 Head {h00=0x0018, h01=0x0050, text=» INCLUDE SL461,LIST «, t00=0x0004, t01=0x004e}
0x06a6…06b4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x006a}
0x06b4…06c8 Head {h00=0x0010, h01=0x0050, text=»SPCLRA PROC «, t00=0x0004, t01=0x0078}
0x06c8…06d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x008c}
0x06d2…071a Head {h00=0x0044, h01=0x0050, text=»* SPCLRA - CLEAR ALL VARABLE FIELDS BEFORE HANDLING THE PICTURE «, t00=0x0004, t01=0x0096}
0x071a…0724 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00de}
0x0724…0740 Head {h00=0x0018, h01=0x0050, text=» MOVE SPERASE,=W'0' «, t00=0x0004, t01=0x00e8}
0x0740…076a Head {h00=0x0026, h01=0x0050, text=» MOVE SPLINTOP,=W'1' WHOLE SCREEN «, t00=0x0004, t01=0x0104}
0x076a…0786 Head {h00=0x0018, h01=0x0050, text=» MOVE SPLINLOW,=W'0'«, t00=0x0004, t01=0x012e}
0x0786…07a0 Head {h00=0x0016, h01=0x0050, text=» PERF SCREEN,=W'1'«, t00=0x0004, t01=0x014a}
0x07a0…07ac Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0004, t01=0x0164}
0x07ac…07ba Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0004, t01=0x0170}
0x07ba…07ce Head {h00=0x0010, h01=0x0050, text=»SPCLRS PROC «, t00=0x0004, t01=0x017e}
0x07ce…07d8 (5, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0004}
0x07d8…0822 Head {h00=0x0046, h01=0x0050, text=»* SPCLRS - CLEAR SOME VARIABLE FIELDS BEFORE HANDLING THE PICTURE «, t00=0x0005, t01=0x000e}
0x0822…082c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0058}
0x082c…0848 Head {h00=0x0018, h01=0x0050, text=» MOVE SPERASE,=W'0' «, t00=0x0005, t01=0x0062}
0x0848…0872 Head {h00=0x0026, h01=0x0050, text=» MOVE SPLINTOP,=W'1' WHOLE SCREEN «, t00=0x0005, t01=0x007e}
0x0872…088e Head {h00=0x0018, h01=0x0050, text=» MOVE SPLINLOW,=W'0'«, t00=0x0005, t01=0x00a8}
0x088e…08a8 Head {h00=0x0016, h01=0x0050, text=» PERF SCREEN,=W'2'«, t00=0x0005, t01=0x00c4}
0x08a8…08b4 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0005, t01=0x00de}
0x08b4…08c2 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0005, t01=0x00ea}
0x08c2…08d6 Head {h00=0x0010, h01=0x0050, text=»SPCLRN PROC «, t00=0x0005, t01=0x00f8}
0x08d6…08e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x010c}
0x08e0…0928 Head {h00=0x0044, h01=0x0050, text=»* SPCLRN - CLEAR NO VARIABLE FIELDS BEFORE HANDLING THE PICTURE «, t00=0x0005, t01=0x0116}
0x0928…0932 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x015e}
0x0932…094e Head {h00=0x0018, h01=0x0050, text=» MOVE SPERASE,=W'0' «, t00=0x0005, t01=0x0168}
0x094e…0978 Head {h00=0x0026, h01=0x0050, text=» MOVE SPLINTOP,=W'1' WHOLE SCREEN «, t00=0x0005, t01=0x0184}
0x0978…0994 Head {h00=0x0018, h01=0x0050, text=» MOVE SPLINLOW,=W'0'«, t00=0x0006, t01=0x001e}
0x0994…09ae Head {h00=0x0016, h01=0x0050, text=» PERF SCREEN,=W'3'«, t00=0x0006, t01=0x003a}
0x09ae…09ba Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0006, t01=0x0054}
0x09ba…09c8 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0006, t01=0x0060}
0x09c8…09da Head {h00=0x000e, h01=0x0050, text=»SPERR PROC«, t00=0x0006, t01=0x006e}
0x09da…09e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0080}
0x09e4…0a18 Head {h00=0x0030, h01=0x0050, text=»* HANDLE ERRORS DETECTED OUTSIDE THE PACKAGE«, t00=0x0006, t01=0x008a}
0x0a18…0a22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00be}
0x0a22…0a3e Head {h00=0x0018, h01=0x0050, text=» TBT TBCTASK,SPERR90«, t00=0x0006, t01=0x00c8}
0x0a3e…0a58 Head {h00=0x0016, h01=0x0050, text=» PERF SCREEN,=W'0'«, t00=0x0006, t01=0x00e4}
0x0a58…0a68 Head {h00=0x000c, h01=0x0050, text=»SPERR90 «, t00=0x0006, t01=0x00fe}
0x0a68…0a74 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0006, t01=0x010e}
0x0a74…0a82 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0006, t01=0x011a}
0x0a82…0a94 Head {h00=0x000e, h01=0x0050, text=»SPCA PROC «, t00=0x0006, t01=0x0128}
0x0a94…0a9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x013a}
0x0a9e…0ae6 Head {h00=0x0044, h01=0x0050, text=»* SPCA - AS SPCLRA, BUT ONLY BETWEEN LINES SPLINTOPAND SPLINLOW «, t00=0x0006, t01=0x0144}
0x0ae6…0af0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x018c}
0x0af0…0b0c Head {h00=0x0018, h01=0x0050, text=» MOVE SPERASE,=W'4' «, t00=0x0007, t01=0x0008}
0x0b0c…0b26 Head {h00=0x0016, h01=0x0050, text=» PERF SCREEN,=W'1'«, t00=0x0007, t01=0x0024}
0x0b26…0b32 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0007, t01=0x003e}
0x0b32…0b40 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0007, t01=0x004a}
0x0b40…0b52 Head {h00=0x000e, h01=0x0050, text=»SPCN PROC «, t00=0x0007, t01=0x0058}
0x0b52…0b5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x006a}
0x0b5c…0ba4 Head {h00=0x0044, h01=0x0050, text=»* SPCN - AS SPCLRN, BUT ONLY BETWEEN LINES SPLINTOP AND SPLINLOW«, t00=0x0007, t01=0x0074}
0x0ba4…0bae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00bc}
0x0bae…0bca Head {h00=0x0018, h01=0x0050, text=» MOVE SPERASE,=W'4' «, t00=0x0007, t01=0x00c6}
0x0bca…0be4 Head {h00=0x0016, h01=0x0050, text=» PERF SCREEN,=W'3'«, t00=0x0007, t01=0x00e2}
0x0be4…0bf0 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0007, t01=0x00fc}
0x0bf0…0bfe Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0007, t01=0x0108}
0x0bfe…0c0c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x0116}
0x0c0c…0c24 Head {h00=0x0014, h01=0x0050, text=»SCREEN PROC $OPT«, t00=0x0007, t01=0x0124}
0x0c24…0c2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x013c}
0x0c2e…0c56 Head {h00=0x0024, h01=0x0050, text=»* SCREEN SCREEN HANDLING MODULE «, t00=0x0007, t01=0x0146}
0x0c56…0c60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x016e}
0x0c60…0c82 Head {h00=0x001e, h01=0x0050, text=»* CALL: PERF SCREEN,<$OPT>«, t00=0x0007, t01=0x0178}
0x0c82…0c8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x000a}
0x0c8c…0cae Head {h00=0x001e, h01=0x0050, text=» PLIT $OPT OPTIO SELECTOR «, t00=0x0008, t01=0x0014}
0x0cae…0cb6 Head {h00=0x0004, h01=0x0050, t00=0x0008, t01=0x0036}
0x0cb6…0ce0 Head {h00=0x0026, h01=0x0050, text=» CLEAR SPWARNFL CLEAR WARNING FLAG«, t00=0x0008, t01=0x003e}
0x0ce0…0d0c Head {h00=0x0028, h01=0x0050, text=» MOVE SPBINW2,$OPT MOVE TO VARIABLE «, t00=0x0008, t01=0x0068}
0x0d0c…0d32 Head {h00=0x0022, h01=0x0050, text=» TO ALLOW INSTR.S CMP AND IB«, t00=0x0008, t01=0x0094}
0x0d32…0d5c Head {h00=0x0026, h01=0x0050, text=» CMP SPBINW2,='0' "SPERR" ENTRY ? «, t00=0x0008, t01=0x00ba}
0x0d5c…0d76 Head {h00=0x0016, h01=0x0050, text=» BE ERRPRINT YES !«, t00=0x0008, t01=0x00e4}
0x0d76…0d7e Head {h00=0x0004, h01=0x0050, t00=0x0008, t01=0x00fe}
0x0d7e…0db0 Head {h00=0x002e, h01=0x0050, text=» TBT SPPROMPT,ENTIRE JUMP IF ENTIRE FORMAT«, t00=0x0008, t01=0x0106}
0x0db0…0dce Head {h00=0x001a, h01=0x0050, text=» SHOULD BE DISPLAYED«, t00=0x0008, t01=0x0138}
0x0dce…0dd8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0156}
0x0dd8…0dfa Head {h00=0x001e, h01=0x0050, text=»* ONLY VARIABLE FIELDS «, t00=0x0008, t01=0x0160}
0x0dfa…0e04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0182}
0x0e04…0e40 Head {h00=0x0038, h01=0x0050, text=» IB SPBINW2,CLEARA,CLEARS,CONT JUMP ON ROUTINE INDEX«, t00=0x0008, t01=0x018c}
0x0e40…0e4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0038}
0x0e4a…0e58 Head {h00=0x000a, h01=0x0050, text=»CLEARA«, t00=0x0009, t01=0x0042}
0x0e58…0e94 Head {h00=0x0038, h01=0x0050, text=» ERASE 10,SPLINTOP,SPLINLOW ERASE ALL FROM 1 AND UP «, t00=0x0009, t01=0x0050}
0x0e94…0ea2 Head {h00=0x000a, h01=0x0050, text=» THOME«, t00=0x0009, t01=0x008c}
0x0ea2…0eb2 Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x0009, t01=0x009a}
0x0eb2…0ebc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00aa}
0x0ebc…0eca Head {h00=0x000a, h01=0x0050, text=»CLEARS«, t00=0x0009, t01=0x00b4}
0x0eca…0f06 Head {h00=0x0038, h01=0x0050, text=» ERASE 5,SPLINTOP,SPLINLOW ERASE SOME FROM 1 AND UP «, t00=0x0009, t01=0x00c2}
0x0f06…0f16 Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x0009, t01=0x00fe}
0x0f16…0f24 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x010e}
0x0f24…0f2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x011c}
0x0f2e…0f50 Head {h00=0x001e, h01=0x0050, text=»* DISPLAY ENTIRE FORMAT«, t00=0x0009, t01=0x0126}
0x0f50…0f5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0148}
0x0f5a…0f68 Head {h00=0x000a, h01=0x0050, text=»ENTIRE«, t00=0x0009, t01=0x0152}
0x0f68…0fa4 Head {h00=0x0038, h01=0x0050, text=» IB SPBINW2,ECLRA,ECLRS,ECLRN JUMP ON ROUTINE INDEX «, t00=0x0009, t01=0x0160}
0x0fa4…0fae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x000c}
0x0fae…0fce Head {h00=0x001c, h01=0x0050, text=»* CLEAR ALL VARIABLES«, t00=0x000a, t01=0x0016}
0x0fce…0fd8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0036}
0x0fd8…0fe6 Head {h00=0x000a, h01=0x0050, text=»ECLRA «, t00=0x000a, t01=0x0040}
0x0fe6…1014 Head {h00=0x002a, h01=0x0050, text=» ERASE 11,SPLINTOP,SPLINLOW CLEAR ALL «, t00=0x000a, t01=0x004e}
0x1014…1028 Head {h00=0x0010, h01=0x0050, text=» IN MEMORY«, t00=0x000a, t01=0x007c}
0x1028…1038 Head {h00=0x000c, h01=0x0050, text=» B ECLRN«, t00=0x000a, t01=0x0090}
0x1038…1042 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00a0}
0x1042…1064 Head {h00=0x001e, h01=0x0050, text=»* CLEAR SOME VARIABLES «, t00=0x000a, t01=0x00aa}
0x1064…106e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00cc}
0x106e…107c Head {h00=0x000a, h01=0x0050, text=»ECLRS «, t00=0x000a, t01=0x00d6}
0x107c…10b6 Head {h00=0x0036, h01=0x0050, text=» ERASE 6,SPLINTOP,SPLINLOW CLEAR SOME FIELDS FROM «, t00=0x000a, t01=0x00e4}
0x10b6…10d4 Head {h00=0x001a, h01=0x0050, text=» 1 AND UP IN MEMORY «, t00=0x000a, t01=0x011e}
0x10d4…10de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x013c}
0x10de…1108 Head {h00=0x0026, h01=0x0050, text=»* CLEAR NO VARIABLES IN MEMORY «, t00=0x000a, t01=0x0146}
0x1108…1112 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0170}
0x1112…1120 Head {h00=0x000a, h01=0x0050, text=»ECLRN «, t00=0x000a, t01=0x017a}
0x1120…1150 Head {h00=0x002c, h01=0x0050, text=» IB SPERASE,ECLRN1,ECLRN2,ECLRN3,ECLRN4 «, t00=0x000a, t01=0x0188}
0x1150…1174 Head {h00=0x0020, h01=0x0050, text=» DISPLAY 0,SPLINTOP,SPLINLOW«, t00=0x000b, t01=0x0028}
0x1174…1184 Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x000b, t01=0x004c}
0x1184…1192 Head {h00=0x000a, h01=0x0050, text=»ECLRN1«, t00=0x000b, t01=0x005c}
0x1192…11b6 Head {h00=0x0020, h01=0x0050, text=» DISPLAY 1,SPLINTOP,SPLINLOW«, t00=0x000b, t01=0x006a}
0x11b6…11c6 Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x000b, t01=0x008e}
0x11c6…11d4 Head {h00=0x000a, h01=0x0050, text=»ECLRN2«, t00=0x000b, t01=0x009e}
0x11d4…11f8 Head {h00=0x0020, h01=0x0050, text=» DISPLAY 2,SPLINTOP,SPLINLOW«, t00=0x000b, t01=0x00ac}
0x11f8…1208 Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x000b, t01=0x00d0}
0x1208…1216 Head {h00=0x000a, h01=0x0050, text=»ECLRN3«, t00=0x000b, t01=0x00e0}
0x1216…123a Head {h00=0x0020, h01=0x0050, text=» DISPLAY 3,SPLINTOP,SPLINLOW«, t00=0x000b, t01=0x00ee}
0x123a…124a Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x000b, t01=0x0112}
0x124a…1258 Head {h00=0x000a, h01=0x0050, text=»ECLRN4«, t00=0x000b, t01=0x0122}
0x1258…127c Head {h00=0x0020, h01=0x0050, text=» DISPLAY 4,SPLINTOP,SPLINLOW«, t00=0x000b, t01=0x0130}
0x127c…128c Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x000b, t01=0x0154}
0x128c…129a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x0164}
0x129a…12a6 Head {h00=0x0008, h01=0x0050, text=»CONT«, t00=0x000b, t01=0x0172}
0x12a6…12d0 Head {h00=0x0026, h01=0x0050, text=» GETABX SPBINW4 GET CURRENT INDEX «, t00=0x000b, t01=0x017e}
0x12d0…12fc Head {h00=0x0028, h01=0x0050, text=» BL KTHOME JUMP IF NO CURRENT FIELD «, t00=0x000c, t01=0x0018}
0x12fc…130a Head {h00=0x000a, h01=0x0050, text=»CONT5 «, t00=0x000c, t01=0x0044}
0x130a…1344 Head {h00=0x0036, h01=0x0050, text=» GETFLD 0,SPBINW4,SPBINW3 SEARCH CURRENT POSITION «, t00=0x000c, t01=0x0052}
0x1344…1366 Head {h00=0x001e, h01=0x0050, text=» BZ SETCREAD JUMP IF FOUND«, t00=0x000c, t01=0x008c}
0x1366…138c Head {h00=0x0022, h01=0x0050, text=» BL KTHOME POSITION NOT FOUND «, t00=0x000c, t01=0x00ae}
0x138c…1396 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00d4}
0x1396…13ba Head {h00=0x0020, h01=0x0050, text=»* COMPULSORY FIELD FOUND «, t00=0x000c, t01=0x00de}
0x13ba…13c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0102}
0x13c4…13ee Head {h00=0x0026, h01=0x0050, text=» MOVE SPBINW4,SPBINW3 CHANGE INDEX«, t00=0x000c, t01=0x010c}
0x13ee…140c Head {h00=0x001a, h01=0x0050, text=» B CONT5 SEARCH AGAIN «, t00=0x000c, t01=0x0136}
0x140c…1416 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0154}
0x1416…1424 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x015e}
0x1424…142e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x016c}
0x142e…1458 Head {h00=0x0026, h01=0x0050, text=»* SET CURSOR AND READ KEYBOARD «, t00=0x000c, t01=0x0176}
0x1458…1462 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0010}
0x1462…1472 Head {h00=0x000c, h01=0x0050, text=»SETCREAD«, t00=0x000d, t01=0x001a}
0x1472…149e Head {h00=0x0028, h01=0x0050, text=» SETCUR SET CURSOR ON CURRENT FIELD«, t00=0x000d, t01=0x002a}
0x149e…14a6 Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x0056}
0x14a6…14b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x005e}
0x14b0…14de Head {h00=0x002a, h01=0x0050, text=»* READ TO CURRENT FIELD ON DISPLAY «, t00=0x000d, t01=0x0068}
0x14de…14e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0096}
0x14e8…14f6 Head {h00=0x000a, h01=0x0050, text=»READIN«, t00=0x000d, t01=0x00a0}
0x14f6…1518 Head {h00=0x001e, h01=0x0050, text=»* SET FLAG IF AUTODUP «, t00=0x000d, t01=0x00ae}
0x1518…1536 Head {h00=0x001a, h01=0x0050, text=»* USES VERIF-FIELD«, t00=0x000d, t01=0x00d0}
0x1536…1552 Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW2,=W'3' «, t00=0x000d, t01=0x00ee}
0x1552…156e Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW1,=W'1' «, t00=0x000d, t01=0x010a}
0x156e…1580 Head {h00=0x000e, h01=0x0050, text=» TSTCTL 6 «, t00=0x000d, t01=0x0126}
0x1580…1592 Head {h00=0x000e, h01=0x0050, text=» BOK DYKIN«, t00=0x000d, t01=0x0138}
0x1592…15a8 Head {h00=0x0012, h01=0x0050, text=» SET GTADUPFL «, t00=0x000d, t01=0x014a}
0x15a8…15b8 Head {h00=0x000c, h01=0x0050, text=» B DYK20«, t00=0x000d, t01=0x0160}
0x15b8…15c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0170}
0x15c2…15d0 Head {h00=0x000a, h01=0x0050, text=»DYKIN «, t00=0x000d, t01=0x017a}
0x15d0…15f4 Head {h00=0x0020, h01=0x0050, text=» IB SPKEY,DYK05,DYK10,DYK15 «, t00=0x000d, t01=0x0188}
0x15f4…1602 Head {h00=0x000a, h01=0x0050, text=»DYK05 «, t00=0x000e, t01=0x001c}
0x1602…1634 Head {h00=0x002e, h01=0x0050, text=» DYKI SPINPUT,SPKTAB1,SPKTAB2,SPBINW1, C «, t00=0x000e, t01=0x002a}
0x1634…164e Head {h00=0x0016, h01=0x0050, text=» SPBINW2,SPBINW4 «, t00=0x000e, t01=0x005c}
0x164e…1660 Head {h00=0x000e, h01=0x0050, text=» B DYKOUT «, t00=0x000e, t01=0x0076}
0x1660…166e Head {h00=0x000a, h01=0x0050, text=»DYK10 «, t00=0x000e, t01=0x0088}
0x166e…16a2 Head {h00=0x0030, h01=0x0050, text=» DYKI SPINPUT,SPKTAB12,SPKTAB22,SPBINW1, C «, t00=0x000e, t01=0x0096}
0x16a2…16bc Head {h00=0x0016, h01=0x0050, text=» SPBINW2,SPBINW4 «, t00=0x000e, t01=0x00ca}
0x16bc…16ce Head {h00=0x000e, h01=0x0050, text=» B DYKOUT «, t00=0x000e, t01=0x00e4}
0x16ce…16dc Head {h00=0x000a, h01=0x0050, text=»DYK15 «, t00=0x000e, t01=0x00f6}
0x16dc…1710 Head {h00=0x0030, h01=0x0050, text=» DYKI SPINPUT,SPKTAB13,SPKTAB23,SPBINW1, C «, t00=0x000e, t01=0x0104}
0x1710…172a Head {h00=0x0016, h01=0x0050, text=» SPBINW2,SPBINW4 «, t00=0x000e, t01=0x0138}
0x172a…1738 Head {h00=0x000a, h01=0x0050, text=»DYKOUT«, t00=0x000e, t01=0x0152}
0x1738…1750 Head {h00=0x0014, h01=0x0050, text=» BL ERRPRT ERROR«, t00=0x000e, t01=0x0160}
0x1750…1766 Head {h00=0x0012, h01=0x0050, text=» CLEAR SPDUPL «, t00=0x000e, t01=0x0178}
0x1766…179c Head {h00=0x0032, h01=0x0050, text=» CBNG SPBINW2,='0',RETUR JUMP IF POWER OFF OR «, t00=0x000e, t01=0x018e}
0x179c…17a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0034}
0x17a6…17b4 Head {h00=0x000a, h01=0x0050, text=»DYK20 «, t00=0x000f, t01=0x003e}
0x17b4…17be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x004c}
0x17be…17c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0056}
0x17c8…17dc Head {h00=0x0010, h01=0x0050, text=» PERF DKTEST«, t00=0x000f, t01=0x0060}
0x17dc…17f2 Head {h00=0x0012, h01=0x0050, text=» BNOK SETCREAD«, t00=0x000f, t01=0x0074}
0x17f2…17fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x008a}
0x17fc…1814 Head {h00=0x0014, h01=0x0050, text=» KEY SWITCHES «, t00=0x000f, t01=0x0094}
0x1814…1840 Head {h00=0x0028, h01=0x0050, text=» IB SPBINW2,UPD300,CLEA20 JUMP ON C «, t00=0x000f, t01=0x00ac}
0x1840…185e Head {h00=0x001a, h01=0x0050, text=» UPDATE,CANC,CANC, C«, t00=0x000f, t01=0x00d8}
0x185e…1890 Head {h00=0x002e, h01=0x0050, text=» UPDATE,UPDATE,UPDATE,UPDATE CONVERTED C «, t00=0x000f, t01=0x00f6}
0x1890…18c8 Head {h00=0x0034, h01=0x0050, text=» UPDATE,UPDATE,UPDATE,UPDATE END-OF-ITEM-KEY C «, t00=0x000f, t01=0x0128}
0x18c8…18e4 Head {h00=0x0018, h01=0x0050, text=» UPDATE,KDUPL,KEDIT«, t00=0x000f, t01=0x0160}
0x18e4…18f2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x017c}
0x18f2…18fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x018a}
0x18fc…1934 (16, 0, 400) Head {h00=0x0034, h01=0x0050, text=»* HANDLE THE RESPECTIVE KEY AS EOI-KEY FIRST «, t00=0x0010, t01=0x0004}
0x1934…193e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x003c}
0x193e…194c Head {h00=0x000a, h01=0x0050, text=»UPDATE«, t00=0x0010, t01=0x0046}
0x194c…1980 Head {h00=0x0030, h01=0x0050, text=» CBE SPBINW1,='0',UPD350 JUMP IF LENGTH = 0 «, t00=0x0010, t01=0x0054}
0x1980…19aa Head {h00=0x0026, h01=0x0050, text=» GETCTL 3,SPBINW4 GET SCHK-NUMBER «, t00=0x0010, t01=0x0088}
0x19aa…19e6 Head {h00=0x0038, h01=0x0050, text=» CBE SPBINW4,='0',UPD050 JUMP IF NOT STANDARD CHECK «, t00=0x0010, t01=0x00b2}
0x19e6…1a14 Head {h00=0x002a, h01=0x0050, text=» PERFI SPBINW4,SPCHK1,SPCHK2,SPCHK3 C«, t00=0x0010, t01=0x00ee}
0x1a14…1a3a Head {h00=0x0022, h01=0x0050, text=» SPCHK4,SPCHK5,SPCHK6,SPCHK7 «, t00=0x0010, t01=0x011c}
0x1a3a…1a64 Head {h00=0x0026, h01=0x0050, text=» IB SPBINW3,UPD050,UPD070,ERRPRINT«, t00=0x0010, t01=0x0142}
0x1a64…1a6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x016c}
0x1a6e…1a92 Head {h00=0x0020, h01=0x0050, text=»* CONDITIONAL DISPLAYING «, t00=0x0010, t01=0x0176}
0x1a92…1a9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x000a}
0x1a9c…1aaa Head {h00=0x000a, h01=0x0050, text=»UPD050«, t00=0x0011, t01=0x0014}
0x1aaa…1ac4 Head {h00=0x0016, h01=0x0050, text=» TBT SPDUPL,UPD100«, t00=0x0011, t01=0x0022}
0x1ac4…1af4 Head {h00=0x002c, h01=0x0050, text=» MOVE SPBINW4,='1' INDICATE COND. DISPL «, t00=0x0011, t01=0x003c}
0x1af4…1b06 Head {h00=0x000e, h01=0x0050, text=» B UPD200 «, t00=0x0011, t01=0x006c}
0x1b06…1b14 Head {h00=0x000a, h01=0x0050, text=»UPD070«, t00=0x0011, t01=0x007e}
0x1b14…1b3c Head {h00=0x0024, h01=0x0050, text=» GETCTL 0,SPBINW3 GET APPL-VALUE«, t00=0x0011, t01=0x008c}
0x1b3c…1b70 Head {h00=0x0030, h01=0x0050, text=» CBNE SPBINW3,='0',UPD210 JUMP IF APPL VALUE«, t00=0x0011, t01=0x00b4}
0x1b70…1b84 Head {h00=0x0010, h01=0x0050, text=» B SETCREAD «, t00=0x0011, t01=0x00e8}
0x1b84…1b8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00fc}
0x1b8e…1bb4 Head {h00=0x0022, h01=0x0050, text=»* UNCONDITIONAL DISPLAYING «, t00=0x0011, t01=0x0106}
0x1bb4…1bbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x012c}
0x1bbe…1bcc Head {h00=0x000a, h01=0x0050, text=»UPD100«, t00=0x0011, t01=0x0136}
0x1bcc…1c06 Head {h00=0x0036, h01=0x0050, text=» MOVE SPBINW4,='2' INDICATE UNCONDITIONAL DISPLAY «, t00=0x0011, t01=0x0144}
0x1c06…1c14 Head {h00=0x000a, h01=0x0050, text=»UPD200«, t00=0x0011, t01=0x017e}
0x1c14…1c3c Head {h00=0x0024, h01=0x0050, text=» GETCTL 0,SPBINW3 GET APPL-VALUE«, t00=0x0011, t01=0x018c}
0x1c3c…1c72 Head {h00=0x0032, h01=0x0050, text=» CBE SPBINW3,='0',UPD400 JUMP IF NO APPL VALUE«, t00=0x0012, t01=0x0024}
0x1c72…1c7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x005a}
0x1c7c…1ca8 Head {h00=0x0028, h01=0x0050, text=»* APPL-VALUE DIFFERENT FROM ZERO «, t00=0x0012, t01=0x0064}
0x1ca8…1cb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0090}
0x1cb2…1cc0 Head {h00=0x000a, h01=0x0050, text=»UPD210«, t00=0x0012, t01=0x009a}
0x1cc0…1cd4 Head {h00=0x0010, h01=0x0050, text=» PERF SPAPPL«, t00=0x0012, t01=0x00a8}
0x1cd4…1d00 Head {h00=0x0028, h01=0x0050, text=» IB SPBINW3,UPD400,SETCREAD,ERRPRINT«, t00=0x0012, t01=0x00bc}
0x1d00…1d12 Head {h00=0x000e, h01=0x0050, text=» B UPD400 «, t00=0x0012, t01=0x00e8}
0x1d12…1d1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00fa}
0x1d1c…1d3e Head {h00=0x001e, h01=0x0050, text=»* OK AFTER APPL CONTROL«, t00=0x0012, t01=0x0104}
0x1d3e…1d64 Head {h00=0x0022, h01=0x0050, text=»* UNCONDITIONAL DISPLAYING «, t00=0x0012, t01=0x0126}
0x1d64…1d6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x014c}
0x1d6e…1d7c Head {h00=0x000a, h01=0x0050, text=»UPD260«, t00=0x0012, t01=0x0156}
0x1d7c…1db2 Head {h00=0x0032, h01=0x0050, text=» UPDFLD 1,SPINPUT UPDATE FIELD WITH DISPLAYING«, t00=0x0012, t01=0x0164}
0x1db2…1dc0 Head {h00=0x000a, h01=0x0050, text=»UPD300«, t00=0x0013, t01=0x000a}
0x1dc0…1df8 Head {h00=0x0034, h01=0x0050, text=» CBE SPBINW1,='0',UPD350 SKIP NEXT IF LENGTH = 0«, t00=0x0013, t01=0x0018}
0x1df8…1e24 Head {h00=0x0028, h01=0x0050, text=» SET SPCHANGE INDICATE CHANGED ITEM «, t00=0x0013, t01=0x0050}
0x1e24…1e32 Head {h00=0x000a, h01=0x0050, text=»UPD350«, t00=0x0013, t01=0x007c}
0x1e32…1e54 Head {h00=0x001e, h01=0x0050, text=»* TAKE CARE OF WARNING«, t00=0x0013, t01=0x008a}
0x1e54…1e70 Head {h00=0x0018, h01=0x0050, text=» TBF SPWARNFL,UPD360«, t00=0x0013, t01=0x00ac}
0x1e70…1e9e Head {h00=0x002a, h01=0x0050, text=» MOVE SPBINW1,SPBINW2 STORE KEY VALUE «, t00=0x0013, t01=0x00c8}
0x1e9e…1ec6 Head {h00=0x0024, h01=0x0050, text=» MOVE SPBINW4,=W'26' SET MESSAGE«, t00=0x0013, t01=0x00f6}
0x1ec6…1eda Head {h00=0x0010, h01=0x0050, text=» PERF SPERR «, t00=0x0013, t01=0x011e}
0x1eda…1f06 Head {h00=0x0028, h01=0x0050, text=» CBNE SPBINW2,CBIN2,UPD360 KOR-KEY ?«, t00=0x0013, t01=0x0132}
0x1f06…1f36 Head {h00=0x002c, h01=0x0050, text=» MOVE SPBINW2,SPBINW1 RESET OLD KEYVALUE«, t00=0x0013, t01=0x015e}
0x1f36…1f44 Head {h00=0x000a, h01=0x0050, text=»UPD360«, t00=0x0013, t01=0x018e}
0x1f44…1f6c Head {h00=0x0024, h01=0x0050, text=»* JUMP ON FUNCTION KEY INDEX «, t00=0x0014, t01=0x000c}
0x1f6c…1f90 Head {h00=0x0020, h01=0x0050, text=» IB SPBINW2,READIN,DUMMY, C«, t00=0x0014, t01=0x0034}
0x1f90…1fb4 Head {h00=0x0020, h01=0x0050, text=» KEOI,DUMMY,DUMMY,KTFWD, C«, t00=0x0014, t01=0x0058}
0x1fb4…1fe6 Head {h00=0x002e, h01=0x0050, text=» KTBWD,KTHOME,KTLDOWN,KTLEFT,KTRIGHT, C «, t00=0x0014, t01=0x007c}
0x1fe6…2014 Head {h00=0x002a, h01=0x0050, text=» KTDOWN,KTUP,KCOPY,DUMMY,DUMMY,KENTER«, t00=0x0014, t01=0x00ae}
0x2014…2044 Head {h00=0x002c, h01=0x0050, text=» SUB SPBINW2,=W'14' ADJUST EOI-KEY INDEX«, t00=0x0014, t01=0x00dc}
0x2044…2052 Head {h00=0x000a, h01=0x0050, text=»DUMMY «, t00=0x0014, t01=0x010c}
0x2052…2060 Head {h00=0x000a, h01=0x0050, text=»RETUR «, t00=0x0014, t01=0x011a}
0x2060…206c Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0014, t01=0x0128}
0x206c…2076 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0134}
0x2076…2084 Head {h00=0x000a, h01=0x0050, text=»UPD400«, t00=0x0014, t01=0x013e}
0x2084…20c0 Head {h00=0x0038, h01=0x0050, text=» CBE SPBINW4,='2',UPD260 JUMP IF UNCONDITIONAL DISPL«, t00=0x0014, t01=0x014c}
0x20c0…20f4 Head {h00=0x0030, h01=0x0050, text=» UPDFLD 0,SPINPUT UPDATE FIELD DISPL. COND. «, t00=0x0014, t01=0x0188}
0x20f4…2106 Head {h00=0x000e, h01=0x0050, text=» B UPD300 «, t00=0x0015, t01=0x002c}
0x2106…2110 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x003e}
0x2110…211e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x0048}
0x211e…2144 Head {h00=0x0022, h01=0x0050, text=»KEOI COMMON END-OF-ITEM KEY «, t00=0x0015, t01=0x0056}
0x2144…2168 Head {h00=0x0020, h01=0x0050, text=»KTFWD TAB. FORWARD 1 STEP «, t00=0x0015, t01=0x007c}
0x2168…2176 Head {h00=0x000a, h01=0x0050, text=» TFWD «, t00=0x0015, t01=0x00a0}
0x2176…2188 Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0015, t01=0x00ae}
0x2188…2192 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00c0}
0x2192…21ba Head {h00=0x0024, h01=0x0050, text=»KTBWD TABULATION 1 STEP BACKW.«, t00=0x0015, t01=0x00ca}
0x21ba…21c8 Head {h00=0x000a, h01=0x0050, text=» TBWD «, t00=0x0015, t01=0x00f2}
0x21c8…21da Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0015, t01=0x0100}
0x21da…21e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0112}
0x21e4…220a Head {h00=0x0022, h01=0x0050, text=»KTHOME TAB. TO HOME POSITION«, t00=0x0015, t01=0x011c}
0x220a…2218 Head {h00=0x000a, h01=0x0050, text=» THOME«, t00=0x0015, t01=0x0142}
0x2218…222a Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0015, t01=0x0150}
0x222a…2234 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0162}
0x2234…2260 Head {h00=0x0028, h01=0x0050, text=»KTLDOWN TAB. TO FIRST ON NEXT LINE«, t00=0x0015, t01=0x016c}
0x2260…2270 Head {h00=0x000c, h01=0x0050, text=» TLDOWN «, t00=0x0016, t01=0x0008}
0x2270…2282 Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0016, t01=0x0018}
0x2282…228c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x002a}
0x228c…22ae Head {h00=0x001e, h01=0x0050, text=»KTLEFT TAB. TO LEFTMOST «, t00=0x0016, t01=0x0034}
0x22ae…22bc Head {h00=0x000a, h01=0x0050, text=» TLEFT«, t00=0x0016, t01=0x0056}
0x22bc…22ce Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0016, t01=0x0064}
0x22ce…22d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0076}
0x22d8…22fc Head {h00=0x0020, h01=0x0050, text=»KTRIGHT TAB. TO RIGHTMOST «, t00=0x0016, t01=0x0080}
0x22fc…230c Head {h00=0x000c, h01=0x0050, text=» TRIGHT «, t00=0x0016, t01=0x00a4}
0x230c…231e Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0016, t01=0x00b4}
0x231e…2328 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00c6}
0x2328…2344 Head {h00=0x0018, h01=0x0050, text=»KTDOWN TAB 1 DOWN «, t00=0x0016, t01=0x00d0}
0x2344…2352 Head {h00=0x000a, h01=0x0050, text=» TDOWN«, t00=0x0016, t01=0x00ec}
0x2352…2364 Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0016, t01=0x00fa}
0x2364…236e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x010c}
0x236e…2386 Head {h00=0x0014, h01=0x0050, text=»KTUP TAB 1 UP «, t00=0x0016, t01=0x0116}
0x2386…2392 Head {h00=0x0008, h01=0x0050, text=» TUP«, t00=0x0016, t01=0x012e}
0x2392…239a Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x013a}
0x239a…23ba Head {h00=0x001c, h01=0x0050, text=»TSTTAB TEST TAB OUTPUT«, t00=0x0016, t01=0x0142}
0x23ba…23d0 Head {h00=0x0012, h01=0x0050, text=» BE READIN OK «, t00=0x0016, t01=0x0162}
0x23d0…23ec Head {h00=0x0018, h01=0x0050, text=» BL READIN NOT FOUND«, t00=0x0016, t01=0x0178}
0x23ec…241a (23, 0, 400) Head {h00=0x002a, h01=0x0050, text=» BOFL SETCREAD EMPTY COMPULSORY FIELD «, t00=0x0017, t01=0x0004}
0x241a…2424 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0032}
0x2424…242e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x003c}
0x242e…2452 Head {h00=0x0020, h01=0x0050, text=»* CONDITIONAL TABULATION «, t00=0x0017, t01=0x0046}
0x2452…245c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x006a}
0x245c…2470 Head {h00=0x0010, h01=0x0050, text=» PERF SPTCHK«, t00=0x0017, t01=0x0074}
0x2470…248a Head {h00=0x0016, h01=0x0050, text=» CMP SPBINW3,='0' «, t00=0x0017, t01=0x0088}
0x248a…249e Head {h00=0x0010, h01=0x0050, text=» BE SETCREAD«, t00=0x0017, t01=0x00a2}
0x249e…24c2 Head {h00=0x0020, h01=0x0050, text=» IB SPBINW2,DUMMY,DUMMY, C «, t00=0x0017, t01=0x00b6}
0x24c2…24e8 Head {h00=0x0022, h01=0x0050, text=» KTFWD,DUMMY,DUMMY,KTFWD, C «, t00=0x0017, t01=0x00da}
0x24e8…250e Head {h00=0x0022, h01=0x0050, text=» KTBWD,KTFWD,KTFWD,KTFWD, C «, t00=0x0017, t01=0x0100}
0x250e…252a Head {h00=0x0018, h01=0x0050, text=» KTBWD,KTFWD,KTBWD «, t00=0x0017, t01=0x0126}
0x252a…256a Head {h00=0x003c, h01=0x0050, text=»* BRANCH LIST EXHAUSTED - SPBINW2 CLOBBERED BY SPTCHK«, t00=0x0017, t01=0x0142}
0x256a…2572 Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x0182}
0x2572…2586 Head {h00=0x0010, h01=0x0050, text=» B SETCREAD «, t00=0x0017, t01=0x018a}
0x2586…2594 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0018, t01=0x000e}
0x2594…25ae Head {h00=0x0016, h01=0x0050, text=»KCOPY HARD COPY «, t00=0x0018, t01=0x001c}
0x25ae…25c8 Head {h00=0x0016, h01=0x0050, text=» MOVE SPBINW3,='1'«, t00=0x0018, t01=0x0036}
0x25c8…25ea Head {h00=0x001e, h01=0x0050, text=» PRINT KVOUCH,SPBINW3,='0'«, t00=0x0018, t01=0x0050}
0x25ea…2612 Head {h00=0x0024, h01=0x0050, text=» B SETCREAD SET CURSOR AND READ «, t00=0x0018, t01=0x0072}
0x2612…261c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x009a}
0x261c…2638 Head {h00=0x0018, h01=0x0050, text=»KDUPL DUPLICATION «, t00=0x0018, t01=0x00a4}
0x2638…266a Head {h00=0x002e, h01=0x0050, text=» MOVE SPBINW2,='3' INDICATE COMMON EOI-KEY«, t00=0x0018, t01=0x00c0}
0x266a…268c Head {h00=0x001e, h01=0x0050, text=» DUPL SPINPUT DUPLICATION «, t00=0x0018, t01=0x00f2}
0x268c…26a0 Head {h00=0x0010, h01=0x0050, text=» BNZ KDUPL2 «, t00=0x0018, t01=0x0114}
0x26a0…26da Head {h00=0x0036, h01=0x0050, text=» COPY GSWSTR1,CBIN0,CBIN1,SPINPUT,CBIN1 GET BYTE 1«, t00=0x0018, t01=0x0128}
0x26da…26fc Head {h00=0x001e, h01=0x0050, text=» CBE GSWSTR1,=X'00',KDUPL2«, t00=0x0018, t01=0x0162}
0x26fc…272e Head {h00=0x002e, h01=0x0050, text=» MOVE SPBINW1,='10' SET LENGTH IN DUPFIELD«, t00=0x0018, t01=0x0184}
0x272e…2742 Head {h00=0x0010, h01=0x0050, text=» SET SPDUPL «, t00=0x0019, t01=0x0026}
0x2742…2760 Head {h00=0x001a, h01=0x0050, text=» B UPDATE DUPL ALLOWED«, t00=0x0019, t01=0x003a}
0x2760…276e Head {h00=0x000a, h01=0x0050, text=»KDUPL2«, t00=0x0019, t01=0x0058}
0x276e…27a2 Head {h00=0x0030, h01=0x0050, text=» MOVE SPBINW4,='4' INDICATE ILLEGAL EOI-KEY «, t00=0x0019, t01=0x0066}
0x27a2…27c6 Head {h00=0x0020, h01=0x0050, text=» B ERRPRINT DUPL NOT ALLOWED«, t00=0x0019, t01=0x009a}
0x27c6…27d4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0019, t01=0x00be}
0x27d4…27de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00cc}
0x27de…27f6 Head {h00=0x0014, h01=0x0050, text=»* EDIT FIELD «, t00=0x0019, t01=0x00d6}
0x27f6…2800 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00ee}
0x2800…280e Head {h00=0x000a, h01=0x0050, text=»KEDIT «, t00=0x0019, t01=0x00f8}
0x280e…2830 Head {h00=0x001e, h01=0x0050, text=» GETCTL 1,SPBINW3 GET MAXL«, t00=0x0019, t01=0x0106}
0x2830…2852 Head {h00=0x001e, h01=0x0050, text=» CBNE SPBINW3,='0',KED100 «, t00=0x0019, t01=0x0128}
0x2852…2864 Head {h00=0x000e, h01=0x0050, text=» PERF BELL«, t00=0x0019, t01=0x014a}
0x2864…2878 Head {h00=0x0010, h01=0x0050, text=» B SETCREAD «, t00=0x0019, t01=0x015c}
0x2878…2886 Head {h00=0x000a, h01=0x0050, text=»KED100«, t00=0x0019, t01=0x0170}
0x2886…28b0 Head {h00=0x0026, h01=0x0050, text=» EDFLD SPINPUT,SPKTAB3,SPBINW1, C«, t00=0x0019, t01=0x017e}
0x28b0…28ca Head {h00=0x0016, h01=0x0050, text=» SPBINW2,SPBINW4 «, t00=0x001a, t01=0x0018}
0x28ca…28f0 Head {h00=0x0022, h01=0x0050, text=» B DYKOUT CONTINUE AS FOR DYKI«, t00=0x001a, t01=0x0032}
0x28f0…28fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0058}
0x28fa…2910 Head {h00=0x0012, h01=0x0050, text=»* ENTER KEY«, t00=0x001a, t01=0x0062}
0x2910…291a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0078}
0x291a…2928 Head {h00=0x000a, h01=0x0050, text=»KENTER«, t00=0x001a, t01=0x0082}
0x2928…2954 Head {h00=0x0028, h01=0x0050, text=» TBT SPCHANGE,KENT00 NO TESTS ON ME «, t00=0x001a, t01=0x0090}
0x2954…2976 Head {h00=0x001e, h01=0x0050, text=» TBF SPME,KENT05 FIELDS ? «, t00=0x001a, t01=0x00bc}
0x2976…2984 Head {h00=0x000a, h01=0x0050, text=»KENT00«, t00=0x001a, t01=0x00de}
0x2984…29b8 Head {h00=0x0030, h01=0x0050, text=» MOVE SPBINW4,='5' INDICATE COMP.FIELD FOUND«, t00=0x001a, t01=0x00ec}
0x29b8…29e8 Head {h00=0x002c, h01=0x0050, text=» MOVE SPBINW1,='0' INDICATE NO CLEARING «, t00=0x001a, t01=0x0120}
0x29e8…2a1e Head {h00=0x0032, h01=0x0050, text=» MOVE SPBINW2,='0' SET INDEX TO SEARCHED FIELD«, t00=0x001a, t01=0x0150}
0x2a1e…2a5e Head {h00=0x003c, h01=0x0050, text=» GETFLD 0,SPBINW2,SPBINW3 SEARCH FOR EMPTY COMP. FIELDS «, t00=0x001a, t01=0x0186}
0x2a5e…2a8a Head {h00=0x0028, h01=0x0050, text=» BOFL KENT10 EMPTY COMP. FIELD FOUND«, t00=0x001b, t01=0x0036}
0x2a8a…2ab4 Head {h00=0x0026, h01=0x0050, text=» TSTCTL 2 LOOK IF COMPULSORY FIELD«, t00=0x001b, t01=0x0062}
0x2ab4…2aca Head {h00=0x0012, h01=0x0050, text=» BZ KENT05 NO!«, t00=0x001b, t01=0x008c}
0x2aca…2afc Head {h00=0x002e, h01=0x0050, text=» CALL EMPTYT,:FMTITEM LOOK IF EMPTY FIELD «, t00=0x001b, t01=0x00a2}
0x2afc…2b14 Head {h00=0x0014, h01=0x0050, text=» BP KENT10 YES! «, t00=0x001b, t01=0x00d4}
0x2b14…2b22 Head {h00=0x000a, h01=0x0050, text=»KENT05«, t00=0x001b, t01=0x00ec}
0x2b22…2b5a Head {h00=0x0034, h01=0x0050, text=» MOVE SPBINW2,='3' INDICATE ENTER KEY DEPRESSED «, t00=0x001b, t01=0x00fa}
0x2b5a…2b66 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001b, t01=0x0132}
0x2b66…2b70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x013e}
0x2b70…2b9a Head {h00=0x0026, h01=0x0050, text=»* EMPTY COMPULSORY FIELD FOUND «, t00=0x001b, t01=0x0148}
0x2b9a…2ba4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0172}
0x2ba4…2bb2 Head {h00=0x000a, h01=0x0050, text=»KENT10«, t00=0x001b, t01=0x017c}
0x2bb2…2bec Head {h00=0x0036, h01=0x0050, text=» GETFLD 0,SPBINW3,SPBINW2 GET THE COMPULSORY FIELD«, t00=0x001b, t01=0x018a}
0x2bec…2bfa Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001c, t01=0x0034}
0x2bfa…2c08 Head {h00=0x000a, h01=0x0050, text=»ERRPRT«, t00=0x001c, t01=0x0042}
0x2c08…2c12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0050}
0x2c12…2c26 Head {h00=0x0010, h01=0x0050, text=» PERF DKTEST«, t00=0x001c, t01=0x005a}
0x2c26…2c3c Head {h00=0x0012, h01=0x0050, text=» BNOK SETCREAD«, t00=0x001c, t01=0x006e}
0x2c3c…2c46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0084}
0x2c46…2c74 Head {h00=0x002a, h01=0x0050, text=» CBE SPBINW2,='16',KEDIT JUMP IF EDIT «, t00=0x001c, t01=0x008e}
0x2c74…2ca2 Head {h00=0x002a, h01=0x0050, text=» CBE SPBINW2,='4',CANC JUMP IF CANCEL1«, t00=0x001c, t01=0x00bc}
0x2ca2…2cd0 Head {h00=0x002a, h01=0x0050, text=» CBE SPBINW2,='5',CANC JUMP IF CANCEL2«, t00=0x001c, t01=0x00ea}
0x2cd0…2cda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0118}
0x2cda…2cf6 Head {h00=0x0018, h01=0x0050, text=»* ERROR HANDLING «, t00=0x001c, t01=0x0122}
0x2cf6…2d00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x013e}
0x2d00…2d10 Head {h00=0x000c, h01=0x0050, text=»ERRPRINT«, t00=0x001c, t01=0x0148}
0x2d10…2d1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0158}
0x2d1a…2d36 Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW2,=X'40'«, t00=0x001c, t01=0x0162}
0x2d36…2d52 Head {h00=0x0018, h01=0x0050, text=» XSTAT KEYB,SPBINW3 «, t00=0x001c, t01=0x017e}
0x2d52…2d78 Head {h00=0x0022, h01=0x0050, text=» CBNE SPBINW2,SPBINW3,ERRPRT20«, t00=0x001d, t01=0x000a}
0x2d78…2d8a Head {h00=0x000e, h01=0x0050, text=» TIMEOUT«, t00=0x001d, t01=0x0030}
0x2d8a…2db4 Head {h00=0x0026, h01=0x0050, text=» EDWRT SCREEN,ERAFMT ERASE SCREEN «, t00=0x001d, t01=0x0042}
0x2db4…2dc6 Head {h00=0x000e, h01=0x0050, text=» B ERRC20 «, t00=0x001d, t01=0x006c}
0x2dc6…2dd6 Head {h00=0x000c, h01=0x0050, text=»ERRPRT20«, t00=0x001d, t01=0x007e}
0x2dd6…2df6 Head {h00=0x001c, h01=0x0050, text=» CBE SPBINW4,='0',ERRC20«, t00=0x001d, t01=0x008e}
0x2df6…2e08 Head {h00=0x000e, h01=0x0050, text=» PERF BELL«, t00=0x001d, t01=0x00ae}
0x2e08…2e34 Head {h00=0x0028, h01=0x0050, text=» MOVE SPBINW3,=X'0801' ROW 24 COL. 1«, t00=0x001d, t01=0x00c0}
0x2e34…2e6a Head {h00=0x0032, h01=0x0050, text=» DSC1 SCREEN,6,SPBINW3 SET CURSOR ON LAST ROW «, t00=0x001d, t01=0x00ec}
0x2e6a…2e92 Head {h00=0x0024, h01=0x0050, text=» MOVE GSWBCD4,SPBINW4 ERRORCODE «, t00=0x001d, t01=0x0122}
0x2e92…2e9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x014a}
0x2e9c…2ec4 Head {h00=0x0024, h01=0x0050, text=» EDWRT SCREEN,SPFTBERR(SPBINW4) «, t00=0x001d, t01=0x0154}
0x2ec4…2ee2 Head {h00=0x001a, h01=0x0050, text=» TBF SPKEYFLG,SPERRRET«, t00=0x001d, t01=0x017c}
0x2ee2…2eec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x000a}
0x2eec…2f0a Head {h00=0x001a, h01=0x0050, text=»* READ AFTER ERROR «, t00=0x001e, t01=0x0014}
0x2f0a…2f14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0032}
0x2f14…2f22 Head {h00=0x000a, h01=0x0050, text=»ERREAD«, t00=0x001e, t01=0x003c}
0x2f22…2f4e Head {h00=0x0028, h01=0x0050, text=» SETCUR SET CURSOR AT THE BEGINNING«, t00=0x001e, t01=0x004a}
0x2f4e…2f6e Head {h00=0x001c, h01=0x0050, text=» OF THE CURRENT FIELD «, t00=0x001e, t01=0x0076}
0x2f6e…2f7c Head {h00=0x000a, h01=0x0050, text=»ERR100«, t00=0x001e, t01=0x0096}
0x2f7c…2faa Head {h00=0x002a, h01=0x0050, text=» MOVE SPBINW3,=W'14' REQUESTED LENGTH «, t00=0x001e, t01=0x00a4}
0x2faa…2fd0 Head {h00=0x0022, h01=0x0050, text=» IB SPKEY,ERR105,ERR110,ERR115«, t00=0x001e, t01=0x00d2}
0x2fd0…2fde Head {h00=0x000a, h01=0x0050, text=»ERR105«, t00=0x001e, t01=0x00f8}
0x2fde…3014 Head {h00=0x0032, h01=0x0050, text=» NKI .NE,KEYB,SPINPUT,SPKTAB1,SPBINW3,SPBINW2 «, t00=0x001e, t01=0x0106}
0x3014…3026 Head {h00=0x000e, h01=0x0050, text=» B ERR120 «, t00=0x001e, t01=0x013c}
0x3026…3034 Head {h00=0x000a, h01=0x0050, text=»ERR110«, t00=0x001e, t01=0x014e}
0x3034…306a Head {h00=0x0032, h01=0x0050, text=» NKI .NE,KEYB,SPINPUT,SPKTAB12,SPBINW3,SPBINW2«, t00=0x001e, t01=0x015c}
0x306a…307c (31, 0, 400) Head {h00=0x000e, h01=0x0050, text=» B ERR120 «, t00=0x001f, t01=0x0004}
0x307c…308a Head {h00=0x000a, h01=0x0050, text=»ERR115«, t00=0x001f, t01=0x0016}
0x308a…30c0 Head {h00=0x0032, h01=0x0050, text=» NKI .NE,KEYB,SPINPUT,SPKTAB13,SPBINW3,SPBINW2«, t00=0x001f, t01=0x0024}
0x30c0…30ce Head {h00=0x000a, h01=0x0050, text=»ERR120«, t00=0x001f, t01=0x005a}
0x30ce…30f0 Head {h00=0x001e, h01=0x0050, text=» BNZ ERR100 JUMP IF NOT OK«, t00=0x001f, t01=0x0068}
0x30f0…30fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x008a}
0x30fa…310e Head {h00=0x0010, h01=0x0050, text=» PERF DKTEST«, t00=0x001f, t01=0x0094}
0x310e…3124 Head {h00=0x0012, h01=0x0050, text=» BNOK SETCREAD«, t00=0x001f, t01=0x00a8}
0x3124…312e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00be}
0x312e…315a Head {h00=0x0028, h01=0x0050, text=» CMP SPBINW2,='0' JUMP IF POWER OFF «, t00=0x001f, t01=0x00c8}
0x315a…316c Head {h00=0x000e, h01=0x0050, text=» BE RETUR «, t00=0x001f, t01=0x00f4}
0x316c…3192 Head {h00=0x0022, h01=0x0050, text=» IB SPBINW2,ERR100,ERRCONT C «, t00=0x001f, t01=0x0106}
0x3192…31ba Head {h00=0x0024, h01=0x0050, text=» ERRCONT,ERR100,ERRCONT,ERRCONT«, t00=0x001f, t01=0x012c}
0x31ba…31d4 Head {h00=0x0016, h01=0x0050, text=» B ERR100 CONTINUE«, t00=0x001f, t01=0x0154}
0x31d4…31de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x016e}
0x31de…3200 Head {h00=0x001e, h01=0x0050, text=»* CLEAR ERROR PRINTOUT «, t00=0x001f, t01=0x0178}
0x3200…320a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x000a}
0x320a…321a Head {h00=0x000c, h01=0x0050, text=»ERRCONT «, t00=0x0020, t01=0x0014}
0x321a…323e Head {h00=0x0020, h01=0x0050, text=» PERF CLEAR8 ERASE LAST LINE«, t00=0x0020, t01=0x0024}
0x323e…326a Head {h00=0x0028, h01=0x0050, text=» CBNL SPBINW4,=W'26',CANC IF WARNING«, t00=0x0020, t01=0x0048}
0x326a…3294 Head {h00=0x0026, h01=0x0050, text=» SUB SPBINW2,='1' ADJUST KEY INDEX«, t00=0x0020, t01=0x0074}
0x3294…32a0 Head {h00=0x0008, h01=0x0050, text=»CANC«, t00=0x0020, t01=0x009e}
0x32a0…32d4 Head {h00=0x0030, h01=0x0050, text=» CBE SPBINW1,='0',ERRC10 JUMP IF LENGTH = 0 «, t00=0x0020, t01=0x00aa}
0x32d4…3308 Head {h00=0x0030, h01=0x0050, text=» MOVE SPINPUT,:FMTITEM SAVE CURRENT CONTENTS«, t00=0x0020, t01=0x00de}
0x3308…3340 Head {h00=0x0034, h01=0x0050, text=» MOVE :FMTITEM,=C'1' PUT SOMETHING IN THE FIELD «, t00=0x0020, t01=0x0112}
0x3340…336a Head {h00=0x0026, h01=0x0050, text=» GETABX SPBINW4 GET CURRENT INDEX «, t00=0x0020, t01=0x014a}
0x336a…3398 Head {h00=0x002a, h01=0x0050, text=» ERASE 10,SPBINW4,SPBINW4 CLEAR FIELD «, t00=0x0020, t01=0x0174}
0x3398…33a6 Head {h00=0x000a, h01=0x0050, text=»ERRC10«, t00=0x0021, t01=0x0012}
0x33a6…33ce Head {h00=0x0024, h01=0x0050, text=» IB SPBINW2,CLEAR1,CLEAR2,DUMMY «, t00=0x0021, t01=0x0020}
0x33ce…3402 Head {h00=0x0030, h01=0x0050, text=» SUB SPBINW2,='3' ADJUST FOR CANCEL1,CANCEL2«, t00=0x0021, t01=0x0048}
0x3402…340e Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0021, t01=0x007c}
0x340e…341c Head {h00=0x000a, h01=0x0050, text=»CLEAR1«, t00=0x0021, t01=0x0088}
0x341c…3450 Head {h00=0x0030, h01=0x0050, text=» CBE SPBINW1,='0',ERRC20 JUMP IF LENGTH = 0 «, t00=0x0021, t01=0x0096}
0x3450…347c Head {h00=0x0028, h01=0x0050, text=» SET SPCHANGE INDICATE CHANGED FIELD«, t00=0x0021, t01=0x00ca}
0x347c…348a Head {h00=0x000a, h01=0x0050, text=»ERRC20«, t00=0x0021, t01=0x00f6}
0x348a…34b4 Head {h00=0x0026, h01=0x0050, text=» MOVE SPBINW5,$OPT CHECHK IF SPERR«, t00=0x0021, t01=0x0104}
0x34b4…34d8 Head {h00=0x0020, h01=0x0050, text=» CBE SPBINW5,=W'0',SPERRRET «, t00=0x0021, t01=0x012e}
0x34d8…34f4 Head {h00=0x0018, h01=0x0050, text=» B SETCREAD CONTINUE«, t00=0x0021, t01=0x0152}
0x34f4…34fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x016e}
0x34fe…350c Head {h00=0x000a, h01=0x0050, text=»CLEAR2«, t00=0x0021, t01=0x0178}
0x350c…3544 Head {h00=0x0034, h01=0x0050, text=» MOVE :FMTITEM,SPINPUT RESTORE CURRENT CONTENTS «, t00=0x0021, t01=0x0186}
0x3544…3552 Head {h00=0x000a, h01=0x0050, text=»CLEA20«, t00=0x0022, t01=0x002e}
0x3552…3580 Head {h00=0x002a, h01=0x0050, text=» GETABX SPBINW4 GET CURRENT TAB INDEX «, t00=0x0022, t01=0x003c}
0x3580…35b0 Head {h00=0x002c, h01=0x0050, text=» DISPLAY 1,SPBINW4,SPBINW4 DISPLAY FIELD«, t00=0x0022, t01=0x006a}
0x35b0…35da Head {h00=0x0026, h01=0x0050, text=» MOVE SPBINW5,$OPT CHECK IF SPERR «, t00=0x0022, t01=0x009a}
0x35da…35fe Head {h00=0x0020, h01=0x0050, text=» CBE SPBINW5,=W'0',SPERRRET «, t00=0x0022, t01=0x00c4}
0x35fe…361a Head {h00=0x0018, h01=0x0050, text=» B SETCREAD CONTINUE«, t00=0x0022, t01=0x00e8}
0x361a…3624 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0104}
0x3624…3634 Head {h00=0x000c, h01=0x0050, text=»SPERRRET«, t00=0x0022, t01=0x010e}
0x3634…3640 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0022, t01=0x011e}
0x3640…364a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x012a}
0x364a…3658 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0022, t01=0x0134}
0x3658…3662 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0142}
0x3662…3674 Head {h00=0x000e, h01=0x0050, text=»BELL PROC «, t00=0x0022, t01=0x014c}
0x3674…3694 Head {h00=0x001c, h01=0x0050, text=»* ACUSTIC ALARM«, t00=0x0022, t01=0x015e}
0x3694…36b2 Head {h00=0x001a, h01=0x0050, text=» EDWRT SCREEN,BELLFMT «, t00=0x0022, t01=0x017e}
0x36b2…36be Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0023, t01=0x000c}
0x36be…36c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0018}
0x36c8…36dc Head {h00=0x0010, h01=0x0050, text=»BELLFMT FRMT«, t00=0x0023, t01=0x0022}
0x36dc…36e8 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0023, t01=0x0036}
0x36e8…36fe Head {h00=0x0012, h01=0x0050, text=» FILLR X'07',1«, t00=0x0023, t01=0x0042}
0x36fe…370c Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0023, t01=0x0058}
0x370c…3714 Head {h00=0x0004, h01=0x0050, t00=0x0023, t01=0x0066}
0x3714…3722 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0023, t01=0x006e}
0x3722…372c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x007c}
0x372c…3740 Head {h00=0x0010, h01=0x0050, text=»ERAFMT FRMT «, t00=0x0023, t01=0x0086}
0x3740…3754 Head {h00=0x0010, h01=0x0050, text=» FILLR '1',2«, t00=0x0023, t01=0x009a}
0x3754…3762 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0023, t01=0x00ae}
0x3762…376c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00bc}
0x376c…377a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0023, t01=0x00c6}
0x377a…378e Head {h00=0x0010, h01=0x0050, text=»KBTEST PROC «, t00=0x0023, t01=0x00d4}
0x378e…37ba Head {h00=0x0028, h01=0x0050, text=»* THE PROCEDURE SENSES THE KEYBOARD.«, t00=0x0023, t01=0x00e8}
0x37ba…37f4 Head {h00=0x0036, h01=0x0050, text=»* IF THE MAK-KEY HAS BEEN DEPRESSED, THE COND.REG «, t00=0x0023, t01=0x0114}
0x37f4…3832 Head {h00=0x003a, h01=0x0050, text=»* WILL BE SET TO ZERO, IN ORDER TO ENABLE THE CALLING «, t00=0x0023, t01=0x014e}
0x3832…3872 Head {h00=0x003c, h01=0x0050, text=»* MODULE TO STOP THE LISTING ( OR FOR ANY OTHER PURPOSE)«, t00=0x0023, t01=0x018c}
0x3872…387a Head {h00=0x0004, h01=0x0050, t00=0x0024, t01=0x003c}
0x387a…389a Head {h00=0x001c, h01=0x0050, text=» PERF SPLIN8,CBIN0,CBIN0«, t00=0x0024, t01=0x0044}
0x389a…38ae Head {h00=0x0010, h01=0x0050, text=» TESTIO KEYB«, t00=0x0024, t01=0x0064}
0x38ae…38c0 Head {h00=0x000e, h01=0x0050, text=» BOK KBT10«, t00=0x0024, t01=0x0078}
0x38c0…38d8 Head {h00=0x0014, h01=0x0050, text=» CALL ABORT,KEYB«, t00=0x0024, t01=0x008a}
0x38d8…38e8 Head {h00=0x000c, h01=0x0050, text=» B KBT20«, t00=0x0024, t01=0x00a2}
0x38e8…38f6 Head {h00=0x000a, h01=0x0050, text=»KBT10 «, t00=0x0024, t01=0x00b2}
0x38f6…3908 Head {h00=0x000e, h01=0x0050, text=» WAIT KEYB«, t00=0x0024, t01=0x00c0}
0x3908…392a Head {h00=0x001e, h01=0x0050, text=» CBNE SPBINW2,CBIN6,KBT20 «, t00=0x0024, t01=0x00d2}
0x392a…3942 Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x0024, t01=0x00f4}
0x3942…3952 Head {h00=0x000c, h01=0x0050, text=» B KBT99«, t00=0x0024, t01=0x010c}
0x3952…3960 Head {h00=0x000a, h01=0x0050, text=»KBT20 «, t00=0x0024, t01=0x011c}
0x3960…3978 Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN1«, t00=0x0024, t01=0x012a}
0x3978…3986 Head {h00=0x000a, h01=0x0050, text=»KBT99 «, t00=0x0024, t01=0x0142}
0x3986…3992 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0024, t01=0x0150}
0x3992…39a0 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0024, t01=0x015c}
0x39a0…39ae Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0024, t01=0x016a}
0x39ae…39d0 Head {h00=0x001e, h01=0x0050, text=»SPLIN8 PROC WRTMES,WRTTYP «, t00=0x0024, t01=0x0178}
0x39d0…39ec Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0025, t01=0x000a}
0x39ec…39f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0026}
0x39f6…3a22 Head {h00=0x0028, h01=0x0050, text=»* SPLIN8 - WRITE ON LINE 8 «, t00=0x0025, t01=0x0030}
0x3a22…3a2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x005c}
0x3a2c…3a66 Head {h00=0x0036, h01=0x0050, text=»* MESSAGE DEFINED AS FORMAT NUMBER WRTMES«, t00=0x0025, t01=0x0066}
0x3a66…3a92 Head {h00=0x0028, h01=0x0050, text=»* IN FORMAT TABLE SPFTBMES «, t00=0x0025, t01=0x00a0}
0x3a92…3a9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00cc}
0x3a9c…3ac4 Head {h00=0x0024, h01=0x0050, text=»* WRTTYP: =0 NO WAIT«, t00=0x0025, t01=0x00d6}
0x3ac4…3aea Head {h00=0x0022, h01=0x0050, text=»* =1 WAIT «, t00=0x0025, t01=0x00fe}
0x3aea…3b12 Head {h00=0x0024, h01=0x0050, text=»* =2 RETURN «, t00=0x0025, t01=0x0124}
0x3b12…3b48 Head {h00=0x0032, h01=0x0050, text=»* =3 WRITE .NW AND RETURN «, t00=0x0025, t01=0x014c}
0x3b48…3b52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0182}
0x3b52…3b6e Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x0025, t01=0x018c}
0x3b6e…3b8a Head {h00=0x0018, h01=0x0050, text=» TBT TBCTASK,LINRET «, t00=0x0026, t01=0x0018}
0x3b8a…3ba8 Head {h00=0x001a, h01=0x0050, text=» MOVE SPBINW1,=X'0801'«, t00=0x0026, t01=0x0034}
0x3ba8…3bde Head {h00=0x0032, h01=0x0050, text=» DSC1 SCREEN,6,SPBINW1 SET CURSOR ON LAST ROW «, t00=0x0026, t01=0x0052}
0x3bde…3bfa Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW1,CBIN0 «, t00=0x0026, t01=0x0088}
0x3bfa…3c1a Head {h00=0x001c, h01=0x0050, text=» CBE WRTMES,CBIN0,LIN800«, t00=0x0026, t01=0x00a4}
0x3c1a…3c3a Head {h00=0x001c, h01=0x0050, text=» CBL WRTTYP,CBIN3,LIN801«, t00=0x0026, t01=0x00c4}
0x3c3a…3c64 Head {h00=0x0026, h01=0x0050, text=» EDWRT .NW,SCREEN,SPFTBMES(WRTMES)«, t00=0x0026, t01=0x00e4}
0x3c64…3c76 Head {h00=0x000e, h01=0x0050, text=» B LINRET «, t00=0x0026, t01=0x010e}
0x3c76…3c84 Head {h00=0x000a, h01=0x0050, text=»LIN801«, t00=0x0026, t01=0x0120}
0x3c84…3caa Head {h00=0x0022, h01=0x0050, text=» EDWRT SCREEN,SPFTBMES(WRTMES)«, t00=0x0026, t01=0x012e}
0x3caa…3cb8 Head {h00=0x000a, h01=0x0050, text=»LIN800«, t00=0x0026, t01=0x0154}
0x3cb8…3cd8 Head {h00=0x001c, h01=0x0050, text=» CBE WRTTYP,=W'0',LIN8NW«, t00=0x0026, t01=0x0162}
0x3cd8…3cf8 Head {h00=0x001c, h01=0x0050, text=» CBE WRTTYP,=W'2',LINRET«, t00=0x0026, t01=0x0182}
0x3cf8…3d06 Head {h00=0x000a, h01=0x0050, text=»* READ«, t00=0x0027, t01=0x0012}
0x3d06…3d14 Head {h00=0x000a, h01=0x0050, text=»LIN8IN«, t00=0x0027, t01=0x0020}
0x3d14…3d40 Head {h00=0x0028, h01=0x0050, text=» MOVE SPBINW1,=W'3' REQUESTED LENGTH«, t00=0x0027, t01=0x002e}
0x3d40…3d66 Head {h00=0x0022, h01=0x0050, text=» IB SPKEY,LIN805,LIN810,LIN815«, t00=0x0027, t01=0x005a}
0x3d66…3d74 Head {h00=0x000a, h01=0x0050, text=»LIN805«, t00=0x0027, t01=0x0080}
0x3d74…3da6 Head {h00=0x002e, h01=0x0050, text=» NKI KEYB,SPINPUT,SPKTAB1,SPBINW1,SPBINW2 «, t00=0x0027, t01=0x008e}
0x3da6…3db8 Head {h00=0x000e, h01=0x0050, text=» B LIN820 «, t00=0x0027, t01=0x00c0}
0x3db8…3dc6 Head {h00=0x000a, h01=0x0050, text=»LIN810«, t00=0x0027, t01=0x00d2}
0x3dc6…3df8 Head {h00=0x002e, h01=0x0050, text=» NKI KEYB,SPINPUT,SPKTAB12,SPBINW1,SPBINW2«, t00=0x0027, t01=0x00e0}
0x3df8…3e0a Head {h00=0x000e, h01=0x0050, text=» B LIN820 «, t00=0x0027, t01=0x0112}
0x3e0a…3e18 Head {h00=0x000a, h01=0x0050, text=»LIN815«, t00=0x0027, t01=0x0124}
0x3e18…3e4a Head {h00=0x002e, h01=0x0050, text=» NKI KEYB,SPINPUT,SPKTAB13,SPBINW1,SPBINW2«, t00=0x0027, t01=0x0132}
0x3e4a…3e58 Head {h00=0x000a, h01=0x0050, text=»LIN820«, t00=0x0027, t01=0x0164}
0x3e58…3e7c Head {h00=0x0020, h01=0x0050, text=» BNOK LIN8IN JUMP IF NOT OK «, t00=0x0027, t01=0x0172}
0x3e7c…3e84 Head {h00=0x0004, h01=0x0050, t00=0x0028, t01=0x0008}
0x3e84…3e98 Head {h00=0x0010, h01=0x0050, text=» PERF DKTEST«, t00=0x0028, t01=0x0010}
0x3e98…3ea0 Head {h00=0x0004, h01=0x0050, t00=0x0028, t01=0x0024}
0x3ea0…3ec8 Head {h00=0x0024, h01=0x0050, text=» IB SPBINW2,LIN8IN,LIN8CT,LIN8IN«, t00=0x0028, t01=0x002c}
0x3ec8…3eda Head {h00=0x000e, h01=0x0050, text=» B LIN8IN «, t00=0x0028, t01=0x0054}
0x3eda…3eee Head {h00=0x0010, h01=0x0050, text=»* CLEAR LINE«, t00=0x0028, t01=0x0066}
0x3eee…3efc Head {h00=0x000a, h01=0x0050, text=»LIN8CT«, t00=0x0028, t01=0x007a}
0x3efc…3f20 Head {h00=0x0020, h01=0x0050, text=» PERF CLEAR8 ERASE LAST LINE«, t00=0x0028, t01=0x0088}
0x3f20…3f2c Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0028, t01=0x00ac}
0x3f2c…3f48 Head {h00=0x0018, h01=0x0050, text=»* READ WITH NO WAIT «, t00=0x0028, t01=0x00b8}
0x3f48…3f56 Head {h00=0x000a, h01=0x0050, text=»LIN8NW«, t00=0x0028, t01=0x00d4}
0x3f56…3f82 Head {h00=0x0028, h01=0x0050, text=» MOVE SPBINW1,=W'3' REQUESTED LENGTH«, t00=0x0028, t01=0x00e2}
0x3f82…3fa8 Head {h00=0x0022, h01=0x0050, text=» IB SPKEY,LIN855,LIN860,LIN865«, t00=0x0028, t01=0x010e}
0x3fa8…3fb6 Head {h00=0x000a, h01=0x0050, text=»LIN855«, t00=0x0028, t01=0x0134}
0x3fb6…3fec Head {h00=0x0032, h01=0x0050, text=» NKI .NW,KEYB,SPINPUT,SPKTAB1,SPBINW1,SPBINW2 «, t00=0x0028, t01=0x0142}
0x3fec…3ffe Head {h00=0x000e, h01=0x0050, text=» B LIN870 «, t00=0x0028, t01=0x0178}
0x3ffe…400c Head {h00=0x000a, h01=0x0050, text=»LIN860«, t00=0x0028, t01=0x018a}
0x400c…4042 Head {h00=0x0032, h01=0x0050, text=» NKI .NW,KEYB,SPINPUT,SPKTAB12,SPBINW1,SPBINW2«, t00=0x0029, t01=0x0008}
0x4042…4054 Head {h00=0x000e, h01=0x0050, text=» B LIN870 «, t00=0x0029, t01=0x003e}
0x4054…4062 Head {h00=0x000a, h01=0x0050, text=»LIN865«, t00=0x0029, t01=0x0050}
0x4062…4098 Head {h00=0x0032, h01=0x0050, text=» NKI .NW,KEYB,SPINPUT,SPKTAB13,SPBINW1,SPBINW2«, t00=0x0029, t01=0x005e}
0x4098…40a6 Head {h00=0x000a, h01=0x0050, text=»LIN870«, t00=0x0029, t01=0x0094}
0x40a6…40ae Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x00a2}
0x40ae…40c2 Head {h00=0x0010, h01=0x0050, text=» PERF DKTEST«, t00=0x0029, t01=0x00aa}
0x40c2…40ca Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x00be}
0x40ca…40d8 Head {h00=0x000a, h01=0x0050, text=»LINRET«, t00=0x0029, t01=0x00c6}
0x40d8…40e4 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0029, t01=0x00d4}
0x40e4…40f2 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0029, t01=0x00e0}
0x40f2…4100 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0029, t01=0x00ee}
0x4100…4114 Head {h00=0x0010, h01=0x0050, text=»SPINF1 PROC «, t00=0x0029, t01=0x00fc}
0x4114…4130 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0029, t01=0x0110}
0x4130…413a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x012c}
0x413a…416e Head {h00=0x0030, h01=0x0050, text=»* SPINF1 - WRITE INF ON FIRST LINE «, t00=0x0029, t01=0x0136}
0x416e…4178 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x016a}
0x4178…4194 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0029, t01=0x0174}
0x4194…41b2 Head {h00=0x001a, h01=0x0050, text=» MOVE SPBINW1,=X'0117'«, t00=0x0029, t01=0x0190}
0x41b2…41ea Head {h00=0x0034, h01=0x0050, text=» DSC1 SCREEN,6,SPBINW1 SET CURSOR ON FIRST LINE «, t00=0x002a, t01=0x001e}
0x41ea…4206 Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW1,CBIN0 «, t00=0x002a, t01=0x0056}
0x4206…423c Head {h00=0x0032, h01=0x0050, text=» EDWRT SCREEN,SPFTBMES(CBIN7) WRITE MESSAGE 7 «, t00=0x002a, t01=0x0072}
0x423c…4248 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x002a, t01=0x00a8}
0x4248…4256 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x002a, t01=0x00b4}
0x4256…4260 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00c2}
0x4260…426a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00cc}
0x426a…4274 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00d6}
0x4274…4288 Head {h00=0x0010, h01=0x0050, text=»SPINF8 PROC «, t00=0x002a, t01=0x00e0}
0x4288…42a4 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x002a, t01=0x00f4}
0x42a4…42ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0110}
0x42ae…42e0 Head {h00=0x002e, h01=0x0050, text=»* SPINF8 - WRITE INF ON LAST LINE«, t00=0x002a, t01=0x011a}
0x42e0…42ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x014c}
0x42ea…4306 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x002a, t01=0x0156}
0x4306…4326 Head {h00=0x001c, h01=0x0050, text=» PERF SPLIN8,CBIN4,CBIN2«, t00=0x002a, t01=0x0172}
0x4326…4332 (43, 0, 400) Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x002b, t01=0x0004}
0x4332…4340 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x002b, t01=0x0010}
0x4340…434a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x001e}
0x434a…4354 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0028}
0x4354…4362 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002b, t01=0x0032}
0x4362…438e Head {h00=0x0028, h01=0x0050, text=»************************************«, t00=0x002b, t01=0x0040}
0x438e…4398 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x006c}
0x4398…43c8 Head {h00=0x002c, h01=0x0050, text=»* DKTEST TEST IF DISK IS READY «, t00=0x002b, t01=0x0076}
0x43c8…43d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00a6}
0x43d2…4400 Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x002b, t01=0x00b0}
0x4400…440a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00de}
0x440a…4412 Head {h00=0x0004, h01=0x0050, t00=0x002b, t01=0x00e8}
0x4412…4426 Head {h00=0x0010, h01=0x0050, text=»DKTEST PROC «, t00=0x002b, t01=0x00f0}
0x4426…442e Head {h00=0x0004, h01=0x0050, t00=0x002b, t01=0x0104}
0x442e…4454 Head {h00=0x0022, h01=0x0050, text=»* TEST IF DISK IS SWITCHED OFF«, t00=0x002b, t01=0x010c}
0x4454…445c Head {h00=0x0004, h01=0x0050, t00=0x002b, t01=0x0132}
0x445c…4476 Head {h00=0x0016, h01=0x0050, text=» TBF CDKOFF,DKTRET«, t00=0x002b, t01=0x013a}
0x4476…4492 Head {h00=0x0018, h01=0x0050, text=» TBT GTMASTFL,DKTRET«, t00=0x002b, t01=0x0154}
0x4492…44c4 Head {h00=0x002e, h01=0x0050, text=» TBF CDUOVL,DKTRET NO KI IF DISKOVL ON DU «, t00=0x002b, t01=0x0170}
0x44c4…44cc Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x0012}
0x44cc…44ea Head {h00=0x001a, h01=0x0050, text=» MOVE SPBINW5,=X'0801'«, t00=0x002c, t01=0x001a}
0x44ea…4508 Head {h00=0x001a, h01=0x0050, text=» DSC1 SCREEN,6,SPBINW5«, t00=0x002c, t01=0x0038}
0x4508…4532 Head {h00=0x0026, h01=0x0050, text=» EDWRT .NW,SCREEN,SPFTBMES(CBIN11)«, t00=0x002c, t01=0x0056}
0x4532…453a Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x0080}
0x453a…4548 Head {h00=0x000a, h01=0x0050, text=»DKT10 «, t00=0x002c, t01=0x0088}
0x4548…455e Head {h00=0x0012, h01=0x0050, text=» DELAY CBIN10 «, t00=0x002c, t01=0x0096}
0x455e…4578 Head {h00=0x0016, h01=0x0050, text=» TBT CDKOFF,DKT10 «, t00=0x002c, t01=0x00ac}
0x4578…458c Head {h00=0x0010, h01=0x0050, text=» PERF CLEAR8«, t00=0x002c, t01=0x00c6}
0x458c…45a8 Head {h00=0x0018, h01=0x0050, text=» CMP CBIN1,CBIN0 NOK«, t00=0x002c, t01=0x00da}
0x45a8…45b4 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x002c, t01=0x00f6}
0x45b4…45bc Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x0102}
0x45bc…45ca Head {h00=0x000a, h01=0x0050, text=»DKTRET«, t00=0x002c, t01=0x010a}
0x45ca…45e6 Head {h00=0x0018, h01=0x0050, text=» CMP CBIN0,CBIN0 OK «, t00=0x002c, t01=0x0118}
0x45e6…45f2 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x002c, t01=0x0134}
0x45f2…45fa Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x0140}
0x45fa…4608 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x002c, t01=0x0148}
0x4608…4612 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0156}
0x4612…461c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0160}
0x461c…4624 Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x016a}
0x4624…4630 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x002c, t01=0x0172}
0x4630…4634 Head {h00=0x4004, h01=0x0000}
0x4634…4638 00 2c 01 7e ┆ , ~┆
0x4638…4640 (45, 1, 8) 20 04 00 00 00 2d 00 04 ┆ - ┆
0x4640…4690 (46, 0, 400) 00 0e 00 50 20 42 20 41 44 4d 52 45 54 20 00 3e 00 04 00 06 00 50 2a 20 00 3e 00 16 00 0a 00 50 41 44 4d 32 34 20 00 3e 00 20 00 12 00 50 2a 20 4b 4f 4e 54 4f 4b 4f 52 54 20 2a 20 00 3e 00 2e 00 0e 00 50 20 50 45 52 46 20 4b 4f 52 54 00 3e ┆ P B ADMRET > P* > PADM24 > P* KONTOKORT * > . P PERF KORT >┆
0x4690…46e0 00 44 00 0e 00 50 20 42 20 41 44 4d 52 45 54 20 00 3e 00 56 00 06 00 50 2a 20 00 3e 00 68 00 0a 00 50 41 44 4d 32 35 20 00 3e 00 72 00 10 00 50 2a 20 52 45 43 45 49 50 54 20 2a 20 00 3e 00 80 00 0e 00 50 20 50 45 52 46 20 4b 56 49 54 00 3e ┆ D P B ADMRET > V P* > h PADM25 > r P* RECEIPT * > P PERF KVIT >┆
0x46e0…4730 00 94 00 0e 00 50 20 42 20 41 44 4d 52 45 54 20 00 3e 00 a6 00 06 00 50 2a 20 00 3e 00 b8 00 0a 00 50 41 44 4d 32 36 20 00 3e 00 c2 00 12 00 50 2a 20 53 55 4d 4d 41 52 49 5a 45 20 2a 20 00 3e 00 d0 00 0e 00 50 20 50 45 52 46 20 53 55 4d 20 ┆ P B ADMRET > P* > PADM26 > P* SUMMARIZE * > P PERF SUM ┆
0x4730…4780 00 3e 00 e6 00 0e 00 50 20 42 20 41 44 4d 52 45 54 20 00 3e 00 f8 00 06 00 50 2a 20 00 3e 01 0a 00 0a 00 50 41 44 4d 32 37 20 00 3e 01 14 00 0e 00 50 2a 20 4c 49 53 54 45 20 2a 20 00 3e 01 22 00 10 00 50 20 50 45 52 46 20 4c 53 54 49 4e 54 ┆ > P B ADMRET > P* > PADM27 > P* LISTE * > " P PERF LSTINT┆
0x4780…47d0 00 3e 01 34 00 0e 00 50 20 42 20 41 44 4d 52 45 54 20 00 3e 01 48 00 06 00 50 2a 20 00 3e 01 5a 00 0a 00 50 41 44 4d 32 38 20 00 3e 01 64 00 10 00 50 2a 20 53 55 42 54 4f 54 41 4c 20 2a 00 3e 01 72 00 10 00 50 20 50 45 52 46 20 53 55 42 54 ┆ > 4 P B ADMRET > H P* > Z PADM28 > d P* SUBTOTAL * > r P PERF SUBT┆
0x47d0…4820 (47, 0, 400) 4f 54 00 3e 01 86 00 0e 00 50 20 42 20 41 44 4d 52 45 54 20 00 3f 00 0a 00 06 00 50 2a 20 00 3f 00 1c 00 0a 00 50 41 44 4d 32 39 20 00 3f 00 26 00 18 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 3f 00 34 00 06 00 50 ┆OT > P B ADMRET ? P* ? PADM29 ? & P******************** ? 4 P┆
0x4820…4870 2a 20 00 3f 00 50 00 24 00 50 2a 20 20 20 20 20 20 20 20 20 20 54 45 53 54 20 50 52 49 4e 54 20 4f 4e 20 56 4f 55 43 48 45 52 00 3f 00 5a 00 06 00 50 2a 20 00 3f 00 82 00 18 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆* ? P $ P* TEST PRINT ON VOUCHER ? Z P* ? P********************┆
0x4870…48c0 00 3f 00 8c 00 1e 00 50 20 44 53 43 30 20 4b 56 4f 55 43 48 2c 52 4c 45 41 53 20 52 4c 45 41 53 45 20 00 3f 00 a8 00 2c 00 50 20 50 45 52 46 20 53 50 4c 49 4e 38 2c 43 42 49 4e 35 2c 43 42 49 4e 32 20 41 53 4b 20 46 4f 52 20 27 42 49 4c 41 ┆ ? P DSC0 KVOUCH,RLEAS RLEASE ? , P PERF SPLIN8,CBIN5,CBIN2 ASK FOR 'BILA┆
0x48c0…4910 47 27 00 3f 00 ca 00 1a 00 50 20 50 45 52 46 20 47 52 41 53 50 56 20 41 4e 44 20 47 52 41 53 50 00 3f 00 fa 00 10 00 50 20 50 45 52 46 20 43 4c 45 41 52 38 00 3f 01 18 00 1a 00 50 20 4d 4f 56 45 20 47 53 57 42 49 4e 31 2c 43 56 4f 55 54 4f ┆G' ? P PERF GRASPV AND GRASP ? P PERF CLEAR8 ? P MOVE GSWBIN1,CVOUTO┆
0x4910…4960 50 20 00 3f 01 2c 00 0c 00 50 41 44 4d 32 39 31 30 20 00 3f 01 4a 00 20 00 50 20 43 42 4c 20 47 53 57 42 49 4e 31 2c 43 42 49 4e 36 2c 41 44 4d 32 39 52 45 54 20 00 3f 01 5a 00 2e 00 50 20 44 53 43 31 20 4b 56 4f 55 43 48 2c 50 4f 53 2c 47 ┆P ? , PADM2910 ? J P CBL GSWBIN1,CBIN6,ADM29RET ? Z . P DSC1 KVOUCH,POS,G┆
0x4960…49b0 (48, 0, 400) 53 57 42 49 4e 31 20 50 4f 53 49 54 49 4f 4e 20 4f 4e 20 4c 49 4e 45 20 00 3f 01 7e 00 22 00 50 20 50 45 52 46 20 46 52 4d 58 56 4f 2c 43 42 49 4e 31 36 20 47 45 54 20 46 4f 52 4d 41 54 00 40 00 20 00 20 00 50 20 45 44 57 52 54 20 4b 56 4f ┆SWBIN1 POSITION ON LINE ? ~ " P PERF FRMXVO,CBIN16 GET FORMAT @ P EDWRT KVO┆
0x49b0…4a00 55 43 48 2c 47 54 53 54 52 46 4d 54 20 50 52 49 4e 54 00 40 00 46 00 16 00 50 20 53 55 42 20 47 53 57 42 49 4e 31 2c 43 42 49 4e 38 00 40 00 6a 00 0e 00 50 20 42 20 41 44 4d 32 39 31 30 00 40 00 84 00 0c 00 50 41 44 4d 32 39 52 45 54 00 40 ┆UCH,GTSTRFMT PRINT @ F P SUB GSWBIN1,CBIN8 @ j P B ADM2910 @ PADM29RET @┆
0x4a00…4a50 00 96 00 16 00 50 20 44 53 43 30 20 4b 56 4f 55 43 48 2c 52 4c 45 41 53 00 40 00 a6 00 0e 00 50 20 42 20 41 44 4d 52 45 54 20 00 40 00 c0 00 06 00 50 2a 20 00 40 00 d2 00 0a 00 50 41 44 4d 33 30 20 00 40 00 dc 00 10 00 50 2a 20 43 59 43 4c ┆ P DSC0 KVOUCH,RLEAS @ P B ADMRET @ P* @ PADM30 @ P* CYCL┆
0x4a50…4aa0 45 20 45 4e 44 20 00 40 00 ea 00 14 00 50 20 50 45 52 46 20 43 59 4b 2c 43 42 49 4e 31 30 00 40 00 fe 00 0e 00 50 20 42 20 41 44 4d 52 45 54 20 00 40 01 16 00 06 00 50 2a 20 00 40 01 28 00 0a 00 50 41 44 4d 33 31 20 00 40 01 32 00 14 00 50 ┆E END @ P PERF CYK,CBIN10 @ P B ADMRET @ P* @ ( PADM31 @ 2 P┆
0x4aa0…4af0 2a 20 43 59 43 4c 45 20 53 54 41 52 54 20 2a 20 00 40 01 40 00 14 00 50 20 50 45 52 46 20 43 59 4b 2c 43 42 49 4e 31 20 00 40 01 58 00 0e 00 50 20 42 20 41 44 4d 52 45 54 20 00 40 01 70 00 06 00 50 2a 20 00 40 01 82 00 0a 00 50 41 44 4d 33 ┆* CYCLE START * @ @ P PERF CYK,CBIN1 @ X P B ADMRET @ p P* @ PADM3┆
0x4af0…4b40 (49, 0, 400) 32 20 00 40 01 8c 00 14 00 50 2a 20 53 54 41 42 45 4c 20 53 54 41 52 54 20 2a 00 41 00 0a 00 14 00 50 20 50 45 52 46 20 43 59 4b 2c 43 42 49 4e 32 20 00 41 00 22 00 0e 00 50 20 42 20 41 44 4d 52 45 54 20 00 41 00 3a 00 06 00 50 2a 20 00 41 ┆2 @ P* STABEL START * A P PERF CYK,CBIN2 A " P B ADMRET A : P* A┆
0x4b40…4b90 00 4c 00 0a 00 50 41 44 4d 33 33 20 00 41 00 56 00 0e 00 50 2a 20 44 55 4d 4d 59 20 2a 20 00 41 00 64 00 0e 00 50 5c 42 5c 41 44 4d 52 45 54 20 00 41 00 76 00 06 00 50 2a 20 00 41 00 88 00 0a 00 50 41 44 4d 33 34 20 00 41 00 92 00 24 00 50 ┆ L PADM33 A V P* DUMMY * A d P B ADMRET A v P* A PADM34 A $ P┆
0x4b90…4be0 2a 20 34 2d 43 59 43 4c 45 2c 20 50 41 55 53 45 20 49 4e 20 43 59 43 4c 45 2c 53 54 41 42 45 4c 00 41 00 a0 00 14 00 50 20 50 45 52 46 20 43 59 4b 2c 43 42 49 4e 34 20 00 41 00 c8 00 0e 00 50 5c 42 5c 41 44 4d 52 45 54 20 00 41 00 e0 00 06 ┆* 4-CYCLE, PAUSE IN CYCLE,STABEL A P PERF CYK,CBIN4 A P B ADMRET A ┆
0x4be0…4c30 00 50 2a 20 00 41 00 f2 00 0a 00 50 41 44 4d 33 35 20 00 41 00 fc 00 1c 00 50 2a 20 56 41 52 49 4f 55 53 20 54 52 41 4e 53 41 43 54 49 4f 4e 53 20 2a 00 41 01 0a 00 10 00 50 20 50 45 52 46 20 44 49 56 54 52 20 00 41 01 2a 00 0e 00 50 20 42 ┆ P* A PADM35 A P* VARIOUS TRANSACTIONS * A P PERF DIVTR A * P B┆
0x4c30…4c80 20 41 44 4d 52 45 54 20 00 41 01 3e 00 06 00 50 2a 20 00 41 01 50 00 06 00 50 2a 20 00 41 01 5a 00 0a 00 50 41 44 4d 34 35 20 00 41 01 64 00 1a 00 50 2a 20 20 45 4c 45 4b 54 52 4f 4e 49 53 4b 20 4a 4f 55 52 4e 41 4c 00 41 01 72 00 0e 00 50 ┆ ADMRET A > P* A P P* A Z PADM45 A d P* ELEKTRONISK JOURNAL A r P┆
0x4c80…4cd0 (50, 0, 400) 20 42 20 41 34 35 45 4c 4a 20 00 41 01 90 00 06 00 50 2a 20 00 42 00 12 00 06 00 50 2a 20 00 42 00 1c 00 06 00 50 2a 20 00 42 00 26 00 06 00 50 2a 20 00 42 00 30 00 1e 00 50 2a 20 20 20 20 20 45 4e 44 20 4f 46 20 41 44 4d 20 46 55 4e 43 54 ┆ B A45ELJ A P* B P* B P* B & P* B 0 P* END OF ADM FUNCT┆
0x4cd0…4d20 49 4f 4e 53 00 42 00 3a 00 06 00 50 2a 20 00 42 00 5c 00 0a 00 50 41 44 4d 52 45 54 00 42 00 66 00 08 00 50 20 52 45 54 00 42 00 74 00 0a 00 50 20 50 45 4e 44 20 00 42 00 80 00 04 00 50 00 42 00 8e 00 04 00 50 00 42 00 96 00 0a 00 50 20 45 ┆IONS B : P* B PADMRET B f P RET B t P PEND B P B P B P E┆
0x4d20…4d70 4a 45 43 54 00 42 00 9e 00 06 00 50 2a 20 00 42 00 ac 00 06 00 50 2a 20 00 42 00 b6 00 36 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆JECT B P* B P* B 6 P************************************************┆
0x4d70…4dc0 2a 20 00 42 00 c0 00 06 00 50 2a 20 00 42 00 fa 00 16 00 50 2a 20 20 20 20 20 20 20 20 20 46 4f 52 4d 41 54 53 20 00 42 01 04 00 06 00 50 2a 20 00 42 01 1e 00 36 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆* B P* B P* FORMATS B P* B 6 P************************┆
0x4dc0…4e10 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 42 01 28 00 06 00 50 2a 20 00 42 01 62 00 10 00 50 46 4d 54 46 4b 49 20 46 52 4d 54 20 00 42 01 6c 00 08 00 50 20 46 4e 4c 00 42 01 80 00 0a 00 50 20 46 4b 49 ┆************************* B ( P* B b PFMTFKI FRMT B l P FNL B P FKI┆
0x4e10…4e60 (51, 0, 400) 20 31 00 42 01 8c 00 16 00 50 20 46 4d 45 4c 20 27 42 27 2c 54 53 57 42 43 44 32 20 00 43 00 0a 00 0a 00 50 20 46 4d 45 4e 44 00 43 00 24 00 06 00 50 2a 20 00 43 00 32 00 10 00 50 4b 4f 4e 46 52 4d 54 20 46 52 4d 54 00 43 00 3c 00 08 00 50 ┆ 1 B P FMEL 'B',TSWBCD2 C P FMEND C $ P* C 2 PKONFRMT FRMT C < P┆
0x4e60…4eb0 20 46 53 4c 00 43 00 50 00 1c 00 50 20 46 43 4f 50 59 20 3d 43 27 4b 4f 4e 56 45 52 54 45 52 49 4e 47 20 27 00 43 00 5c 00 12 00 50 20 46 49 4c 4c 52 20 58 27 30 37 27 2c 31 00 43 00 7c 00 12 00 50 20 46 4c 49 4e 4b 20 46 4d 54 46 4b 49 20 ┆ FSL C P P FCOPY =C'KONVERTERING ' C P FILLR X'07',1 C | P FLINK FMTFKI ┆
0x4eb0…4f00 00 43 00 92 00 0a 00 50 20 46 4d 45 4e 44 00 43 00 a8 00 06 00 50 2a 20 00 43 00 b6 00 12 00 50 4b 4f 4e 56 34 46 4d 54 20 46 52 4d 54 20 00 43 00 c0 00 08 00 50 20 46 53 4c 00 43 00 d6 00 16 00 50 20 46 43 4f 50 59 20 3d 27 4b 4f 52 52 45 ┆ C P FMEND C P* C PKONV4FMT FRMT C P FSL C P FCOPY ='KORRE┆
0x4f00…4f50 4b 54 27 20 00 43 00 e2 00 10 00 50 20 46 49 4c 4c 52 20 27 3f 27 2c 31 00 43 00 fc 00 12 00 50 20 46 49 4c 4c 52 20 58 27 30 37 27 2c 31 00 43 01 10 00 12 00 50 20 46 4c 49 4e 4b 20 46 4d 54 46 4b 49 20 00 43 01 26 00 0a 00 50 20 46 4d 45 ┆KT' C P FILLR '?',1 C P FILLR X'07',1 C P FLINK FMTFKI C & P FME┆
0x4f50…4fa0 4e 44 00 43 01 3c 00 06 00 50 2a 20 00 43 01 4a 00 10 00 50 4f 50 45 4e 46 52 4d 20 46 52 4d 54 00 43 01 54 00 08 00 50 20 46 53 4c 00 43 01 68 00 14 00 50 20 46 43 4f 50 59 20 3d 27 41 44 4d 20 20 27 20 00 43 01 74 00 18 00 50 20 46 42 54 ┆ND C < P* C J POPENFRM FRMT C T P FSL C h P FCOPY ='ADM ' C t P FBT┆
0x4fa0…4ff0 (52, 0, 400) 20 47 54 44 59 46 4c 47 2c 4f 50 46 52 30 35 20 00 43 01 8c 00 0c 00 50 20 46 54 41 42 20 31 20 00 44 00 18 00 1a 00 50 20 46 43 4f 50 59 20 3d 43 27 4b 41 53 53 45 5d 42 4e 49 4e 47 27 00 44 00 28 00 0a 00 50 4f 50 46 52 30 35 00 44 00 46 ┆ GTDYFLG,OPFR05 C P FTAB 1 D P FCOPY =C'KASSE]BNING' D ( POPFR05 D F┆
0x4ff0…5040 00 08 00 50 20 46 4e 4c 00 44 00 54 00 18 00 50 20 46 42 46 20 47 54 4d 41 53 54 46 4c 2c 4f 50 46 52 31 30 00 44 00 60 00 18 00 50 20 46 43 4f 50 59 20 3d 43 27 44 41 47 53 2d 44 41 54 4f 27 00 44 00 7c 00 2e 00 50 20 46 4b 49 20 31 31 2c ┆ P FNL D T P FBF GTMASTFL,OPFR10 D ` P FCOPY =C'DAGS-DATO' D | . P FKI 11,┆
0x5040…5090 4d 49 4e 4c 3d 36 2c 4d 41 58 4c 3d 36 2c 4d 45 2c 53 43 48 4b 3d 32 2c 52 45 57 52 54 2c 4e 43 4c 52 00 44 00 98 00 20 00 50 20 46 4d 45 4c 20 27 39 39 45 2d 39 39 45 2d 39 39 27 2c 43 4d 41 53 4b 44 41 54 20 00 44 00 ca 00 08 00 50 20 46 ┆MINL=6,MAXL=6,ME,SCHK=2,REWRT,NCLR D P FMEL '99E-99E-99',CMASKDAT D P F┆
0x5090…50e0 4e 4c 00 44 00 ee 00 16 00 50 20 46 43 4f 50 59 20 3d 43 27 44 41 47 20 4e 52 27 20 00 44 00 fa 00 26 00 50 20 46 4b 49 20 31 31 2c 4d 49 4e 4c 3d 31 2c 4d 41 58 4c 3d 33 2c 4d 45 2c 41 50 50 4c 3d 31 30 32 20 00 44 01 14 00 18 00 50 20 46 ┆NL D P FCOPY =C'DAG NR' D & P FKI 11,MINL=1,MAXL=3,ME,APPL=102 D P F┆
0x50e0…5130 4d 45 4c 20 27 5a 5a 5a 27 2c 43 52 45 4c 44 41 59 20 00 44 01 3e 00 08 00 50 20 46 4e 4c 00 44 01 5a 00 0a 00 50 4f 50 46 52 31 30 00 44 01 66 00 18 00 50 20 46 43 4f 50 59 20 3d 27 50 4f 53 54 2d 44 41 54 4f 27 20 00 44 01 74 00 32 00 50 ┆MEL 'ZZZ',CRELDAY D > P FNL D Z POPFR10 D f P FCOPY ='POST-DATO' D t 2 P┆