|
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: 26916 (0x6924)
Notes: pts_type(SC)
Names: »RGKLAR.SC«
└─⟦22f4dea89⟧ Bits:30009702 Philips computer tape "DOS_PTS_4.2_M_FL"
└─⟦this⟧ »NJ-AMT/RGKLAR.SC«
└─⟦dab19bdd7⟧ Bits:30009677 Philips computer tape "600218"
└─⟦this⟧ »NJ-AMT/RGKLAR.SC«
IDENT RGKLAR 831026 EV DDUM KMD08 PDIV ENTRY CLEJ ENTRY CLEDB ENTRY CLBEH ENTRY RGA120 ENTRY ZERO ENTRY SKIFT ENTRY STRTWR ENTRY STRTID ENTRY SLUTID ENTRY SOPRD ENTRY LAMPOF ENTRY LAMPON ENTRY BCKUP ENTRY RGADM EXT ADM EXT WAITF EXT CNFWRT EXT RADEL EXT SETKRE EXT SETDEB EXT WRITJT EXT INITRG EXT SPCLRN EXT SPCLRA EXT PACKCL EXT CLEAR8 EXT SPLIN8 EXT SLUT EXT GRASPV EXT FRMXVO EXT KORT EXT TCONFW EXT CONFWR EXT WRITFD EXT RAREAD EXT RAWRIT EXT ASGVOL EXT CLSVOL EXT CRKJ EXT BACKUP EXT CONRDX EXT WRITID EXT WRITLO EXT LOGOPN EXT LOGCLS EXT LOWRIT INCLUDE EQUATE EJECT RGADM SET SPPROMPT MOVE SPKEY,CBIN2 ATTFMT ADFRM01 PERF SPCLRA IB SPBINW2,RGADM,RGADM,RGADM,RGADM,RGA100,RGA200,RGA300, C RGADM,RGADM,RGA007,RGA045 B RGADM * RGA007 GO ONLINE PERF ADM,CBIN7 B RGADM * RGA045 ADM 45 MOVE GSWBIN1,=W'45' PERF ADM,GSWBIN1 B RGADM * * RGA100 * ******************************************************** * * OPEN ROUTINE * ******************************************************** * TBT CCONVFLG,RGADM CLEAR GTDYFLG SET SPPROMPT SET SPME PERF LOGOPN BNOK RGADM MOVE GTDATO,CMASKDAT MOVE GSWBCD3,CRELDAY ATTFMT OPENFRM PERF SPCLRN CBNE SPBINW2,CBIN3,RGADM MOVE TTEJEDB,=D'0' MUL TTSTLBNR,=D'-1' SET POSITIVE (OPEN) MUL CMASK(GTUWB),=D'-1' SET CMASK >0, OPEN MOVE TTCASH,TTSTCASH CBNE TTSTLBNR,=D'0',RGA115 MOVE TTSTLBNR,=D'1' RGA115 MOVE TTLBNR,TTSTLBNR SUB TTLBNR,=D'1' MOVE TTRECOPN,CRECBCD PERF ZERO PERF TCONFW,GTUWB STORE INF FROM ADM FUNC. PERF CONFWR PERF WRITJT,=W'5' OPEN MES ON JT MOVE GSWBIN1,=W'99' PERF WRITLO,GSWBIN1 FF PERF WRITLO,CBIN3 PERF WRITLO,CBIN4 PERF WRITLO,CBIN5 PERF WRITLO,CBIN6 PERF WRITLO,CBIN7 PERF WRITLO,CBIN8 PERF WRITLO,CBIN3 SET GTKASSE ADD CTASKNR,CBIN1 MOVE GSWBIN1,=W'99' PERF WRITLO,GSWBIN1 FF * RGA120 * PERF INITRG START REGISTRATION PERF TCLOSE CLOSE BNOK RGA120 PERF LOGCLS SUB CTASKNR,CBIN1 B RGADM EJECT TCLOSE PROC MOVE SPKEY,CBIN2 TCL000 SET SPPROMPT ATTFMT CLFRM01 PERF SPCLRA IB SPBINW2,TCLMAK,TCLMAK,TCL010 B TCL000 TCL010 * CLEAR FLAGS CLEAR GTSUMKEY CLEAR TTTSTFLG CLEAR TTCY0FLG CLEAR TTCY5FLG CLEAR TTCY1FLG CLEAR TTCY2FLG CLEAR TTLSTFLG CLEAR TTPSEFLG CLEAR TTSUMFLG CLEAR TTSUPFLG CLEAR GTCYFLG CLEAR GTSUBFLG MOVE TTSUPMRK,=C' ' MOVE TTSUMMRK,=C' ' MOVE GTTEXT,=C' ' MOVE GTSUM,=D'0' WAIT KVOUCH DSC0 KVOUCH,RLEAS * TR12 ACCUMULATORS MOVE GTREGNR,=D'2' MOVE GTREGDEX,CBIN2 PERF PACKCL MOVE GSWBIN1,=W'99' PERF WRITLO,GSWBIN1 FF PERF WRITLO,CBIN9 KASSE LUKNING MOVE GSWBIN1,=W'30' AUTOMATPOSTERINGER PERF WRITLO,GSWBIN1 MOVE GSWBIN1,CBIN1 TCL025 MOVE GTDUPF(GSWBIN1),=X'FF' ADD GSWBIN1,CBIN1 CBL GSWBIN1,CBINMAX,TCL025 MOVE GSWBCD5,=D'0' TCL030 ADD GSWBCD5,=D'1' ACC NR TCL035 MOVE GSWBIN5,GSWBCD5 CONVERT CBG GSWBIN5,CTR12(GTUWB,CBIN2),TCL100 ADD GSWBIN5,CTR12(GTUWB,CBIN1) MOVE GTDUPF(CBIN1),CTR12NR(GSWBIN5) CBE GTDUPF(CBIN1),=D'0',TCL030 MOVE GTUSED(CBIN1),CBIN5 INDICATE UPDATED MOVE GTDUPF(CBIN4),C12ACC(GSWBIN5,CBIN1) CBE GTDUPF(CBIN4),=D'0',TCL040 MOVE GTUSED(CBIN4),=W'-8' MOVE GSWSTR20,=C'EJ-EDB T[LLER ' MOVE GTWBCD1,GSWBCD5 PERF TR2GEN,CBIN1 GENERATE TR2 WITH KREDIT BNOK TCL035 TCL040 MOVE GSWBIN5,GSWBCD5 ADD GSWBIN5,CTR12(GTUWB,CBIN1) MOVE GTDUPF(CBIN4),C12ACC(GSWBIN5,CBIN2) CBE GTDUPF(CBIN4),=D'0',TCL030 MOVE GTUSED(CBIN4),=W'-8' MOVE GSWSTR20,=C'EJ-EDB T[LLER ' MOVE GTWBCD1,GSWBCD5 PERF TR2GEN,CBIN2 GENERATE TR2 WITH DEBET BNOK TCL040 B TCL030 EJECT TCL100 MOVE GSWSTR9,=C'TOTAL ' PERF CLEJ EJ EDB MOVE TTEJEDB,=D'0' TCL205 CASH MOVEMENT MOVE GTDUPF(CBIN1),TTCASHAC ACCOUNTNR MOVE GTDUPF(CBIN4),TTCASH CURRENT CASH SUB GTDUPF(CBIN4),TTSTCASH INITIAL CASH MOVE GTUSED(CBIN1),CBIN5 MOVE GTUSED(CBIN4),=W'-8' MOVE GSWSTR20,=C'KASSE-KONTO ' MOVE GTWBCD1,=D'0' SET GTTFLG PERF TR2GEN,CBIN0 BNOK TCL205 TBF CCLKTFLG,TCL230 PERF KORT ASK FOR KONTOKORT TCL230 CBE TVERSUR,=D'0',TCL235 MOVE GTDUPF(CBIN1),TVERSUR REMIT ACC MOVE GTDUPF(CBIN4),TTACC(CBIN6,CBIN1) ADD GTDUPF(CBIN4),TTACC(CBIN6,CBIN2) CBE GTDUPF(CBIN4),=D'0',TCL235 MOVE GTUSED(CBIN1),CBIN5 MOVE GTUSED(CBIN4),=W'-8' MUL GTDUPF(CBIN4),=D'-1' MOVE GSWSTR20,=C'VERSUR KONTONR REMIT ' MOVE GTWBCD1,=D'0' PERF TR2GEN,CBIN0 BNOK TCL230 TBF CCLKTFLG,TCL235 PERF KORT * * WRITING OF DISC JOURNAL AND VOUCHER * TCL235 MOVE GSWSTR9,=C'TOTAL ' PERF CLEDB * * BEHOLDNINGST[LLERE * PERF CLBEH * MOVE TTSTCASH,TTCASH MOVE TTSTLBNR,TTLBNR ADD TTSTLBNR,=D'1' MUL TTSTLBNR,=D'-1' SET NEGATIVE (CLOSE) MUL CMASK(GTUWB),=D'-1' SET CMASK < 0, CLOSE CLEAR GTTFLG TCL550 MOVE TTRECOPN,CRECBCD PERF ZERO PERF TCONFW,GTUWB STORE NEW INITIAL VALUES PERF CONFWR BNOK TCL550 CLEAR GTKASSE * ZERONIZE COUNTERS * TRANS 12 COUNTERS MOVE GSWSTR20,=C'*' PERF WRITJT,=W'12' PERF WRITLO,CBIN15 MOVE GTEJBUF,=X'00' PERF LOWRIT,CBIN3 CLOSE SPOOLFILE CMP CBIN0,CBIN0 DUMMY RET TCLMAK CMP CBIN0,CBIN1 RET PEND EJECT RGA200 ************************************************ * * PERFORM OF SELECTED ADM ROUTINE * ************************************************* * MOVE GSWBIN1,GSWBCD3 PERF ADM,GSWBIN1 B RGADM EJECT ZERO PROC * * ZERONIZE COUNTERS * TRANS 12 COUNTERS MOVE GSWBIN1,CTR12(GTUWB,CBIN1) MOVE GSWBIN2,GSWBIN1 ADD GSWBIN2,CTR12(GTUWB,CBIN2) TCL610 ADD GSWBIN1,CBIN1 CBG GSWBIN1,GSWBIN2,TCL615 MOVE C12ACC(GSWBIN1,CBIN1),=D'0' MOVE C12ACC(GSWBIN1,CBIN2),=D'0' B TCL610 TCL615 * ACCUMULATORS MOVE GSWBIN1,CBIN0 TCL620 ADD GSWBIN1,CBIN1 MOVE TTACC(GSWBIN1,CBIN1),=D'0' MOVE TTACC(GSWBIN1,CBIN2),=D'0' CBL GSWBIN1,CBIN8,TCL620 RET PEND EJECT CLEJ PROC ***************************************************** * * NOW ALL ACCUMULATORS NOT = 0 * HAS BEEN REGISTRATED * A VOUCHER PRINT OF ALL TR12 ACC * IS NOW PERFORMED ** ******************************************************** MOVE TTLINNR,=D'25' MOVE GSWSTR20,='EJ-EDB T[LLER ' PERF WRITLO,CBIN3 'ASTERIX' PERF WRITLO,CBIN15 'EJ EDB' CBE CTR12(GTUWB,CBIN2),CBIN0,TCLEJRET MOVE GSWSTR20,CBLANKS PERF WAHEAD,CBIN8 PERF WRITLO,CBIN18 HEADER PERF WRITLO,CBIN3 * PERF WRITLO,CBIN20 MOVE GTWBCD1,=D'0' TCL110 ADD GTWBCD1,=D'1' MOVE GSWBIN5,GTWBCD1 CONVERT CBG GSWBIN5,CTR12(GTUWB,CBIN2),TCL200 ADD GSWBIN5,CTR12(GTUWB,CBIN1) MOVE GTDUPF(CBIN4),C12ACC(GSWBIN5,CBIN1) ADD GTDUPF(CBIN4),C12ACC(GSWBIN5,CBIN2) MOVE GTDUPF(CBIN1),CTR12NR(GSWBIN5) CBE GTDUPF(CBIN1),=D'0',TCL110 CBG TTLINNR,=D'0',TCL190 DSC0 KVOUCH,RLEAS MOVE TTLINNR,=D'25' PERF WAHEAD,CBIN8 TCL190 PERF WALINE,CBIN9 PERF WRITLO,CBIN21 B TCL110 TCL200 DSC0 KVOUCH,RLEAS TCLEJRET RET PEND EJECT CLEDB PROC * * WRITING OF DISC JOURNAL AND VOUCHER * MOVE GSWSTR20,=C'EDB-T[LLERE ' PERF WRITJT,=W'6' PERF WAHEAD,CBIN8 MOVE GSWBIN1,=W'99' PERF WRITLO,GSWBIN1 FF PERF WRITLO,CBIN18 PERF WRITLO,CBIN3 * PERF WRITLO,CBIN20 MOVE GSWBCD5,=D'0' MOVE GTREGF(CBIN1),=D'0' TOTAL MOVE GTREGF(CBIN2),=D'0' TCL240 TBT GTSPGFLG,TCL242 MOVE GTREGNR,=D'11' TCL242 ADD GSWBCD5,=D'1' TCL245 MOVE GSWBIN5,GSWBCD5 CBG GSWBIN5,CBIN6,TCL300 ADD GTREGF(CBIN1),TTACC(GSWBIN5,CBIN1) ADD GTREGF(CBIN2),TTACC(GSWBIN5,CBIN2) MOVE GTUSED(CBIN4),CBIN0 MOVE GTDUPF(CBIN4),TTACC(GSWBIN5,CBIN1) ADD GTDUPF(CBIN4),TTACC(GSWBIN5,CBIN2) MOVE GTDUPF(CBIN6),TTACC(GSWBIN5,CBIN1) MOVE GTDUPF(CBIN5),TTACC(GSWBIN5,CBIN2) DEBET TBT GTSPGFLG,TCL290 MOVE GTUSED(CBIN6),=W'-53' MOVE GTUSED(CBIN5),=W'-52' MOVE GTDUPF(CBIN1),GSWBCD5 MOVE GTUSED(CBIN1),=W'50' MOVE GTDUPF(CBIN2),=D'2' MARK FOR TOTAL MOVE GTUSED(CBIN2),=W'51' PERF CRKJ PERF WRITFD BNOK TCL245 TCL290 MOVE GSWBIN5,GSWBCD5 RESTORE MOVE GTWBCD1,GSWBCD5 PERF WRITJT,=W'7' PERF WALINE,CBIN10 MOVE GSWBIN1,=W'34' PERF WRITLO,GSWBIN1 B TCL240 TCL300 PERF PACKCL MOVE GTDUPF(CBIN4),GTREGF(CBIN1) ADD GTDUPF(CBIN4),GTREGF(CBIN2) MOVE GTDUPF(CBIN5),TTACC(CBIN8,CBIN1) ADD GTDUPF(CBIN5),TTACC(CBIN8,CBIN2) PERF WALINE,CBIN11 MOVE GSWBIN1,=W'35' PERF WRITLO,GSWBIN1 MOVE GSWBIN1,=W'36' PERF WRITLO,GSWBIN1 MOVE GSWBIN1,=W'37' PERF WRITLO,GSWBIN1 MOVE GTDUPF(CBIN5),TTACC(CBIN1,CBIN1) MOVE GTDUPF(CBIN6),TTACC(CBIN1,CBIN2) MOVE GSWBIN1,CBIN1 TCL310 ADD GSWBIN1,CBIN1 CBG GSWBIN1,CBIN4,TCL320 ADD GTDUPF(CBIN5),TTACC(GSWBIN1,CBIN1) ADD GTDUPF(CBIN6),TTACC(GSWBIN1,CBIN2) B TCL310 TCL320 TBT GTSPGFLG,TCL329 * ADJUST FOR 'KASSE INDBERETNING' MOVE GSWBCD1,TTCASH SUB GSWBCD1,TTSTCASH CBL GSWBCD1,=D'0',TCL323 SUB GTDUPF(CBIN6),GSWBCD1 B TCL325 TCL323 SUB GTDUPF(CBIN5),GSWBCD1 TCL325 * ADJUST FOR 'VERSUR INDBERETNING' MOVE GSWBCD1,TTACC(CBIN6,CBIN1) ADD GSWBCD1,TTACC(CBIN6,CBIN2) MUL GSWBCD1,=D'-1' 'VEND' CBL GSWBCD1,=D'0',TCL328 SUB GTDUPF(CBIN6),GSWBCD1 B TCL329 TCL328 SUB GTDUPF(CBIN5),GSWBCD1 TCL329 MUL GTDUPF(CBIN5),=D'-1' MUL GTDUPF(CBIN6),=D'-1' MOVE GSWBCD1,TTCASH SUB GSWBCD1,TTSTCASH MOVE GTDUPF(CBIN4),GSWBCD1 PERF WALINE,CBIN12 DSC0 KVOUCH,RLEAS PERF WRITLO,CBIN7 PERF WRITLO,CBIN8 MOVE GSWBIN1,=W'38' PERF WRITLO,GSWBIN1 MOVE GSWBIN1,=W'39' PERF WRITLO,GSWBIN1 RET PEND EJECT CLBEH PROC * * BEHOLDNINGST[LLERE * TCL400 MOVE TTLINNR,=D'25' MOVE GSWBIN2,CBEH(GTUWB,CBIN2) CMP GSWBIN2,CBIN0 BE CLBEHRET ADD GSWBIN2,CBEH(GTUWB,CBIN1) MOVE GTWBCD2,GSWBIN2 TCL405 ATTFMT CLFRM04 SET SPPROMPT PERF SPCLRA IB SPBINW2, C TCL415,TCL415,TCL412,TCL411,TCL415, C TCL415,TCL415,TCL415,TCL413,TCL415, C TCL415,TCL415,TCL413 TCL415 B TCL400 TCL411 TBT GTSPGFLG,TCL400 MOVE GSWSTR20,=C'SLET SALDO ' MOVE GSWBIN6,CBIN1 B TCL420 TCL412 TBT GTSPGFLG,TCL400 MOVE GSWSTR20,=C'SLET PERIODE ' MOVE GSWBIN6,CBIN2 B TCL420 TCL413 MOVE GSWSTR20,=C'SUBTOTAL ' MOVE GSWBIN6,CBIN3 B TCL420 TCL420 MOVE GTWBCD1,=D'0' MOVE GSWBCD6,=D'0' MOVE GSWBCD7,=D'0' TCL425 PERF GRASPV MOVE GSWBIN3,CVOUTOP ADD GSWBIN3,CBIN6 DSC1 KVOUCH,POS,GSWBIN3 PERF CLEAR8 PERF FRMXVO,CBIN13 HEAD ON VOUCHER EDWRT KVOUCH,GTSTRFMT MOVE GSWBIN1,=W'99' PERF WRITLO,GSWBIN1 MOVE GSWBIN1,=W'23' PERF WRITLO,GSWBIN1 PERF WRITLO,CBIN3 MOVE GSWBIN1,=W'24' PERF WRITLO,GSWBIN1 TCL430 ADD GTWBCD1,=D'1' MOVE GSWBIN3,GTWBCD1 ADD GSWBIN3,CBEH(GTUWB,CBIN1) MOVE GSWBIN4,GTWBCD2 CBG GSWBIN3,GSWBIN4,TCL490 CBE CBACC(GSWBIN3,CBIN1),=D'0',TCL430 * ADD TO TOTAL, PERIODE AND SALDO ADD GSWBCD6,CBACC(GSWBIN3,CBIN2) PERIODE ADD GSWBCD7,CBACC(GSWBIN3,CBIN3) SALDO PERF FRMXVO,CBIN14 EDWRT KVOUCH,GTSTRFMT MOVE GSWBIN1,=W'25' PERF WRITLO,GSWBIN1 TBT GTTESTFL,TCL433 IB GSWBIN6,TCL431,TCL432,TCL433 B TCL433 TCL431 MOVE CBACC(GSWBIN3,CBIN3),=D'0' SALDO TCL432 MOVE CBACC(GSWBIN3,CBIN2),=D'0' PERIODE TCL433 SUB TTLINNR,=D'1' CBG TTLINNR,=D'0',TCL430 DSC0 KVOUCH,RLEAS MOVE TTLINNR,=D'25' B TCL425 TCL490 * WRITE TOTAL LINE PERF FRMXVO,CBIN18 EDWRT KVOUCH,GTSTRFMT DSC0 KVOUCH,RLEAS CLBEHRET RET PEND RGA300 PERF ADM,CBIN11 SPG B RGADM EJECT ************************************************** * * TR2GEN GENERATES A TRANSACTION 2 * **************************************************** TR2GEN PROC DBKR MOVE TTDKDEX,DBKR CBNE TTDKDEX,=W'0',TR2DBKR MOVE TTDKDEX,CBIN1 CBL GTDUPF(CBIN4),=D'0',TR2DBKR MOVE TTDKDEX,CBIN2 TR2DBKR PERFI TTDKDEX,SETKRE,SETDEB EDWRT SCREEN,CLFRM02 PERF SLUT RET PEND ******************************************************** * * WAHEAD - GRASP AND WRITE HEADLINE ON VOUCHER * ******************************************************** WAHEAD PROC VOXDEX EDWRT SCREEN,CLFRM03 PERF SPLIN8,CBIN5,CBIN2 PERF GRASPV DSC1 KVOUCH,POS,CVOUTOP PERF CLEAR8 PERF FRMXVO,VOXDEX EDWRT KVOUCH,GTSTRFMT RET PEND ********************************************************* * * WALINE WRITE ACCUMULATORLINE * ********************************************************** WALINE PROC LINDEX PERF FRMXVO,LINDEX EDWRT KVOUCH,GTSTRFMT SUB TTLINNR,=D'1' RET PEND EJECT SKIFT PROC ************************* * * SKIFT - THIS PROCEDURE TAKES HAND OF SHIFT * OF DISKS, IS ACTIVATED AFTER * 12 ADM * ************************ SK00 PERF WAITF,CPFLG SET CSKIFTWN PERF SPLIN8,CBIN8,CBIN2 'DISKETTE SKIFT' TBF CWFLAG,SK15 SUB CRECBCD,=D'1' PERF SLUTID,CRECBCD WRITE 'SLUTD' PERF RAWRIT,DK02,=D'2',CPCKBUF,CRECNR SK15 PERF WRITID,CBIN2,CBIN2 PERF CLSVOL,CBIN2 PERF LAMPOF,=W'2047' ADD CVOLNO,=D'1' SK120 PERF LAMPON,=W'512' LAMP 2 PERF SOPRD CBNE GSWBIN2,CBIN9,SK120 PERF ASGVOL,CBIN2 BNOK SK120 PERF LAMPOF,=W'2047' MOVE CRECNR,CBIN1 MOVE CRECBCD,=D'0' TBF CWFLAG,SK130 PERF STRTWR BNOK SK120 SK130 PERF CNFWRT REWRITE CONFDATA TBF CWFLAG,SK150 MOVE CRECBCD,=D'1' PERF WRITID,CBIN2,CBIN1 SK150 PERF CLEAR8 PERF WRITJT,=W'11' PERF WRITLO,CBIN14 CLEAR CSKIFTFL CLEAR CSKIFTWN CLEAR CPFLG DISC FREE RET PEND EJECT LAMPON PROC $NR PLIT $NR ************************************** * LAMPON - FIRE LAMPS ON OPR. PANEL. * CALL - PERF LAMPON,<$NR> * THE LAMPS ARE FIRED CORRESPONDING TO 1-BITS IN PARAM ***************************************** MOVE GSWBIN2,$NR DSC1 DSSOPO,ON,GSWBIN2 RET PEND * LAMPOF PROC $NR PLIT $NR ***************************************** * LAMPOF - EXTINGUISH LAMPS ON OPR. PANEL * CALL - PERF LAMPOF,<$NR> * THE LAMPS ARE EXTINGHUISHED CORRESPONDING TO 1-BITS IN PARAM ******************************************** MOVE GSWBIN2,$NR DSC1 DSSOPO,OFF,GSWBIN2 RET PEND * SOPRD PROC ********************************************* * SOPRD - READ SYSTEMS OPERATOR PANEL ********************************************* SOPR10 MOVE GSWBIN1,CBIN1 KI DSSOPI,SOPINP,DUMTAB,GSWBIN1,GSWBIN2 BNOK SOPR10 RET PEND EJECT STRTWR PROC ********************* *********************** PERF STRTID,CVOLNO PERF RAWRIT,DK02,=D'2',CPCKBUF,CRECNR BNOK STRTNOK ADD CRECNR,CBIN1 PERF RADEL,DK02,CRECNR BNOK STRTNOK CMP CBIN0,CBIN0 OK RET STRTNOK CMP CBIN1,CBIN0 RET PEND STRTID PROC VOLID ******************** * STRTID - SETS UP A START ID IN PACK BUFFER * CALL - PERF STRTID,<VOLID> ******************** SET CSWFLAG CBE CRECLGD,=W'128',STRT10 CLEAR CSWFLAG STRT10 MOVE GSWBIN6,CBIN2 EDIT CPCKBUF,PCKINIT EDIT CPCKBUF,STARTFR MOVE GSWBCD3,VOLID EDIT GSWSTR20,FRVOLID MOVE GSWBIN1,=W'40' COPY CPCKBUF,GSWBIN1,CBIN12,GSWSTR20,CBIN0 MOVE CRECNR,CBIN1 RET PEND SLUTID PROC SLUTNO ******************** * SLUTID - SETS UP A SLUTD IN CPCKBUF ******************** SET CSWFLAG CBE CRECLGD,=W'128',SLUT10 CLEAR CSWFLAG SLUT10 EDIT CPCKBUF,PCKINIT MOVE CRECBCD,SLUTNO EDIT CPCKBUF,SLUTFRM RET PEND EJECT BCKUP PROC $OPT PLIT $OPT ******************** * * THIS PROCEDURE TAKES CARE OF ADMINISTRATION * OB BACKUP * * CALL: PERF BCKUP,<=W'X'> * $OPT = 1 : WITHOUT BACKUP * $OPT = 2 : WITH BACKUP * * ******************** * MOVE CRECNR,CBIN1 MOVE CRECBCD,=D'1' ADD CVOLNO,=D'1' NEXT VOLUME NO PERF CNFWRT REWRITE CONFIGURATION SUB CVOLNO,=D'1' CBE CBIN1,$OPT,BCK100 NO BACKUP * * * BACKUP * BCK000 PERF LAMPOF,=W'2047' LAMPS OFF BCK005 PERF LAMPON,=W'1024' LAMP 1 PERF LAMPON,=W'128' LAMP 4 PERF LAMPON,=W'16' LAMP 7 TBF CGLREGFL,BCK010 PERF LAMPON,=W'512' LAMP 2 BCK010 PERF SOPRD READ SOP LAMPS IB GSWBIN2, C BSOP10,BSOP09,BSOP08,BSOP07,BSOP06, C BSOP05,BSOP04,BSOP03,BSOP02,BSOP01 BSOP03 BSOP05 BSOP06 BSOP08 BSOP09 BSOP10 B BCK010 OTHER LAMPS * BSOP01 BACKUP FD999001 PERF LAMPOF,=W'2047' LAMPS OFF PERF LAMPON,=W'1024' LAMP 1 PERF BACKUP,DK01,=D'1',=W'32',CCONBUF0,=W'199' BNOK BCK050 ADD CVOLNO,=D'1' PERF WRITID,CBIN6,CBIN4 BACKUP OK SUB CVOLNO,=D'1' PERF CONRDX,CCONBUF0,CBIN1 RESTORE BUFFER AREA B BCK000 BCK050 PERF CONRDX,CCONBUF0,CBIN1 RESTORE BUFFER AREA B BCK005 * BSOP02 COPY FD999002 TO FD999005 TBF CGLREGFL,BCK010 ALLOWED? B BCK02 * ***** BCK02 COPY FD999002 TO FD999005 PERF LAMPOF,=W'2047' LAMPS OFF PERF LAMPON,=W'512' LAMP 2 SET CPFLG PERF ASGVOL,CBIN2 ASSIGN REGSET BNOK BCK0290 MOVE CGLRECNR,CBIN0 BCK0250 ADD CGLRECNR,CBIN1 MOVE GSWBIN1,=W'128' LENGTH OF RECORD PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,CGLRECNR BNOK BCK0270 ERROR CBE GTWBCD1,=D'4',BCK0280 NO DATA MOVE GSWSTR20,=C'SLUTD' MOVE GSWBIN5,CBIN0 MATCH GSWSTR20,GSWBIN5,CBIN5,CPCKBUF,CBIN0,CBIN5 BE BCK0280 SLUTD PERF RAWRIT,DK05,=D'5',CPCKBUF,CGLRECNR BOK BCK0250 BCK0270 ERROR PERF LAMPON,=W'2' LAMP 10 BCK0280 FINISH MOVE TTGLREC,CGLRECNR PERF TCONFW,CBIN1 SAVE LAST RECORD NO. BCK0290 CLEAR CPFLG DSC0 DK02,CLOSE CLOSE VOLUME 2 B BCK02R * ***** BCK02R B BCK000 * BSOP04 BACKUP FD999004 PERF LAMPOF,=W'2047' LAMPS OFF PERF LAMPON,=W'128' LAMP 4 PERF BACKUP,DK04,=D'4',=W'30',CKTBUF,=W'128' BNOK BCK005 NOK B BCK000 OK * BSOP07 FINISH PERF LAMPOF,=W'2047' LAMPS OFF PERF ASGVOL,CBIN1 ASSIGN SYSTEM FILES BNOK BCKNOK BCK100 PERF ASGVOL,CBIN2 BNOK BCKNOK ADD CVOLNO,=D'1' PERF STRTWR BOK BCKOK SUB CVOLNO,=D'1' PERF LAMPON,=W'2' LAMP 10 B BCKNOK * BCKNOK CMP CBIN1,CBIN0 NOK RET * BCKOK PERF WRITID,CBIN2,CBIN1 CMP CBIN0,CBIN0 RET PEND EJECT * * ************************************************* * * FORMATS * ************************************************* DUMTAB KTAB EORKY1 * FMTFKI FRMT FNL FKI 1 FMEL 'B',TSWBCD2 FMEND * PCKINIT FRMT FILLR ' ',40 FILLR ' ',40 FBT CSWFLAG,INIT10 FILLR X'00',48 FEXIT INIT10 FILLR ' ',48 FMEND * FRVOLID FRMT FMEL '999999',CMASKDAT FMEL 'B99999',GSWBCD3 FMEND * SLUTFRM FRMT FCOPY =C'SLUTD' FMEL '99999',CRECBCD FMEND * STARTFR FRMT FCOPY =C'Z300 ' FMEL '9999',CKMDNR KOMMUNE NR FILLR C'2',1 FCOPY CVOL(GSWBIN6) FMEL '999',CRELDAY DAG NR FILLR C'1',1 MIXED TRANS FILLR ' ',6 FMEND * ADFRM01 FRMT FSL FCOPY ='KLAR ' FCOPY ='ADM ' FKI 12,MINL=1,MAXL=2 FMEL 'ZZ',GSWBCD3 FMEND * * OPENFRM FRMT FSL FCOPY ='ADM ' FBT GTDYFLG,OPFR05 FTAB 1 FCOPY =C'KASSE]BNING' OPFR05 FNL FBF GTMASTFL,OPFR10 FCOPY =C'DAGS-DATO' FKI 11,MINL=6,MAXL=6,SCHK=2,REWRT,NCLR FMEL '99E-99E-99',CMASKDAT FNL FCOPY =C'DAG NR' FKI 11,MINL=1,MAXL=3,APPL=102 FMEL 'ZZZ',CRELDAY FNL OPFR10 FCOPY ='POST-DATO' FKI 11,MINL=6,MAXL=6,SCHK=2,REWRT FMEL '99E-99E-99',GTDATO FNL FCOPY =C'DAG NR' FKI 11,MINL=1,MAXL=3,APPL=107 FMEL 'ZZZ',GSWBCD3 DUMMY FMEND * CLFRM01 FRMT FSL FCOPY =C'KASSELUKNING' FLINK FMTFKI FMEND * CLFRM02 FRMT FILLR '1',2 FCOPY =C'KASSELUKNING' FNL FCOPY GSWSTR20 TEXT FMEL 'ZZ',GTWBCD1 COUNTER NR FILLR ' ',4 FCOPY GTDBKRC DEB-KRE FNL FCOPY =C'KONTONR' FILLR ' ',5 FCOPY =X'42454C5C42' FNL FMEL '99999999E-99',GTDUPF(CBIN1) FMEL 'BTTT.TTT.TTT.TT9.99-',GTDUPF(CBIN4) FMEND * CLFRM03 FRMT FILLR '1',2 FBT GTSPGFLG,CLF0301 FCOPY =C'KASSELUKNING' CLF0301 FNL FCOPY GSWSTR20 FMEND * CLFRM04 FRMT FSL FBT GTSPGFLG,CLF0401 FCOPY ='KASSELUKNING' CLF0401 FNL FCOPY ='BEHOLDNINGST[LLERE' FNL FNL FBT GTSPGFLG,CLF0402 FCOPY ='SLET PERIODE ' FTAB 15 FCOPY =' DEB' FNL FCOPY ='SLET SALDO ' FTAB 15 FCOPY =' KRE' CLF0402 FNL FCOPY ='SUBTOTAL ' FTAB 16 FCOPY ='KVIT' FNL FNL FNL FILLR ' ',1 FCOPY ='BILAG' FLINK FMTFKI FMEND * END
0x0000…0020 (0, 0, 398) Head {h00=0x001c, h01=0x0050, text=» IDENT RGKLAR 831026 EV «, t00=0x0000, t01=0x0004}
0x0020…0034 Head {h00=0x0010, h01=0x0050, text=» DDUM KMD08 «, t00=0x0000, t01=0x0024}
0x0034…0042 Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x0000, t01=0x0038}
0x0042…0056 Head {h00=0x0010, h01=0x0050, text=» ENTRY CLEJ «, t00=0x0000, t01=0x0046}
0x0056…006a Head {h00=0x0010, h01=0x0050, text=» ENTRY CLEDB«, t00=0x0000, t01=0x005a}
0x006a…007e Head {h00=0x0010, h01=0x0050, text=» ENTRY CLBEH«, t00=0x0000, t01=0x006e}
0x007e…0094 Head {h00=0x0012, h01=0x0050, text=» ENTRY RGA120 «, t00=0x0000, t01=0x0082}
0x0094…00a8 Head {h00=0x0010, h01=0x0050, text=» ENTRY ZERO «, t00=0x0000, t01=0x0098}
0x00a8…00bc Head {h00=0x0010, h01=0x0050, text=» ENTRY SKIFT«, t00=0x0000, t01=0x00ac}
0x00bc…00d2 Head {h00=0x0012, h01=0x0050, text=» ENTRY STRTWR «, t00=0x0000, t01=0x00c0}
0x00d2…00e8 Head {h00=0x0012, h01=0x0050, text=» ENTRY STRTID «, t00=0x0000, t01=0x00d6}
0x00e8…00fe Head {h00=0x0012, h01=0x0050, text=» ENTRY SLUTID «, t00=0x0000, t01=0x00ec}
0x00fe…0112 Head {h00=0x0010, h01=0x0050, text=» ENTRY SOPRD«, t00=0x0000, t01=0x0102}
0x0112…0128 Head {h00=0x0012, h01=0x0050, text=» ENTRY LAMPOF «, t00=0x0000, t01=0x0116}
0x0128…013e Head {h00=0x0012, h01=0x0050, text=» ENTRY LAMPON «, t00=0x0000, t01=0x012c}
0x013e…0152 Head {h00=0x0010, h01=0x0050, text=» ENTRY BCKUP«, t00=0x0000, t01=0x0142}
0x0152…0166 Head {h00=0x0010, h01=0x0050, text=» ENTRY RGADM«, t00=0x0000, t01=0x0156}
0x0166…016e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x016a}
0x016e…0176 Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0172}
0x0176…017e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x017a}
0x017e…018e Head {h00=0x000c, h01=0x0050, text=» EXT ADM«, t00=0x0000, t01=0x0182}
0x018e…01a0 (1, 0, 400) Head {h00=0x000e, h01=0x0050, text=» EXT WAITF«, t00=0x0001, t01=0x0004}
0x01a0…01b4 Head {h00=0x0010, h01=0x0050, text=» EXT CNFWRT «, t00=0x0001, t01=0x0016}
0x01b4…01c6 Head {h00=0x000e, h01=0x0050, text=» EXT RADEL«, t00=0x0001, t01=0x002a}
0x01c6…01da Head {h00=0x0010, h01=0x0050, text=» EXT SETKRE «, t00=0x0001, t01=0x003c}
0x01da…01ee Head {h00=0x0010, h01=0x0050, text=» EXT SETDEB «, t00=0x0001, t01=0x0050}
0x01ee…0202 Head {h00=0x0010, h01=0x0050, text=» EXT WRITJT «, t00=0x0001, t01=0x0064}
0x0202…0216 Head {h00=0x0010, h01=0x0050, text=» EXT INITRG «, t00=0x0001, t01=0x0078}
0x0216…022a Head {h00=0x0010, h01=0x0050, text=» EXT SPCLRN «, t00=0x0001, t01=0x008c}
0x022a…023e Head {h00=0x0010, h01=0x0050, text=» EXT SPCLRA «, t00=0x0001, t01=0x00a0}
0x023e…0252 Head {h00=0x0010, h01=0x0050, text=» EXT PACKCL «, t00=0x0001, t01=0x00b4}
0x0252…0266 Head {h00=0x0010, h01=0x0050, text=» EXT CLEAR8 «, t00=0x0001, t01=0x00c8}
0x0266…027a Head {h00=0x0010, h01=0x0050, text=» EXT SPLIN8 «, t00=0x0001, t01=0x00dc}
0x027a…028c Head {h00=0x000e, h01=0x0050, text=» EXT SLUT «, t00=0x0001, t01=0x00f0}
0x028c…02a0 Head {h00=0x0010, h01=0x0050, text=» EXT GRASPV «, t00=0x0001, t01=0x0102}
0x02a0…02b4 Head {h00=0x0010, h01=0x0050, text=» EXT FRMXVO «, t00=0x0001, t01=0x0116}
0x02b4…02c6 Head {h00=0x000e, h01=0x0050, text=» EXT KORT «, t00=0x0001, t01=0x012a}
0x02c6…02da Head {h00=0x0010, h01=0x0050, text=» EXT TCONFW «, t00=0x0001, t01=0x013c}
0x02da…02ee Head {h00=0x0010, h01=0x0050, text=» EXT CONFWR «, t00=0x0001, t01=0x0150}
0x02ee…0302 Head {h00=0x0010, h01=0x0050, text=» EXT WRITFD «, t00=0x0001, t01=0x0164}
0x0302…0316 Head {h00=0x0010, h01=0x0050, text=» EXT RAREAD «, t00=0x0001, t01=0x0178}
0x0316…032a Head {h00=0x0010, h01=0x0050, text=» EXT RAWRIT «, t00=0x0001, t01=0x018c}
0x032a…033e Head {h00=0x0010, h01=0x0050, text=» EXT ASGVOL «, t00=0x0002, t01=0x0010}
0x033e…0352 Head {h00=0x0010, h01=0x0050, text=» EXT CLSVOL «, t00=0x0002, t01=0x0024}
0x0352…0364 Head {h00=0x000e, h01=0x0050, text=» EXT CRKJ «, t00=0x0002, t01=0x0038}
0x0364…0378 Head {h00=0x0010, h01=0x0050, text=» EXT BACKUP «, t00=0x0002, t01=0x004a}
0x0378…038c Head {h00=0x0010, h01=0x0050, text=» EXT CONRDX «, t00=0x0002, t01=0x005e}
0x038c…03a0 Head {h00=0x0010, h01=0x0050, text=» EXT WRITID «, t00=0x0002, t01=0x0072}
0x03a0…03b4 Head {h00=0x0010, h01=0x0050, text=» EXT WRITLO «, t00=0x0002, t01=0x0086}
0x03b4…03c8 Head {h00=0x0010, h01=0x0050, text=» EXT LOGOPN «, t00=0x0002, t01=0x009a}
0x03c8…03dc Head {h00=0x0010, h01=0x0050, text=» EXT LOGCLS «, t00=0x0002, t01=0x00ae}
0x03dc…03f0 Head {h00=0x0010, h01=0x0050, text=» EXT LOWRIT «, t00=0x0002, t01=0x00c2}
0x03f0…03f8 Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x00d6}
0x03f8…0400 Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x00de}
0x0400…0418 Head {h00=0x0014, h01=0x0050, text=» INCLUDE EQUATE «, t00=0x0002, t01=0x00e6}
0x0418…0426 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x00fe}
0x0426…0434 Head {h00=0x000a, h01=0x0050, text=»RGADM «, t00=0x0002, t01=0x010c}
0x0434…044a Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0002, t01=0x011a}
0x044a…0464 Head {h00=0x0016, h01=0x0050, text=» MOVE SPKEY,CBIN2 «, t00=0x0002, t01=0x0130}
0x0464…047c Head {h00=0x0014, h01=0x0050, text=» ATTFMT ADFRM01 «, t00=0x0002, t01=0x014a}
0x047c…0490 Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0002, t01=0x0162}
0x0490…04d4 Head {h00=0x0040, h01=0x0050, text=» IB SPBINW2,RGADM,RGADM,RGADM,RGADM,RGA100,RGA200,RGA300, C«, t00=0x0002, t01=0x0176}
0x04d4…04f8 Head {h00=0x0020, h01=0x0050, text=» RGADM,RGADM,RGA007,RGA045 «, t00=0x0003, t01=0x002a}
0x04f8…0508 Head {h00=0x000c, h01=0x0050, text=» B RGADM«, t00=0x0003, t01=0x004e}
0x0508…0512 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x005e}
0x0512…052c Head {h00=0x0016, h01=0x0050, text=»RGA007 GO ONLINE«, t00=0x0003, t01=0x0068}
0x052c…0544 Head {h00=0x0014, h01=0x0050, text=» PERF ADM,CBIN7 «, t00=0x0003, t01=0x0082}
0x0544…0554 Head {h00=0x000c, h01=0x0050, text=» B RGADM«, t00=0x0003, t01=0x009a}
0x0554…055e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00aa}
0x055e…0566 Head {h00=0x0004, h01=0x0050, t00=0x0003, t01=0x00b4}
0x0566…057e Head {h00=0x0014, h01=0x0050, text=»RGA045 ADM 45 «, t00=0x0003, t01=0x00bc}
0x057e…059a Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'45'«, t00=0x0003, t01=0x00d4}
0x059a…05b4 Head {h00=0x0016, h01=0x0050, text=» PERF ADM,GSWBIN1 «, t00=0x0003, t01=0x00f0}
0x05b4…05c4 Head {h00=0x000c, h01=0x0050, text=» B RGADM«, t00=0x0003, t01=0x010a}
0x05c4…05ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x011a}
0x05ce…05d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0124}
0x05d8…05e6 Head {h00=0x000a, h01=0x0050, text=»RGA100«, t00=0x0003, t01=0x012e}
0x05e6…05f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x013c}
0x05f0…0630 Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0003, t01=0x0146}
0x0630…063a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0186}
0x063a…0662 Head {h00=0x0024, h01=0x0050, text=»* OPEN ROUTINE«, t00=0x0003, t01=0x0190}
0x0662…066c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0028}
0x066c…06ac Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0004, t01=0x0032}
0x06ac…06b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0072}
0x06b6…06d2 Head {h00=0x0018, h01=0x0050, text=» TBT CCONVFLG,RGADM «, t00=0x0004, t01=0x007c}
0x06d2…06e8 Head {h00=0x0012, h01=0x0050, text=» CLEAR GTDYFLG«, t00=0x0004, t01=0x0098}
0x06e8…06fe Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0004, t01=0x00ae}
0x06fe…0710 Head {h00=0x000e, h01=0x0050, text=» SET SPME «, t00=0x0004, t01=0x00c4}
0x0710…0724 Head {h00=0x0010, h01=0x0050, text=» PERF LOGOPN«, t00=0x0004, t01=0x00d6}
0x0724…0738 Head {h00=0x0010, h01=0x0050, text=» BNOK RGADM «, t00=0x0004, t01=0x00ea}
0x0738…0756 Head {h00=0x001a, h01=0x0050, text=» MOVE GTDATO,CMASKDAT «, t00=0x0004, t01=0x00fe}
0x0756…0774 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD3,CRELDAY «, t00=0x0004, t01=0x011c}
0x0774…078c Head {h00=0x0014, h01=0x0050, text=» ATTFMT OPENFRM «, t00=0x0004, t01=0x013a}
0x078c…07a0 Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x0004, t01=0x0152}
0x07a0…07c2 Head {h00=0x001e, h01=0x0050, text=» CBNE SPBINW2,CBIN3,RGADM «, t00=0x0004, t01=0x0166}
0x07c2…07de Head {h00=0x0018, h01=0x0050, text=» MOVE TTEJEDB,=D'0' «, t00=0x0004, t01=0x0188}
0x07de…080e Head {h00=0x002c, h01=0x0050, text=» MUL TTSTLBNR,=D'-1' SET POSITIVE (OPEN)«, t00=0x0005, t01=0x0014}
0x080e…0842 Head {h00=0x0030, h01=0x0050, text=» MUL CMASK(GTUWB),=D'-1' SET CMASK >0, OPEN «, t00=0x0005, t01=0x0044}
0x0842…0860 Head {h00=0x001a, h01=0x0050, text=» MOVE TTCASH,TTSTCASH «, t00=0x0005, t01=0x0078}
0x0860…0884 Head {h00=0x0020, h01=0x0050, text=» CBNE TTSTLBNR,=D'0',RGA115 «, t00=0x0005, t01=0x0096}
0x0884…08a0 Head {h00=0x0018, h01=0x0050, text=» MOVE TTSTLBNR,=D'1'«, t00=0x0005, t01=0x00ba}
0x08a0…08ae Head {h00=0x000a, h01=0x0050, text=»RGA115«, t00=0x0005, t01=0x00d6}
0x08ae…08cc Head {h00=0x001a, h01=0x0050, text=» MOVE TTLBNR,TTSTLBNR «, t00=0x0005, t01=0x00e4}
0x08cc…08e6 Head {h00=0x0016, h01=0x0050, text=» SUB TTLBNR,=D'1' «, t00=0x0005, t01=0x0102}
0x08e6…0904 Head {h00=0x001a, h01=0x0050, text=» MOVE TTRECOPN,CRECBCD«, t00=0x0005, t01=0x011c}
0x0904…0916 Head {h00=0x000e, h01=0x0050, text=» PERF ZERO«, t00=0x0005, t01=0x013a}
0x0916…094a Head {h00=0x0030, h01=0x0050, text=» PERF TCONFW,GTUWB STORE INF FROM ADM FUNC. «, t00=0x0005, t01=0x014c}
0x094a…095e Head {h00=0x0010, h01=0x0050, text=» PERF CONFWR«, t00=0x0005, t01=0x0180}
0x095e…0988 (6, 0, 400) Head {h00=0x0026, h01=0x0050, text=» PERF WRITJT,=W'5' OPEN MES ON JT «, t00=0x0006, t01=0x0004}
0x0988…09a4 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'99'«, t00=0x0006, t01=0x002e}
0x09a4…09c4 Head {h00=0x001c, h01=0x0050, text=» PERF WRITLO,GSWBIN1 FF «, t00=0x0006, t01=0x004a}
0x09c4…09de Head {h00=0x0016, h01=0x0050, text=» PERF WRITLO,CBIN3«, t00=0x0006, t01=0x006a}
0x09de…09f8 Head {h00=0x0016, h01=0x0050, text=» PERF WRITLO,CBIN4«, t00=0x0006, t01=0x0084}
0x09f8…0a12 Head {h00=0x0016, h01=0x0050, text=» PERF WRITLO,CBIN5«, t00=0x0006, t01=0x009e}
0x0a12…0a2c Head {h00=0x0016, h01=0x0050, text=» PERF WRITLO,CBIN6«, t00=0x0006, t01=0x00b8}
0x0a2c…0a46 Head {h00=0x0016, h01=0x0050, text=» PERF WRITLO,CBIN7«, t00=0x0006, t01=0x00d2}
0x0a46…0a60 Head {h00=0x0016, h01=0x0050, text=» PERF WRITLO,CBIN8«, t00=0x0006, t01=0x00ec}
0x0a60…0a7a Head {h00=0x0016, h01=0x0050, text=» PERF WRITLO,CBIN3«, t00=0x0006, t01=0x0106}
0x0a7a…0a8e Head {h00=0x0010, h01=0x0050, text=» SET GTKASSE«, t00=0x0006, t01=0x0120}
0x0a8e…0aa8 Head {h00=0x0016, h01=0x0050, text=» ADD CTASKNR,CBIN1«, t00=0x0006, t01=0x0134}
0x0aa8…0ac4 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'99'«, t00=0x0006, t01=0x014e}
0x0ac4…0ae4 Head {h00=0x001c, h01=0x0050, text=» PERF WRITLO,GSWBIN1 FF «, t00=0x0006, t01=0x016a}
0x0ae4…0aee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x018a}
0x0aee…0afc (7, 0, 400) Head {h00=0x000a, h01=0x0050, text=»RGA120«, t00=0x0007, t01=0x0004}
0x0afc…0b06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0012}
0x0b06…0b2e Head {h00=0x0024, h01=0x0050, text=» PERF INITRG START REGISTRATION «, t00=0x0007, t01=0x001c}
0x0b2e…0b48 Head {h00=0x0016, h01=0x0050, text=» PERF TCLOSE CLOSE«, t00=0x0007, t01=0x0044}
0x0b48…0b5c Head {h00=0x0010, h01=0x0050, text=» BNOK RGA120«, t00=0x0007, t01=0x005e}
0x0b5c…0b70 Head {h00=0x0010, h01=0x0050, text=» PERF LOGCLS«, t00=0x0007, t01=0x0072}
0x0b70…0b8a Head {h00=0x0016, h01=0x0050, text=» SUB CTASKNR,CBIN1«, t00=0x0007, t01=0x0086}
0x0b8a…0b9a Head {h00=0x000c, h01=0x0050, text=» B RGADM«, t00=0x0007, t01=0x00a0}
0x0b9a…0ba8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x00b0}
0x0ba8…0bbc Head {h00=0x0010, h01=0x0050, text=»TCLOSE PROC «, t00=0x0007, t01=0x00be}
0x0bbc…0bd6 Head {h00=0x0016, h01=0x0050, text=» MOVE SPKEY,CBIN2 «, t00=0x0007, t01=0x00d2}
0x0bd6…0be4 Head {h00=0x000a, h01=0x0050, text=»TCL000«, t00=0x0007, t01=0x00ec}
0x0be4…0bfa Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0007, t01=0x00fa}
0x0bfa…0c12 Head {h00=0x0014, h01=0x0050, text=» ATTFMT CLFRM01 «, t00=0x0007, t01=0x0110}
0x0c12…0c26 Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0007, t01=0x0128}
0x0c26…0c4e Head {h00=0x0024, h01=0x0050, text=» IB SPBINW2,TCLMAK,TCLMAK,TCL010«, t00=0x0007, t01=0x013c}
0x0c4e…0c60 Head {h00=0x000e, h01=0x0050, text=» B TCL000 «, t00=0x0007, t01=0x0164}
0x0c60…0c6e Head {h00=0x000a, h01=0x0050, text=»TCL010«, t00=0x0007, t01=0x0176}
0x0c6e…0c88 Head {h00=0x0016, h01=0x0050, text=»* CLEAR FLAGS «, t00=0x0007, t01=0x0184}
0x0c88…0ca0 Head {h00=0x0014, h01=0x0050, text=» CLEAR GTSUMKEY «, t00=0x0008, t01=0x000e}
0x0ca0…0cb8 Head {h00=0x0014, h01=0x0050, text=» CLEAR TTTSTFLG «, t00=0x0008, t01=0x0026}
0x0cb8…0cd0 Head {h00=0x0014, h01=0x0050, text=» CLEAR TTCY0FLG «, t00=0x0008, t01=0x003e}
0x0cd0…0ce8 Head {h00=0x0014, h01=0x0050, text=» CLEAR TTCY5FLG «, t00=0x0008, t01=0x0056}
0x0ce8…0d00 Head {h00=0x0014, h01=0x0050, text=» CLEAR TTCY1FLG «, t00=0x0008, t01=0x006e}
0x0d00…0d18 Head {h00=0x0014, h01=0x0050, text=» CLEAR TTCY2FLG «, t00=0x0008, t01=0x0086}
0x0d18…0d30 Head {h00=0x0014, h01=0x0050, text=» CLEAR TTLSTFLG «, t00=0x0008, t01=0x009e}
0x0d30…0d48 Head {h00=0x0014, h01=0x0050, text=» CLEAR TTPSEFLG «, t00=0x0008, t01=0x00b6}
0x0d48…0d60 Head {h00=0x0014, h01=0x0050, text=» CLEAR TTSUMFLG «, t00=0x0008, t01=0x00ce}
0x0d60…0d78 Head {h00=0x0014, h01=0x0050, text=» CLEAR TTSUPFLG «, t00=0x0008, t01=0x00e6}
0x0d78…0d8e Head {h00=0x0012, h01=0x0050, text=» CLEAR GTCYFLG«, t00=0x0008, t01=0x00fe}
0x0d8e…0da6 Head {h00=0x0014, h01=0x0050, text=» CLEAR GTSUBFLG «, t00=0x0008, t01=0x0114}
0x0da6…0dc2 Head {h00=0x0018, h01=0x0050, text=» MOVE TTSUPMRK,=C' '«, t00=0x0008, t01=0x012c}
0x0dc2…0dde Head {h00=0x0018, h01=0x0050, text=» MOVE TTSUMMRK,=C' '«, t00=0x0008, t01=0x0148}
0x0dde…0df8 Head {h00=0x0016, h01=0x0050, text=» MOVE GTTEXT,=C' '«, t00=0x0008, t01=0x0164}
0x0df8…0e12 Head {h00=0x0016, h01=0x0050, text=» MOVE GTSUM,=D'0' «, t00=0x0008, t01=0x017e}
0x0e12…0e26 Head {h00=0x0010, h01=0x0050, text=» WAIT KVOUCH«, t00=0x0009, t01=0x0008}
0x0e26…0e40 Head {h00=0x0016, h01=0x0050, text=» DSC0 KVOUCH,RLEAS«, t00=0x0009, t01=0x001c}
0x0e40…0e6c Head {h00=0x0028, h01=0x0050, text=»* TR12 ACCUMULATORS«, t00=0x0009, t01=0x0036}
0x0e6c…0e88 Head {h00=0x0018, h01=0x0050, text=» MOVE GTREGNR,=D'2' «, t00=0x0009, t01=0x0062}
0x0e88…0ea4 Head {h00=0x0018, h01=0x0050, text=» MOVE GTREGDEX,CBIN2«, t00=0x0009, t01=0x007e}
0x0ea4…0eb8 Head {h00=0x0010, h01=0x0050, text=» PERF PACKCL«, t00=0x0009, t01=0x009a}
0x0eb8…0ed4 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'99'«, t00=0x0009, t01=0x00ae}
0x0ed4…0ef4 Head {h00=0x001c, h01=0x0050, text=» PERF WRITLO,GSWBIN1 FF «, t00=0x0009, t01=0x00ca}
0x0ef4…0f1c Head {h00=0x0024, h01=0x0050, text=» PERF WRITLO,CBIN9 KASSE LUKNING«, t00=0x0009, t01=0x00ea}
0x0f1c…0f4c Head {h00=0x002c, h01=0x0050, text=» MOVE GSWBIN1,=W'30' AUTOMATPOSTERINGER «, t00=0x0009, t01=0x0112}
0x0f4c…0f68 Head {h00=0x0018, h01=0x0050, text=» PERF WRITLO,GSWBIN1«, t00=0x0009, t01=0x0142}
0x0f68…0f84 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN1 «, t00=0x0009, t01=0x015e}
0x0f84…0f92 Head {h00=0x000a, h01=0x0050, text=»TCL025«, t00=0x0009, t01=0x017a}
0x0f92…0fb6 Head {h00=0x0020, h01=0x0050, text=» MOVE GTDUPF(GSWBIN1),=X'FF'«, t00=0x0009, t01=0x0188}
0x0fb6…0fd0 Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN1,CBIN1«, t00=0x000a, t01=0x001c}
0x0fd0…0ff4 Head {h00=0x0020, h01=0x0050, text=» CBL GSWBIN1,CBINMAX,TCL025 «, t00=0x000a, t01=0x0036}
0x0ff4…1010 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD5,=D'0' «, t00=0x000a, t01=0x005a}
0x1010…101e Head {h00=0x000a, h01=0x0050, text=»TCL030«, t00=0x000a, t01=0x0076}
0x101e…1040 Head {h00=0x001e, h01=0x0050, text=» ADD GSWBCD5,=D'1' ACC NR «, t00=0x000a, t01=0x0084}
0x1040…104e Head {h00=0x000a, h01=0x0050, text=»TCL035«, t00=0x000a, t01=0x00a6}
0x104e…1074 Head {h00=0x0022, h01=0x0050, text=» MOVE GSWBIN5,GSWBCD5 CONVERT «, t00=0x000a, t01=0x00b4}
0x1074…10a2 Head {h00=0x002a, h01=0x0050, text=» CBG GSWBIN5,CTR12(GTUWB,CBIN2),TCL100«, t00=0x000a, t01=0x00da}
0x10a2…10ca Head {h00=0x0024, h01=0x0050, text=» ADD GSWBIN5,CTR12(GTUWB,CBIN1) «, t00=0x000a, t01=0x0108}
0x10ca…10f6 Head {h00=0x0028, h01=0x0050, text=» MOVE GTDUPF(CBIN1),CTR12NR(GSWBIN5)«, t00=0x000a, t01=0x0130}
0x10f6…111e Head {h00=0x0024, h01=0x0050, text=» CBE GTDUPF(CBIN1),=D'0',TCL030 «, t00=0x000a, t01=0x015c}
0x111e…1150 Head {h00=0x002e, h01=0x0050, text=» MOVE GTUSED(CBIN1),CBIN5 INDICATE UPDATED«, t00=0x000a, t01=0x0184}
0x1150…1182 Head {h00=0x002e, h01=0x0050, text=» MOVE GTDUPF(CBIN4),C12ACC(GSWBIN5,CBIN1) «, t00=0x000b, t01=0x0026}
0x1182…11aa Head {h00=0x0024, h01=0x0050, text=» CBE GTDUPF(CBIN4),=D'0',TCL040 «, t00=0x000b, t01=0x0058}
0x11aa…11cc Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN4),=W'-8'«, t00=0x000b, t01=0x0080}
0x11cc…11f6 Head {h00=0x0026, h01=0x0050, text=» MOVE GSWSTR20,=C'EJ-EDB T[LLER ' «, t00=0x000b, t01=0x00a2}
0x11f6…1214 Head {h00=0x001a, h01=0x0050, text=» MOVE GTWBCD1,GSWBCD5 «, t00=0x000b, t01=0x00cc}
0x1214…1248 Head {h00=0x0030, h01=0x0050, text=» PERF TR2GEN,CBIN1 GENERATE TR2 WITH KREDIT «, t00=0x000b, t01=0x00ea}
0x1248…125c Head {h00=0x0010, h01=0x0050, text=» BNOK TCL035«, t00=0x000b, t01=0x011e}
0x125c…126a Head {h00=0x000a, h01=0x0050, text=»TCL040«, t00=0x000b, t01=0x0132}
0x126a…1288 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN5,GSWBCD5 «, t00=0x000b, t01=0x0140}
0x1288…12b0 Head {h00=0x0024, h01=0x0050, text=» ADD GSWBIN5,CTR12(GTUWB,CBIN1) «, t00=0x000b, t01=0x015e}
0x12b0…12e2 Head {h00=0x002e, h01=0x0050, text=» MOVE GTDUPF(CBIN4),C12ACC(GSWBIN5,CBIN2) «, t00=0x000b, t01=0x0186}
0x12e2…130a Head {h00=0x0024, h01=0x0050, text=» CBE GTDUPF(CBIN4),=D'0',TCL030 «, t00=0x000c, t01=0x0028}
0x130a…132c Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN4),=W'-8'«, t00=0x000c, t01=0x0050}
0x132c…1356 Head {h00=0x0026, h01=0x0050, text=» MOVE GSWSTR20,=C'EJ-EDB T[LLER ' «, t00=0x000c, t01=0x0072}
0x1356…1374 Head {h00=0x001a, h01=0x0050, text=» MOVE GTWBCD1,GSWBCD5 «, t00=0x000c, t01=0x009c}
0x1374…13a6 Head {h00=0x002e, h01=0x0050, text=» PERF TR2GEN,CBIN2 GENERATE TR2 WITH DEBET«, t00=0x000c, t01=0x00ba}
0x13a6…13ba Head {h00=0x0010, h01=0x0050, text=» BNOK TCL040«, t00=0x000c, t01=0x00ec}
0x13ba…13cc Head {h00=0x000e, h01=0x0050, text=» B TCL030 «, t00=0x000c, t01=0x0100}
0x13cc…13da Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x0112}
0x13da…13e8 Head {h00=0x000a, h01=0x0050, text=»TCL100«, t00=0x000c, t01=0x0120}
0x13e8…140a Head {h00=0x001e, h01=0x0050, text=» MOVE GSWSTR9,=C'TOTAL '«, t00=0x000c, t01=0x012e}
0x140a…1424 Head {h00=0x0016, h01=0x0050, text=» PERF CLEJ EJ EDB «, t00=0x000c, t01=0x0150}
0x1424…1440 Head {h00=0x0018, h01=0x0050, text=» MOVE TTEJEDB,=D'0' «, t00=0x000c, t01=0x016a}
0x1440…144e Head {h00=0x000a, h01=0x0050, text=»TCL205«, t00=0x000c, t01=0x0186}
0x144e…1466 (13, 0, 400) Head {h00=0x0014, h01=0x0050, text=» CASH MOVEMENT«, t00=0x000d, t01=0x0004}
0x1466…1494 Head {h00=0x002a, h01=0x0050, text=» MOVE GTDUPF(CBIN1),TTCASHAC ACCOUNTNR«, t00=0x000d, t01=0x001c}
0x1494…14c4 Head {h00=0x002c, h01=0x0050, text=» MOVE GTDUPF(CBIN4),TTCASH CURRENT CASH «, t00=0x000d, t01=0x004a}
0x14c4…14f4 Head {h00=0x002c, h01=0x0050, text=» SUB GTDUPF(CBIN4),TTSTCASH INITIAL CASH«, t00=0x000d, t01=0x007a}
0x14f4…1516 Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN1),CBIN5 «, t00=0x000d, t01=0x00aa}
0x1516…1538 Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN4),=W'-8'«, t00=0x000d, t01=0x00cc}
0x1538…1560 Head {h00=0x0024, h01=0x0050, text=» MOVE GSWSTR20,=C'KASSE-KONTO ' «, t00=0x000d, t01=0x00ee}
0x1560…157c Head {h00=0x0018, h01=0x0050, text=» MOVE GTWBCD1,=D'0' «, t00=0x000d, t01=0x0116}
0x157c…1590 Head {h00=0x0010, h01=0x0050, text=» SET GTTFLG «, t00=0x000d, t01=0x0132}
0x1590…15aa Head {h00=0x0016, h01=0x0050, text=» PERF TR2GEN,CBIN0«, t00=0x000d, t01=0x0146}
0x15aa…15be Head {h00=0x0010, h01=0x0050, text=» BNOK TCL205«, t00=0x000d, t01=0x0160}
0x15be…15da Head {h00=0x0018, h01=0x0050, text=» TBF CCLKTFLG,TCL230«, t00=0x000d, t01=0x0174}
0x15da…15fe Head {h00=0x0020, h01=0x0050, text=» PERF KORT ASK FOR KONTOKORT«, t00=0x000d, t01=0x0190}
0x15fe…160c Head {h00=0x000a, h01=0x0050, text=»TCL230«, t00=0x000e, t01=0x0024}
0x160c…162e Head {h00=0x001e, h01=0x0050, text=» CBE TVERSUR,=D'0',TCL235 «, t00=0x000e, t01=0x0032}
0x162e…165c Head {h00=0x002a, h01=0x0050, text=» MOVE GTDUPF(CBIN1),TVERSUR REMIT ACC «, t00=0x000e, t01=0x0054}
0x165c…168a Head {h00=0x002a, h01=0x0050, text=» MOVE GTDUPF(CBIN4),TTACC(CBIN6,CBIN1)«, t00=0x000e, t01=0x0082}
0x168a…16b8 Head {h00=0x002a, h01=0x0050, text=» ADD GTDUPF(CBIN4),TTACC(CBIN6,CBIN2) «, t00=0x000e, t01=0x00b0}
0x16b8…16e0 Head {h00=0x0024, h01=0x0050, text=» CBE GTDUPF(CBIN4),=D'0',TCL235 «, t00=0x000e, t01=0x00de}
0x16e0…1702 Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN1),CBIN5 «, t00=0x000e, t01=0x0106}
0x1702…1724 Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN4),=W'-8'«, t00=0x000e, t01=0x0128}
0x1724…1746 Head {h00=0x001e, h01=0x0050, text=» MUL GTDUPF(CBIN4),=D'-1' «, t00=0x000e, t01=0x014a}
0x1746…1776 Head {h00=0x002c, h01=0x0050, text=» MOVE GSWSTR20,=C'VERSUR KONTONR REMIT '«, t00=0x000e, t01=0x016c}
0x1776…1792 Head {h00=0x0018, h01=0x0050, text=» MOVE GTWBCD1,=D'0' «, t00=0x000f, t01=0x000c}
0x1792…17ac Head {h00=0x0016, h01=0x0050, text=» PERF TR2GEN,CBIN0«, t00=0x000f, t01=0x0028}
0x17ac…17c0 Head {h00=0x0010, h01=0x0050, text=» BNOK TCL230«, t00=0x000f, t01=0x0042}
0x17c0…17dc Head {h00=0x0018, h01=0x0050, text=» TBF CCLKTFLG,TCL235«, t00=0x000f, t01=0x0056}
0x17dc…17ee Head {h00=0x000e, h01=0x0050, text=» PERF KORT«, t00=0x000f, t01=0x0072}
0x17ee…17f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0084}
0x17f8…182c Head {h00=0x0030, h01=0x0050, text=»* WRITING OF DISC JOURNAL AND VOUCHER «, t00=0x000f, t01=0x008e}
0x182c…1836 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00c2}
0x1836…1844 Head {h00=0x000a, h01=0x0050, text=»TCL235«, t00=0x000f, t01=0x00cc}
0x1844…1866 Head {h00=0x001e, h01=0x0050, text=» MOVE GSWSTR9,=C'TOTAL '«, t00=0x000f, t01=0x00da}
0x1866…187a Head {h00=0x0010, h01=0x0050, text=» PERF CLEDB «, t00=0x000f, t01=0x00fc}
0x187a…1884 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0110}
0x1884…18a2 Head {h00=0x001a, h01=0x0050, text=»* BEHOLDNINGST[LLERE «, t00=0x000f, t01=0x011a}
0x18a2…18ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0138}
0x18ac…18c0 Head {h00=0x0010, h01=0x0050, text=» PERF CLBEH «, t00=0x000f, t01=0x0142}
0x18c0…18ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0156}
0x18ca…18e8 Head {h00=0x001a, h01=0x0050, text=» MOVE TTSTCASH,TTCASH «, t00=0x000f, t01=0x0160}
0x18e8…1906 Head {h00=0x001a, h01=0x0050, text=» MOVE TTSTLBNR,TTLBNR «, t00=0x000f, t01=0x017e}
0x1906…1922 Head {h00=0x0018, h01=0x0050, text=» ADD TTSTLBNR,=D'1' «, t00=0x0010, t01=0x000c}
0x1922…1954 Head {h00=0x002e, h01=0x0050, text=» MUL TTSTLBNR,=D'-1' SET NEGATIVE (CLOSE) «, t00=0x0010, t01=0x0028}
0x1954…198a Head {h00=0x0032, h01=0x0050, text=» MUL CMASK(GTUWB),=D'-1' SET CMASK < 0, CLOSE «, t00=0x0010, t01=0x005a}
0x198a…19a0 Head {h00=0x0012, h01=0x0050, text=» CLEAR GTTFLG «, t00=0x0010, t01=0x0090}
0x19a0…19ae Head {h00=0x000a, h01=0x0050, text=»TCL550«, t00=0x0010, t01=0x00a6}
0x19ae…19cc Head {h00=0x001a, h01=0x0050, text=» MOVE TTRECOPN,CRECBCD«, t00=0x0010, t01=0x00b4}
0x19cc…19de Head {h00=0x000e, h01=0x0050, text=» PERF ZERO«, t00=0x0010, t01=0x00d2}
0x19de…1a12 Head {h00=0x0030, h01=0x0050, text=» PERF TCONFW,GTUWB STORE NEW INITIAL VALUES «, t00=0x0010, t01=0x00e4}
0x1a12…1a26 Head {h00=0x0010, h01=0x0050, text=» PERF CONFWR«, t00=0x0010, t01=0x0118}
0x1a26…1a3a Head {h00=0x0010, h01=0x0050, text=» BNOK TCL550«, t00=0x0010, t01=0x012c}
0x1a3a…1a50 Head {h00=0x0012, h01=0x0050, text=» CLEAR GTKASSE«, t00=0x0010, t01=0x0140}
0x1a50…1a6e Head {h00=0x001a, h01=0x0050, text=»* ZERONIZE COUNTERS «, t00=0x0010, t01=0x0156}
0x1a6e…1a8c Head {h00=0x001a, h01=0x0050, text=»* TRANS 12 COUNTERS «, t00=0x0010, t01=0x0174}
0x1a8c…1aa8 (17, 0, 400) Head {h00=0x0018, h01=0x0050, text=» MOVE GSWSTR20,=C'*'«, t00=0x0011, t01=0x0004}
0x1aa8…1ac4 Head {h00=0x0018, h01=0x0050, text=» PERF WRITJT,=W'12' «, t00=0x0011, t01=0x0020}
0x1ac4…1ae0 Head {h00=0x0018, h01=0x0050, text=» PERF WRITLO,CBIN15 «, t00=0x0011, t01=0x003c}
0x1ae0…1afc Head {h00=0x0018, h01=0x0050, text=» MOVE GTEJBUF,=X'00'«, t00=0x0011, t01=0x0058}
0x1afc…1b26 Head {h00=0x0026, h01=0x0050, text=» PERF LOWRIT,CBIN3 CLOSE SPOOLFILE«, t00=0x0011, t01=0x0074}
0x1b26…1b44 Head {h00=0x001a, h01=0x0050, text=» CMP CBIN0,CBIN0 DUMMY«, t00=0x0011, t01=0x009e}
0x1b44…1b50 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0011, t01=0x00bc}
0x1b50…1b5e Head {h00=0x000a, h01=0x0050, text=»TCLMAK«, t00=0x0011, t01=0x00c8}
0x1b5e…1b76 Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN1«, t00=0x0011, t01=0x00d6}
0x1b76…1b82 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0011, t01=0x00ee}
0x1b82…1b90 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0011, t01=0x00fa}
0x1b90…1b9e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x0108}
0x1b9e…1bac Head {h00=0x000a, h01=0x0050, text=»RGA200«, t00=0x0011, t01=0x0116}
0x1bac…1be4 Head {h00=0x0034, h01=0x0050, text=»************************************************«, t00=0x0011, t01=0x0124}
0x1be4…1bee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x015c}
0x1bee…1c26 Head {h00=0x0034, h01=0x0050, text=»* PERFORM OF SELECTED ADM ROUTINE«, t00=0x0011, t01=0x0166}
0x1c26…1c30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x000e}
0x1c30…1c6a Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x0012, t01=0x0018}
0x1c6a…1c74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0052}
0x1c74…1c92 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GSWBCD3 «, t00=0x0012, t01=0x005c}
0x1c92…1cac Head {h00=0x0016, h01=0x0050, text=» PERF ADM,GSWBIN1 «, t00=0x0012, t01=0x007a}
0x1cac…1cbc Head {h00=0x000c, h01=0x0050, text=» B RGADM«, t00=0x0012, t01=0x0094}
0x1cbc…1cca Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x00a4}
0x1cca…1cdc Head {h00=0x000e, h01=0x0050, text=»ZERO PROC «, t00=0x0012, t01=0x00b2}
0x1cdc…1ce6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00c4}
0x1ce6…1d04 Head {h00=0x001a, h01=0x0050, text=»* ZERONIZE COUNTERS «, t00=0x0012, t01=0x00ce}
0x1d04…1d22 Head {h00=0x001a, h01=0x0050, text=»* TRANS 12 COUNTERS «, t00=0x0012, t01=0x00ec}
0x1d22…1d4a Head {h00=0x0024, h01=0x0050, text=» MOVE GSWBIN1,CTR12(GTUWB,CBIN1)«, t00=0x0012, t01=0x010a}
0x1d4a…1d68 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN2,GSWBIN1 «, t00=0x0012, t01=0x0132}
0x1d68…1d90 Head {h00=0x0024, h01=0x0050, text=» ADD GSWBIN2,CTR12(GTUWB,CBIN2) «, t00=0x0012, t01=0x0150}
0x1d90…1d9e Head {h00=0x000a, h01=0x0050, text=»TCL610«, t00=0x0012, t01=0x0178}
0x1d9e…1db8 Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN1,CBIN1«, t00=0x0012, t01=0x0186}
0x1db8…1ddc Head {h00=0x0020, h01=0x0050, text=» CBG GSWBIN1,GSWBIN2,TCL615 «, t00=0x0013, t01=0x0010}
0x1ddc…1e06 Head {h00=0x0026, h01=0x0050, text=» MOVE C12ACC(GSWBIN1,CBIN1),=D'0' «, t00=0x0013, t01=0x0034}
0x1e06…1e30 Head {h00=0x0026, h01=0x0050, text=» MOVE C12ACC(GSWBIN1,CBIN2),=D'0' «, t00=0x0013, t01=0x005e}
0x1e30…1e42 Head {h00=0x000e, h01=0x0050, text=» B TCL610 «, t00=0x0013, t01=0x0088}
0x1e42…1e50 Head {h00=0x000a, h01=0x0050, text=»TCL615«, t00=0x0013, t01=0x009a}
0x1e50…1e68 Head {h00=0x0014, h01=0x0050, text=»* ACCUMULATORS«, t00=0x0013, t01=0x00a8}
0x1e68…1e84 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN0 «, t00=0x0013, t01=0x00c0}
0x1e84…1e92 Head {h00=0x000a, h01=0x0050, text=»TCL620«, t00=0x0013, t01=0x00dc}
0x1e92…1eac Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN1,CBIN1«, t00=0x0013, t01=0x00ea}
0x1eac…1ed4 Head {h00=0x0024, h01=0x0050, text=» MOVE TTACC(GSWBIN1,CBIN1),=D'0'«, t00=0x0013, t01=0x0104}
0x1ed4…1efc Head {h00=0x0024, h01=0x0050, text=» MOVE TTACC(GSWBIN1,CBIN2),=D'0'«, t00=0x0013, t01=0x012c}
0x1efc…1f1e Head {h00=0x001e, h01=0x0050, text=» CBL GSWBIN1,CBIN8,TCL620 «, t00=0x0013, t01=0x0154}
0x1f1e…1f2a Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0013, t01=0x0176}
0x1f2a…1f38 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0013, t01=0x0182}
0x1f38…1f46 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x0190}
0x1f46…1f58 Head {h00=0x000e, h01=0x0050, text=»CLEJ PROC «, t00=0x0014, t01=0x000e}
0x1f58…1f96 Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x0014, t01=0x0020}
0x1f96…1fa0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x005e}
0x1fa0…1fd2 Head {h00=0x002e, h01=0x0050, text=»* NOW ALL ACCUMULATORS NOT = 0«, t00=0x0014, t01=0x0068}
0x1fd2…1ffc Head {h00=0x0026, h01=0x0050, text=»* HAS BEEN REGISTRATED«, t00=0x0014, t01=0x009a}
0x1ffc…2032 Head {h00=0x0032, h01=0x0050, text=»* A VOUCHER PRINT OF ALL TR12 ACC «, t00=0x0014, t01=0x00c4}
0x2032…2058 Head {h00=0x0022, h01=0x0050, text=»* IS NOW PERFORMED«, t00=0x0014, t01=0x00fa}
0x2058…2062 Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0014, t01=0x0120}
0x2062…20a2 Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0014, t01=0x012a}
0x20a2…20be Head {h00=0x0018, h01=0x0050, text=» MOVE TTLINNR,=D'25'«, t00=0x0014, t01=0x016a}
0x20be…20e6 Head {h00=0x0024, h01=0x0050, text=» MOVE GSWSTR20,='EJ-EDB T[LLER '«, t00=0x0014, t01=0x0186}
0x20e6…210a Head {h00=0x0020, h01=0x0050, text=» PERF WRITLO,CBIN3 'ASTERIX'«, t00=0x0015, t01=0x001e}
0x210a…212e Head {h00=0x0020, h01=0x0050, text=» PERF WRITLO,CBIN15 'EJ EDB'«, t00=0x0015, t01=0x0042}
0x212e…215c Head {h00=0x002a, h01=0x0050, text=» CBE CTR12(GTUWB,CBIN2),CBIN0,TCLEJRET«, t00=0x0015, t01=0x0066}
0x215c…217a Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR20,CBLANKS«, t00=0x0015, t01=0x0094}
0x217a…2194 Head {h00=0x0016, h01=0x0050, text=» PERF WAHEAD,CBIN8«, t00=0x0015, t01=0x00b2}
0x2194…21b6 Head {h00=0x001e, h01=0x0050, text=» PERF WRITLO,CBIN18 HEADER«, t00=0x0015, t01=0x00cc}
0x21b6…21d2 Head {h00=0x0018, h01=0x0050, text=» PERF WRITLO,CBIN3 *«, t00=0x0015, t01=0x00ee}
0x21d2…21ee Head {h00=0x0018, h01=0x0050, text=» PERF WRITLO,CBIN20 «, t00=0x0015, t01=0x010a}
0x21ee…220a Head {h00=0x0018, h01=0x0050, text=» MOVE GTWBCD1,=D'0' «, t00=0x0015, t01=0x0126}
0x220a…2218 Head {h00=0x000a, h01=0x0050, text=»TCL110«, t00=0x0015, t01=0x0142}
0x2218…2232 Head {h00=0x0016, h01=0x0050, text=» ADD GTWBCD1,=D'1'«, t00=0x0015, t01=0x0150}
0x2232…2258 Head {h00=0x0022, h01=0x0050, text=» MOVE GSWBIN5,GTWBCD1 CONVERT «, t00=0x0015, t01=0x016a}
0x2258…2286 Head {h00=0x002a, h01=0x0050, text=» CBG GSWBIN5,CTR12(GTUWB,CBIN2),TCL200«, t00=0x0015, t01=0x0190}
0x2286…22ae Head {h00=0x0024, h01=0x0050, text=» ADD GSWBIN5,CTR12(GTUWB,CBIN1) «, t00=0x0016, t01=0x002e}
0x22ae…22e0 Head {h00=0x002e, h01=0x0050, text=» MOVE GTDUPF(CBIN4),C12ACC(GSWBIN5,CBIN1) «, t00=0x0016, t01=0x0056}
0x22e0…2310 Head {h00=0x002c, h01=0x0050, text=» ADD GTDUPF(CBIN4),C12ACC(GSWBIN5,CBIN2)«, t00=0x0016, t01=0x0088}
0x2310…233c Head {h00=0x0028, h01=0x0050, text=» MOVE GTDUPF(CBIN1),CTR12NR(GSWBIN5)«, t00=0x0016, t01=0x00b8}
0x233c…2364 Head {h00=0x0024, h01=0x0050, text=» CBE GTDUPF(CBIN1),=D'0',TCL110 «, t00=0x0016, t01=0x00e4}
0x2364…2386 Head {h00=0x001e, h01=0x0050, text=» CBG TTLINNR,=D'0',TCL190 «, t00=0x0016, t01=0x010c}
0x2386…23a0 Head {h00=0x0016, h01=0x0050, text=» DSC0 KVOUCH,RLEAS«, t00=0x0016, t01=0x012e}
0x23a0…23bc Head {h00=0x0018, h01=0x0050, text=» MOVE TTLINNR,=D'25'«, t00=0x0016, t01=0x0148}
0x23bc…23d6 Head {h00=0x0016, h01=0x0050, text=» PERF WAHEAD,CBIN8«, t00=0x0016, t01=0x0164}
0x23d6…23e4 Head {h00=0x000a, h01=0x0050, text=»TCL190«, t00=0x0016, t01=0x017e}
0x23e4…23fe Head {h00=0x0016, h01=0x0050, text=» PERF WALINE,CBIN9«, t00=0x0016, t01=0x018c}
0x23fe…241a Head {h00=0x0018, h01=0x0050, text=» PERF WRITLO,CBIN21 «, t00=0x0017, t01=0x0016}
0x241a…242c Head {h00=0x000e, h01=0x0050, text=» B TCL110 «, t00=0x0017, t01=0x0032}
0x242c…243a Head {h00=0x000a, h01=0x0050, text=»TCL200«, t00=0x0017, t01=0x0044}
0x243a…2454 Head {h00=0x0016, h01=0x0050, text=» DSC0 KVOUCH,RLEAS«, t00=0x0017, t01=0x0052}
0x2454…2464 Head {h00=0x000c, h01=0x0050, text=»TCLEJRET«, t00=0x0017, t01=0x006c}
0x2464…2470 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0017, t01=0x007c}
0x2470…247e Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0017, t01=0x0088}
0x247e…248c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0017, t01=0x0096}
0x248c…249e Head {h00=0x000e, h01=0x0050, text=»CLEDB PROC«, t00=0x0017, t01=0x00a4}
0x249e…24a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00b6}
0x24a8…24dc Head {h00=0x0030, h01=0x0050, text=»* WRITING OF DISC JOURNAL AND VOUCHER «, t00=0x0017, t01=0x00c0}
0x24dc…24e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00f4}
0x24e6…250e Head {h00=0x0024, h01=0x0050, text=» MOVE GSWSTR20,=C'EDB-T[LLERE ' «, t00=0x0017, t01=0x00fe}
0x250e…2528 Head {h00=0x0016, h01=0x0050, text=» PERF WRITJT,=W'6'«, t00=0x0017, t01=0x0126}
0x2528…2542 Head {h00=0x0016, h01=0x0050, text=» PERF WAHEAD,CBIN8«, t00=0x0017, t01=0x0140}
0x2542…255e Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'99'«, t00=0x0017, t01=0x015a}
0x255e…257e Head {h00=0x001c, h01=0x0050, text=» PERF WRITLO,GSWBIN1 FF «, t00=0x0017, t01=0x0176}
0x257e…259a Head {h00=0x0018, h01=0x0050, text=» PERF WRITLO,CBIN18 «, t00=0x0018, t01=0x0008}
0x259a…25b6 Head {h00=0x0018, h01=0x0050, text=» PERF WRITLO,CBIN3 *«, t00=0x0018, t01=0x0024}
0x25b6…25d2 Head {h00=0x0018, h01=0x0050, text=» PERF WRITLO,CBIN20 «, t00=0x0018, t01=0x0040}
0x25d2…25ee Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD5,=D'0' «, t00=0x0018, t01=0x005c}
0x25ee…2616 Head {h00=0x0024, h01=0x0050, text=» MOVE GTREGF(CBIN1),=D'0' TOTAL «, t00=0x0018, t01=0x0078}
0x2616…2638 Head {h00=0x001e, h01=0x0050, text=» MOVE GTREGF(CBIN2),=D'0' «, t00=0x0018, t01=0x00a0}
0x2638…2646 Head {h00=0x000a, h01=0x0050, text=»TCL240«, t00=0x0018, t01=0x00c2}
0x2646…2662 Head {h00=0x0018, h01=0x0050, text=» TBT GTSPGFLG,TCL242«, t00=0x0018, t01=0x00d0}
0x2662…267e Head {h00=0x0018, h01=0x0050, text=» MOVE GTREGNR,=D'11'«, t00=0x0018, t01=0x00ec}
0x267e…268c Head {h00=0x000a, h01=0x0050, text=»TCL242«, t00=0x0018, t01=0x0108}
0x268c…26a6 Head {h00=0x0016, h01=0x0050, text=» ADD GSWBCD5,=D'1'«, t00=0x0018, t01=0x0116}
0x26a6…26b4 Head {h00=0x000a, h01=0x0050, text=»TCL245«, t00=0x0018, t01=0x0130}
0x26b4…26d2 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN5,GSWBCD5 «, t00=0x0018, t01=0x013e}
0x26d2…26f4 Head {h00=0x001e, h01=0x0050, text=» CBG GSWBIN5,CBIN6,TCL300 «, t00=0x0018, t01=0x015c}
0x26f4…2724 Head {h00=0x002c, h01=0x0050, text=» ADD GTREGF(CBIN1),TTACC(GSWBIN5,CBIN1) «, t00=0x0018, t01=0x017e}
0x2724…2754 Head {h00=0x002c, h01=0x0050, text=» ADD GTREGF(CBIN2),TTACC(GSWBIN5,CBIN2) «, t00=0x0019, t01=0x001e}
0x2754…2776 Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN4),CBIN0 «, t00=0x0019, t01=0x004e}
0x2776…27a6 Head {h00=0x002c, h01=0x0050, text=» MOVE GTDUPF(CBIN4),TTACC(GSWBIN5,CBIN1)«, t00=0x0019, t01=0x0070}
0x27a6…27d6 Head {h00=0x002c, h01=0x0050, text=» ADD GTDUPF(CBIN4),TTACC(GSWBIN5,CBIN2) «, t00=0x0019, t01=0x00a0}
0x27d6…2806 Head {h00=0x002c, h01=0x0050, text=» MOVE GTDUPF(CBIN6),TTACC(GSWBIN5,CBIN1)«, t00=0x0019, t01=0x00d0}
0x2806…283c Head {h00=0x0032, h01=0x0050, text=» MOVE GTDUPF(CBIN5),TTACC(GSWBIN5,CBIN2) DEBET«, t00=0x0019, t01=0x0100}
0x283c…2858 Head {h00=0x0018, h01=0x0050, text=» TBT GTSPGFLG,TCL290«, t00=0x0019, t01=0x0136}
0x2858…287c Head {h00=0x0020, h01=0x0050, text=» MOVE GTUSED(CBIN6),=W'-53' «, t00=0x0019, t01=0x0152}
0x287c…28a0 Head {h00=0x0020, h01=0x0050, text=» MOVE GTUSED(CBIN5),=W'-52' «, t00=0x0019, t01=0x0176}
0x28a0…28c4 Head {h00=0x0020, h01=0x0050, text=» MOVE GTDUPF(CBIN1),GSWBCD5 «, t00=0x001a, t01=0x000a}
0x28c4…28e6 Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN1),=W'50'«, t00=0x001a, t01=0x002e}
0x28e6…2916 Head {h00=0x002c, h01=0x0050, text=» MOVE GTDUPF(CBIN2),=D'2' MARK FOR TOTAL«, t00=0x001a, t01=0x0050}
0x2916…2938 Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN2),=W'51'«, t00=0x001a, t01=0x0080}
0x2938…294a Head {h00=0x000e, h01=0x0050, text=» PERF CRKJ«, t00=0x001a, t01=0x00a2}
0x294a…295e Head {h00=0x0010, h01=0x0050, text=» PERF WRITFD«, t00=0x001a, t01=0x00b4}
0x295e…2972 Head {h00=0x0010, h01=0x0050, text=» BNOK TCL245«, t00=0x001a, t01=0x00c8}
0x2972…2980 Head {h00=0x000a, h01=0x0050, text=»TCL290«, t00=0x001a, t01=0x00dc}
0x2980…29a6 Head {h00=0x0022, h01=0x0050, text=» MOVE GSWBIN5,GSWBCD5 RESTORE «, t00=0x001a, t01=0x00ea}
0x29a6…29c4 Head {h00=0x001a, h01=0x0050, text=» MOVE GTWBCD1,GSWBCD5 «, t00=0x001a, t01=0x0110}
0x29c4…29de Head {h00=0x0016, h01=0x0050, text=» PERF WRITJT,=W'7'«, t00=0x001a, t01=0x012e}
0x29de…29fa Head {h00=0x0018, h01=0x0050, text=» PERF WALINE,CBIN10 «, t00=0x001a, t01=0x0148}
0x29fa…2a16 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'34'«, t00=0x001a, t01=0x0164}
0x2a16…2a32 Head {h00=0x0018, h01=0x0050, text=» PERF WRITLO,GSWBIN1«, t00=0x001a, t01=0x0180}
0x2a32…2a44 Head {h00=0x000e, h01=0x0050, text=» B TCL240 «, t00=0x001b, t01=0x000c}
0x2a44…2a52 Head {h00=0x000a, h01=0x0050, text=»TCL300«, t00=0x001b, t01=0x001e}
0x2a52…2a66 Head {h00=0x0010, h01=0x0050, text=» PERF PACKCL«, t00=0x001b, t01=0x002c}
0x2a66…2a90 Head {h00=0x0026, h01=0x0050, text=» MOVE GTDUPF(CBIN4),GTREGF(CBIN1) «, t00=0x001b, t01=0x0040}
0x2a90…2ab8 Head {h00=0x0024, h01=0x0050, text=» ADD GTDUPF(CBIN4),GTREGF(CBIN2)«, t00=0x001b, t01=0x006a}
0x2ab8…2ae6 Head {h00=0x002a, h01=0x0050, text=» MOVE GTDUPF(CBIN5),TTACC(CBIN8,CBIN1)«, t00=0x001b, t01=0x0092}
0x2ae6…2b14 Head {h00=0x002a, h01=0x0050, text=» ADD GTDUPF(CBIN5),TTACC(CBIN8,CBIN2) «, t00=0x001b, t01=0x00c0}
0x2b14…2b30 Head {h00=0x0018, h01=0x0050, text=» PERF WALINE,CBIN11 «, t00=0x001b, t01=0x00ee}
0x2b30…2b4c Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'35'«, t00=0x001b, t01=0x010a}
0x2b4c…2b68 Head {h00=0x0018, h01=0x0050, text=» PERF WRITLO,GSWBIN1«, t00=0x001b, t01=0x0126}
0x2b68…2b84 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'36'«, t00=0x001b, t01=0x0142}
0x2b84…2ba0 Head {h00=0x0018, h01=0x0050, text=» PERF WRITLO,GSWBIN1«, t00=0x001b, t01=0x015e}
0x2ba0…2bbc Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'37'«, t00=0x001b, t01=0x017a}
0x2bbc…2bd8 Head {h00=0x0018, h01=0x0050, text=» PERF WRITLO,GSWBIN1«, t00=0x001c, t01=0x0008}
0x2bd8…2c06 Head {h00=0x002a, h01=0x0050, text=» MOVE GTDUPF(CBIN5),TTACC(CBIN1,CBIN1)«, t00=0x001c, t01=0x0024}
0x2c06…2c34 Head {h00=0x002a, h01=0x0050, text=» MOVE GTDUPF(CBIN6),TTACC(CBIN1,CBIN2)«, t00=0x001c, t01=0x0052}
0x2c34…2c50 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN1 «, t00=0x001c, t01=0x0080}
0x2c50…2c5e Head {h00=0x000a, h01=0x0050, text=»TCL310«, t00=0x001c, t01=0x009c}
0x2c5e…2c78 Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN1,CBIN1«, t00=0x001c, t01=0x00aa}
0x2c78…2c9a Head {h00=0x001e, h01=0x0050, text=» CBG GSWBIN1,CBIN4,TCL320 «, t00=0x001c, t01=0x00c4}
0x2c9a…2cca Head {h00=0x002c, h01=0x0050, text=» ADD GTDUPF(CBIN5),TTACC(GSWBIN1,CBIN1) «, t00=0x001c, t01=0x00e6}
0x2cca…2cfa Head {h00=0x002c, h01=0x0050, text=» ADD GTDUPF(CBIN6),TTACC(GSWBIN1,CBIN2) «, t00=0x001c, t01=0x0116}
0x2cfa…2d0c Head {h00=0x000e, h01=0x0050, text=» B TCL310 «, t00=0x001c, t01=0x0146}
0x2d0c…2d1a Head {h00=0x000a, h01=0x0050, text=»TCL320«, t00=0x001c, t01=0x0158}
0x2d1a…2d36 Head {h00=0x0018, h01=0x0050, text=» TBT GTSPGFLG,TCL329«, t00=0x001c, t01=0x0166}
0x2d36…2d62 Head {h00=0x0028, h01=0x0050, text=»* ADJUST FOR 'KASSE INDBERETNING' «, t00=0x001c, t01=0x0182}
0x2d62…2d7e Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD1,TTCASH«, t00=0x001d, t01=0x001e}
0x2d7e…2d9c Head {h00=0x001a, h01=0x0050, text=» SUB GSWBCD1,TTSTCASH «, t00=0x001d, t01=0x003a}
0x2d9c…2dbe Head {h00=0x001e, h01=0x0050, text=» CBL GSWBCD1,=D'0',TCL323 «, t00=0x001d, t01=0x0058}
0x2dbe…2de0 Head {h00=0x001e, h01=0x0050, text=» SUB GTDUPF(CBIN6),GSWBCD1«, t00=0x001d, t01=0x007a}
0x2de0…2df2 Head {h00=0x000e, h01=0x0050, text=» B TCL325 «, t00=0x001d, t01=0x009c}
0x2df2…2e00 Head {h00=0x000a, h01=0x0050, text=»TCL323«, t00=0x001d, t01=0x00ae}
0x2e00…2e22 Head {h00=0x001e, h01=0x0050, text=» SUB GTDUPF(CBIN5),GSWBCD1«, t00=0x001d, t01=0x00bc}
0x2e22…2e30 Head {h00=0x000a, h01=0x0050, text=»TCL325«, t00=0x001d, t01=0x00de}
0x2e30…2e5c Head {h00=0x0028, h01=0x0050, text=»* ADJUST FOR 'VERSUR INDBERETNING'«, t00=0x001d, t01=0x00ec}
0x2e5c…2e84 Head {h00=0x0024, h01=0x0050, text=» MOVE GSWBCD1,TTACC(CBIN6,CBIN1)«, t00=0x001d, t01=0x0118}
0x2e84…2eac Head {h00=0x0024, h01=0x0050, text=» ADD GSWBCD1,TTACC(CBIN6,CBIN2) «, t00=0x001d, t01=0x0140}
0x2eac…2ece Head {h00=0x001e, h01=0x0050, text=» MUL GSWBCD1,=D'-1' 'VEND'«, t00=0x001d, t01=0x0168}
0x2ece…2ef0 Head {h00=0x001e, h01=0x0050, text=» CBL GSWBCD1,=D'0',TCL328 «, t00=0x001d, t01=0x018a}
0x2ef0…2f12 Head {h00=0x001e, h01=0x0050, text=» SUB GTDUPF(CBIN6),GSWBCD1«, t00=0x001e, t01=0x001c}
0x2f12…2f24 Head {h00=0x000e, h01=0x0050, text=» B TCL329 «, t00=0x001e, t01=0x003e}
0x2f24…2f32 Head {h00=0x000a, h01=0x0050, text=»TCL328«, t00=0x001e, t01=0x0050}
0x2f32…2f54 Head {h00=0x001e, h01=0x0050, text=» SUB GTDUPF(CBIN5),GSWBCD1«, t00=0x001e, t01=0x005e}
0x2f54…2f62 Head {h00=0x000a, h01=0x0050, text=»TCL329«, t00=0x001e, t01=0x0080}
0x2f62…2f84 Head {h00=0x001e, h01=0x0050, text=» MUL GTDUPF(CBIN5),=D'-1' «, t00=0x001e, t01=0x008e}
0x2f84…2fa6 Head {h00=0x001e, h01=0x0050, text=» MUL GTDUPF(CBIN6),=D'-1' «, t00=0x001e, t01=0x00b0}
0x2fa6…2fc2 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD1,TTCASH«, t00=0x001e, t01=0x00d2}
0x2fc2…2fe0 Head {h00=0x001a, h01=0x0050, text=» SUB GSWBCD1,TTSTCASH «, t00=0x001e, t01=0x00ee}
0x2fe0…3004 Head {h00=0x0020, h01=0x0050, text=» MOVE GTDUPF(CBIN4),GSWBCD1 «, t00=0x001e, t01=0x010c}
0x3004…3020 Head {h00=0x0018, h01=0x0050, text=» PERF WALINE,CBIN12 «, t00=0x001e, t01=0x0130}
0x3020…303a Head {h00=0x0016, h01=0x0050, text=» DSC0 KVOUCH,RLEAS«, t00=0x001e, t01=0x014c}
0x303a…3054 Head {h00=0x0016, h01=0x0050, text=» PERF WRITLO,CBIN7«, t00=0x001e, t01=0x0166}
0x3054…306e Head {h00=0x0016, h01=0x0050, text=» PERF WRITLO,CBIN8«, t00=0x001e, t01=0x0180}
0x306e…308a Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'38'«, t00=0x001f, t01=0x000a}
0x308a…30a6 Head {h00=0x0018, h01=0x0050, text=» PERF WRITLO,GSWBIN1«, t00=0x001f, t01=0x0026}
0x30a6…30c2 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'39'«, t00=0x001f, t01=0x0042}
0x30c2…30de Head {h00=0x0018, h01=0x0050, text=» PERF WRITLO,GSWBIN1«, t00=0x001f, t01=0x005e}
0x30de…30ea Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001f, t01=0x007a}
0x30ea…30f8 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x001f, t01=0x0086}
0x30f8…3106 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001f, t01=0x0094}
0x3106…3118 Head {h00=0x000e, h01=0x0050, text=»CLBEH PROC«, t00=0x001f, t01=0x00a2}
0x3118…3122 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00b4}
0x3122…3140 Head {h00=0x001a, h01=0x0050, text=»* BEHOLDNINGST[LLERE «, t00=0x001f, t01=0x00be}
0x3140…314a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00dc}
0x314a…3158 Head {h00=0x000a, h01=0x0050, text=»TCL400«, t00=0x001f, t01=0x00e6}
0x3158…3174 Head {h00=0x0018, h01=0x0050, text=» MOVE TTLINNR,=D'25'«, t00=0x001f, t01=0x00f4}
0x3174…319c Head {h00=0x0024, h01=0x0050, text=» MOVE GSWBIN2,CBEH(GTUWB,CBIN2) «, t00=0x001f, t01=0x0110}
0x319c…31b6 Head {h00=0x0016, h01=0x0050, text=» CMP GSWBIN2,CBIN0«, t00=0x001f, t01=0x0138}
0x31b6…31ca Head {h00=0x0010, h01=0x0050, text=» BE CLBEHRET«, t00=0x001f, t01=0x0152}
0x31ca…31f0 Head {h00=0x0022, h01=0x0050, text=» ADD GSWBIN2,CBEH(GTUWB,CBIN1)«, t00=0x001f, t01=0x0166}
0x31f0…320e Head {h00=0x001a, h01=0x0050, text=» MOVE GTWBCD2,GSWBIN2 «, t00=0x001f, t01=0x018c}
0x320e…321c Head {h00=0x000a, h01=0x0050, text=»TCL405«, t00=0x0020, t01=0x001a}
0x321c…3234 Head {h00=0x0014, h01=0x0050, text=» ATTFMT CLFRM04 «, t00=0x0020, t01=0x0028}
0x3234…324a Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0020, t01=0x0040}
0x324a…325e Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0020, t01=0x0056}
0x325e…3276 Head {h00=0x0014, h01=0x0050, text=» IB SPBINW2, C «, t00=0x0020, t01=0x006a}
0x3276…32a6 Head {h00=0x002c, h01=0x0050, text=» TCL415,TCL415,TCL412,TCL411,TCL415, C«, t00=0x0020, t01=0x0082}
0x32a6…32d6 Head {h00=0x002c, h01=0x0050, text=» TCL415,TCL415,TCL415,TCL413,TCL415, C«, t00=0x0020, t01=0x00b2}
0x32d6…32f4 Head {h00=0x001a, h01=0x0050, text=» TCL415,TCL415,TCL413«, t00=0x0020, t01=0x00e2}
0x32f4…3302 Head {h00=0x000a, h01=0x0050, text=»TCL415«, t00=0x0020, t01=0x0100}
0x3302…3314 Head {h00=0x000e, h01=0x0050, text=» B TCL400 «, t00=0x0020, t01=0x010e}
0x3314…3322 Head {h00=0x000a, h01=0x0050, text=»TCL411«, t00=0x0020, t01=0x0120}
0x3322…333e Head {h00=0x0018, h01=0x0050, text=» TBT GTSPGFLG,TCL400«, t00=0x0020, t01=0x012e}
0x333e…3364 Head {h00=0x0022, h01=0x0050, text=» MOVE GSWSTR20,=C'SLET SALDO '«, t00=0x0020, t01=0x014a}
0x3364…3380 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN6,CBIN1 «, t00=0x0020, t01=0x0170}
0x3380…3392 Head {h00=0x000e, h01=0x0050, text=» B TCL420 «, t00=0x0020, t01=0x018c}
0x3392…33a0 Head {h00=0x000a, h01=0x0050, text=»TCL412«, t00=0x0021, t01=0x000e}
0x33a0…33bc Head {h00=0x0018, h01=0x0050, text=» TBT GTSPGFLG,TCL400«, t00=0x0021, t01=0x001c}
0x33bc…33e4 Head {h00=0x0024, h01=0x0050, text=» MOVE GSWSTR20,=C'SLET PERIODE '«, t00=0x0021, t01=0x0038}
0x33e4…3400 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN6,CBIN2 «, t00=0x0021, t01=0x0060}
0x3400…3412 Head {h00=0x000e, h01=0x0050, text=» B TCL420 «, t00=0x0021, t01=0x007c}
0x3412…3420 Head {h00=0x000a, h01=0x0050, text=»TCL413«, t00=0x0021, t01=0x008e}
0x3420…3444 Head {h00=0x0020, h01=0x0050, text=» MOVE GSWSTR20,=C'SUBTOTAL '«, t00=0x0021, t01=0x009c}
0x3444…3460 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN6,CBIN3 «, t00=0x0021, t01=0x00c0}
0x3460…3472 Head {h00=0x000e, h01=0x0050, text=» B TCL420 «, t00=0x0021, t01=0x00dc}
0x3472…3480 Head {h00=0x000a, h01=0x0050, text=»TCL420«, t00=0x0021, t01=0x00ee}
0x3480…349c Head {h00=0x0018, h01=0x0050, text=» MOVE GTWBCD1,=D'0' «, t00=0x0021, t01=0x00fc}
0x349c…34b8 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD6,=D'0' «, t00=0x0021, t01=0x0118}
0x34b8…34d4 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD7,=D'0' «, t00=0x0021, t01=0x0134}
0x34d4…34e2 Head {h00=0x000a, h01=0x0050, text=»TCL425«, t00=0x0021, t01=0x0150}
0x34e2…34f6 Head {h00=0x0010, h01=0x0050, text=» PERF GRASPV«, t00=0x0021, t01=0x015e}
0x34f6…3514 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN3,CVOUTOP «, t00=0x0021, t01=0x0172}
0x3514…352e Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN3,CBIN6«, t00=0x0021, t01=0x0190}
0x352e…354e Head {h00=0x001c, h01=0x0050, text=» DSC1 KVOUCH,POS,GSWBIN3«, t00=0x0022, t01=0x001a}
0x354e…3562 Head {h00=0x0010, h01=0x0050, text=» PERF CLEAR8«, t00=0x0022, t01=0x003a}
0x3562…358e Head {h00=0x0028, h01=0x0050, text=» PERF FRMXVO,CBIN13 HEAD ON VOUCHER «, t00=0x0022, t01=0x004e}
0x358e…35ac Head {h00=0x001a, h01=0x0050, text=» EDWRT KVOUCH,GTSTRFMT«, t00=0x0022, t01=0x007a}
0x35ac…35c8 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'99'«, t00=0x0022, t01=0x0098}
0x35c8…35e4 Head {h00=0x0018, h01=0x0050, text=» PERF WRITLO,GSWBIN1«, t00=0x0022, t01=0x00b4}
0x35e4…3600 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'23'«, t00=0x0022, t01=0x00d0}
0x3600…361c Head {h00=0x0018, h01=0x0050, text=» PERF WRITLO,GSWBIN1«, t00=0x0022, t01=0x00ec}
0x361c…3636 Head {h00=0x0016, h01=0x0050, text=» PERF WRITLO,CBIN3«, t00=0x0022, t01=0x0108}
0x3636…3652 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'24'«, t00=0x0022, t01=0x0122}
0x3652…366e Head {h00=0x0018, h01=0x0050, text=» PERF WRITLO,GSWBIN1«, t00=0x0022, t01=0x013e}
0x366e…367c Head {h00=0x000a, h01=0x0050, text=»TCL430«, t00=0x0022, t01=0x015a}
0x367c…3696 Head {h00=0x0016, h01=0x0050, text=» ADD GTWBCD1,=D'1'«, t00=0x0022, t01=0x0168}
0x3696…36b4 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN3,GTWBCD1 «, t00=0x0022, t01=0x0182}
0x36b4…36da Head {h00=0x0022, h01=0x0050, text=» ADD GSWBIN3,CBEH(GTUWB,CBIN1)«, t00=0x0023, t01=0x0010}
0x36da…36f8 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN4,GTWBCD2 «, t00=0x0023, t01=0x0036}
0x36f8…371c Head {h00=0x0020, h01=0x0050, text=» CBG GSWBIN3,GSWBIN4,TCL490 «, t00=0x0023, t01=0x0054}
0x371c…374a Head {h00=0x002a, h01=0x0050, text=» CBE CBACC(GSWBIN3,CBIN1),=D'0',TCL430«, t00=0x0023, t01=0x0078}
0x374a…3778 Head {h00=0x002a, h01=0x0050, text=»* ADD TO TOTAL, PERIODE AND SALDO «, t00=0x0023, t01=0x00a6}
0x3778…37aa Head {h00=0x002e, h01=0x0050, text=» ADD GSWBCD6,CBACC(GSWBIN3,CBIN2) PERIODE «, t00=0x0023, t01=0x00d4}
0x37aa…37da Head {h00=0x002c, h01=0x0050, text=» ADD GSWBCD7,CBACC(GSWBIN3,CBIN3) SALDO «, t00=0x0023, t01=0x0106}
0x37da…37f6 Head {h00=0x0018, h01=0x0050, text=» PERF FRMXVO,CBIN14 «, t00=0x0023, t01=0x0136}
0x37f6…3814 Head {h00=0x001a, h01=0x0050, text=» EDWRT KVOUCH,GTSTRFMT«, t00=0x0023, t01=0x0152}
0x3814…3830 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'25'«, t00=0x0023, t01=0x0170}
0x3830…384c Head {h00=0x0018, h01=0x0050, text=» PERF WRITLO,GSWBIN1«, t00=0x0023, t01=0x018c}
0x384c…3868 Head {h00=0x0018, h01=0x0050, text=» TBT GTTESTFL,TCL433«, t00=0x0024, t01=0x0018}
0x3868…3890 Head {h00=0x0024, h01=0x0050, text=» IB GSWBIN6,TCL431,TCL432,TCL433«, t00=0x0024, t01=0x0034}
0x3890…38a2 Head {h00=0x000e, h01=0x0050, text=» B TCL433 «, t00=0x0024, t01=0x005c}
0x38a2…38b0 Head {h00=0x000a, h01=0x0050, text=»TCL431«, t00=0x0024, t01=0x006e}
0x38b0…38de Head {h00=0x002a, h01=0x0050, text=» MOVE CBACC(GSWBIN3,CBIN3),=D'0' SALDO«, t00=0x0024, t01=0x007c}
0x38de…38ec Head {h00=0x000a, h01=0x0050, text=»TCL432«, t00=0x0024, t01=0x00aa}
0x38ec…391c Head {h00=0x002c, h01=0x0050, text=» MOVE CBACC(GSWBIN3,CBIN2),=D'0' PERIODE«, t00=0x0024, t01=0x00b8}
0x391c…392a Head {h00=0x000a, h01=0x0050, text=»TCL433«, t00=0x0024, t01=0x00e8}
0x392a…3944 Head {h00=0x0016, h01=0x0050, text=» SUB TTLINNR,=D'1'«, t00=0x0024, t01=0x00f6}
0x3944…3966 Head {h00=0x001e, h01=0x0050, text=» CBG TTLINNR,=D'0',TCL430 «, t00=0x0024, t01=0x0110}
0x3966…3980 Head {h00=0x0016, h01=0x0050, text=» DSC0 KVOUCH,RLEAS«, t00=0x0024, t01=0x0132}
0x3980…399c Head {h00=0x0018, h01=0x0050, text=» MOVE TTLINNR,=D'25'«, t00=0x0024, t01=0x014c}
0x399c…39ae Head {h00=0x000e, h01=0x0050, text=» B TCL425 «, t00=0x0024, t01=0x0168}
0x39ae…39bc Head {h00=0x000a, h01=0x0050, text=»TCL490«, t00=0x0024, t01=0x017a}
0x39bc…39da Head {h00=0x001a, h01=0x0050, text=»* WRITE TOTAL LINE«, t00=0x0024, t01=0x0188}
0x39da…39f6 Head {h00=0x0018, h01=0x0050, text=» PERF FRMXVO,CBIN18 «, t00=0x0025, t01=0x0016}
0x39f6…3a14 Head {h00=0x001a, h01=0x0050, text=» EDWRT KVOUCH,GTSTRFMT«, t00=0x0025, t01=0x0032}
0x3a14…3a2e Head {h00=0x0016, h01=0x0050, text=» DSC0 KVOUCH,RLEAS«, t00=0x0025, t01=0x0050}
0x3a2e…3a3e Head {h00=0x000c, h01=0x0050, text=»CLBEHRET«, t00=0x0025, t01=0x006a}
0x3a3e…3a4a Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0025, t01=0x007a}
0x3a4a…3a58 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0025, t01=0x0086}
0x3a58…3a66 Head {h00=0x000a, h01=0x0050, text=»RGA300«, t00=0x0025, t01=0x0094}
0x3a66…3a82 Head {h00=0x0018, h01=0x0050, text=» PERF ADM,CBIN11 SPG«, t00=0x0025, t01=0x00a2}
0x3a82…3a92 Head {h00=0x000c, h01=0x0050, text=» B RGADM«, t00=0x0025, t01=0x00be}
0x3a92…3aa0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0025, t01=0x00ce}
0x3aa0…3ada Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0025, t01=0x00dc}
0x3ada…3ae4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0116}
0x3ae4…3b16 Head {h00=0x002e, h01=0x0050, text=»* TR2GEN GENERATES A TRANSACTION 2«, t00=0x0025, t01=0x0120}
0x3b16…3b20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0152}
0x3b20…3b5c Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0025, t01=0x015c}
0x3b5c…3b74 Head {h00=0x0014, h01=0x0050, text=»TR2GEN PROC DBKR«, t00=0x0026, t01=0x0008}
0x3b74…3b8e Head {h00=0x0016, h01=0x0050, text=» MOVE TTDKDEX,DBKR«, t00=0x0026, t01=0x0020}
0x3b8e…3bb2 Head {h00=0x0020, h01=0x0050, text=» CBNE TTDKDEX,=W'0',TR2DBKR «, t00=0x0026, t01=0x003a}
0x3bb2…3bce Head {h00=0x0018, h01=0x0050, text=» MOVE TTDKDEX,CBIN1 «, t00=0x0026, t01=0x005e}
0x3bce…3bf6 Head {h00=0x0024, h01=0x0050, text=» CBL GTDUPF(CBIN4),=D'0',TR2DBKR«, t00=0x0026, t01=0x007a}
0x3bf6…3c12 Head {h00=0x0018, h01=0x0050, text=» MOVE TTDKDEX,CBIN2 «, t00=0x0026, t01=0x00a2}
0x3c12…3c22 Head {h00=0x000c, h01=0x0050, text=»TR2DBKR «, t00=0x0026, t01=0x00be}
0x3c22…3c46 Head {h00=0x0020, h01=0x0050, text=» PERFI TTDKDEX,SETKRE,SETDEB«, t00=0x0026, t01=0x00ce}
0x3c46…3c64 Head {h00=0x001a, h01=0x0050, text=» EDWRT SCREEN,CLFRM02 «, t00=0x0026, t01=0x00f2}
0x3c64…3c76 Head {h00=0x000e, h01=0x0050, text=» PERF SLUT«, t00=0x0026, t01=0x0110}
0x3c76…3c82 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0026, t01=0x0122}
0x3c82…3c90 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0026, t01=0x012e}
0x3c90…3c98 Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x013c}
0x3c98…3ca0 Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x0144}
0x3ca0…3ca8 Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x014c}
0x3ca8…3ce8 Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0026, t01=0x0154}
0x3ce8…3cf2 (39, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0004}
0x3cf2…3d32 Head {h00=0x003c, h01=0x0050, text=»* WAHEAD - GRASP AND WRITE HEADLINE ON VOUCHER «, t00=0x0027, t01=0x000e}
0x3d32…3d3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x004e}
0x3d3c…3d7c Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0027, t01=0x0058}
0x3d7c…3d96 Head {h00=0x0016, h01=0x0050, text=»WAHEAD PROC VOXDEX«, t00=0x0027, t01=0x0098}
0x3d96…3db4 Head {h00=0x001a, h01=0x0050, text=» EDWRT SCREEN,CLFRM03 «, t00=0x0027, t01=0x00b2}
0x3db4…3dd4 Head {h00=0x001c, h01=0x0050, text=» PERF SPLIN8,CBIN5,CBIN2«, t00=0x0027, t01=0x00d0}
0x3dd4…3de8 Head {h00=0x0010, h01=0x0050, text=» PERF GRASPV«, t00=0x0027, t01=0x00f0}
0x3de8…3e08 Head {h00=0x001c, h01=0x0050, text=» DSC1 KVOUCH,POS,CVOUTOP«, t00=0x0027, t01=0x0104}
0x3e08…3e1c Head {h00=0x0010, h01=0x0050, text=» PERF CLEAR8«, t00=0x0027, t01=0x0124}
0x3e1c…3e38 Head {h00=0x0018, h01=0x0050, text=» PERF FRMXVO,VOXDEX «, t00=0x0027, t01=0x0138}
0x3e38…3e56 Head {h00=0x001a, h01=0x0050, text=» EDWRT KVOUCH,GTSTRFMT«, t00=0x0027, t01=0x0154}
0x3e56…3e62 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0027, t01=0x0172}
0x3e62…3e70 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0027, t01=0x017e}
0x3e70…3e78 Head {h00=0x0004, h01=0x0050, t00=0x0027, t01=0x018c}
0x3e78…3e80 (40, 0, 400) Head {h00=0x0004, h01=0x0050, t00=0x0028, t01=0x0004}
0x3e80…3e88 Head {h00=0x0004, h01=0x0050, t00=0x0028, t01=0x000c}
0x3e88…3eca Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x0028, t01=0x0014}
0x3eca…3ed4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0056}
0x3ed4…3f00 Head {h00=0x0028, h01=0x0050, text=»* WALINE WRITE ACCUMULATORLINE«, t00=0x0028, t01=0x0060}
0x3f00…3f0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x008c}
0x3f0a…3f4c Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x0028, t01=0x0096}
0x3f4c…3f66 Head {h00=0x0016, h01=0x0050, text=»WALINE PROC LINDEX«, t00=0x0028, t01=0x00d8}
0x3f66…3f82 Head {h00=0x0018, h01=0x0050, text=» PERF FRMXVO,LINDEX «, t00=0x0028, t01=0x00f2}
0x3f82…3fa0 Head {h00=0x001a, h01=0x0050, text=» EDWRT KVOUCH,GTSTRFMT«, t00=0x0028, t01=0x010e}
0x3fa0…3fba Head {h00=0x0016, h01=0x0050, text=» SUB TTLINNR,=D'1'«, t00=0x0028, t01=0x012c}
0x3fba…3fc6 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0028, t01=0x0146}
0x3fc6…3fd4 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0028, t01=0x0152}
0x3fd4…3fe2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x0160}
0x3fe2…3ff4 Head {h00=0x000e, h01=0x0050, text=»SKIFT PROC«, t00=0x0028, t01=0x016e}
0x3ff4…4016 Head {h00=0x001e, h01=0x0050, text=»************************* «, t00=0x0028, t01=0x0180}
0x4016…4020 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0012}
0x4020…405e Head {h00=0x003a, h01=0x0050, text=»* SKIFT - THIS PROCEDURE TAKES HAND OF SHIFT«, t00=0x0029, t01=0x001c}
0x405e…408e Head {h00=0x002c, h01=0x0050, text=»* OF DISKS, IS ACTIVATED AFTER «, t00=0x0029, t01=0x005a}
0x408e…40a8 Head {h00=0x0016, h01=0x0050, text=»* 12 ADM «, t00=0x0029, t01=0x008a}
0x40a8…40b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00a4}
0x40b2…40d2 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0029, t01=0x00ae}
0x40d2…40de Head {h00=0x0008, h01=0x0050, text=»SK00«, t00=0x0029, t01=0x00ce}
0x40de…40f8 Head {h00=0x0016, h01=0x0050, text=» PERF WAITF,CPFLG «, t00=0x0029, t01=0x00da}
0x40f8…410e Head {h00=0x0012, h01=0x0050, text=» SET CSKIFTWN «, t00=0x0029, t01=0x00f4}
0x410e…4140 Head {h00=0x002e, h01=0x0050, text=» PERF SPLIN8,CBIN8,CBIN2 'DISKETTE SKIFT' «, t00=0x0029, t01=0x010a}
0x4140…4158 Head {h00=0x0014, h01=0x0050, text=» TBF CWFLAG,SK15«, t00=0x0029, t01=0x013c}
0x4158…4172 Head {h00=0x0016, h01=0x0050, text=» SUB CRECBCD,=D'1'«, t00=0x0029, t01=0x0154}
0x4172…419c Head {h00=0x0026, h01=0x0050, text=» PERF SLUTID,CRECBCD WRITE 'SLUTD'«, t00=0x0029, t01=0x016e}
0x419c…41ca Head {h00=0x002a, h01=0x0050, text=» PERF RAWRIT,DK02,=D'2',CPCKBUF,CRECNR«, t00=0x002a, t01=0x0008}
0x41ca…41d6 Head {h00=0x0008, h01=0x0050, text=»SK15«, t00=0x002a, t01=0x0036}
0x41d6…41f6 Head {h00=0x001c, h01=0x0050, text=» PERF WRITID,CBIN2,CBIN2«, t00=0x002a, t01=0x0042}
0x41f6…4210 Head {h00=0x0016, h01=0x0050, text=» PERF CLSVOL,CBIN2«, t00=0x002a, t01=0x0062}
0x4210…422e Head {h00=0x001a, h01=0x0050, text=» PERF LAMPOF,=W'2047' «, t00=0x002a, t01=0x007c}
0x422e…4248 Head {h00=0x0016, h01=0x0050, text=» ADD CVOLNO,=D'1' «, t00=0x002a, t01=0x009a}
0x4248…4256 Head {h00=0x000a, h01=0x0050, text=»SK120 «, t00=0x002a, t01=0x00b4}
0x4256…427a Head {h00=0x0020, h01=0x0050, text=» PERF LAMPON,=W'512' LAMP 2 «, t00=0x002a, t01=0x00c2}
0x427a…428e Head {h00=0x0010, h01=0x0050, text=» PERF SOPRD «, t00=0x002a, t01=0x00e6}
0x428e…42b0 Head {h00=0x001e, h01=0x0050, text=» CBNE GSWBIN2,CBIN9,SK120 «, t00=0x002a, t01=0x00fa}
0x42b0…42ca Head {h00=0x0016, h01=0x0050, text=» PERF ASGVOL,CBIN2«, t00=0x002a, t01=0x011c}
0x42ca…42de Head {h00=0x0010, h01=0x0050, text=» BNOK SK120 «, t00=0x002a, t01=0x0136}
0x42de…42fc Head {h00=0x001a, h01=0x0050, text=» PERF LAMPOF,=W'2047' «, t00=0x002a, t01=0x014a}
0x42fc…4316 Head {h00=0x0016, h01=0x0050, text=» MOVE CRECNR,CBIN1«, t00=0x002a, t01=0x0168}
0x4316…4332 Head {h00=0x0018, h01=0x0050, text=» MOVE CRECBCD,=D'0' «, t00=0x002a, t01=0x0182}
0x4332…434c Head {h00=0x0016, h01=0x0050, text=» TBF CWFLAG,SK130 «, t00=0x002b, t01=0x000e}
0x434c…4360 Head {h00=0x0010, h01=0x0050, text=» PERF STRTWR«, t00=0x002b, t01=0x0028}
0x4360…4374 Head {h00=0x0010, h01=0x0050, text=» BNOK SK120 «, t00=0x002b, t01=0x003c}
0x4374…4382 Head {h00=0x000a, h01=0x0050, text=»SK130 «, t00=0x002b, t01=0x0050}
0x4382…43a8 Head {h00=0x0022, h01=0x0050, text=» PERF CNFWRT REWRITE CONFDATA «, t00=0x002b, t01=0x005e}
0x43a8…43c2 Head {h00=0x0016, h01=0x0050, text=» TBF CWFLAG,SK150 «, t00=0x002b, t01=0x0084}
0x43c2…43de Head {h00=0x0018, h01=0x0050, text=» MOVE CRECBCD,=D'1' «, t00=0x002b, t01=0x009e}
0x43de…43fe Head {h00=0x001c, h01=0x0050, text=» PERF WRITID,CBIN2,CBIN1«, t00=0x002b, t01=0x00ba}
0x43fe…440c Head {h00=0x000a, h01=0x0050, text=»SK150 «, t00=0x002b, t01=0x00da}
0x440c…4420 Head {h00=0x0010, h01=0x0050, text=» PERF CLEAR8«, t00=0x002b, t01=0x00e8}
0x4420…443c Head {h00=0x0018, h01=0x0050, text=» PERF WRITJT,=W'11' «, t00=0x002b, t01=0x00fc}
0x443c…4458 Head {h00=0x0018, h01=0x0050, text=» PERF WRITLO,CBIN14 «, t00=0x002b, t01=0x0118}
0x4458…4470 Head {h00=0x0014, h01=0x0050, text=» CLEAR CSKIFTFL «, t00=0x002b, t01=0x0134}
0x4470…4488 Head {h00=0x0014, h01=0x0050, text=» CLEAR CSKIFTWN «, t00=0x002b, t01=0x014c}
0x4488…44a8 Head {h00=0x001c, h01=0x0050, text=» CLEAR CPFLG DISC FREE «, t00=0x002b, t01=0x0164}
0x44a8…44b4 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x002b, t01=0x0184}
0x44b4…44c2 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x002b, t01=0x0190}
0x44c2…44d0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002c, t01=0x000e}
0x44d0…44e8 Head {h00=0x0014, h01=0x0050, text=»LAMPON PROC $NR «, t00=0x002c, t01=0x001c}
0x44e8…44fa Head {h00=0x000e, h01=0x0050, text=» PLIT $NR «, t00=0x002c, t01=0x0034}
0x44fa…4528 Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x002c, t01=0x0046}
0x4528…4554 Head {h00=0x0028, h01=0x0050, text=»* LAMPON - FIRE LAMPS ON OPR. PANEL.«, t00=0x002c, t01=0x0074}
0x4554…4576 Head {h00=0x001e, h01=0x0050, text=»* CALL - PERF LAMPON,<$NR>«, t00=0x002c, t01=0x00a0}
0x4576…45b4 Head {h00=0x003a, h01=0x0050, text=»* THE LAMPS ARE FIRED CORRESPONDING TO 1-BITS IN PARAM«, t00=0x002c, t01=0x00c2}
0x45b4…45e6 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x002c, t01=0x0100}
0x45e6…4600 Head {h00=0x0016, h01=0x0050, text=» MOVE GSWBIN2,$NR «, t00=0x002c, t01=0x0132}
0x4600…4620 Head {h00=0x001c, h01=0x0050, text=» DSC1 DSSOPO,ON,GSWBIN2 «, t00=0x002c, t01=0x014c}
0x4620…462c Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x002c, t01=0x016c}
0x462c…463a Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x002c, t01=0x0178}
0x463a…4644 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0186}
0x4644…465c Head {h00=0x0014, h01=0x0050, text=»LAMPOF PROC $NR «, t00=0x002c, t01=0x0190}
0x465c…466e Head {h00=0x000e, h01=0x0050, text=» PLIT $NR «, t00=0x002d, t01=0x0018}
0x466e…46a0 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x002d, t01=0x002a}
0x46a0…46d2 Head {h00=0x002e, h01=0x0050, text=»* LAMPOF - EXTINGUISH LAMPS ON OPR. PANEL «, t00=0x002d, t01=0x005c}
0x46d2…46f4 Head {h00=0x001e, h01=0x0050, text=»* CALL - PERF LAMPOF,<$NR>«, t00=0x002d, t01=0x008e}
0x46f4…473a Head {h00=0x0042, h01=0x0050, text=»* THE LAMPS ARE EXTINGHUISHED CORRESPONDING TO 1-BITS IN PARAM«, t00=0x002d, t01=0x00b0}
0x473a…476e Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x002d, t01=0x00f6}
0x476e…4788 Head {h00=0x0016, h01=0x0050, text=» MOVE GSWBIN2,$NR «, t00=0x002d, t01=0x012a}
0x4788…47a8 Head {h00=0x001c, h01=0x0050, text=» DSC1 DSSOPO,OFF,GSWBIN2«, t00=0x002d, t01=0x0144}
0x47a8…47b4 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x002d, t01=0x0164}
0x47b4…47c2 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x002d, t01=0x0170}
0x47c2…47cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x017e}
0x47cc…47de Head {h00=0x000e, h01=0x0050, text=»SOPRD PROC«, t00=0x002d, t01=0x0188}
0x47de…4814 Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x002e, t01=0x000a}
0x4814…4842 Head {h00=0x002a, h01=0x0050, text=»* SOPRD - READ SYSTEMS OPERATOR PANEL «, t00=0x002e, t01=0x0040}
0x4842…4878 Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x002e, t01=0x006e}
0x4878…4886 Head {h00=0x000a, h01=0x0050, text=»SOPR10«, t00=0x002e, t01=0x00a4}
0x4886…48a2 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN1 «, t00=0x002e, t01=0x00b2}
0x48a2…48d2 Head {h00=0x002c, h01=0x0050, text=» KI DSSOPI,SOPINP,DUMTAB,GSWBIN1,GSWBIN2«, t00=0x002e, t01=0x00ce}
0x48d2…48e6 Head {h00=0x0010, h01=0x0050, text=» BNOK SOPR10«, t00=0x002e, t01=0x00fe}
0x48e6…48f2 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x002e, t01=0x0112}
0x48f2…4900 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x002e, t01=0x011e}
0x4900…490e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002e, t01=0x012c}
0x490e…4922 Head {h00=0x0010, h01=0x0050, text=»STRTWR PROC «, t00=0x002e, t01=0x013a}
0x4922…4940 Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x002e, t01=0x014e}
0x4940…4960 Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x002e, t01=0x016c}
0x4960…497c Head {h00=0x0018, h01=0x0050, text=» PERF STRTID,CVOLNO «, t00=0x002e, t01=0x018c}
0x497c…49aa Head {h00=0x002a, h01=0x0050, text=» PERF RAWRIT,DK02,=D'2',CPCKBUF,CRECNR«, t00=0x002f, t01=0x0018}
0x49aa…49c0 Head {h00=0x0012, h01=0x0050, text=» BNOK STRTNOK «, t00=0x002f, t01=0x0046}
0x49c0…49da Head {h00=0x0016, h01=0x0050, text=» ADD CRECNR,CBIN1 «, t00=0x002f, t01=0x005c}
0x49da…49fa Head {h00=0x001c, h01=0x0050, text=» PERF RADEL,DK02,CRECNR «, t00=0x002f, t01=0x0076}
0x49fa…4a10 Head {h00=0x0012, h01=0x0050, text=» BNOK STRTNOK «, t00=0x002f, t01=0x0096}
0x4a10…4a2c Head {h00=0x0018, h01=0x0050, text=» CMP CBIN0,CBIN0 OK «, t00=0x002f, t01=0x00ac}
0x4a2c…4a38 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x002f, t01=0x00c8}
0x4a38…4a48 Head {h00=0x000c, h01=0x0050, text=»STRTNOK «, t00=0x002f, t01=0x00d4}
0x4a48…4a60 Head {h00=0x0014, h01=0x0050, text=» CMP CBIN1,CBIN0«, t00=0x002f, t01=0x00e4}
0x4a60…4a6c Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x002f, t01=0x00fc}
0x4a6c…4a7a Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x002f, t01=0x0108}
0x4a7a…4a82 Head {h00=0x0004, h01=0x0050, t00=0x002f, t01=0x0116}
0x4a82…4a9c Head {h00=0x0016, h01=0x0050, text=»STRTID PROC VOLID «, t00=0x002f, t01=0x011e}
0x4a9c…4ab8 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x002f, t01=0x0138}
0x4ab8…4af6 Head {h00=0x003a, h01=0x0050, text=»* STRTID - SETS UP A START ID IN PACK BUFFER«, t00=0x002f, t01=0x0154}
0x4af6…4b1a (48, 0, 400) Head {h00=0x0020, h01=0x0050, text=»* CALL - PERF STRTID,<VOLID>«, t00=0x0030, t01=0x0004}
0x4b1a…4b36 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0030, t01=0x0028}
0x4b36…4b4a Head {h00=0x0010, h01=0x0050, text=» SET CSWFLAG«, t00=0x0030, t01=0x0044}
0x4b4a…4b6e Head {h00=0x0020, h01=0x0050, text=» CBE CRECLGD,=W'128',STRT10 «, t00=0x0030, t01=0x0058}
0x4b6e…4b84 Head {h00=0x0012, h01=0x0050, text=» CLEAR CSWFLAG«, t00=0x0030, t01=0x007c}
0x4b84…4b92 Head {h00=0x000a, h01=0x0050, text=»STRT10«, t00=0x0030, t01=0x0092}
0x4b92…4bae Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN6,CBIN2 «, t00=0x0030, t01=0x00a0}
0x4bae…4bcc Head {h00=0x001a, h01=0x0050, text=» EDIT CPCKBUF,PCKINIT «, t00=0x0030, t01=0x00bc}
0x4bcc…4bea Head {h00=0x001a, h01=0x0050, text=» EDIT CPCKBUF,STARTFR «, t00=0x0030, t01=0x00da}
0x4bea…4c06 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD3,VOLID «, t00=0x0030, t01=0x00f8}
0x4c06…4c24 Head {h00=0x001a, h01=0x0050, text=» EDIT GSWSTR20,FRVOLID«, t00=0x0030, t01=0x0114}
0x4c24…4c40 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'40'«, t00=0x0030, t01=0x0132}
0x4c40…4c74 Head {h00=0x0030, h01=0x0050, text=» COPY CPCKBUF,GSWBIN1,CBIN12,GSWSTR20,CBIN0 «, t00=0x0030, t01=0x014e}
0x4c74…4c8e Head {h00=0x0016, h01=0x0050, text=» MOVE CRECNR,CBIN1«, t00=0x0030, t01=0x0182}
0x4c8e…4c9a Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0031, t01=0x000c}
0x4c9a…4ca8 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0031, t01=0x0018}
0x4ca8…4cb0 Head {h00=0x0004, h01=0x0050, t00=0x0031, t01=0x0026}
0x4cb0…4cca Head {h00=0x0016, h01=0x0050, text=»SLUTID PROC SLUTNO«, t00=0x0031, t01=0x002e}
0x4cca…4ce6 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0031, t01=0x0048}
0x4ce6…4d1c Head {h00=0x0032, h01=0x0050, text=»* SLUTID - SETS UP A SLUTD IN CPCKBUF«, t00=0x0031, t01=0x0064}
0x4d1c…4d38 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0031, t01=0x009a}
0x4d38…4d4c Head {h00=0x0010, h01=0x0050, text=» SET CSWFLAG«, t00=0x0031, t01=0x00b6}
0x4d4c…4d70 Head {h00=0x0020, h01=0x0050, text=» CBE CRECLGD,=W'128',SLUT10 «, t00=0x0031, t01=0x00ca}
0x4d70…4d86 Head {h00=0x0012, h01=0x0050, text=» CLEAR CSWFLAG«, t00=0x0031, t01=0x00ee}
0x4d86…4d94 Head {h00=0x000a, h01=0x0050, text=»SLUT10«, t00=0x0031, t01=0x0104}
0x4d94…4db2 Head {h00=0x001a, h01=0x0050, text=» EDIT CPCKBUF,PCKINIT «, t00=0x0031, t01=0x0112}
0x4db2…4dce Head {h00=0x0018, h01=0x0050, text=» MOVE CRECBCD,SLUTNO«, t00=0x0031, t01=0x0130}
0x4dce…4dec Head {h00=0x001a, h01=0x0050, text=» EDIT CPCKBUF,SLUTFRM «, t00=0x0031, t01=0x014c}
0x4dec…4df8 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0031, t01=0x016a}
0x4df8…4e06 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0031, t01=0x0176}
0x4e06…4e14 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0031, t01=0x0184}
0x4e14…4e2c (50, 0, 398) Head {h00=0x0014, h01=0x0050, text=»BCKUP PROC $OPT «, t00=0x0032, t01=0x0004}
0x4e2c…4e3e Head {h00=0x000e, h01=0x0050, text=» PLIT $OPT«, t00=0x0032, t01=0x001c}
0x4e3e…4e5a Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0032, t01=0x002e}
0x4e5a…4e64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x004a}
0x4e64…4ea2 Head {h00=0x003a, h01=0x0050, text=»* THIS PROCEDURE TAKES CARE OF ADMINISTRATION«, t00=0x0032, t01=0x0054}
0x4ea2…4ebe Head {h00=0x0018, h01=0x0050, text=»* OB BACKUP«, t00=0x0032, t01=0x0092}
0x4ebe…4ec8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00ae}
0x4ec8…4efc Head {h00=0x0030, h01=0x0050, text=»* CALL: PERF BCKUP,<=W'X'>«, t00=0x0032, t01=0x00b8}
0x4efc…4f28 Head {h00=0x0028, h01=0x0050, text=»* $OPT = 1 : WITHOUT BACKUP«, t00=0x0032, t01=0x00ec}
0x4f28…4f52 Head {h00=0x0026, h01=0x0050, text=»* $OPT = 2 : WITH BACKUP «, t00=0x0032, t01=0x0118}
0x4f52…4f5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0142}
0x4f5c…4f66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x014c}
0x4f66…4f82 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0032, t01=0x0156}
0x4f82…4f8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0172}
0x4f8c…4fa6 Head {h00=0x0016, h01=0x0050, text=» MOVE CRECNR,CBIN1«, t00=0x0032, t01=0x017c}
0x4fa6…4fc2 Head {h00=0x0018, h01=0x0050, text=» MOVE CRECBCD,=D'1' «, t00=0x0033, t01=0x0008}
0x4fc2…4fea Head {h00=0x0024, h01=0x0050, text=» ADD CVOLNO,=D'1' NEXT VOLUME NO«, t00=0x0033, t01=0x0024}
0x4fea…5014 Head {h00=0x0026, h01=0x0050, text=» PERF CNFWRT REWRITE CONFIGURATION«, t00=0x0033, t01=0x004c}
0x5014…502e Head {h00=0x0016, h01=0x0050, text=» SUB CVOLNO,=D'1' «, t00=0x0033, t01=0x0076}
0x502e…5056 Head {h00=0x0024, h01=0x0050, text=» CBE CBIN1,$OPT,BCK100 NO BACKUP«, t00=0x0033, t01=0x0090}
0x5056…5060 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00b8}
0x5060…506a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00c2}
0x506a…507e Head {h00=0x0010, h01=0x0050, text=»* BACKUP«, t00=0x0033, t01=0x00cc}
0x507e…5088 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00e0}
0x5088…5096 Head {h00=0x000a, h01=0x0050, text=»BCK000«, t00=0x0033, t01=0x00ea}
0x5096…50be Head {h00=0x0024, h01=0x0050, text=» PERF LAMPOF,=W'2047' LAMPS OFF «, t00=0x0033, t01=0x00f8}
0x50be…50cc Head {h00=0x000a, h01=0x0050, text=»BCK005«, t00=0x0033, t01=0x0120}
0x50cc…50f0 Head {h00=0x0020, h01=0x0050, text=» PERF LAMPON,=W'1024' LAMP 1«, t00=0x0033, t01=0x012e}
0x50f0…5114 Head {h00=0x0020, h01=0x0050, text=» PERF LAMPON,=W'128' LAMP 4 «, t00=0x0033, t01=0x0152}
0x5114…5136 Head {h00=0x001e, h01=0x0050, text=» PERF LAMPON,=W'16' LAMP 7«, t00=0x0033, t01=0x0176}
0x5136…5152 Head {h00=0x0018, h01=0x0050, text=» TBF CGLREGFL,BCK010«, t00=0x0034, t01=0x0008}
0x5152…5176 Head {h00=0x0020, h01=0x0050, text=» PERF LAMPON,=W'512' LAMP 2 «, t00=0x0034, t01=0x0024}
0x5176…5184 Head {h00=0x000a, h01=0x0050, text=»BCK010«, t00=0x0034, t01=0x0048}
0x5184…51a6 Head {h00=0x001e, h01=0x0050, text=» PERF SOPRD READ SOP LAMPS«, t00=0x0034, t01=0x0056}
0x51a6…51be Head {h00=0x0014, h01=0x0050, text=» IB GSWBIN2, C «, t00=0x0034, t01=0x0078}
0x51be…51ee Head {h00=0x002c, h01=0x0050, text=» BSOP10,BSOP09,BSOP08,BSOP07,BSOP06, C«, t00=0x0034, t01=0x0090}
0x51ee…521a Head {h00=0x0028, h01=0x0050, text=» BSOP05,BSOP04,BSOP03,BSOP02,BSOP01«, t00=0x0034, t01=0x00c0}
0x521a…5228 Head {h00=0x000a, h01=0x0050, text=»BSOP03«, t00=0x0034, t01=0x00ec}
0x5228…5236 Head {h00=0x000a, h01=0x0050, text=»BSOP05«, t00=0x0034, t01=0x00fa}
0x5236…5244 Head {h00=0x000a, h01=0x0050, text=»BSOP06«, t00=0x0034, t01=0x0108}
0x5244…5252 Head {h00=0x000a, h01=0x0050, text=»BSOP08«, t00=0x0034, t01=0x0116}
0x5252…5260 Head {h00=0x000a, h01=0x0050, text=»BSOP09«, t00=0x0034, t01=0x0124}
0x5260…526e Head {h00=0x000a, h01=0x0050, text=»BSOP10«, t00=0x0034, t01=0x0132}
0x526e…528c Head {h00=0x001a, h01=0x0050, text=» B BCK010 OTHER LAMPS «, t00=0x0034, t01=0x0140}
0x528c…5296 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x015e}
0x5296…52b6 Head {h00=0x001c, h01=0x0050, text=»BSOP01 BACKUP FD999001«, t00=0x0034, t01=0x0168}
0x52b6…52de Head {h00=0x0024, h01=0x0050, text=» PERF LAMPOF,=W'2047' LAMPS OFF «, t00=0x0034, t01=0x0188}
0x52de…5302 Head {h00=0x0020, h01=0x0050, text=» PERF LAMPON,=W'1024' LAMP 1«, t00=0x0035, t01=0x0020}
0x5302…533a Head {h00=0x0034, h01=0x0050, text=» PERF BACKUP,DK01,=D'1',=W'32',CCONBUF0,=W'199' «, t00=0x0035, t01=0x0044}
0x533a…534e Head {h00=0x0010, h01=0x0050, text=» BNOK BCK050«, t00=0x0035, t01=0x007c}
0x534e…5368 Head {h00=0x0016, h01=0x0050, text=» ADD CVOLNO,=D'1' «, t00=0x0035, t01=0x0090}
0x5368…5392 Head {h00=0x0026, h01=0x0050, text=» PERF WRITID,CBIN6,CBIN4 BACKUP OK«, t00=0x0035, t01=0x00aa}
0x5392…53ac Head {h00=0x0016, h01=0x0050, text=» SUB CVOLNO,=D'1' «, t00=0x0035, t01=0x00d4}
0x53ac…53e4 Head {h00=0x0034, h01=0x0050, text=» PERF CONRDX,CCONBUF0,CBIN1 RESTORE BUFFER AREA «, t00=0x0035, t01=0x00ee}
0x53e4…53f6 Head {h00=0x000e, h01=0x0050, text=» B BCK000 «, t00=0x0035, t01=0x0126}
0x53f6…5404 Head {h00=0x000a, h01=0x0050, text=»BCK050«, t00=0x0035, t01=0x0138}
0x5404…543c Head {h00=0x0034, h01=0x0050, text=» PERF CONRDX,CCONBUF0,CBIN1 RESTORE BUFFER AREA «, t00=0x0035, t01=0x0146}
0x543c…544e Head {h00=0x000e, h01=0x0050, text=» B BCK005 «, t00=0x0035, t01=0x017e}
0x544e…5458 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0190}
0x5458…5482 Head {h00=0x0026, h01=0x0050, text=»BSOP02 COPY FD999002 TO FD999005«, t00=0x0036, t01=0x000a}
0x5482…54a8 Head {h00=0x0022, h01=0x0050, text=» TBF CGLREGFL,BCK010 ALLOWED? «, t00=0x0036, t01=0x0034}
0x54a8…54b8 Head {h00=0x000c, h01=0x0050, text=» B BCK02«, t00=0x0036, t01=0x005a}
0x54b8…54c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x006a}
0x54c2…54d0 Head {h00=0x000a, h01=0x0050, text=»***** «, t00=0x0036, t01=0x0074}
0x54d0…54fa Head {h00=0x0026, h01=0x0050, text=»BCK02 COPY FD999002 TO FD999005 «, t00=0x0036, t01=0x0082}
0x54fa…5522 Head {h00=0x0024, h01=0x0050, text=» PERF LAMPOF,=W'2047' LAMPS OFF «, t00=0x0036, t01=0x00ac}
0x5522…5546 Head {h00=0x0020, h01=0x0050, text=» PERF LAMPON,=W'512' LAMP 2 «, t00=0x0036, t01=0x00d4}
0x5546…5558 Head {h00=0x000e, h01=0x0050, text=» SET CPFLG«, t00=0x0036, t01=0x00f8}
0x5558…5580 Head {h00=0x0024, h01=0x0050, text=» PERF ASGVOL,CBIN2 ASSIGN REGSET«, t00=0x0036, t01=0x010a}
0x5580…5596 Head {h00=0x0012, h01=0x0050, text=» BNOK BCK0290 «, t00=0x0036, t01=0x0132}
0x5596…55b2 Head {h00=0x0018, h01=0x0050, text=» MOVE CGLRECNR,CBIN0«, t00=0x0036, t01=0x0148}
0x55b2…55c2 Head {h00=0x000c, h01=0x0050, text=»BCK0250 «, t00=0x0036, t01=0x0164}
0x55c2…55de Head {h00=0x0018, h01=0x0050, text=» ADD CGLRECNR,CBIN1 «, t00=0x0036, t01=0x0174}
0x55de…560c Head {h00=0x002a, h01=0x0050, text=» MOVE GSWBIN1,=W'128' LENGTH OF RECORD«, t00=0x0036, t01=0x0190}
0x560c…5644 Head {h00=0x0034, h01=0x0050, text=» PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,CGLRECNR«, t00=0x0037, t01=0x002e}
0x5644…5660 Head {h00=0x0018, h01=0x0050, text=» BNOK BCK0270 ERROR «, t00=0x0037, t01=0x0066}
0x5660…568a Head {h00=0x0026, h01=0x0050, text=» CBE GTWBCD1,=D'4',BCK0280 NO DATA«, t00=0x0037, t01=0x0082}
0x568a…56aa Head {h00=0x001c, h01=0x0050, text=» MOVE GSWSTR20,=C'SLUTD'«, t00=0x0037, t01=0x00ac}
0x56aa…56c6 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN5,CBIN0 «, t00=0x0037, t01=0x00cc}
0x56c6…5700 Head {h00=0x0036, h01=0x0050, text=» MATCH GSWSTR20,GSWBIN5,CBIN5,CPCKBUF,CBIN0,CBIN5 «, t00=0x0037, t01=0x00e8}
0x5700…571a Head {h00=0x0016, h01=0x0050, text=» BE BCK0280 SLUTD «, t00=0x0037, t01=0x0122}
0x571a…574a Head {h00=0x002c, h01=0x0050, text=» PERF RAWRIT,DK05,=D'5',CPCKBUF,CGLRECNR«, t00=0x0037, t01=0x013c}
0x574a…575e Head {h00=0x0010, h01=0x0050, text=» BOK BCK0250«, t00=0x0037, t01=0x016c}
0x575e…5776 Head {h00=0x0014, h01=0x0050, text=»BCK0270 ERROR «, t00=0x0037, t01=0x0180}
0x5776…5798 Head {h00=0x001e, h01=0x0050, text=» PERF LAMPON,=W'2' LAMP 10«, t00=0x0038, t01=0x0008}
0x5798…57b0 Head {h00=0x0014, h01=0x0050, text=»BCK0280 FINISH«, t00=0x0038, t01=0x002a}
0x57b0…57ce Head {h00=0x001a, h01=0x0050, text=» MOVE TTGLREC,CGLRECNR«, t00=0x0038, t01=0x0042}
0x57ce…57fe Head {h00=0x002c, h01=0x0050, text=» PERF TCONFW,CBIN1 SAVE LAST RECORD NO. «, t00=0x0038, t01=0x0060}
0x57fe…580e Head {h00=0x000c, h01=0x0050, text=»BCK0290 «, t00=0x0038, t01=0x0090}
0x580e…5822 Head {h00=0x0010, h01=0x0050, text=» CLEAR CPFLG«, t00=0x0038, t01=0x00a0}
0x5822…584a Head {h00=0x0024, h01=0x0050, text=» DSC0 DK02,CLOSE CLOSE VOLUME 2 «, t00=0x0038, t01=0x00b4}
0x584a…585c Head {h00=0x000e, h01=0x0050, text=» B BCK02R «, t00=0x0038, t01=0x00dc}
0x585c…5866 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00ee}
0x5866…5874 Head {h00=0x000a, h01=0x0050, text=»***** «, t00=0x0038, t01=0x00f8}
0x5874…5882 Head {h00=0x000a, h01=0x0050, text=»BCK02R«, t00=0x0038, t01=0x0106}
0x5882…5894 Head {h00=0x000e, h01=0x0050, text=» B BCK000 «, t00=0x0038, t01=0x0114}
0x5894…589e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0126}
0x589e…58be Head {h00=0x001c, h01=0x0050, text=»BSOP04 BACKUP FD999004«, t00=0x0038, t01=0x0130}
0x58be…58e6 Head {h00=0x0024, h01=0x0050, text=» PERF LAMPOF,=W'2047' LAMPS OFF «, t00=0x0038, t01=0x0150}
0x58e6…590a Head {h00=0x0020, h01=0x0050, text=» PERF LAMPON,=W'128' LAMP 4 «, t00=0x0038, t01=0x0178}
0x590a…5940 Head {h00=0x0032, h01=0x0050, text=» PERF BACKUP,DK04,=D'4',=W'30',CKTBUF,=W'128' «, t00=0x0039, t01=0x000c}
0x5940…5958 Head {h00=0x0014, h01=0x0050, text=» BNOK BCK005 NOK«, t00=0x0039, t01=0x0042}
0x5958…596c Head {h00=0x0010, h01=0x0050, text=» B BCK000 OK«, t00=0x0039, t01=0x005a}
0x596c…5976 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x006e}
0x5976…598e Head {h00=0x0014, h01=0x0050, text=»BSOP07 FINISH «, t00=0x0039, t01=0x0078}
0x598e…59b6 Head {h00=0x0024, h01=0x0050, text=» PERF LAMPOF,=W'2047' LAMPS OFF «, t00=0x0039, t01=0x0090}
0x59b6…59e4 Head {h00=0x002a, h01=0x0050, text=» PERF ASGVOL,CBIN1 ASSIGN SYSTEM FILES«, t00=0x0039, t01=0x00b8}
0x59e4…59f8 Head {h00=0x0010, h01=0x0050, text=» BNOK BCKNOK«, t00=0x0039, t01=0x00e6}
0x59f8…5a06 Head {h00=0x000a, h01=0x0050, text=»BCK100«, t00=0x0039, t01=0x00fa}
0x5a06…5a20 Head {h00=0x0016, h01=0x0050, text=» PERF ASGVOL,CBIN2«, t00=0x0039, t01=0x0108}
0x5a20…5a34 Head {h00=0x0010, h01=0x0050, text=» BNOK BCKNOK«, t00=0x0039, t01=0x0122}
0x5a34…5a4e Head {h00=0x0016, h01=0x0050, text=» ADD CVOLNO,=D'1' «, t00=0x0039, t01=0x0136}
0x5a4e…5a62 Head {h00=0x0010, h01=0x0050, text=» PERF STRTWR«, t00=0x0039, t01=0x0150}
0x5a62…5a74 Head {h00=0x000e, h01=0x0050, text=» BOK BCKOK«, t00=0x0039, t01=0x0164}
0x5a74…5a8e Head {h00=0x0016, h01=0x0050, text=» SUB CVOLNO,=D'1' «, t00=0x0039, t01=0x0176}
0x5a8e…5ab0 Head {h00=0x001e, h01=0x0050, text=» PERF LAMPON,=W'2' LAMP 10«, t00=0x0039, t01=0x0190}
0x5ab0…5ac2 Head {h00=0x000e, h01=0x0050, text=» B BCKNOK «, t00=0x003a, t01=0x0022}
0x5ac2…5acc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0034}
0x5acc…5ada Head {h00=0x000a, h01=0x0050, text=»BCKNOK«, t00=0x003a, t01=0x003e}
0x5ada…5af6 Head {h00=0x0018, h01=0x0050, text=» CMP CBIN1,CBIN0 NOK«, t00=0x003a, t01=0x004c}
0x5af6…5b02 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x003a, t01=0x0068}
0x5b02…5b0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0074}
0x5b0c…5b1a Head {h00=0x000a, h01=0x0050, text=»BCKOK «, t00=0x003a, t01=0x007e}
0x5b1a…5b3a Head {h00=0x001c, h01=0x0050, text=» PERF WRITID,CBIN2,CBIN1«, t00=0x003a, t01=0x008c}
0x5b3a…5b52 Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x003a, t01=0x00ac}
0x5b52…5b5e Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x003a, t01=0x00c4}
0x5b5e…5b6c Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x003a, t01=0x00d0}
0x5b6c…5b7a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003a, t01=0x00de}
0x5b7a…5b84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x00ec}
0x5b84…5b8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x00f6}
0x5b8e…5bc8 Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x003a, t01=0x0100}
0x5bc8…5bd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x013a}
0x5bd2…5bec Head {h00=0x0016, h01=0x0050, text=»* FORMATS «, t00=0x003a, t01=0x0144}
0x5bec…5bf6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x015e}
0x5bf6…5c30 Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x003a, t01=0x0168}
0x5c30…5c4a Head {h00=0x0016, h01=0x0050, text=»DUMTAB KTAB EORKY1«, t00=0x003b, t01=0x0012}
0x5c4a…5c54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x002c}
0x5c54…5c68 Head {h00=0x0010, h01=0x0050, text=»FMTFKI FRMT «, t00=0x003b, t01=0x0036}
0x5c68…5c74 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x003b, t01=0x004a}
0x5c74…5c82 Head {h00=0x000a, h01=0x0050, text=» FKI 1«, t00=0x003b, t01=0x0056}
0x5c82…5c9c Head {h00=0x0016, h01=0x0050, text=» FMEL 'B',TSWBCD2 «, t00=0x003b, t01=0x0064}
0x5c9c…5caa Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x003b, t01=0x007e}
0x5caa…5cb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x008c}
0x5cb4…5cc8 Head {h00=0x0010, h01=0x0050, text=»PCKINIT FRMT«, t00=0x003b, t01=0x0096}
0x5cc8…5cde Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',40 «, t00=0x003b, t01=0x00aa}
0x5cde…5cf4 Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',40 «, t00=0x003b, t01=0x00c0}
0x5cf4…5d10 Head {h00=0x0018, h01=0x0050, text=» FBT CSWFLAG,INIT10 «, t00=0x003b, t01=0x00d6}
0x5d10…5d28 Head {h00=0x0014, h01=0x0050, text=» FILLR X'00',48 «, t00=0x003b, t01=0x00f2}
0x5d28…5d36 Head {h00=0x000a, h01=0x0050, text=» FEXIT«, t00=0x003b, t01=0x010a}
0x5d36…5d44 Head {h00=0x000a, h01=0x0050, text=»INIT10«, t00=0x003b, t01=0x0118}
0x5d44…5d5a Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',48 «, t00=0x003b, t01=0x0126}
0x5d5a…5d68 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x003b, t01=0x013c}
0x5d68…5d72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x014a}
0x5d72…5d86 Head {h00=0x0010, h01=0x0050, text=»FRVOLID FRMT«, t00=0x003b, t01=0x0154}
0x5d86…5da6 Head {h00=0x001c, h01=0x0050, text=» FMEL '999999',CMASKDAT «, t00=0x003b, t01=0x0168}
0x5da6…5dc4 Head {h00=0x001a, h01=0x0050, text=» FMEL 'B99999',GSWBCD3«, t00=0x003b, t01=0x0188}
0x5dc4…5dd2 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x003c, t01=0x0016}
0x5dd2…5ddc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0024}
0x5ddc…5df0 Head {h00=0x0010, h01=0x0050, text=»SLUTFRM FRMT«, t00=0x003c, t01=0x002e}
0x5df0…5e08 Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'SLUTD'«, t00=0x003c, t01=0x0042}
0x5e08…5e26 Head {h00=0x001a, h01=0x0050, text=» FMEL '99999',CRECBCD «, t00=0x003c, t01=0x005a}
0x5e26…5e34 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x003c, t01=0x0078}
0x5e34…5e3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0086}
0x5e3e…5e52 Head {h00=0x0010, h01=0x0050, text=»STARTFR FRMT«, t00=0x003c, t01=0x0090}
0x5e52…5e6a Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'Z300 '«, t00=0x003c, t01=0x00a4}
0x5e6a…5e90 Head {h00=0x0022, h01=0x0050, text=» FMEL '9999',CKMDNR KOMMUNE NR«, t00=0x003c, t01=0x00bc}
0x5e90…5ea6 Head {h00=0x0012, h01=0x0050, text=» FILLR C'2',1 «, t00=0x003c, t01=0x00e2}
0x5ea6…5ec2 Head {h00=0x0018, h01=0x0050, text=» FCOPY CVOL(GSWBIN6)«, t00=0x003c, t01=0x00f8}
0x5ec2…5ee4 Head {h00=0x001e, h01=0x0050, text=» FMEL '999',CRELDAY DAG NR«, t00=0x003c, t01=0x0114}
0x5ee4…5f06 Head {h00=0x001e, h01=0x0050, text=» FILLR C'1',1 MIXED TRANS «, t00=0x003c, t01=0x0136}
0x5f06…5f1a Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',6«, t00=0x003c, t01=0x0158}
0x5f1a…5f28 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x003c, t01=0x016c}
0x5f28…5f32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x017a}
0x5f32…5f46 Head {h00=0x0010, h01=0x0050, text=»ADFRM01 FRMT«, t00=0x003c, t01=0x0184}
0x5f46…5f52 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x003d, t01=0x0008}
0x5f52…5f6a Head {h00=0x0014, h01=0x0050, text=» FCOPY ='KLAR ' «, t00=0x003d, t01=0x0014}
0x5f6a…5f82 Head {h00=0x0014, h01=0x0050, text=» FCOPY ='ADM ' «, t00=0x003d, t01=0x002c}
0x5f82…5fa0 Head {h00=0x001a, h01=0x0050, text=» FKI 12,MINL=1,MAXL=2 «, t00=0x003d, t01=0x0044}
0x5fa0…5fba Head {h00=0x0016, h01=0x0050, text=» FMEL 'ZZ',GSWBCD3«, t00=0x003d, t01=0x0062}
0x5fba…5fc8 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x003d, t01=0x007c}
0x5fc8…5fd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x008a}
0x5fd2…5fdc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0094}
0x5fdc…5ff0 Head {h00=0x0010, h01=0x0050, text=»OPENFRM FRMT«, t00=0x003d, t01=0x009e}
0x5ff0…5ffc Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x003d, t01=0x00b2}
0x5ffc…6014 Head {h00=0x0014, h01=0x0050, text=» FCOPY ='ADM ' «, t00=0x003d, t01=0x00be}
0x6014…6030 Head {h00=0x0018, h01=0x0050, text=» FBT GTDYFLG,OPFR05 «, t00=0x003d, t01=0x00d6}
0x6030…6040 Head {h00=0x000c, h01=0x0050, text=» FTAB 1 «, t00=0x003d, t01=0x00f2}
0x6040…605e Head {h00=0x001a, h01=0x0050, text=» FCOPY =C'KASSE]BNING'«, t00=0x003d, t01=0x0102}
0x605e…606c Head {h00=0x000a, h01=0x0050, text=»OPFR05«, t00=0x003d, t01=0x0120}
0x606c…6078 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x003d, t01=0x012e}
0x6078…6094 Head {h00=0x0018, h01=0x0050, text=» FBF GTMASTFL,OPFR10«, t00=0x003d, t01=0x013a}
0x6094…60b0 Head {h00=0x0018, h01=0x0050, text=» FCOPY =C'DAGS-DATO'«, t00=0x003d, t01=0x0156}
0x60b0…60e0 Head {h00=0x002c, h01=0x0050, text=» FKI 11,MINL=6,MAXL=6,SCHK=2,REWRT,NCLR «, t00=0x003d, t01=0x0172}
0x60e0…6104 Head {h00=0x0020, h01=0x0050, text=» FMEL '99E-99E-99',CMASKDAT «, t00=0x003e, t01=0x0012}
0x6104…6110 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x003e, t01=0x0036}
0x6110…612a Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'DAG NR' «, t00=0x003e, t01=0x0042}
0x612a…6150 Head {h00=0x0022, h01=0x0050, text=» FKI 11,MINL=1,MAXL=3,APPL=102«, t00=0x003e, t01=0x005c}
0x6150…616c Head {h00=0x0018, h01=0x0050, text=» FMEL 'ZZZ',CRELDAY «, t00=0x003e, t01=0x0082}
0x616c…6178 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x003e, t01=0x009e}
0x6178…6186 Head {h00=0x000a, h01=0x0050, text=»OPFR10«, t00=0x003e, t01=0x00aa}
0x6186…61a2 Head {h00=0x0018, h01=0x0050, text=» FCOPY ='POST-DATO' «, t00=0x003e, t01=0x00b8}
0x61a2…61cc Head {h00=0x0026, h01=0x0050, text=» FKI 11,MINL=6,MAXL=6,SCHK=2,REWRT«, t00=0x003e, t01=0x00d4}
0x61cc…61ee Head {h00=0x001e, h01=0x0050, text=» FMEL '99E-99E-99',GTDATO «, t00=0x003e, t01=0x00fe}
0x61ee…61fa Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x003e, t01=0x0120}
0x61fa…6214 Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'DAG NR' «, t00=0x003e, t01=0x012c}
0x6214…623a Head {h00=0x0022, h01=0x0050, text=» FKI 11,MINL=1,MAXL=3,APPL=107«, t00=0x003e, t01=0x0146}
0x623a…625c Head {h00=0x001e, h01=0x0050, text=» FMEL 'ZZZ',GSWBCD3 DUMMY «, t00=0x003e, t01=0x016c}
0x625c…626a Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x003e, t01=0x018e}
0x626a…6274 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x000c}
0x6274…6288 Head {h00=0x0010, h01=0x0050, text=»CLFRM01 FRMT«, t00=0x003f, t01=0x0016}
0x6288…6294 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x003f, t01=0x002a}
0x6294…62b4 Head {h00=0x001c, h01=0x0050, text=» FCOPY =C'KASSELUKNING' «, t00=0x003f, t01=0x0036}
0x62b4…62ca Head {h00=0x0012, h01=0x0050, text=» FLINK FMTFKI «, t00=0x003f, t01=0x0056}
0x62ca…62d8 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x003f, t01=0x006c}
0x62d8…62e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x007a}
0x62e2…62f6 Head {h00=0x0010, h01=0x0050, text=»CLFRM02 FRMT«, t00=0x003f, t01=0x0084}
0x62f6…630a Head {h00=0x0010, h01=0x0050, text=» FILLR '1',2«, t00=0x003f, t01=0x0098}
0x630a…632a Head {h00=0x001c, h01=0x0050, text=» FCOPY =C'KASSELUKNING' «, t00=0x003f, t01=0x00ac}
0x632a…6336 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x003f, t01=0x00cc}
0x6336…6352 Head {h00=0x0018, h01=0x0050, text=» FCOPY GSWSTR20 TEXT«, t00=0x003f, t01=0x00d8}
0x6352…6378 Head {h00=0x0022, h01=0x0050, text=» FMEL 'ZZ',GTWBCD1 COUNTER NR «, t00=0x003f, t01=0x00f4}
0x6378…638c Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',4«, t00=0x003f, t01=0x011a}
0x638c…63aa Head {h00=0x001a, h01=0x0050, text=» FCOPY GTDBKRC DEB-KRE«, t00=0x003f, t01=0x012e}
0x63aa…63b6 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x003f, t01=0x014c}
0x63b6…63d0 Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'KONTONR'«, t00=0x003f, t01=0x0158}
0x63d0…63e4 Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',5«, t00=0x003f, t01=0x0172}
0x63e4…6402 Head {h00=0x001a, h01=0x0050, text=» FCOPY =X'42454C5C42' «, t00=0x003f, t01=0x0186}
0x6402…640e Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0040, t01=0x0014}
0x640e…6438 Head {h00=0x0026, h01=0x0050, text=» FMEL '99999999E-99',GTDUPF(CBIN1)«, t00=0x0040, t01=0x0020}
0x6438…646a Head {h00=0x002e, h01=0x0050, text=» FMEL 'BTTT.TTT.TTT.TT9.99-',GTDUPF(CBIN4)«, t00=0x0040, t01=0x004a}
0x646a…6478 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0040, t01=0x007c}
0x6478…6482 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x008a}
0x6482…6496 Head {h00=0x0010, h01=0x0050, text=»CLFRM03 FRMT«, t00=0x0040, t01=0x0094}
0x6496…64aa Head {h00=0x0010, h01=0x0050, text=» FILLR '1',2«, t00=0x0040, t01=0x00a8}
0x64aa…64c8 Head {h00=0x001a, h01=0x0050, text=» FBT GTSPGFLG,CLF0301 «, t00=0x0040, t01=0x00bc}
0x64c8…64e8 Head {h00=0x001c, h01=0x0050, text=» FCOPY =C'KASSELUKNING' «, t00=0x0040, t01=0x00da}
0x64e8…64f8 Head {h00=0x000c, h01=0x0050, text=»CLF0301 «, t00=0x0040, t01=0x00fa}
0x64f8…6504 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0040, t01=0x010a}
0x6504…651c Head {h00=0x0014, h01=0x0050, text=» FCOPY GSWSTR20 «, t00=0x0040, t01=0x0116}
0x651c…652a Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0040, t01=0x012e}
0x652a…6534 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x013c}
0x6534…6548 Head {h00=0x0010, h01=0x0050, text=»CLFRM04 FRMT«, t00=0x0040, t01=0x0146}
0x6548…6554 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0040, t01=0x015a}
0x6554…6572 Head {h00=0x001a, h01=0x0050, text=» FBT GTSPGFLG,CLF0401 «, t00=0x0040, t01=0x0166}
0x6572…6590 Head {h00=0x001a, h01=0x0050, text=» FCOPY ='KASSELUKNING'«, t00=0x0040, t01=0x0184}
0x6590…65a0 Head {h00=0x000c, h01=0x0050, text=»CLF0401 «, t00=0x0041, t01=0x0012}
0x65a0…65ac Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0041, t01=0x0022}
0x65ac…65d0 Head {h00=0x0020, h01=0x0050, text=» FCOPY ='BEHOLDNINGST[LLERE'«, t00=0x0041, t01=0x002e}
0x65d0…65dc Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0041, t01=0x0052}
0x65dc…65e8 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0041, t01=0x005e}
0x65e8…6606 Head {h00=0x001a, h01=0x0050, text=» FBT GTSPGFLG,CLF0402 «, t00=0x0041, t01=0x006a}
0x6606…6626 Head {h00=0x001c, h01=0x0050, text=» FCOPY ='SLET PERIODE ' «, t00=0x0041, t01=0x0088}
0x6626…6636 Head {h00=0x000c, h01=0x0050, text=» FTAB 15«, t00=0x0041, t01=0x00a8}
0x6636…664c Head {h00=0x0012, h01=0x0050, text=» FCOPY =' DEB'«, t00=0x0041, t01=0x00b8}
0x664c…6658 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0041, t01=0x00ce}
0x6658…6676 Head {h00=0x001a, h01=0x0050, text=» FCOPY ='SLET SALDO ' «, t00=0x0041, t01=0x00da}
0x6676…6686 Head {h00=0x000c, h01=0x0050, text=» FTAB 15«, t00=0x0041, t01=0x00f8}
0x6686…669c Head {h00=0x0012, h01=0x0050, text=» FCOPY =' KRE'«, t00=0x0041, t01=0x0108}
0x669c…66ac Head {h00=0x000c, h01=0x0050, text=»CLF0402 «, t00=0x0041, t01=0x011e}
0x66ac…66b8 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0041, t01=0x012e}
0x66b8…66d4 Head {h00=0x0018, h01=0x0050, text=» FCOPY ='SUBTOTAL ' «, t00=0x0041, t01=0x013a}
0x66d4…66e4 Head {h00=0x000c, h01=0x0050, text=» FTAB 16«, t00=0x0041, t01=0x0156}
0x66e4…66fa Head {h00=0x0012, h01=0x0050, text=» FCOPY ='KVIT'«, t00=0x0041, t01=0x0166}
0x66fa…6706 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0041, t01=0x017c}
0x6706…6712 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0041, t01=0x0188}
0x6712…671e (66, 2, 122) Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0042, t01=0x0004}
0x671e…6732 Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',1«, t00=0x0042, t01=0x0010}
0x6732…674a Head {h00=0x0014, h01=0x0050, text=» FCOPY ='BILAG' «, t00=0x0042, t01=0x0024}
0x674a…6760 Head {h00=0x0012, h01=0x0050, text=» FLINK FMTFKI «, t00=0x0042, t01=0x003c}
0x6760…676e Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0042, t01=0x0052}
0x676e…6778 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0060}
0x6778…6784 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0042, t01=0x006a}
0x6784…6788 Head {h00=0x4004, h01=0x0000}
0x6788…678c 00 42 00 76 ┆ B v┆
0x678c…6794 (67, 1, 8) 20 04 00 00 00 43 00 04 ┆ C ┆
0x6794…67e4 (68, 0, 400) 47 45 44 20 00 14 49 4c 4c 45 47 41 4c 20 50 41 52 41 4d 45 54 45 52 20 00 0e 4c 45 4e 47 54 48 20 45 52 52 4f 52 00 0e 44 41 54 41 53 45 54 20 42 55 53 59 00 1c 49 4c 4c 45 47 41 4c 20 44 41 54 41 53 45 54 20 52 45 46 45 52 45 4e 43 45 20 ┆GED ILLEGAL PARAMETER LENGTH ERROR DATASET BUSY ILLEGAL DATASET REFERENCE ┆
0x67e4…6834 00 20 54 4f 4f 20 4d 41 4e 59 20 4b 49 41 2f 4e 4b 49 41 20 53 54 41 43 4b 20 4c 45 56 45 4c 53 00 1e 44 49 53 43 20 45 52 52 4f 52 3b 20 4e 4f 20 52 45 45 4e 54 45 52 20 50 4f 49 4e 54 00 00 03 02 e1 04 57 02 03 04 39 c4 82 04 22 0f ea 20 ┆ TOO MANY KIA/NKIA STACK LEVELS DISC ERROR; NO REENTER POINT W 9 " ┆
0x6834…6884 00 0a 52 02 12 07 12 30 e2 31 14 01 1b 01 59 18 f0 3a 83 12 3b 61 82 56 ff f6 50 0e 84 56 ff f4 14 0e 81 10 91 50 ff f4 57 08 84 20 2e ba 81 20 41 5c 3c 61 eb 10 52 0c 39 61 eb 04 56 06 f6 a1 b7 0e f0 3a 01 10 8f 20 b3 de 00 01 00 00 83 d6 ┆ R 0 1 Y : ;a V P V P W . A <a R 9a V : ┆
0x6884…68d4 ff fc 81 40 b7 0c 50 18 07 00 80 a0 00 01 9c d6 ff f4 28 04 00 06 f6 a1 93 62 94 d6 ff f4 5f 22 81 40 b9 88 50 0a 83 40 b9 8a 50 6a eb 0e 50 66 81 20 b8 7e 84 12 9c 56 ff f4 82 24 11 04 ec 24 54 24 83 44 00 42 52 1e eb 56 ff f6 54 18 83 44 ┆ @ P ( b _" @ P @ Pj Pf ~ V $ $T$ D BR V T D┆
0x68d4…6924 00 02 50 04 eb 0e 54 12 83 44 00 40 50 4c 1b 01 83 45 00 40 57 04 1a 01 5c 2e 81 40 b9 02 50 24 85 20 b7 be 81 20 b9 04 82 24 11 04 83 24 50 10 eb c4 00 42 54 0a 84 2c 00 00 00 00 00 00 00 00 00 00 00 00 02 80 88 20 08 48 40 00 00 02 50 0c ┆ P T D @PL E @W . @ P$ $ $P BT , H@ P ┆