|
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: 17362 (0x43d2)
Notes: pts_type(SC)
Names: »SCREEN.SC«
└─⟦9ad21746d⟧ Bits:30009682 Philips computer tape "600304"
└─⟦this⟧ »NJ-AMT/SCREEN.SC«
IDENT SCREEN 02.01.XXX.1 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 * 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 EMPTYT ASSEMBLY SUBROUTINE EMPTYT - TEST IF DATA ITEM IS EMPTY EXT CLEAR8 * INCLUDE KY6272,LIST * FIRST INCLUDE KEY VALUES, * THEN INCLUDE SPECIAL SCREEN FORMATS INCLUDE SL6272,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 * PERF SCREEN,=W'0' 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 CMP SPBINW2,=W'0' BE RETUR POWER OFF BG DYK20 NORMAL ADD SPBINW2,=W'9' KEYSWITCH TURNED IB SPBINW2, C SET1,SET2,SET3,SET4,CLR1,CLR2,CLR3,CLR4 B RETUR SET1 SET TTKEY1 B DYKIN SET2 SET TTKEY2 B DYKIN SET3 SET TTKEY3 B DYKIN SET4 SET TTKEY4 B DYKIN CLR1 CLEAR TTKEY1 B DYKIN CLR2 CLEAR TTKEY2 B DYKIN CLR3 CLEAR TTKEY3 B DYKIN CLR4 CLEAR TTKEY4 B DYKIN * * DYK20 * TBF TTKEY1,DYKRET KEYBOARD OFF IB SPKEY,DYK30,DYK40,DYK50 DYK30 TBF TTKEY2,DYK80 KEYPOS 1 B DYKRET DYK40 TBT TTKEY2,DYK80 KEYPOS 2 DYKRET PERF BELL B SETCREAD DYK50 DYK80 * 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 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 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 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 * ******************* MOVE SPBINW1,=X'0801' DSC1 SCREEN,6,SPBINW1 SET CURSOR ON LAST ROW MOVE SPBINW1,CBIN0 EDWRT SCREEN,SPFTBMES(WRTMES) 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 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 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 * * * END
0x0000…0022 (0, 0, 400) Head {h00=0x001e, h01=0x0050, text=» IDENT SCREEN 02.01.XXX.1«, t00=0x0000, t01=0x0004}
0x0022…0046 Head {h00=0x0020, h01=0x0050, text=» 1.1,78-04-20,870138040310«, t00=0x0000, t01=0x0026}
0x0046…0050 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x004a}
0x0050…0080 Head {h00=0x002c, h01=0x0050, text=»* A STANDARD PROGRAM PACKAGE HANDLING«, t00=0x0000, t01=0x0054}
0x0080…00b4 Head {h00=0x0030, h01=0x0050, text=»* A COMPLETE PICTURE ON A DISPLAY SCREEN «, t00=0x0000, t01=0x0084}
0x00b4…00be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00b8}
0x00be…00ea Head {h00=0x0028, h01=0x0050, text=»* RUNNING UNDER: CREDIT REL 3.1 «, t00=0x0000, t01=0x00c2}
0x00ea…0116 Head {h00=0x0028, h01=0x0050, text=»* TOSS REL 8.1 «, t00=0x0000, t01=0x00ee}
0x0116…0120 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x011a}
0x0120…0134 Head {h00=0x0010, h01=0x0050, text=» DDUM KMD08 «, t00=0x0000, t01=0x0124}
0x0134…0142 Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x0000, t01=0x0138}
0x0142…014c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0146}
0x014c…017c Head {h00=0x002c, h01=0x0050, text=» ENTRY SPCLRA CLEAR ALL VARIABLE FIELDS «, t00=0x0000, t01=0x0150}
0x017c…01ac Head {h00=0x002c, h01=0x0050, text=» ENTRY SPCLRS CLEAR SOME VARIABLE FIELDS«, t00=0x0000, t01=0x0180}
0x01ac…01da Head {h00=0x002a, h01=0x0050, text=» ENTRY SPCLRN CLEAR NO VARIABLE FIELDS«, t00=0x0001, t01=0x0020}
0x01da…0206 Head {h00=0x0028, h01=0x0050, text=» ENTRY SPERR DISPLAY ERROR PRINTOUT «, t00=0x0001, t01=0x004e}
0x0206…0226 Head {h00=0x001c, h01=0x0050, text=» AND CONTINUE HANDLING«, t00=0x0001, t01=0x007a}
0x0226…024e Head {h00=0x0024, h01=0x0050, text=» ENTRY SPLIN8 MESSAGE ON LINE 8 «, t00=0x0001, t01=0x009a}
0x024e…026e Head {h00=0x001c, h01=0x0050, text=» ENTRY SPCA AS SPCLRA-- «, t00=0x0001, t01=0x00c2}
0x026e…028e Head {h00=0x001c, h01=0x0050, text=» ENTRY SPCN AS SPCLRN-- «, t00=0x0001, t01=0x00e2}
0x028e…02b6 Head {h00=0x0024, h01=0x0050, text=» SPCA AND SPCN ARE ONLY ACTIVE«, t00=0x0001, t01=0x0102}
0x02b6…02ce Head {h00=0x0014, h01=0x0050, text=» BETWEEN LINES«, t00=0x0001, t01=0x012a}
0x02ce…02ee Head {h00=0x001c, h01=0x0050, text=» SPLINTOP AND SPLINLOW«, t00=0x0001, t01=0x0142}
0x02ee…0304 Head {h00=0x0012, h01=0x0050, text=» ENTRY SCREEN «, t00=0x0001, t01=0x0162}
0x0304…0330 Head {h00=0x0028, h01=0x0050, text=» ENTRY SPINF1 INFORMATION ON LINE 1 «, t00=0x0001, t01=0x0178}
0x0330…035c Head {h00=0x0028, h01=0x0050, text=» ENTRY SPINF8 INFORMATION ON LINE 8 «, t00=0x0002, t01=0x0014}
0x035c…0370 Head {h00=0x0010, h01=0x0050, text=» ENTRY BELL «, t00=0x0002, t01=0x0040}
0x0370…037a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0054}
0x037a…03aa Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK1 STANDARD CHECK ROUTINE NO. 1«, t00=0x0002, t01=0x005e}
0x03aa…03da Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK2 STANDARD CHECK ROUTINE NO. 2«, t00=0x0002, t01=0x008e}
0x03da…040a Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK3 STANDARD CHECK ROUTINE NO. 3«, t00=0x0002, t01=0x00be}
0x040a…043a Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK4 STANDARD CHECK ROUTINE NO. 4«, t00=0x0002, t01=0x00ee}
0x043a…046a Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK5 STANDARD CHECK ROUTINE NO.5 «, t00=0x0002, t01=0x011e}
0x046a…049a Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK6 STANDARD CHECK ROUTINE NO. 6«, t00=0x0002, t01=0x014e}
0x049a…04ca Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK7 STANDARD CHECK ROUTINE NO. 7«, t00=0x0002, t01=0x017e}
0x04ca…04f4 Head {h00=0x0026, h01=0x0050, text=» EXT SPAPPL USER ROUTINE TO HANDLE«, t00=0x0003, t01=0x001e}
0x04f4…050a Head {h00=0x0012, h01=0x0050, text=» APPL VALUES«, t00=0x0003, t01=0x0048}
0x050a…0536 Head {h00=0x0028, h01=0x0050, text=» EXT SPTCHK USER ROUTINE TO EVALUATE«, t00=0x0003, t01=0x005e}
0x0536…0558 Head {h00=0x001e, h01=0x0050, text=» CONDITIONAL TABULATION «, t00=0x0003, t01=0x008a}
0x0558…0562 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00ac}
0x0562…0594 Head {h00=0x002e, h01=0x0050, text=» EXT EMPTYT ASSEMBLY SUBROUTINE EMPTYT - «, t00=0x0003, t01=0x00b6}
0x0594…05ba Head {h00=0x0022, h01=0x0050, text=» TEST IF DATA ITEM IS EMPTY «, t00=0x0003, t01=0x00e8}
0x05ba…05ce Head {h00=0x0010, h01=0x0050, text=» EXT CLEAR8 «, t00=0x0003, t01=0x010e}
0x05ce…05d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0122}
0x05d8…05f4 Head {h00=0x0018, h01=0x0050, text=» INCLUDE KY6272,LIST«, t00=0x0003, t01=0x012c}
0x05f4…061c Head {h00=0x0024, h01=0x0050, text=»* FIRST INCLUDE KEY VALUES, «, t00=0x0003, t01=0x0148}
0x061c…064e Head {h00=0x002e, h01=0x0050, text=»* THEN INCLUDE SPECIAL SCREEN FORMATS «, t00=0x0003, t01=0x0170}
0x064e…066a Head {h00=0x0018, h01=0x0050, text=» INCLUDE SL6272,LIST«, t00=0x0004, t01=0x0012}
0x066a…0678 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x002e}
0x0678…068c Head {h00=0x0010, h01=0x0050, text=»SPCLRA PROC «, t00=0x0004, t01=0x003c}
0x068c…0696 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0050}
0x0696…06de Head {h00=0x0044, h01=0x0050, text=»* SPCLRA - CLEAR ALL VARABLE FIELDS BEFORE HANDLING THE PICTURE «, t00=0x0004, t01=0x005a}
0x06de…06e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00a2}
0x06e8…0704 Head {h00=0x0018, h01=0x0050, text=» MOVE SPERASE,=W'0' «, t00=0x0004, t01=0x00ac}
0x0704…072e Head {h00=0x0026, h01=0x0050, text=» MOVE SPLINTOP,=W'1' WHOLE SCREEN «, t00=0x0004, t01=0x00c8}
0x072e…074a Head {h00=0x0018, h01=0x0050, text=» MOVE SPLINLOW,=W'0'«, t00=0x0004, t01=0x00f2}
0x074a…0764 Head {h00=0x0016, h01=0x0050, text=» PERF SCREEN,=W'1'«, t00=0x0004, t01=0x010e}
0x0764…0770 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0004, t01=0x0128}
0x0770…077e Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0004, t01=0x0134}
0x077e…0792 Head {h00=0x0010, h01=0x0050, text=»SPCLRS PROC «, t00=0x0004, t01=0x0142}
0x0792…079c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0156}
0x079c…07e6 Head {h00=0x0046, h01=0x0050, text=»* SPCLRS - CLEAR SOME VARIABLE FIELDS BEFORE HANDLING THE PICTURE «, t00=0x0004, t01=0x0160}
0x07e6…07f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x001a}
0x07f0…080c Head {h00=0x0018, h01=0x0050, text=» MOVE SPERASE,=W'0' «, t00=0x0005, t01=0x0024}
0x080c…0836 Head {h00=0x0026, h01=0x0050, text=» MOVE SPLINTOP,=W'1' WHOLE SCREEN «, t00=0x0005, t01=0x0040}
0x0836…0852 Head {h00=0x0018, h01=0x0050, text=» MOVE SPLINLOW,=W'0'«, t00=0x0005, t01=0x006a}
0x0852…086c Head {h00=0x0016, h01=0x0050, text=» PERF SCREEN,=W'2'«, t00=0x0005, t01=0x0086}
0x086c…0878 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0005, t01=0x00a0}
0x0878…0886 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0005, t01=0x00ac}
0x0886…089a Head {h00=0x0010, h01=0x0050, text=»SPCLRN PROC «, t00=0x0005, t01=0x00ba}
0x089a…08a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00ce}
0x08a4…08ec Head {h00=0x0044, h01=0x0050, text=»* SPCLRN - CLEAR NO VARIABLE FIELDS BEFORE HANDLING THE PICTURE «, t00=0x0005, t01=0x00d8}
0x08ec…08f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0120}
0x08f6…0912 Head {h00=0x0018, h01=0x0050, text=» MOVE SPERASE,=W'0' «, t00=0x0005, t01=0x012a}
0x0912…093c Head {h00=0x0026, h01=0x0050, text=» MOVE SPLINTOP,=W'1' WHOLE SCREEN «, t00=0x0005, t01=0x0146}
0x093c…0958 Head {h00=0x0018, h01=0x0050, text=» MOVE SPLINLOW,=W'0'«, t00=0x0005, t01=0x0170}
0x0958…0972 Head {h00=0x0016, h01=0x0050, text=» PERF SCREEN,=W'3'«, t00=0x0005, t01=0x018c}
0x0972…097e Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0006, t01=0x0016}
0x097e…098c Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0006, t01=0x0022}
0x098c…099e Head {h00=0x000e, h01=0x0050, text=»SPERR PROC«, t00=0x0006, t01=0x0030}
0x099e…09a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0042}
0x09a8…09dc Head {h00=0x0030, h01=0x0050, text=»* HANDLE ERRORS DETECTED OUTSIDE THE PACKAGE«, t00=0x0006, t01=0x004c}
0x09dc…09e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0080}
0x09e6…0a00 Head {h00=0x0016, h01=0x0050, text=» PERF SCREEN,=W'0'«, t00=0x0006, t01=0x008a}
0x0a00…0a0c Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0006, t01=0x00a4}
0x0a0c…0a1a Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0006, t01=0x00b0}
0x0a1a…0a2c Head {h00=0x000e, h01=0x0050, text=»SPCA PROC «, t00=0x0006, t01=0x00be}
0x0a2c…0a36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00d0}
0x0a36…0a7e Head {h00=0x0044, h01=0x0050, text=»* SPCA - AS SPCLRA, BUT ONLY BETWEEN LINES SPLINTOPAND SPLINLOW «, t00=0x0006, t01=0x00da}
0x0a7e…0a88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0122}
0x0a88…0aa4 Head {h00=0x0018, h01=0x0050, text=» MOVE SPERASE,=W'4' «, t00=0x0006, t01=0x012c}
0x0aa4…0abe Head {h00=0x0016, h01=0x0050, text=» PERF SCREEN,=W'1'«, t00=0x0006, t01=0x0148}
0x0abe…0aca Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0006, t01=0x0162}
0x0aca…0ad8 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0006, t01=0x016e}
0x0ad8…0aea Head {h00=0x000e, h01=0x0050, text=»SPCN PROC «, t00=0x0006, t01=0x017c}
0x0aea…0af4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x018e}
0x0af4…0b3c Head {h00=0x0044, h01=0x0050, text=»* SPCN - AS SPCLRN, BUT ONLY BETWEEN LINES SPLINTOP AND SPLINLOW«, t00=0x0007, t01=0x0008}
0x0b3c…0b46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0050}
0x0b46…0b62 Head {h00=0x0018, h01=0x0050, text=» MOVE SPERASE,=W'4' «, t00=0x0007, t01=0x005a}
0x0b62…0b7c Head {h00=0x0016, h01=0x0050, text=» PERF SCREEN,=W'3'«, t00=0x0007, t01=0x0076}
0x0b7c…0b88 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0007, t01=0x0090}
0x0b88…0b96 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0007, t01=0x009c}
0x0b96…0ba4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x00aa}
0x0ba4…0bbc Head {h00=0x0014, h01=0x0050, text=»SCREEN PROC $OPT«, t00=0x0007, t01=0x00b8}
0x0bbc…0bc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00d0}
0x0bc6…0bee Head {h00=0x0024, h01=0x0050, text=»* SCREEN SCREEN HANDLING MODULE «, t00=0x0007, t01=0x00da}
0x0bee…0bf8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0102}
0x0bf8…0c1a Head {h00=0x001e, h01=0x0050, text=»* CALL: PERF SCREEN,<$OPT>«, t00=0x0007, t01=0x010c}
0x0c1a…0c24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x012e}
0x0c24…0c46 Head {h00=0x001e, h01=0x0050, text=» PLIT $OPT OPTIO SELECTOR «, t00=0x0007, t01=0x0138}
0x0c46…0c4e Head {h00=0x0004, h01=0x0050, t00=0x0007, t01=0x015a}
0x0c4e…0c78 Head {h00=0x0026, h01=0x0050, text=» CLEAR SPWARNFL CLEAR WARNING FLAG«, t00=0x0007, t01=0x0162}
0x0c78…0ca4 Head {h00=0x0028, h01=0x0050, text=» MOVE SPBINW2,$OPT MOVE TO VARIABLE «, t00=0x0007, t01=0x018c}
0x0ca4…0cca Head {h00=0x0022, h01=0x0050, text=» TO ALLOW INSTR.S CMP AND IB«, t00=0x0008, t01=0x0028}
0x0cca…0cf4 Head {h00=0x0026, h01=0x0050, text=» CMP SPBINW2,='0' "SPERR" ENTRY ? «, t00=0x0008, t01=0x004e}
0x0cf4…0d0e Head {h00=0x0016, h01=0x0050, text=» BE ERRPRINT YES !«, t00=0x0008, t01=0x0078}
0x0d0e…0d16 Head {h00=0x0004, h01=0x0050, t00=0x0008, t01=0x0092}
0x0d16…0d48 Head {h00=0x002e, h01=0x0050, text=» TBT SPPROMPT,ENTIRE JUMP IF ENTIRE FORMAT«, t00=0x0008, t01=0x009a}
0x0d48…0d66 Head {h00=0x001a, h01=0x0050, text=» SHOULD BE DISPLAYED«, t00=0x0008, t01=0x00cc}
0x0d66…0d70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00ea}
0x0d70…0d92 Head {h00=0x001e, h01=0x0050, text=»* ONLY VARIABLE FIELDS «, t00=0x0008, t01=0x00f4}
0x0d92…0d9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0116}
0x0d9c…0dd8 Head {h00=0x0038, h01=0x0050, text=» IB SPBINW2,CLEARA,CLEARS,CONT JUMP ON ROUTINE INDEX«, t00=0x0008, t01=0x0120}
0x0dd8…0de2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x015c}
0x0de2…0df0 Head {h00=0x000a, h01=0x0050, text=»CLEARA«, t00=0x0008, t01=0x0166}
0x0df0…0e2c Head {h00=0x0038, h01=0x0050, text=» ERASE 10,SPLINTOP,SPLINLOW ERASE ALL FROM 1 AND UP «, t00=0x0008, t01=0x0174}
0x0e2c…0e3a Head {h00=0x000a, h01=0x0050, text=» THOME«, t00=0x0009, t01=0x0020}
0x0e3a…0e4a Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x0009, t01=0x002e}
0x0e4a…0e54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x003e}
0x0e54…0e62 Head {h00=0x000a, h01=0x0050, text=»CLEARS«, t00=0x0009, t01=0x0048}
0x0e62…0e9e Head {h00=0x0038, h01=0x0050, text=» ERASE 5,SPLINTOP,SPLINLOW ERASE SOME FROM 1 AND UP «, t00=0x0009, t01=0x0056}
0x0e9e…0eae Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x0009, t01=0x0092}
0x0eae…0ebc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x00a2}
0x0ebc…0ec6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00b0}
0x0ec6…0ee8 Head {h00=0x001e, h01=0x0050, text=»* DISPLAY ENTIRE FORMAT«, t00=0x0009, t01=0x00ba}
0x0ee8…0ef2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00dc}
0x0ef2…0f00 Head {h00=0x000a, h01=0x0050, text=»ENTIRE«, t00=0x0009, t01=0x00e6}
0x0f00…0f3c Head {h00=0x0038, h01=0x0050, text=» IB SPBINW2,ECLRA,ECLRS,ECLRN JUMP ON ROUTINE INDEX «, t00=0x0009, t01=0x00f4}
0x0f3c…0f46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0130}
0x0f46…0f66 Head {h00=0x001c, h01=0x0050, text=»* CLEAR ALL VARIABLES«, t00=0x0009, t01=0x013a}
0x0f66…0f70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x015a}
0x0f70…0f7e Head {h00=0x000a, h01=0x0050, text=»ECLRA «, t00=0x0009, t01=0x0164}
0x0f7e…0fac Head {h00=0x002a, h01=0x0050, text=» ERASE 11,SPLINTOP,SPLINLOW CLEAR ALL «, t00=0x0009, t01=0x0172}
0x0fac…0fc0 Head {h00=0x0010, h01=0x0050, text=» IN MEMORY«, t00=0x000a, t01=0x0010}
0x0fc0…0fd0 Head {h00=0x000c, h01=0x0050, text=» B ECLRN«, t00=0x000a, t01=0x0024}
0x0fd0…0fda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0034}
0x0fda…0ffc Head {h00=0x001e, h01=0x0050, text=»* CLEAR SOME VARIABLES «, t00=0x000a, t01=0x003e}
0x0ffc…1006 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0060}
0x1006…1014 Head {h00=0x000a, h01=0x0050, text=»ECLRS «, t00=0x000a, t01=0x006a}
0x1014…104e Head {h00=0x0036, h01=0x0050, text=» ERASE 6,SPLINTOP,SPLINLOW CLEAR SOME FIELDS FROM «, t00=0x000a, t01=0x0078}
0x104e…106c Head {h00=0x001a, h01=0x0050, text=» 1 AND UP IN MEMORY «, t00=0x000a, t01=0x00b2}
0x106c…1076 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00d0}
0x1076…10a0 Head {h00=0x0026, h01=0x0050, text=»* CLEAR NO VARIABLES IN MEMORY «, t00=0x000a, t01=0x00da}
0x10a0…10aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0104}
0x10aa…10b8 Head {h00=0x000a, h01=0x0050, text=»ECLRN «, t00=0x000a, t01=0x010e}
0x10b8…10e8 Head {h00=0x002c, h01=0x0050, text=» IB SPERASE,ECLRN1,ECLRN2,ECLRN3,ECLRN4 «, t00=0x000a, t01=0x011c}
0x10e8…110c Head {h00=0x0020, h01=0x0050, text=» DISPLAY 0,SPLINTOP,SPLINLOW«, t00=0x000a, t01=0x014c}
0x110c…111c Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x000a, t01=0x0170}
0x111c…112a Head {h00=0x000a, h01=0x0050, text=»ECLRN1«, t00=0x000a, t01=0x0180}
0x112a…114e Head {h00=0x0020, h01=0x0050, text=» DISPLAY 1,SPLINTOP,SPLINLOW«, t00=0x000a, t01=0x018e}
0x114e…115e Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x000b, t01=0x0022}
0x115e…116c Head {h00=0x000a, h01=0x0050, text=»ECLRN2«, t00=0x000b, t01=0x0032}
0x116c…1190 Head {h00=0x0020, h01=0x0050, text=» DISPLAY 2,SPLINTOP,SPLINLOW«, t00=0x000b, t01=0x0040}
0x1190…11a0 Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x000b, t01=0x0064}
0x11a0…11ae Head {h00=0x000a, h01=0x0050, text=»ECLRN3«, t00=0x000b, t01=0x0074}
0x11ae…11d2 Head {h00=0x0020, h01=0x0050, text=» DISPLAY 3,SPLINTOP,SPLINLOW«, t00=0x000b, t01=0x0082}
0x11d2…11e2 Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x000b, t01=0x00a6}
0x11e2…11f0 Head {h00=0x000a, h01=0x0050, text=»ECLRN4«, t00=0x000b, t01=0x00b6}
0x11f0…1214 Head {h00=0x0020, h01=0x0050, text=» DISPLAY 4,SPLINTOP,SPLINLOW«, t00=0x000b, t01=0x00c4}
0x1214…1224 Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x000b, t01=0x00e8}
0x1224…1232 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x00f8}
0x1232…123e Head {h00=0x0008, h01=0x0050, text=»CONT«, t00=0x000b, t01=0x0106}
0x123e…1268 Head {h00=0x0026, h01=0x0050, text=» GETABX SPBINW4 GET CURRENT INDEX «, t00=0x000b, t01=0x0112}
0x1268…1294 Head {h00=0x0028, h01=0x0050, text=» BL KTHOME JUMP IF NO CURRENT FIELD «, t00=0x000b, t01=0x013c}
0x1294…12a2 Head {h00=0x000a, h01=0x0050, text=»CONT5 «, t00=0x000b, t01=0x0168}
0x12a2…12dc Head {h00=0x0036, h01=0x0050, text=» GETFLD 0,SPBINW4,SPBINW3 SEARCH CURRENT POSITION «, t00=0x000b, t01=0x0176}
0x12dc…12fe Head {h00=0x001e, h01=0x0050, text=» BZ SETCREAD JUMP IF FOUND«, t00=0x000c, t01=0x0020}
0x12fe…1324 Head {h00=0x0022, h01=0x0050, text=» BL KTHOME POSITION NOT FOUND «, t00=0x000c, t01=0x0042}
0x1324…132e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0068}
0x132e…1352 Head {h00=0x0020, h01=0x0050, text=»* COMPULSORY FIELD FOUND «, t00=0x000c, t01=0x0072}
0x1352…135c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0096}
0x135c…1386 Head {h00=0x0026, h01=0x0050, text=» MOVE SPBINW4,SPBINW3 CHANGE INDEX«, t00=0x000c, t01=0x00a0}
0x1386…13a4 Head {h00=0x001a, h01=0x0050, text=» B CONT5 SEARCH AGAIN «, t00=0x000c, t01=0x00ca}
0x13a4…13ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00e8}
0x13ae…13bc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x00f2}
0x13bc…13c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0100}
0x13c6…13f0 Head {h00=0x0026, h01=0x0050, text=»* SET CURSOR AND READ KEYBOARD «, t00=0x000c, t01=0x010a}
0x13f0…13fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0134}
0x13fa…140a Head {h00=0x000c, h01=0x0050, text=»SETCREAD«, t00=0x000c, t01=0x013e}
0x140a…1436 Head {h00=0x0028, h01=0x0050, text=» SETCUR SET CURSOR ON CURRENT FIELD«, t00=0x000c, t01=0x014e}
0x1436…143e Head {h00=0x0004, h01=0x0050, t00=0x000c, t01=0x017a}
0x143e…1448 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0182}
0x1448…1476 Head {h00=0x002a, h01=0x0050, text=»* READ TO CURRENT FIELD ON DISPLAY «, t00=0x000c, t01=0x018c}
0x1476…1480 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x002a}
0x1480…148e Head {h00=0x000a, h01=0x0050, text=»READIN«, t00=0x000d, t01=0x0034}
0x148e…14b0 Head {h00=0x001e, h01=0x0050, text=»* SET FLAG IF AUTODUP «, t00=0x000d, t01=0x0042}
0x14b0…14ce Head {h00=0x001a, h01=0x0050, text=»* USES VERIF-FIELD«, t00=0x000d, t01=0x0064}
0x14ce…14ea Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW2,=W'3' «, t00=0x000d, t01=0x0082}
0x14ea…1506 Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW1,=W'1' «, t00=0x000d, t01=0x009e}
0x1506…1518 Head {h00=0x000e, h01=0x0050, text=» TSTCTL 6 «, t00=0x000d, t01=0x00ba}
0x1518…152a Head {h00=0x000e, h01=0x0050, text=» BOK DYKIN«, t00=0x000d, t01=0x00cc}
0x152a…1540 Head {h00=0x0012, h01=0x0050, text=» SET GTADUPFL «, t00=0x000d, t01=0x00de}
0x1540…1550 Head {h00=0x000c, h01=0x0050, text=» B DYK20«, t00=0x000d, t01=0x00f4}
0x1550…155a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0104}
0x155a…1568 Head {h00=0x000a, h01=0x0050, text=»DYKIN «, t00=0x000d, t01=0x010e}
0x1568…158c Head {h00=0x0020, h01=0x0050, text=» IB SPKEY,DYK05,DYK10,DYK15 «, t00=0x000d, t01=0x011c}
0x158c…159a Head {h00=0x000a, h01=0x0050, text=»DYK05 «, t00=0x000d, t01=0x0140}
0x159a…15cc Head {h00=0x002e, h01=0x0050, text=» DYKI SPINPUT,SPKTAB1,SPKTAB2,SPBINW1, C «, t00=0x000d, t01=0x014e}
0x15cc…15e6 Head {h00=0x0016, h01=0x0050, text=» SPBINW2,SPBINW4 «, t00=0x000d, t01=0x0180}
0x15e6…15f8 Head {h00=0x000e, h01=0x0050, text=» B DYKOUT «, t00=0x000e, t01=0x000a}
0x15f8…1606 Head {h00=0x000a, h01=0x0050, text=»DYK10 «, t00=0x000e, t01=0x001c}
0x1606…163a Head {h00=0x0030, h01=0x0050, text=» DYKI SPINPUT,SPKTAB12,SPKTAB22,SPBINW1, C «, t00=0x000e, t01=0x002a}
0x163a…1654 Head {h00=0x0016, h01=0x0050, text=» SPBINW2,SPBINW4 «, t00=0x000e, t01=0x005e}
0x1654…1666 Head {h00=0x000e, h01=0x0050, text=» B DYKOUT «, t00=0x000e, t01=0x0078}
0x1666…1674 Head {h00=0x000a, h01=0x0050, text=»DYK15 «, t00=0x000e, t01=0x008a}
0x1674…16a8 Head {h00=0x0030, h01=0x0050, text=» DYKI SPINPUT,SPKTAB13,SPKTAB23,SPBINW1, C «, t00=0x000e, t01=0x0098}
0x16a8…16c2 Head {h00=0x0016, h01=0x0050, text=» SPBINW2,SPBINW4 «, t00=0x000e, t01=0x00cc}
0x16c2…16d0 Head {h00=0x000a, h01=0x0050, text=»DYKOUT«, t00=0x000e, t01=0x00e6}
0x16d0…16e8 Head {h00=0x0014, h01=0x0050, text=» BL ERRPRT ERROR«, t00=0x000e, t01=0x00f4}
0x16e8…16fe Head {h00=0x0012, h01=0x0050, text=» CLEAR SPDUPL «, t00=0x000e, t01=0x010c}
0x16fe…1718 Head {h00=0x0016, h01=0x0050, text=» CMP SPBINW2,=W'0'«, t00=0x000e, t01=0x0122}
0x1718…1734 Head {h00=0x0018, h01=0x0050, text=» BE RETUR POWER OFF «, t00=0x000e, t01=0x013c}
0x1734…174c Head {h00=0x0014, h01=0x0050, text=» BG DYK20 NORMAL«, t00=0x000e, t01=0x0158}
0x174c…1778 Head {h00=0x0028, h01=0x0050, text=» ADD SPBINW2,=W'9' KEYSWITCH TURNED «, t00=0x000e, t01=0x0170}
0x1778…1790 Head {h00=0x0014, h01=0x0050, text=» IB SPBINW2, C «, t00=0x000f, t01=0x000c}
0x1790…17c2 Head {h00=0x002e, h01=0x0050, text=» SET1,SET2,SET3,SET4,CLR1,CLR2,CLR3,CLR4 «, t00=0x000f, t01=0x0024}
0x17c2…17d2 Head {h00=0x000c, h01=0x0050, text=» B RETUR«, t00=0x000f, t01=0x0056}
0x17d2…17de Head {h00=0x0008, h01=0x0050, text=»SET1«, t00=0x000f, t01=0x0066}
0x17de…17f2 Head {h00=0x0010, h01=0x0050, text=» SET TTKEY1 «, t00=0x000f, t01=0x0072}
0x17f2…1802 Head {h00=0x000c, h01=0x0050, text=» B DYKIN«, t00=0x000f, t01=0x0086}
0x1802…180e Head {h00=0x0008, h01=0x0050, text=»SET2«, t00=0x000f, t01=0x0096}
0x180e…1822 Head {h00=0x0010, h01=0x0050, text=» SET TTKEY2 «, t00=0x000f, t01=0x00a2}
0x1822…1832 Head {h00=0x000c, h01=0x0050, text=» B DYKIN«, t00=0x000f, t01=0x00b6}
0x1832…183e Head {h00=0x0008, h01=0x0050, text=»SET3«, t00=0x000f, t01=0x00c6}
0x183e…1852 Head {h00=0x0010, h01=0x0050, text=» SET TTKEY3 «, t00=0x000f, t01=0x00d2}
0x1852…1862 Head {h00=0x000c, h01=0x0050, text=» B DYKIN«, t00=0x000f, t01=0x00e6}
0x1862…186e Head {h00=0x0008, h01=0x0050, text=»SET4«, t00=0x000f, t01=0x00f6}
0x186e…1882 Head {h00=0x0010, h01=0x0050, text=» SET TTKEY4 «, t00=0x000f, t01=0x0102}
0x1882…1892 Head {h00=0x000c, h01=0x0050, text=» B DYKIN«, t00=0x000f, t01=0x0116}
0x1892…189e Head {h00=0x0008, h01=0x0050, text=»CLR1«, t00=0x000f, t01=0x0126}
0x189e…18b4 Head {h00=0x0012, h01=0x0050, text=» CLEAR TTKEY1 «, t00=0x000f, t01=0x0132}
0x18b4…18c4 Head {h00=0x000c, h01=0x0050, text=» B DYKIN«, t00=0x000f, t01=0x0148}
0x18c4…18d0 Head {h00=0x0008, h01=0x0050, text=»CLR2«, t00=0x000f, t01=0x0158}
0x18d0…18e6 Head {h00=0x0012, h01=0x0050, text=» CLEAR TTKEY2 «, t00=0x000f, t01=0x0164}
0x18e6…18f6 Head {h00=0x000c, h01=0x0050, text=» B DYKIN«, t00=0x000f, t01=0x017a}
0x18f6…1902 Head {h00=0x0008, h01=0x0050, text=»CLR3«, t00=0x000f, t01=0x018a}
0x1902…1918 Head {h00=0x0012, h01=0x0050, text=» CLEAR TTKEY3 «, t00=0x0010, t01=0x0008}
0x1918…1928 Head {h00=0x000c, h01=0x0050, text=» B DYKIN«, t00=0x0010, t01=0x001e}
0x1928…1934 Head {h00=0x0008, h01=0x0050, text=»CLR4«, t00=0x0010, t01=0x002e}
0x1934…194a Head {h00=0x0012, h01=0x0050, text=» CLEAR TTKEY4 «, t00=0x0010, t01=0x003a}
0x194a…195a Head {h00=0x000c, h01=0x0050, text=» B DYKIN«, t00=0x0010, t01=0x0050}
0x195a…1964 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0060}
0x1964…196e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x006a}
0x196e…197c Head {h00=0x000a, h01=0x0050, text=»DYK20 «, t00=0x0010, t01=0x0074}
0x197c…1986 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0082}
0x1986…19ae Head {h00=0x0024, h01=0x0050, text=» TBF TTKEY1,DYKRET KEYBOARD OFF «, t00=0x0010, t01=0x008c}
0x19ae…19d2 Head {h00=0x0020, h01=0x0050, text=» IB SPKEY,DYK30,DYK40,DYK50 «, t00=0x0010, t01=0x00b4}
0x19d2…19e0 Head {h00=0x000a, h01=0x0050, text=»DYK30 «, t00=0x0010, t01=0x00d8}
0x19e0…1a02 Head {h00=0x001e, h01=0x0050, text=» TBF TTKEY2,DYK80 KEYPOS 1«, t00=0x0010, t01=0x00e6}
0x1a02…1a14 Head {h00=0x000e, h01=0x0050, text=» B DYKRET «, t00=0x0010, t01=0x0108}
0x1a14…1a22 Head {h00=0x000a, h01=0x0050, text=»DYK40 «, t00=0x0010, t01=0x011a}
0x1a22…1a44 Head {h00=0x001e, h01=0x0050, text=» TBT TTKEY2,DYK80 KEYPOS 2«, t00=0x0010, t01=0x0128}
0x1a44…1a52 Head {h00=0x000a, h01=0x0050, text=»DYKRET«, t00=0x0010, t01=0x014a}
0x1a52…1a64 Head {h00=0x000e, h01=0x0050, text=» PERF BELL«, t00=0x0010, t01=0x0158}
0x1a64…1a78 Head {h00=0x0010, h01=0x0050, text=» B SETCREAD «, t00=0x0010, t01=0x016a}
0x1a78…1a86 Head {h00=0x000a, h01=0x0050, text=»DYK50 «, t00=0x0010, t01=0x017e}
0x1a86…1a94 Head {h00=0x000a, h01=0x0050, text=»DYK80 «, t00=0x0010, t01=0x018c}
0x1a94…1a9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x000a}
0x1a9e…1ab6 Head {h00=0x0014, h01=0x0050, text=» KEY SWITCHES «, t00=0x0011, t01=0x0014}
0x1ab6…1ae2 Head {h00=0x0028, h01=0x0050, text=» IB SPBINW2,UPD300,CLEA20 JUMP ON C «, t00=0x0011, t01=0x002c}
0x1ae2…1b00 Head {h00=0x001a, h01=0x0050, text=» UPDATE,CANC,CANC, C«, t00=0x0011, t01=0x0058}
0x1b00…1b32 Head {h00=0x002e, h01=0x0050, text=» UPDATE,UPDATE,UPDATE,UPDATE CONVERTED C «, t00=0x0011, t01=0x0076}
0x1b32…1b6a Head {h00=0x0034, h01=0x0050, text=» UPDATE,UPDATE,UPDATE,UPDATE END-OF-ITEM-KEY C «, t00=0x0011, t01=0x00a8}
0x1b6a…1b86 Head {h00=0x0018, h01=0x0050, text=» UPDATE,KDUPL,KEDIT«, t00=0x0011, t01=0x00e0}
0x1b86…1b94 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x00fc}
0x1b94…1b9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x010a}
0x1b9e…1bd6 Head {h00=0x0034, h01=0x0050, text=»* HANDLE THE RESPECTIVE KEY AS EOI-KEY FIRST «, t00=0x0011, t01=0x0114}
0x1bd6…1be0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x014c}
0x1be0…1bee Head {h00=0x000a, h01=0x0050, text=»UPDATE«, t00=0x0011, t01=0x0156}
0x1bee…1c22 Head {h00=0x0030, h01=0x0050, text=» CBE SPBINW1,='0',UPD350 JUMP IF LENGTH = 0 «, t00=0x0011, t01=0x0164}
0x1c22…1c4c Head {h00=0x0026, h01=0x0050, text=» GETCTL 3,SPBINW4 GET SCHK-NUMBER «, t00=0x0012, t01=0x0008}
0x1c4c…1c88 Head {h00=0x0038, h01=0x0050, text=» CBE SPBINW4,='0',UPD050 JUMP IF NOT STANDARD CHECK «, t00=0x0012, t01=0x0032}
0x1c88…1cb6 Head {h00=0x002a, h01=0x0050, text=» PERFI SPBINW4,SPCHK1,SPCHK2,SPCHK3 C«, t00=0x0012, t01=0x006e}
0x1cb6…1cdc Head {h00=0x0022, h01=0x0050, text=» SPCHK4,SPCHK5,SPCHK6,SPCHK7 «, t00=0x0012, t01=0x009c}
0x1cdc…1d06 Head {h00=0x0026, h01=0x0050, text=» IB SPBINW3,UPD050,UPD070,ERRPRINT«, t00=0x0012, t01=0x00c2}
0x1d06…1d10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00ec}
0x1d10…1d34 Head {h00=0x0020, h01=0x0050, text=»* CONDITIONAL DISPLAYING «, t00=0x0012, t01=0x00f6}
0x1d34…1d3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x011a}
0x1d3e…1d4c Head {h00=0x000a, h01=0x0050, text=»UPD050«, t00=0x0012, t01=0x0124}
0x1d4c…1d66 Head {h00=0x0016, h01=0x0050, text=» TBT SPDUPL,UPD100«, t00=0x0012, t01=0x0132}
0x1d66…1d96 Head {h00=0x002c, h01=0x0050, text=» MOVE SPBINW4,='1' INDICATE COND. DISPL «, t00=0x0012, t01=0x014c}
0x1d96…1da8 Head {h00=0x000e, h01=0x0050, text=» B UPD200 «, t00=0x0012, t01=0x017c}
0x1da8…1db6 Head {h00=0x000a, h01=0x0050, text=»UPD070«, t00=0x0012, t01=0x018e}
0x1db6…1dde Head {h00=0x0024, h01=0x0050, text=» GETCTL 0,SPBINW3 GET APPL-VALUE«, t00=0x0013, t01=0x000c}
0x1dde…1e12 Head {h00=0x0030, h01=0x0050, text=» CBNE SPBINW3,='0',UPD210 JUMP IF APPL VALUE«, t00=0x0013, t01=0x0034}
0x1e12…1e26 Head {h00=0x0010, h01=0x0050, text=» B SETCREAD «, t00=0x0013, t01=0x0068}
0x1e26…1e30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x007c}
0x1e30…1e56 Head {h00=0x0022, h01=0x0050, text=»* UNCONDITIONAL DISPLAYING «, t00=0x0013, t01=0x0086}
0x1e56…1e60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00ac}
0x1e60…1e6e Head {h00=0x000a, h01=0x0050, text=»UPD100«, t00=0x0013, t01=0x00b6}
0x1e6e…1ea8 Head {h00=0x0036, h01=0x0050, text=» MOVE SPBINW4,='2' INDICATE UNCONDITIONAL DISPLAY «, t00=0x0013, t01=0x00c4}
0x1ea8…1eb6 Head {h00=0x000a, h01=0x0050, text=»UPD200«, t00=0x0013, t01=0x00fe}
0x1eb6…1ede Head {h00=0x0024, h01=0x0050, text=» GETCTL 0,SPBINW3 GET APPL-VALUE«, t00=0x0013, t01=0x010c}
0x1ede…1f14 Head {h00=0x0032, h01=0x0050, text=» CBE SPBINW3,='0',UPD400 JUMP IF NO APPL VALUE«, t00=0x0013, t01=0x0134}
0x1f14…1f1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x016a}
0x1f1e…1f4a Head {h00=0x0028, h01=0x0050, text=»* APPL-VALUE DIFFERENT FROM ZERO «, t00=0x0013, t01=0x0174}
0x1f4a…1f54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0010}
0x1f54…1f62 Head {h00=0x000a, h01=0x0050, text=»UPD210«, t00=0x0014, t01=0x001a}
0x1f62…1f76 Head {h00=0x0010, h01=0x0050, text=» PERF SPAPPL«, t00=0x0014, t01=0x0028}
0x1f76…1fa2 Head {h00=0x0028, h01=0x0050, text=» IB SPBINW3,UPD400,SETCREAD,ERRPRINT«, t00=0x0014, t01=0x003c}
0x1fa2…1fb4 Head {h00=0x000e, h01=0x0050, text=» B UPD400 «, t00=0x0014, t01=0x0068}
0x1fb4…1fbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x007a}
0x1fbe…1fe0 Head {h00=0x001e, h01=0x0050, text=»* OK AFTER APPL CONTROL«, t00=0x0014, t01=0x0084}
0x1fe0…2006 Head {h00=0x0022, h01=0x0050, text=»* UNCONDITIONAL DISPLAYING «, t00=0x0014, t01=0x00a6}
0x2006…2010 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00cc}
0x2010…201e Head {h00=0x000a, h01=0x0050, text=»UPD260«, t00=0x0014, t01=0x00d6}
0x201e…2054 Head {h00=0x0032, h01=0x0050, text=» UPDFLD 1,SPINPUT UPDATE FIELD WITH DISPLAYING«, t00=0x0014, t01=0x00e4}
0x2054…2062 Head {h00=0x000a, h01=0x0050, text=»UPD300«, t00=0x0014, t01=0x011a}
0x2062…209a Head {h00=0x0034, h01=0x0050, text=» CBE SPBINW1,='0',UPD350 SKIP NEXT IF LENGTH = 0«, t00=0x0014, t01=0x0128}
0x209a…20c6 Head {h00=0x0028, h01=0x0050, text=» SET SPCHANGE INDICATE CHANGED ITEM «, t00=0x0014, t01=0x0160}
0x20c6…20d4 Head {h00=0x000a, h01=0x0050, text=»UPD350«, t00=0x0014, t01=0x018c}
0x20d4…20f6 Head {h00=0x001e, h01=0x0050, text=»* TAKE CARE OF WARNING«, t00=0x0015, t01=0x000a}
0x20f6…2112 Head {h00=0x0018, h01=0x0050, text=» TBF SPWARNFL,UPD360«, t00=0x0015, t01=0x002c}
0x2112…2140 Head {h00=0x002a, h01=0x0050, text=» MOVE SPBINW1,SPBINW2 STORE KEY VALUE «, t00=0x0015, t01=0x0048}
0x2140…2168 Head {h00=0x0024, h01=0x0050, text=» MOVE SPBINW4,=W'26' SET MESSAGE«, t00=0x0015, t01=0x0076}
0x2168…217c Head {h00=0x0010, h01=0x0050, text=» PERF SPERR «, t00=0x0015, t01=0x009e}
0x217c…21a8 Head {h00=0x0028, h01=0x0050, text=» CBNE SPBINW2,CBIN2,UPD360 KOR-KEY ?«, t00=0x0015, t01=0x00b2}
0x21a8…21d8 Head {h00=0x002c, h01=0x0050, text=» MOVE SPBINW2,SPBINW1 RESET OLD KEYVALUE«, t00=0x0015, t01=0x00de}
0x21d8…21e6 Head {h00=0x000a, h01=0x0050, text=»UPD360«, t00=0x0015, t01=0x010e}
0x21e6…220e Head {h00=0x0024, h01=0x0050, text=»* JUMP ON FUNCTION KEY INDEX «, t00=0x0015, t01=0x011c}
0x220e…2232 Head {h00=0x0020, h01=0x0050, text=» IB SPBINW2,READIN,DUMMY, C«, t00=0x0015, t01=0x0144}
0x2232…2256 Head {h00=0x0020, h01=0x0050, text=» KEOI,DUMMY,DUMMY,KTFWD, C«, t00=0x0015, t01=0x0168}
0x2256…2288 Head {h00=0x002e, h01=0x0050, text=» KTBWD,KTHOME,KTLDOWN,KTLEFT,KTRIGHT, C «, t00=0x0015, t01=0x018c}
0x2288…22b6 Head {h00=0x002a, h01=0x0050, text=» KTDOWN,KTUP,KCOPY,DUMMY,DUMMY,KENTER«, t00=0x0016, t01=0x002e}
0x22b6…22e6 Head {h00=0x002c, h01=0x0050, text=» SUB SPBINW2,=W'14' ADJUST EOI-KEY INDEX«, t00=0x0016, t01=0x005c}
0x22e6…22f4 Head {h00=0x000a, h01=0x0050, text=»DUMMY «, t00=0x0016, t01=0x008c}
0x22f4…2302 Head {h00=0x000a, h01=0x0050, text=»RETUR «, t00=0x0016, t01=0x009a}
0x2302…230e Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0016, t01=0x00a8}
0x230e…2318 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00b4}
0x2318…2326 Head {h00=0x000a, h01=0x0050, text=»UPD400«, t00=0x0016, t01=0x00be}
0x2326…2362 Head {h00=0x0038, h01=0x0050, text=» CBE SPBINW4,='2',UPD260 JUMP IF UNCONDITIONAL DISPL«, t00=0x0016, t01=0x00cc}
0x2362…2396 Head {h00=0x0030, h01=0x0050, text=» UPDFLD 0,SPINPUT UPDATE FIELD DISPL. COND. «, t00=0x0016, t01=0x0108}
0x2396…23a8 Head {h00=0x000e, h01=0x0050, text=» B UPD300 «, t00=0x0016, t01=0x013c}
0x23a8…23b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x014e}
0x23b2…23c0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x0158}
0x23c0…23e6 Head {h00=0x0022, h01=0x0050, text=»KEOI COMMON END-OF-ITEM KEY «, t00=0x0016, t01=0x0166}
0x23e6…240a Head {h00=0x0020, h01=0x0050, text=»KTFWD TAB. FORWARD 1 STEP «, t00=0x0016, t01=0x018c}
0x240a…2418 Head {h00=0x000a, h01=0x0050, text=» TFWD «, t00=0x0017, t01=0x0020}
0x2418…242a Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0017, t01=0x002e}
0x242a…2434 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0040}
0x2434…245c Head {h00=0x0024, h01=0x0050, text=»KTBWD TABULATION 1 STEP BACKW.«, t00=0x0017, t01=0x004a}
0x245c…246a Head {h00=0x000a, h01=0x0050, text=» TBWD «, t00=0x0017, t01=0x0072}
0x246a…247c Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0017, t01=0x0080}
0x247c…2486 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0092}
0x2486…24ac Head {h00=0x0022, h01=0x0050, text=»KTHOME TAB. TO HOME POSITION«, t00=0x0017, t01=0x009c}
0x24ac…24ba Head {h00=0x000a, h01=0x0050, text=» THOME«, t00=0x0017, t01=0x00c2}
0x24ba…24cc Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0017, t01=0x00d0}
0x24cc…24d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00e2}
0x24d6…2502 Head {h00=0x0028, h01=0x0050, text=»KTLDOWN TAB. TO FIRST ON NEXT LINE«, t00=0x0017, t01=0x00ec}
0x2502…2512 Head {h00=0x000c, h01=0x0050, text=» TLDOWN «, t00=0x0017, t01=0x0118}
0x2512…2524 Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0017, t01=0x0128}
0x2524…252e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x013a}
0x252e…2550 Head {h00=0x001e, h01=0x0050, text=»KTLEFT TAB. TO LEFTMOST «, t00=0x0017, t01=0x0144}
0x2550…255e Head {h00=0x000a, h01=0x0050, text=» TLEFT«, t00=0x0017, t01=0x0166}
0x255e…2570 Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0017, t01=0x0174}
0x2570…257a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0186}
0x257a…259e Head {h00=0x0020, h01=0x0050, text=»KTRIGHT TAB. TO RIGHTMOST «, t00=0x0017, t01=0x0190}
0x259e…25ae Head {h00=0x000c, h01=0x0050, text=» TRIGHT «, t00=0x0018, t01=0x0024}
0x25ae…25c0 Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0018, t01=0x0034}
0x25c0…25ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0046}
0x25ca…25e6 Head {h00=0x0018, h01=0x0050, text=»KTDOWN TAB 1 DOWN «, t00=0x0018, t01=0x0050}
0x25e6…25f4 Head {h00=0x000a, h01=0x0050, text=» TDOWN«, t00=0x0018, t01=0x006c}
0x25f4…2606 Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0018, t01=0x007a}
0x2606…2610 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x008c}
0x2610…2628 Head {h00=0x0014, h01=0x0050, text=»KTUP TAB 1 UP «, t00=0x0018, t01=0x0096}
0x2628…2634 Head {h00=0x0008, h01=0x0050, text=» TUP«, t00=0x0018, t01=0x00ae}
0x2634…263c Head {h00=0x0004, h01=0x0050, t00=0x0018, t01=0x00ba}
0x263c…265c Head {h00=0x001c, h01=0x0050, text=»TSTTAB TEST TAB OUTPUT«, t00=0x0018, t01=0x00c2}
0x265c…2672 Head {h00=0x0012, h01=0x0050, text=» BE READIN OK «, t00=0x0018, t01=0x00e2}
0x2672…268e Head {h00=0x0018, h01=0x0050, text=» BL READIN NOT FOUND«, t00=0x0018, t01=0x00f8}
0x268e…26bc Head {h00=0x002a, h01=0x0050, text=» BOFL SETCREAD EMPTY COMPULSORY FIELD «, t00=0x0018, t01=0x0114}
0x26bc…26c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0142}
0x26c6…26d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x014c}
0x26d0…26f4 Head {h00=0x0020, h01=0x0050, text=»* CONDITIONAL TABULATION «, t00=0x0018, t01=0x0156}
0x26f4…26fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x017a}
0x26fe…2712 Head {h00=0x0010, h01=0x0050, text=» PERF SPTCHK«, t00=0x0018, t01=0x0184}
0x2712…272c Head {h00=0x0016, h01=0x0050, text=» CMP SPBINW3,='0' «, t00=0x0019, t01=0x0008}
0x272c…2740 Head {h00=0x0010, h01=0x0050, text=» BE SETCREAD«, t00=0x0019, t01=0x0022}
0x2740…2764 Head {h00=0x0020, h01=0x0050, text=» IB SPBINW2,DUMMY,DUMMY, C «, t00=0x0019, t01=0x0036}
0x2764…278a Head {h00=0x0022, h01=0x0050, text=» KTFWD,DUMMY,DUMMY,KTFWD, C «, t00=0x0019, t01=0x005a}
0x278a…27b0 Head {h00=0x0022, h01=0x0050, text=» KTBWD,KTFWD,KTFWD,KTFWD, C «, t00=0x0019, t01=0x0080}
0x27b0…27cc Head {h00=0x0018, h01=0x0050, text=» KTBWD,KTFWD,KTBWD «, t00=0x0019, t01=0x00a6}
0x27cc…280c Head {h00=0x003c, h01=0x0050, text=»* BRANCH LIST EXHAUSTED - SPBINW2 CLOBBERED BY SPTCHK«, t00=0x0019, t01=0x00c2}
0x280c…2814 Head {h00=0x0004, h01=0x0050, t00=0x0019, t01=0x0102}
0x2814…2828 Head {h00=0x0010, h01=0x0050, text=» B SETCREAD «, t00=0x0019, t01=0x010a}
0x2828…2836 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0019, t01=0x011e}
0x2836…2850 Head {h00=0x0016, h01=0x0050, text=»KCOPY HARD COPY «, t00=0x0019, t01=0x012c}
0x2850…286a Head {h00=0x0016, h01=0x0050, text=» MOVE SPBINW3,='1'«, t00=0x0019, t01=0x0146}
0x286a…288c Head {h00=0x001e, h01=0x0050, text=» PRINT KVOUCH,SPBINW3,='0'«, t00=0x0019, t01=0x0160}
0x288c…28b4 Head {h00=0x0024, h01=0x0050, text=» B SETCREAD SET CURSOR AND READ «, t00=0x0019, t01=0x0182}
0x28b4…28be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x001a}
0x28be…28da Head {h00=0x0018, h01=0x0050, text=»KDUPL DUPLICATION «, t00=0x001a, t01=0x0024}
0x28da…290c Head {h00=0x002e, h01=0x0050, text=» MOVE SPBINW2,='3' INDICATE COMMON EOI-KEY«, t00=0x001a, t01=0x0040}
0x290c…292e Head {h00=0x001e, h01=0x0050, text=» DUPL SPINPUT DUPLICATION «, t00=0x001a, t01=0x0072}
0x292e…2942 Head {h00=0x0010, h01=0x0050, text=» BNZ KDUPL2 «, t00=0x001a, t01=0x0094}
0x2942…297c Head {h00=0x0036, h01=0x0050, text=» COPY GSWSTR1,CBIN0,CBIN1,SPINPUT,CBIN1 GET BYTE 1«, t00=0x001a, t01=0x00a8}
0x297c…299e Head {h00=0x001e, h01=0x0050, text=» CBE GSWSTR1,=X'00',KDUPL2«, t00=0x001a, t01=0x00e2}
0x299e…29d0 Head {h00=0x002e, h01=0x0050, text=» MOVE SPBINW1,='10' SET LENGTH IN DUPFIELD«, t00=0x001a, t01=0x0104}
0x29d0…29e4 Head {h00=0x0010, h01=0x0050, text=» SET SPDUPL «, t00=0x001a, t01=0x0136}
0x29e4…2a02 Head {h00=0x001a, h01=0x0050, text=» B UPDATE DUPL ALLOWED«, t00=0x001a, t01=0x014a}
0x2a02…2a10 Head {h00=0x000a, h01=0x0050, text=»KDUPL2«, t00=0x001a, t01=0x0168}
0x2a10…2a44 Head {h00=0x0030, h01=0x0050, text=» MOVE SPBINW4,='4' INDICATE ILLEGAL EOI-KEY «, t00=0x001a, t01=0x0176}
0x2a44…2a68 Head {h00=0x0020, h01=0x0050, text=» B ERRPRINT DUPL NOT ALLOWED«, t00=0x001b, t01=0x001a}
0x2a68…2a76 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x003e}
0x2a76…2a80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x004c}
0x2a80…2a98 Head {h00=0x0014, h01=0x0050, text=»* EDIT FIELD «, t00=0x001b, t01=0x0056}
0x2a98…2aa2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x006e}
0x2aa2…2ab0 Head {h00=0x000a, h01=0x0050, text=»KEDIT «, t00=0x001b, t01=0x0078}
0x2ab0…2ad2 Head {h00=0x001e, h01=0x0050, text=» GETCTL 1,SPBINW3 GET MAXL«, t00=0x001b, t01=0x0086}
0x2ad2…2af4 Head {h00=0x001e, h01=0x0050, text=» CBNE SPBINW3,='0',KED100 «, t00=0x001b, t01=0x00a8}
0x2af4…2b06 Head {h00=0x000e, h01=0x0050, text=» PERF BELL«, t00=0x001b, t01=0x00ca}
0x2b06…2b1a Head {h00=0x0010, h01=0x0050, text=» B SETCREAD «, t00=0x001b, t01=0x00dc}
0x2b1a…2b28 Head {h00=0x000a, h01=0x0050, text=»KED100«, t00=0x001b, t01=0x00f0}
0x2b28…2b52 Head {h00=0x0026, h01=0x0050, text=» EDFLD SPINPUT,SPKTAB3,SPBINW1, C«, t00=0x001b, t01=0x00fe}
0x2b52…2b6c Head {h00=0x0016, h01=0x0050, text=» SPBINW2,SPBINW4 «, t00=0x001b, t01=0x0128}
0x2b6c…2b92 Head {h00=0x0022, h01=0x0050, text=» B DYKOUT CONTINUE AS FOR DYKI«, t00=0x001b, t01=0x0142}
0x2b92…2b9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0168}
0x2b9c…2bb2 Head {h00=0x0012, h01=0x0050, text=»* ENTER KEY«, t00=0x001b, t01=0x0172}
0x2bb2…2bbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0188}
0x2bbc…2bca (28, 0, 400) Head {h00=0x000a, h01=0x0050, text=»KENTER«, t00=0x001c, t01=0x0004}
0x2bca…2bf6 Head {h00=0x0028, h01=0x0050, text=» TBT SPCHANGE,KENT00 NO TESTS ON ME «, t00=0x001c, t01=0x0012}
0x2bf6…2c18 Head {h00=0x001e, h01=0x0050, text=» TBF SPME,KENT05 FIELDS ? «, t00=0x001c, t01=0x003e}
0x2c18…2c26 Head {h00=0x000a, h01=0x0050, text=»KENT00«, t00=0x001c, t01=0x0060}
0x2c26…2c5a Head {h00=0x0030, h01=0x0050, text=» MOVE SPBINW4,='5' INDICATE COMP.FIELD FOUND«, t00=0x001c, t01=0x006e}
0x2c5a…2c8a Head {h00=0x002c, h01=0x0050, text=» MOVE SPBINW1,='0' INDICATE NO CLEARING «, t00=0x001c, t01=0x00a2}
0x2c8a…2cc0 Head {h00=0x0032, h01=0x0050, text=» MOVE SPBINW2,='0' SET INDEX TO SEARCHED FIELD«, t00=0x001c, t01=0x00d2}
0x2cc0…2d00 Head {h00=0x003c, h01=0x0050, text=» GETFLD 0,SPBINW2,SPBINW3 SEARCH FOR EMPTY COMP. FIELDS «, t00=0x001c, t01=0x0108}
0x2d00…2d2c Head {h00=0x0028, h01=0x0050, text=» BOFL KENT10 EMPTY COMP. FIELD FOUND«, t00=0x001c, t01=0x0148}
0x2d2c…2d56 Head {h00=0x0026, h01=0x0050, text=» TSTCTL 2 LOOK IF COMPULSORY FIELD«, t00=0x001c, t01=0x0174}
0x2d56…2d6c Head {h00=0x0012, h01=0x0050, text=» BZ KENT05 NO!«, t00=0x001d, t01=0x000e}
0x2d6c…2d9e Head {h00=0x002e, h01=0x0050, text=» CALL EMPTYT,:FMTITEM LOOK IF EMPTY FIELD «, t00=0x001d, t01=0x0024}
0x2d9e…2db6 Head {h00=0x0014, h01=0x0050, text=» BP KENT10 YES! «, t00=0x001d, t01=0x0056}
0x2db6…2dc4 Head {h00=0x000a, h01=0x0050, text=»KENT05«, t00=0x001d, t01=0x006e}
0x2dc4…2dfc Head {h00=0x0034, h01=0x0050, text=» MOVE SPBINW2,='3' INDICATE ENTER KEY DEPRESSED «, t00=0x001d, t01=0x007c}
0x2dfc…2e08 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001d, t01=0x00b4}
0x2e08…2e12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00c0}
0x2e12…2e3c Head {h00=0x0026, h01=0x0050, text=»* EMPTY COMPULSORY FIELD FOUND «, t00=0x001d, t01=0x00ca}
0x2e3c…2e46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00f4}
0x2e46…2e54 Head {h00=0x000a, h01=0x0050, text=»KENT10«, t00=0x001d, t01=0x00fe}
0x2e54…2e8e Head {h00=0x0036, h01=0x0050, text=» GETFLD 0,SPBINW3,SPBINW2 GET THE COMPULSORY FIELD«, t00=0x001d, t01=0x010c}
0x2e8e…2e9c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001d, t01=0x0146}
0x2e9c…2eaa Head {h00=0x000a, h01=0x0050, text=»ERRPRT«, t00=0x001d, t01=0x0154}
0x2eaa…2ed8 Head {h00=0x002a, h01=0x0050, text=» CBE SPBINW2,='16',KEDIT JUMP IF EDIT «, t00=0x001d, t01=0x0162}
0x2ed8…2f06 Head {h00=0x002a, h01=0x0050, text=» CBE SPBINW2,='4',CANC JUMP IF CANCEL1«, t00=0x001d, t01=0x0190}
0x2f06…2f34 Head {h00=0x002a, h01=0x0050, text=» CBE SPBINW2,='5',CANC JUMP IF CANCEL2«, t00=0x001e, t01=0x002e}
0x2f34…2f3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x005c}
0x2f3e…2f5a Head {h00=0x0018, h01=0x0050, text=»* ERROR HANDLING «, t00=0x001e, t01=0x0066}
0x2f5a…2f64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0082}
0x2f64…2f74 Head {h00=0x000c, h01=0x0050, text=»ERRPRINT«, t00=0x001e, t01=0x008c}
0x2f74…2f7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x009c}
0x2f7e…2f9a Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW2,=X'40'«, t00=0x001e, t01=0x00a6}
0x2f9a…2fb6 Head {h00=0x0018, h01=0x0050, text=» XSTAT KEYB,SPBINW3 «, t00=0x001e, t01=0x00c2}
0x2fb6…2fdc Head {h00=0x0022, h01=0x0050, text=» CBNE SPBINW2,SPBINW3,ERRPRT20«, t00=0x001e, t01=0x00de}
0x2fdc…2fee Head {h00=0x000e, h01=0x0050, text=» TIMEOUT«, t00=0x001e, t01=0x0104}
0x2fee…3018 Head {h00=0x0026, h01=0x0050, text=» EDWRT SCREEN,ERAFMT ERASE SCREEN «, t00=0x001e, t01=0x0116}
0x3018…302a Head {h00=0x000e, h01=0x0050, text=» B ERRC20 «, t00=0x001e, t01=0x0140}
0x302a…303a Head {h00=0x000c, h01=0x0050, text=»ERRPRT20«, t00=0x001e, t01=0x0152}
0x303a…305a Head {h00=0x001c, h01=0x0050, text=» CBE SPBINW4,='0',ERRC20«, t00=0x001e, t01=0x0162}
0x305a…306c Head {h00=0x000e, h01=0x0050, text=» PERF BELL«, t00=0x001e, t01=0x0182}
0x306c…3098 (31, 0, 400) Head {h00=0x0028, h01=0x0050, text=» MOVE SPBINW3,=X'0801' ROW 24 COL. 1«, t00=0x001f, t01=0x0004}
0x3098…30ce Head {h00=0x0032, h01=0x0050, text=» DSC1 SCREEN,6,SPBINW3 SET CURSOR ON LAST ROW «, t00=0x001f, t01=0x0030}
0x30ce…30f6 Head {h00=0x0024, h01=0x0050, text=» MOVE GSWBCD4,SPBINW4 ERRORCODE «, t00=0x001f, t01=0x0066}
0x30f6…3100 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x008e}
0x3100…3128 Head {h00=0x0024, h01=0x0050, text=» EDWRT SCREEN,SPFTBERR(SPBINW4) «, t00=0x001f, t01=0x0098}
0x3128…3146 Head {h00=0x001a, h01=0x0050, text=» TBF SPKEYFLG,SPERRRET«, t00=0x001f, t01=0x00c0}
0x3146…3150 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00de}
0x3150…316e Head {h00=0x001a, h01=0x0050, text=»* READ AFTER ERROR «, t00=0x001f, t01=0x00e8}
0x316e…3178 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0106}
0x3178…3186 Head {h00=0x000a, h01=0x0050, text=»ERREAD«, t00=0x001f, t01=0x0110}
0x3186…31b2 Head {h00=0x0028, h01=0x0050, text=» SETCUR SET CURSOR AT THE BEGINNING«, t00=0x001f, t01=0x011e}
0x31b2…31d2 Head {h00=0x001c, h01=0x0050, text=» OF THE CURRENT FIELD «, t00=0x001f, t01=0x014a}
0x31d2…31e0 Head {h00=0x000a, h01=0x0050, text=»ERR100«, t00=0x001f, t01=0x016a}
0x31e0…320e Head {h00=0x002a, h01=0x0050, text=» MOVE SPBINW3,=W'14' REQUESTED LENGTH «, t00=0x001f, t01=0x0178}
0x320e…3234 Head {h00=0x0022, h01=0x0050, text=» IB SPKEY,ERR105,ERR110,ERR115«, t00=0x0020, t01=0x0016}
0x3234…3242 Head {h00=0x000a, h01=0x0050, text=»ERR105«, t00=0x0020, t01=0x003c}
0x3242…3278 Head {h00=0x0032, h01=0x0050, text=» NKI .NE,KEYB,SPINPUT,SPKTAB1,SPBINW3,SPBINW2 «, t00=0x0020, t01=0x004a}
0x3278…328a Head {h00=0x000e, h01=0x0050, text=» B ERR120 «, t00=0x0020, t01=0x0080}
0x328a…3298 Head {h00=0x000a, h01=0x0050, text=»ERR110«, t00=0x0020, t01=0x0092}
0x3298…32ce Head {h00=0x0032, h01=0x0050, text=» NKI .NE,KEYB,SPINPUT,SPKTAB12,SPBINW3,SPBINW2«, t00=0x0020, t01=0x00a0}
0x32ce…32e0 Head {h00=0x000e, h01=0x0050, text=» B ERR120 «, t00=0x0020, t01=0x00d6}
0x32e0…32ee Head {h00=0x000a, h01=0x0050, text=»ERR115«, t00=0x0020, t01=0x00e8}
0x32ee…3324 Head {h00=0x0032, h01=0x0050, text=» NKI .NE,KEYB,SPINPUT,SPKTAB13,SPBINW3,SPBINW2«, t00=0x0020, t01=0x00f6}
0x3324…3332 Head {h00=0x000a, h01=0x0050, text=»ERR120«, t00=0x0020, t01=0x012c}
0x3332…3354 Head {h00=0x001e, h01=0x0050, text=» BNZ ERR100 JUMP IF NOT OK«, t00=0x0020, t01=0x013a}
0x3354…3380 Head {h00=0x0028, h01=0x0050, text=» CMP SPBINW2,='0' JUMP IF POWER OFF «, t00=0x0020, t01=0x015c}
0x3380…3392 Head {h00=0x000e, h01=0x0050, text=» BE RETUR «, t00=0x0020, t01=0x0188}
0x3392…33b8 Head {h00=0x0022, h01=0x0050, text=» IB SPBINW2,ERR100,ERRCONT C «, t00=0x0021, t01=0x000a}
0x33b8…33e0 Head {h00=0x0024, h01=0x0050, text=» ERRCONT,ERR100,ERRCONT,ERRCONT«, t00=0x0021, t01=0x0030}
0x33e0…33fa Head {h00=0x0016, h01=0x0050, text=» B ERR100 CONTINUE«, t00=0x0021, t01=0x0058}
0x33fa…3404 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0072}
0x3404…3426 Head {h00=0x001e, h01=0x0050, text=»* CLEAR ERROR PRINTOUT «, t00=0x0021, t01=0x007c}
0x3426…3430 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x009e}
0x3430…3440 Head {h00=0x000c, h01=0x0050, text=»ERRCONT «, t00=0x0021, t01=0x00a8}
0x3440…3464 Head {h00=0x0020, h01=0x0050, text=» PERF CLEAR8 ERASE LAST LINE«, t00=0x0021, t01=0x00b8}
0x3464…3490 Head {h00=0x0028, h01=0x0050, text=» CBNL SPBINW4,=W'26',CANC IF WARNING«, t00=0x0021, t01=0x00dc}
0x3490…34ba Head {h00=0x0026, h01=0x0050, text=» SUB SPBINW2,='1' ADJUST KEY INDEX«, t00=0x0021, t01=0x0108}
0x34ba…34c6 Head {h00=0x0008, h01=0x0050, text=»CANC«, t00=0x0021, t01=0x0132}
0x34c6…34fa Head {h00=0x0030, h01=0x0050, text=» CBE SPBINW1,='0',ERRC10 JUMP IF LENGTH = 0 «, t00=0x0021, t01=0x013e}
0x34fa…352e Head {h00=0x0030, h01=0x0050, text=» MOVE SPINPUT,:FMTITEM SAVE CURRENT CONTENTS«, t00=0x0021, t01=0x0172}
0x352e…3566 Head {h00=0x0034, h01=0x0050, text=» MOVE :FMTITEM,=C'1' PUT SOMETHING IN THE FIELD «, t00=0x0022, t01=0x0016}
0x3566…3590 Head {h00=0x0026, h01=0x0050, text=» GETABX SPBINW4 GET CURRENT INDEX «, t00=0x0022, t01=0x004e}
0x3590…35be Head {h00=0x002a, h01=0x0050, text=» ERASE 10,SPBINW4,SPBINW4 CLEAR FIELD «, t00=0x0022, t01=0x0078}
0x35be…35cc Head {h00=0x000a, h01=0x0050, text=»ERRC10«, t00=0x0022, t01=0x00a6}
0x35cc…35f4 Head {h00=0x0024, h01=0x0050, text=» IB SPBINW2,CLEAR1,CLEAR2,DUMMY «, t00=0x0022, t01=0x00b4}
0x35f4…3628 Head {h00=0x0030, h01=0x0050, text=» SUB SPBINW2,='3' ADJUST FOR CANCEL1,CANCEL2«, t00=0x0022, t01=0x00dc}
0x3628…3634 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0022, t01=0x0110}
0x3634…3642 Head {h00=0x000a, h01=0x0050, text=»CLEAR1«, t00=0x0022, t01=0x011c}
0x3642…3676 Head {h00=0x0030, h01=0x0050, text=» CBE SPBINW1,='0',ERRC20 JUMP IF LENGTH = 0 «, t00=0x0022, t01=0x012a}
0x3676…36a2 Head {h00=0x0028, h01=0x0050, text=» SET SPCHANGE INDICATE CHANGED FIELD«, t00=0x0022, t01=0x015e}
0x36a2…36b0 Head {h00=0x000a, h01=0x0050, text=»ERRC20«, t00=0x0022, t01=0x018a}
0x36b0…36da Head {h00=0x0026, h01=0x0050, text=» MOVE SPBINW5,$OPT CHECHK IF SPERR«, t00=0x0023, t01=0x0008}
0x36da…36fe Head {h00=0x0020, h01=0x0050, text=» CBE SPBINW5,=W'0',SPERRRET «, t00=0x0023, t01=0x0032}
0x36fe…371a Head {h00=0x0018, h01=0x0050, text=» B SETCREAD CONTINUE«, t00=0x0023, t01=0x0056}
0x371a…3724 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0072}
0x3724…3732 Head {h00=0x000a, h01=0x0050, text=»CLEAR2«, t00=0x0023, t01=0x007c}
0x3732…376a Head {h00=0x0034, h01=0x0050, text=» MOVE :FMTITEM,SPINPUT RESTORE CURRENT CONTENTS «, t00=0x0023, t01=0x008a}
0x376a…3778 Head {h00=0x000a, h01=0x0050, text=»CLEA20«, t00=0x0023, t01=0x00c2}
0x3778…37a6 Head {h00=0x002a, h01=0x0050, text=» GETABX SPBINW4 GET CURRENT TAB INDEX «, t00=0x0023, t01=0x00d0}
0x37a6…37d6 Head {h00=0x002c, h01=0x0050, text=» DISPLAY 1,SPBINW4,SPBINW4 DISPLAY FIELD«, t00=0x0023, t01=0x00fe}
0x37d6…3800 Head {h00=0x0026, h01=0x0050, text=» MOVE SPBINW5,$OPT CHECK IF SPERR «, t00=0x0023, t01=0x012e}
0x3800…3824 Head {h00=0x0020, h01=0x0050, text=» CBE SPBINW5,=W'0',SPERRRET «, t00=0x0023, t01=0x0158}
0x3824…3840 Head {h00=0x0018, h01=0x0050, text=» B SETCREAD CONTINUE«, t00=0x0023, t01=0x017c}
0x3840…384a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0008}
0x384a…385a Head {h00=0x000c, h01=0x0050, text=»SPERRRET«, t00=0x0024, t01=0x0012}
0x385a…3866 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0024, t01=0x0022}
0x3866…3870 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x002e}
0x3870…387e Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0024, t01=0x0038}
0x387e…3888 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0046}
0x3888…389a Head {h00=0x000e, h01=0x0050, text=»BELL PROC «, t00=0x0024, t01=0x0050}
0x389a…38ba Head {h00=0x001c, h01=0x0050, text=»* ACUSTIC ALARM«, t00=0x0024, t01=0x0062}
0x38ba…38d8 Head {h00=0x001a, h01=0x0050, text=» EDWRT SCREEN,BELLFMT «, t00=0x0024, t01=0x0082}
0x38d8…38e4 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0024, t01=0x00a0}
0x38e4…38ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00ac}
0x38ee…3902 Head {h00=0x0010, h01=0x0050, text=»BELLFMT FRMT«, t00=0x0024, t01=0x00b6}
0x3902…390e Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0024, t01=0x00ca}
0x390e…3924 Head {h00=0x0012, h01=0x0050, text=» FILLR X'07',1«, t00=0x0024, t01=0x00d6}
0x3924…3932 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0024, t01=0x00ec}
0x3932…393a Head {h00=0x0004, h01=0x0050, t00=0x0024, t01=0x00fa}
0x393a…3948 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0024, t01=0x0102}
0x3948…3952 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0110}
0x3952…3966 Head {h00=0x0010, h01=0x0050, text=»ERAFMT FRMT «, t00=0x0024, t01=0x011a}
0x3966…397a Head {h00=0x0010, h01=0x0050, text=» FILLR '1',2«, t00=0x0024, t01=0x012e}
0x397a…3988 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0024, t01=0x0142}
0x3988…3992 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0150}
0x3992…39a0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0024, t01=0x015a}
0x39a0…39c2 Head {h00=0x001e, h01=0x0050, text=»SPLIN8 PROC WRTMES,WRTTYP «, t00=0x0024, t01=0x0168}
0x39c2…39de Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0024, t01=0x018a}
0x39de…39e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0016}
0x39e8…3a14 Head {h00=0x0028, h01=0x0050, text=»* SPLIN8 - WRITE ON LINE 8 «, t00=0x0025, t01=0x0020}
0x3a14…3a1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x004c}
0x3a1e…3a58 Head {h00=0x0036, h01=0x0050, text=»* MESSAGE DEFINED AS FORMAT NUMBER WRTMES«, t00=0x0025, t01=0x0056}
0x3a58…3a84 Head {h00=0x0028, h01=0x0050, text=»* IN FORMAT TABLE SPFTBMES «, t00=0x0025, t01=0x0090}
0x3a84…3a8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00bc}
0x3a8e…3ab6 Head {h00=0x0024, h01=0x0050, text=»* WRTTYP: =0 NO WAIT«, t00=0x0025, t01=0x00c6}
0x3ab6…3adc Head {h00=0x0022, h01=0x0050, text=»* =1 WAIT «, t00=0x0025, t01=0x00ee}
0x3adc…3b04 Head {h00=0x0024, h01=0x0050, text=»* =2 RETURN «, t00=0x0025, t01=0x0114}
0x3b04…3b0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x013c}
0x3b0e…3b2a Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x0025, t01=0x0146}
0x3b2a…3b48 Head {h00=0x001a, h01=0x0050, text=» MOVE SPBINW1,=X'0801'«, t00=0x0025, t01=0x0162}
0x3b48…3b7e Head {h00=0x0032, h01=0x0050, text=» DSC1 SCREEN,6,SPBINW1 SET CURSOR ON LAST ROW «, t00=0x0025, t01=0x0180}
0x3b7e…3b9a Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW1,CBIN0 «, t00=0x0026, t01=0x0026}
0x3b9a…3bc0 Head {h00=0x0022, h01=0x0050, text=» EDWRT SCREEN,SPFTBMES(WRTMES)«, t00=0x0026, t01=0x0042}
0x3bc0…3be0 Head {h00=0x001c, h01=0x0050, text=» CBE WRTTYP,=W'0',LIN8NW«, t00=0x0026, t01=0x0068}
0x3be0…3c00 Head {h00=0x001c, h01=0x0050, text=» CBE WRTTYP,=W'2',LINRET«, t00=0x0026, t01=0x0088}
0x3c00…3c0e Head {h00=0x000a, h01=0x0050, text=»* READ«, t00=0x0026, t01=0x00a8}
0x3c0e…3c1c Head {h00=0x000a, h01=0x0050, text=»LIN8IN«, t00=0x0026, t01=0x00b6}
0x3c1c…3c48 Head {h00=0x0028, h01=0x0050, text=» MOVE SPBINW1,=W'3' REQUESTED LENGTH«, t00=0x0026, t01=0x00c4}
0x3c48…3c6e Head {h00=0x0022, h01=0x0050, text=» IB SPKEY,LIN805,LIN810,LIN815«, t00=0x0026, t01=0x00f0}
0x3c6e…3c7c Head {h00=0x000a, h01=0x0050, text=»LIN805«, t00=0x0026, t01=0x0116}
0x3c7c…3cae Head {h00=0x002e, h01=0x0050, text=» NKI KEYB,SPINPUT,SPKTAB1,SPBINW1,SPBINW2 «, t00=0x0026, t01=0x0124}
0x3cae…3cc0 Head {h00=0x000e, h01=0x0050, text=» B LIN820 «, t00=0x0026, t01=0x0156}
0x3cc0…3cce Head {h00=0x000a, h01=0x0050, text=»LIN810«, t00=0x0026, t01=0x0168}
0x3cce…3d00 Head {h00=0x002e, h01=0x0050, text=» NKI KEYB,SPINPUT,SPKTAB12,SPBINW1,SPBINW2«, t00=0x0026, t01=0x0176}
0x3d00…3d12 Head {h00=0x000e, h01=0x0050, text=» B LIN820 «, t00=0x0027, t01=0x0018}
0x3d12…3d20 Head {h00=0x000a, h01=0x0050, text=»LIN815«, t00=0x0027, t01=0x002a}
0x3d20…3d52 Head {h00=0x002e, h01=0x0050, text=» NKI KEYB,SPINPUT,SPKTAB13,SPBINW1,SPBINW2«, t00=0x0027, t01=0x0038}
0x3d52…3d60 Head {h00=0x000a, h01=0x0050, text=»LIN820«, t00=0x0027, t01=0x006a}
0x3d60…3d84 Head {h00=0x0020, h01=0x0050, text=» BNOK LIN8IN JUMP IF NOT OK «, t00=0x0027, t01=0x0078}
0x3d84…3dac Head {h00=0x0024, h01=0x0050, text=» IB SPBINW2,LIN8IN,LIN8CT,LIN8IN«, t00=0x0027, t01=0x009c}
0x3dac…3dbe Head {h00=0x000e, h01=0x0050, text=» B LIN8IN «, t00=0x0027, t01=0x00c4}
0x3dbe…3dd2 Head {h00=0x0010, h01=0x0050, text=»* CLEAR LINE«, t00=0x0027, t01=0x00d6}
0x3dd2…3de0 Head {h00=0x000a, h01=0x0050, text=»LIN8CT«, t00=0x0027, t01=0x00ea}
0x3de0…3e04 Head {h00=0x0020, h01=0x0050, text=» PERF CLEAR8 ERASE LAST LINE«, t00=0x0027, t01=0x00f8}
0x3e04…3e10 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0027, t01=0x011c}
0x3e10…3e2c Head {h00=0x0018, h01=0x0050, text=»* READ WITH NO WAIT «, t00=0x0027, t01=0x0128}
0x3e2c…3e3a Head {h00=0x000a, h01=0x0050, text=»LIN8NW«, t00=0x0027, t01=0x0144}
0x3e3a…3e66 Head {h00=0x0028, h01=0x0050, text=» MOVE SPBINW1,=W'3' REQUESTED LENGTH«, t00=0x0027, t01=0x0152}
0x3e66…3e8c Head {h00=0x0022, h01=0x0050, text=» IB SPKEY,LIN855,LIN860,LIN865«, t00=0x0027, t01=0x017e}
0x3e8c…3e9a Head {h00=0x000a, h01=0x0050, text=»LIN855«, t00=0x0028, t01=0x0014}
0x3e9a…3ed0 Head {h00=0x0032, h01=0x0050, text=» NKI .NW,KEYB,SPINPUT,SPKTAB1,SPBINW1,SPBINW2 «, t00=0x0028, t01=0x0022}
0x3ed0…3ee2 Head {h00=0x000e, h01=0x0050, text=» B LIN870 «, t00=0x0028, t01=0x0058}
0x3ee2…3ef0 Head {h00=0x000a, h01=0x0050, text=»LIN860«, t00=0x0028, t01=0x006a}
0x3ef0…3f26 Head {h00=0x0032, h01=0x0050, text=» NKI .NW,KEYB,SPINPUT,SPKTAB12,SPBINW1,SPBINW2«, t00=0x0028, t01=0x0078}
0x3f26…3f38 Head {h00=0x000e, h01=0x0050, text=» B LIN870 «, t00=0x0028, t01=0x00ae}
0x3f38…3f46 Head {h00=0x000a, h01=0x0050, text=»LIN865«, t00=0x0028, t01=0x00c0}
0x3f46…3f7c Head {h00=0x0032, h01=0x0050, text=» NKI .NW,KEYB,SPINPUT,SPKTAB13,SPBINW1,SPBINW2«, t00=0x0028, t01=0x00ce}
0x3f7c…3f8a Head {h00=0x000a, h01=0x0050, text=»LIN870«, t00=0x0028, t01=0x0104}
0x3f8a…3f98 Head {h00=0x000a, h01=0x0050, text=»LINRET«, t00=0x0028, t01=0x0112}
0x3f98…3fa4 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0028, t01=0x0120}
0x3fa4…3fb2 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0028, t01=0x012c}
0x3fb2…3fc0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x013a}
0x3fc0…3fd4 Head {h00=0x0010, h01=0x0050, text=»SPINF1 PROC «, t00=0x0028, t01=0x0148}
0x3fd4…3ff0 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0028, t01=0x015c}
0x3ff0…3ffa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0178}
0x3ffa…402e Head {h00=0x0030, h01=0x0050, text=»* SPINF1 - WRITE INF ON FIRST LINE «, t00=0x0028, t01=0x0182}
0x402e…4038 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0026}
0x4038…4054 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0029, t01=0x0030}
0x4054…4072 Head {h00=0x001a, h01=0x0050, text=» MOVE SPBINW1,=X'0117'«, t00=0x0029, t01=0x004c}
0x4072…40aa Head {h00=0x0034, h01=0x0050, text=» DSC1 SCREEN,6,SPBINW1 SET CURSOR ON FIRST LINE «, t00=0x0029, t01=0x006a}
0x40aa…40c6 Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW1,CBIN0 «, t00=0x0029, t01=0x00a2}
0x40c6…40fc Head {h00=0x0032, h01=0x0050, text=» EDWRT SCREEN,SPFTBMES(CBIN7) WRITE MESSAGE 7 «, t00=0x0029, t01=0x00be}
0x40fc…4108 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0029, t01=0x00f4}
0x4108…4116 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0029, t01=0x0100}
0x4116…4120 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x010e}
0x4120…412a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0118}
0x412a…4134 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0122}
0x4134…4148 Head {h00=0x0010, h01=0x0050, text=»SPINF8 PROC «, t00=0x0029, t01=0x012c}
0x4148…4164 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0029, t01=0x0140}
0x4164…416e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x015c}
0x416e…41a0 Head {h00=0x002e, h01=0x0050, text=»* SPINF8 - WRITE INF ON LAST LINE«, t00=0x0029, t01=0x0166}
0x41a0…41aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0008}
0x41aa…41c6 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x002a, t01=0x0012}
0x41c6…41e6 Head {h00=0x001c, h01=0x0050, text=» PERF SPLIN8,CBIN4,CBIN2«, t00=0x002a, t01=0x002e}
0x41e6…41f2 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x002a, t01=0x004e}
0x41f2…4200 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x002a, t01=0x005a}
0x4200…420a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0068}
0x420a…4214 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0072}
0x4214…421e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x007c}
0x421e…4226 Head {h00=0x0004, h01=0x0050, t00=0x002a, t01=0x0086}
0x4226…4232 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x002a, t01=0x008e}
0x4232…4236 Head {h00=0x4004, h01=0x0000}
0x4236…423a 00 2a 00 9a ┆ * ┆
0x423a…4242 (43, 1, 8) 20 04 00 00 00 2b 00 04 ┆ + ┆
0x4242…4292 (44, 0, 400) 82 a0 00 3a 92 98 83 4b ff fe 01 2b e1 51 00 01 14 02 e1 32 19 c0 50 2e 19 02 50 38 f6 a1 9a 2e f6 a1 aa a6 86 02 80 d8 00 0a 84 d8 00 28 f6 a1 8f bc 9c 42 00 02 1c 02 83 58 00 10 23 7f eb 10 56 02 83 10 f0 3a 94 a0 00 01 f6 a1 9a cc f6 a1 ┆ : K + Q 2 P. P8 . ( B X # V : ┆
0x4292…42e2 a6 d0 5f 30 94 a0 00 01 f6 a1 9c 76 5f 3e a7 c2 a7 c0 9a cc a7 c0 a7 c0 a7 c0 a7 86 a7 ae a7 aa a7 24 a6 3e a7 24 a6 04 89 04 8a 04 8a 04 a7 c0 88 f6 a7 c0 01 02 57 14 01 04 57 02 01 08 82 58 00 30 51 08 f6 a1 88 88 8f 20 88 86 a9 59 00 28 ┆ _0 v_> $ > $ W W X 0Q Y (┆
0x42e2…4332 01 0c e9 59 00 2a 50 04 80 d8 00 0a 07 80 f6 a1 94 58 84 20 a5 14 82 20 87 7e e7 58 00 3c 27 ff 83 58 00 06 86 58 00 04 f6 a1 a5 4a f6 a1 8f 3e e3 58 00 2a 23 ff 82 58 00 28 81 08 22 01 51 70 82 04 22 02 50 0e 82 58 00 30 50 3a eb 20 00 0a ┆ Y *P X ~ X <' X X J > X *# X ( " Qp " P X 0P: ┆
0x4332…4382 56 70 5f 60 82 04 22 08 50 34 eb 20 00 02 54 0e f6 a1 8d 2a 84 d8 00 1c f6 a1 8f bc 57 54 82 04 22 10 50 12 82 20 ff ff 92 59 00 30 5d 8a 02 08 a2 59 00 28 5f 74 82 04 22 20 58 98 5f 2e f6 a1 94 40 e3 58 00 2a 23 ff eb 20 00 0a 50 10 84 42 ┆Vp_` " P4 T * WT " P Y 0] Y (_t " X _. @ X *# P B┆
0x4382…43d2 00 02 81 20 20 20 81 31 14 02 f6 a1 94 40 57 12 82 04 22 04 50 0c eb 20 00 0a 58 0e eb 20 00 0c 58 24 a0 43 00 10 f0 3a e1 58 00 2a 21 ff e9 20 00 06 50 14 80 d8 00 0a 00 01 40 80 02 85 ff ff c0 14 00 a8 05 00 00 00 44 00 00 80 02 00 00 0c ┆ 1 @W " P X X$ C : X *! P @ D ┆