|
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: 26984 (0x6968)
Notes: pts_type(SC)
Names: »SCR267.SC«
└─⟦26dca8ec8⟧ Bits:30009711 Philips computer tape "RÅKON-DIVFMT"
└─⟦this⟧ »REMIT2/SCR267.SC«
IDENT SCR267 830215 NJ 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-- ENTRY SCREEN ENTRY SPINF1 INFORMATION ON LINE 1 ENTRY SPINF8 INFORMATION ON LINE 8 ENTRY BELL ENTRY CLEAR8 ENTRY DKTEST TEST IF DISK READY ENTRY KBTEST TEST KB FOR MAK-KEY * 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 RKAPPL APPLVALUES FOR R]KONVERTERING EXT SPTCHK USER ROUTINE TO EVALUATE CONDITIONAL TABULATION EXT ABORT EXT EMPTYT ASSEMBLY SUBROUTINE EMPTYT - TEST IF DATA ITEM IS EMPTY * NOKEY EQU X'FF' BSPKY1 EQU X'87' CANKY1 EQU X'91' MACKY1 EQU X'95' EORKY1 EQU X'90' FTABKY1 EQU X'8B' BTABKY1 EQU X'83' DUPKY1 EQU X'A2' SLUTKY1 EQU X'A3' REGKY1 EQU X'A1' COPKY1 EQU X'FF' EDTKY1 EQU X'FF' KREKY1 EQU X'92' LISTKY1 EQU X'88' SBTKY1 EQU X'8A' SPGKY1 EQU X'FF' CY1KY1 EQU X'FF' CY2KY1 EQU X'FF' CYCKY1 EQU X'89' INVKY1 EQU X'82' KONKY1 EQU X'85' KVITKY1 EQU X'86' SUPLKY1 EQU X'FF' SUMKY1 EQU X'81' ADMKY1 EQU X'A0' DIVKY1 EQU X'84' HBOGKY1 EQU X'80' DEBPKY1 EQU X'93' REMKY1 EQU X'94' TRSEL EQU X'FF' ONKY1 EQU X'99' * FTBKY1 EQU X'83' BTBKY1 EQU X'87' INSKY1 EQU X'81' DELKY1 EQU X'82' CL1KY1 EQU X'89' CL2KY1 EQU X'8A' CL3KY1 EQU X'8B' OUTKY1 EQU X'A0' * BSPKY2 EQU X'C7' CANKY2 EQU X'D1' EORKY2 EQU X'D0' MACKY2 EQU X'D5' FTABKY2 EQU X'CB' BTABKY2 EQU X'C3' DUPKY2 EQU X'E2' EDTKY2 EQU X'FF' SLUTKY2 EQU X'E3' KREKY2 EQU X'D2' REGKY2 EQU X'E1' ADMKY2 EQU X'E0' SPGKY2 EQU X'FF' KONKY2 EQU X'FF' KVITKY2 EQU X'C6' ONKY2 EQU X'D9' COPKY2 EQU X'C5' * * BSPKY4 EQU X'C7' CANKY4 EQU X'D1' EORKY4 EQU X'D0' MACKY4 EQU X'D5' FTABKY4 EQU X'D0' BTABKY4 EQU X'D2' CRHOMKY4 EQU X'D7' CRNLKY4 EQU X'C5' CRDWNKY4 EQU X'CA' CRUPKY4 EQU X'C1' COPKY4 EQU X'C6' SLUTKY4 EQU X'E3' ONKY4 EQU X'D9' * 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,DEBPKY1,REMKY1,TRSEL, C ONKY1 * SPKTAB2 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,DEBPKY1,REMKY1,TRSEL, C ONKY1 * 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,COPKY2,DUPKY2,EDTKY2,SLUTKY2, C KREKY2,REGKY2,ADMKY2,SPGKY2,KONKY2,KVITKY2,ONKY2 * SPKTAB22 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,ONKY2 * * 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 * R]KONVERTERING, SPKEY=4 * SPKTAB14 KTAB BSPKY4,CANKY4,NOKEY,EORKY4,NOKEY, C MACKY4,FTABKY4,BTABKY4,CRHOMKY4,CRNLKY4, C NOKEY,NOKEY,CRDWNKY4,CRUPKY4,COPKY4,NOKEY, C NOKEY,SLUTKY4,NOKEY,NOKEY,NOKEY,NOKEY, C NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C NOKEY,NOKEY,NOKEY,ONKY4 * SPKTAB24 KTAB BSPKY4,CANKY4,NOKEY,EORKY4,NOKEY, C MACKY4,FTABKY4,BTABKY4,CRHOMKY4,CRNLKY4, C NOKEY,NOKEY,CRDWNKY4,CRUPKY4,COPKY4,NOKEY, C NOKEY,SLUTKY4,NOKEY,NOKEY,NOKEY,NOKEY, C NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C NOKEY,NOKEY,NOKEY,ONKY4 * 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,MSFMT8,MSFMT9,MSFMT10, C MSFMT11,MSFMT12,MSFMT13,MSFMT14 * * ERRFMT FRMT FSL FCOPY ='FEJL ' FMEL 'ZZZ9',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 ' 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 FCOPY ='VENT P] DISK ' FMEND * SPCLRA PROC * * SPCLRA - CLEAR ALL VARABLE FIELDS BEFORE HANDLING THE PICTURE * MOVE SPERASE,CBIN0 PERF SCREEN,=W'1' RET PEND SPCLRS PROC * * SPCLRS - CLEAR SOME VARIABLE FIELDS BEFORE HANDLING THE PICTURE * MOVE SPERASE,CBIN0 PERF SCREEN,=W'2' RET PEND SPCLRN PROC * * SPCLRN - CLEAR NO VARIABLE FIELDS BEFORE HANDLING THE PICTURE * MOVE SPERASE,CBIN0 PERF SCREEN,=W'3' RET PEND SPERR PROC * * HANDLE ERRORS DETECTED OUTSIDE THE PACKAGE * PERF SCREEN,=W'0' RET PEND SPCA PROC * * MOVE SPERASE,CBIN4 PERF SCREEN,=W'1' RET PEND SPCN PROC * * MOVE SPERASE,CBIN4 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,CBIN0 "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,CBIN1,CBIN0 ERASE ALL FROM 1 AND UP THOME B CONT * CLEARS ERASE 5,CBIN1,CBIN0 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,CBIN1,CBIN0 CLEAR ALL IN MEMORY B ECLRN * * CLEAR SOME VARIABLES * ECLRS ERASE 6,CBIN1,CBIN0 CLEAR SOME FIELDS FROM 1 AND UP IN MEMORY * * CLEAR NO VARIABLES IN MEMORY * ECLRN IB SPERASE,ECLRN1,ECLRN2,ECLRN3,ECLRN4 DISPLAY 0,CBIN1,CBIN0 B CONT ECLRN1 DISPLAY 1,CBIN1,CBIN0 B CONT ECLRN2 DISPLAY 2,CBIN1,CBIN0 B CONT ECLRN3 DISPLAY 3,CBIN1,CBIN0 B CONT ECLRN4 DISPLAY 4,CBIN1,CBIN0 B CONT 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,CBIN3 MOVE SPBINW1,CBIN1 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,DYK16 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 B DYKOUT DYK16 DYKI SPINPUT,SPKTAB14,SPKTAB24,SPBINW1, C SPBINW2,SPBINW4 DYKOUT BL ERRPRT ERROR CLEAR SPDUPL CBG SPBINW2,CBIN0,DYK20 NORMAL BE RETUR POWER OFF ADD SPBINW2,CBIN9 KEYSWITCH TURNED IB SPBINW2,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 TTKEYFLG,DYK80 * KEY SWITCHES TBF TTKEY1,DYKRET KEYBOARD OFF IB SPKEY,DYK30,DYK40,DYK50,DYK40 DYK30 TBF TTKEY2,DYK80 EQUAL TO KEYPOS 1 ON 6234 B DYKRET DYK40 TBT TTKEY2,DYK80 EQUAL TO KEYPOS 2 ON 6234 DYKRET PERF BELL B SETCREAD DYK50 DYK80 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,CBIN0,UPD350 JUMP IF LENGTH = 0 GETCTL 3,SPBINW4 GET SCHK-NUMBER CBE SPBINW4,CBIN0,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,CBIN1 INDICATE COND. DISPL B UPD200 UPD070 GETCTL 0,SPBINW3 GET APPL-VALUE CBNE SPBINW3,CBIN0,UPD210 JUMP IF APPL VALUE B SETCREAD * * UNCONDITIONAL DISPLAYING * UPD100 MOVE SPBINW4,CBIN2 INDICATE UNCONDITIONAL DISPLAY UPD200 GETCTL 0,SPBINW3 GET APPL-VALUE CBE SPBINW3,CBIN0,UPD400 JUMP IF NO APPL VALUE * * APPL-VALUE DIFFERENT FROM ZERO * UPD210 TBT GTRKONV,UPD211 PERF SPAPPL B UPD212 UPD211 PERF RKAPPL UPD212 IB SPBINW3,UPD400,SETCREAD,ERRPRINT B UPD400 * * OK AFTER APPL CONTROL * UNCONDITIONAL DISPLAYING * UPD260 UPDFLD 1,SPINPUT UPDATE FIELD WITH DISPLAYING UPD300 CBE SPBINW1,CBIN0,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,CBIN14 ADJUST EOI/KEY INDEX DUMMY RETUR RET * UPD400 CBE SPBINW4,CBIN2,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,CBIN0 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,CBIN1 TBT GTGTPFLG,KCOPY05 TBT GTLPFLG,KCOPY08 B KCOPY10 KCOPY05 EDWRT DSHCGP,ERAFMT PRINT DSHCGP,SPBINW3,='0' GTP B KCOPY10 KCOPY08 EDWRT DSHCLP,ERAFMT PRINT DSHCLP,SPBINW3,='0' LP KCOPY10 B SETCREAD SET CURSOR AND READ * KDUPL DUPLICATION MOVE SPBINW2,CBIN3 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,CBIN10 SET LENGTH IN DUPFIELD SET SPDUPL B UPDATE DUPL ALLOWED KDUPL2 MOVE SPBINW4,CBIN4 INDICATE ILLEGAL EOI-KEY B ERRPRINT DUPL NOT ALLOWED * * EDIT FIELD * KEDIT GETCTL 1,SPBINW3 GET MAXL CBNE SPBINW3,CBIN0,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,CBIN5 INDICATE COMP.FIELD FOUND MOVE SPBINW1,CBIN0 INDICATE NO CLEARING MOVE SPBINW2,CBIN0 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,CBIN3 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,CBIN16,KEDIT JUMP IF EDIT CBE SPBINW2,CBIN4,CANC JUMP IF CANCEL1 CBE SPBINW2,CBIN5,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,CBIN0,ERRC20 PERF BELL MOVE SPBINW3,=X'1801' ROW 24 COL. 1 DSC1 SCREEN,6,SPBINW3 SET CURSOR ON LAST ROW TBT GTRKONV,ERRPRT30 MOVE GSWBCD4,SPBINW4 ERRORCODE ERRPRT30 EDWRT SCREEN,SPFTBERR(SPBINW4) TBF SPKEYFLG,SPERRRET * * READ AFTER ERROR * ERREAD SETCUR SET CURSOR AT THE BEGINNING OF THE CURRENT FIELD ERR100 MOVE SPBINW3,CBIN14 REQUESTED LENGTH IB SPKEY,ERR105,ERR110,ERR115,ERR116 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 B ERR120 ERR116 NKI .NE,KEYB,SPINPUT,SPKTAB14,SPBINW3,SPBINW2 ERR120 BNZ ERR100 JUMP IF NOT OK PERF DKTEST BNOK ERREAD CMP SPBINW2,CBIN0 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,CBIN1 ADJUST KEY INDEX CANC CBE SPBINW1,CBIN0,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,CBIN3 ADJUST FOR CANCEL1,CANCEL2 RET CLEAR1 CBE SPBINW1,CBIN0,ERRC20 JUMP IF LENGTH = 0 SET SPCHANGE INDICATE CHANGED FIELD ERRC20 MOVE SPBINW5,$OPT CHECHK IF SPERR CBE SPBINW5,CBIN0,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,CBIN0,SPERRRET B SETCREAD CONTINUE * SPERRRET RET * PEND * BELL PROC * ACUSTIC ALARM EDWRT SCREEN,BELLFMT RET * BELLFMT FRMT FSL FILLR X'07',1 FMEND PEND * ERAFMT FRMT FILLR '1',2 FMEND EJECT KBTEST PROC * THE PROCEDURE SENSES THE KEYBOARD. * IF THE MAK-KEY HAS BEEN DEPRESSED, THE COND.REG * WILL BE SET TO ZERO, IN ORDER TO ENABLE THE CALLING * MODULE TO STOP THE LISTING (OR FOR ANY OTHER PURPOSE) PERF SPLIN8,CBIN0,CBIN0 TESTIO KEYB BOK KBT10 CALL ABORT,KEYB B KBT20 KBT10 WAIT KEYB CBNE SPBINW2,CBIN6,KBT20 CMP CBIN0,CBIN0 B KBT99 KBT20 CMP CBIN0,CBIN1 KBT99 RET PEND EJECT SPLIN8 PROC WRTMES,WRTTYP ******************** * * SPLIN8 - WRITE ON LINE 24 * * MESSAGE DEFINED AS FORMAT NUMBER WRTMES * IN FORMAT TABLE SPFTBMES * * WRTTYP: =0 NO WAIT * =1 WAIT * =2 RETURN * =3 WRITE WITH NO WAIT, 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,CBIN0,LIN8NW CBE WRTTYP,CBIN2,LINRET * READ LIN8IN MOVE SPBINW1,CBIN3 REQUESTED LENGTH IB SPKEY,LIN805,LIN810,LIN815,LIN816 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 B LIN820 LIN816 NKI KEYB,SPINPUT,SPKTAB14,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,CBIN3 REQUESTED LENGTH IB SPKEY,LIN855,LIN860,LIN865,LIN866 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 B LIN870 LIN866 NKI .NW,KEYB,SPINPUT,SPKTAB14,SPBINW1,SPBINW2 LIN870 PERF DKTEST LINRET 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 * * * SPINF8 PROC ******************** * * SPINF8 - WRITE INF ON LAST LINE * ******************** PERF SPLIN8,CBIN4,CBIN2 RET PEND * * CLEAR8 PROC * DELETE FIRST 14 CHARACTERS * OF LINE 24 MOVE GSWBIN2,=X'1801' INDICATE LAST LINE DSC1 SCREEN,06,GSWBIN2 MOVE GSWBIN2,CBIN14 DSC1 SCREEN,02,GSWBIN2 ERASE 14 CHARS RET PEND * * DKTEST PROC * TEST IF DISK IS SWITCHED OFF, * GETID GSWSTR2 MOVE GSWSTR1,GSWSTR2 CBE GSWSTR1,='R',DKTRET R]KONVERTERING? TBF CDKOFF,DKTRET TBT GTMASTFL,DKTRET TBF CDUOVL,DKTRET NO KI IF DISKOVERLAY ON DU * WRITE MESSAGE, AND WAIT FOR FLAG CLEARED MOVE SPBINW5,=X'1802' POSITION DSC1 SCREEN,6,SPBINW5 CURSOR EDWRT .NW,SCREEN,SPFTBMES(CBIN14) DKT10 DELAY CBIN10 TBT CDKOFF,DKT10 PERF CLEAR8 CMP CBIN1,CBIN0 NOK RET DKTRET CMP CBIN0,CBIN0 OK RET PEND * * * * END
0x0000…0020 (0, 0, 400) Head {h00=0x001c, h01=0x0050, text=» IDENT SCR267 830215 NJ «, 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…02a2 Head {h00=0x0012, h01=0x0050, text=» ENTRY SCREEN «, t00=0x0001, t01=0x0100}
0x02a2…02ce Head {h00=0x0028, h01=0x0050, text=» ENTRY SPINF1 INFORMATION ON LINE 1 «, t00=0x0001, t01=0x0116}
0x02ce…02fa Head {h00=0x0028, h01=0x0050, text=» ENTRY SPINF8 INFORMATION ON LINE 8 «, t00=0x0001, t01=0x0142}
0x02fa…030e Head {h00=0x0010, h01=0x0050, text=» ENTRY BELL «, t00=0x0001, t01=0x016e}
0x030e…0324 Head {h00=0x0012, h01=0x0050, text=» ENTRY CLEAR8 «, t00=0x0001, t01=0x0182}
0x0324…034c Head {h00=0x0024, h01=0x0050, text=» ENTRY DKTEST TEST IF DISK READY«, t00=0x0002, t01=0x0008}
0x034c…0376 Head {h00=0x0026, h01=0x0050, text=» ENTRY KBTEST TEST KB FOR MAK-KEY «, t00=0x0002, t01=0x0030}
0x0376…0380 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x005a}
0x0380…03b0 Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK1 STANDARD CHECK ROUTINE NO. 1«, t00=0x0002, t01=0x0064}
0x03b0…03e0 Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK2 STANDARD CHECK ROUTINE NO. 2«, t00=0x0002, t01=0x0094}
0x03e0…0410 Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK3 STANDARD CHECK ROUTINE NO. 3«, t00=0x0002, t01=0x00c4}
0x0410…0440 Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK4 STANDARD CHECK ROUTINE NO. 4«, t00=0x0002, t01=0x00f4}
0x0440…0470 Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK5 STANDARD CHECK ROUTINE NO.5 «, t00=0x0002, t01=0x0124}
0x0470…04a0 Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK6 STANDARD CHECK ROUTINE NO. 6«, t00=0x0002, t01=0x0154}
0x04a0…04d0 Head {h00=0x002c, h01=0x0050, text=» EXT SPCHK7 STANDARD CHECK ROUTINE NO. 7«, t00=0x0002, t01=0x0184}
0x04d0…04fa Head {h00=0x0026, h01=0x0050, text=» EXT SPAPPL USER ROUTINE TO HANDLE«, t00=0x0003, t01=0x0024}
0x04fa…0510 Head {h00=0x0012, h01=0x0050, text=» APPL VALUES«, t00=0x0003, t01=0x004e}
0x0510…0542 Head {h00=0x002e, h01=0x0050, text=» EXT RKAPPL APPLVALUES FOR R]KONVERTERING «, t00=0x0003, t01=0x0064}
0x0542…056e Head {h00=0x0028, h01=0x0050, text=» EXT SPTCHK USER ROUTINE TO EVALUATE«, t00=0x0003, t01=0x0096}
0x056e…0590 Head {h00=0x001e, h01=0x0050, text=» CONDITIONAL TABULATION «, t00=0x0003, t01=0x00c2}
0x0590…05a2 Head {h00=0x000e, h01=0x0050, text=» EXT ABORT«, t00=0x0003, t01=0x00e4}
0x05a2…05d4 Head {h00=0x002e, h01=0x0050, text=» EXT EMPTYT ASSEMBLY SUBROUTINE EMPTYT - «, t00=0x0003, t01=0x00f6}
0x05d4…05fa Head {h00=0x0022, h01=0x0050, text=» TEST IF DATA ITEM IS EMPTY «, t00=0x0003, t01=0x0128}
0x05fa…0604 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x014e}
0x0604…061c Head {h00=0x0014, h01=0x0050, text=»NOKEY EQU X'FF' «, t00=0x0003, t01=0x0158}
0x061c…0634 Head {h00=0x0014, h01=0x0050, text=»BSPKY1 EQU X'87'«, t00=0x0003, t01=0x0170}
0x0634…064c Head {h00=0x0014, h01=0x0050, text=»CANKY1 EQU X'91'«, t00=0x0003, t01=0x0188}
0x064c…0664 Head {h00=0x0014, h01=0x0050, text=»MACKY1 EQU X'95'«, t00=0x0004, t01=0x0010}
0x0664…067c Head {h00=0x0014, h01=0x0050, text=»EORKY1 EQU X'90'«, t00=0x0004, t01=0x0028}
0x067c…0696 Head {h00=0x0016, h01=0x0050, text=»FTABKY1 EQU X'8B' «, t00=0x0004, t01=0x0040}
0x0696…06b0 Head {h00=0x0016, h01=0x0050, text=»BTABKY1 EQU X'83' «, t00=0x0004, t01=0x005a}
0x06b0…06c8 Head {h00=0x0014, h01=0x0050, text=»DUPKY1 EQU X'A2'«, t00=0x0004, t01=0x0074}
0x06c8…06e2 Head {h00=0x0016, h01=0x0050, text=»SLUTKY1 EQU X'A3' «, t00=0x0004, t01=0x008c}
0x06e2…06fa Head {h00=0x0014, h01=0x0050, text=»REGKY1 EQU X'A1'«, t00=0x0004, t01=0x00a6}
0x06fa…0712 Head {h00=0x0014, h01=0x0050, text=»COPKY1 EQU X'FF'«, t00=0x0004, t01=0x00be}
0x0712…072a Head {h00=0x0014, h01=0x0050, text=»EDTKY1 EQU X'FF'«, t00=0x0004, t01=0x00d6}
0x072a…0742 Head {h00=0x0014, h01=0x0050, text=»KREKY1 EQU X'92'«, t00=0x0004, t01=0x00ee}
0x0742…075c Head {h00=0x0016, h01=0x0050, text=»LISTKY1 EQU X'88' «, t00=0x0004, t01=0x0106}
0x075c…0774 Head {h00=0x0014, h01=0x0050, text=»SBTKY1 EQU X'8A'«, t00=0x0004, t01=0x0120}
0x0774…078c Head {h00=0x0014, h01=0x0050, text=»SPGKY1 EQU X'FF'«, t00=0x0004, t01=0x0138}
0x078c…07a4 Head {h00=0x0014, h01=0x0050, text=»CY1KY1 EQU X'FF'«, t00=0x0004, t01=0x0150}
0x07a4…07bc Head {h00=0x0014, h01=0x0050, text=»CY2KY1 EQU X'FF'«, t00=0x0004, t01=0x0168}
0x07bc…07d4 Head {h00=0x0014, h01=0x0050, text=»CYCKY1 EQU X'89'«, t00=0x0004, t01=0x0180}
0x07d4…07ec Head {h00=0x0014, h01=0x0050, text=»INVKY1 EQU X'82'«, t00=0x0005, t01=0x0008}
0x07ec…0804 Head {h00=0x0014, h01=0x0050, text=»KONKY1 EQU X'85'«, t00=0x0005, t01=0x0020}
0x0804…081e Head {h00=0x0016, h01=0x0050, text=»KVITKY1 EQU X'86' «, t00=0x0005, t01=0x0038}
0x081e…0838 Head {h00=0x0016, h01=0x0050, text=»SUPLKY1 EQU X'FF' «, t00=0x0005, t01=0x0052}
0x0838…0850 Head {h00=0x0014, h01=0x0050, text=»SUMKY1 EQU X'81'«, t00=0x0005, t01=0x006c}
0x0850…0868 Head {h00=0x0014, h01=0x0050, text=»ADMKY1 EQU X'A0'«, t00=0x0005, t01=0x0084}
0x0868…0880 Head {h00=0x0014, h01=0x0050, text=»DIVKY1 EQU X'84'«, t00=0x0005, t01=0x009c}
0x0880…089a Head {h00=0x0016, h01=0x0050, text=»HBOGKY1 EQU X'80' «, t00=0x0005, t01=0x00b4}
0x089a…08b4 Head {h00=0x0016, h01=0x0050, text=»DEBPKY1 EQU X'93' «, t00=0x0005, t01=0x00ce}
0x08b4…08cc Head {h00=0x0014, h01=0x0050, text=»REMKY1 EQU X'94'«, t00=0x0005, t01=0x00e8}
0x08cc…08e4 Head {h00=0x0014, h01=0x0050, text=»TRSEL EQU X'FF' «, t00=0x0005, t01=0x0100}
0x08e4…08fc Head {h00=0x0014, h01=0x0050, text=»ONKY1 EQU X'99' «, 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'83'«, t00=0x0005, t01=0x013a}
0x091e…0936 Head {h00=0x0014, h01=0x0050, text=»BTBKY1 EQU X'87'«, t00=0x0005, t01=0x0152}
0x0936…094e Head {h00=0x0014, h01=0x0050, text=»INSKY1 EQU X'81'«, t00=0x0005, t01=0x016a}
0x094e…0966 Head {h00=0x0014, h01=0x0050, text=»DELKY1 EQU X'82'«, t00=0x0005, t01=0x0182}
0x0966…097e Head {h00=0x0014, h01=0x0050, text=»CL1KY1 EQU X'89'«, t00=0x0006, t01=0x000a}
0x097e…0996 Head {h00=0x0014, h01=0x0050, text=»CL2KY1 EQU X'8A'«, t00=0x0006, t01=0x0022}
0x0996…09ae Head {h00=0x0014, h01=0x0050, text=»CL3KY1 EQU X'8B'«, 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…09e8 Head {h00=0x0014, h01=0x0050, text=»BSPKY2 EQU X'C7'«, t00=0x0006, t01=0x0074}
0x09e8…0a00 Head {h00=0x0014, h01=0x0050, text=»CANKY2 EQU X'D1'«, t00=0x0006, t01=0x008c}
0x0a00…0a18 Head {h00=0x0014, h01=0x0050, text=»EORKY2 EQU X'D0'«, t00=0x0006, t01=0x00a4}
0x0a18…0a30 Head {h00=0x0014, h01=0x0050, text=»MACKY2 EQU X'D5'«, t00=0x0006, t01=0x00bc}
0x0a30…0a4a Head {h00=0x0016, h01=0x0050, text=»FTABKY2 EQU X'CB' «, t00=0x0006, t01=0x00d4}
0x0a4a…0a64 Head {h00=0x0016, h01=0x0050, text=»BTABKY2 EQU X'C3' «, t00=0x0006, t01=0x00ee}
0x0a64…0a7c Head {h00=0x0014, h01=0x0050, text=»DUPKY2 EQU X'E2'«, t00=0x0006, t01=0x0108}
0x0a7c…0a94 Head {h00=0x0014, h01=0x0050, text=»EDTKY2 EQU X'FF'«, t00=0x0006, t01=0x0120}
0x0a94…0aae Head {h00=0x0016, h01=0x0050, text=»SLUTKY2 EQU X'E3' «, t00=0x0006, t01=0x0138}
0x0aae…0ac6 Head {h00=0x0014, h01=0x0050, text=»KREKY2 EQU X'D2'«, t00=0x0006, t01=0x0152}
0x0ac6…0ade Head {h00=0x0014, h01=0x0050, text=»REGKY2 EQU X'E1'«, t00=0x0006, t01=0x016a}
0x0ade…0af6 Head {h00=0x0014, h01=0x0050, text=»ADMKY2 EQU X'E0'«, t00=0x0006, t01=0x0182}
0x0af6…0b0e Head {h00=0x0014, h01=0x0050, text=»SPGKY2 EQU X'FF'«, t00=0x0007, t01=0x000a}
0x0b0e…0b26 Head {h00=0x0014, h01=0x0050, text=»KONKY2 EQU X'FF'«, t00=0x0007, t01=0x0022}
0x0b26…0b40 Head {h00=0x0016, h01=0x0050, text=»KVITKY2 EQU X'C6' «, t00=0x0007, t01=0x003a}
0x0b40…0b58 Head {h00=0x0014, h01=0x0050, text=»ONKY2 EQU X'D9' «, t00=0x0007, t01=0x0054}
0x0b58…0b70 Head {h00=0x0014, h01=0x0050, text=»COPKY2 EQU X'C5'«, t00=0x0007, t01=0x006c}
0x0b70…0b7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0084}
0x0b7a…0b84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x008e}
0x0b84…0b9c Head {h00=0x0014, h01=0x0050, text=»BSPKY4 EQU X'C7'«, t00=0x0007, t01=0x0098}
0x0b9c…0bb4 Head {h00=0x0014, h01=0x0050, text=»CANKY4 EQU X'D1'«, t00=0x0007, t01=0x00b0}
0x0bb4…0bcc Head {h00=0x0014, h01=0x0050, text=»EORKY4 EQU X'D0'«, t00=0x0007, t01=0x00c8}
0x0bcc…0be4 Head {h00=0x0014, h01=0x0050, text=»MACKY4 EQU X'D5'«, t00=0x0007, t01=0x00e0}
0x0be4…0bfe Head {h00=0x0016, h01=0x0050, text=»FTABKY4 EQU X'D0' «, t00=0x0007, t01=0x00f8}
0x0bfe…0c18 Head {h00=0x0016, h01=0x0050, text=»BTABKY4 EQU X'D2' «, t00=0x0007, t01=0x0112}
0x0c18…0c32 Head {h00=0x0016, h01=0x0050, text=»CRHOMKY4 EQU X'D7'«, t00=0x0007, t01=0x012c}
0x0c32…0c4c Head {h00=0x0016, h01=0x0050, text=»CRNLKY4 EQU X'C5' «, t00=0x0007, t01=0x0146}
0x0c4c…0c66 Head {h00=0x0016, h01=0x0050, text=»CRDWNKY4 EQU X'CA'«, t00=0x0007, t01=0x0160}
0x0c66…0c80 Head {h00=0x0016, h01=0x0050, text=»CRUPKY4 EQU X'C1' «, t00=0x0007, t01=0x017a}
0x0c80…0c98 (8, 0, 400) Head {h00=0x0014, h01=0x0050, text=»COPKY4 EQU X'C6'«, t00=0x0008, t01=0x0004}
0x0c98…0cb2 Head {h00=0x0016, h01=0x0050, text=»SLUTKY4 EQU X'E3' «, t00=0x0008, t01=0x001c}
0x0cb2…0cca Head {h00=0x0014, h01=0x0050, text=»ONKY4 EQU X'D9' «, t00=0x0008, t01=0x0036}
0x0cca…0cd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x004e}
0x0cd4…0d14 Head {h00=0x003c, h01=0x0050, text=»SPKTAB1 KTAB BSPKY1,CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C«, t00=0x0008, t01=0x0058}
0x0d14…0d56 Head {h00=0x003e, h01=0x0050, text=» FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C «, t00=0x0008, t01=0x0098}
0x0d56…0d80 Head {h00=0x0026, h01=0x0050, text=» COPKY1,DUPKY1,EDTKY1,SLUTKY1, C«, t00=0x0008, t01=0x00da}
0x0d80…0db2 Head {h00=0x002e, h01=0x0050, text=» KREKY1,REGKY2,LISTKY1,SBTKY1,SPGKY1, C «, t00=0x0008, t01=0x0104}
0x0db2…0df2 Head {h00=0x003c, h01=0x0050, text=» CY1KY1,CY2KY1,INVKY1,KONKY1,KVITKY1,SUPLKY1,SUMKY1, C«, t00=0x0008, t01=0x0136}
0x0df2…0e32 Head {h00=0x003c, h01=0x0050, text=» ADMKY1,CYCKY1,DIVKY1,HBOGKY1,DEBPKY1,REMKY1,TRSEL, C «, t00=0x0008, t01=0x0176}
0x0e32…0e42 Head {h00=0x000c, h01=0x0050, text=» ONKY1 «, t00=0x0009, t01=0x0026}
0x0e42…0e4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0036}
0x0e4c…0e8c Head {h00=0x003c, h01=0x0050, text=»SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C«, t00=0x0009, t01=0x0040}
0x0e8c…0ece Head {h00=0x003e, h01=0x0050, text=» FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C «, t00=0x0009, t01=0x0080}
0x0ece…0ef8 Head {h00=0x0026, h01=0x0050, text=» COPKY1,DUPKY1,EDTKY1,SLUTKY1, C«, t00=0x0009, t01=0x00c2}
0x0ef8…0f2a Head {h00=0x002e, h01=0x0050, text=» KREKY1,REGKY2,LISTKY1,SBTKY1,SPGKY1, C «, t00=0x0009, t01=0x00ec}
0x0f2a…0f6a Head {h00=0x003c, h01=0x0050, text=» CY1KY1,CY2KY1,INVKY1,KONKY1,KVITKY1,SUPLKY1,SUMKY1, C«, t00=0x0009, t01=0x011e}
0x0f6a…0faa Head {h00=0x003c, h01=0x0050, text=» ADMKY1,CYCKY1,DIVKY1,HBOGKY1,DEBPKY1,REMKY1,TRSEL, C «, t00=0x0009, t01=0x015e}
0x0faa…0fba Head {h00=0x000c, h01=0x0050, text=» ONKY1 «, t00=0x000a, t01=0x000e}
0x0fba…0fc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x001e}
0x0fc4…0ff8 Head {h00=0x0030, h01=0x0050, text=»SPKTAB3 KTAB FTBKY1,BTBKY1,INSKY1,DELKY1, C«, t00=0x000a, t01=0x0028}
0x0ff8…101e Head {h00=0x0022, h01=0x0050, text=» CL1KY1,CL2KY1,CL3KY1,OUTKY1 «, t00=0x000a, t01=0x005c}
0x101e…1028 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0082}
0x1028…106a Head {h00=0x003e, h01=0x0050, text=»SPKTAB12 KTAB BSPKY2,CANKY2,NOKEY,EORKY2,NOKEY,MACKY2, C «, t00=0x000a, t01=0x008c}
0x106a…10a0 Head {h00=0x0032, h01=0x0050, text=» FTABKY2,BTABKY2,NOKEY,NOKEY,NOKEY,NOKEY, C «, t00=0x000a, t01=0x00ce}
0x10a0…10d6 Head {h00=0x0032, h01=0x0050, text=» NOKEY,NOKEY,COPKY2,DUPKY2,EDTKY2,SLUTKY2, C«, t00=0x000a, t01=0x0104}
0x10d6…1110 Head {h00=0x0036, h01=0x0050, text=» KREKY2,REGKY2,ADMKY2,SPGKY2,KONKY2,KVITKY2,ONKY2«, t00=0x000a, t01=0x013a}
0x1110…111a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0174}
0x111a…115c Head {h00=0x003e, h01=0x0050, text=»SPKTAB22 KTAB BSPKY2,CANKY2,NOKEY,EORKY2,NOKEY,MACKY2, C «, t00=0x000a, t01=0x017e}
0x115c…1192 Head {h00=0x0032, h01=0x0050, text=» FTABKY2,BTABKY2,NOKEY,NOKEY,NOKEY,NOKEY, C «, t00=0x000b, t01=0x0030}
0x1192…11c8 Head {h00=0x0032, h01=0x0050, text=» NOKEY,NOKEY,NOKEY,DUPKY2,EDTKY2,SLUTKY2, C «, t00=0x000b, t01=0x0066}
0x11c8…1202 Head {h00=0x0036, h01=0x0050, text=» KREKY2,REGKY2,ADMKY2,SPGKY2,KONKY2,KVITKY2,ONKY2«, t00=0x000b, t01=0x009c}
0x1202…120c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00d6}
0x120c…123a Head {h00=0x002a, h01=0x0050, text=»* INQUIRY KEYTABLES (SPKEY=3)«, t00=0x000b, t01=0x00e0}
0x123a…1244 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x010e}
0x1244…1284 Head {h00=0x003c, h01=0x0050, text=»SPKTAB13 KTAB BSPKY1,NOKEY,CANKY1,NOKEY,NOKEY,MACKY1, C«, t00=0x000b, t01=0x0118}
0x1284…12b6 Head {h00=0x002e, h01=0x0050, text=» NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C «, t00=0x000b, t01=0x0158}
0x12b6…12ea Head {h00=0x0030, h01=0x0050, text=» NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,SLUTKY1, C «, t00=0x000b, t01=0x018a}
0x12ea…131c Head {h00=0x002e, h01=0x0050, text=» NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C «, t00=0x000c, t01=0x002e}
0x131c…1342 Head {h00=0x0022, h01=0x0050, text=» NOKEY,INVKY1,KONKY1,KVITKY1 «, t00=0x000c, t01=0x0060}
0x1342…134c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0086}
0x134c…138c Head {h00=0x003c, h01=0x0050, text=»SPKTAB23 KTAB BSPKY1,NOKEY,CANKY1,NOKEY,NOKEY,MACKY1, C«, t00=0x000c, t01=0x0090}
0x138c…13be Head {h00=0x002e, h01=0x0050, text=» NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C «, t00=0x000c, t01=0x00d0}
0x13be…13f0 Head {h00=0x002e, h01=0x0050, text=» NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C «, t00=0x000c, t01=0x0102}
0x13f0…1422 Head {h00=0x002e, h01=0x0050, text=» NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C «, t00=0x000c, t01=0x0134}
0x1422…1454 Head {h00=0x002e, h01=0x0050, text=» NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C «, t00=0x000c, t01=0x0166}
0x1454…1464 Head {h00=0x000c, h01=0x0050, text=» ADMKY1«, t00=0x000d, t01=0x0008}
0x1464…1486 Head {h00=0x001e, h01=0x0050, text=»* R]KONVERTERING, SPKEY=4 «, t00=0x000d, t01=0x0018}
0x1486…1490 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x003a}
0x1490…14ca Head {h00=0x0036, h01=0x0050, text=»SPKTAB14 KTAB BSPKY4,CANKY4,NOKEY,EORKY4,NOKEY, C«, t00=0x000d, t01=0x0044}
0x14ca…1500 Head {h00=0x0032, h01=0x0050, text=» MACKY4,FTABKY4,BTABKY4,CRHOMKY4,CRNLKY4, C «, t00=0x000d, t01=0x007e}
0x1500…1538 Head {h00=0x0034, h01=0x0050, text=» NOKEY,NOKEY,CRDWNKY4,CRUPKY4,COPKY4,NOKEY, C «, t00=0x000d, t01=0x00b4}
0x1538…156c Head {h00=0x0030, h01=0x0050, text=» NOKEY,SLUTKY4,NOKEY,NOKEY,NOKEY,NOKEY, C «, t00=0x000d, t01=0x00ec}
0x156c…159e Head {h00=0x002e, h01=0x0050, text=» NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C «, t00=0x000d, t01=0x0120}
0x159e…15d0 Head {h00=0x002e, h01=0x0050, text=» NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C «, t00=0x000d, t01=0x0152}
0x15d0…15f2 Head {h00=0x001e, h01=0x0050, text=» NOKEY,NOKEY,NOKEY,ONKY4 «, t00=0x000d, t01=0x0184}
0x15f2…15fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0016}
0x15fc…1636 Head {h00=0x0036, h01=0x0050, text=»SPKTAB24 KTAB BSPKY4,CANKY4,NOKEY,EORKY4,NOKEY, C«, t00=0x000e, t01=0x0020}
0x1636…166c Head {h00=0x0032, h01=0x0050, text=» MACKY4,FTABKY4,BTABKY4,CRHOMKY4,CRNLKY4, C «, t00=0x000e, t01=0x005a}
0x166c…16a4 Head {h00=0x0034, h01=0x0050, text=» NOKEY,NOKEY,CRDWNKY4,CRUPKY4,COPKY4,NOKEY, C «, t00=0x000e, t01=0x0090}
0x16a4…16d8 Head {h00=0x0030, h01=0x0050, text=» NOKEY,SLUTKY4,NOKEY,NOKEY,NOKEY,NOKEY, C «, t00=0x000e, t01=0x00c8}
0x16d8…170a Head {h00=0x002e, h01=0x0050, text=» NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C «, t00=0x000e, t01=0x00fc}
0x170a…173c Head {h00=0x002e, h01=0x0050, text=» NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C «, t00=0x000e, t01=0x012e}
0x173c…175e Head {h00=0x001e, h01=0x0050, text=» NOKEY,NOKEY,NOKEY,ONKY4 «, t00=0x000e, t01=0x0160}
0x175e…1768 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0182}
0x1768…17a6 Head {h00=0x003a, h01=0x0050, text=»SPFTBERR FTABLE ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C«, t00=0x000e, t01=0x018c}
0x17a6…17d6 Head {h00=0x002c, h01=0x0050, text=» ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C«, t00=0x000f, t01=0x003a}
0x17d6…1806 Head {h00=0x002c, h01=0x0050, text=» ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C«, t00=0x000f, t01=0x006a}
0x1806…1836 Head {h00=0x002c, h01=0x0050, text=» ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C«, t00=0x000f, t01=0x009a}
0x1836…1866 Head {h00=0x002c, h01=0x0050, text=» ERRDSK,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C«, t00=0x000f, t01=0x00ca}
0x1866…189c Head {h00=0x0032, h01=0x0050, text=» ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT WARNINGS «, t00=0x000f, t01=0x00fa}
0x189c…18a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0130}
0x18a6…18ec Head {h00=0x0042, h01=0x0050, text=»SPFTBMES FTABLE MSFMT1,MSFMT2,MSFMT3,MSFMT4,MSFMT5,MSFMT6, C «, t00=0x000f, t01=0x013a}
0x18ec…1916 Head {h00=0x0026, h01=0x0050, text=» MSFMT7,MSFMT8,MSFMT9,MSFMT10, C«, t00=0x000f, t01=0x0180}
0x1916…1940 Head {h00=0x0026, h01=0x0050, text=» MSFMT11,MSFMT12,MSFMT13,MSFMT14 «, t00=0x0010, t01=0x001a}
0x1940…194a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0044}
0x194a…1954 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x004e}
0x1954…1968 Head {h00=0x0010, h01=0x0050, text=»ERRFMT FRMT «, t00=0x0010, t01=0x0058}
0x1968…1974 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0010, t01=0x006c}
0x1974…198c Head {h00=0x0014, h01=0x0050, text=» FCOPY ='FEJL ' «, t00=0x0010, t01=0x0078}
0x198c…19b2 Head {h00=0x0022, h01=0x0050, text=» FMEL 'ZZZ9',GSWBCD4 ERRORNR. «, t00=0x0010, t01=0x0090}
0x19b2…19c0 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0010, t01=0x00b6}
0x19c0…19ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00c4}
0x19ca…19de Head {h00=0x0010, h01=0x0050, text=»ERRDSK FRMT «, t00=0x0010, t01=0x00ce}
0x19de…19ea Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0010, t01=0x00e2}
0x19ea…1a06 Head {h00=0x0018, h01=0x0050, text=» FMEL '99B',GTWBCD2 «, t00=0x0010, t01=0x00ee}
0x1a06…1a1c Head {h00=0x0012, h01=0x0050, text=» FCOPY GSWSTR9«, t00=0x0010, t01=0x010a}
0x1a1c…1a36 Head {h00=0x0016, h01=0x0050, text=» FMEL '99',GTWBCD1«, t00=0x0010, t01=0x0120}
0x1a36…1a44 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0010, t01=0x013a}
0x1a44…1a4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0148}
0x1a4e…1a62 Head {h00=0x0010, h01=0x0050, text=»MSFMT1 FRMT «, t00=0x0010, t01=0x0152}
0x1a62…1a6e Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0010, t01=0x0166}
0x1a6e…1a8e Head {h00=0x001c, h01=0x0050, text=» FCOPY ='SKIFT JOURNAL' «, t00=0x0010, t01=0x0172}
0x1a8e…1a9c (17, 0, 400) Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0011, t01=0x0004}
0x1a9c…1aa6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0012}
0x1aa6…1aba Head {h00=0x0010, h01=0x0050, text=»MSFMT2 FRMT «, t00=0x0011, t01=0x001c}
0x1aba…1ac6 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0011, t01=0x0030}
0x1ac6…1ae2 Head {h00=0x0018, h01=0x0050, text=» FCOPY ='LINIE NR'«, t00=0x0011, t01=0x003c}
0x1ae2…1af8 Head {h00=0x0012, h01=0x0050, text=» FILLR '.',1«, t00=0x0011, t01=0x0058}
0x1af8…1b06 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0011, t01=0x006e}
0x1b06…1b10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x007c}
0x1b10…1b24 Head {h00=0x0010, h01=0x0050, text=»MSFMT3 FRMT «, t00=0x0011, t01=0x0086}
0x1b24…1b30 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0011, t01=0x009a}
0x1b30…1b4c Head {h00=0x0018, h01=0x0050, text=» FTEXT ='NY SIDE. ' «, t00=0x0011, t01=0x00a6}
0x1b4c…1b5a Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0011, t01=0x00c2}
0x1b5a…1b64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00d0}
0x1b64…1b78 Head {h00=0x0010, h01=0x0050, text=»MSFMT4 FRMT «, t00=0x0011, t01=0x00da}
0x1b78…1b84 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0011, t01=0x00ee}
0x1b84…1ba2 Head {h00=0x001a, h01=0x0050, text=» FBF TTSUMFLG,FMT4END «, t00=0x0011, t01=0x00fa}
0x1ba2…1bb2 Head {h00=0x000c, h01=0x0050, text=» FTAB 15«, t00=0x0011, t01=0x0118}
0x1bb2…1bc8 Head {h00=0x0012, h01=0x0050, text=» FCOPY GTL8TXT«, t00=0x0011, t01=0x0128}
0x1bc8…1bd8 Head {h00=0x000c, h01=0x0050, text=» FINP 23«, t00=0x0011, t01=0x013e}
0x1bd8…1bfc Head {h00=0x0020, h01=0x0050, text=» FMEL 'ZZZZZVZZ9,99+',GTSUM «, t00=0x0011, t01=0x014e}
0x1bfc…1c0c Head {h00=0x000c, h01=0x0050, text=»FMT4END «, t00=0x0011, t01=0x0172}
0x1c0c…1c1a Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0011, t01=0x0182}
0x1c1a…1c24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0190}
0x1c24…1c38 Head {h00=0x0010, h01=0x0050, text=»MSFMT5 FRMT «, t00=0x0012, t01=0x000a}
0x1c38…1c44 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0012, t01=0x001e}
0x1c44…1c5c Head {h00=0x0014, h01=0x0050, text=» FCOPY ='BILAG' «, t00=0x0012, t01=0x002a}
0x1c5c…1c6a Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0012, t01=0x0042}
0x1c6a…1c74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0050}
0x1c74…1c88 Head {h00=0x0010, h01=0x0050, text=»MSFMT6 FRMT «, t00=0x0012, t01=0x005a}
0x1c88…1c94 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0012, t01=0x006e}
0x1c94…1cb0 Head {h00=0x0018, h01=0x0050, text=» FCOPY ='KONTOKORT' «, t00=0x0012, t01=0x007a}
0x1cb0…1cbe Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0012, t01=0x0096}
0x1cbe…1cc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00a4}
0x1cc8…1cdc Head {h00=0x0010, h01=0x0050, text=»MSFMT7 FRMT «, t00=0x0012, t01=0x00ae}
0x1cdc…1ce8 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0012, t01=0x00c2}
0x1ce8…1cfe Head {h00=0x0012, h01=0x0050, text=» FCOPY TTINF1 «, t00=0x0012, t01=0x00ce}
0x1cfe…1d0c Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0012, t01=0x00e4}
0x1d0c…1d16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00f2}
0x1d16…1d2a Head {h00=0x0010, h01=0x0050, text=»MSFMT8 FRMT «, t00=0x0012, t01=0x00fc}
0x1d2a…1d36 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0012, t01=0x0110}
0x1d36…1d58 Head {h00=0x001e, h01=0x0050, text=» FCOPY ='DISKETTE SKIFT ' «, t00=0x0012, t01=0x011c}
0x1d58…1d6e Head {h00=0x0012, h01=0x0050, text=» FILLR X'07',1«, t00=0x0012, t01=0x013e}
0x1d6e…1d7c Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0012, t01=0x0154}
0x1d7c…1d86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0162}
0x1d86…1d9a Head {h00=0x0010, h01=0x0050, text=»MSFMT9 FRMT «, t00=0x0012, t01=0x016c}
0x1d9a…1da6 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0012, t01=0x0180}
0x1da6…1dc0 Head {h00=0x0016, h01=0x0050, text=» FCOPY ='OPSTART '«, t00=0x0012, t01=0x018c}
0x1dc0…1dce Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0013, t01=0x0016}
0x1dce…1dd8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0024}
0x1dd8…1dec Head {h00=0x0010, h01=0x0050, text=»MSFMT10 FRMT«, t00=0x0013, t01=0x002e}
0x1dec…1df8 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0013, t01=0x0042}
0x1df8…1e1e Head {h00=0x0022, h01=0x0050, text=» FMEL 'TTTTTTTTTTTT9-',GTWBCD2«, t00=0x0013, t01=0x004e}
0x1e1e…1e2c Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0013, t01=0x0074}
0x1e2c…1e36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0082}
0x1e36…1e4a Head {h00=0x0010, h01=0x0050, text=»MSFMT11 FRMT«, t00=0x0013, t01=0x008c}
0x1e4a…1e56 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0013, t01=0x00a0}
0x1e56…1e74 Head {h00=0x001a, h01=0x0050, text=» FCOPY ='OPRET LEV. ' «, t00=0x0013, t01=0x00ac}
0x1e74…1e82 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0013, t01=0x00ca}
0x1e82…1e8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00d8}
0x1e8c…1ea0 Head {h00=0x0010, h01=0x0050, text=»MSFMT12 FRMT«, t00=0x0013, t01=0x00e2}
0x1ea0…1eac Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0013, t01=0x00f6}
0x1eac…1eba Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0013, t01=0x0102}
0x1eba…1ec4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0110}
0x1ec4…1ed8 Head {h00=0x0010, h01=0x0050, text=»MSFMT13 FRMT«, t00=0x0013, t01=0x011a}
0x1ed8…1ee4 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0013, t01=0x012e}
0x1ee4…1f02 Head {h00=0x001a, h01=0x0050, text=» FCOPY ='STRAKS-CHECK'«, t00=0x0013, t01=0x013a}
0x1f02…1f10 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0013, t01=0x0158}
0x1f10…1f1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0166}
0x1f1a…1f2e Head {h00=0x0010, h01=0x0050, text=»MSFMT14 FRMT«, t00=0x0013, t01=0x0170}
0x1f2e…1f3a Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0013, t01=0x0184}
0x1f3a…1f5a Head {h00=0x001c, h01=0x0050, text=» FCOPY ='VENT P] DISK ' «, t00=0x0013, t01=0x0190}
0x1f5a…1f68 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0014, t01=0x0020}
0x1f68…1f72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x002e}
0x1f72…1f7a Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x0038}
0x1f7a…1f8e Head {h00=0x0010, h01=0x0050, text=»SPCLRA PROC «, t00=0x0014, t01=0x0040}
0x1f8e…1f98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0054}
0x1f98…1fe0 Head {h00=0x0044, h01=0x0050, text=»* SPCLRA - CLEAR ALL VARABLE FIELDS BEFORE HANDLING THE PICTURE «, t00=0x0014, t01=0x005e}
0x1fe0…1fea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00a6}
0x1fea…2006 Head {h00=0x0018, h01=0x0050, text=» MOVE SPERASE,CBIN0 «, t00=0x0014, t01=0x00b0}
0x2006…2020 Head {h00=0x0016, h01=0x0050, text=» PERF SCREEN,=W'1'«, t00=0x0014, t01=0x00cc}
0x2020…202c Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0014, t01=0x00e6}
0x202c…203a Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0014, t01=0x00f2}
0x203a…204e Head {h00=0x0010, h01=0x0050, text=»SPCLRS PROC «, t00=0x0014, t01=0x0100}
0x204e…2058 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0114}
0x2058…20a2 Head {h00=0x0046, h01=0x0050, text=»* SPCLRS - CLEAR SOME VARIABLE FIELDS BEFORE HANDLING THE PICTURE «, t00=0x0014, t01=0x011e}
0x20a2…20ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0168}
0x20ac…20c8 Head {h00=0x0018, h01=0x0050, text=» MOVE SPERASE,CBIN0 «, t00=0x0014, t01=0x0172}
0x20c8…20e2 Head {h00=0x0016, h01=0x0050, text=» PERF SCREEN,=W'2'«, t00=0x0014, t01=0x018e}
0x20e2…20ee Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0015, t01=0x0018}
0x20ee…20fc Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0015, t01=0x0024}
0x20fc…2110 Head {h00=0x0010, h01=0x0050, text=»SPCLRN PROC «, t00=0x0015, t01=0x0032}
0x2110…211a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0046}
0x211a…2162 Head {h00=0x0044, h01=0x0050, text=»* SPCLRN - CLEAR NO VARIABLE FIELDS BEFORE HANDLING THE PICTURE «, t00=0x0015, t01=0x0050}
0x2162…216c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0098}
0x216c…2188 Head {h00=0x0018, h01=0x0050, text=» MOVE SPERASE,CBIN0 «, t00=0x0015, t01=0x00a2}
0x2188…21a2 Head {h00=0x0016, h01=0x0050, text=» PERF SCREEN,=W'3'«, t00=0x0015, t01=0x00be}
0x21a2…21ae Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0015, t01=0x00d8}
0x21ae…21bc Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0015, t01=0x00e4}
0x21bc…21ce Head {h00=0x000e, h01=0x0050, text=»SPERR PROC«, t00=0x0015, t01=0x00f2}
0x21ce…21d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0104}
0x21d8…220c Head {h00=0x0030, h01=0x0050, text=»* HANDLE ERRORS DETECTED OUTSIDE THE PACKAGE«, t00=0x0015, t01=0x010e}
0x220c…2216 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0142}
0x2216…2230 Head {h00=0x0016, h01=0x0050, text=» PERF SCREEN,=W'0'«, t00=0x0015, t01=0x014c}
0x2230…223c Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0015, t01=0x0166}
0x223c…224a Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0015, t01=0x0172}
0x224a…225c Head {h00=0x000e, h01=0x0050, text=»SPCA PROC «, t00=0x0015, t01=0x0180}
0x225c…2266 (22, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0004}
0x2266…2270 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x000e}
0x2270…228c Head {h00=0x0018, h01=0x0050, text=» MOVE SPERASE,CBIN4 «, t00=0x0016, t01=0x0018}
0x228c…22a6 Head {h00=0x0016, h01=0x0050, text=» PERF SCREEN,=W'1'«, t00=0x0016, t01=0x0034}
0x22a6…22b2 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0016, t01=0x004e}
0x22b2…22c0 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0016, t01=0x005a}
0x22c0…22d2 Head {h00=0x000e, h01=0x0050, text=»SPCN PROC «, t00=0x0016, t01=0x0068}
0x22d2…22dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x007a}
0x22dc…22e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0084}
0x22e6…2302 Head {h00=0x0018, h01=0x0050, text=» MOVE SPERASE,CBIN4 «, t00=0x0016, t01=0x008e}
0x2302…231c Head {h00=0x0016, h01=0x0050, text=» PERF SCREEN,=W'3'«, t00=0x0016, t01=0x00aa}
0x231c…2328 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0016, t01=0x00c4}
0x2328…2336 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0016, t01=0x00d0}
0x2336…233e Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x00de}
0x233e…2356 Head {h00=0x0014, h01=0x0050, text=»SCREEN PROC $OPT«, t00=0x0016, t01=0x00e6}
0x2356…2360 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00fe}
0x2360…2388 Head {h00=0x0024, h01=0x0050, text=»* SCREEN SCREEN HANDLING MODULE «, t00=0x0016, t01=0x0108}
0x2388…2392 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0130}
0x2392…23b4 Head {h00=0x001e, h01=0x0050, text=»* CALL: PERF SCREEN,<$OPT>«, t00=0x0016, t01=0x013a}
0x23b4…23be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x015c}
0x23be…23e0 Head {h00=0x001e, h01=0x0050, text=» PLIT $OPT OPTIO SELECTOR «, t00=0x0016, t01=0x0166}
0x23e0…23e8 Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x0188}
0x23e8…2412 Head {h00=0x0026, h01=0x0050, text=» CLEAR SPWARNFL CLEAR WARNING FLAG«, t00=0x0016, t01=0x0190}
0x2412…243e Head {h00=0x0028, h01=0x0050, text=» MOVE SPBINW2,$OPT MOVE TO VARIABLE «, t00=0x0017, t01=0x002a}
0x243e…2464 Head {h00=0x0022, h01=0x0050, text=» TO ALLOW INSTR.S CMP AND IB«, t00=0x0017, t01=0x0056}
0x2464…248e Head {h00=0x0026, h01=0x0050, text=» CMP SPBINW2,CBIN0 "SPERR" ENTRY ?«, t00=0x0017, t01=0x007c}
0x248e…24a8 Head {h00=0x0016, h01=0x0050, text=» BE ERRPRINT YES !«, t00=0x0017, t01=0x00a6}
0x24a8…24b0 Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x00c0}
0x24b0…24e2 Head {h00=0x002e, h01=0x0050, text=» TBT SPPROMPT,ENTIRE JUMP IF ENTIRE FORMAT«, t00=0x0017, t01=0x00c8}
0x24e2…2500 Head {h00=0x001a, h01=0x0050, text=» SHOULD BE DISPLAYED«, t00=0x0017, t01=0x00fa}
0x2500…250a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0118}
0x250a…252c Head {h00=0x001e, h01=0x0050, text=»* ONLY VARIABLE FIELDS «, t00=0x0017, t01=0x0122}
0x252c…2536 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0144}
0x2536…2572 Head {h00=0x0038, h01=0x0050, text=» IB SPBINW2,CLEARA,CLEARS,CONT JUMP ON ROUTINE INDEX«, t00=0x0017, t01=0x014e}
0x2572…257c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x018a}
0x257c…258a (24, 0, 400) Head {h00=0x000a, h01=0x0050, text=»CLEARA«, t00=0x0018, t01=0x0004}
0x258a…25c0 Head {h00=0x0032, h01=0x0050, text=» ERASE 10,CBIN1,CBIN0 ERASE ALL FROM 1 AND UP «, t00=0x0018, t01=0x0012}
0x25c0…25ce Head {h00=0x000a, h01=0x0050, text=» THOME«, t00=0x0018, t01=0x0048}
0x25ce…25de Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x0018, t01=0x0056}
0x25de…25e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0066}
0x25e8…25f6 Head {h00=0x000a, h01=0x0050, text=»CLEARS«, t00=0x0018, t01=0x0070}
0x25f6…262c Head {h00=0x0032, h01=0x0050, text=» ERASE 5,CBIN1,CBIN0 ERASE SOME FROM 1 AND UP «, t00=0x0018, t01=0x007e}
0x262c…263c Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x0018, t01=0x00b4}
0x263c…2644 Head {h00=0x0004, h01=0x0050, t00=0x0018, t01=0x00c4}
0x2644…264e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00cc}
0x264e…2670 Head {h00=0x001e, h01=0x0050, text=»* DISPLAY ENTIRE FORMAT«, t00=0x0018, t01=0x00d6}
0x2670…267a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00f8}
0x267a…2688 Head {h00=0x000a, h01=0x0050, text=»ENTIRE«, t00=0x0018, t01=0x0102}
0x2688…26c4 Head {h00=0x0038, h01=0x0050, text=» IB SPBINW2,ECLRA,ECLRS,ECLRN JUMP ON ROUTINE INDEX «, t00=0x0018, t01=0x0110}
0x26c4…26ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x014c}
0x26ce…26ee Head {h00=0x001c, h01=0x0050, text=»* CLEAR ALL VARIABLES«, t00=0x0018, t01=0x0156}
0x26ee…26f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0176}
0x26f8…2706 Head {h00=0x000a, h01=0x0050, text=»ECLRA «, t00=0x0018, t01=0x0180}
0x2706…272e Head {h00=0x0024, h01=0x0050, text=» ERASE 11,CBIN1,CBIN0 CLEAR ALL «, t00=0x0018, t01=0x018e}
0x272e…2742 Head {h00=0x0010, h01=0x0050, text=» IN MEMORY«, t00=0x0019, t01=0x0026}
0x2742…2752 Head {h00=0x000c, h01=0x0050, text=» B ECLRN«, t00=0x0019, t01=0x003a}
0x2752…275c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x004a}
0x275c…277e Head {h00=0x001e, h01=0x0050, text=»* CLEAR SOME VARIABLES «, t00=0x0019, t01=0x0054}
0x277e…2788 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0076}
0x2788…2796 Head {h00=0x000a, h01=0x0050, text=»ECLRS «, t00=0x0019, t01=0x0080}
0x2796…27ca Head {h00=0x0030, h01=0x0050, text=» ERASE 6,CBIN1,CBIN0 CLEAR SOME FIELDS FROM «, t00=0x0019, t01=0x008e}
0x27ca…27e8 Head {h00=0x001a, h01=0x0050, text=» 1 AND UP IN MEMORY «, t00=0x0019, t01=0x00c2}
0x27e8…27f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00e0}
0x27f2…281c Head {h00=0x0026, h01=0x0050, text=»* CLEAR NO VARIABLES IN MEMORY «, t00=0x0019, t01=0x00ea}
0x281c…2826 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0114}
0x2826…2834 Head {h00=0x000a, h01=0x0050, text=»ECLRN «, t00=0x0019, t01=0x011e}
0x2834…2864 Head {h00=0x002c, h01=0x0050, text=» IB SPERASE,ECLRN1,ECLRN2,ECLRN3,ECLRN4 «, t00=0x0019, t01=0x012c}
0x2864…2882 Head {h00=0x001a, h01=0x0050, text=» DISPLAY 0,CBIN1,CBIN0«, t00=0x0019, t01=0x015c}
0x2882…2892 Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x0019, t01=0x017a}
0x2892…28a0 Head {h00=0x000a, h01=0x0050, text=»ECLRN1«, t00=0x0019, t01=0x018a}
0x28a0…28be Head {h00=0x001a, h01=0x0050, text=» DISPLAY 1,CBIN1,CBIN0«, t00=0x001a, t01=0x0008}
0x28be…28ce Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x001a, t01=0x0026}
0x28ce…28dc Head {h00=0x000a, h01=0x0050, text=»ECLRN2«, t00=0x001a, t01=0x0036}
0x28dc…28fa Head {h00=0x001a, h01=0x0050, text=» DISPLAY 2,CBIN1,CBIN0«, t00=0x001a, t01=0x0044}
0x28fa…290a Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x001a, t01=0x0062}
0x290a…2918 Head {h00=0x000a, h01=0x0050, text=»ECLRN3«, t00=0x001a, t01=0x0072}
0x2918…2936 Head {h00=0x001a, h01=0x0050, text=» DISPLAY 3,CBIN1,CBIN0«, t00=0x001a, t01=0x0080}
0x2936…2946 Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x001a, t01=0x009e}
0x2946…2954 Head {h00=0x000a, h01=0x0050, text=»ECLRN4«, t00=0x001a, t01=0x00ae}
0x2954…2972 Head {h00=0x001a, h01=0x0050, text=» DISPLAY 4,CBIN1,CBIN0«, t00=0x001a, t01=0x00bc}
0x2972…2982 Head {h00=0x000c, h01=0x0050, text=» B CONT «, t00=0x001a, t01=0x00da}
0x2982…298c Head {h00=0x0006, h01=0x0050, text=» «, t00=0x001a, t01=0x00ea}
0x298c…2998 Head {h00=0x0008, h01=0x0050, text=»CONT«, t00=0x001a, t01=0x00f4}
0x2998…29c2 Head {h00=0x0026, h01=0x0050, text=» GETABX SPBINW4 GET CURRENT INDEX «, t00=0x001a, t01=0x0100}
0x29c2…29ee Head {h00=0x0028, h01=0x0050, text=» BL KTHOME JUMP IF NO CURRENT FIELD «, t00=0x001a, t01=0x012a}
0x29ee…29fc Head {h00=0x000a, h01=0x0050, text=»CONT5 «, t00=0x001a, t01=0x0156}
0x29fc…2a36 Head {h00=0x0036, h01=0x0050, text=» GETFLD 0,SPBINW4,SPBINW3 SEARCH CURRENT POSITION «, t00=0x001a, t01=0x0164}
0x2a36…2a58 Head {h00=0x001e, h01=0x0050, text=» BZ SETCREAD JUMP IF FOUND«, t00=0x001b, t01=0x000e}
0x2a58…2a7e Head {h00=0x0022, h01=0x0050, text=» BL KTHOME POSITION NOT FOUND «, t00=0x001b, t01=0x0030}
0x2a7e…2a88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0056}
0x2a88…2aac Head {h00=0x0020, h01=0x0050, text=»* COMPULSORY FIELD FOUND «, t00=0x001b, t01=0x0060}
0x2aac…2ab6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0084}
0x2ab6…2ae0 Head {h00=0x0026, h01=0x0050, text=» MOVE SPBINW4,SPBINW3 CHANGE INDEX«, t00=0x001b, t01=0x008e}
0x2ae0…2afe Head {h00=0x001a, h01=0x0050, text=» B CONT5 SEARCH AGAIN «, t00=0x001b, t01=0x00b8}
0x2afe…2b08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00d6}
0x2b08…2b10 Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x00e0}
0x2b10…2b1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00e8}
0x2b1a…2b44 Head {h00=0x0026, h01=0x0050, text=»* SET CURSOR AND READ KEYBOARD «, t00=0x001b, t01=0x00f2}
0x2b44…2b4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x011c}
0x2b4e…2b5e Head {h00=0x000c, h01=0x0050, text=»SETCREAD«, t00=0x001b, t01=0x0126}
0x2b5e…2b8a Head {h00=0x0028, h01=0x0050, text=» SETCUR SET CURSOR ON CURRENT FIELD«, t00=0x001b, t01=0x0136}
0x2b8a…2b92 Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x0162}
0x2b92…2b9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x016a}
0x2b9c…2bca Head {h00=0x002a, h01=0x0050, text=»* READ TO CURRENT FIELD ON DISPLAY «, t00=0x001b, t01=0x0174}
0x2bca…2bd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0012}
0x2bd4…2be2 Head {h00=0x000a, h01=0x0050, text=»READIN«, t00=0x001c, t01=0x001c}
0x2be2…2c04 Head {h00=0x001e, h01=0x0050, text=»* SET FLAG IF AUTODUP «, t00=0x001c, t01=0x002a}
0x2c04…2c22 Head {h00=0x001a, h01=0x0050, text=»* USES VERIF-FIELD«, t00=0x001c, t01=0x004c}
0x2c22…2c3e Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW2,CBIN3 «, t00=0x001c, t01=0x006a}
0x2c3e…2c5a Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW1,CBIN1 «, t00=0x001c, t01=0x0086}
0x2c5a…2c6c Head {h00=0x000e, h01=0x0050, text=» TSTCTL 6 «, t00=0x001c, t01=0x00a2}
0x2c6c…2c7e Head {h00=0x000e, h01=0x0050, text=» BOK DYKIN«, t00=0x001c, t01=0x00b4}
0x2c7e…2c98 Head {h00=0x0016, h01=0x0050, text=» GETCTL 0,SPBINW3 «, t00=0x001c, t01=0x00c6}
0x2c98…2cbe Head {h00=0x0022, h01=0x0050, text=» MOVE SPBINW1,CFLTDEX(SPBINW3)«, t00=0x001c, t01=0x00e0}
0x2cbe…2ce2 Head {h00=0x0020, h01=0x0050, text=» CMP GSSWITCH(SPBINW1),CBIN0«, t00=0x001c, t01=0x0106}
0x2ce2…2cf4 Head {h00=0x000e, h01=0x0050, text=» BE DYKIN «, t00=0x001c, t01=0x012a}
0x2cf4…2d10 Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW1,CBIN1 «, t00=0x001c, t01=0x013c}
0x2d10…2d22 Head {h00=0x000e, h01=0x0050, text=» BL DYK20 «, t00=0x001c, t01=0x0158}
0x2d22…2d3e Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW2,CBIN15«, t00=0x001c, t01=0x016a}
0x2d3e…2d4e Head {h00=0x000c, h01=0x0050, text=» B DYK20«, t00=0x001c, t01=0x0186}
0x2d4e…2d58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0008}
0x2d58…2d66 Head {h00=0x000a, h01=0x0050, text=»DYKIN «, t00=0x001d, t01=0x0012}
0x2d66…2d90 Head {h00=0x0026, h01=0x0050, text=» IB SPKEY,DYK05,DYK10,DYK15,DYK16 «, t00=0x001d, t01=0x0020}
0x2d90…2d9e Head {h00=0x000a, h01=0x0050, text=»DYK05 «, t00=0x001d, t01=0x004a}
0x2d9e…2dd0 Head {h00=0x002e, h01=0x0050, text=» DYKI SPINPUT,SPKTAB1,SPKTAB2,SPBINW1, C «, t00=0x001d, t01=0x0058}
0x2dd0…2dea Head {h00=0x0016, h01=0x0050, text=» SPBINW2,SPBINW4 «, t00=0x001d, t01=0x008a}
0x2dea…2dfc Head {h00=0x000e, h01=0x0050, text=» B DYKOUT «, t00=0x001d, t01=0x00a4}
0x2dfc…2e0a Head {h00=0x000a, h01=0x0050, text=»DYK10 «, t00=0x001d, t01=0x00b6}
0x2e0a…2e3e Head {h00=0x0030, h01=0x0050, text=» DYKI SPINPUT,SPKTAB12,SPKTAB22,SPBINW1, C «, t00=0x001d, t01=0x00c4}
0x2e3e…2e58 Head {h00=0x0016, h01=0x0050, text=» SPBINW2,SPBINW4 «, t00=0x001d, t01=0x00f8}
0x2e58…2e6a Head {h00=0x000e, h01=0x0050, text=» B DYKOUT «, t00=0x001d, t01=0x0112}
0x2e6a…2e78 Head {h00=0x000a, h01=0x0050, text=»DYK15 «, t00=0x001d, t01=0x0124}
0x2e78…2eac Head {h00=0x0030, h01=0x0050, text=» DYKI SPINPUT,SPKTAB13,SPKTAB23,SPBINW1, C «, t00=0x001d, t01=0x0132}
0x2eac…2ec6 Head {h00=0x0016, h01=0x0050, text=» SPBINW2,SPBINW4 «, t00=0x001d, t01=0x0166}
0x2ec6…2ed8 Head {h00=0x000e, h01=0x0050, text=» B DYKOUT «, t00=0x001d, t01=0x0180}
0x2ed8…2ee6 (30, 0, 400) Head {h00=0x000a, h01=0x0050, text=»DYK16 «, t00=0x001e, t01=0x0004}
0x2ee6…2f1a Head {h00=0x0030, h01=0x0050, text=» DYKI SPINPUT,SPKTAB14,SPKTAB24,SPBINW1, C «, t00=0x001e, t01=0x0012}
0x2f1a…2f34 Head {h00=0x0016, h01=0x0050, text=» SPBINW2,SPBINW4 «, t00=0x001e, t01=0x0046}
0x2f34…2f42 Head {h00=0x000a, h01=0x0050, text=»DYKOUT«, t00=0x001e, t01=0x0060}
0x2f42…2f5a Head {h00=0x0014, h01=0x0050, text=» BL ERRPRT ERROR«, t00=0x001e, t01=0x006e}
0x2f5a…2f70 Head {h00=0x0012, h01=0x0050, text=» CLEAR SPDUPL «, t00=0x001e, t01=0x0086}
0x2f70…2f98 Head {h00=0x0024, h01=0x0050, text=» CBG SPBINW2,CBIN0,DYK20 NORMAL «, t00=0x001e, t01=0x009c}
0x2f98…2fb4 Head {h00=0x0018, h01=0x0050, text=» BE RETUR POWER OFF «, t00=0x001e, t01=0x00c4}
0x2fb4…2fe0 Head {h00=0x0028, h01=0x0050, text=» ADD SPBINW2,CBIN9 KEYSWITCH TURNED «, t00=0x001e, t01=0x00e0}
0x2fe0…301c Head {h00=0x0038, h01=0x0050, text=» IB SPBINW2,SET1,SET2,SET3,SET4,CLR1,CLR2,CLR3,CLR4 «, t00=0x001e, t01=0x010c}
0x301c…302c Head {h00=0x000c, h01=0x0050, text=» B RETUR«, t00=0x001e, t01=0x0148}
0x302c…3038 Head {h00=0x0008, h01=0x0050, text=»SET1«, t00=0x001e, t01=0x0158}
0x3038…304c Head {h00=0x0010, h01=0x0050, text=» SET TTKEY1 «, t00=0x001e, t01=0x0164}
0x304c…305c Head {h00=0x000c, h01=0x0050, text=» B DYKIN«, t00=0x001e, t01=0x0178}
0x305c…3068 Head {h00=0x0008, h01=0x0050, text=»SET2«, t00=0x001e, t01=0x0188}
0x3068…307c (31, 0, 400) Head {h00=0x0010, h01=0x0050, text=» SET TTKEY2 «, t00=0x001f, t01=0x0004}
0x307c…308c Head {h00=0x000c, h01=0x0050, text=» B DYKIN«, t00=0x001f, t01=0x0018}
0x308c…3098 Head {h00=0x0008, h01=0x0050, text=»SET3«, t00=0x001f, t01=0x0028}
0x3098…30ac Head {h00=0x0010, h01=0x0050, text=» SET TTKEY3 «, t00=0x001f, t01=0x0034}
0x30ac…30bc Head {h00=0x000c, h01=0x0050, text=» B DYKIN«, t00=0x001f, t01=0x0048}
0x30bc…30c8 Head {h00=0x0008, h01=0x0050, text=»SET4«, t00=0x001f, t01=0x0058}
0x30c8…30dc Head {h00=0x0010, h01=0x0050, text=» SET TTKEY4 «, t00=0x001f, t01=0x0064}
0x30dc…30ec Head {h00=0x000c, h01=0x0050, text=» B DYKIN«, t00=0x001f, t01=0x0078}
0x30ec…30f8 Head {h00=0x0008, h01=0x0050, text=»CLR1«, t00=0x001f, t01=0x0088}
0x30f8…310e Head {h00=0x0012, h01=0x0050, text=» CLEAR TTKEY1 «, t00=0x001f, t01=0x0094}
0x310e…311e Head {h00=0x000c, h01=0x0050, text=» B DYKIN«, t00=0x001f, t01=0x00aa}
0x311e…312a Head {h00=0x0008, h01=0x0050, text=»CLR2«, t00=0x001f, t01=0x00ba}
0x312a…3140 Head {h00=0x0012, h01=0x0050, text=» CLEAR TTKEY2 «, t00=0x001f, t01=0x00c6}
0x3140…3150 Head {h00=0x000c, h01=0x0050, text=» B DYKIN«, t00=0x001f, t01=0x00dc}
0x3150…315c Head {h00=0x0008, h01=0x0050, text=»CLR3«, t00=0x001f, t01=0x00ec}
0x315c…3172 Head {h00=0x0012, h01=0x0050, text=» CLEAR TTKEY3 «, t00=0x001f, t01=0x00f8}
0x3172…3182 Head {h00=0x000c, h01=0x0050, text=» B DYKIN«, t00=0x001f, t01=0x010e}
0x3182…318e Head {h00=0x0008, h01=0x0050, text=»CLR4«, t00=0x001f, t01=0x011e}
0x318e…31a4 Head {h00=0x0012, h01=0x0050, text=» CLEAR TTKEY4 «, t00=0x001f, t01=0x012a}
0x31a4…31b4 Head {h00=0x000c, h01=0x0050, text=» B DYKIN«, t00=0x001f, t01=0x0140}
0x31b4…31be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0150}
0x31be…31cc Head {h00=0x000a, h01=0x0050, text=»DYK20 «, t00=0x001f, t01=0x015a}
0x31cc…31d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0168}
0x31d6…31ea Head {h00=0x0010, h01=0x0050, text=» PERF DKTEST«, t00=0x001f, t01=0x0172}
0x31ea…3200 Head {h00=0x0012, h01=0x0050, text=» BNOK SETCREAD«, t00=0x001f, t01=0x0186}
0x3200…320a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x000c}
0x320a…3226 Head {h00=0x0018, h01=0x0050, text=» TBF TTKEYFLG,DYK80 «, t00=0x0020, t01=0x0016}
0x3226…3230 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0032}
0x3230…3248 Head {h00=0x0014, h01=0x0050, text=» KEY SWITCHES «, t00=0x0020, t01=0x003c}
0x3248…3270 Head {h00=0x0024, h01=0x0050, text=» TBF TTKEY1,DYKRET KEYBOARD OFF «, t00=0x0020, t01=0x0054}
0x3270…329a Head {h00=0x0026, h01=0x0050, text=» IB SPKEY,DYK30,DYK40,DYK50,DYK40 «, t00=0x0020, t01=0x007c}
0x329a…32a8 Head {h00=0x000a, h01=0x0050, text=»DYK30 «, t00=0x0020, t01=0x00a6}
0x32a8…32dc Head {h00=0x0030, h01=0x0050, text=» TBF TTKEY2,DYK80 EQUAL TO KEYPOS 1 ON 6234 «, t00=0x0020, t01=0x00b4}
0x32dc…32ee Head {h00=0x000e, h01=0x0050, text=» B DYKRET «, t00=0x0020, t01=0x00e8}
0x32ee…32fc Head {h00=0x000a, h01=0x0050, text=»DYK40 «, t00=0x0020, t01=0x00fa}
0x32fc…3330 Head {h00=0x0030, h01=0x0050, text=» TBT TTKEY2,DYK80 EQUAL TO KEYPOS 2 ON 6234 «, t00=0x0020, t01=0x0108}
0x3330…333e Head {h00=0x000a, h01=0x0050, text=»DYKRET«, t00=0x0020, t01=0x013c}
0x333e…3350 Head {h00=0x000e, h01=0x0050, text=» PERF BELL«, t00=0x0020, t01=0x014a}
0x3350…3364 Head {h00=0x0010, h01=0x0050, text=» B SETCREAD «, t00=0x0020, t01=0x015c}
0x3364…3372 Head {h00=0x000a, h01=0x0050, text=»DYK50 «, t00=0x0020, t01=0x0170}
0x3372…3380 Head {h00=0x000a, h01=0x0050, text=»DYK80 «, t00=0x0020, t01=0x017e}
0x3380…33ac Head {h00=0x0028, h01=0x0050, text=» IB SPBINW2,UPD300,CLEA20 JUMP ON C «, t00=0x0020, t01=0x018c}
0x33ac…33ca Head {h00=0x001a, h01=0x0050, text=» UPDATE,CANC,CANC, C«, t00=0x0021, t01=0x0028}
0x33ca…33fc Head {h00=0x002e, h01=0x0050, text=» UPDATE,UPDATE,UPDATE,UPDATE CONVERTED C «, t00=0x0021, t01=0x0046}
0x33fc…3434 Head {h00=0x0034, h01=0x0050, text=» UPDATE,UPDATE,UPDATE,UPDATE END-OF-ITEM-KEY C «, t00=0x0021, t01=0x0078}
0x3434…3450 Head {h00=0x0018, h01=0x0050, text=» UPDATE,KDUPL,KEDIT«, t00=0x0021, t01=0x00b0}
0x3450…345a Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0021, t01=0x00cc}
0x345a…3464 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00d6}
0x3464…349c Head {h00=0x0034, h01=0x0050, text=»* HANDLE THE RESPECTIVE KEY AS EOI-KEY FIRST «, t00=0x0021, t01=0x00e0}
0x349c…34a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0118}
0x34a6…34b4 Head {h00=0x000a, h01=0x0050, text=»UPDATE«, t00=0x0021, t01=0x0122}
0x34b4…34e8 Head {h00=0x0030, h01=0x0050, text=» CBE SPBINW1,CBIN0,UPD350 JUMP IF LENGTH = 0«, t00=0x0021, t01=0x0130}
0x34e8…3512 Head {h00=0x0026, h01=0x0050, text=» GETCTL 3,SPBINW4 GET SCHK-NUMBER «, t00=0x0021, t01=0x0164}
0x3512…354e Head {h00=0x0038, h01=0x0050, text=» CBE SPBINW4,CBIN0,UPD050 JUMP IF NOT STANDARD CHECK«, t00=0x0021, t01=0x018e}
0x354e…357c Head {h00=0x002a, h01=0x0050, text=» PERFI SPBINW4,SPCHK1,SPCHK2,SPCHK3 C«, t00=0x0022, t01=0x003a}
0x357c…35a2 Head {h00=0x0022, h01=0x0050, text=» SPCHK4,SPCHK5,SPCHK6,SPCHK7 «, t00=0x0022, t01=0x0068}
0x35a2…35cc Head {h00=0x0026, h01=0x0050, text=» IB SPBINW3,UPD050,UPD070,ERRPRINT«, t00=0x0022, t01=0x008e}
0x35cc…35d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00b8}
0x35d6…35fa Head {h00=0x0020, h01=0x0050, text=»* CONDITIONAL DISPLAYING «, t00=0x0022, t01=0x00c2}
0x35fa…3604 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00e6}
0x3604…3612 Head {h00=0x000a, h01=0x0050, text=»UPD050«, t00=0x0022, t01=0x00f0}
0x3612…362c Head {h00=0x0016, h01=0x0050, text=» TBT SPDUPL,UPD100«, t00=0x0022, t01=0x00fe}
0x362c…365c Head {h00=0x002c, h01=0x0050, text=» MOVE SPBINW4,CBIN1 INDICATE COND. DISPL«, t00=0x0022, t01=0x0118}
0x365c…366e Head {h00=0x000e, h01=0x0050, text=» B UPD200 «, t00=0x0022, t01=0x0148}
0x366e…367c Head {h00=0x000a, h01=0x0050, text=»UPD070«, t00=0x0022, t01=0x015a}
0x367c…36a4 Head {h00=0x0024, h01=0x0050, text=» GETCTL 0,SPBINW3 GET APPL-VALUE«, t00=0x0022, t01=0x0168}
0x36a4…36da Head {h00=0x0032, h01=0x0050, text=» CBNE SPBINW3,CBIN0,UPD210 JUMP IF APPL VALUE «, t00=0x0022, t01=0x0190}
0x36da…36ee Head {h00=0x0010, h01=0x0050, text=» B SETCREAD «, t00=0x0023, t01=0x0036}
0x36ee…36f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x004a}
0x36f8…371e Head {h00=0x0022, h01=0x0050, text=»* UNCONDITIONAL DISPLAYING «, t00=0x0023, t01=0x0054}
0x371e…3728 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x007a}
0x3728…3736 Head {h00=0x000a, h01=0x0050, text=»UPD100«, t00=0x0023, t01=0x0084}
0x3736…3770 Head {h00=0x0036, h01=0x0050, text=» MOVE SPBINW4,CBIN2 INDICATE UNCONDITIONAL DISPLAY«, t00=0x0023, t01=0x0092}
0x3770…377e Head {h00=0x000a, h01=0x0050, text=»UPD200«, t00=0x0023, t01=0x00cc}
0x377e…37a6 Head {h00=0x0024, h01=0x0050, text=» GETCTL 0,SPBINW3 GET APPL-VALUE«, t00=0x0023, t01=0x00da}
0x37a6…37de Head {h00=0x0034, h01=0x0050, text=» CBE SPBINW3,CBIN0,UPD400 JUMP IF NO APPL VALUE «, t00=0x0023, t01=0x0102}
0x37de…37e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x013a}
0x37e8…3814 Head {h00=0x0028, h01=0x0050, text=»* APPL-VALUE DIFFERENT FROM ZERO «, t00=0x0023, t01=0x0144}
0x3814…381e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0170}
0x381e…382c Head {h00=0x000a, h01=0x0050, text=»UPD210«, t00=0x0023, t01=0x017a}
0x382c…3848 Head {h00=0x0018, h01=0x0050, text=» TBT GTRKONV,UPD211 «, t00=0x0023, t01=0x0188}
0x3848…385c Head {h00=0x0010, h01=0x0050, text=» PERF SPAPPL«, t00=0x0024, t01=0x0014}
0x385c…386e Head {h00=0x000e, h01=0x0050, text=» B UPD212 «, t00=0x0024, t01=0x0028}
0x386e…387c Head {h00=0x000a, h01=0x0050, text=»UPD211«, t00=0x0024, t01=0x003a}
0x387c…3890 Head {h00=0x0010, h01=0x0050, text=» PERF RKAPPL«, t00=0x0024, t01=0x0048}
0x3890…389e Head {h00=0x000a, h01=0x0050, text=»UPD212«, t00=0x0024, t01=0x005c}
0x389e…38ca Head {h00=0x0028, h01=0x0050, text=» IB SPBINW3,UPD400,SETCREAD,ERRPRINT«, t00=0x0024, t01=0x006a}
0x38ca…38dc Head {h00=0x000e, h01=0x0050, text=» B UPD400 «, t00=0x0024, t01=0x0096}
0x38dc…38e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00a8}
0x38e6…3908 Head {h00=0x001e, h01=0x0050, text=»* OK AFTER APPL CONTROL«, t00=0x0024, t01=0x00b2}
0x3908…392e Head {h00=0x0022, h01=0x0050, text=»* UNCONDITIONAL DISPLAYING «, t00=0x0024, t01=0x00d4}
0x392e…3938 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00fa}
0x3938…3946 Head {h00=0x000a, h01=0x0050, text=»UPD260«, t00=0x0024, t01=0x0104}
0x3946…397c Head {h00=0x0032, h01=0x0050, text=» UPDFLD 1,SPINPUT UPDATE FIELD WITH DISPLAYING«, t00=0x0024, t01=0x0112}
0x397c…398a Head {h00=0x000a, h01=0x0050, text=»UPD300«, t00=0x0024, t01=0x0148}
0x398a…39c4 Head {h00=0x0036, h01=0x0050, text=» CBE SPBINW1,CBIN0,UPD350 SKIP NEXT IF LENGTH = 0 «, t00=0x0024, t01=0x0156}
0x39c4…39f0 Head {h00=0x0028, h01=0x0050, text=» SET SPCHANGE INDICATE CHANGED ITEM «, t00=0x0024, t01=0x0190}
0x39f0…39fe Head {h00=0x000a, h01=0x0050, text=»UPD350«, t00=0x0025, t01=0x002c}
0x39fe…3a20 Head {h00=0x001e, h01=0x0050, text=»* TAKE CARE OF WARNING«, t00=0x0025, t01=0x003a}
0x3a20…3a3c Head {h00=0x0018, h01=0x0050, text=» TBF SPWARNFL,UPD360«, t00=0x0025, t01=0x005c}
0x3a3c…3a6a Head {h00=0x002a, h01=0x0050, text=» MOVE SPBINW1,SPBINW2 STORE KEY VALUE «, t00=0x0025, t01=0x0078}
0x3a6a…3a92 Head {h00=0x0024, h01=0x0050, text=» MOVE SPBINW4,=W'26' SET MESSAGE«, t00=0x0025, t01=0x00a6}
0x3a92…3aa6 Head {h00=0x0010, h01=0x0050, text=» PERF SPERR «, t00=0x0025, t01=0x00ce}
0x3aa6…3ad2 Head {h00=0x0028, h01=0x0050, text=» CBNE SPBINW2,CBIN2,UPD360 KOR-KEY ?«, t00=0x0025, t01=0x00e2}
0x3ad2…3b02 Head {h00=0x002c, h01=0x0050, text=» MOVE SPBINW2,SPBINW1 RESET OLD KEYVALUE«, t00=0x0025, t01=0x010e}
0x3b02…3b10 Head {h00=0x000a, h01=0x0050, text=»UPD360«, t00=0x0025, t01=0x013e}
0x3b10…3b38 Head {h00=0x0024, h01=0x0050, text=»* JUMP ON FUNCTION KEY INDEX «, t00=0x0025, t01=0x014c}
0x3b38…3b5c Head {h00=0x0020, h01=0x0050, text=» IB SPBINW2,READIN,DUMMY, C«, t00=0x0025, t01=0x0174}
0x3b5c…3b80 Head {h00=0x0020, h01=0x0050, text=» KEOI,DUMMY,DUMMY,KTFWD, C«, t00=0x0026, t01=0x0008}
0x3b80…3bb2 Head {h00=0x002e, h01=0x0050, text=» KTBWD,KTHOME,KTLDOWN,KTLEFT,KTRIGHT, C «, t00=0x0026, t01=0x002c}
0x3bb2…3be0 Head {h00=0x002a, h01=0x0050, text=» KTDOWN,KTUP,KCOPY,DUMMY,DUMMY,KENTER«, t00=0x0026, t01=0x005e}
0x3be0…3c10 Head {h00=0x002c, h01=0x0050, text=» SUB SPBINW2,CBIN14 ADJUST EOI/KEY INDEX«, t00=0x0026, t01=0x008c}
0x3c10…3c1e Head {h00=0x000a, h01=0x0050, text=»DUMMY «, t00=0x0026, t01=0x00bc}
0x3c1e…3c2c Head {h00=0x000a, h01=0x0050, text=»RETUR «, t00=0x0026, t01=0x00ca}
0x3c2c…3c38 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0026, t01=0x00d8}
0x3c38…3c42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00e4}
0x3c42…3c50 Head {h00=0x000a, h01=0x0050, text=»UPD400«, t00=0x0026, t01=0x00ee}
0x3c50…3c8e Head {h00=0x003a, h01=0x0050, text=» CBE SPBINW4,CBIN2,UPD260 JUMP IF UNCONDITIONAL DISPL «, t00=0x0026, t01=0x00fc}
0x3c8e…3cc2 Head {h00=0x0030, h01=0x0050, text=» UPDFLD 0,SPINPUT UPDATE FIELD DISPL. COND. «, t00=0x0026, t01=0x013a}
0x3cc2…3cd4 Head {h00=0x000e, h01=0x0050, text=» B UPD300 «, t00=0x0026, t01=0x016e}
0x3cd4…3cde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0180}
0x3cde…3ce6 Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x018a}
0x3ce6…3d0c (39, 0, 400) Head {h00=0x0022, h01=0x0050, text=»KEOI COMMON END-OF-ITEM KEY «, t00=0x0027, t01=0x0004}
0x3d0c…3d30 Head {h00=0x0020, h01=0x0050, text=»KTFWD TAB. FORWARD 1 STEP «, t00=0x0027, t01=0x002a}
0x3d30…3d3e Head {h00=0x000a, h01=0x0050, text=» TFWD «, t00=0x0027, t01=0x004e}
0x3d3e…3d50 Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0027, t01=0x005c}
0x3d50…3d5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x006e}
0x3d5a…3d82 Head {h00=0x0024, h01=0x0050, text=»KTBWD TABULATION 1 STEP BACKW.«, t00=0x0027, t01=0x0078}
0x3d82…3d90 Head {h00=0x000a, h01=0x0050, text=» TBWD «, t00=0x0027, t01=0x00a0}
0x3d90…3da2 Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0027, t01=0x00ae}
0x3da2…3dac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00c0}
0x3dac…3dd2 Head {h00=0x0022, h01=0x0050, text=»KTHOME TAB. TO HOME POSITION«, t00=0x0027, t01=0x00ca}
0x3dd2…3de0 Head {h00=0x000a, h01=0x0050, text=» THOME«, t00=0x0027, t01=0x00f0}
0x3de0…3df2 Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0027, t01=0x00fe}
0x3df2…3dfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0110}
0x3dfc…3e28 Head {h00=0x0028, h01=0x0050, text=»KTLDOWN TAB. TO FIRST ON NEXT LINE«, t00=0x0027, t01=0x011a}
0x3e28…3e38 Head {h00=0x000c, h01=0x0050, text=» TLDOWN «, t00=0x0027, t01=0x0146}
0x3e38…3e4a Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0027, t01=0x0156}
0x3e4a…3e54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0168}
0x3e54…3e76 Head {h00=0x001e, h01=0x0050, text=»KTLEFT TAB. TO LEFTMOST «, t00=0x0027, t01=0x0172}
0x3e76…3e84 (40, 0, 400) Head {h00=0x000a, h01=0x0050, text=» TLEFT«, t00=0x0028, t01=0x0004}
0x3e84…3e96 Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0028, t01=0x0012}
0x3e96…3ea0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0024}
0x3ea0…3ec4 Head {h00=0x0020, h01=0x0050, text=»KTRIGHT TAB. TO RIGHTMOST «, t00=0x0028, t01=0x002e}
0x3ec4…3ed4 Head {h00=0x000c, h01=0x0050, text=» TRIGHT «, t00=0x0028, t01=0x0052}
0x3ed4…3ee6 Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0028, t01=0x0062}
0x3ee6…3ef0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0074}
0x3ef0…3f0c Head {h00=0x0018, h01=0x0050, text=»KTDOWN TAB 1 DOWN «, t00=0x0028, t01=0x007e}
0x3f0c…3f1a Head {h00=0x000a, h01=0x0050, text=» TDOWN«, t00=0x0028, t01=0x009a}
0x3f1a…3f2c Head {h00=0x000e, h01=0x0050, text=» B TSTTAB «, t00=0x0028, t01=0x00a8}
0x3f2c…3f36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00ba}
0x3f36…3f4e Head {h00=0x0014, h01=0x0050, text=»KTUP TAB 1 UP «, t00=0x0028, t01=0x00c4}
0x3f4e…3f5a Head {h00=0x0008, h01=0x0050, text=» TUP«, t00=0x0028, t01=0x00dc}
0x3f5a…3f62 Head {h00=0x0004, h01=0x0050, t00=0x0028, t01=0x00e8}
0x3f62…3f82 Head {h00=0x001c, h01=0x0050, text=»TSTTAB TEST TAB OUTPUT«, t00=0x0028, t01=0x00f0}
0x3f82…3f98 Head {h00=0x0012, h01=0x0050, text=» BE READIN OK «, t00=0x0028, t01=0x0110}
0x3f98…3fb4 Head {h00=0x0018, h01=0x0050, text=» BL READIN NOT FOUND«, t00=0x0028, t01=0x0126}
0x3fb4…3fe2 Head {h00=0x002a, h01=0x0050, text=» BOFL SETCREAD EMPTY COMPULSORY FIELD «, t00=0x0028, t01=0x0142}
0x3fe2…3fec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0170}
0x3fec…3ff6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x017a}
0x3ff6…401a Head {h00=0x0020, h01=0x0050, text=»* CONDITIONAL TABULATION «, t00=0x0028, t01=0x0184}
0x401a…4024 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0018}
0x4024…4038 Head {h00=0x0010, h01=0x0050, text=» PERF SPTCHK«, t00=0x0029, t01=0x0022}
0x4038…4052 Head {h00=0x0016, h01=0x0050, text=» CMP SPBINW3,CBIN0«, t00=0x0029, t01=0x0036}
0x4052…4066 Head {h00=0x0010, h01=0x0050, text=» BE SETCREAD«, t00=0x0029, t01=0x0050}
0x4066…408a Head {h00=0x0020, h01=0x0050, text=» IB SPBINW2,DUMMY,DUMMY, C «, t00=0x0029, t01=0x0064}
0x408a…40b0 Head {h00=0x0022, h01=0x0050, text=» KTFWD,DUMMY,DUMMY,KTFWD, C «, t00=0x0029, t01=0x0088}
0x40b0…40d6 Head {h00=0x0022, h01=0x0050, text=» KTBWD,KTFWD,KTFWD,KTFWD, C «, t00=0x0029, t01=0x00ae}
0x40d6…40f2 Head {h00=0x0018, h01=0x0050, text=» KTBWD,KTFWD,KTBWD «, t00=0x0029, t01=0x00d4}
0x40f2…4132 Head {h00=0x003c, h01=0x0050, text=»* BRANCH LIST EXHAUSTED - SPBINW2 CLOBBERED BY SPTCHK«, t00=0x0029, t01=0x00f0}
0x4132…413a Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x0130}
0x413a…414e Head {h00=0x0010, h01=0x0050, text=» B SETCREAD «, t00=0x0029, t01=0x0138}
0x414e…4158 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0029, t01=0x014c}
0x4158…4172 Head {h00=0x0016, h01=0x0050, text=»KCOPY HARD COPY «, t00=0x0029, t01=0x0156}
0x4172…418e Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN1 «, t00=0x0029, t01=0x0170}
0x418e…41ac Head {h00=0x001a, h01=0x0050, text=» TBT GTGTPFLG,KCOPY05 «, t00=0x0029, t01=0x018c}
0x41ac…41c8 Head {h00=0x0018, h01=0x0050, text=» TBT GTLPFLG,KCOPY08«, t00=0x002a, t01=0x001a}
0x41c8…41da Head {h00=0x000e, h01=0x0050, text=» B KCOPY10«, t00=0x002a, t01=0x0036}
0x41da…41ea Head {h00=0x000c, h01=0x0050, text=»KCOPY05 «, t00=0x002a, t01=0x0048}
0x41ea…4206 Head {h00=0x0018, h01=0x0050, text=» EDWRT DSHCGP,ERAFMT«, t00=0x002a, t01=0x0058}
0x4206…422c Head {h00=0x0022, h01=0x0050, text=» PRINT DSHCGP,SPBINW3,='0' GTP«, t00=0x002a, t01=0x0074}
0x422c…423e Head {h00=0x000e, h01=0x0050, text=» B KCOPY10«, t00=0x002a, t01=0x009a}
0x423e…424e Head {h00=0x000c, h01=0x0050, text=»KCOPY08 «, t00=0x002a, t01=0x00ac}
0x424e…426a Head {h00=0x0018, h01=0x0050, text=» EDWRT DSHCLP,ERAFMT«, t00=0x002a, t01=0x00bc}
0x426a…4290 Head {h00=0x0022, h01=0x0050, text=» PRINT DSHCLP,SPBINW3,='0' LP «, t00=0x002a, t01=0x00d8}
0x4290…42a0 Head {h00=0x000c, h01=0x0050, text=»KCOPY10 «, t00=0x002a, t01=0x00fe}
0x42a0…42c8 Head {h00=0x0024, h01=0x0050, text=» B SETCREAD SET CURSOR AND READ «, t00=0x002a, t01=0x010e}
0x42c8…42d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0136}
0x42d2…42ee Head {h00=0x0018, h01=0x0050, text=»KDUPL DUPLICATION «, t00=0x002a, t01=0x0140}
0x42ee…4322 Head {h00=0x0030, h01=0x0050, text=» MOVE SPBINW2,CBIN3 INDICATE COMMON EOI-KEY «, t00=0x002a, t01=0x015c}
0x4322…4344 Head {h00=0x001e, h01=0x0050, text=» DUPL SPINPUT DUPLICATION «, t00=0x002a, t01=0x0190}
0x4344…4358 Head {h00=0x0010, h01=0x0050, text=» BNZ KDUPL2 «, t00=0x002b, t01=0x0022}
0x4358…4392 Head {h00=0x0036, h01=0x0050, text=» COPY GSWSTR1,CBIN0,CBIN1,SPINPUT,CBIN1 GET BYTE 1«, t00=0x002b, t01=0x0036}
0x4392…43b4 Head {h00=0x001e, h01=0x0050, text=» CBE GSWSTR1,=X'00',KDUPL2«, t00=0x002b, t01=0x0070}
0x43b4…43e8 Head {h00=0x0030, h01=0x0050, text=» MOVE SPBINW1,CBIN10 SET LENGTH IN DUPFIELD «, t00=0x002b, t01=0x0092}
0x43e8…43fc Head {h00=0x0010, h01=0x0050, text=» SET SPDUPL «, t00=0x002b, t01=0x00c6}
0x43fc…441a Head {h00=0x001a, h01=0x0050, text=» B UPDATE DUPL ALLOWED«, t00=0x002b, t01=0x00da}
0x441a…4428 Head {h00=0x000a, h01=0x0050, text=»KDUPL2«, t00=0x002b, t01=0x00f8}
0x4428…445c Head {h00=0x0030, h01=0x0050, text=» MOVE SPBINW4,CBIN4 INDICATE ILLEGAL EOI-KEY«, t00=0x002b, t01=0x0106}
0x445c…4480 Head {h00=0x0020, h01=0x0050, text=» B ERRPRINT DUPL NOT ALLOWED«, t00=0x002b, t01=0x013a}
0x4480…4488 Head {h00=0x0004, h01=0x0050, t00=0x002b, t01=0x015e}
0x4488…4492 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0166}
0x4492…44aa Head {h00=0x0014, h01=0x0050, text=»* EDIT FIELD «, t00=0x002b, t01=0x0170}
0x44aa…44b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0188}
0x44b4…44c2 (44, 0, 400) Head {h00=0x000a, h01=0x0050, text=»KEDIT «, t00=0x002c, t01=0x0004}
0x44c2…44e4 Head {h00=0x001e, h01=0x0050, text=» GETCTL 1,SPBINW3 GET MAXL«, t00=0x002c, t01=0x0012}
0x44e4…4506 Head {h00=0x001e, h01=0x0050, text=» CBNE SPBINW3,CBIN0,KED100«, t00=0x002c, t01=0x0034}
0x4506…4518 Head {h00=0x000e, h01=0x0050, text=» PERF BELL«, t00=0x002c, t01=0x0056}
0x4518…452c Head {h00=0x0010, h01=0x0050, text=» B SETCREAD «, t00=0x002c, t01=0x0068}
0x452c…453a Head {h00=0x000a, h01=0x0050, text=»KED100«, t00=0x002c, t01=0x007c}
0x453a…4564 Head {h00=0x0026, h01=0x0050, text=» EDFLD SPINPUT,SPKTAB3,SPBINW1, C«, t00=0x002c, t01=0x008a}
0x4564…457e Head {h00=0x0016, h01=0x0050, text=» SPBINW2,SPBINW4 «, t00=0x002c, t01=0x00b4}
0x457e…45a4 Head {h00=0x0022, h01=0x0050, text=» B DYKOUT CONTINUE AS FOR DYKI«, t00=0x002c, t01=0x00ce}
0x45a4…45ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00f4}
0x45ae…45c4 Head {h00=0x0012, h01=0x0050, text=»* ENTER KEY«, t00=0x002c, t01=0x00fe}
0x45c4…45ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0114}
0x45ce…45dc Head {h00=0x000a, h01=0x0050, text=»KENTER«, t00=0x002c, t01=0x011e}
0x45dc…4608 Head {h00=0x0028, h01=0x0050, text=» TBT SPCHANGE,KENT00 NO TESTS ON ME «, t00=0x002c, t01=0x012c}
0x4608…462a Head {h00=0x001e, h01=0x0050, text=» TBF SPME,KENT05 FIELDS ? «, t00=0x002c, t01=0x0158}
0x462a…4638 Head {h00=0x000a, h01=0x0050, text=»KENT00«, t00=0x002c, t01=0x017a}
0x4638…466e Head {h00=0x0032, h01=0x0050, text=» MOVE SPBINW4,CBIN5 INDICATE COMP.FIELD FOUND «, t00=0x002c, t01=0x0188}
0x466e…469e Head {h00=0x002c, h01=0x0050, text=» MOVE SPBINW1,CBIN0 INDICATE NO CLEARING«, t00=0x002d, t01=0x002e}
0x469e…46d6 Head {h00=0x0034, h01=0x0050, text=» MOVE SPBINW2,CBIN0 SET INDEX TO SEARCHED FIELD «, t00=0x002d, t01=0x005e}
0x46d6…4716 Head {h00=0x003c, h01=0x0050, text=» GETFLD 0,SPBINW2,SPBINW3 SEARCH FOR EMPTY COMP. FIELDS «, t00=0x002d, t01=0x0096}
0x4716…4742 Head {h00=0x0028, h01=0x0050, text=» BOFL KENT10 EMPTY COMP. FIELD FOUND«, t00=0x002d, t01=0x00d6}
0x4742…476c Head {h00=0x0026, h01=0x0050, text=» TSTCTL 2 LOOK IF COMPULSORY FIELD«, t00=0x002d, t01=0x0102}
0x476c…4782 Head {h00=0x0012, h01=0x0050, text=» BZ KENT05 NO!«, t00=0x002d, t01=0x012c}
0x4782…47b4 Head {h00=0x002e, h01=0x0050, text=» CALL EMPTYT,:FMTITEM LOOK IF EMPTY FIELD «, t00=0x002d, t01=0x0142}
0x47b4…47cc Head {h00=0x0014, h01=0x0050, text=» BP KENT10 YES! «, t00=0x002d, t01=0x0174}
0x47cc…47da Head {h00=0x000a, h01=0x0050, text=»KENT05«, t00=0x002d, t01=0x018c}
0x47da…4812 Head {h00=0x0034, h01=0x0050, text=» MOVE SPBINW2,CBIN3 INDICATE ENTER KEY DEPRESSED«, t00=0x002e, t01=0x000a}
0x4812…481e Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x002e, t01=0x0042}
0x481e…4828 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x004e}
0x4828…4852 Head {h00=0x0026, h01=0x0050, text=»* EMPTY COMPULSORY FIELD FOUND «, t00=0x002e, t01=0x0058}
0x4852…485c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0082}
0x485c…486a Head {h00=0x000a, h01=0x0050, text=»KENT10«, t00=0x002e, t01=0x008c}
0x486a…48a4 Head {h00=0x0036, h01=0x0050, text=» GETFLD 0,SPBINW3,SPBINW2 GET THE COMPULSORY FIELD«, t00=0x002e, t01=0x009a}
0x48a4…48ac Head {h00=0x0004, h01=0x0050, t00=0x002e, t01=0x00d4}
0x48ac…48ba Head {h00=0x000a, h01=0x0050, text=»ERRPRT«, t00=0x002e, t01=0x00dc}
0x48ba…48ce Head {h00=0x0010, h01=0x0050, text=» PERF DKTEST«, t00=0x002e, t01=0x00ea}
0x48ce…48e4 Head {h00=0x0012, h01=0x0050, text=» BNOK SETCREAD«, t00=0x002e, t01=0x00fe}
0x48e4…4912 Head {h00=0x002a, h01=0x0050, text=» CBE SPBINW2,CBIN16,KEDIT JUMP IF EDIT«, t00=0x002e, t01=0x0114}
0x4912…4942 Head {h00=0x002c, h01=0x0050, text=» CBE SPBINW2,CBIN4,CANC JUMP IF CANCEL1 «, t00=0x002e, t01=0x0142}
0x4942…4972 Head {h00=0x002c, h01=0x0050, text=» CBE SPBINW2,CBIN5,CANC JUMP IF CANCEL2 «, t00=0x002e, t01=0x0172}
0x4972…497c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0012}
0x497c…4998 Head {h00=0x0018, h01=0x0050, text=»* ERROR HANDLING «, t00=0x002f, t01=0x001c}
0x4998…49a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0038}
0x49a2…49b2 Head {h00=0x000c, h01=0x0050, text=»ERRPRINT«, t00=0x002f, t01=0x0042}
0x49b2…49bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0052}
0x49bc…49d8 Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW2,=X'40'«, t00=0x002f, t01=0x005c}
0x49d8…49f4 Head {h00=0x0018, h01=0x0050, text=» XSTAT KEYB,SPBINW3 «, t00=0x002f, t01=0x0078}
0x49f4…4a1a Head {h00=0x0022, h01=0x0050, text=» CBNE SPBINW2,SPBINW3,ERRPRT20«, t00=0x002f, t01=0x0094}
0x4a1a…4a2c Head {h00=0x000e, h01=0x0050, text=» TIMEOUT«, t00=0x002f, t01=0x00ba}
0x4a2c…4a56 Head {h00=0x0026, h01=0x0050, text=» EDWRT SCREEN,ERAFMT ERASE SCREEN «, t00=0x002f, t01=0x00cc}
0x4a56…4a68 Head {h00=0x000e, h01=0x0050, text=» B ERRC20 «, t00=0x002f, t01=0x00f6}
0x4a68…4a78 Head {h00=0x000c, h01=0x0050, text=»ERRPRT20«, t00=0x002f, t01=0x0108}
0x4a78…4a9a Head {h00=0x001e, h01=0x0050, text=» CBE SPBINW4,CBIN0,ERRC20 «, t00=0x002f, t01=0x0118}
0x4a9a…4aac Head {h00=0x000e, h01=0x0050, text=» PERF BELL«, t00=0x002f, t01=0x013a}
0x4aac…4ad8 Head {h00=0x0028, h01=0x0050, text=» MOVE SPBINW3,=X'1801' ROW 24 COL. 1«, t00=0x002f, t01=0x014c}
0x4ad8…4b0e Head {h00=0x0032, h01=0x0050, text=» DSC1 SCREEN,6,SPBINW3 SET CURSOR ON LAST ROW «, t00=0x002f, t01=0x0178}
0x4b0e…4b2c Head {h00=0x001a, h01=0x0050, text=» TBT GTRKONV,ERRPRT30 «, t00=0x0030, t01=0x001e}
0x4b2c…4b54 Head {h00=0x0024, h01=0x0050, text=» MOVE GSWBCD4,SPBINW4 ERRORCODE «, t00=0x0030, t01=0x003c}
0x4b54…4b64 Head {h00=0x000c, h01=0x0050, text=»ERRPRT30«, t00=0x0030, t01=0x0064}
0x4b64…4b8c Head {h00=0x0024, h01=0x0050, text=» EDWRT SCREEN,SPFTBERR(SPBINW4) «, t00=0x0030, t01=0x0074}
0x4b8c…4baa Head {h00=0x001a, h01=0x0050, text=» TBF SPKEYFLG,SPERRRET«, t00=0x0030, t01=0x009c}
0x4baa…4bb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00ba}
0x4bb4…4bd2 Head {h00=0x001a, h01=0x0050, text=»* READ AFTER ERROR «, t00=0x0030, t01=0x00c4}
0x4bd2…4bdc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00e2}
0x4bdc…4bea Head {h00=0x000a, h01=0x0050, text=»ERREAD«, t00=0x0030, t01=0x00ec}
0x4bea…4c16 Head {h00=0x0028, h01=0x0050, text=» SETCUR SET CURSOR AT THE BEGINNING«, t00=0x0030, t01=0x00fa}
0x4c16…4c36 Head {h00=0x001c, h01=0x0050, text=» OF THE CURRENT FIELD «, t00=0x0030, t01=0x0126}
0x4c36…4c44 Head {h00=0x000a, h01=0x0050, text=»ERR100«, t00=0x0030, t01=0x0146}
0x4c44…4c72 Head {h00=0x002a, h01=0x0050, text=» MOVE SPBINW3,CBIN14 REQUESTED LENGTH «, t00=0x0030, t01=0x0154}
0x4c72…4ca0 Head {h00=0x002a, h01=0x0050, text=» IB SPKEY,ERR105,ERR110,ERR115,ERR116 «, t00=0x0030, t01=0x0182}
0x4ca0…4cae Head {h00=0x000a, h01=0x0050, text=»ERR105«, t00=0x0031, t01=0x0020}
0x4cae…4ce4 Head {h00=0x0032, h01=0x0050, text=» NKI .NE,KEYB,SPINPUT,SPKTAB1,SPBINW3,SPBINW2 «, t00=0x0031, t01=0x002e}
0x4ce4…4cf6 Head {h00=0x000e, h01=0x0050, text=» B ERR120 «, t00=0x0031, t01=0x0064}
0x4cf6…4d04 Head {h00=0x000a, h01=0x0050, text=»ERR110«, t00=0x0031, t01=0x0076}
0x4d04…4d3a Head {h00=0x0032, h01=0x0050, text=» NKI .NE,KEYB,SPINPUT,SPKTAB12,SPBINW3,SPBINW2«, t00=0x0031, t01=0x0084}
0x4d3a…4d4c Head {h00=0x000e, h01=0x0050, text=» B ERR120 «, t00=0x0031, t01=0x00ba}
0x4d4c…4d5a Head {h00=0x000a, h01=0x0050, text=»ERR115«, t00=0x0031, t01=0x00cc}
0x4d5a…4d90 Head {h00=0x0032, h01=0x0050, text=» NKI .NE,KEYB,SPINPUT,SPKTAB13,SPBINW3,SPBINW2«, t00=0x0031, t01=0x00da}
0x4d90…4da2 Head {h00=0x000e, h01=0x0050, text=» B ERR120 «, t00=0x0031, t01=0x0110}
0x4da2…4db0 Head {h00=0x000a, h01=0x0050, text=»ERR116«, t00=0x0031, t01=0x0122}
0x4db0…4de6 Head {h00=0x0032, h01=0x0050, text=» NKI .NE,KEYB,SPINPUT,SPKTAB14,SPBINW3,SPBINW2«, t00=0x0031, t01=0x0130}
0x4de6…4df4 Head {h00=0x000a, h01=0x0050, text=»ERR120«, t00=0x0031, t01=0x0166}
0x4df4…4e16 Head {h00=0x001e, h01=0x0050, text=» BNZ ERR100 JUMP IF NOT OK«, t00=0x0031, t01=0x0174}
0x4e16…4e2a Head {h00=0x0010, h01=0x0050, text=» PERF DKTEST«, t00=0x0032, t01=0x0008}
0x4e2a…4e3e Head {h00=0x0010, h01=0x0050, text=» BNOK ERREAD«, t00=0x0032, t01=0x001c}
0x4e3e…4e6a Head {h00=0x0028, h01=0x0050, text=» CMP SPBINW2,CBIN0 JUMP IF POWER OFF«, t00=0x0032, t01=0x0030}
0x4e6a…4e7c Head {h00=0x000e, h01=0x0050, text=» BE RETUR «, t00=0x0032, t01=0x005c}
0x4e7c…4ea2 Head {h00=0x0022, h01=0x0050, text=» IB SPBINW2,ERR100,ERRCONT C «, t00=0x0032, t01=0x006e}
0x4ea2…4eca Head {h00=0x0024, h01=0x0050, text=» ERRCONT,ERR100,ERRCONT,ERRCONT«, t00=0x0032, t01=0x0094}
0x4eca…4ee4 Head {h00=0x0016, h01=0x0050, text=» B ERR100 CONTINUE«, t00=0x0032, t01=0x00bc}
0x4ee4…4eee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00d6}
0x4eee…4f10 Head {h00=0x001e, h01=0x0050, text=»* CLEAR ERROR PRINTOUT «, t00=0x0032, t01=0x00e0}
0x4f10…4f1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0102}
0x4f1a…4f2a Head {h00=0x000c, h01=0x0050, text=»ERRCONT «, t00=0x0032, t01=0x010c}
0x4f2a…4f4e Head {h00=0x0020, h01=0x0050, text=» PERF CLEAR8 ERASE LAST LINE«, t00=0x0032, t01=0x011c}
0x4f4e…4f7a Head {h00=0x0028, h01=0x0050, text=» CBNL SPBINW4,=W'26',CANC IF WARNING«, t00=0x0032, t01=0x0140}
0x4f7a…4fa6 Head {h00=0x0028, h01=0x0050, text=» SUB SPBINW2,CBIN1 ADJUST KEY INDEX «, t00=0x0032, t01=0x016c}
0x4fa6…4fb2 Head {h00=0x0008, h01=0x0050, text=»CANC«, t00=0x0033, t01=0x0008}
0x4fb2…4fe6 Head {h00=0x0030, h01=0x0050, text=» CBE SPBINW1,CBIN0,ERRC10 JUMP IF LENGTH = 0«, t00=0x0033, t01=0x0014}
0x4fe6…501a Head {h00=0x0030, h01=0x0050, text=» MOVE SPINPUT,:FMTITEM SAVE CURRENT CONTENTS«, t00=0x0033, t01=0x0048}
0x501a…5052 Head {h00=0x0034, h01=0x0050, text=» MOVE :FMTITEM,=C'1' PUT SOMETHING IN THE FIELD «, t00=0x0033, t01=0x007c}
0x5052…507c Head {h00=0x0026, h01=0x0050, text=» GETABX SPBINW4 GET CURRENT INDEX «, t00=0x0033, t01=0x00b4}
0x507c…50aa Head {h00=0x002a, h01=0x0050, text=» ERASE 10,SPBINW4,SPBINW4 CLEAR FIELD «, t00=0x0033, t01=0x00de}
0x50aa…50b8 Head {h00=0x000a, h01=0x0050, text=»ERRC10«, t00=0x0033, t01=0x010c}
0x50b8…50e0 Head {h00=0x0024, h01=0x0050, text=» IB SPBINW2,CLEAR1,CLEAR2,DUMMY «, t00=0x0033, t01=0x011a}
0x50e0…5116 Head {h00=0x0032, h01=0x0050, text=» SUB SPBINW2,CBIN3 ADJUST FOR CANCEL1,CANCEL2 «, t00=0x0033, t01=0x0142}
0x5116…5122 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0033, t01=0x0178}
0x5122…5130 Head {h00=0x000a, h01=0x0050, text=»CLEAR1«, t00=0x0033, t01=0x0184}
0x5130…5164 (52, 0, 400) Head {h00=0x0030, h01=0x0050, text=» CBE SPBINW1,CBIN0,ERRC20 JUMP IF LENGTH = 0«, t00=0x0034, t01=0x0004}
0x5164…5190 Head {h00=0x0028, h01=0x0050, text=» SET SPCHANGE INDICATE CHANGED FIELD«, t00=0x0034, t01=0x0038}
0x5190…519e Head {h00=0x000a, h01=0x0050, text=»ERRC20«, t00=0x0034, t01=0x0064}
0x519e…51c8 Head {h00=0x0026, h01=0x0050, text=» MOVE SPBINW5,$OPT CHECHK IF SPERR«, t00=0x0034, t01=0x0072}
0x51c8…51ec Head {h00=0x0020, h01=0x0050, text=» CBE SPBINW5,CBIN0,SPERRRET «, t00=0x0034, t01=0x009c}
0x51ec…5208 Head {h00=0x0018, h01=0x0050, text=» B SETCREAD CONTINUE«, t00=0x0034, t01=0x00c0}
0x5208…5212 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00dc}
0x5212…5220 Head {h00=0x000a, h01=0x0050, text=»CLEAR2«, t00=0x0034, t01=0x00e6}
0x5220…5258 Head {h00=0x0034, h01=0x0050, text=» MOVE :FMTITEM,SPINPUT RESTORE CURRENT CONTENTS «, t00=0x0034, t01=0x00f4}
0x5258…5266 Head {h00=0x000a, h01=0x0050, text=»CLEA20«, t00=0x0034, t01=0x012c}
0x5266…5294 Head {h00=0x002a, h01=0x0050, text=» GETABX SPBINW4 GET CURRENT TAB INDEX «, t00=0x0034, t01=0x013a}
0x5294…52c4 Head {h00=0x002c, h01=0x0050, text=» DISPLAY 1,SPBINW4,SPBINW4 DISPLAY FIELD«, t00=0x0034, t01=0x0168}
0x52c4…52ee Head {h00=0x0026, h01=0x0050, text=» MOVE SPBINW5,$OPT CHECK IF SPERR «, t00=0x0035, t01=0x0008}
0x52ee…5312 Head {h00=0x0020, h01=0x0050, text=» CBE SPBINW5,CBIN0,SPERRRET «, t00=0x0035, t01=0x0032}
0x5312…532e Head {h00=0x0018, h01=0x0050, text=» B SETCREAD CONTINUE«, t00=0x0035, t01=0x0056}
0x532e…5338 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0072}
0x5338…5348 Head {h00=0x000c, h01=0x0050, text=»SPERRRET«, t00=0x0035, t01=0x007c}
0x5348…5354 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0035, t01=0x008c}
0x5354…535e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0098}
0x535e…536c Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0035, t01=0x00a2}
0x536c…5376 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00b0}
0x5376…5388 Head {h00=0x000e, h01=0x0050, text=»BELL PROC «, t00=0x0035, t01=0x00ba}
0x5388…53a8 Head {h00=0x001c, h01=0x0050, text=»* ACUSTIC ALARM«, t00=0x0035, t01=0x00cc}
0x53a8…53c6 Head {h00=0x001a, h01=0x0050, text=» EDWRT SCREEN,BELLFMT «, t00=0x0035, t01=0x00ec}
0x53c6…53d2 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0035, t01=0x010a}
0x53d2…53dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0116}
0x53dc…53f0 Head {h00=0x0010, h01=0x0050, text=»BELLFMT FRMT«, t00=0x0035, t01=0x0120}
0x53f0…53fc Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0035, t01=0x0134}
0x53fc…5412 Head {h00=0x0012, h01=0x0050, text=» FILLR X'07',1«, t00=0x0035, t01=0x0140}
0x5412…5420 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0035, t01=0x0156}
0x5420…5428 Head {h00=0x0004, h01=0x0050, t00=0x0035, t01=0x0164}
0x5428…5436 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0035, t01=0x016c}
0x5436…5440 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x017a}
0x5440…5454 Head {h00=0x0010, h01=0x0050, text=»ERAFMT FRMT «, t00=0x0035, t01=0x0184}
0x5454…5468 Head {h00=0x0010, h01=0x0050, text=» FILLR '1',2«, t00=0x0036, t01=0x0008}
0x5468…5476 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0036, t01=0x001c}
0x5476…5484 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0036, t01=0x002a}
0x5484…5498 Head {h00=0x0010, h01=0x0050, text=»KBTEST PROC «, t00=0x0036, t01=0x0038}
0x5498…54c4 Head {h00=0x0028, h01=0x0050, text=»* THE PROCEDURE SENSES THE KEYBOARD.«, t00=0x0036, t01=0x004c}
0x54c4…54fe Head {h00=0x0036, h01=0x0050, text=»* IF THE MAK-KEY HAS BEEN DEPRESSED, THE COND.REG «, t00=0x0036, t01=0x0078}
0x54fe…553c Head {h00=0x003a, h01=0x0050, text=»* WILL BE SET TO ZERO, IN ORDER TO ENABLE THE CALLING «, t00=0x0036, t01=0x00b2}
0x553c…557c Head {h00=0x003c, h01=0x0050, text=»* MODULE TO STOP THE LISTING (OR FOR ANY OTHER PURPOSE) «, t00=0x0036, t01=0x00f0}
0x557c…559c Head {h00=0x001c, h01=0x0050, text=» PERF SPLIN8,CBIN0,CBIN0«, t00=0x0036, t01=0x0130}
0x559c…55b0 Head {h00=0x0010, h01=0x0050, text=» TESTIO KEYB«, t00=0x0036, t01=0x0150}
0x55b0…55c2 Head {h00=0x000e, h01=0x0050, text=» BOK KBT10«, t00=0x0036, t01=0x0164}
0x55c2…55da Head {h00=0x0014, h01=0x0050, text=» CALL ABORT,KEYB«, t00=0x0036, t01=0x0176}
0x55da…55ea Head {h00=0x000c, h01=0x0050, text=» B KBT20«, t00=0x0036, t01=0x018e}
0x55ea…55f8 Head {h00=0x000a, h01=0x0050, text=»KBT10 «, t00=0x0037, t01=0x000e}
0x55f8…560a Head {h00=0x000e, h01=0x0050, text=» WAIT KEYB«, t00=0x0037, t01=0x001c}
0x560a…562c Head {h00=0x001e, h01=0x0050, text=» CBNE SPBINW2,CBIN6,KBT20 «, t00=0x0037, t01=0x002e}
0x562c…5644 Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x0037, t01=0x0050}
0x5644…5654 Head {h00=0x000c, h01=0x0050, text=» B KBT99«, t00=0x0037, t01=0x0068}
0x5654…5662 Head {h00=0x000a, h01=0x0050, text=»KBT20 «, t00=0x0037, t01=0x0078}
0x5662…567a Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN1«, t00=0x0037, t01=0x0086}
0x567a…5688 Head {h00=0x000a, h01=0x0050, text=»KBT99 «, t00=0x0037, t01=0x009e}
0x5688…5694 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0037, t01=0x00ac}
0x5694…56a2 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0037, t01=0x00b8}
0x56a2…56b0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0037, t01=0x00c6}
0x56b0…56d2 Head {h00=0x001e, h01=0x0050, text=»SPLIN8 PROC WRTMES,WRTTYP «, t00=0x0037, t01=0x00d4}
0x56d2…56ee Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0037, t01=0x00f6}
0x56ee…56f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0112}
0x56f8…5724 Head {h00=0x0028, h01=0x0050, text=»* SPLIN8 - WRITE ON LINE 24«, t00=0x0037, t01=0x011c}
0x5724…572e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0148}
0x572e…5768 Head {h00=0x0036, h01=0x0050, text=»* MESSAGE DEFINED AS FORMAT NUMBER WRTMES«, t00=0x0037, t01=0x0152}
0x5768…5794 Head {h00=0x0028, h01=0x0050, text=»* IN FORMAT TABLE SPFTBMES «, t00=0x0037, t01=0x018c}
0x5794…579e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0028}
0x579e…57c6 Head {h00=0x0024, h01=0x0050, text=»* WRTTYP: =0 NO WAIT«, t00=0x0038, t01=0x0032}
0x57c6…57ec Head {h00=0x0022, h01=0x0050, text=»* =1 WAIT «, t00=0x0038, t01=0x005a}
0x57ec…5814 Head {h00=0x0024, h01=0x0050, text=»* =2 RETURN «, t00=0x0038, t01=0x0080}
0x5814…584e Head {h00=0x0036, h01=0x0050, text=»* =3 WRITE WITH NO WAIT, RETURN«, t00=0x0038, t01=0x00a8}
0x584e…5858 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00e2}
0x5858…5874 Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x0038, t01=0x00ec}
0x5874…5892 Head {h00=0x001a, h01=0x0050, text=» MOVE SPBINW1,=X'1801'«, t00=0x0038, t01=0x0108}
0x5892…58c8 Head {h00=0x0032, h01=0x0050, text=» DSC1 SCREEN,6,SPBINW1 SET CURSOR ON LAST ROW «, t00=0x0038, t01=0x0126}
0x58c8…58e4 Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW1,CBIN0 «, t00=0x0038, t01=0x015c}
0x58e4…5904 Head {h00=0x001c, h01=0x0050, text=» CBE WRTMES,CBIN0,LIN800«, t00=0x0038, t01=0x0178}
0x5904…5924 Head {h00=0x001c, h01=0x0050, text=» CBL WRTTYP,CBIN3,LIN801«, t00=0x0039, t01=0x0008}
0x5924…594e Head {h00=0x0026, h01=0x0050, text=» EDWRT .NW,SCREEN,SPFTBMES(WRTMES)«, t00=0x0039, t01=0x0028}
0x594e…5960 Head {h00=0x000e, h01=0x0050, text=» B LINRET «, t00=0x0039, t01=0x0052}
0x5960…596e Head {h00=0x000a, h01=0x0050, text=»LIN801«, t00=0x0039, t01=0x0064}
0x596e…5994 Head {h00=0x0022, h01=0x0050, text=» EDWRT SCREEN,SPFTBMES(WRTMES)«, t00=0x0039, t01=0x0072}
0x5994…59a2 Head {h00=0x000a, h01=0x0050, text=»LIN800«, t00=0x0039, t01=0x0098}
0x59a2…59c2 Head {h00=0x001c, h01=0x0050, text=» CBE WRTTYP,CBIN0,LIN8NW«, t00=0x0039, t01=0x00a6}
0x59c2…59e2 Head {h00=0x001c, h01=0x0050, text=» CBE WRTTYP,CBIN2,LINRET«, t00=0x0039, t01=0x00c6}
0x59e2…59f0 Head {h00=0x000a, h01=0x0050, text=»* READ«, t00=0x0039, t01=0x00e6}
0x59f0…59fe Head {h00=0x000a, h01=0x0050, text=»LIN8IN«, t00=0x0039, t01=0x00f4}
0x59fe…5a2a Head {h00=0x0028, h01=0x0050, text=» MOVE SPBINW1,CBIN3 REQUESTED LENGTH«, t00=0x0039, t01=0x0102}
0x5a2a…5a58 Head {h00=0x002a, h01=0x0050, text=» IB SPKEY,LIN805,LIN810,LIN815,LIN816 «, t00=0x0039, t01=0x012e}
0x5a58…5a66 Head {h00=0x000a, h01=0x0050, text=»LIN805«, t00=0x0039, t01=0x015c}
0x5a66…5a98 Head {h00=0x002e, h01=0x0050, text=» NKI KEYB,SPINPUT,SPKTAB1,SPBINW1,SPBINW2 «, t00=0x0039, t01=0x016a}
0x5a98…5aaa Head {h00=0x000e, h01=0x0050, text=» B LIN820 «, t00=0x003a, t01=0x000c}
0x5aaa…5ab8 Head {h00=0x000a, h01=0x0050, text=»LIN810«, t00=0x003a, t01=0x001e}
0x5ab8…5aea Head {h00=0x002e, h01=0x0050, text=» NKI KEYB,SPINPUT,SPKTAB12,SPBINW1,SPBINW2«, t00=0x003a, t01=0x002c}
0x5aea…5afc Head {h00=0x000e, h01=0x0050, text=» B LIN820 «, t00=0x003a, t01=0x005e}
0x5afc…5b0a Head {h00=0x000a, h01=0x0050, text=»LIN815«, t00=0x003a, t01=0x0070}
0x5b0a…5b3c Head {h00=0x002e, h01=0x0050, text=» NKI KEYB,SPINPUT,SPKTAB13,SPBINW1,SPBINW2«, t00=0x003a, t01=0x007e}
0x5b3c…5b4e Head {h00=0x000e, h01=0x0050, text=» B LIN820 «, t00=0x003a, t01=0x00b0}
0x5b4e…5b5c Head {h00=0x000a, h01=0x0050, text=»LIN816«, t00=0x003a, t01=0x00c2}
0x5b5c…5b8e Head {h00=0x002e, h01=0x0050, text=» NKI KEYB,SPINPUT,SPKTAB14,SPBINW1,SPBINW2«, t00=0x003a, t01=0x00d0}
0x5b8e…5b9c Head {h00=0x000a, h01=0x0050, text=»LIN820«, t00=0x003a, t01=0x0102}
0x5b9c…5bc0 Head {h00=0x0020, h01=0x0050, text=» BNOK LIN8IN JUMP IF NOT OK «, t00=0x003a, t01=0x0110}
0x5bc0…5bd4 Head {h00=0x0010, h01=0x0050, text=» PERF DKTEST«, t00=0x003a, t01=0x0134}
0x5bd4…5bf6 Head {h00=0x001e, h01=0x0050, text=» CBE SPBINW2,CBIN2,LIN8CT «, t00=0x003a, t01=0x0148}
0x5bf6…5c08 Head {h00=0x000e, h01=0x0050, text=» B LIN8IN «, t00=0x003a, t01=0x016a}
0x5c08…5c1c Head {h00=0x0010, h01=0x0050, text=»* CLEAR LINE«, t00=0x003a, t01=0x017c}
0x5c1c…5c2a Head {h00=0x000a, h01=0x0050, text=»LIN8CT«, t00=0x003a, t01=0x0190}
0x5c2a…5c4e Head {h00=0x0020, h01=0x0050, text=» PERF CLEAR8 ERASE LAST LINE«, t00=0x003b, t01=0x000e}
0x5c4e…5c5a Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x003b, t01=0x0032}
0x5c5a…5c76 Head {h00=0x0018, h01=0x0050, text=»* READ WITH NO WAIT «, t00=0x003b, t01=0x003e}
0x5c76…5c84 Head {h00=0x000a, h01=0x0050, text=»LIN8NW«, t00=0x003b, t01=0x005a}
0x5c84…5cb0 Head {h00=0x0028, h01=0x0050, text=» MOVE SPBINW1,CBIN3 REQUESTED LENGTH«, t00=0x003b, t01=0x0068}
0x5cb0…5cde Head {h00=0x002a, h01=0x0050, text=» IB SPKEY,LIN855,LIN860,LIN865,LIN866 «, t00=0x003b, t01=0x0094}
0x5cde…5cec Head {h00=0x000a, h01=0x0050, text=»LIN855«, t00=0x003b, t01=0x00c2}
0x5cec…5d22 Head {h00=0x0032, h01=0x0050, text=» NKI .NW,KEYB,SPINPUT,SPKTAB1,SPBINW1,SPBINW2 «, t00=0x003b, t01=0x00d0}
0x5d22…5d34 Head {h00=0x000e, h01=0x0050, text=» B LIN870 «, t00=0x003b, t01=0x0106}
0x5d34…5d42 Head {h00=0x000a, h01=0x0050, text=»LIN860«, t00=0x003b, t01=0x0118}
0x5d42…5d78 Head {h00=0x0032, h01=0x0050, text=» NKI .NW,KEYB,SPINPUT,SPKTAB12,SPBINW1,SPBINW2«, t00=0x003b, t01=0x0126}
0x5d78…5d8a Head {h00=0x000e, h01=0x0050, text=» B LIN870 «, t00=0x003b, t01=0x015c}
0x5d8a…5d98 Head {h00=0x000a, h01=0x0050, text=»LIN865«, t00=0x003b, t01=0x016e}
0x5d98…5dce Head {h00=0x0032, h01=0x0050, text=» NKI .NW,KEYB,SPINPUT,SPKTAB13,SPBINW1,SPBINW2«, t00=0x003b, t01=0x017c}
0x5dce…5de0 Head {h00=0x000e, h01=0x0050, text=» B LIN870 «, t00=0x003c, t01=0x0022}
0x5de0…5dee Head {h00=0x000a, h01=0x0050, text=»LIN866«, t00=0x003c, t01=0x0034}
0x5dee…5e24 Head {h00=0x0032, h01=0x0050, text=» NKI .NW,KEYB,SPINPUT,SPKTAB14,SPBINW1,SPBINW2«, t00=0x003c, t01=0x0042}
0x5e24…5e32 Head {h00=0x000a, h01=0x0050, text=»LIN870«, t00=0x003c, t01=0x0078}
0x5e32…5e46 Head {h00=0x0010, h01=0x0050, text=» PERF DKTEST«, t00=0x003c, t01=0x0086}
0x5e46…5e54 Head {h00=0x000a, h01=0x0050, text=»LINRET«, t00=0x003c, t01=0x009a}
0x5e54…5e60 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x003c, t01=0x00a8}
0x5e60…5e6e Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x003c, t01=0x00b4}
0x5e6e…5e78 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x003c, t01=0x00c2}
0x5e78…5e8c Head {h00=0x0010, h01=0x0050, text=»SPINF1 PROC «, t00=0x003c, t01=0x00cc}
0x5e8c…5ea8 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x003c, t01=0x00e0}
0x5ea8…5eb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x00fc}
0x5eb2…5ee6 Head {h00=0x0030, h01=0x0050, text=»* SPINF1 - WRITE INF ON FIRST LINE «, t00=0x003c, t01=0x0106}
0x5ee6…5ef0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x013a}
0x5ef0…5f0c Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x003c, t01=0x0144}
0x5f0c…5f2a Head {h00=0x001a, h01=0x0050, text=» MOVE SPBINW1,=X'0117'«, t00=0x003c, t01=0x0160}
0x5f2a…5f62 Head {h00=0x0034, h01=0x0050, text=» DSC1 SCREEN,6,SPBINW1 SET CURSOR ON FIRST LINE «, t00=0x003c, t01=0x017e}
0x5f62…5f7e Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW1,CBIN0 «, t00=0x003d, t01=0x0026}
0x5f7e…5fb4 Head {h00=0x0032, h01=0x0050, text=» EDWRT SCREEN,SPFTBMES(CBIN7) WRITE MESSAGE 7 «, t00=0x003d, t01=0x0042}
0x5fb4…5fc0 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x003d, t01=0x0078}
0x5fc0…5fce Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x003d, t01=0x0084}
0x5fce…5fd8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0092}
0x5fd8…5fe2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x009c}
0x5fe2…5fec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00a6}
0x5fec…6000 Head {h00=0x0010, h01=0x0050, text=»SPINF8 PROC «, t00=0x003d, t01=0x00b0}
0x6000…601c Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x003d, t01=0x00c4}
0x601c…6026 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00e0}
0x6026…6058 Head {h00=0x002e, h01=0x0050, text=»* SPINF8 - WRITE INF ON LAST LINE«, t00=0x003d, t01=0x00ea}
0x6058…6062 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x011c}
0x6062…607e Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x003d, t01=0x0126}
0x607e…609e Head {h00=0x001c, h01=0x0050, text=» PERF SPLIN8,CBIN4,CBIN2«, t00=0x003d, t01=0x0142}
0x609e…60aa Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x003d, t01=0x0162}
0x60aa…60b8 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x003d, t01=0x016e}
0x60b8…60c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x017c}
0x60c2…60cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0186}
0x60cc…60e0 Head {h00=0x0010, h01=0x0050, text=»CLEAR8 PROC «, t00=0x003d, t01=0x0190}
0x60e0…6108 Head {h00=0x0024, h01=0x0050, text=»* DELETE FIRST 14 CHARACTERS«, t00=0x003e, t01=0x0014}
0x6108…6120 Head {h00=0x0014, h01=0x0050, text=»* OF LINE 24«, t00=0x003e, t01=0x003c}
0x6120…6152 Head {h00=0x002e, h01=0x0050, text=» MOVE GSWBIN2,=X'1801' INDICATE LAST LINE «, t00=0x003e, t01=0x0054}
0x6152…6172 Head {h00=0x001c, h01=0x0050, text=» DSC1 SCREEN,06,GSWBIN2 «, t00=0x003e, t01=0x0086}
0x6172…618e Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,CBIN14«, t00=0x003e, t01=0x00a6}
0x618e…61bc Head {h00=0x002a, h01=0x0050, text=» DSC1 SCREEN,02,GSWBIN2 ERASE 14 CHARS«, t00=0x003e, t01=0x00c2}
0x61bc…61ca Head {h00=0x000a, h01=0x0050, text=» RET «, t00=0x003e, t01=0x00f0}
0x61ca…61d8 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x003e, t01=0x00fe}
0x61d8…61e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x010c}
0x61e2…61ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0116}
0x61ec…6200 Head {h00=0x0010, h01=0x0050, text=»DKTEST PROC «, t00=0x003e, t01=0x0120}
0x6200…6228 Head {h00=0x0024, h01=0x0050, text=»* TEST IF DISK IS SWITCHED OFF, «, t00=0x003e, t01=0x0134}
0x6228…6232 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x015c}
0x6232…6248 Head {h00=0x0012, h01=0x0050, text=» GETID GSWSTR2«, t00=0x003e, t01=0x0166}
0x6248…6266 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR1,GSWSTR2 «, t00=0x003e, t01=0x017c}
0x6266…6296 Head {h00=0x002c, h01=0x0050, text=» CBE GSWSTR1,='R',DKTRET R]KONVERTERING?«, t00=0x003f, t01=0x000a}
0x6296…62b0 Head {h00=0x0016, h01=0x0050, text=» TBF CDKOFF,DKTRET«, t00=0x003f, t01=0x003a}
0x62b0…62cc Head {h00=0x0018, h01=0x0050, text=» TBT GTMASTFL,DKTRET«, t00=0x003f, t01=0x0054}
0x62cc…6302 Head {h00=0x0032, h01=0x0050, text=» TBF CDUOVL,DKTRET NO KI IF DISKOVERLAY ON DU «, t00=0x003f, t01=0x0070}
0x6302…6336 Head {h00=0x0030, h01=0x0050, text=»* WRITE MESSAGE, AND WAIT FOR FLAG CLEARED «, t00=0x003f, t01=0x00a6}
0x6336…635e Head {h00=0x0024, h01=0x0050, text=» MOVE SPBINW5,=X'1802' POSITION «, t00=0x003f, t01=0x00da}
0x635e…6384 Head {h00=0x0022, h01=0x0050, text=» DSC1 SCREEN,6,SPBINW5 CURSOR «, t00=0x003f, t01=0x0102}
0x6384…63ae Head {h00=0x0026, h01=0x0050, text=» EDWRT .NW,SCREEN,SPFTBMES(CBIN14)«, t00=0x003f, t01=0x0128}
0x63ae…63bc Head {h00=0x000a, h01=0x0050, text=»DKT10 «, t00=0x003f, t01=0x0152}
0x63bc…63d2 Head {h00=0x0012, h01=0x0050, text=» DELAY CBIN10 «, t00=0x003f, t01=0x0160}
0x63d2…63ec Head {h00=0x0016, h01=0x0050, text=» TBT CDKOFF,DKT10 «, t00=0x003f, t01=0x0176}
0x63ec…6400 Head {h00=0x0010, h01=0x0050, text=» PERF CLEAR8«, t00=0x003f, t01=0x0190}
0x6400…641c Head {h00=0x0018, h01=0x0050, text=» CMP CBIN1,CBIN0 NOK«, t00=0x0040, t01=0x0014}
0x641c…6428 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0040, t01=0x0030}
0x6428…6436 Head {h00=0x000a, h01=0x0050, text=»DKTRET«, t00=0x0040, t01=0x003c}
0x6436…6452 Head {h00=0x0018, h01=0x0050, text=» CMP CBIN0,CBIN0 OK «, t00=0x0040, t01=0x004a}
0x6452…645e Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0040, t01=0x0066}
0x645e…646c Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0040, t01=0x0072}
0x646c…6476 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0080}
0x6476…6480 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x008a}
0x6480…648a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0094}
0x648a…6494 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x009e}
0x6494…649c Head {h00=0x0004, h01=0x0050, t00=0x0040, t01=0x00a8}
0x649c…64a8 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0040, t01=0x00b0}
0x64a8…64ac Head {h00=0x4004, h01=0x0000}
0x64ac…64b0 00 40 00 bc ┆ @ ┆
0x64b0…64b8 (65, 1, 8) 20 04 00 00 00 41 00 04 ┆ A ┆
0x64b8…6508 (66, 0, 400) 82 0c ea 20 00 0c 50 08 3b 68 88 20 be ca f0 3a 96 a0 00 04 8f 20 bd a0 02 10 3b e1 56 02 91 06 91 86 1a 01 59 0c f0 3a e1 32 21 ff 81 92 91 a0 00 01 85 06 95 04 84 94 f0 3a 85 36 e3 32 f6 a1 be d6 57 26 81 80 82 0c 22 0f 23 f0 88 20 be c0 ┆ P ;h : ; V Y : 2! : 6 2 W& " # ┆
0x6508…6558 3b 62 93 16 81 cc 00 02 99 a0 00 02 03 01 aa 20 3b c0 f0 09 94 a0 00 01 f0 3a 83 08 3b 66 22 0f 23 3f 5f 22 83 a0 ff a0 57 02 b3 8e 82 0c 22 10 54 12 81 26 83 8e 54 02 99 05 80 d6 00 02 91 2b f0 81 f0 3a 87 18 80 8a e1 2a e2 26 b1 08 21 40 ┆;b ; : ;f" #?_" W " T & T + : * & !@┆
0x6558…65a8 50 02 01 60 31 60 93 84 50 12 f6 a1 c1 34 51 0c 81 18 86 14 85 04 81 0a 82 86 81 84 84 20 ff ff 84 5b ff fe 04 00 84 3b 1e 01 1d 01 1f 01 e1 38 83 04 b6 0b 56 04 ea 98 57 02 ee 0a 51 0a 50 02 03 00 01 00 e1 5b ff fe 21 f0 19 f0 58 0a 11 f0 ┆P `1` P 4Q [ ; 8 V W Q P [ ! X ┆
0x65a8…65f8 23 0f 1b 0f 50 02 13 0f 93 10 e2 34 84 08 b5 07 56 04 e9 94 57 02 ed 06 51 0a 50 02 04 00 02 00 e2 5b ff ff 22 f0 1a f0 58 0a 12 f0 24 0f 1c 0f 50 02 14 0f 83 8e 54 46 93 10 eb 20 00 0a 52 02 13 06 93 04 93 08 eb 20 00 a0 52 02 13 60 ab 3b ┆# P 4 V W Q P [ " X $ P TF R R ` ;┆
0x65f8…6648 84 0c 3c 28 82 1c 9a 02 82 08 51 18 50 04 23 ff 57 0e 82 0c 22 0f e1 3c 21 f0 a9 08 e1 3d 23 f0 54 36 57 02 e3 3d 82 5a ff fe 50 12 5f a6 9b 10 56 02 1b 06 93 04 9b 08 02 10 00 00 81 00 00 00 00 00 02 00 00 00 00 00 00 00 00 00 00 00 00 0c ┆ <( Q P # W " <! =# T6W = Z P _ V ┆
0x6648…6698 (67, 0, 400) 5e 3c 1b 60 5f 40 03 00 82 1c 9a 02 1f 01 1a 01 52 0a 51 04 e3 3c 23 f0 e3 3d 5f 10 84 10 50 02 04 03 03 00 82 3a 22 ff 50 1e e1 2a 83 8e 55 06 e8 8a 50 02 31 60 21 f0 54 02 01 b0 e3 22 23 0f ab 04 39 65 21 03 ac 04 e3 23 82 d6 00 02 e4 4b ┆^< `_@ R Q <# =_ P :" P * U P 1`! T "# 9e! # K┆
0x6698…66e8 ff fe f0 3a 80 d6 00 02 82 10 01 20 a2 05 50 38 22 10 54 0a 81 2a e9 26 f0 81 01 00 f0 3a 03 c0 e1 2a e2 26 b1 08 21 60 50 08 3a 4a 5c 16 eb 2b 5f 1a eb 2b 51 0c 81 18 86 14 85 04 81 0a 82 86 81 84 f6 a1 c1 34 5f 30 83 0a 84 06 e1 2c b3 19 ┆ : P8" T * & : * & !`P :J +_ +Q 4_0 , ┆
0x66e8…6738 56 04 ee 0c 57 02 eb 18 52 04 02 00 01 20 b4 15 56 04 ed 10 57 02 ec 14 52 08 12 00 58 56 19 20 57 02 e9 31 5c 5e 13 01 14 01 5f 30 96 a0 00 04 82 0a 83 06 81 18 99 0a 84 14 9c 06 99 10 52 04 9b 04 57 06 92 04 01 00 04 00 e1 28 b2 0b 56 04 ┆V W R V W R XV W 1 ^ _0 R W ( V ┆
0x6738…6788 ea 88 57 02 ea 0a 51 0a 50 04 01 00 57 10 21 0f 57 06 19 f0 56 02 11 f0 19 0f 50 02 11 0f e4 2c b3 07 56 04 e9 88 57 02 eb 06 51 0a 50 04 04 00 57 10 24 0f 57 06 1c f0 56 02 14 f0 1c 0f 50 02 14 0f e9 10 54 10 12 01 13 01 b2 19 56 04 ee 08 ┆ W Q P W ! W V P , V W Q P W $ W V P T V ┆
0x6788…67d8 57 02 ea 18 5a 5c 8f 3a 24 30 23 30 3b 62 ac 0c 1c 0c 88 20 c3 0c 1c 20 50 a0 1c 04 50 e6 1c 08 50 4e 1c 04 50 1e 83 0a 84 06 e1 30 e1 2d 13 01 eb 18 50 3a 14 01 b4 15 00 00 00 00 00 00 00 00 00 20 00 00 00 00 00 00 00 00 00 00 00 20 00 05 ┆W Z :$0#0;b P P PN P 0 - P: ┆
0x67d8…6828 (68, 0, 400) 56 04 ed 10 57 02 ec 14 5a 18 5f 18 1e 01 1d 01 e1 34 b5 07 56 04 e9 94 57 02 ed 06 51 06 50 02 01 ff 29 f0 ee 0a 50 04 e1 39 5f 20 e2 26 22 f0 21 0f a9 08 e1 39 f0 3a 81 26 04 00 02 00 50 20 02 b0 51 04 99 05 02 d0 83 20 c2 5a 14 01 99 2c ┆V W Z _ 4 V W Q P ) P 9_ &" ! 9 : & P Q Z ,┆
0x6828…6878 5e 06 91 2c 1c 01 3c c4 13 02 eb 20 c2 62 5c 14 83 10 23 0f b4 0c ac 04 aa 0c 84 3b e2 5b ff ff 85 1a 1d 01 81 94 15 03 5f 6e 27 10 03 e8 00 64 00 0a 80 94 1d 03 b5 07 56 04 e9 94 57 02 ed 06 56 02 85 06 03 00 07 00 e1 34 21 0f 19 0f 50 02 ┆^ , < b # ; [ _n' d V W V 4! P ┆
0x6878…68c8 11 0f 93 0c 84 0c 3c 02 93 10 93 04 81 08 ff 1c 58 18 15 01 e2 34 81 08 39 64 ed 02 5c 24 e1 26 e9 21 c0 00 52 02 9b 0d 83 2b f0 3a 07 00 02 b0 1e 01 81 0c 1d 01 03 0f b5 07 56 04 e9 94 57 02 ed 06 52 10 e3 34 1b 30 52 1e eb 20 00 09 59 1c ┆ < X 4 9d $ & ! R + : V W R 4 0R Y ┆
0x68c8…6918 ac 0c 02 b0 37 01 59 26 ee 0a 50 14 87 1c 5a 2c 3b 44 a9 0c e1 39 5f 38 13 03 5c 38 02 d0 5f 3c af 20 80 00 b5 07 56 04 e9 94 57 02 ed 06 59 4c 14 00 54 02 02 00 aa 04 e2 39 f0 3a e1 26 39 64 21 0f 11 20 e1 2b 92 a0 00 01 ea 98 50 8c b2 08 ┆ 7 Y& P Z,;D 9_8 8 _< V W YL T 9 : &9d! + P ┆
0x6918…6968 87 20 80 00 e1 26 ef 08 54 02 39 64 21 0f e9 20 00 0f 54 14 37 01 56 02 b7 1c ef 08 59 1a 91 a0 00 01 e9 94 50 5c 5f 24 82 14 9a 06 92 08 53 5a 81 18 99 0a a7 1c 51 04 00 00 00 00 04 02 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0c ┆ & T 9d! T 7 V Y P _$ SZ Q ┆