|
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: 23900 (0x5d5c)
Notes: pts_type(SC)
Names: »SCREEN.SC«
└─⟦22f4dea89⟧ Bits:30009702 Philips computer tape "DOS_PTS_4.2_M_FL"
└─⟦this⟧ »NJ-AMT/SCREEN.SC«
└─⟦dab19bdd7⟧ Bits:30009677 Philips computer tape "600218"
└─⟦this⟧ »NJ-AMT/SCREEN.SC«
IDENT SCREEN 831026 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 BELL ENTRY KBTEST ENTRY DKTEST 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 * NOKEY EQU X'FF' BSPKY1 EQU X'A7' CANKY1 EQU X'B2' MACKY1 EQU X'8B' EORKY1 EQU X'AB' FTABKY1 EQU X'FF' BTABKY1 EQU X'AA' DUPKY1 EQU X'B3' SLUTKY1 EQU X'A5' REGKY1 EQU X'A1' COPKY1 EQU X'B5' EDTKY1 EQU X'FF' KREKY1 EQU X'A2' LISTKY1 EQU X'BD' SBTKY1 EQU X'BE' SPGKY1 EQU X'99' CY1KY1 EQU X'FF' CY2KY1 EQU X'FF' CYCKY1 EQU X'A3' INVKY1 EQU X'9E' KONKY1 EQU X'BF' KVITKY1 EQU X'B5' SUPLKY1 EQU X'9D' SUMKY1 EQU X'9F' ADMKY1 EQU X'A0' DIVKY1 EQU X'9C' HBOGKY1 EQU X'FF' DEBPKY1 EQU X'FF' REMKY1 EQU X'FF' TRSEL EQU X'FF' ONKY1 EQU X'B6' SP1KY1 EQU X'9A' A45KY1 EQU X'9B' * FTBKY1 EQU X'AB' BTBKY1 EQU X'AA' INSKY1 EQU X'B0' DELKY1 EQU X'B1' CL1KY1 EQU X'80' CL2KY1 EQU X'9A' CL3KY1 EQU X'95' OUTKY1 EQU X'A0' * BSPKY2 EQU BSPKY1 CANKY2 EQU CANKY1 EORKY2 EQU EORKY1 MACKY2 EQU MACKY1 FTABKY2 EQU FTABKY1 BTABKY2 EQU BTABKY1 DUPKY2 EQU DUPKY1 EDTKY2 EQU EDTKY1 SLUTKY2 EQU SLUTKY1 KREKY2 EQU KREKY1 REGKY2 EQU REGKY1 ADMKY2 EQU ADMKY1 SPGKY2 EQU SPGKY1 KONKY2 EQU KONKY1 KVITKY2 EQU KVITKY1 ONKY2 EQU ONKY1 SP1KY2 EQU SP1KY1 A45KY2 EQU A45KY1 * * FIRST INCLUDE KEY VALUES, * THEN INCLUDE SPECIAL SCREEN FORMATS SPKTAB1 KTAB BSPKY1,CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C COPKY1,DUPKY1,EDTKY1,SLUTKY1, C KREKY1,REGKY2,LISTKY1,SBTKY1,SPGKY1, C CY1KY1,CY2KY1,INVKY1,KONKY1,KVITKY1,SUPLKY1,SUMKY1, C ADMKY1,CYCKY1,DIVKY1,HBOGKY1,SP1KY1,REMKY1,TRSEL, C ONKY1,A45KY1,NOKEY * SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C COPKY1,NOKEY,EDTKY1,SLUTKY1, C KREKY1,NOKEY,NOKEY,NOKEY,NOKEY, C NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C ADMKY1,CYCKY1,NOKEY,NOKEY,NOKEY,NOKEY,TRSEL, C NOKEY,A45KY1,NOKEY * SPKTAB3 KTAB FTBKY1,BTBKY1,INSKY1,DELKY1, C CL1KY1,CL2KY1,CL3KY1,OUTKY1 * SPKTAB12 KTAB BSPKY2,CANKY2,NOKEY,EORKY2,NOKEY,MACKY2, C FTABKY2,BTABKY2,NOKEY,NOKEY,NOKEY,NOKEY, C NOKEY,NOKEY,NOKEY,DUPKY2,EDTKY2,SLUTKY2, C KREKY2,REGKY2,ADMKY2,SPGKY2,KONKY2,KVITKY2, C ONKY2,A45KY2 * SPKTAB22 KTAB BSPKY2,CANKY2,NOKEY,EORKY2,NOKEY,MACKY2, C FTABKY2,BTABKY2,NOKEY,NOKEY,NOKEY,NOKEY, C NOKEY,NOKEY,NOKEY,NOKEY,EDTKY2,SLUTKY2, C KREKY2,NOKEY,ADMKY2,SPGKY2,KONKY2,KVITKY2, C ONKY2,A45KY2 * * INQUIRY KEYTABLES (SPKEY=3) * SPKTAB13 KTAB BSPKY1,NOKEY,CANKY1,NOKEY,NOKEY,MACKY1, C NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,SLUTKY1, C NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C NOKEY,INVKY1,KONKY1,KVITKY1 * SPKTAB23 KTAB BSPKY1,NOKEY,CANKY1,NOKEY,NOKEY,MACKY1, C NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C ADMKY1 * * SPFTBERR FTABLE ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C ERRDSK,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT WARNINGS * SPFTBMES FTABLE MSFMT1,MSFMT2,MSFMT3,MSFMT4,MSFMT5,MSFMT6, C MSFMT7, C MSFMT8, C MSFMT9, C MSFMT10, C MSFMT11, C MSFMT12, C MSFMT13, C MSFMT14 * * ERRFMT FRMT FSL FCOPY ='FEJL ' FMEL 'ZZ9',GSWBCD4 ERRORNR. FMEND * ERRDSK FRMT FSL FMEL '99B',GTWBCD2 FCOPY GSWSTR9 FMEL '99',GTWBCD1 FMEND * MSFMT1 FRMT FSL FCOPY ='SKIFT JOURNAL' FMEND * MSFMT2 FRMT FSL FCOPY ='LINIE NR' FILLR '.',1 FMEND * MSFMT3 FRMT FSL FTEXT ='NY SIDE. ' FMEND * MSFMT4 FRMT FSL FBF TTSUMFLG,FMT4END FTAB 15 FCOPY GTL8TXT FINP 23 FMEL 'ZZZZZVZZ9,99+',GTSUM FMT4END FMEND * MSFMT5 FRMT FSL FCOPY ='BILAG' FMEND * MSFMT6 FRMT FSL FCOPY ='KONTOKORT' FMEND * MSFMT7 FRMT FSL FCOPY TTINF1 FMEND * MSFMT8 FRMT FSL FCOPY ='DISKETTE SKIFT ' FILLR X'07',1 FMEND * MSFMT9 FRMT FSL FCOPY ='OPSTART. ' FCOPY ='AFVENT VENLIGST.' FMEND * MSFMT10 FRMT FSL FMEL 'TTTTTTTTTTTT9-',GTWBCD2 FMEND * MSFMT11 FRMT FSL * FCOPY ='OPRET LEV. ' FMEND * MSFMT12 FRMT FSL FMEND * MSFMT13 FRMT FSL * FCOPY ='STRAKS CHECK ' FMEND * MSFMT14 FRMT FSL FTEXT 'DISK STANDSET. ' FCOPY ='AFVENT VENLIGST.' FILLR X'07',1 FMEND 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 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 * 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 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 * * 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 GETCTL 0,SPBINW3 MOVE SPBINW1,CFLTDEX(SPBINW3) CMP GSSWITCH(SPBINW1),CBIN0 BE DYKIN MOVE SPBINW1,CBIN1 BL DYK20 MOVE SPBINW2,CBIN15 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 * PERF DKTEST BNOK SETCREAD 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 * * 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 * 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 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 * * 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 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'1801' 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 * 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'1801' 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 CBE SPBINW2,CBIN2,LIN8CT 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 KBTEST PROC PERF SPLIN8,CBIN0,CBIN0 TESTIO KEYB BOK KBT10 CALL ABORT,KEYB B KBT20 KBT10 WAIT KEYB CBNE SPBINW2,CBIN6,KBT20 CMP CBIN0,CBIN0 RET KBT20 CMP CBIN0,CBIN1 RET PEND 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 * * * DKTEST PROC * TEST IF THE DISK IS SWITCHED OFF, TBF CDKOFF,DKTRET TBT GTMASTFL,DKTRET TBF CDUOVL,DKTRET NO KI IF DISKOVL ON DU MOVE SPBINW5,=X'1801' DSC1 SCREEN,6,SPBINW5 EDWRT .NW,SCREEN,SPFTBMES(CBIN14) DKT10 DELAY CBIN10 TBT CDKOFF,DKT10 PERF CLEAR8 CMP CBIN1,CBIN0 NOK RET DKTRET CMP CBIN0,CBIN0 RET PEND END
0x0000…0020 (0, 0, 400) Head {h00=0x001c, h01=0x0050, text=» IDENT SCREEN 831026 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…0342 Head {h00=0x0010, h01=0x0050, text=» ENTRY BELL «, t00=0x0002, t01=0x0012}
0x0342…0358 Head {h00=0x0012, h01=0x0050, text=» ENTRY KBTEST «, t00=0x0002, t01=0x0026}
0x0358…036e Head {h00=0x0012, h01=0x0050, text=» ENTRY DKTEST «, t00=0x0002, t01=0x003c}
0x036e…039e Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK1 STANDARD CHECK ROUTINE NO. 1«, t00=0x0002, t01=0x0052}
0x039e…03ce Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK2 STANDARD CHECK ROUTINE NO. 2«, t00=0x0002, t01=0x0082}
0x03ce…03fe Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK3 STANDARD CHECK ROUTINE NO. 3«, t00=0x0002, t01=0x00b2}
0x03fe…042e Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK4 STANDARD CHECK ROUTINE NO. 4«, t00=0x0002, t01=0x00e2}
0x042e…045e Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK5 STANDARD CHECK ROUTINE NO. 5«, t00=0x0002, t01=0x0112}
0x045e…048e Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK6 STANDARD CHECK ROUTINE NO. 6«, t00=0x0002, t01=0x0142}
0x048e…04be Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK7 STANDARD CHECK ROUTINE NO. 7«, t00=0x0002, t01=0x0172}
0x04be…04e8 Head {h00=0x0026, h01=0x0050, text=» EXT SPAPPL USER ROUTINE TO HANDLE«, t00=0x0003, t01=0x0012}
0x04e8…04fe Head {h00=0x0012, h01=0x0050, text=» APPL VALUES«, t00=0x0003, t01=0x003c}
0x04fe…052a Head {h00=0x0028, h01=0x0050, text=» EXT SPTCHK USER ROUTINE TO EVALUATE«, t00=0x0003, t01=0x0052}
0x052a…054c Head {h00=0x001e, h01=0x0050, text=» CONDITIONAL TABULATION «, t00=0x0003, t01=0x007e}
0x054c…055e Head {h00=0x000e, h01=0x0050, text=» EXT ABORT«, t00=0x0003, t01=0x00a0}
0x055e…0590 Head {h00=0x002e, h01=0x0050, text=» EXT EMPTYT ASSEMBLY SUBROUTINE EMPTYT - «, t00=0x0003, t01=0x00b2}
0x0590…05b6 Head {h00=0x0022, h01=0x0050, text=» TEST IF DATA ITEM IS EMPTY «, t00=0x0003, t01=0x00e4}
0x05b6…05ca Head {h00=0x0010, h01=0x0050, text=» EXT CLEAR8 «, t00=0x0003, t01=0x010a}
0x05ca…05d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x011e}
0x05d4…05ec Head {h00=0x0014, h01=0x0050, text=»NOKEY EQU X'FF' «, t00=0x0003, t01=0x0128}
0x05ec…0604 Head {h00=0x0014, h01=0x0050, text=»BSPKY1 EQU X'A7'«, t00=0x0003, t01=0x0140}
0x0604…061c Head {h00=0x0014, h01=0x0050, text=»CANKY1 EQU X'B2'«, t00=0x0003, t01=0x0158}
0x061c…0634 Head {h00=0x0014, h01=0x0050, text=»MACKY1 EQU X'8B'«, t00=0x0003, t01=0x0170}
0x0634…064c Head {h00=0x0014, h01=0x0050, text=»EORKY1 EQU X'AB'«, t00=0x0003, t01=0x0188}
0x064c…0666 Head {h00=0x0016, h01=0x0050, text=»FTABKY1 EQU X'FF' «, t00=0x0004, t01=0x0010}
0x0666…0680 Head {h00=0x0016, h01=0x0050, text=»BTABKY1 EQU X'AA' «, t00=0x0004, t01=0x002a}
0x0680…0698 Head {h00=0x0014, h01=0x0050, text=»DUPKY1 EQU X'B3'«, t00=0x0004, t01=0x0044}
0x0698…06b2 Head {h00=0x0016, h01=0x0050, text=»SLUTKY1 EQU X'A5' «, t00=0x0004, t01=0x005c}
0x06b2…06ca Head {h00=0x0014, h01=0x0050, text=»REGKY1 EQU X'A1'«, t00=0x0004, t01=0x0076}
0x06ca…06e2 Head {h00=0x0014, h01=0x0050, text=»COPKY1 EQU X'B5'«, t00=0x0004, t01=0x008e}
0x06e2…06fa Head {h00=0x0014, h01=0x0050, text=»EDTKY1 EQU X'FF'«, t00=0x0004, t01=0x00a6}
0x06fa…0712 Head {h00=0x0014, h01=0x0050, text=»KREKY1 EQU X'A2'«, t00=0x0004, t01=0x00be}
0x0712…072c Head {h00=0x0016, h01=0x0050, text=»LISTKY1 EQU X'BD' «, t00=0x0004, t01=0x00d6}
0x072c…0744 Head {h00=0x0014, h01=0x0050, text=»SBTKY1 EQU X'BE'«, t00=0x0004, t01=0x00f0}
0x0744…075c Head {h00=0x0014, h01=0x0050, text=»SPGKY1 EQU X'99'«, t00=0x0004, t01=0x0108}
0x075c…0774 Head {h00=0x0014, h01=0x0050, text=»CY1KY1 EQU X'FF'«, t00=0x0004, t01=0x0120}
0x0774…078c Head {h00=0x0014, h01=0x0050, text=»CY2KY1 EQU X'FF'«, t00=0x0004, t01=0x0138}
0x078c…07a4 Head {h00=0x0014, h01=0x0050, text=»CYCKY1 EQU X'A3'«, t00=0x0004, t01=0x0150}
0x07a4…07bc Head {h00=0x0014, h01=0x0050, text=»INVKY1 EQU X'9E'«, t00=0x0004, t01=0x0168}
0x07bc…07d4 Head {h00=0x0014, h01=0x0050, text=»KONKY1 EQU X'BF'«, t00=0x0004, t01=0x0180}
0x07d4…07ee Head {h00=0x0016, h01=0x0050, text=»KVITKY1 EQU X'B5' «, t00=0x0005, t01=0x0008}
0x07ee…0808 Head {h00=0x0016, h01=0x0050, text=»SUPLKY1 EQU X'9D' «, t00=0x0005, t01=0x0022}
0x0808…0820 Head {h00=0x0014, h01=0x0050, text=»SUMKY1 EQU X'9F'«, t00=0x0005, t01=0x003c}
0x0820…0838 Head {h00=0x0014, h01=0x0050, text=»ADMKY1 EQU X'A0'«, t00=0x0005, t01=0x0054}
0x0838…0850 Head {h00=0x0014, h01=0x0050, text=»DIVKY1 EQU X'9C'«, t00=0x0005, t01=0x006c}
0x0850…086a Head {h00=0x0016, h01=0x0050, text=»HBOGKY1 EQU X'FF' «, t00=0x0005, t01=0x0084}
0x086a…0884 Head {h00=0x0016, h01=0x0050, text=»DEBPKY1 EQU X'FF' «, t00=0x0005, t01=0x009e}
0x0884…089c Head {h00=0x0014, h01=0x0050, text=»REMKY1 EQU X'FF'«, t00=0x0005, t01=0x00b8}
0x089c…08b4 Head {h00=0x0014, h01=0x0050, text=»TRSEL EQU X'FF' «, t00=0x0005, t01=0x00d0}
0x08b4…08cc Head {h00=0x0014, h01=0x0050, text=»ONKY1 EQU X'B6' «, t00=0x0005, t01=0x00e8}
0x08cc…08e4 Head {h00=0x0014, h01=0x0050, text=»SP1KY1 EQU X'9A'«, t00=0x0005, t01=0x0100}
0x08e4…08fc Head {h00=0x0014, h01=0x0050, text=»A45KY1 EQU X'9B'«, t00=0x0005, t01=0x0118}
0x08fc…0906 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0130}
0x0906…091e Head {h00=0x0014, h01=0x0050, text=»FTBKY1 EQU X'AB'«, t00=0x0005, t01=0x013a}
0x091e…0936 Head {h00=0x0014, h01=0x0050, text=»BTBKY1 EQU X'AA'«, t00=0x0005, t01=0x0152}
0x0936…094e Head {h00=0x0014, h01=0x0050, text=»INSKY1 EQU X'B0'«, t00=0x0005, t01=0x016a}
0x094e…0966 Head {h00=0x0014, h01=0x0050, text=»DELKY1 EQU X'B1'«, t00=0x0005, t01=0x0182}
0x0966…097e Head {h00=0x0014, h01=0x0050, text=»CL1KY1 EQU X'80'«, t00=0x0006, t01=0x000a}
0x097e…0996 Head {h00=0x0014, h01=0x0050, text=»CL2KY1 EQU X'9A'«, t00=0x0006, t01=0x0022}
0x0996…09ae Head {h00=0x0014, h01=0x0050, text=»CL3KY1 EQU X'95'«, t00=0x0006, t01=0x003a}
0x09ae…09c6 Head {h00=0x0014, h01=0x0050, text=»OUTKY1 EQU X'A0'«, t00=0x0006, t01=0x0052}
0x09c6…09d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x006a}
0x09d0…09ea Head {h00=0x0016, h01=0x0050, text=»BSPKY2 EQU BSPKY1 «, t00=0x0006, t01=0x0074}
0x09ea…0a04 Head {h00=0x0016, h01=0x0050, text=»CANKY2 EQU CANKY1 «, t00=0x0006, t01=0x008e}
0x0a04…0a1e Head {h00=0x0016, h01=0x0050, text=»EORKY2 EQU EORKY1 «, t00=0x0006, t01=0x00a8}
0x0a1e…0a38 Head {h00=0x0016, h01=0x0050, text=»MACKY2 EQU MACKY1 «, t00=0x0006, t01=0x00c2}
0x0a38…0a54 Head {h00=0x0018, h01=0x0050, text=»FTABKY2 EQU FTABKY1 «, t00=0x0006, t01=0x00dc}
0x0a54…0a70 Head {h00=0x0018, h01=0x0050, text=»BTABKY2 EQU BTABKY1 «, t00=0x0006, t01=0x00f8}
0x0a70…0a8a Head {h00=0x0016, h01=0x0050, text=»DUPKY2 EQU DUPKY1 «, t00=0x0006, t01=0x0114}
0x0a8a…0aa4 Head {h00=0x0016, h01=0x0050, text=»EDTKY2 EQU EDTKY1 «, t00=0x0006, t01=0x012e}
0x0aa4…0ac0 Head {h00=0x0018, h01=0x0050, text=»SLUTKY2 EQU SLUTKY1 «, t00=0x0006, t01=0x0148}
0x0ac0…0ada Head {h00=0x0016, h01=0x0050, text=»KREKY2 EQU KREKY1 «, t00=0x0006, t01=0x0164}
0x0ada…0af4 Head {h00=0x0016, h01=0x0050, text=»REGKY2 EQU REGKY1 «, t00=0x0006, t01=0x017e}
0x0af4…0b0e Head {h00=0x0016, h01=0x0050, text=»ADMKY2 EQU ADMKY1 «, t00=0x0007, t01=0x0008}
0x0b0e…0b28 Head {h00=0x0016, h01=0x0050, text=»SPGKY2 EQU SPGKY1 «, t00=0x0007, t01=0x0022}
0x0b28…0b42 Head {h00=0x0016, h01=0x0050, text=»KONKY2 EQU KONKY1 «, t00=0x0007, t01=0x003c}
0x0b42…0b5e Head {h00=0x0018, h01=0x0050, text=»KVITKY2 EQU KVITKY1 «, t00=0x0007, t01=0x0056}
0x0b5e…0b76 Head {h00=0x0014, h01=0x0050, text=»ONKY2 EQU ONKY1 «, t00=0x0007, t01=0x0072}
0x0b76…0b90 Head {h00=0x0016, h01=0x0050, text=»SP1KY2 EQU SP1KY1 «, t00=0x0007, t01=0x008a}
0x0b90…0baa Head {h00=0x0016, h01=0x0050, text=»A45KY2 EQU A45KY1 «, t00=0x0007, t01=0x00a4}
0x0baa…0bb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00be}
0x0bb4…0bdc Head {h00=0x0024, h01=0x0050, text=»* FIRST INCLUDE KEY VALUES, «, t00=0x0007, t01=0x00c8}
0x0bdc…0c0e Head {h00=0x002e, h01=0x0050, text=»* THEN INCLUDE SPECIAL SCREEN FORMATS «, t00=0x0007, t01=0x00f0}
0x0c0e…0c4e Head {h00=0x003c, h01=0x0050, text=»SPKTAB1 KTAB BSPKY1,CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C«, t00=0x0007, t01=0x0122}
0x0c4e…0c90 Head {h00=0x003e, h01=0x0050, text=» FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C «, t00=0x0007, t01=0x0162}
0x0c90…0cba Head {h00=0x0026, h01=0x0050, text=» COPKY1,DUPKY1,EDTKY1,SLUTKY1, C«, t00=0x0008, t01=0x0014}
0x0cba…0cec Head {h00=0x002e, h01=0x0050, text=» KREKY1,REGKY2,LISTKY1,SBTKY1,SPGKY1, C «, t00=0x0008, t01=0x003e}
0x0cec…0d2c Head {h00=0x003c, h01=0x0050, text=» CY1KY1,CY2KY1,INVKY1,KONKY1,KVITKY1,SUPLKY1,SUMKY1, C«, t00=0x0008, t01=0x0070}
0x0d2c…0d6a Head {h00=0x003a, h01=0x0050, text=» ADMKY1,CYCKY1,DIVKY1,HBOGKY1,SP1KY1,REMKY1,TRSEL, C«, t00=0x0008, t01=0x00b0}
0x0d6a…0d86 Head {h00=0x0018, h01=0x0050, text=» ONKY1,A45KY1,NOKEY«, t00=0x0008, t01=0x00ee}
0x0d86…0d90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x010a}
0x0d90…0dd0 Head {h00=0x003c, h01=0x0050, text=»SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C«, t00=0x0008, t01=0x0114}
0x0dd0…0e12 Head {h00=0x003e, h01=0x0050, text=» FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C «, t00=0x0008, t01=0x0154}
0x0e12…0e3c Head {h00=0x0026, h01=0x0050, text=» COPKY1,NOKEY,EDTKY1,SLUTKY1, C «, t00=0x0009, t01=0x0008}
0x0e3c…0e68 Head {h00=0x0028, h01=0x0050, text=» KREKY1,NOKEY,NOKEY,NOKEY,NOKEY, C«, t00=0x0009, t01=0x0032}
0x0e68…0ea0 Head {h00=0x0034, h01=0x0050, text=» NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C «, t00=0x0009, t01=0x005e}
0x0ea0…0eda Head {h00=0x0036, h01=0x0050, text=» ADMKY1,CYCKY1,NOKEY,NOKEY,NOKEY,NOKEY,TRSEL, C «, t00=0x0009, t01=0x0096}
0x0eda…0ef6 Head {h00=0x0018, h01=0x0050, text=» NOKEY,A45KY1,NOKEY«, t00=0x0009, t01=0x00d0}
0x0ef6…0f00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00ec}
0x0f00…0f34 Head {h00=0x0030, h01=0x0050, text=»SPKTAB3 KTAB FTBKY1,BTBKY1,INSKY1,DELKY1, C«, t00=0x0009, t01=0x00f6}
0x0f34…0f5a Head {h00=0x0022, h01=0x0050, text=» CL1KY1,CL2KY1,CL3KY1,OUTKY1 «, t00=0x0009, t01=0x012a}
0x0f5a…0f64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0150}
0x0f64…0fa6 Head {h00=0x003e, h01=0x0050, text=»SPKTAB12 KTAB BSPKY2,CANKY2,NOKEY,EORKY2,NOKEY,MACKY2, C «, t00=0x0009, t01=0x015a}
0x0fa6…0fdc Head {h00=0x0032, h01=0x0050, text=» FTABKY2,BTABKY2,NOKEY,NOKEY,NOKEY,NOKEY, C «, t00=0x000a, t01=0x000c}
0x0fdc…1012 Head {h00=0x0032, h01=0x0050, text=» NOKEY,NOKEY,NOKEY,DUPKY2,EDTKY2,SLUTKY2, C «, t00=0x000a, t01=0x0042}
0x1012…104a Head {h00=0x0034, h01=0x0050, text=» KREKY2,REGKY2,ADMKY2,SPGKY2,KONKY2,KVITKY2, C«, t00=0x000a, t01=0x0078}
0x104a…1060 Head {h00=0x0012, h01=0x0050, text=» ONKY2,A45KY2«, t00=0x000a, t01=0x00b0}
0x1060…106a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00c6}
0x106a…10ac Head {h00=0x003e, h01=0x0050, text=»SPKTAB22 KTAB BSPKY2,CANKY2,NOKEY,EORKY2,NOKEY,MACKY2, C «, t00=0x000a, t01=0x00d0}
0x10ac…10e2 Head {h00=0x0032, h01=0x0050, text=» FTABKY2,BTABKY2,NOKEY,NOKEY,NOKEY,NOKEY, C «, t00=0x000a, t01=0x0112}
0x10e2…1116 Head {h00=0x0030, h01=0x0050, text=» NOKEY,NOKEY,NOKEY,NOKEY,EDTKY2,SLUTKY2, C«, t00=0x000a, t01=0x0148}
0x1116…114e Head {h00=0x0034, h01=0x0050, text=» KREKY2,NOKEY,ADMKY2,SPGKY2,KONKY2,KVITKY2, C «, t00=0x000a, t01=0x017c}
0x114e…1164 Head {h00=0x0012, h01=0x0050, text=» ONKY2,A45KY2«, t00=0x000b, t01=0x0024}
0x1164…116e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x003a}
0x116e…119c Head {h00=0x002a, h01=0x0050, text=»* INQUIRY KEYTABLES (SPKEY=3)«, t00=0x000b, t01=0x0044}
0x119c…11a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0072}
0x11a6…11e6 Head {h00=0x003c, h01=0x0050, text=»SPKTAB13 KTAB BSPKY1,NOKEY,CANKY1,NOKEY,NOKEY,MACKY1, C«, t00=0x000b, t01=0x007c}
0x11e6…1218 Head {h00=0x002e, h01=0x0050, text=» NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C «, t00=0x000b, t01=0x00bc}
0x1218…124c Head {h00=0x0030, h01=0x0050, text=» NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,SLUTKY1, C «, t00=0x000b, t01=0x00ee}
0x124c…127e Head {h00=0x002e, h01=0x0050, text=» NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C «, t00=0x000b, t01=0x0122}
0x127e…12a4 Head {h00=0x0022, h01=0x0050, text=» NOKEY,INVKY1,KONKY1,KVITKY1 «, t00=0x000b, t01=0x0154}
0x12a4…12ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x017a}
0x12ae…12ee Head {h00=0x003c, h01=0x0050, text=»SPKTAB23 KTAB BSPKY1,NOKEY,CANKY1,NOKEY,NOKEY,MACKY1, C«, t00=0x000b, t01=0x0184}
0x12ee…1320 Head {h00=0x002e, h01=0x0050, text=» NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C «, t00=0x000c, t01=0x0034}
0x1320…1352 Head {h00=0x002e, h01=0x0050, text=» NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C «, t00=0x000c, t01=0x0066}
0x1352…1384 Head {h00=0x002e, h01=0x0050, text=» NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C «, t00=0x000c, t01=0x0098}
0x1384…13b6 Head {h00=0x002e, h01=0x0050, text=» NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C «, t00=0x000c, t01=0x00ca}
0x13b6…13c6 Head {h00=0x000c, h01=0x0050, text=» ADMKY1«, t00=0x000c, t01=0x00fc}
0x13c6…13d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x010c}
0x13d0…13da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0116}
0x13da…1418 Head {h00=0x003a, h01=0x0050, text=»SPFTBERR FTABLE ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C«, t00=0x000c, t01=0x0120}
0x1418…1448 Head {h00=0x002c, h01=0x0050, text=» ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C«, t00=0x000c, t01=0x015e}
0x1448…1478 Head {h00=0x002c, h01=0x0050, text=» ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C«, t00=0x000c, t01=0x018e}
0x1478…14a8 Head {h00=0x002c, h01=0x0050, text=» ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C«, t00=0x000d, t01=0x002e}
0x14a8…14d8 Head {h00=0x002c, h01=0x0050, text=» ERRDSK,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C«, t00=0x000d, t01=0x005e}
0x14d8…150e Head {h00=0x0032, h01=0x0050, text=» ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT WARNINGS «, t00=0x000d, t01=0x008e}
0x150e…1518 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00c4}
0x1518…155e Head {h00=0x0042, h01=0x0050, text=»SPFTBMES FTABLE MSFMT1,MSFMT2,MSFMT3,MSFMT4,MSFMT5,MSFMT6, C «, t00=0x000d, t01=0x00ce}
0x155e…1572 Head {h00=0x0010, h01=0x0050, text=» MSFMT7, C«, t00=0x000d, t01=0x0114}
0x1572…1586 Head {h00=0x0010, h01=0x0050, text=» MSFMT8, C«, t00=0x000d, t01=0x0128}
0x1586…159a Head {h00=0x0010, h01=0x0050, text=» MSFMT9, C«, t00=0x000d, t01=0x013c}
0x159a…15b0 Head {h00=0x0012, h01=0x0050, text=» MSFMT10, C «, t00=0x000d, t01=0x0150}
0x15b0…15c6 Head {h00=0x0012, h01=0x0050, text=» MSFMT11, C «, t00=0x000d, t01=0x0166}
0x15c6…15dc Head {h00=0x0012, h01=0x0050, text=» MSFMT12, C «, t00=0x000d, t01=0x017c}
0x15dc…15f2 (14, 0, 400) Head {h00=0x0012, h01=0x0050, text=» MSFMT13, C «, t00=0x000e, t01=0x0004}
0x15f2…1604 Head {h00=0x000e, h01=0x0050, text=» MSFMT14 «, t00=0x000e, t01=0x001a}
0x1604…160e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x002c}
0x160e…1618 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0036}
0x1618…162c Head {h00=0x0010, h01=0x0050, text=»ERRFMT FRMT «, t00=0x000e, t01=0x0040}
0x162c…1638 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x000e, t01=0x0054}
0x1638…1650 Head {h00=0x0014, h01=0x0050, text=» FCOPY ='FEJL ' «, t00=0x000e, t01=0x0060}
0x1650…1674 Head {h00=0x0020, h01=0x0050, text=» FMEL 'ZZ9',GSWBCD4 ERRORNR.«, t00=0x000e, t01=0x0078}
0x1674…1682 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x000e, t01=0x009c}
0x1682…168c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00aa}
0x168c…16a0 Head {h00=0x0010, h01=0x0050, text=»ERRDSK FRMT «, t00=0x000e, t01=0x00b4}
0x16a0…16ac Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x000e, t01=0x00c8}
0x16ac…16c8 Head {h00=0x0018, h01=0x0050, text=» FMEL '99B',GTWBCD2 «, t00=0x000e, t01=0x00d4}
0x16c8…16de Head {h00=0x0012, h01=0x0050, text=» FCOPY GSWSTR9«, t00=0x000e, t01=0x00f0}
0x16de…16f8 Head {h00=0x0016, h01=0x0050, text=» FMEL '99',GTWBCD1«, t00=0x000e, t01=0x0106}
0x16f8…1706 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x000e, t01=0x0120}
0x1706…1710 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x012e}
0x1710…1724 Head {h00=0x0010, h01=0x0050, text=»MSFMT1 FRMT «, t00=0x000e, t01=0x0138}
0x1724…1730 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x000e, t01=0x014c}
0x1730…1750 Head {h00=0x001c, h01=0x0050, text=» FCOPY ='SKIFT JOURNAL' «, t00=0x000e, t01=0x0158}
0x1750…175e Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x000e, t01=0x0178}
0x175e…1768 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0186}
0x1768…177c Head {h00=0x0010, h01=0x0050, text=»MSFMT2 FRMT «, t00=0x000e, t01=0x0190}
0x177c…1788 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x000f, t01=0x0014}
0x1788…17a4 Head {h00=0x0018, h01=0x0050, text=» FCOPY ='LINIE NR'«, t00=0x000f, t01=0x0020}
0x17a4…17ba Head {h00=0x0012, h01=0x0050, text=» FILLR '.',1«, t00=0x000f, t01=0x003c}
0x17ba…17c8 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x000f, t01=0x0052}
0x17c8…17d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0060}
0x17d2…17e6 Head {h00=0x0010, h01=0x0050, text=»MSFMT3 FRMT «, t00=0x000f, t01=0x006a}
0x17e6…17f2 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x000f, t01=0x007e}
0x17f2…180e Head {h00=0x0018, h01=0x0050, text=» FTEXT ='NY SIDE. ' «, t00=0x000f, t01=0x008a}
0x180e…181c Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x000f, t01=0x00a6}
0x181c…1826 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00b4}
0x1826…183a Head {h00=0x0010, h01=0x0050, text=»MSFMT4 FRMT «, t00=0x000f, t01=0x00be}
0x183a…1846 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x000f, t01=0x00d2}
0x1846…1864 Head {h00=0x001a, h01=0x0050, text=» FBF TTSUMFLG,FMT4END «, t00=0x000f, t01=0x00de}
0x1864…1874 Head {h00=0x000c, h01=0x0050, text=» FTAB 15«, t00=0x000f, t01=0x00fc}
0x1874…188a Head {h00=0x0012, h01=0x0050, text=» FCOPY GTL8TXT«, t00=0x000f, t01=0x010c}
0x188a…189a Head {h00=0x000c, h01=0x0050, text=» FINP 23«, t00=0x000f, t01=0x0122}
0x189a…18be Head {h00=0x0020, h01=0x0050, text=» FMEL 'ZZZZZVZZ9,99+',GTSUM «, t00=0x000f, t01=0x0132}
0x18be…18ce Head {h00=0x000c, h01=0x0050, text=»FMT4END «, t00=0x000f, t01=0x0156}
0x18ce…18dc Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x000f, t01=0x0166}
0x18dc…18e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0174}
0x18e6…18fa Head {h00=0x0010, h01=0x0050, text=»MSFMT5 FRMT «, t00=0x000f, t01=0x017e}
0x18fa…1906 (16, 0, 400) Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0010, t01=0x0004}
0x1906…191e Head {h00=0x0014, h01=0x0050, text=» FCOPY ='BILAG' «, t00=0x0010, t01=0x0010}
0x191e…192c Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0010, t01=0x0028}
0x192c…1936 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0036}
0x1936…194a Head {h00=0x0010, h01=0x0050, text=»MSFMT6 FRMT «, t00=0x0010, t01=0x0040}
0x194a…1956 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0010, t01=0x0054}
0x1956…1972 Head {h00=0x0018, h01=0x0050, text=» FCOPY ='KONTOKORT' «, t00=0x0010, t01=0x0060}
0x1972…1980 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0010, t01=0x007c}
0x1980…198a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x008a}
0x198a…199e Head {h00=0x0010, h01=0x0050, text=»MSFMT7 FRMT «, t00=0x0010, t01=0x0094}
0x199e…19aa Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0010, t01=0x00a8}
0x19aa…19c0 Head {h00=0x0012, h01=0x0050, text=» FCOPY TTINF1 «, t00=0x0010, t01=0x00b4}
0x19c0…19ce Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0010, t01=0x00ca}
0x19ce…19d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00d8}
0x19d8…19ec Head {h00=0x0010, h01=0x0050, text=»MSFMT8 FRMT «, t00=0x0010, t01=0x00e2}
0x19ec…19f8 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0010, t01=0x00f6}
0x19f8…1a1a Head {h00=0x001e, h01=0x0050, text=» FCOPY ='DISKETTE SKIFT ' «, t00=0x0010, t01=0x0102}
0x1a1a…1a30 Head {h00=0x0012, h01=0x0050, text=» FILLR X'07',1«, t00=0x0010, t01=0x0124}
0x1a30…1a3e Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0010, t01=0x013a}
0x1a3e…1a48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0148}
0x1a48…1a5c Head {h00=0x0010, h01=0x0050, text=»MSFMT9 FRMT «, t00=0x0010, t01=0x0152}
0x1a5c…1a68 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0010, t01=0x0166}
0x1a68…1a84 Head {h00=0x0018, h01=0x0050, text=» FCOPY ='OPSTART. ' «, t00=0x0010, t01=0x0172}
0x1a84…1aa6 Head {h00=0x001e, h01=0x0050, text=» FCOPY ='AFVENT VENLIGST.'«, t00=0x0010, t01=0x018e}
0x1aa6…1ab4 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0011, t01=0x0020}
0x1ab4…1abe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x002e}
0x1abe…1ad2 Head {h00=0x0010, h01=0x0050, text=»MSFMT10 FRMT«, t00=0x0011, t01=0x0038}
0x1ad2…1ade Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0011, t01=0x004c}
0x1ade…1b04 Head {h00=0x0022, h01=0x0050, text=» FMEL 'TTTTTTTTTTTT9-',GTWBCD2«, t00=0x0011, t01=0x0058}
0x1b04…1b12 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0011, t01=0x007e}
0x1b12…1b1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x008c}
0x1b1c…1b30 Head {h00=0x0010, h01=0x0050, text=»MSFMT11 FRMT«, t00=0x0011, t01=0x0096}
0x1b30…1b3c Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0011, t01=0x00aa}
0x1b3c…1b66 Head {h00=0x0026, h01=0x0050, text=»* FCOPY ='OPRET LEV. ' «, t00=0x0011, t01=0x00b6}
0x1b66…1b74 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0011, t01=0x00e0}
0x1b74…1b7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00ee}
0x1b7e…1b92 Head {h00=0x0010, h01=0x0050, text=»MSFMT12 FRMT«, t00=0x0011, t01=0x00f8}
0x1b92…1b9e Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0011, t01=0x010c}
0x1b9e…1bac Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0011, t01=0x0118}
0x1bac…1bb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0126}
0x1bb6…1bca Head {h00=0x0010, h01=0x0050, text=»MSFMT13 FRMT«, t00=0x0011, t01=0x0130}
0x1bca…1bd6 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0011, t01=0x0144}
0x1bd6…1c00 Head {h00=0x0026, h01=0x0050, text=»* FCOPY ='STRAKS CHECK '«, t00=0x0011, t01=0x0150}
0x1c00…1c0e Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0011, t01=0x017a}
0x1c0e…1c18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0188}
0x1c18…1c2c (18, 0, 400) Head {h00=0x0010, h01=0x0050, text=»MSFMT14 FRMT«, t00=0x0012, t01=0x0004}
0x1c2c…1c38 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0012, t01=0x0018}
0x1c38…1c58 Head {h00=0x001c, h01=0x0050, text=» FTEXT 'DISK STANDSET. '«, t00=0x0012, t01=0x0024}
0x1c58…1c7a Head {h00=0x001e, h01=0x0050, text=» FCOPY ='AFVENT VENLIGST.'«, t00=0x0012, t01=0x0044}
0x1c7a…1c90 Head {h00=0x0012, h01=0x0050, text=» FILLR X'07',1«, t00=0x0012, t01=0x0066}
0x1c90…1c9e Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0012, t01=0x007c}
0x1c9e…1cac Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x008a}
0x1cac…1cc0 Head {h00=0x0010, h01=0x0050, text=»SPCLRA PROC «, t00=0x0012, t01=0x0098}
0x1cc0…1cca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00ac}
0x1cca…1d12 Head {h00=0x0044, h01=0x0050, text=»* SPCLRA - CLEAR ALL VARABLE FIELDS BEFORE HANDLING THE PICTURE «, t00=0x0012, t01=0x00b6}
0x1d12…1d1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00fe}
0x1d1c…1d38 Head {h00=0x0018, h01=0x0050, text=» MOVE SPERASE,=W'0' «, t00=0x0012, t01=0x0108}
0x1d38…1d62 Head {h00=0x0026, h01=0x0050, text=» MOVE SPLINTOP,=W'1' WHOLE SCREEN «, t00=0x0012, t01=0x0124}
0x1d62…1d7e Head {h00=0x0018, h01=0x0050, text=» MOVE SPLINLOW,=W'0'«, t00=0x0012, t01=0x014e}
0x1d7e…1d98 Head {h00=0x0016, h01=0x0050, text=» PERF SCREEN,=W'1'«, t00=0x0012, t01=0x016a}
0x1d98…1da4 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0012, t01=0x0184}
0x1da4…1db2 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0012, t01=0x0190}
0x1db2…1dc6 Head {h00=0x0010, h01=0x0050, text=»SPCLRS PROC «, t00=0x0013, t01=0x000e}
0x1dc6…1dd0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0022}
0x1dd0…1e1a Head {h00=0x0046, h01=0x0050, text=»* SPCLRS - CLEAR SOME VARIABLE FIELDS BEFORE HANDLING THE PICTURE «, t00=0x0013, t01=0x002c}
0x1e1a…1e24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0076}
0x1e24…1e40 Head {h00=0x0018, h01=0x0050, text=» MOVE SPERASE,=W'0' «, t00=0x0013, t01=0x0080}
0x1e40…1e6a Head {h00=0x0026, h01=0x0050, text=» MOVE SPLINTOP,=W'1' WHOLE SCREEN «, t00=0x0013, t01=0x009c}
0x1e6a…1e86 Head {h00=0x0018, h01=0x0050, text=» MOVE SPLINLOW,=W'0'«, t00=0x0013, t01=0x00c6}
0x1e86…1ea0 Head {h00=0x0016, h01=0x0050, text=» PERF SCREEN,=W'2'«, t00=0x0013, t01=0x00e2}
0x1ea0…1eac Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0013, t01=0x00fc}
0x1eac…1eba Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0013, t01=0x0108}
0x1eba…1ece Head {h00=0x0010, h01=0x0050, text=»SPCLRN PROC «, t00=0x0013, t01=0x0116}
0x1ece…1ed8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x012a}
0x1ed8…1f20 Head {h00=0x0044, h01=0x0050, text=»* SPCLRN - CLEAR NO VARIABLE FIELDS BEFORE HANDLING THE PICTURE «, t00=0x0013, t01=0x0134}
0x1f20…1f2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x017c}
0x1f2a…1f46 Head {h00=0x0018, h01=0x0050, text=» MOVE SPERASE,=W'0' «, t00=0x0013, t01=0x0186}
0x1f46…1f70 Head {h00=0x0026, h01=0x0050, text=» MOVE SPLINTOP,=W'1' WHOLE SCREEN «, t00=0x0014, t01=0x0012}
0x1f70…1f8c Head {h00=0x0018, h01=0x0050, text=» MOVE SPLINLOW,=W'0'«, t00=0x0014, t01=0x003c}
0x1f8c…1fa6 Head {h00=0x0016, h01=0x0050, text=» PERF SCREEN,=W'3'«, t00=0x0014, t01=0x0058}
0x1fa6…1fb2 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0014, t01=0x0072}
0x1fb2…1fc0 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0014, t01=0x007e}
0x1fc0…1fd2 Head {h00=0x000e, h01=0x0050, text=»SPERR PROC«, t00=0x0014, t01=0x008c}
0x1fd2…1fdc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x009e}
0x1fdc…2010 Head {h00=0x0030, h01=0x0050, text=»* HANDLE ERRORS DETECTED OUTSIDE THE PACKAGE«, t00=0x0014, t01=0x00a8}
0x2010…201a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00dc}
0x201a…2034 Head {h00=0x0016, h01=0x0050, text=» PERF SCREEN,=W'0'«, t00=0x0014, t01=0x00e6}
0x2034…2040 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0014, t01=0x0100}
0x2040…204e Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0014, t01=0x010c}
0x204e…2060 Head {h00=0x000e, h01=0x0050, text=»SPCA PROC «, t00=0x0014, t01=0x011a}
0x2060…206a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x012c}
0x206a…20b2 Head {h00=0x0044, h01=0x0050, text=»* SPCA - AS SPCLRA, BUT ONLY BETWEEN LINES SPLINTOPAND SPLINLOW «, t00=0x0014, t01=0x0136}
0x20b2…20bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x017e}
0x20bc…20d8 Head {h00=0x0018, h01=0x0050, text=» MOVE SPERASE,=W'4' «, t00=0x0014, t01=0x0188}
0x20d8…20f2 Head {h00=0x0016, h01=0x0050, text=» PERF SCREEN,=W'1'«, t00=0x0015, t01=0x0014}
0x20f2…20fe Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0015, t01=0x002e}
0x20fe…210c Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0015, t01=0x003a}
0x210c…211e Head {h00=0x000e, h01=0x0050, text=»SPCN PROC «, t00=0x0015, t01=0x0048}
0x211e…2128 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x005a}
0x2128…2170 Head {h00=0x0044, h01=0x0050, text=»* SPCN - AS SPCLRN, BUT ONLY BETWEEN LINES SPLINTOP AND SPLINLOW«, t00=0x0015, t01=0x0064}
0x2170…217a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00ac}
0x217a…2196 Head {h00=0x0018, h01=0x0050, text=» MOVE SPERASE,=W'4' «, t00=0x0015, t01=0x00b6}
0x2196…21b0 Head {h00=0x0016, h01=0x0050, text=» PERF SCREEN,=W'3'«, t00=0x0015, t01=0x00d2}
0x21b0…21bc Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0015, t01=0x00ec}
0x21bc…21ca Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0015, t01=0x00f8}
0x21ca…21d2 Head {h00=0x0004, h01=0x0050, t00=0x0015, t01=0x0106}
0x21d2…21ea Head {h00=0x0014, h01=0x0050, text=»SCREEN PROC $OPT«, t00=0x0015, t01=0x010e}
0x21ea…21f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0126}
0x21f4…221c Head {h00=0x0024, h01=0x0050, text=»* SCREEN SCREEN HANDLING MODULE «, t00=0x0015, t01=0x0130}
0x221c…2226 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0158}
0x2226…2248 Head {h00=0x001e, h01=0x0050, text=»* CALL: PERF SCREEN,<$OPT>«, t00=0x0015, t01=0x0162}
0x2248…2252 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0184}
0x2252…2274 Head {h00=0x001e, h01=0x0050, text=» PLIT $OPT OPTIO SELECTOR «, t00=0x0015, t01=0x018e}
0x2274…227c Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x0020}
0x227c…22a6 Head {h00=0x0026, h01=0x0050, text=» CLEAR SPWARNFL CLEAR WARNING FLAG«, t00=0x0016, t01=0x0028}
0x22a6…22d2 Head {h00=0x0028, h01=0x0050, text=» MOVE SPBINW2,$OPT MOVE TO VARIABLE «, t00=0x0016, t01=0x0052}
0x22d2…22f8 Head {h00=0x0022, h01=0x0050, text=» TO ALLOW INSTR.S CMP AND IB«, t00=0x0016, t01=0x007e}
0x22f8…2322 Head {h00=0x0026, h01=0x0050, text=» CMP SPBINW2,='0' "SPERR" ENTRY ? «, t00=0x0016, t01=0x00a4}
0x2322…233c Head {h00=0x0016, h01=0x0050, text=» BE ERRPRINT YES !«, t00=0x0016, t01=0x00ce}
0x233c…2344 Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x00e8}
0x2344…2376 Head {h00=0x002e, h01=0x0050, text=» TBT SPPROMPT,ENTIRE JUMP IF ENTIRE FORMAT«, t00=0x0016, t01=0x00f0}
0x2376…2394 Head {h00=0x001a, h01=0x0050, text=» SHOULD BE DISPLAYED«, t00=0x0016, t01=0x0122}
0x2394…239e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0140}
0x239e…23c0 Head {h00=0x001e, h01=0x0050, text=»* ONLY VARIABLE FIELDS «, t00=0x0016, t01=0x014a}
0x23c0…23ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x016c}
0x23ca…2406 Head {h00=0x0038, h01=0x0050, text=» IB SPBINW2,CLEARA,CLEARS,CONT JUMP ON ROUTINE INDEX«, t00=0x0016, t01=0x0176}
0x2406…2410 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0022}
0x2410…241e Head {h00=0x000a, h01=0x0050, text=»CLEARA«, t00=0x0017, t01=0x002c}
0x241e…245a Head {h00=0x0038, h01=0x0050, text=» ERASE 10,SPLINTOP,SPLINLOW ERASE ALL FROM 1 AND UP «, t00=0x0017, t01=0x003a}
0x245a…2468 Head {h00=0x000a, h01=0x0050, text=» THOME«, t00=0x0017, t01=0x0076}
0x2468…2478 Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x0017, t01=0x0084}
0x2478…2482 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0094}
0x2482…2490 Head {h00=0x000a, h01=0x0050, text=»CLEARS«, t00=0x0017, t01=0x009e}
0x2490…24cc Head {h00=0x0038, h01=0x0050, text=» ERASE 5,SPLINTOP,SPLINLOW ERASE SOME FROM 1 AND UP «, t00=0x0017, t01=0x00ac}
0x24cc…24dc Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x0017, t01=0x00e8}
0x24dc…24e4 Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x00f8}
0x24e4…2506 Head {h00=0x001e, h01=0x0050, text=»* DISPLAY ENTIRE FORMAT«, t00=0x0017, t01=0x0100}
0x2506…2514 Head {h00=0x000a, h01=0x0050, text=»ENTIRE«, t00=0x0017, t01=0x0122}
0x2514…2550 Head {h00=0x0038, h01=0x0050, text=» IB SPBINW2,ECLRA,ECLRS,ECLRN JUMP ON ROUTINE INDEX «, t00=0x0017, t01=0x0130}
0x2550…2570 Head {h00=0x001c, h01=0x0050, text=»* CLEAR ALL VARIABLES«, t00=0x0017, t01=0x016c}
0x2570…257e Head {h00=0x000a, h01=0x0050, text=»ECLRA «, t00=0x0017, t01=0x018c}
0x257e…25ac Head {h00=0x002a, h01=0x0050, text=» ERASE 11,SPLINTOP,SPLINLOW CLEAR ALL «, t00=0x0018, t01=0x000a}
0x25ac…25c0 Head {h00=0x0010, h01=0x0050, text=» IN MEMORY«, t00=0x0018, t01=0x0038}
0x25c0…25d0 Head {h00=0x000c, h01=0x0050, text=» B ECLRN«, t00=0x0018, t01=0x004c}
0x25d0…25da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x005c}
0x25da…25fc Head {h00=0x001e, h01=0x0050, text=»* CLEAR SOME VARIABLES «, t00=0x0018, t01=0x0066}
0x25fc…2606 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0088}
0x2606…2614 Head {h00=0x000a, h01=0x0050, text=»ECLRS «, t00=0x0018, t01=0x0092}
0x2614…264e Head {h00=0x0036, h01=0x0050, text=» ERASE 6,SPLINTOP,SPLINLOW CLEAR SOME FIELDS FROM «, t00=0x0018, t01=0x00a0}
0x264e…266c Head {h00=0x001a, h01=0x0050, text=» 1 AND UP IN MEMORY «, t00=0x0018, t01=0x00da}
0x266c…2696 Head {h00=0x0026, h01=0x0050, text=»* CLEAR NO VARIABLES IN MEMORY «, t00=0x0018, t01=0x00f8}
0x2696…26a4 Head {h00=0x000a, h01=0x0050, text=»ECLRN «, t00=0x0018, t01=0x0122}
0x26a4…26d4 Head {h00=0x002c, h01=0x0050, text=» IB SPERASE,ECLRN1,ECLRN2,ECLRN3,ECLRN4 «, t00=0x0018, t01=0x0130}
0x26d4…26f8 Head {h00=0x0020, h01=0x0050, text=» DISPLAY 0,SPLINTOP,SPLINLOW«, t00=0x0018, t01=0x0160}
0x26f8…2708 Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x0018, t01=0x0184}
0x2708…2716 (25, 0, 400) Head {h00=0x000a, h01=0x0050, text=»ECLRN1«, t00=0x0019, t01=0x0004}
0x2716…273a Head {h00=0x0020, h01=0x0050, text=» DISPLAY 1,SPLINTOP,SPLINLOW«, t00=0x0019, t01=0x0012}
0x273a…274a Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x0019, t01=0x0036}
0x274a…2758 Head {h00=0x000a, h01=0x0050, text=»ECLRN2«, t00=0x0019, t01=0x0046}
0x2758…277c Head {h00=0x0020, h01=0x0050, text=» DISPLAY 2,SPLINTOP,SPLINLOW«, t00=0x0019, t01=0x0054}
0x277c…278c Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x0019, t01=0x0078}
0x278c…279a Head {h00=0x000a, h01=0x0050, text=»ECLRN3«, t00=0x0019, t01=0x0088}
0x279a…27be Head {h00=0x0020, h01=0x0050, text=» DISPLAY 3,SPLINTOP,SPLINLOW«, t00=0x0019, t01=0x0096}
0x27be…27ce Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x0019, t01=0x00ba}
0x27ce…27dc Head {h00=0x000a, h01=0x0050, text=»ECLRN4«, t00=0x0019, t01=0x00ca}
0x27dc…2800 Head {h00=0x0020, h01=0x0050, text=» DISPLAY 4,SPLINTOP,SPLINLOW«, t00=0x0019, t01=0x00d8}
0x2800…280c Head {h00=0x0008, h01=0x0050, text=»CONT«, t00=0x0019, t01=0x00fc}
0x280c…2836 Head {h00=0x0026, h01=0x0050, text=» GETABX SPBINW4 GET CURRENT INDEX «, t00=0x0019, t01=0x0108}
0x2836…2862 Head {h00=0x0028, h01=0x0050, text=» BL KTHOME JUMP IF NO CURRENT FIELD «, t00=0x0019, t01=0x0132}
0x2862…2870 Head {h00=0x000a, h01=0x0050, text=»CONT5 «, t00=0x0019, t01=0x015e}
0x2870…28aa Head {h00=0x0036, h01=0x0050, text=» GETFLD 0,SPBINW4,SPBINW3 SEARCH CURRENT POSITION «, t00=0x0019, t01=0x016c}
0x28aa…28cc Head {h00=0x001e, h01=0x0050, text=» BZ SETCREAD JUMP IF FOUND«, t00=0x001a, t01=0x0016}
0x28cc…28f2 Head {h00=0x0022, h01=0x0050, text=» BL KTHOME POSITION NOT FOUND «, t00=0x001a, t01=0x0038}
0x28f2…28fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x005e}
0x28fc…2920 Head {h00=0x0020, h01=0x0050, text=»* COMPULSORY FIELD FOUND «, t00=0x001a, t01=0x0068}
0x2920…292a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x008c}
0x292a…2954 Head {h00=0x0026, h01=0x0050, text=» MOVE SPBINW4,SPBINW3 CHANGE INDEX«, t00=0x001a, t01=0x0096}
0x2954…2972 Head {h00=0x001a, h01=0x0050, text=» B CONT5 SEARCH AGAIN «, t00=0x001a, t01=0x00c0}
0x2972…297a Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x00de}
0x297a…2984 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00e6}
0x2984…29ae Head {h00=0x0026, h01=0x0050, text=»* SET CURSOR AND READ KEYBOARD «, t00=0x001a, t01=0x00f0}
0x29ae…29b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x011a}
0x29b8…29c8 Head {h00=0x000c, h01=0x0050, text=»SETCREAD«, t00=0x001a, t01=0x0124}
0x29c8…29f4 Head {h00=0x0028, h01=0x0050, text=» SETCUR SET CURSOR ON CURRENT FIELD«, t00=0x001a, t01=0x0134}
0x29f4…29fc Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x0160}
0x29fc…2a06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0168}
0x2a06…2a34 Head {h00=0x002a, h01=0x0050, text=»* READ TO CURRENT FIELD ON DISPLAY «, t00=0x001a, t01=0x0172}
0x2a34…2a3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0010}
0x2a3e…2a4c Head {h00=0x000a, h01=0x0050, text=»READIN«, t00=0x001b, t01=0x001a}
0x2a4c…2a6e Head {h00=0x001e, h01=0x0050, text=»* SET FLAG IF AUTODUP «, t00=0x001b, t01=0x0028}
0x2a6e…2a8c Head {h00=0x001a, h01=0x0050, text=»* USES VERIF-FIELD«, t00=0x001b, t01=0x004a}
0x2a8c…2aa8 Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW2,=W'3' «, t00=0x001b, t01=0x0068}
0x2aa8…2ac4 Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW1,=W'1' «, t00=0x001b, t01=0x0084}
0x2ac4…2ad6 Head {h00=0x000e, h01=0x0050, text=» TSTCTL 6 «, t00=0x001b, t01=0x00a0}
0x2ad6…2ae8 Head {h00=0x000e, h01=0x0050, text=» BOK DYKIN«, t00=0x001b, t01=0x00b2}
0x2ae8…2b02 Head {h00=0x0016, h01=0x0050, text=» GETCTL 0,SPBINW3 «, t00=0x001b, t01=0x00c4}
0x2b02…2b28 Head {h00=0x0022, h01=0x0050, text=» MOVE SPBINW1,CFLTDEX(SPBINW3)«, t00=0x001b, t01=0x00de}
0x2b28…2b4c Head {h00=0x0020, h01=0x0050, text=» CMP GSSWITCH(SPBINW1),CBIN0«, t00=0x001b, t01=0x0104}
0x2b4c…2b5e Head {h00=0x000e, h01=0x0050, text=» BE DYKIN «, t00=0x001b, t01=0x0128}
0x2b5e…2b7a Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW1,CBIN1 «, t00=0x001b, t01=0x013a}
0x2b7a…2b8c Head {h00=0x000e, h01=0x0050, text=» BL DYK20 «, t00=0x001b, t01=0x0156}
0x2b8c…2ba8 Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW2,CBIN15«, t00=0x001b, t01=0x0168}
0x2ba8…2bb8 Head {h00=0x000c, h01=0x0050, text=» B DYK20«, t00=0x001b, t01=0x0184}
0x2bb8…2bc2 (28, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0004}
0x2bc2…2bd0 Head {h00=0x000a, h01=0x0050, text=»DYKIN «, t00=0x001c, t01=0x000e}
0x2bd0…2bf4 Head {h00=0x0020, h01=0x0050, text=» IB SPKEY,DYK05,DYK10,DYK15 «, t00=0x001c, t01=0x001c}
0x2bf4…2c02 Head {h00=0x000a, h01=0x0050, text=»DYK05 «, t00=0x001c, t01=0x0040}
0x2c02…2c34 Head {h00=0x002e, h01=0x0050, text=» DYKI SPINPUT,SPKTAB1,SPKTAB2,SPBINW1, C «, t00=0x001c, t01=0x004e}
0x2c34…2c4e Head {h00=0x0016, h01=0x0050, text=» SPBINW2,SPBINW4 «, t00=0x001c, t01=0x0080}
0x2c4e…2c60 Head {h00=0x000e, h01=0x0050, text=» B DYKOUT «, t00=0x001c, t01=0x009a}
0x2c60…2c6e Head {h00=0x000a, h01=0x0050, text=»DYK10 «, t00=0x001c, t01=0x00ac}
0x2c6e…2ca2 Head {h00=0x0030, h01=0x0050, text=» DYKI SPINPUT,SPKTAB12,SPKTAB22,SPBINW1, C «, t00=0x001c, t01=0x00ba}
0x2ca2…2cbc Head {h00=0x0016, h01=0x0050, text=» SPBINW2,SPBINW4 «, t00=0x001c, t01=0x00ee}
0x2cbc…2cce Head {h00=0x000e, h01=0x0050, text=» B DYKOUT «, t00=0x001c, t01=0x0108}
0x2cce…2cdc Head {h00=0x000a, h01=0x0050, text=»DYK15 «, t00=0x001c, t01=0x011a}
0x2cdc…2d10 Head {h00=0x0030, h01=0x0050, text=» DYKI SPINPUT,SPKTAB13,SPKTAB23,SPBINW1, C «, t00=0x001c, t01=0x0128}
0x2d10…2d2a Head {h00=0x0016, h01=0x0050, text=» SPBINW2,SPBINW4 «, t00=0x001c, t01=0x015c}
0x2d2a…2d38 Head {h00=0x000a, h01=0x0050, text=»DYKOUT«, t00=0x001c, t01=0x0176}
0x2d38…2d50 Head {h00=0x0014, h01=0x0050, text=» BL ERRPRT ERROR«, t00=0x001c, t01=0x0184}
0x2d50…2d66 Head {h00=0x0012, h01=0x0050, text=» CLEAR SPDUPL «, t00=0x001d, t01=0x000c}
0x2d66…2d80 Head {h00=0x0016, h01=0x0050, text=» CMP SPBINW2,=W'0'«, t00=0x001d, t01=0x0022}
0x2d80…2d9c Head {h00=0x0018, h01=0x0050, text=» BE RETUR POWER OFF «, t00=0x001d, t01=0x003c}
0x2d9c…2db4 Head {h00=0x0014, h01=0x0050, text=» BG DYK20 NORMAL«, t00=0x001d, t01=0x0058}
0x2db4…2de0 Head {h00=0x0028, h01=0x0050, text=» ADD SPBINW2,=W'9' KEYSWITCH TURNED «, t00=0x001d, t01=0x0070}
0x2de0…2df8 Head {h00=0x0014, h01=0x0050, text=» IB SPBINW2, C «, t00=0x001d, t01=0x009c}
0x2df8…2e2a Head {h00=0x002e, h01=0x0050, text=» SET1,SET2,SET3,SET4,CLR1,CLR2,CLR3,CLR4 «, t00=0x001d, t01=0x00b4}
0x2e2a…2e3a Head {h00=0x000c, h01=0x0050, text=» B RETUR«, t00=0x001d, t01=0x00e6}
0x2e3a…2e46 Head {h00=0x0008, h01=0x0050, text=»SET1«, t00=0x001d, t01=0x00f6}
0x2e46…2e5a Head {h00=0x0010, h01=0x0050, text=» SET TTKEY1 «, t00=0x001d, t01=0x0102}
0x2e5a…2e6a Head {h00=0x000c, h01=0x0050, text=» B DYKIN«, t00=0x001d, t01=0x0116}
0x2e6a…2e76 Head {h00=0x0008, h01=0x0050, text=»SET2«, t00=0x001d, t01=0x0126}
0x2e76…2e8a Head {h00=0x0010, h01=0x0050, text=» SET TTKEY2 «, t00=0x001d, t01=0x0132}
0x2e8a…2e9a Head {h00=0x000c, h01=0x0050, text=» B DYKIN«, t00=0x001d, t01=0x0146}
0x2e9a…2ea6 Head {h00=0x0008, h01=0x0050, text=»SET3«, t00=0x001d, t01=0x0156}
0x2ea6…2eba Head {h00=0x0010, h01=0x0050, text=» SET TTKEY3 «, t00=0x001d, t01=0x0162}
0x2eba…2eca Head {h00=0x000c, h01=0x0050, text=» B DYKIN«, t00=0x001d, t01=0x0176}
0x2eca…2ed6 Head {h00=0x0008, h01=0x0050, text=»SET4«, t00=0x001d, t01=0x0186}
0x2ed6…2eea (30, 0, 398) Head {h00=0x0010, h01=0x0050, text=» SET TTKEY4 «, t00=0x001e, t01=0x0004}
0x2eea…2efa Head {h00=0x000c, h01=0x0050, text=» B DYKIN«, t00=0x001e, t01=0x0018}
0x2efa…2f06 Head {h00=0x0008, h01=0x0050, text=»CLR1«, t00=0x001e, t01=0x0028}
0x2f06…2f1c Head {h00=0x0012, h01=0x0050, text=» CLEAR TTKEY1 «, t00=0x001e, t01=0x0034}
0x2f1c…2f2c Head {h00=0x000c, h01=0x0050, text=» B DYKIN«, t00=0x001e, t01=0x004a}
0x2f2c…2f38 Head {h00=0x0008, h01=0x0050, text=»CLR2«, t00=0x001e, t01=0x005a}
0x2f38…2f4e Head {h00=0x0012, h01=0x0050, text=» CLEAR TTKEY2 «, t00=0x001e, t01=0x0066}
0x2f4e…2f5e Head {h00=0x000c, h01=0x0050, text=» B DYKIN«, t00=0x001e, t01=0x007c}
0x2f5e…2f6a Head {h00=0x0008, h01=0x0050, text=»CLR3«, t00=0x001e, t01=0x008c}
0x2f6a…2f80 Head {h00=0x0012, h01=0x0050, text=» CLEAR TTKEY3 «, t00=0x001e, t01=0x0098}
0x2f80…2f90 Head {h00=0x000c, h01=0x0050, text=» B DYKIN«, t00=0x001e, t01=0x00ae}
0x2f90…2f9c Head {h00=0x0008, h01=0x0050, text=»CLR4«, t00=0x001e, t01=0x00be}
0x2f9c…2fb2 Head {h00=0x0012, h01=0x0050, text=» CLEAR TTKEY4 «, t00=0x001e, t01=0x00ca}
0x2fb2…2fc2 Head {h00=0x000c, h01=0x0050, text=» B DYKIN«, t00=0x001e, t01=0x00e0}
0x2fc2…2fcc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00f0}
0x2fcc…2fd6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00fa}
0x2fd6…2fe4 Head {h00=0x000a, h01=0x0050, text=»DYK20 «, t00=0x001e, t01=0x0104}
0x2fe4…2fee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0112}
0x2fee…3002 Head {h00=0x0010, h01=0x0050, text=» PERF DKTEST«, t00=0x001e, t01=0x011c}
0x3002…3018 Head {h00=0x0012, h01=0x0050, text=» BNOK SETCREAD«, t00=0x001e, t01=0x0130}
0x3018…3040 Head {h00=0x0024, h01=0x0050, text=» TBF TTKEY1,DYKRET KEYBOARD OFF «, t00=0x001e, t01=0x0146}
0x3040…3064 Head {h00=0x0020, h01=0x0050, text=» IB SPKEY,DYK30,DYK40,DYK50 «, t00=0x001e, t01=0x016e}
0x3064…3072 (31, 0, 400) Head {h00=0x000a, h01=0x0050, text=»DYK30 «, t00=0x001f, t01=0x0004}
0x3072…3094 Head {h00=0x001e, h01=0x0050, text=» TBF TTKEY2,DYK80 KEYPOS 1«, t00=0x001f, t01=0x0012}
0x3094…30a6 Head {h00=0x000e, h01=0x0050, text=» B DYKRET «, t00=0x001f, t01=0x0034}
0x30a6…30b4 Head {h00=0x000a, h01=0x0050, text=»DYK40 «, t00=0x001f, t01=0x0046}
0x30b4…30d6 Head {h00=0x001e, h01=0x0050, text=» TBT TTKEY2,DYK80 KEYPOS 2«, t00=0x001f, t01=0x0054}
0x30d6…30e4 Head {h00=0x000a, h01=0x0050, text=»DYKRET«, t00=0x001f, t01=0x0076}
0x30e4…30f6 Head {h00=0x000e, h01=0x0050, text=» PERF BELL«, t00=0x001f, t01=0x0084}
0x30f6…310a Head {h00=0x0010, h01=0x0050, text=» B SETCREAD «, t00=0x001f, t01=0x0096}
0x310a…3118 Head {h00=0x000a, h01=0x0050, text=»DYK50 «, t00=0x001f, t01=0x00aa}
0x3118…3126 Head {h00=0x000a, h01=0x0050, text=»DYK80 «, t00=0x001f, t01=0x00b8}
0x3126…3130 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00c6}
0x3130…3148 Head {h00=0x0014, h01=0x0050, text=» KEY SWITCHES «, t00=0x001f, t01=0x00d0}
0x3148…3174 Head {h00=0x0028, h01=0x0050, text=» IB SPBINW2,UPD300,CLEA20 JUMP ON C «, t00=0x001f, t01=0x00e8}
0x3174…3192 Head {h00=0x001a, h01=0x0050, text=» UPDATE,CANC,CANC, C«, t00=0x001f, t01=0x0114}
0x3192…31c4 Head {h00=0x002e, h01=0x0050, text=» UPDATE,UPDATE,UPDATE,UPDATE CONVERTED C «, t00=0x001f, t01=0x0132}
0x31c4…31fc Head {h00=0x0034, h01=0x0050, text=» UPDATE,UPDATE,UPDATE,UPDATE END-OF-ITEM-KEY C «, t00=0x001f, t01=0x0164}
0x31fc…3218 Head {h00=0x0018, h01=0x0050, text=» UPDATE,KDUPL,KEDIT«, t00=0x0020, t01=0x000c}
0x3218…3222 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0020, t01=0x0028}
0x3222…322c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0032}
0x322c…3264 Head {h00=0x0034, h01=0x0050, text=»* HANDLE THE RESPECTIVE KEY AS EOI-KEY FIRST «, t00=0x0020, t01=0x003c}
0x3264…326e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0074}
0x326e…327c Head {h00=0x000a, h01=0x0050, text=»UPDATE«, t00=0x0020, t01=0x007e}
0x327c…32b0 Head {h00=0x0030, h01=0x0050, text=» CBE SPBINW1,='0',UPD350 JUMP IF LENGTH = 0 «, t00=0x0020, t01=0x008c}
0x32b0…32da Head {h00=0x0026, h01=0x0050, text=» GETCTL 3,SPBINW4 GET SCHK-NUMBER «, t00=0x0020, t01=0x00c0}
0x32da…3316 Head {h00=0x0038, h01=0x0050, text=» CBE SPBINW4,='0',UPD050 JUMP IF NOT STANDARD CHECK «, t00=0x0020, t01=0x00ea}
0x3316…3344 Head {h00=0x002a, h01=0x0050, text=» PERFI SPBINW4,SPCHK1,SPCHK2,SPCHK3 C«, t00=0x0020, t01=0x0126}
0x3344…336a Head {h00=0x0022, h01=0x0050, text=» SPCHK4,SPCHK5,SPCHK6,SPCHK7 «, t00=0x0020, t01=0x0154}
0x336a…3394 Head {h00=0x0026, h01=0x0050, text=» IB SPBINW3,UPD050,UPD070,ERRPRINT«, t00=0x0020, t01=0x017a}
0x3394…339e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0014}
0x339e…33c2 Head {h00=0x0020, h01=0x0050, text=»* CONDITIONAL DISPLAYING «, t00=0x0021, t01=0x001e}
0x33c2…33cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0042}
0x33cc…33da Head {h00=0x000a, h01=0x0050, text=»UPD050«, t00=0x0021, t01=0x004c}
0x33da…33f4 Head {h00=0x0016, h01=0x0050, text=» TBT SPDUPL,UPD100«, t00=0x0021, t01=0x005a}
0x33f4…3424 Head {h00=0x002c, h01=0x0050, text=» MOVE SPBINW4,='1' INDICATE COND. DISPL «, t00=0x0021, t01=0x0074}
0x3424…3436 Head {h00=0x000e, h01=0x0050, text=» B UPD200 «, t00=0x0021, t01=0x00a4}
0x3436…3444 Head {h00=0x000a, h01=0x0050, text=»UPD070«, t00=0x0021, t01=0x00b6}
0x3444…346c Head {h00=0x0024, h01=0x0050, text=» GETCTL 0,SPBINW3 GET APPL-VALUE«, t00=0x0021, t01=0x00c4}
0x346c…34a0 Head {h00=0x0030, h01=0x0050, text=» CBNE SPBINW3,='0',UPD210 JUMP IF APPL VALUE«, t00=0x0021, t01=0x00ec}
0x34a0…34b4 Head {h00=0x0010, h01=0x0050, text=» B SETCREAD «, t00=0x0021, t01=0x0120}
0x34b4…34be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0134}
0x34be…34e4 Head {h00=0x0022, h01=0x0050, text=»* UNCONDITIONAL DISPLAYING «, t00=0x0021, t01=0x013e}
0x34e4…34ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0164}
0x34ee…34fc Head {h00=0x000a, h01=0x0050, text=»UPD100«, t00=0x0021, t01=0x016e}
0x34fc…3536 Head {h00=0x0036, h01=0x0050, text=» MOVE SPBINW4,='2' INDICATE UNCONDITIONAL DISPLAY «, t00=0x0021, t01=0x017c}
0x3536…3544 Head {h00=0x000a, h01=0x0050, text=»UPD200«, t00=0x0022, t01=0x0026}
0x3544…356c Head {h00=0x0024, h01=0x0050, text=» GETCTL 0,SPBINW3 GET APPL-VALUE«, t00=0x0022, t01=0x0034}
0x356c…35a2 Head {h00=0x0032, h01=0x0050, text=» CBE SPBINW3,='0',UPD400 JUMP IF NO APPL VALUE«, t00=0x0022, t01=0x005c}
0x35a2…35ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0092}
0x35ac…35d8 Head {h00=0x0028, h01=0x0050, text=»* APPL-VALUE DIFFERENT FROM ZERO «, t00=0x0022, t01=0x009c}
0x35d8…35e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00c8}
0x35e2…35f0 Head {h00=0x000a, h01=0x0050, text=»UPD210«, t00=0x0022, t01=0x00d2}
0x35f0…3604 Head {h00=0x0010, h01=0x0050, text=» PERF SPAPPL«, t00=0x0022, t01=0x00e0}
0x3604…3630 Head {h00=0x0028, h01=0x0050, text=» IB SPBINW3,UPD400,SETCREAD,ERRPRINT«, t00=0x0022, t01=0x00f4}
0x3630…3642 Head {h00=0x000e, h01=0x0050, text=» B UPD400 «, t00=0x0022, t01=0x0120}
0x3642…364c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0132}
0x364c…366e Head {h00=0x001e, h01=0x0050, text=»* OK AFTER APPL CONTROL«, t00=0x0022, t01=0x013c}
0x366e…3694 Head {h00=0x0022, h01=0x0050, text=»* UNCONDITIONAL DISPLAYING «, t00=0x0022, t01=0x015e}
0x3694…369e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0184}
0x369e…36ac Head {h00=0x000a, h01=0x0050, text=»UPD260«, t00=0x0022, t01=0x018e}
0x36ac…36e2 Head {h00=0x0032, h01=0x0050, text=» UPDFLD 1,SPINPUT UPDATE FIELD WITH DISPLAYING«, t00=0x0023, t01=0x000c}
0x36e2…36f0 Head {h00=0x000a, h01=0x0050, text=»UPD300«, t00=0x0023, t01=0x0042}
0x36f0…3728 Head {h00=0x0034, h01=0x0050, text=» CBE SPBINW1,='0',UPD350 SKIP NEXT IF LENGTH = 0«, t00=0x0023, t01=0x0050}
0x3728…3754 Head {h00=0x0028, h01=0x0050, text=» SET SPCHANGE INDICATE CHANGED ITEM «, t00=0x0023, t01=0x0088}
0x3754…3762 Head {h00=0x000a, h01=0x0050, text=»UPD350«, t00=0x0023, t01=0x00b4}
0x3762…3784 Head {h00=0x001e, h01=0x0050, text=»* TAKE CARE OF WARNING«, t00=0x0023, t01=0x00c2}
0x3784…37a0 Head {h00=0x0018, h01=0x0050, text=» TBF SPWARNFL,UPD360«, t00=0x0023, t01=0x00e4}
0x37a0…37ce Head {h00=0x002a, h01=0x0050, text=» MOVE SPBINW1,SPBINW2 STORE KEY VALUE «, t00=0x0023, t01=0x0100}
0x37ce…37f6 Head {h00=0x0024, h01=0x0050, text=» MOVE SPBINW4,=W'26' SET MESSAGE«, t00=0x0023, t01=0x012e}
0x37f6…380a Head {h00=0x0010, h01=0x0050, text=» PERF SPERR «, t00=0x0023, t01=0x0156}
0x380a…3836 Head {h00=0x0028, h01=0x0050, text=» CBNE SPBINW2,CBIN2,UPD360 KOR-KEY ?«, t00=0x0023, t01=0x016a}
0x3836…3866 Head {h00=0x002c, h01=0x0050, text=» MOVE SPBINW2,SPBINW1 RESET OLD KEYVALUE«, t00=0x0024, t01=0x0008}
0x3866…3874 Head {h00=0x000a, h01=0x0050, text=»UPD360«, t00=0x0024, t01=0x0038}
0x3874…389c Head {h00=0x0024, h01=0x0050, text=»* JUMP ON FUNCTION KEY INDEX «, t00=0x0024, t01=0x0046}
0x389c…38c0 Head {h00=0x0020, h01=0x0050, text=» IB SPBINW2,READIN,DUMMY, C«, t00=0x0024, t01=0x006e}
0x38c0…38e4 Head {h00=0x0020, h01=0x0050, text=» KEOI,DUMMY,DUMMY,KTFWD, C«, t00=0x0024, t01=0x0092}
0x38e4…3916 Head {h00=0x002e, h01=0x0050, text=» KTBWD,KTHOME,KTLDOWN,KTLEFT,KTRIGHT, C «, t00=0x0024, t01=0x00b6}
0x3916…3944 Head {h00=0x002a, h01=0x0050, text=» KTDOWN,KTUP,KCOPY,DUMMY,DUMMY,KENTER«, t00=0x0024, t01=0x00e8}
0x3944…3974 Head {h00=0x002c, h01=0x0050, text=» SUB SPBINW2,=W'14' ADJUST EOI-KEY INDEX«, t00=0x0024, t01=0x0116}
0x3974…3982 Head {h00=0x000a, h01=0x0050, text=»DUMMY «, t00=0x0024, t01=0x0146}
0x3982…3990 Head {h00=0x000a, h01=0x0050, text=»RETUR «, t00=0x0024, t01=0x0154}
0x3990…399c Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0024, t01=0x0162}
0x399c…39a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x016e}
0x39a6…39b4 Head {h00=0x000a, h01=0x0050, text=»UPD400«, t00=0x0024, t01=0x0178}
0x39b4…39f0 Head {h00=0x0038, h01=0x0050, text=» CBE SPBINW4,='2',UPD260 JUMP IF UNCONDITIONAL DISPL«, t00=0x0024, t01=0x0186}
0x39f0…3a24 Head {h00=0x0030, h01=0x0050, text=» UPDFLD 0,SPINPUT UPDATE FIELD DISPL. COND. «, t00=0x0025, t01=0x0032}
0x3a24…3a36 Head {h00=0x000e, h01=0x0050, text=» B UPD300 «, t00=0x0025, t01=0x0066}
0x3a36…3a40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0078}
0x3a40…3a48 Head {h00=0x0004, h01=0x0050, t00=0x0025, t01=0x0082}
0x3a48…3a6e Head {h00=0x0022, h01=0x0050, text=»KEOI COMMON END-OF-ITEM KEY «, t00=0x0025, t01=0x008a}
0x3a6e…3a92 Head {h00=0x0020, h01=0x0050, text=»KTFWD TAB. FORWARD 1 STEP «, t00=0x0025, t01=0x00b0}
0x3a92…3aa0 Head {h00=0x000a, h01=0x0050, text=» TFWD «, t00=0x0025, t01=0x00d4}
0x3aa0…3ab2 Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0025, t01=0x00e2}
0x3ab2…3abc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00f4}
0x3abc…3ae4 Head {h00=0x0024, h01=0x0050, text=»KTBWD TABULATION 1 STEP BACKW.«, t00=0x0025, t01=0x00fe}
0x3ae4…3af2 Head {h00=0x000a, h01=0x0050, text=» TBWD «, t00=0x0025, t01=0x0126}
0x3af2…3b04 Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0025, t01=0x0134}
0x3b04…3b0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0146}
0x3b0e…3b34 Head {h00=0x0022, h01=0x0050, text=»KTHOME TAB. TO HOME POSITION«, t00=0x0025, t01=0x0150}
0x3b34…3b42 Head {h00=0x000a, h01=0x0050, text=» THOME«, t00=0x0025, t01=0x0176}
0x3b42…3b54 Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0025, t01=0x0184}
0x3b54…3b5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0008}
0x3b5e…3b8a Head {h00=0x0028, h01=0x0050, text=»KTLDOWN TAB. TO FIRST ON NEXT LINE«, t00=0x0026, t01=0x0012}
0x3b8a…3b9a Head {h00=0x000c, h01=0x0050, text=» TLDOWN «, t00=0x0026, t01=0x003e}
0x3b9a…3bac Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0026, t01=0x004e}
0x3bac…3bb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0060}
0x3bb6…3bd8 Head {h00=0x001e, h01=0x0050, text=»KTLEFT TAB. TO LEFTMOST «, t00=0x0026, t01=0x006a}
0x3bd8…3be6 Head {h00=0x000a, h01=0x0050, text=» TLEFT«, t00=0x0026, t01=0x008c}
0x3be6…3bf8 Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0026, t01=0x009a}
0x3bf8…3c02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00ac}
0x3c02…3c26 Head {h00=0x0020, h01=0x0050, text=»KTRIGHT TAB. TO RIGHTMOST «, t00=0x0026, t01=0x00b6}
0x3c26…3c36 Head {h00=0x000c, h01=0x0050, text=» TRIGHT «, t00=0x0026, t01=0x00da}
0x3c36…3c48 Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0026, t01=0x00ea}
0x3c48…3c52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00fc}
0x3c52…3c6e Head {h00=0x0018, h01=0x0050, text=»KTDOWN TAB 1 DOWN «, t00=0x0026, t01=0x0106}
0x3c6e…3c7c Head {h00=0x000a, h01=0x0050, text=» TDOWN«, t00=0x0026, t01=0x0122}
0x3c7c…3c8e Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0026, t01=0x0130}
0x3c8e…3c98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0142}
0x3c98…3cb0 Head {h00=0x0014, h01=0x0050, text=»KTUP TAB 1 UP «, t00=0x0026, t01=0x014c}
0x3cb0…3cbc Head {h00=0x0008, h01=0x0050, text=» TUP«, t00=0x0026, t01=0x0164}
0x3cbc…3cc4 Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x0170}
0x3cc4…3ce4 Head {h00=0x001c, h01=0x0050, text=»TSTTAB TEST TAB OUTPUT«, t00=0x0026, t01=0x0178}
0x3ce4…3cfa Head {h00=0x0012, h01=0x0050, text=» BE READIN OK «, t00=0x0027, t01=0x0008}
0x3cfa…3d16 Head {h00=0x0018, h01=0x0050, text=» BL READIN NOT FOUND«, t00=0x0027, t01=0x001e}
0x3d16…3d44 Head {h00=0x002a, h01=0x0050, text=» BOFL SETCREAD EMPTY COMPULSORY FIELD «, t00=0x0027, t01=0x003a}
0x3d44…3d4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0068}
0x3d4e…3d58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0072}
0x3d58…3d7c Head {h00=0x0020, h01=0x0050, text=»* CONDITIONAL TABULATION «, t00=0x0027, t01=0x007c}
0x3d7c…3d86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00a0}
0x3d86…3d9a Head {h00=0x0010, h01=0x0050, text=» PERF SPTCHK«, t00=0x0027, t01=0x00aa}
0x3d9a…3db4 Head {h00=0x0016, h01=0x0050, text=» CMP SPBINW3,='0' «, t00=0x0027, t01=0x00be}
0x3db4…3dc8 Head {h00=0x0010, h01=0x0050, text=» BE SETCREAD«, t00=0x0027, t01=0x00d8}
0x3dc8…3dec Head {h00=0x0020, h01=0x0050, text=» IB SPBINW2,DUMMY,DUMMY, C «, t00=0x0027, t01=0x00ec}
0x3dec…3e12 Head {h00=0x0022, h01=0x0050, text=» KTFWD,DUMMY,DUMMY,KTFWD, C «, t00=0x0027, t01=0x0110}
0x3e12…3e38 Head {h00=0x0022, h01=0x0050, text=» KTBWD,KTFWD,KTFWD,KTFWD, C «, t00=0x0027, t01=0x0136}
0x3e38…3e54 Head {h00=0x0018, h01=0x0050, text=» KTBWD,KTFWD,KTBWD «, t00=0x0027, t01=0x015c}
0x3e54…3e94 Head {h00=0x003c, h01=0x0050, text=»* BRANCH LIST EXHAUSTED - SPBINW2 CLOBBERED BY SPTCHK«, t00=0x0027, t01=0x0178}
0x3e94…3e9c Head {h00=0x0004, h01=0x0050, t00=0x0028, t01=0x0028}
0x3e9c…3eb0 Head {h00=0x0010, h01=0x0050, text=» B SETCREAD «, t00=0x0028, t01=0x0030}
0x3eb0…3eba Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0028, t01=0x0044}
0x3eba…3ed4 Head {h00=0x0016, h01=0x0050, text=»KCOPY HARD COPY «, t00=0x0028, t01=0x004e}
0x3ed4…3eee Head {h00=0x0016, h01=0x0050, text=» MOVE SPBINW3,='1'«, t00=0x0028, t01=0x0068}
0x3eee…3f10 Head {h00=0x001e, h01=0x0050, text=» PRINT KVOUCH,SPBINW3,='0'«, t00=0x0028, t01=0x0082}
0x3f10…3f38 Head {h00=0x0024, h01=0x0050, text=» B SETCREAD SET CURSOR AND READ «, t00=0x0028, t01=0x00a4}
0x3f38…3f42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00cc}
0x3f42…3f5e Head {h00=0x0018, h01=0x0050, text=»KDUPL DUPLICATION «, t00=0x0028, t01=0x00d6}
0x3f5e…3f90 Head {h00=0x002e, h01=0x0050, text=» MOVE SPBINW2,='3' INDICATE COMMON EOI-KEY«, t00=0x0028, t01=0x00f2}
0x3f90…3fb2 Head {h00=0x001e, h01=0x0050, text=» DUPL SPINPUT DUPLICATION «, t00=0x0028, t01=0x0124}
0x3fb2…3fc6 Head {h00=0x0010, h01=0x0050, text=» BNZ KDUPL2 «, t00=0x0028, t01=0x0146}
0x3fc6…4000 Head {h00=0x0036, h01=0x0050, text=» COPY GSWSTR1,CBIN0,CBIN1,SPINPUT,CBIN1 GET BYTE 1«, t00=0x0028, t01=0x015a}
0x4000…4022 (41, 0, 400) Head {h00=0x001e, h01=0x0050, text=» CBE GSWSTR1,=X'00',KDUPL2«, t00=0x0029, t01=0x0004}
0x4022…4054 Head {h00=0x002e, h01=0x0050, text=» MOVE SPBINW1,='10' SET LENGTH IN DUPFIELD«, t00=0x0029, t01=0x0026}
0x4054…4068 Head {h00=0x0010, h01=0x0050, text=» SET SPDUPL «, t00=0x0029, t01=0x0058}
0x4068…4086 Head {h00=0x001a, h01=0x0050, text=» B UPDATE DUPL ALLOWED«, t00=0x0029, t01=0x006c}
0x4086…4094 Head {h00=0x000a, h01=0x0050, text=»KDUPL2«, t00=0x0029, t01=0x008a}
0x4094…40c8 Head {h00=0x0030, h01=0x0050, text=» MOVE SPBINW4,='4' INDICATE ILLEGAL EOI-KEY «, t00=0x0029, t01=0x0098}
0x40c8…40ec Head {h00=0x0020, h01=0x0050, text=» B ERRPRINT DUPL NOT ALLOWED«, t00=0x0029, t01=0x00cc}
0x40ec…40f4 Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x00f0}
0x40f4…40fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00f8}
0x40fe…4116 Head {h00=0x0014, h01=0x0050, text=»* EDIT FIELD «, t00=0x0029, t01=0x0102}
0x4116…4120 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x011a}
0x4120…412e Head {h00=0x000a, h01=0x0050, text=»KEDIT «, t00=0x0029, t01=0x0124}
0x412e…4150 Head {h00=0x001e, h01=0x0050, text=» GETCTL 1,SPBINW3 GET MAXL«, t00=0x0029, t01=0x0132}
0x4150…4172 Head {h00=0x001e, h01=0x0050, text=» CBNE SPBINW3,='0',KED100 «, t00=0x0029, t01=0x0154}
0x4172…4184 Head {h00=0x000e, h01=0x0050, text=» PERF BELL«, t00=0x0029, t01=0x0176}
0x4184…4198 Head {h00=0x0010, h01=0x0050, text=» B SETCREAD «, t00=0x0029, t01=0x0188}
0x4198…41a6 Head {h00=0x000a, h01=0x0050, text=»KED100«, t00=0x002a, t01=0x000c}
0x41a6…41d0 Head {h00=0x0026, h01=0x0050, text=» EDFLD SPINPUT,SPKTAB3,SPBINW1, C«, t00=0x002a, t01=0x001a}
0x41d0…41ea Head {h00=0x0016, h01=0x0050, text=» SPBINW2,SPBINW4 «, t00=0x002a, t01=0x0044}
0x41ea…4210 Head {h00=0x0022, h01=0x0050, text=» B DYKOUT CONTINUE AS FOR DYKI«, t00=0x002a, t01=0x005e}
0x4210…421a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0084}
0x421a…4230 Head {h00=0x0012, h01=0x0050, text=»* ENTER KEY«, t00=0x002a, t01=0x008e}
0x4230…423a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00a4}
0x423a…4248 Head {h00=0x000a, h01=0x0050, text=»KENTER«, t00=0x002a, t01=0x00ae}
0x4248…4274 Head {h00=0x0028, h01=0x0050, text=» TBT SPCHANGE,KENT00 NO TESTS ON ME «, t00=0x002a, t01=0x00bc}
0x4274…4296 Head {h00=0x001e, h01=0x0050, text=» TBF SPME,KENT05 FIELDS ? «, t00=0x002a, t01=0x00e8}
0x4296…42a4 Head {h00=0x000a, h01=0x0050, text=»KENT00«, t00=0x002a, t01=0x010a}
0x42a4…42d8 Head {h00=0x0030, h01=0x0050, text=» MOVE SPBINW4,='5' INDICATE COMP.FIELD FOUND«, t00=0x002a, t01=0x0118}
0x42d8…4308 Head {h00=0x002c, h01=0x0050, text=» MOVE SPBINW1,='0' INDICATE NO CLEARING «, t00=0x002a, t01=0x014c}
0x4308…433e Head {h00=0x0032, h01=0x0050, text=» MOVE SPBINW2,='0' SET INDEX TO SEARCHED FIELD«, t00=0x002a, t01=0x017c}
0x433e…437e Head {h00=0x003c, h01=0x0050, text=» GETFLD 0,SPBINW2,SPBINW3 SEARCH FOR EMPTY COMP. FIELDS «, t00=0x002b, t01=0x0022}
0x437e…43aa Head {h00=0x0028, h01=0x0050, text=» BOFL KENT10 EMPTY COMP. FIELD FOUND«, t00=0x002b, t01=0x0062}
0x43aa…43d4 Head {h00=0x0026, h01=0x0050, text=» TSTCTL 2 LOOK IF COMPULSORY FIELD«, t00=0x002b, t01=0x008e}
0x43d4…43ea Head {h00=0x0012, h01=0x0050, text=» BZ KENT05 NO!«, t00=0x002b, t01=0x00b8}
0x43ea…441c Head {h00=0x002e, h01=0x0050, text=» CALL EMPTYT,:FMTITEM LOOK IF EMPTY FIELD «, t00=0x002b, t01=0x00ce}
0x441c…4434 Head {h00=0x0014, h01=0x0050, text=» BP KENT10 YES! «, t00=0x002b, t01=0x0100}
0x4434…4442 Head {h00=0x000a, h01=0x0050, text=»KENT05«, t00=0x002b, t01=0x0118}
0x4442…447a Head {h00=0x0034, h01=0x0050, text=» MOVE SPBINW2,='3' INDICATE ENTER KEY DEPRESSED «, t00=0x002b, t01=0x0126}
0x447a…4486 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x002b, t01=0x015e}
0x4486…4490 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x016a}
0x4490…44ba Head {h00=0x0026, h01=0x0050, text=»* EMPTY COMPULSORY FIELD FOUND «, t00=0x002b, t01=0x0174}
0x44ba…44c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x000e}
0x44c4…44d2 Head {h00=0x000a, h01=0x0050, text=»KENT10«, t00=0x002c, t01=0x0018}
0x44d2…450c Head {h00=0x0036, h01=0x0050, text=» GETFLD 0,SPBINW3,SPBINW2 GET THE COMPULSORY FIELD«, t00=0x002c, t01=0x0026}
0x450c…4514 Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x0060}
0x4514…4522 Head {h00=0x000a, h01=0x0050, text=»ERRPRT«, t00=0x002c, t01=0x0068}
0x4522…4536 Head {h00=0x0010, h01=0x0050, text=» PERF DKTEST«, t00=0x002c, t01=0x0076}
0x4536…454c Head {h00=0x0012, h01=0x0050, text=» BNOK SETCREAD«, t00=0x002c, t01=0x008a}
0x454c…457a Head {h00=0x002a, h01=0x0050, text=» CBE SPBINW2,='16',KEDIT JUMP IF EDIT «, t00=0x002c, t01=0x00a0}
0x457a…45a8 Head {h00=0x002a, h01=0x0050, text=» CBE SPBINW2,='4',CANC JUMP IF CANCEL1«, t00=0x002c, t01=0x00ce}
0x45a8…45d6 Head {h00=0x002a, h01=0x0050, text=» CBE SPBINW2,='5',CANC JUMP IF CANCEL2«, t00=0x002c, t01=0x00fc}
0x45d6…45e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x012a}
0x45e0…45fc Head {h00=0x0018, h01=0x0050, text=»* ERROR HANDLING «, t00=0x002c, t01=0x0134}
0x45fc…4606 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0150}
0x4606…4616 Head {h00=0x000c, h01=0x0050, text=»ERRPRINT«, t00=0x002c, t01=0x015a}
0x4616…4620 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x016a}
0x4620…463c Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW2,=X'40'«, t00=0x002c, t01=0x0174}
0x463c…4658 Head {h00=0x0018, h01=0x0050, text=» XSTAT KEYB,SPBINW3 «, t00=0x002c, t01=0x0190}
0x4658…467e Head {h00=0x0022, h01=0x0050, text=» CBNE SPBINW2,SPBINW3,ERRPRT20«, t00=0x002d, t01=0x001c}
0x467e…4690 Head {h00=0x000e, h01=0x0050, text=» TIMEOUT«, t00=0x002d, t01=0x0042}
0x4690…46ba Head {h00=0x0026, h01=0x0050, text=» EDWRT SCREEN,ERAFMT ERASE SCREEN «, t00=0x002d, t01=0x0054}
0x46ba…46cc Head {h00=0x000e, h01=0x0050, text=» B ERRC20 «, t00=0x002d, t01=0x007e}
0x46cc…46dc Head {h00=0x000c, h01=0x0050, text=»ERRPRT20«, t00=0x002d, t01=0x0090}
0x46dc…46fc Head {h00=0x001c, h01=0x0050, text=» CBE SPBINW4,='0',ERRC20«, t00=0x002d, t01=0x00a0}
0x46fc…470e Head {h00=0x000e, h01=0x0050, text=» PERF BELL«, t00=0x002d, t01=0x00c0}
0x470e…473a Head {h00=0x0028, h01=0x0050, text=» MOVE SPBINW3,=X'1801' ROW 24 COL. 1«, t00=0x002d, t01=0x00d2}
0x473a…4770 Head {h00=0x0032, h01=0x0050, text=» DSC1 SCREEN,6,SPBINW3 SET CURSOR ON LAST ROW «, t00=0x002d, t01=0x00fe}
0x4770…4798 Head {h00=0x0024, h01=0x0050, text=» MOVE GSWBCD4,SPBINW4 ERRORCODE «, t00=0x002d, t01=0x0134}
0x4798…47a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x015c}
0x47a2…47ca Head {h00=0x0024, h01=0x0050, text=» EDWRT SCREEN,SPFTBERR(SPBINW4) «, t00=0x002d, t01=0x0166}
0x47ca…47e8 Head {h00=0x001a, h01=0x0050, text=» TBF SPKEYFLG,SPERRRET«, t00=0x002d, t01=0x018e}
0x47e8…47f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x001c}
0x47f2…4810 Head {h00=0x001a, h01=0x0050, text=»* READ AFTER ERROR «, t00=0x002e, t01=0x0026}
0x4810…481a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0044}
0x481a…4828 Head {h00=0x000a, h01=0x0050, text=»ERREAD«, t00=0x002e, t01=0x004e}
0x4828…4854 Head {h00=0x0028, h01=0x0050, text=» SETCUR SET CURSOR AT THE BEGINNING«, t00=0x002e, t01=0x005c}
0x4854…4874 Head {h00=0x001c, h01=0x0050, text=» OF THE CURRENT FIELD «, t00=0x002e, t01=0x0088}
0x4874…4882 Head {h00=0x000a, h01=0x0050, text=»ERR100«, t00=0x002e, t01=0x00a8}
0x4882…48b0 Head {h00=0x002a, h01=0x0050, text=» MOVE SPBINW3,=W'14' REQUESTED LENGTH «, t00=0x002e, t01=0x00b6}
0x48b0…48d6 Head {h00=0x0022, h01=0x0050, text=» IB SPKEY,ERR105,ERR110,ERR115«, t00=0x002e, t01=0x00e4}
0x48d6…48e4 Head {h00=0x000a, h01=0x0050, text=»ERR105«, t00=0x002e, t01=0x010a}
0x48e4…491a Head {h00=0x0032, h01=0x0050, text=» NKI .NE,KEYB,SPINPUT,SPKTAB1,SPBINW3,SPBINW2 «, t00=0x002e, t01=0x0118}
0x491a…492c Head {h00=0x000e, h01=0x0050, text=» B ERR120 «, t00=0x002e, t01=0x014e}
0x492c…493a Head {h00=0x000a, h01=0x0050, text=»ERR110«, t00=0x002e, t01=0x0160}
0x493a…4970 Head {h00=0x0032, h01=0x0050, text=» NKI .NE,KEYB,SPINPUT,SPKTAB12,SPBINW3,SPBINW2«, t00=0x002e, t01=0x016e}
0x4970…4982 Head {h00=0x000e, h01=0x0050, text=» B ERR120 «, t00=0x002f, t01=0x0014}
0x4982…4990 Head {h00=0x000a, h01=0x0050, text=»ERR115«, t00=0x002f, t01=0x0026}
0x4990…49c6 Head {h00=0x0032, h01=0x0050, text=» NKI .NE,KEYB,SPINPUT,SPKTAB13,SPBINW3,SPBINW2«, t00=0x002f, t01=0x0034}
0x49c6…49d4 Head {h00=0x000a, h01=0x0050, text=»ERR120«, t00=0x002f, t01=0x006a}
0x49d4…49f6 Head {h00=0x001e, h01=0x0050, text=» BNZ ERR100 JUMP IF NOT OK«, t00=0x002f, t01=0x0078}
0x49f6…4a0a Head {h00=0x0010, h01=0x0050, text=» PERF DKTEST«, t00=0x002f, t01=0x009a}
0x4a0a…4a20 Head {h00=0x0012, h01=0x0050, text=» BNOK SETCREAD«, t00=0x002f, t01=0x00ae}
0x4a20…4a4c Head {h00=0x0028, h01=0x0050, text=» CMP SPBINW2,='0' JUMP IF POWER OFF «, t00=0x002f, t01=0x00c4}
0x4a4c…4a5e Head {h00=0x000e, h01=0x0050, text=» BE RETUR «, t00=0x002f, t01=0x00f0}
0x4a5e…4a84 Head {h00=0x0022, h01=0x0050, text=» IB SPBINW2,ERR100,ERRCONT C «, t00=0x002f, t01=0x0102}
0x4a84…4aac Head {h00=0x0024, h01=0x0050, text=» ERRCONT,ERR100,ERRCONT,ERRCONT«, t00=0x002f, t01=0x0128}
0x4aac…4ac6 Head {h00=0x0016, h01=0x0050, text=» B ERR100 CONTINUE«, t00=0x002f, t01=0x0150}
0x4ac6…4ad0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x016a}
0x4ad0…4af2 Head {h00=0x001e, h01=0x0050, text=»* CLEAR ERROR PRINTOUT «, t00=0x002f, t01=0x0174}
0x4af2…4afc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0008}
0x4afc…4b0c Head {h00=0x000c, h01=0x0050, text=»ERRCONT «, t00=0x0030, t01=0x0012}
0x4b0c…4b30 Head {h00=0x0020, h01=0x0050, text=» PERF CLEAR8 ERASE LAST LINE«, t00=0x0030, t01=0x0022}
0x4b30…4b5c Head {h00=0x0028, h01=0x0050, text=» CBNL SPBINW4,=W'26',CANC IF WARNING«, t00=0x0030, t01=0x0046}
0x4b5c…4b86 Head {h00=0x0026, h01=0x0050, text=» SUB SPBINW2,='1' ADJUST KEY INDEX«, t00=0x0030, t01=0x0072}
0x4b86…4b92 Head {h00=0x0008, h01=0x0050, text=»CANC«, t00=0x0030, t01=0x009c}
0x4b92…4bc6 Head {h00=0x0030, h01=0x0050, text=» CBE SPBINW1,='0',ERRC10 JUMP IF LENGTH = 0 «, t00=0x0030, t01=0x00a8}
0x4bc6…4bfa Head {h00=0x0030, h01=0x0050, text=» MOVE SPINPUT,:FMTITEM SAVE CURRENT CONTENTS«, t00=0x0030, t01=0x00dc}
0x4bfa…4c32 Head {h00=0x0034, h01=0x0050, text=» MOVE :FMTITEM,=C'1' PUT SOMETHING IN THE FIELD «, t00=0x0030, t01=0x0110}
0x4c32…4c5c Head {h00=0x0026, h01=0x0050, text=» GETABX SPBINW4 GET CURRENT INDEX «, t00=0x0030, t01=0x0148}
0x4c5c…4c8a Head {h00=0x002a, h01=0x0050, text=» ERASE 10,SPBINW4,SPBINW4 CLEAR FIELD «, t00=0x0030, t01=0x0172}
0x4c8a…4c98 Head {h00=0x000a, h01=0x0050, text=»ERRC10«, t00=0x0031, t01=0x0010}
0x4c98…4cc0 Head {h00=0x0024, h01=0x0050, text=» IB SPBINW2,CLEAR1,CLEAR2,DUMMY «, t00=0x0031, t01=0x001e}
0x4cc0…4cf4 Head {h00=0x0030, h01=0x0050, text=» SUB SPBINW2,='3' ADJUST FOR CANCEL1,CANCEL2«, t00=0x0031, t01=0x0046}
0x4cf4…4d00 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0031, t01=0x007a}
0x4d00…4d0e Head {h00=0x000a, h01=0x0050, text=»CLEAR1«, t00=0x0031, t01=0x0086}
0x4d0e…4d42 Head {h00=0x0030, h01=0x0050, text=» CBE SPBINW1,='0',ERRC20 JUMP IF LENGTH = 0 «, t00=0x0031, t01=0x0094}
0x4d42…4d6e Head {h00=0x0028, h01=0x0050, text=» SET SPCHANGE INDICATE CHANGED FIELD«, t00=0x0031, t01=0x00c8}
0x4d6e…4d7c Head {h00=0x000a, h01=0x0050, text=»ERRC20«, t00=0x0031, t01=0x00f4}
0x4d7c…4da6 Head {h00=0x0026, h01=0x0050, text=» MOVE SPBINW5,$OPT CHECHK IF SPERR«, t00=0x0031, t01=0x0102}
0x4da6…4dca Head {h00=0x0020, h01=0x0050, text=» CBE SPBINW5,=W'0',SPERRRET «, t00=0x0031, t01=0x012c}
0x4dca…4de6 Head {h00=0x0018, h01=0x0050, text=» B SETCREAD CONTINUE«, t00=0x0031, t01=0x0150}
0x4de6…4df0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x016c}
0x4df0…4dfe Head {h00=0x000a, h01=0x0050, text=»CLEAR2«, t00=0x0031, t01=0x0176}
0x4dfe…4e36 Head {h00=0x0034, h01=0x0050, text=» MOVE :FMTITEM,SPINPUT RESTORE CURRENT CONTENTS «, t00=0x0031, t01=0x0184}
0x4e36…4e44 Head {h00=0x000a, h01=0x0050, text=»CLEA20«, t00=0x0032, t01=0x002c}
0x4e44…4e72 Head {h00=0x002a, h01=0x0050, text=» GETABX SPBINW4 GET CURRENT TAB INDEX «, t00=0x0032, t01=0x003a}
0x4e72…4ea2 Head {h00=0x002c, h01=0x0050, text=» DISPLAY 1,SPBINW4,SPBINW4 DISPLAY FIELD«, t00=0x0032, t01=0x0068}
0x4ea2…4ecc Head {h00=0x0026, h01=0x0050, text=» MOVE SPBINW5,$OPT CHECK IF SPERR «, t00=0x0032, t01=0x0098}
0x4ecc…4ef0 Head {h00=0x0020, h01=0x0050, text=» CBE SPBINW5,=W'0',SPERRRET «, t00=0x0032, t01=0x00c2}
0x4ef0…4f0c Head {h00=0x0018, h01=0x0050, text=» B SETCREAD CONTINUE«, t00=0x0032, t01=0x00e6}
0x4f0c…4f16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0102}
0x4f16…4f26 Head {h00=0x000c, h01=0x0050, text=»SPERRRET«, t00=0x0032, t01=0x010c}
0x4f26…4f32 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0032, t01=0x011c}
0x4f32…4f40 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0032, t01=0x0128}
0x4f40…4f4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0136}
0x4f4a…4f5c Head {h00=0x000e, h01=0x0050, text=»BELL PROC «, t00=0x0032, t01=0x0140}
0x4f5c…4f7c Head {h00=0x001c, h01=0x0050, text=»* ACUSTIC ALARM«, t00=0x0032, t01=0x0152}
0x4f7c…4f9a Head {h00=0x001a, h01=0x0050, text=» EDWRT SCREEN,BELLFMT «, t00=0x0032, t01=0x0172}
0x4f9a…4fa6 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0032, t01=0x0190}
0x4fa6…4fb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x000c}
0x4fb0…4fc4 Head {h00=0x0010, h01=0x0050, text=»BELLFMT FRMT«, t00=0x0033, t01=0x0016}
0x4fc4…4fd0 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0033, t01=0x002a}
0x4fd0…4fe6 Head {h00=0x0012, h01=0x0050, text=» FILLR X'07',1«, t00=0x0033, t01=0x0036}
0x4fe6…4ff4 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0033, t01=0x004c}
0x4ff4…4ffc Head {h00=0x0004, h01=0x0050, t00=0x0033, t01=0x005a}
0x4ffc…500a Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0033, t01=0x0062}
0x500a…5014 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0070}
0x5014…5028 Head {h00=0x0010, h01=0x0050, text=»ERAFMT FRMT «, t00=0x0033, t01=0x007a}
0x5028…503c Head {h00=0x0010, h01=0x0050, text=» FILLR '1',2«, t00=0x0033, t01=0x008e}
0x503c…504a Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0033, t01=0x00a2}
0x504a…5054 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00b0}
0x5054…505e Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0033, t01=0x00ba}
0x505e…5080 Head {h00=0x001e, h01=0x0050, text=»SPLIN8 PROC WRTMES,WRTTYP «, t00=0x0033, t01=0x00c4}
0x5080…509c Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0033, t01=0x00e6}
0x509c…50a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0102}
0x50a6…50d2 Head {h00=0x0028, h01=0x0050, text=»* SPLIN8 - WRITE ON LINE 8 «, t00=0x0033, t01=0x010c}
0x50d2…50dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0138}
0x50dc…5116 Head {h00=0x0036, h01=0x0050, text=»* MESSAGE DEFINED AS FORMAT NUMBER WRTMES«, t00=0x0033, t01=0x0142}
0x5116…5142 Head {h00=0x0028, h01=0x0050, text=»* IN FORMAT TABLE SPFTBMES «, t00=0x0033, t01=0x017c}
0x5142…514c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0018}
0x514c…5174 Head {h00=0x0024, h01=0x0050, text=»* WRTTYP: =0 NO WAIT«, t00=0x0034, t01=0x0022}
0x5174…519a Head {h00=0x0022, h01=0x0050, text=»* =1 WAIT «, t00=0x0034, t01=0x004a}
0x519a…51c2 Head {h00=0x0024, h01=0x0050, text=»* =2 RETURN «, t00=0x0034, t01=0x0070}
0x51c2…51cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0098}
0x51cc…51e8 Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x0034, t01=0x00a2}
0x51e8…5206 Head {h00=0x001a, h01=0x0050, text=» MOVE SPBINW1,=X'1801'«, t00=0x0034, t01=0x00be}
0x5206…523c Head {h00=0x0032, h01=0x0050, text=» DSC1 SCREEN,6,SPBINW1 SET CURSOR ON LAST ROW «, t00=0x0034, t01=0x00dc}
0x523c…5258 Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW1,CBIN0 «, t00=0x0034, t01=0x0112}
0x5258…5278 Head {h00=0x001c, h01=0x0050, text=» CBE WRTMES,CBIN0,LIN800«, t00=0x0034, t01=0x012e}
0x5278…5298 Head {h00=0x001c, h01=0x0050, text=» CBL WRTTYP,CBIN3,LIN801«, t00=0x0034, t01=0x014e}
0x5298…52c2 Head {h00=0x0026, h01=0x0050, text=» EDWRT .NW,SCREEN,SPFTBMES(WRTMES)«, t00=0x0034, t01=0x016e}
0x52c2…52d4 Head {h00=0x000e, h01=0x0050, text=» B LINRET «, t00=0x0035, t01=0x0008}
0x52d4…52e2 Head {h00=0x000a, h01=0x0050, text=»LIN801«, t00=0x0035, t01=0x001a}
0x52e2…5308 Head {h00=0x0022, h01=0x0050, text=» EDWRT SCREEN,SPFTBMES(WRTMES)«, t00=0x0035, t01=0x0028}
0x5308…5316 Head {h00=0x000a, h01=0x0050, text=»LIN800«, t00=0x0035, t01=0x004e}
0x5316…5336 Head {h00=0x001c, h01=0x0050, text=» CBE WRTTYP,=W'0',LIN8NW«, t00=0x0035, t01=0x005c}
0x5336…5356 Head {h00=0x001c, h01=0x0050, text=» CBE WRTTYP,=W'2',LINRET«, t00=0x0035, t01=0x007c}
0x5356…5364 Head {h00=0x000a, h01=0x0050, text=»* READ«, t00=0x0035, t01=0x009c}
0x5364…5372 Head {h00=0x000a, h01=0x0050, text=»LIN8IN«, t00=0x0035, t01=0x00aa}
0x5372…539e Head {h00=0x0028, h01=0x0050, text=» MOVE SPBINW1,=W'3' REQUESTED LENGTH«, t00=0x0035, t01=0x00b8}
0x539e…53c4 Head {h00=0x0022, h01=0x0050, text=» IB SPKEY,LIN805,LIN810,LIN815«, t00=0x0035, t01=0x00e4}
0x53c4…53d2 Head {h00=0x000a, h01=0x0050, text=»LIN805«, t00=0x0035, t01=0x010a}
0x53d2…5404 Head {h00=0x002e, h01=0x0050, text=» NKI KEYB,SPINPUT,SPKTAB1,SPBINW1,SPBINW2 «, t00=0x0035, t01=0x0118}
0x5404…5416 Head {h00=0x000e, h01=0x0050, text=» B LIN820 «, t00=0x0035, t01=0x014a}
0x5416…5424 Head {h00=0x000a, h01=0x0050, text=»LIN810«, t00=0x0035, t01=0x015c}
0x5424…5456 Head {h00=0x002e, h01=0x0050, text=» NKI KEYB,SPINPUT,SPKTAB12,SPBINW1,SPBINW2«, t00=0x0035, t01=0x016a}
0x5456…5468 Head {h00=0x000e, h01=0x0050, text=» B LIN820 «, t00=0x0036, t01=0x000c}
0x5468…5476 Head {h00=0x000a, h01=0x0050, text=»LIN815«, t00=0x0036, t01=0x001e}
0x5476…54a8 Head {h00=0x002e, h01=0x0050, text=» NKI KEYB,SPINPUT,SPKTAB13,SPBINW1,SPBINW2«, t00=0x0036, t01=0x002c}
0x54a8…54b6 Head {h00=0x000a, h01=0x0050, text=»LIN820«, t00=0x0036, t01=0x005e}
0x54b6…54da Head {h00=0x0020, h01=0x0050, text=» BNOK LIN8IN JUMP IF NOT OK «, t00=0x0036, t01=0x006c}
0x54da…54ee Head {h00=0x0010, h01=0x0050, text=» PERF DKTEST«, t00=0x0036, t01=0x0090}
0x54ee…5510 Head {h00=0x001e, h01=0x0050, text=» CBE SPBINW2,CBIN2,LIN8CT «, t00=0x0036, t01=0x00a4}
0x5510…5522 Head {h00=0x000e, h01=0x0050, text=» B LIN8IN «, t00=0x0036, t01=0x00c6}
0x5522…5536 Head {h00=0x0010, h01=0x0050, text=»* CLEAR LINE«, t00=0x0036, t01=0x00d8}
0x5536…5544 Head {h00=0x000a, h01=0x0050, text=»LIN8CT«, t00=0x0036, t01=0x00ec}
0x5544…5568 Head {h00=0x0020, h01=0x0050, text=» PERF CLEAR8 ERASE LAST LINE«, t00=0x0036, t01=0x00fa}
0x5568…5574 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0036, t01=0x011e}
0x5574…5590 Head {h00=0x0018, h01=0x0050, text=»* READ WITH NO WAIT «, t00=0x0036, t01=0x012a}
0x5590…559e Head {h00=0x000a, h01=0x0050, text=»LIN8NW«, t00=0x0036, t01=0x0146}
0x559e…55ca Head {h00=0x0028, h01=0x0050, text=» MOVE SPBINW1,=W'3' REQUESTED LENGTH«, t00=0x0036, t01=0x0154}
0x55ca…55f0 Head {h00=0x0022, h01=0x0050, text=» IB SPKEY,LIN855,LIN860,LIN865«, t00=0x0036, t01=0x0180}
0x55f0…55fe Head {h00=0x000a, h01=0x0050, text=»LIN855«, t00=0x0037, t01=0x0016}
0x55fe…5634 Head {h00=0x0032, h01=0x0050, text=» NKI .NW,KEYB,SPINPUT,SPKTAB1,SPBINW1,SPBINW2 «, t00=0x0037, t01=0x0024}
0x5634…5646 Head {h00=0x000e, h01=0x0050, text=» B LIN870 «, t00=0x0037, t01=0x005a}
0x5646…5654 Head {h00=0x000a, h01=0x0050, text=»LIN860«, t00=0x0037, t01=0x006c}
0x5654…568a Head {h00=0x0032, h01=0x0050, text=» NKI .NW,KEYB,SPINPUT,SPKTAB12,SPBINW1,SPBINW2«, t00=0x0037, t01=0x007a}
0x568a…569c Head {h00=0x000e, h01=0x0050, text=» B LIN870 «, t00=0x0037, t01=0x00b0}
0x569c…56aa Head {h00=0x000a, h01=0x0050, text=»LIN865«, t00=0x0037, t01=0x00c2}
0x56aa…56e0 Head {h00=0x0032, h01=0x0050, text=» NKI .NW,KEYB,SPINPUT,SPKTAB13,SPBINW1,SPBINW2«, t00=0x0037, t01=0x00d0}
0x56e0…56ee Head {h00=0x000a, h01=0x0050, text=»LIN870«, t00=0x0037, t01=0x0106}
0x56ee…5702 Head {h00=0x0010, h01=0x0050, text=» PERF DKTEST«, t00=0x0037, t01=0x0114}
0x5702…5710 Head {h00=0x000a, h01=0x0050, text=»LINRET«, t00=0x0037, t01=0x0128}
0x5710…571c Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0037, t01=0x0136}
0x571c…572a Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0037, t01=0x0142}
0x572a…5732 Head {h00=0x0004, h01=0x0050, t00=0x0037, t01=0x0150}
0x5732…573a Head {h00=0x0004, h01=0x0050, t00=0x0037, t01=0x0158}
0x573a…574e Head {h00=0x0010, h01=0x0050, text=»KBTEST PROC «, t00=0x0037, t01=0x0160}
0x574e…576e Head {h00=0x001c, h01=0x0050, text=» PERF SPLIN8,CBIN0,CBIN0«, t00=0x0037, t01=0x0174}
0x576e…5782 (56, 0, 398) Head {h00=0x0010, h01=0x0050, text=» TESTIO KEYB«, t00=0x0038, t01=0x0004}
0x5782…5794 Head {h00=0x000e, h01=0x0050, text=» BOK KBT10«, t00=0x0038, t01=0x0018}
0x5794…57ac Head {h00=0x0014, h01=0x0050, text=» CALL ABORT,KEYB«, t00=0x0038, t01=0x002a}
0x57ac…57bc Head {h00=0x000c, h01=0x0050, text=» B KBT20«, t00=0x0038, t01=0x0042}
0x57bc…57ca Head {h00=0x000a, h01=0x0050, text=»KBT10 «, t00=0x0038, t01=0x0052}
0x57ca…57dc Head {h00=0x000e, h01=0x0050, text=» WAIT KEYB«, t00=0x0038, t01=0x0060}
0x57dc…57fe Head {h00=0x001e, h01=0x0050, text=» CBNE SPBINW2,CBIN6,KBT20 «, t00=0x0038, t01=0x0072}
0x57fe…5816 Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x0038, t01=0x0094}
0x5816…5822 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0038, t01=0x00ac}
0x5822…5830 Head {h00=0x000a, h01=0x0050, text=»KBT20 «, t00=0x0038, t01=0x00b8}
0x5830…5848 Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN1«, t00=0x0038, t01=0x00c6}
0x5848…5854 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0038, t01=0x00de}
0x5854…5862 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0038, t01=0x00ea}
0x5862…586c Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0038, t01=0x00f8}
0x586c…5880 Head {h00=0x0010, h01=0x0050, text=»SPINF1 PROC «, t00=0x0038, t01=0x0102}
0x5880…589c Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0038, t01=0x0116}
0x589c…58a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0132}
0x58a6…58da Head {h00=0x0030, h01=0x0050, text=»* SPINF1 - WRITE INF ON FIRST LINE «, t00=0x0038, t01=0x013c}
0x58da…58e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0170}
0x58e4…5900 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0038, t01=0x017a}
0x5900…591e Head {h00=0x001a, h01=0x0050, text=» MOVE SPBINW1,=X'0117'«, t00=0x0039, t01=0x0008}
0x591e…5956 Head {h00=0x0034, h01=0x0050, text=» DSC1 SCREEN,6,SPBINW1 SET CURSOR ON FIRST LINE «, t00=0x0039, t01=0x0026}
0x5956…5972 Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW1,CBIN0 «, t00=0x0039, t01=0x005e}
0x5972…59a8 Head {h00=0x0032, h01=0x0050, text=» EDWRT SCREEN,SPFTBMES(CBIN7) WRITE MESSAGE 7 «, t00=0x0039, t01=0x007a}
0x59a8…59b4 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0039, t01=0x00b0}
0x59b4…59c2 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0039, t01=0x00bc}
0x59c2…59cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x00ca}
0x59cc…59d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x00d4}
0x59d6…59e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x00de}
0x59e0…59f4 Head {h00=0x0010, h01=0x0050, text=»DKTEST PROC «, t00=0x0039, t01=0x00e8}
0x59f4…5a20 Head {h00=0x0028, h01=0x0050, text=»* TEST IF THE DISK IS SWITCHED OFF, «, t00=0x0039, t01=0x00fc}
0x5a20…5a3a Head {h00=0x0016, h01=0x0050, text=» TBF CDKOFF,DKTRET«, t00=0x0039, t01=0x0128}
0x5a3a…5a56 Head {h00=0x0018, h01=0x0050, text=» TBT GTMASTFL,DKTRET«, t00=0x0039, t01=0x0142}
0x5a56…5a88 Head {h00=0x002e, h01=0x0050, text=» TBF CDUOVL,DKTRET NO KI IF DISKOVL ON DU «, t00=0x0039, t01=0x015e}
0x5a88…5aa6 Head {h00=0x001a, h01=0x0050, text=» MOVE SPBINW5,=X'1801'«, t00=0x0039, t01=0x0190}
0x5aa6…5ac4 Head {h00=0x001a, h01=0x0050, text=» DSC1 SCREEN,6,SPBINW5«, t00=0x003a, t01=0x001e}
0x5ac4…5aee Head {h00=0x0026, h01=0x0050, text=» EDWRT .NW,SCREEN,SPFTBMES(CBIN14)«, t00=0x003a, t01=0x003c}
0x5aee…5afc Head {h00=0x000a, h01=0x0050, text=»DKT10 «, t00=0x003a, t01=0x0066}
0x5afc…5b12 Head {h00=0x0012, h01=0x0050, text=» DELAY CBIN10 «, t00=0x003a, t01=0x0074}
0x5b12…5b2c Head {h00=0x0016, h01=0x0050, text=» TBT CDKOFF,DKT10 «, t00=0x003a, t01=0x008a}
0x5b2c…5b40 Head {h00=0x0010, h01=0x0050, text=» PERF CLEAR8«, t00=0x003a, t01=0x00a4}
0x5b40…5b5c Head {h00=0x0018, h01=0x0050, text=» CMP CBIN1,CBIN0 NOK«, t00=0x003a, t01=0x00b8}
0x5b5c…5b68 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x003a, t01=0x00d4}
0x5b68…5b76 Head {h00=0x000a, h01=0x0050, text=»DKTRET«, t00=0x003a, t01=0x00e0}
0x5b76…5b8e Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x003a, t01=0x00ee}
0x5b8e…5b9a Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x003a, t01=0x0106}
0x5b9a…5ba8 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x003a, t01=0x0112}
0x5ba8…5bb0 Head {h00=0x0004, h01=0x0050, t00=0x003a, t01=0x0120}
0x5bb0…5bbc Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x003a, t01=0x0128}
0x5bbc…5bc0 Head {h00=0x4004, h01=0x0000}
0x5bc0…5bc4 00 3a 01 34 ┆ : 4┆
0x5bc4…5bcc (59, 1, 8) 20 04 00 00 00 3b 00 04 ┆ ; ┆
0x5bcc…5c1c (60, 0, 400) 00 0a 00 06 00 02 26 04 8b 20 00 3c 00 04 00 16 00 11 00 08 16 0f 00 07 00 09 33 32 37 30 20 45 4d 55 4c 20 00 3c 00 12 00 0c 00 07 00 03 24 05 c1 00 07 11 00 3c 00 2c 00 12 00 0f 00 07 16 0d 00 08 00 07 20 56 45 52 53 3a 00 3c 00 3c 00 0c ┆ & < 3270 EMUL < $ < , VERS: < < ┆
0x5c1c…5c6c 00 07 00 03 24 05 c1 00 08 11 00 3c 00 52 00 14 00 10 00 07 1a 0e 00 09 10 08 39 39 56 39 39 56 39 39 00 3c 00 62 00 0c 00 08 00 03 22 06 00 09 cf 12 00 3c 00 7a 00 0a 00 05 00 02 26 03 e1 09 00 3c 00 8a 00 0a 00 05 00 02 26 03 e1 09 00 3c ┆ $ < R 99V99V99 < b " < z & < & <┆
0x5c6c…5cbc 00 98 00 18 00 14 00 09 16 12 00 0a 00 0c 42 52 55 47 45 52 4e 41 56 4e 3a 20 00 3c 00 a6 00 0c 00 07 00 03 24 05 c1 00 0a 12 00 3c 00 c2 00 1e 00 19 00 0c 16 17 00 0b 00 11 4e 4f 52 44 2d 4a 59 4c 4c 41 4e 44 53 20 41 4d 54 12 00 3c 00 d2 ┆ BRUGERNAVN: < $ < NORD-JYLLANDS AMT < ┆
0x5cbc…5d0c 00 0c 00 07 00 03 24 05 c1 00 0b 12 00 3c 00 f4 00 0c 00 07 00 03 24 05 df 00 00 12 00 3c 01 04 00 08 00 04 00 01 28 02 00 3c 01 14 00 0c 00 08 00 03 20 06 00 0c 00 27 00 3c 01 20 00 0a 00 06 00 02 26 04 82 20 00 3c 01 30 00 0a 00 06 00 02 ┆ $ < $ < ( < ' < & < 0 ┆
0x5d0c…5d5c 26 04 a3 2a 00 3c 01 3e 00 0a 00 05 00 02 26 03 e8 2a 00 3c 01 4c 00 0a 00 06 00 02 26 04 82 20 00 3c 01 5a 00 14 00 11 00 08 16 0f 00 0d 00 09 50 54 53 20 36 30 30 30 00 3c 01 68 00 0c 00 07 00 03 24 05 c1 00 0d 12 00 3c 01 80 00 0a 00 06 ┆& * < > & * < L & < Z PTS 6000 < h $ < ┆