|
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: 16556 (0x40ac)
Notes: pts_type(SC)
Names: »ADM6.SC«
└─⟦f445cacdf⟧ Bits:30009666 Philips computer tape "600111"
└─⟦this⟧ »NJ-AMT/ADM6.SC«
IDENT ADM6 821105 NJ DDUM KMD08 PDIV ENTRY ADM600 ENTRY SIGNON ENTRY CHNGDK ENTRY STRTRC ENTRY SENDRC ENTRY TERMIN ENTRY SIGNOF ENTRY EXCHAN ENTRY TRNOK ENTRY WJDC * EXT SPCLRS EXT SLUTID EXT RAWRIT EXT WRITID EXT LAMPOF EXT ADMRET EXT SPERR EXT CLSVOL EXT LAMPON EXT SOPRD EXT ASGVOL EXT BCKUP EXT RAREAD EXT GETBIT EXT WRITJT * INCLUDE EQUATE EJECT ADM600 MOVE GSWBIN1,=X'00' DETACH DEVICE DSC1 DCOMM,TRPAR,GSWBIN1 SET CCONVFLG CLEAR SPKEYFLG TBT GTKASSE,ADM0605 TBF GTMASTFL,ADM0605 CBNE CTASKNR,CBIN0,ADM0605 SET SPPROMPT MOVE SPKEY,CBIN2 ATTFMT SNDFRM6 PERF SPCLRS IB SPBINW2,ADM0605,ADM0605,ADM0610 B ADM600 ADM0605 B ADM06RET * WRITE SLUTD ADM0610 MOVE GSWBIN1,=X'41' DEVICE ADDRESS DSC1 DCOMM,TRPAR,GSWBIN1 TRANSFER PARAM ADM0611 SET SPPROMPT ATTFMT SNDFRM PERF SPCLRS IB SPBINW2,ADM0612,ADM0612,ADM0615 B ADM0611 ADM0612 B ADM600 ADM0615 SUB CRECBCD,=D'1' PERF SLUTID,CRECBCD ADD CRECBCD,=D'1' PERF RAWRIT,DK02,=D'2',CPCKBUF,CRECNR BNOK ADM600 PERF WRITID,CBIN5,CBIN2 SLUTID ON JOURNAL EJECT ************************************************** * BATCH TRANSMISSION * 1) SIGNON * 2) CHANGE DISK * 3) SEND STARTIDENT * 4) SEND TRANSACTIONS AND SLUTID * 5) IN CASE OF ERROR SEND TERMINATE * 6) WHEN ALL TRANSMITTED SEND SIGNOFF ************************************************* PERF SIGNON BNOK ADM06OUT ADM0620 PERF LAMPOF,=W'2047' ADM0630 PERF CHNGDK CHANGE DISC BNOK ADM6SOFF PERF STRTRC SEND STARTIDENT BNOK ADM0630 IF NOT OK, TRY NEXT PERF SENDRC SEND BATCH BOK ADM0620 PERF TERMIN SEND TERMINATE PERF LAMPOF,=W'2047' PERF LAMPON,=W'2' LAMP 10, ERROR B ADM0630 ADM6SOFF PERF SIGNOF SEND SIGNOFF ADM06OUT MOVE CTRANBUF,=X'00' CLEAR TR 12 COUNTERS MOVE GSWBIN1,=X'00' DETACH DEVICE DSC1 DCOMM,TRPAR,GSWBIN1 ADM06RET CLEAR CCONVFLG SET SPKEYFLG PERF LAMPOF,=W'2047' B ADMRET EJECT ************************************************ * * SIGNON * IF NOT OK CR NOT = 0 * ************************************************ SIGNON PROC MOVE GSWBIN1,CBIN5 MOVE GSWBIN2,=W'50' MOVE CTRANBUF,=C' ' EDIT CTRANBUF,SIGONF * FIND LENGTH MATCH CTRANBUF,GSWBIN1,GSWBIN2,CBLANKS,CBIN0,CBIN2 MOVE GSWBIN2,GSWBIN1 TBT CTESTFLG,SIGON10 PERF EXCHAN EXCHANGE DC BNOK SIGON100 PERF WJDC MOVE GSWSTR20,=C'DFH3504' MOVE GSWBIN1,CBIN0 MATCH CTRANBUF,GSWBIN1,GSWBIN2,GSWSTR20,CBIN0,CBIN7 BNE SIGON100 SIGON10 EDWRT SCREEN,SNDFRM3 CMP CBIN0,CBIN0 RET SIGON100 MOVE SPBINW4,CBIN21 MOVE GTWBCD2,=D'60' MOVE GSWSTR9,=C'TRANSMIT ' MOVE GTWBCD1,=D'16' PERF SPERR PERF WRITJT,=W'14' CMP CBIN0,CBIN1 RET PEND EJECT ********************************************* * * CHNGDK - CHANGE DISK * * STOP SEND PIN 6 * CONTINIUE PIN 5 * ********************************************* CHNGDK PROC CHNG000 PERF CLSVOL,CBIN2 CLOSE FILES ON VOL 2 MOVE CRECNR,CBIN1 MOVE CRECBCD,=D'1' PERF LAMPON,=W'1024' LAMP 1 PERF LAMPON,=W'64' LAMP 5 PERF LAMPON,=W'32' LAMP 6 PERF LAMPON,=W'16' LAMP 7 CHNG010 PERF SOPRD CLEAR TTLOKFLG IB GSWBIN2, C CHSOP10,CHSOP09,CHSOP08,CHSOP07,CHSOP06, C CHSOP05,CHSOP04,CHSOP03,CHSOP02,CHSOP01 B CHNG010 CATCH INV. VALUES CHSOP01 SET TTLOKFLG EDWRT KJTAPE,LOKFMT B CHSOP05 CHSOP02 CHSOP03 CHSOP04 CHSOP08 CHSOP09 B CHNG010 * CHSOP10 * ERROR, SIGN ON AGAIN PERF LAMPOF,=W'2047' LAMPS OFF PERF LAMPON,=W'2' LAMP 10 SET SPPROMPT ATTFMT SNDFRM SIGNON FORMAT PERF SPCLRS IB SPBINW2,CH1010,CH1010,CH1020 CH1010 B CHNG000 CH1020 PERF SIGNON BNOK CHNG000 PERF LAMPOF,=W'2047' B CHNG000 * CHSOP05 PERF LAMPOF,=W'2047' LAMPS OFF PERF ASGVOL,CBIN2 ASSIGN DISK 2 BOK CHNG050 PERF LAMPON,=W'2' B CHNG000 CHNG050 PERF LAMPON,=W'64' LAMP 5 CMP CBIN0,CBIN0 SET CR RET * CHSOP06 SOP 6 PERF LAMPOF,=W'2047' LAMPS OFF PERF BCKUP,=W'1' WITHOUT BACKUP BNOK CHNG000 B CHNG130 * CHSOP07 PERF LAMPOF,=W'2047' LAMPS OFF PERF BCKUP,=W'2' WITH BACKUP BNOK CHNG000 B CHNG130 * CHNG130 PERF LAMPOF,=W'2047' CMP CBIN0,CBIN1 INDICATE ERROR OR END OF TRANS RET PEND EJECT ****************************************** * * STRTRC - SEND OF STARTIDENT * AND CHECK REPLY * ******************************************* STRTRC PROC PERF LAMPOF,=W'2047' PERF LAMPON,=W'64' MOVE GSWBIN6,CBIN1 MOVE GSWBIN1,=W'128' PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,GSWBIN6 BNOK STRTRET CBE GTWBCD1,=D'4',STRTRET RECORD DELETED? PERF WRITID,CBIN5,CBIN1 MOVE GSWBIN6,CBIN0 MOVE GSWBIN1,=W'40' MOVE GSWSTR20,CBLANKS COPY CPCKBUF,GSWBIN1,CBIN20,GSWSTR20,GSWBIN6 MOVE CTRANBUF,=C' ' EDIT CTRANBUF,SNDFRM2 MOVE GSWBIN2,=W'31' LENGTH PERF EXCHAN EXCHANGE DC BNOK STRTRET PERF TRNOK CHECK IF OK BNOK STRTRET CMP CBIN0,CBIN0 SET CR RET STRTRET CMP CBIN0,CBIN1 RET PEND EJECT ********************************************** * * SENDRC - SEND BATCH UNTIL SLUTID * ********************************************** SENDRC PROC MOVE CRECNR,CBIN1 SND005 MOVE GSWBIN3,CBIN0 PACKPOINTER SND010 ADD CRECNR,CBIN1 MOVE GSWBIN1,=W'128' PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,CRECNR BNOK SNDERR CMP GTWBCD1,=D'4' BE SNDERR RECORD DELETED ? TBF TTLOKFLG,SND012 PIN 1 PRESSED? MOVE GSWSTR20,='G01' REPLEASE G01 MOVE GSWBIN5,CBIN3 BYE R31 MATCH CPCKBUF,GSWBIN5,CBIN3,GSWSTR20,CBIN0,CBIN3 BNOK SND012 NO MATCH MOVE GSWSTR20,='R01' REPLACE XCOPY CPCKBUF,GSWBIN5,CBIN3,GSWSTR20,CBIN0 SND012 MOVE GSWSTR20,=C'SLUTD' MOVE GSWBIN5,CBIN0 MATCH GSWSTR20,GSWBIN5,CBIN5,CPCKBUF,CBIN0,CBIN5 BE SNDSLUT MOVE GSWSTR9,=X'7F' FIND LENGTH SND015 MOVE GSWBIN4,CBIN0 MOVE GSWBIN5,=W'128' MATCH CPCKBUF,GSWBIN4,GSWBIN5,GSWSTR9,CBIN0,CBIN1 BE SND020 MOVE GSWSTR9,=X'21' B SND015 SND020 ADD GSWBIN4,GSWBIN3 SEE IF MORE SPACE CBNG GSWBIN4,=W'504',SND030 SUB CRECNR,CBIN1 NO MORE SPACE B SND040 SEND BUFFER SND030 SUB GSWBIN4,GSWBIN3 RESTORE ADD GSWBIN4,CBIN1 FILL WITH X'00' CBE GSWBIN4,=W'128',SND037 MOVE GSWSTR20,=X'00' MOVE GSWBIN5,=W'128' SND035 INSRT CPCKBUF,GSWBIN4,CBIN20,GSWSTR20,CBIN0 SUB GSWBIN5,CBIN20 CBG GSWBIN5,GSWBIN4,SND035 ALL TRAILING FILLED SND037 EDSUB CTRANBUF,GSWBIN3,SNDFRM5 INSERT RECORD B SND010 READ NEXT SND040 MOVE GSWBIN2,GSWBIN3 MOVE SPBINW1,=X'0301' MOVE TTARKSAV,CRECNR DSC1 SCREEN,POS,SPBINW1 EDWRT .NW,SCREEN,SNDFRM4 DISPLAY RECNR PERF EXCHAN BNOK SNDERR PERF TRNOK BNOK SNDERR B SND005 SNDSLUT CBE GSWBIN3,CBIN0,SND090 REQ.LGTH.=0 ? MOVE GSWBIN2,GSWBIN3 PERF EXCHAN EXCHANGE DC BNOK SNDERR PERF TRNOK BNOK SNDERR SND090 MOVE GSWBIN3,CBIN0 MOVE CTRANBUF,=C' ' EDSUB CTRANBUF,GSWBIN3,SNDFRM5 MOVE GSWBIN2,CBIN18 PERF EXCHAN BNOK SNDERR PERF WRITID,CBIN5,CBIN2 PERF WJDC PRINT ANSWER TBT CTESTFLG,SNDSL10 MOVE GSWSTR9,=C'0002' MOVE GSWBIN1,CBIN0 MOVE GSWBIN2,=W'52' MATCH CTRANBUF,GSWBIN1,GSWBIN2,GSWSTR9,CBIN0,CBIN4 BNE SNDERR SNDSL10 CMP CBIN0,CBIN0 RET SNDERR CMP CBIN1,CBIN0 RET PEND EJECT ******************************************** * * TERMIN - TERMINATE TRANSMISSION IN CASE OF ERROR * ******************************************** TERMIN PROC MOVE GSWBIN3,CBIN0 MOVE CTRANBUF,=C' ' MOVE CPCKBUF,=C'TERMINATE ' MOVE GSWBIN3,CBIN0 EDSUB CTRANBUF,GSWBIN3,SNDFRM2 MOVE GSWBIN2,CBIN14 PERF EXCHAN EXCHANGE DC BNOK TERMRET PERF WJDC TERMRET RET PEND EJECT ********************************************* * * SIGNOFF * ********************************************* SIGNOF PROC MOVE GSWBIN3,CBIN0 MOVE CTRANBUF,=C' ' MOVE CPCKBUF,=C'CSSF ' EDSUB CTRANBUF,GSWBIN3,SNDFRM2 MOVE GSWBIN2,CBIN9 PERF EXCHAN BNOK SIGOFRET TBT CTESTFLG,SIGOFRT1 PERF WJDC PRINT ANSWER SIGOFRET RET SIGOFRT1 CMP CBIN0,CBIN0 RET PEND EJECT ********************************************* * * EXCHAN - EXCHANGE DC * IN CASE OF ERROR ERRORMESSAGE * IS SHOWN ON SCREEN AND JOURNAL * ********************************************* EXCHAN PROC TBT CTESTFLG,EXCHTEST MOVE GSWBIN5,=W'600' TIMEOUT VALUE DCWRITE DCOMM,CTRANBUF,GSWBIN2,GSWBIN5 BNOK EXCHNOK MOVE GSWBIN2,=W'504' MOVE GSWBIN5,=W'600' DCREAD DCOMM,CTRANBUF,GSWBIN2,GSWBIN5 BOK EXCHRET EXCHNOK PERF GETBIT,DCOMM FETCH ERRORCODE MOVE SPBINW4,CBIN21 MOVE GTWBCD2,=D'60' MOVE GSWSTR9,=C'TRANSMIT ' PERF SPERR PERF WRITJT,=W'14' CMP CBIN0,CBIN1 RET EXCHRET CMP CBIN0,CBIN0 RET EXCHTEST MOVE GSWBIN2,CBIN20 MOVE CTRANBUF,=X'35' DELAY GSWBIN2 CMP CBIN0,CBIN0 RET PEND EJECT ********************************************* * * TRNOK - CHECK IF MESSAGE CORRECT RECIEVED * ********************************************* TRNOK PROC MOVE GSWBIN3,CBIN0 MOVE GSWSTR9,=X'35' MATCH CTRANBUF,GSWBIN3,GSWBIN2,GSWSTR9,CBIN0,CBIN1 BNE TRNERR MOVE GSWBIN2,CBIN0 MOVE CTRANBUF,=C' ' CMP CBIN0,CBIN0 RET TRNERR CMP CBIN0,CBIN1 RET PEND EJECT ************************************************* * * WJDC - PRINT RECEIVED MESSAGE ON JOURNAL * ************************************************* WJDC PROC WAIT KTALLY CBL GSWBIN2,CBIN1,WJDCRET CBG GSWBIN2,=W'504',WJDCRET MOVE GSWSTR9,=C'DFH' MOVE GSWBIN1,CBIN0 MATCH CTRANBUF,GSWBIN1,GSWBIN2,GSWSTR9,CBIN0,CBIN3 BE WJDC100 CICS MESSAGE * * APLICATION MESSAGE * MOVE GSWSTR9,=X'11' MOVE GSWBIN1,CBIN0 MATCH CTRANBUF,GSWBIN1,GSWBIN2,GSWSTR9,CBIN0,CBIN1 BNE WJDCRET * GSWBIN1=START ADD GSWBIN1,CBIN3 BYPASS SBA SEQUENSE MOVE GSWBIN4,GSWBIN1 SUB GSWBIN2,GSWBIN4 ADJUST LENGTH CBL GSWBIN2,CBIN1,WJDCRET WJDC005 MOVE CPCKBUF,=X'00' MATCH CTRANBUF,GSWBIN4,GSWBIN2,GSWSTR9,CBIN0,CBIN1 BNE WJDC010 SUB GSWBIN4,GSWBIN1 GSWBIN4 = LENGTH COPY CPCKBUF,CBIN0,GSWBIN4,CTRANBUF,GSWBIN1 EDWRT KJTAPE,WJDCFRM ADD GSWBIN4,CBIN3 SUB GSWBIN2,GSWBIN4 ADD GSWBIN4,GSWBIN1 MOVE GSWBIN1,GSWBIN4 CBG GSWBIN2,CBIN3,WJDC005 B WJDCRET WJDC010 B WJDC200 WJDCRET RET * * * WJDC100 SUB GSWBIN2,GSWBIN1 CBL GSWBIN2,=W'52',WJDC200 MOVE GSWBIN4,=W'30' FIND BLANK MATCH CTRANBUF,GSWBIN4,GSWBIN2,CBLANKS,CBIN0,CBIN1 BNE WJDC200 MOVE CPCKBUF,=X'00' SUB GSWBIN4,GSWBIN1 COPY CPCKBUF,CBIN0,GSWBIN4,CTRANBUF,GSWBIN1 EDWRT KJTAPE,WJDCFRM SUB GSWBIN2,GSWBIN4 ADD GSWBIN1,GSWBIN4 WJDC200 MOVE CPCKBUF,=X'00' CBL GSWBIN2,=W'52',WJDC210 MOVE GSWBIN2,=W'52' WJDC210 COPY CPCKBUF,CBIN0,GSWBIN2,CTRANBUF,GSWBIN1 EDWRT KJTAPE,WJDCFRM RET PEND EJECT SNDFRM FRMT FSL FCOPY =C'DATATRANSMISSION ' FNL FTEXT 'BRUGERNAVN' FKI 12,MINL=1,MAXL=13,ME FMEL 'AAAAAAAAAAAAAAAAAAA9',TTCYKTOT FNL FTEXT 'KENDEORD' FKI 12,MINL=1,MAXL=4,ME FMEL 'TTT9',TTARKSAV FILLR X'07',1 FMEND * SIGONF FRMT FILLR ' ',2 FCOPY =X'272020' FTEXT 'CSSN PS=' FMEL '9999',TTARKSAV FTEXT ',NAME=' FMEL 'AAAAAAAAAAAAAAAAAAA9',TTCYKTOT FMEND * SNDFRM2 FRMT FILLR ' ',2 FCOPY =X'272020' FCOPY CPCKBUF FMEND * SNDFRM3 FRMT FILLR '1',2 FCOPY =C'DATATRANSMISSION ' FILLR X'07',1 FMEND * SNDFRM4 FRMT FILLR ' ',2 FTEXT 'ANTAL RECORDS:' FMEL 'ZZZZZ9',TTARKSAV FMEND * SNDFRM5 FRMT FBNZ GSWBIN3,SNDLAB10 FILLR ' ',2 FCOPY =X'272020' SNDLAB10 FCOPY =X'112020' FCOPY CPCKBUF FMEND SNDFRM6 FRMT FSL FCOPY =C'DATATRANSMISSION ' FILLR '?',1 FILLR X'07',1 FNL FKI 1 FMEL 'B',TSWBCD2 FMEND * WJDCFRM FRMT FILLR ' ',2 FCOPY CPCKBUF FMEND * LOKFMT FRMT FILLR ' ',2 FTEXT 'FLG. DISKETTE SENDES TIL LOKALSYSTEM' FEOR FILLR ' ',2 FMEND END
0x0000…001e (0, 0, 400) Head {h00=0x001a, h01=0x0050, text=» IDENT ADM6 821105 NJ «, t00=0x0000, t01=0x0004}
0x001e…0032 Head {h00=0x0010, h01=0x000b, text=» DDUM KMD08 «, t00=0x0000, t01=0x0022}
0x0032…0040 Head {h00=0x000a, h01=0x0005, text=» PDIV «, t00=0x0000, t01=0x0036}
0x0040…0056 Head {h00=0x0012, h01=0x0050, text=» ENTRY ADM600 «, t00=0x0000, t01=0x0044}
0x0056…006c Head {h00=0x0012, h01=0x0050, text=» ENTRY SIGNON «, t00=0x0000, t01=0x005a}
0x006c…0082 Head {h00=0x0012, h01=0x0050, text=» ENTRY CHNGDK «, t00=0x0000, t01=0x0070}
0x0082…0098 Head {h00=0x0012, h01=0x0050, text=» ENTRY STRTRC «, t00=0x0000, t01=0x0086}
0x0098…00ae Head {h00=0x0012, h01=0x0050, text=» ENTRY SENDRC «, t00=0x0000, t01=0x009c}
0x00ae…00c4 Head {h00=0x0012, h01=0x0050, text=» ENTRY TERMIN «, t00=0x0000, t01=0x00b2}
0x00c4…00da Head {h00=0x0012, h01=0x0050, text=» ENTRY SIGNOF «, t00=0x0000, t01=0x00c8}
0x00da…00f0 Head {h00=0x0012, h01=0x0050, text=» ENTRY EXCHAN «, t00=0x0000, t01=0x00de}
0x00f0…0104 Head {h00=0x0010, h01=0x0050, text=» ENTRY TRNOK«, t00=0x0000, t01=0x00f4}
0x0104…0118 Head {h00=0x0010, h01=0x0050, text=» ENTRY WJDC «, t00=0x0000, t01=0x0108}
0x0118…0122 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x011c}
0x0122…0136 Head {h00=0x0010, h01=0x0050, text=» EXT SPCLRS «, t00=0x0000, t01=0x0126}
0x0136…014a Head {h00=0x0010, h01=0x0050, text=» EXT SLUTID «, t00=0x0000, t01=0x013a}
0x014a…015e Head {h00=0x0010, h01=0x0050, text=» EXT RAWRIT «, t00=0x0000, t01=0x014e}
0x015e…0172 Head {h00=0x0010, h01=0x0050, text=» EXT WRITID «, t00=0x0000, t01=0x0162}
0x0172…0186 Head {h00=0x0010, h01=0x0050, text=» EXT LAMPOF «, t00=0x0000, t01=0x0176}
0x0186…019a Head {h00=0x0010, h01=0x0050, text=» EXT ADMRET «, t00=0x0000, t01=0x018a}
0x019a…01ac Head {h00=0x000e, h01=0x0050, text=» EXT SPERR«, t00=0x0001, t01=0x000e}
0x01ac…01c0 Head {h00=0x0010, h01=0x0050, text=» EXT CLSVOL «, t00=0x0001, t01=0x0020}
0x01c0…01d4 Head {h00=0x0010, h01=0x0050, text=» EXT LAMPON «, t00=0x0001, t01=0x0034}
0x01d4…01e6 Head {h00=0x000e, h01=0x0050, text=» EXT SOPRD«, t00=0x0001, t01=0x0048}
0x01e6…01fa Head {h00=0x0010, h01=0x0050, text=» EXT ASGVOL «, t00=0x0001, t01=0x005a}
0x01fa…020c Head {h00=0x000e, h01=0x0050, text=» EXT BCKUP«, t00=0x0001, t01=0x006e}
0x020c…0220 Head {h00=0x0010, h01=0x0050, text=» EXT RAREAD «, t00=0x0001, t01=0x0080}
0x0220…0234 Head {h00=0x0010, h01=0x0050, text=» EXT GETBIT «, t00=0x0001, t01=0x0094}
0x0234…0248 Head {h00=0x0010, h01=0x0050, text=» EXT WRITJT «, t00=0x0001, t01=0x00a8}
0x0248…0252 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00bc}
0x0252…026a Head {h00=0x0014, h01=0x0050, text=» INCLUDE EQUATE «, t00=0x0001, t01=0x00c6}
0x026a…0278 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x00de}
0x0278…0286 Head {h00=0x000a, h01=0x0050, text=»ADM600«, t00=0x0001, t01=0x00ec}
0x0286…02b0 Head {h00=0x0026, h01=0x0050, text=» MOVE GSWBIN1,=X'00' DETACH DEVICE«, t00=0x0001, t01=0x00fa}
0x02b0…02d2 Head {h00=0x001e, h01=0x0050, text=» DSC1 DCOMM,TRPAR,GSWBIN1 «, t00=0x0001, t01=0x0124}
0x02d2…02e8 Head {h00=0x0012, h01=0x0050, text=» SET CCONVFLG «, t00=0x0001, t01=0x0146}
0x02e8…0300 Head {h00=0x0014, h01=0x0050, text=» CLEAR SPKEYFLG «, t00=0x0001, t01=0x015c}
0x0300…031c Head {h00=0x0018, h01=0x0050, text=» TBT GTKASSE,ADM0605«, t00=0x0001, t01=0x0174}
0x031c…033a Head {h00=0x001a, h01=0x0050, text=» TBF GTMASTFL,ADM0605 «, t00=0x0001, t01=0x0190}
0x033a…035e Head {h00=0x0020, h01=0x0050, text=» CBNE CTASKNR,CBIN0,ADM0605 «, t00=0x0002, t01=0x001e}
0x035e…0374 Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0002, t01=0x0042}
0x0374…038e Head {h00=0x0016, h01=0x0050, text=» MOVE SPKEY,CBIN2 «, t00=0x0002, t01=0x0058}
0x038e…03a6 Head {h00=0x0014, h01=0x0050, text=» ATTFMT SNDFRM6 «, t00=0x0002, t01=0x0072}
0x03a6…03ba Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRS«, t00=0x0002, t01=0x008a}
0x03ba…03e6 Head {h00=0x0028, h01=0x0050, text=» IB SPBINW2,ADM0605,ADM0605,ADM0610 «, t00=0x0002, t01=0x009e}
0x03e6…03f8 Head {h00=0x000e, h01=0x0050, text=» B ADM600 «, t00=0x0002, t01=0x00ca}
0x03f8…0408 Head {h00=0x000c, h01=0x0050, text=»ADM0605 «, t00=0x0002, t01=0x00dc}
0x0408…041c Head {h00=0x0010, h01=0x0050, text=» B ADM06RET «, t00=0x0002, t01=0x00ec}
0x041c…044c Head {h00=0x002c, h01=0x0050, text=»* WRITE SLUTD «, t00=0x0002, t01=0x0100}
0x044c…045c Head {h00=0x000c, h01=0x0050, text=»ADM0610 «, t00=0x0002, t01=0x0130}
0x045c…0488 Head {h00=0x0028, h01=0x0050, text=» MOVE GSWBIN1,=X'41' DEVICE ADDRESS «, t00=0x0002, t01=0x0140}
0x0488…04b8 Head {h00=0x002c, h01=0x0050, text=» DSC1 DCOMM,TRPAR,GSWBIN1 TRANSFER PARAM«, t00=0x0002, t01=0x016c}
0x04b8…04c8 Head {h00=0x000c, h01=0x0050, text=»ADM0611 «, t00=0x0003, t01=0x000c}
0x04c8…04de Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0003, t01=0x001c}
0x04de…04f4 Head {h00=0x0012, h01=0x0050, text=» ATTFMT SNDFRM«, t00=0x0003, t01=0x0032}
0x04f4…0508 Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRS«, t00=0x0003, t01=0x0048}
0x0508…0534 Head {h00=0x0028, h01=0x0050, text=» IB SPBINW2,ADM0612,ADM0612,ADM0615 «, t00=0x0003, t01=0x005c}
0x0534…0546 Head {h00=0x000e, h01=0x0050, text=» B ADM0611«, t00=0x0003, t01=0x0088}
0x0546…0556 Head {h00=0x000c, h01=0x0050, text=»ADM0612 «, t00=0x0003, t01=0x009a}
0x0556…0568 Head {h00=0x000e, h01=0x0050, text=» B ADM600 «, t00=0x0003, t01=0x00aa}
0x0568…0578 Head {h00=0x000c, h01=0x0050, text=»ADM0615 «, t00=0x0003, t01=0x00bc}
0x0578…0592 Head {h00=0x0016, h01=0x0050, text=» SUB CRECBCD,=D'1'«, t00=0x0003, t01=0x00cc}
0x0592…05ae Head {h00=0x0018, h01=0x0050, text=» PERF SLUTID,CRECBCD«, t00=0x0003, t01=0x00e6}
0x05ae…05c8 Head {h00=0x0016, h01=0x0050, text=» ADD CRECBCD,=D'1'«, t00=0x0003, t01=0x0102}
0x05c8…05f6 Head {h00=0x002a, h01=0x0050, text=» PERF RAWRIT,DK02,=D'2',CPCKBUF,CRECNR«, t00=0x0003, t01=0x011c}
0x05f6…060a Head {h00=0x0010, h01=0x0050, text=» BNOK ADM600«, t00=0x0003, t01=0x014a}
0x060a…063c Head {h00=0x002e, h01=0x0050, text=» PERF WRITID,CBIN5,CBIN2 SLUTID ON JOURNAL«, t00=0x0003, t01=0x015e}
0x063c…064a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x0190}
0x064a…0684 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0004, t01=0x000e}
0x0684…06ac Head {h00=0x0024, h01=0x0050, text=»* BATCH TRANSMISSION«, t00=0x0004, t01=0x0048}
0x06ac…06c6 Head {h00=0x0016, h01=0x0050, text=»* 1) SIGNON«, t00=0x0004, t01=0x0070}
0x06c6…06e6 Head {h00=0x001c, h01=0x0050, text=»* 2) CHANGE DISK «, t00=0x0004, t01=0x008a}
0x06e6…070a Head {h00=0x0020, h01=0x0050, text=»* 3) SEND STARTIDENT «, t00=0x0004, t01=0x00aa}
0x070a…073a Head {h00=0x002c, h01=0x0050, text=»* 4) SEND TRANSACTIONS AND SLUTID«, t00=0x0004, t01=0x00ce}
0x073a…076e Head {h00=0x0030, h01=0x0050, text=»* 5) IN CASE OF ERROR SEND TERMINATE «, t00=0x0004, t01=0x00fe}
0x076e…07a4 Head {h00=0x0032, h01=0x0050, text=»* 6) WHEN ALL TRANSMITTED SEND SIGNOFF «, t00=0x0004, t01=0x0132}
0x07a4…07de Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x0004, t01=0x0168}
0x07de…07f2 Head {h00=0x0010, h01=0x0050, text=» PERF SIGNON«, t00=0x0005, t01=0x0012}
0x07f2…0808 Head {h00=0x0012, h01=0x0050, text=» BNOK ADM06OUT«, t00=0x0005, t01=0x0026}
0x0808…0818 Head {h00=0x000c, h01=0x0050, text=»ADM0620 «, t00=0x0005, t01=0x003c}
0x0818…0836 Head {h00=0x001a, h01=0x0050, text=» PERF LAMPOF,=W'2047' «, t00=0x0005, t01=0x004c}
0x0836…0846 Head {h00=0x000c, h01=0x0050, text=»ADM0630 «, t00=0x0005, t01=0x006a}
0x0846…0866 Head {h00=0x001c, h01=0x0050, text=» PERF CHNGDK CHANGE DISC«, t00=0x0005, t01=0x007a}
0x0866…087c Head {h00=0x0012, h01=0x0050, text=» BNOK ADM6SOFF«, t00=0x0005, t01=0x009a}
0x087c…08a0 Head {h00=0x0020, h01=0x0050, text=» PERF STRTRC SEND STARTIDENT«, t00=0x0005, t01=0x00b0}
0x08a0…08ca Head {h00=0x0026, h01=0x0050, text=» BNOK ADM0630 IF NOT OK, TRY NEXT «, t00=0x0005, t01=0x00d4}
0x08ca…08ea Head {h00=0x001c, h01=0x0050, text=» PERF SENDRC SEND BATCH «, t00=0x0005, t01=0x00fe}
0x08ea…08fe Head {h00=0x0010, h01=0x0050, text=» BOK ADM0620«, t00=0x0005, t01=0x011e}
0x08fe…0922 Head {h00=0x0020, h01=0x0050, text=» PERF TERMIN SEND TERMINATE «, t00=0x0005, t01=0x0132}
0x0922…0940 Head {h00=0x001a, h01=0x0050, text=» PERF LAMPOF,=W'2047' «, t00=0x0005, t01=0x0156}
0x0940…096a Head {h00=0x0026, h01=0x0050, text=» PERF LAMPON,=W'2' LAMP 10, ERROR «, t00=0x0005, t01=0x0174}
0x096a…097c Head {h00=0x000e, h01=0x0050, text=» B ADM0630«, t00=0x0006, t01=0x000e}
0x097c…098c Head {h00=0x000c, h01=0x0050, text=»ADM6SOFF«, t00=0x0006, t01=0x0020}
0x098c…09ae Head {h00=0x001e, h01=0x0050, text=» PERF SIGNOF SEND SIGNOFF «, t00=0x0006, t01=0x0030}
0x09ae…09be Head {h00=0x000c, h01=0x0050, text=»ADM06OUT«, t00=0x0006, t01=0x0052}
0x09be…09f0 Head {h00=0x002e, h01=0x0050, text=» MOVE CTRANBUF,=X'00' CLEAR TR 12 COUNTERS«, t00=0x0006, t01=0x0062}
0x09f0…0a1a Head {h00=0x0026, h01=0x0050, text=» MOVE GSWBIN1,=X'00' DETACH DEVICE«, t00=0x0006, t01=0x0094}
0x0a1a…0a3c Head {h00=0x001e, h01=0x0050, text=» DSC1 DCOMM,TRPAR,GSWBIN1 «, t00=0x0006, t01=0x00be}
0x0a3c…0a4c Head {h00=0x000c, h01=0x0050, text=»ADM06RET«, t00=0x0006, t01=0x00e0}
0x0a4c…0a64 Head {h00=0x0014, h01=0x0050, text=» CLEAR CCONVFLG «, t00=0x0006, t01=0x00f0}
0x0a64…0a7a Head {h00=0x0012, h01=0x0050, text=» SET SPKEYFLG «, t00=0x0006, t01=0x0108}
0x0a7a…0a98 Head {h00=0x001a, h01=0x0050, text=» PERF LAMPOF,=W'2047' «, t00=0x0006, t01=0x011e}
0x0a98…0aaa Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x0006, t01=0x013c}
0x0aaa…0ab8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x014e}
0x0ab8…0af0 Head {h00=0x0034, h01=0x0050, text=»************************************************«, t00=0x0006, t01=0x015c}
0x0af0…0afa (7, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0004}
0x0afa…0b16 Head {h00=0x0018, h01=0x0050, text=»* SIGNON«, t00=0x0007, t01=0x000e}
0x0b16…0b38 Head {h00=0x001e, h01=0x0050, text=»* IF NOT OK CR NOT = 0 «, t00=0x0007, t01=0x002a}
0x0b38…0b42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x004c}
0x0b42…0b7a Head {h00=0x0034, h01=0x0050, text=»************************************************«, t00=0x0007, t01=0x0056}
0x0b7a…0b8e Head {h00=0x0010, h01=0x0050, text=»SIGNON PROC «, t00=0x0007, t01=0x008e}
0x0b8e…0baa Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN5 «, t00=0x0007, t01=0x00a2}
0x0baa…0bc6 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,=W'50'«, t00=0x0007, t01=0x00be}
0x0bc6…0be2 Head {h00=0x0018, h01=0x0050, text=» MOVE CTRANBUF,=C' '«, t00=0x0007, t01=0x00da}
0x0be2…0c00 Head {h00=0x001a, h01=0x0050, text=» EDIT CTRANBUF,SIGONF «, t00=0x0007, t01=0x00f6}
0x0c00…0c2e Head {h00=0x002a, h01=0x0050, text=»* FIND LENGTH«, t00=0x0007, t01=0x0114}
0x0c2e…0c6a Head {h00=0x0038, h01=0x0050, text=» MATCH CTRANBUF,GSWBIN1,GSWBIN2,CBLANKS,CBIN0,CBIN2 «, t00=0x0007, t01=0x0142}
0x0c6a…0c88 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN2,GSWBIN1 «, t00=0x0007, t01=0x017e}
0x0c88…0ca6 Head {h00=0x001a, h01=0x0050, text=» TBT CTESTFLG,SIGON10 «, t00=0x0008, t01=0x000c}
0x0ca6…0cc6 Head {h00=0x001c, h01=0x0050, text=» PERF EXCHAN EXCHANGE DC«, t00=0x0008, t01=0x002a}
0x0cc6…0cdc Head {h00=0x0012, h01=0x0050, text=» BNOK SIGON100«, t00=0x0008, t01=0x004a}
0x0cdc…0cee Head {h00=0x000e, h01=0x0050, text=» PERF WJDC«, t00=0x0008, t01=0x0060}
0x0cee…0d10 Head {h00=0x001e, h01=0x0050, text=» MOVE GSWSTR20,=C'DFH3504'«, t00=0x0008, t01=0x0072}
0x0d10…0d2c Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN0 «, t00=0x0008, t01=0x0094}
0x0d2c…0d68 Head {h00=0x0038, h01=0x0050, text=» MATCH CTRANBUF,GSWBIN1,GSWBIN2,GSWSTR20,CBIN0,CBIN7«, t00=0x0008, t01=0x00b0}
0x0d68…0d7e Head {h00=0x0012, h01=0x0050, text=» BNE SIGON100 «, t00=0x0008, t01=0x00ec}
0x0d7e…0d8e Head {h00=0x000c, h01=0x0050, text=»SIGON10 «, t00=0x0008, t01=0x0102}
0x0d8e…0dac Head {h00=0x001a, h01=0x0050, text=» EDWRT SCREEN,SNDFRM3 «, t00=0x0008, t01=0x0112}
0x0dac…0dc4 Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x0008, t01=0x0130}
0x0dc4…0dd0 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0008, t01=0x0148}
0x0dd0…0de0 Head {h00=0x000c, h01=0x0050, text=»SIGON100«, t00=0x0008, t01=0x0154}
0x0de0…0dfc Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW4,CBIN21«, t00=0x0008, t01=0x0164}
0x0dfc…0e18 Head {h00=0x0018, h01=0x0050, text=» MOVE GTWBCD2,=D'60'«, t00=0x0008, t01=0x0180}
0x0e18…0e3c Head {h00=0x0020, h01=0x0050, text=» MOVE GSWSTR9,=C'TRANSMIT ' «, t00=0x0009, t01=0x000c}
0x0e3c…0e58 Head {h00=0x0018, h01=0x0050, text=» MOVE GTWBCD1,=D'16'«, t00=0x0009, t01=0x0030}
0x0e58…0e6c Head {h00=0x0010, h01=0x0050, text=» PERF SPERR «, t00=0x0009, t01=0x004c}
0x0e6c…0e88 Head {h00=0x0018, h01=0x0050, text=» PERF WRITJT,=W'14' «, t00=0x0009, t01=0x0060}
0x0e88…0ea0 Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN1«, t00=0x0009, t01=0x007c}
0x0ea0…0eac Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0009, t01=0x0094}
0x0eac…0eba Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0009, t01=0x00a0}
0x0eba…0ec8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x00ae}
0x0ec8…0efe Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0009, t01=0x00bc}
0x0efe…0f08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00f2}
0x0f08…0f32 Head {h00=0x0026, h01=0x0050, text=»* CHNGDK - CHANGE DISK «, t00=0x0009, t01=0x00fc}
0x0f32…0f3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0126}
0x0f3c…0f5e Head {h00=0x001e, h01=0x0050, text=»* STOP SEND PIN 6 «, t00=0x0009, t01=0x0130}
0x0f5e…0f80 Head {h00=0x001e, h01=0x0050, text=»* CONTINIUE PIN 5 «, t00=0x0009, t01=0x0152}
0x0f80…0f8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0174}
0x0f8a…0fc0 Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0009, t01=0x017e}
0x0fc0…0fd4 Head {h00=0x0010, h01=0x0050, text=»CHNGDK PROC «, t00=0x000a, t01=0x0024}
0x0fd4…0fe4 Head {h00=0x000c, h01=0x0050, text=»CHNG000 «, t00=0x000a, t01=0x0038}
0x0fe4…1014 Head {h00=0x002c, h01=0x0050, text=» PERF CLSVOL,CBIN2 CLOSE FILES ON VOL 2 «, t00=0x000a, t01=0x0048}
0x1014…102e Head {h00=0x0016, h01=0x0050, text=» MOVE CRECNR,CBIN1«, t00=0x000a, t01=0x0078}
0x102e…104a Head {h00=0x0018, h01=0x0050, text=» MOVE CRECBCD,=D'1' «, t00=0x000a, t01=0x0092}
0x104a…106e Head {h00=0x0020, h01=0x0050, text=» PERF LAMPON,=W'1024' LAMP 1«, t00=0x000a, t01=0x00ae}
0x106e…1090 Head {h00=0x001e, h01=0x0050, text=» PERF LAMPON,=W'64' LAMP 5«, t00=0x000a, t01=0x00d2}
0x1090…10b2 Head {h00=0x001e, h01=0x0050, text=» PERF LAMPON,=W'32' LAMP 6«, t00=0x000a, t01=0x00f4}
0x10b2…10d4 Head {h00=0x001e, h01=0x0050, text=» PERF LAMPON,=W'16' LAMP 7«, t00=0x000a, t01=0x0116}
0x10d4…10e4 Head {h00=0x000c, h01=0x0050, text=»CHNG010 «, t00=0x000a, t01=0x0138}
0x10e4…10f8 Head {h00=0x0010, h01=0x0050, text=» PERF SOPRD «, t00=0x000a, t01=0x0148}
0x10f8…1110 Head {h00=0x0014, h01=0x0050, text=» CLEAR TTLOKFLG «, t00=0x000a, t01=0x015c}
0x1110…1128 Head {h00=0x0014, h01=0x0050, text=» IB GSWBIN2, C «, t00=0x000a, t01=0x0174}
0x1128…115e Head {h00=0x0032, h01=0x0050, text=» CHSOP10,CHSOP09,CHSOP08,CHSOP07,CHSOP06, C «, t00=0x000a, t01=0x018c}
0x115e…1190 Head {h00=0x002e, h01=0x0050, text=» CHSOP05,CHSOP04,CHSOP03,CHSOP02,CHSOP01 «, t00=0x000b, t01=0x0032}
0x1190…11b4 Head {h00=0x0020, h01=0x0050, text=» B CHNG010 CATCH INV. VALUES«, t00=0x000b, t01=0x0064}
0x11b4…11c4 Head {h00=0x000c, h01=0x0050, text=»CHSOP01 «, t00=0x000b, t01=0x0088}
0x11c4…11da Head {h00=0x0012, h01=0x0050, text=» SET TTLOKFLG «, t00=0x000b, t01=0x0098}
0x11da…11f6 Head {h00=0x0018, h01=0x0050, text=» EDWRT KJTAPE,LOKFMT«, t00=0x000b, t01=0x00ae}
0x11f6…1208 Head {h00=0x000e, h01=0x0050, text=» B CHSOP05«, t00=0x000b, t01=0x00ca}
0x1208…1218 Head {h00=0x000c, h01=0x0050, text=»CHSOP02 «, t00=0x000b, t01=0x00dc}
0x1218…1228 Head {h00=0x000c, h01=0x0050, text=»CHSOP03 «, t00=0x000b, t01=0x00ec}
0x1228…1238 Head {h00=0x000c, h01=0x0050, text=»CHSOP04 «, t00=0x000b, t01=0x00fc}
0x1238…1248 Head {h00=0x000c, h01=0x0050, text=»CHSOP08 «, t00=0x000b, t01=0x010c}
0x1248…1258 Head {h00=0x000c, h01=0x0050, text=»CHSOP09 «, t00=0x000b, t01=0x011c}
0x1258…126a Head {h00=0x000e, h01=0x0050, text=» B CHNG010«, t00=0x000b, t01=0x012c}
0x126a…1274 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x013e}
0x1274…1284 Head {h00=0x000c, h01=0x0050, text=»CHSOP10 «, t00=0x000b, t01=0x0148}
0x1284…12a4 Head {h00=0x001c, h01=0x0050, text=»* ERROR, SIGN ON AGAIN«, t00=0x000b, t01=0x0158}
0x12a4…12cc Head {h00=0x0024, h01=0x0050, text=» PERF LAMPOF,=W'2047' LAMPS OFF «, t00=0x000b, t01=0x0178}
0x12cc…12ee Head {h00=0x001e, h01=0x0050, text=» PERF LAMPON,=W'2' LAMP 10«, t00=0x000c, t01=0x0010}
0x12ee…1304 Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x000c, t01=0x0032}
0x1304…1328 Head {h00=0x0020, h01=0x0050, text=» ATTFMT SNDFRM SIGNON FORMAT«, t00=0x000c, t01=0x0048}
0x1328…133c Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRS«, t00=0x000c, t01=0x006c}
0x133c…1364 Head {h00=0x0024, h01=0x0050, text=» IB SPBINW2,CH1010,CH1010,CH1020«, t00=0x000c, t01=0x0080}
0x1364…1372 Head {h00=0x000a, h01=0x0050, text=»CH1010«, t00=0x000c, t01=0x00a8}
0x1372…1384 Head {h00=0x000e, h01=0x0050, text=» B CHNG000«, t00=0x000c, t01=0x00b6}
0x1384…1392 Head {h00=0x000a, h01=0x0050, text=»CH1020«, t00=0x000c, t01=0x00c8}
0x1392…13a6 Head {h00=0x0010, h01=0x0050, text=» PERF SIGNON«, t00=0x000c, t01=0x00d6}
0x13a6…13bc Head {h00=0x0012, h01=0x0050, text=» BNOK CHNG000 «, t00=0x000c, t01=0x00ea}
0x13bc…13da Head {h00=0x001a, h01=0x0050, text=» PERF LAMPOF,=W'2047' «, t00=0x000c, t01=0x0100}
0x13da…13ec Head {h00=0x000e, h01=0x0050, text=» B CHNG000«, t00=0x000c, t01=0x011e}
0x13ec…13f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0130}
0x13f6…1406 Head {h00=0x000c, h01=0x0050, text=»CHSOP05 «, t00=0x000c, t01=0x013a}
0x1406…142e Head {h00=0x0024, h01=0x0050, text=» PERF LAMPOF,=W'2047' LAMPS OFF «, t00=0x000c, t01=0x014a}
0x142e…1456 Head {h00=0x0024, h01=0x0050, text=» PERF ASGVOL,CBIN2 ASSIGN DISK 2«, t00=0x000c, t01=0x0172}
0x1456…146a Head {h00=0x0010, h01=0x0050, text=» BOK CHNG050«, t00=0x000d, t01=0x000a}
0x146a…1484 Head {h00=0x0016, h01=0x0050, text=» PERF LAMPON,=W'2'«, t00=0x000d, t01=0x001e}
0x1484…1496 Head {h00=0x000e, h01=0x0050, text=» B CHNG000«, t00=0x000d, t01=0x0038}
0x1496…14a6 Head {h00=0x000c, h01=0x0050, text=»CHNG050 «, t00=0x000d, t01=0x004a}
0x14a6…14c8 Head {h00=0x001e, h01=0x0050, text=» PERF LAMPON,=W'64' LAMP 5«, t00=0x000d, t01=0x005a}
0x14c8…14e8 Head {h00=0x001c, h01=0x0050, text=» CMP CBIN0,CBIN0 SET CR «, t00=0x000d, t01=0x007c}
0x14e8…14f4 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000d, t01=0x009c}
0x14f4…14fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00a8}
0x14fe…1516 Head {h00=0x0014, h01=0x0050, text=»CHSOP06 SOP 6 «, t00=0x000d, t01=0x00b2}
0x1516…153e Head {h00=0x0024, h01=0x0050, text=» PERF LAMPOF,=W'2047' LAMPS OFF «, t00=0x000d, t01=0x00ca}
0x153e…1566 Head {h00=0x0024, h01=0x0050, text=» PERF BCKUP,=W'1' WITHOUT BACKUP«, t00=0x000d, t01=0x00f2}
0x1566…157c Head {h00=0x0012, h01=0x0050, text=» BNOK CHNG000 «, t00=0x000d, t01=0x011a}
0x157c…158e Head {h00=0x000e, h01=0x0050, text=» B CHNG130«, t00=0x000d, t01=0x0130}
0x158e…1598 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0142}
0x1598…15a8 Head {h00=0x000c, h01=0x0050, text=»CHSOP07 «, t00=0x000d, t01=0x014c}
0x15a8…15d0 Head {h00=0x0024, h01=0x0050, text=» PERF LAMPOF,=W'2047' LAMPS OFF «, t00=0x000d, t01=0x015c}
0x15d0…15f6 Head {h00=0x0022, h01=0x0050, text=» PERF BCKUP,=W'2' WITH BACKUP «, t00=0x000d, t01=0x0184}
0x15f6…160c Head {h00=0x0012, h01=0x0050, text=» BNOK CHNG000 «, t00=0x000e, t01=0x001a}
0x160c…161e Head {h00=0x000e, h01=0x0050, text=» B CHNG130«, t00=0x000e, t01=0x0030}
0x161e…1628 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0042}
0x1628…1638 Head {h00=0x000c, h01=0x0050, text=»CHNG130 «, t00=0x000e, t01=0x004c}
0x1638…1656 Head {h00=0x001a, h01=0x0050, text=» PERF LAMPOF,=W'2047' «, t00=0x000e, t01=0x005c}
0x1656…168e Head {h00=0x0034, h01=0x0050, text=» CMP CBIN0,CBIN1 INDICATE ERROR OR END OF TRANS «, t00=0x000e, t01=0x007a}
0x168e…169a Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000e, t01=0x00b2}
0x169a…16a8 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000e, t01=0x00be}
0x16a8…16b6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x00cc}
0x16b6…16e8 Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x000e, t01=0x00da}
0x16e8…16f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x010c}
0x16f2…1720 Head {h00=0x002a, h01=0x0050, text=»* STRTRC - SEND OF STARTIDENT «, t00=0x000e, t01=0x0116}
0x1720…1742 Head {h00=0x001e, h01=0x0050, text=»* AND CHECK REPLY «, t00=0x000e, t01=0x0144}
0x1742…174c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0166}
0x174c…1780 Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x000e, t01=0x0170}
0x1780…1794 Head {h00=0x0010, h01=0x0050, text=»STRTRC PROC «, t00=0x000f, t01=0x0014}
0x1794…17b2 Head {h00=0x001a, h01=0x0050, text=» PERF LAMPOF,=W'2047' «, t00=0x000f, t01=0x0028}
0x17b2…17ce Head {h00=0x0018, h01=0x0050, text=» PERF LAMPON,=W'64' «, t00=0x000f, t01=0x0046}
0x17ce…17ea Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN6,CBIN1 «, t00=0x000f, t01=0x0062}
0x17ea…1808 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,=W'128' «, t00=0x000f, t01=0x007e}
0x1808…1840 Head {h00=0x0034, h01=0x0050, text=» PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,GSWBIN6 «, t00=0x000f, t01=0x009c}
0x1840…1856 Head {h00=0x0012, h01=0x0050, text=» BNOK STRTRET «, t00=0x000f, t01=0x00d4}
0x1856…1888 Head {h00=0x002e, h01=0x0050, text=» CBE GTWBCD1,=D'4',STRTRET RECORD DELETED?«, t00=0x000f, t01=0x00ea}
0x1888…18a8 Head {h00=0x001c, h01=0x0050, text=» PERF WRITID,CBIN5,CBIN1«, t00=0x000f, t01=0x011c}
0x18a8…18c4 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN6,CBIN0 «, t00=0x000f, t01=0x013c}
0x18c4…18e0 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'40'«, t00=0x000f, t01=0x0158}
0x18e0…18fe Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR20,CBLANKS«, t00=0x000f, t01=0x0174}
0x18fe…1934 (16, 0, 400) Head {h00=0x0032, h01=0x0050, text=» COPY CPCKBUF,GSWBIN1,CBIN20,GSWSTR20,GSWBIN6 «, t00=0x0010, t01=0x0004}
0x1934…1950 Head {h00=0x0018, h01=0x0050, text=» MOVE CTRANBUF,=C' '«, t00=0x0010, t01=0x003a}
0x1950…196e Head {h00=0x001a, h01=0x0050, text=» EDIT CTRANBUF,SNDFRM2«, t00=0x0010, t01=0x0056}
0x196e…1992 Head {h00=0x0020, h01=0x0050, text=» MOVE GSWBIN2,=W'31' LENGTH «, t00=0x0010, t01=0x0074}
0x1992…19b2 Head {h00=0x001c, h01=0x0050, text=» PERF EXCHAN EXCHANGE DC«, t00=0x0010, t01=0x0098}
0x19b2…19c8 Head {h00=0x0012, h01=0x0050, text=» BNOK STRTRET «, t00=0x0010, t01=0x00b8}
0x19c8…19e8 Head {h00=0x001c, h01=0x0050, text=» PERF TRNOK CHECK IF OK «, t00=0x0010, t01=0x00ce}
0x19e8…19fe Head {h00=0x0012, h01=0x0050, text=» BNOK STRTRET «, t00=0x0010, t01=0x00ee}
0x19fe…1a1e Head {h00=0x001c, h01=0x0050, text=» CMP CBIN0,CBIN0 SET CR «, t00=0x0010, t01=0x0104}
0x1a1e…1a2a Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0010, t01=0x0124}
0x1a2a…1a3a Head {h00=0x000c, h01=0x0050, text=»STRTRET «, t00=0x0010, t01=0x0130}
0x1a3a…1a52 Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN1«, t00=0x0010, t01=0x0140}
0x1a52…1a5e Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0010, t01=0x0158}
0x1a5e…1a6c Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0010, t01=0x0164}
0x1a6c…1a7a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x0172}
0x1a7a…1ab0 Head {h00=0x0032, h01=0x0050, text=»**********************************************«, t00=0x0010, t01=0x0180}
0x1ab0…1aba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0026}
0x1aba…1aec Head {h00=0x002e, h01=0x0050, text=»* SENDRC - SEND BATCH UNTIL SLUTID«, t00=0x0011, t01=0x0030}
0x1aec…1af6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0062}
0x1af6…1b2c Head {h00=0x0032, h01=0x0050, text=»**********************************************«, t00=0x0011, t01=0x006c}
0x1b2c…1b40 Head {h00=0x0010, h01=0x0050, text=»SENDRC PROC «, t00=0x0011, t01=0x00a2}
0x1b40…1b5a Head {h00=0x0016, h01=0x0050, text=» MOVE CRECNR,CBIN1«, t00=0x0011, t01=0x00b6}
0x1b5a…1b68 Head {h00=0x000a, h01=0x0050, text=»SND005«, t00=0x0011, t01=0x00d0}
0x1b68…1b90 Head {h00=0x0024, h01=0x0050, text=» MOVE GSWBIN3,CBIN0 PACKPOINTER «, t00=0x0011, t01=0x00de}
0x1b90…1b9e Head {h00=0x000a, h01=0x0050, text=»SND010«, t00=0x0011, t01=0x0106}
0x1b9e…1bb8 Head {h00=0x0016, h01=0x0050, text=» ADD CRECNR,CBIN1 «, t00=0x0011, t01=0x0114}
0x1bb8…1bd6 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,=W'128' «, t00=0x0011, t01=0x012e}
0x1bd6…1c0c Head {h00=0x0032, h01=0x0050, text=» PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,CRECNR«, t00=0x0011, t01=0x014c}
0x1c0c…1c20 Head {h00=0x0010, h01=0x0050, text=» BNOK SNDERR«, t00=0x0011, t01=0x0182}
0x1c20…1c3a Head {h00=0x0016, h01=0x0050, text=» CMP GTWBCD1,=D'4'«, t00=0x0012, t01=0x0008}
0x1c3a…1c5e Head {h00=0x0020, h01=0x0050, text=» BE SNDERR RECORD DELETED ? «, t00=0x0012, t01=0x0022}
0x1c5e…1c8a Head {h00=0x0028, h01=0x0050, text=» TBF TTLOKFLG,SND012 PIN 1 PRESSED? «, t00=0x0012, t01=0x0046}
0x1c8a…1cb4 Head {h00=0x0026, h01=0x0050, text=» MOVE GSWSTR20,='G01' REPLEASE G01«, t00=0x0012, t01=0x0072}
0x1cb4…1cd8 Head {h00=0x0020, h01=0x0050, text=» MOVE GSWBIN5,CBIN3 BYE R31 «, t00=0x0012, t01=0x009c}
0x1cd8…1d12 Head {h00=0x0036, h01=0x0050, text=» MATCH CPCKBUF,GSWBIN5,CBIN3,GSWSTR20,CBIN0,CBIN3 «, t00=0x0012, t01=0x00c0}
0x1d12…1d30 Head {h00=0x001a, h01=0x0050, text=» BNOK SND012 NO MATCH «, t00=0x0012, t01=0x00fa}
0x1d30…1d56 Head {h00=0x0022, h01=0x0050, text=» MOVE GSWSTR20,='R01' REPLACE «, t00=0x0012, t01=0x0118}
0x1d56…1d8a Head {h00=0x0030, h01=0x0050, text=» XCOPY CPCKBUF,GSWBIN5,CBIN3,GSWSTR20,CBIN0 «, t00=0x0012, t01=0x013e}
0x1d8a…1d98 Head {h00=0x000a, h01=0x0050, text=»SND012«, t00=0x0012, t01=0x0172}
0x1d98…1db8 Head {h00=0x001c, h01=0x0050, text=» MOVE GSWSTR20,=C'SLUTD'«, t00=0x0012, t01=0x0180}
0x1db8…1dd4 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN5,CBIN0 «, t00=0x0013, t01=0x0010}
0x1dd4…1e0e Head {h00=0x0036, h01=0x0050, text=» MATCH GSWSTR20,GSWBIN5,CBIN5,CPCKBUF,CBIN0,CBIN5 «, t00=0x0013, t01=0x002c}
0x1e0e…1e22 Head {h00=0x0010, h01=0x0050, text=» BE SNDSLUT «, t00=0x0013, t01=0x0066}
0x1e22…1e4a Head {h00=0x0024, h01=0x0050, text=» MOVE GSWSTR9,=X'7F' FIND LENGTH«, t00=0x0013, t01=0x007a}
0x1e4a…1e58 Head {h00=0x000a, h01=0x0050, text=»SND015«, t00=0x0013, t01=0x00a2}
0x1e58…1e74 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN4,CBIN0 «, t00=0x0013, t01=0x00b0}
0x1e74…1e92 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN5,=W'128' «, t00=0x0013, t01=0x00cc}
0x1e92…1ecc Head {h00=0x0036, h01=0x0050, text=» MATCH CPCKBUF,GSWBIN4,GSWBIN5,GSWSTR9,CBIN0,CBIN1«, t00=0x0013, t01=0x00ea}
0x1ecc…1ede Head {h00=0x000e, h01=0x0050, text=» BE SND020«, t00=0x0013, t01=0x0124}
0x1ede…1efa Head {h00=0x0018, h01=0x0050, text=» MOVE GSWSTR9,=X'21'«, t00=0x0013, t01=0x0136}
0x1efa…1f0c Head {h00=0x000e, h01=0x0050, text=» B SND015 «, t00=0x0013, t01=0x0152}
0x1f0c…1f1a Head {h00=0x000a, h01=0x0050, text=»SND020«, t00=0x0013, t01=0x0164}
0x1f1a…1f48 Head {h00=0x002a, h01=0x0050, text=» ADD GSWBIN4,GSWBIN3 SEE IF MORE SPACE«, t00=0x0013, t01=0x0172}
0x1f48…1f6c Head {h00=0x0020, h01=0x0050, text=» CBNG GSWBIN4,=W'504',SND030«, t00=0x0014, t01=0x0010}
0x1f6c…1f94 Head {h00=0x0024, h01=0x0050, text=» SUB CRECNR,CBIN1 NO MORE SPACE «, t00=0x0014, t01=0x0034}
0x1f94…1fb2 Head {h00=0x001a, h01=0x0050, text=» B SND040 SEND BUFFER «, t00=0x0014, t01=0x005c}
0x1fb2…1fc0 Head {h00=0x000a, h01=0x0050, text=»SND030«, t00=0x0014, t01=0x007a}
0x1fc0…1fe4 Head {h00=0x0020, h01=0x0050, text=» SUB GSWBIN4,GSWBIN3 RESTORE«, t00=0x0014, t01=0x0088}
0x1fe4…200e Head {h00=0x0026, h01=0x0050, text=» ADD GSWBIN4,CBIN1 FILL WITH X'00'«, t00=0x0014, t01=0x00ac}
0x200e…2032 Head {h00=0x0020, h01=0x0050, text=» CBE GSWBIN4,=W'128',SND037 «, t00=0x0014, t01=0x00d6}
0x2032…2050 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR20,=X'00' «, t00=0x0014, t01=0x00fa}
0x2050…206e Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN5,=W'128' «, t00=0x0014, t01=0x0118}
0x206e…207c Head {h00=0x000a, h01=0x0050, text=»SND035«, t00=0x0014, t01=0x0136}
0x207c…20b0 Head {h00=0x0030, h01=0x0050, text=» INSRT CPCKBUF,GSWBIN4,CBIN20,GSWSTR20,CBIN0«, t00=0x0014, t01=0x0144}
0x20b0…20cc Head {h00=0x0018, h01=0x0050, text=» SUB GSWBIN5,CBIN20 «, t00=0x0014, t01=0x0178}
0x20cc…2104 (21, 0, 400) Head {h00=0x0034, h01=0x0050, text=» CBG GSWBIN5,GSWBIN4,SND035 ALL TRAILING FILLED «, t00=0x0015, t01=0x0004}
0x2104…2112 Head {h00=0x000a, h01=0x0050, text=»SND037«, t00=0x0015, t01=0x003c}
0x2112…2148 Head {h00=0x0032, h01=0x0050, text=» EDSUB CTRANBUF,GSWBIN3,SNDFRM5 INSERT RECORD «, t00=0x0015, t01=0x004a}
0x2148…2164 Head {h00=0x0018, h01=0x0050, text=» B SND010 READ NEXT «, t00=0x0015, t01=0x0080}
0x2164…2172 Head {h00=0x000a, h01=0x0050, text=»SND040«, t00=0x0015, t01=0x009c}
0x2172…2190 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN2,GSWBIN3 «, t00=0x0015, t01=0x00aa}
0x2190…21ae Head {h00=0x001a, h01=0x0050, text=» MOVE SPBINW1,=X'0301'«, t00=0x0015, t01=0x00c8}
0x21ae…21cc Head {h00=0x001a, h01=0x0050, text=» MOVE TTARKSAV,CRECNR «, t00=0x0015, t01=0x00e6}
0x21cc…21ec Head {h00=0x001c, h01=0x0050, text=» DSC1 SCREEN,POS,SPBINW1«, t00=0x0015, t01=0x0104}
0x21ec…221c Head {h00=0x002c, h01=0x0050, text=» EDWRT .NW,SCREEN,SNDFRM4 DISPLAY RECNR «, t00=0x0015, t01=0x0124}
0x221c…2230 Head {h00=0x0010, h01=0x0050, text=» PERF EXCHAN«, t00=0x0015, t01=0x0154}
0x2230…2244 Head {h00=0x0010, h01=0x0050, text=» BNOK SNDERR«, t00=0x0015, t01=0x0168}
0x2244…2258 Head {h00=0x0010, h01=0x0050, text=» PERF TRNOK «, t00=0x0015, t01=0x017c}
0x2258…226c Head {h00=0x0010, h01=0x0050, text=» BNOK SNDERR«, t00=0x0015, t01=0x0190}
0x226c…227e Head {h00=0x000e, h01=0x0050, text=» B SND005 «, t00=0x0016, t01=0x0014}
0x227e…228e Head {h00=0x000c, h01=0x0050, text=»SNDSLUT «, t00=0x0016, t01=0x0026}
0x228e…22be Head {h00=0x002c, h01=0x0050, text=» CBE GSWBIN3,CBIN0,SND090 REQ.LGTH.=0 ? «, t00=0x0016, t01=0x0036}
0x22be…22dc Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN2,GSWBIN3 «, t00=0x0016, t01=0x0066}
0x22dc…22fc Head {h00=0x001c, h01=0x0050, text=» PERF EXCHAN EXCHANGE DC«, t00=0x0016, t01=0x0084}
0x22fc…2310 Head {h00=0x0010, h01=0x0050, text=» BNOK SNDERR«, t00=0x0016, t01=0x00a4}
0x2310…2324 Head {h00=0x0010, h01=0x0050, text=» PERF TRNOK «, t00=0x0016, t01=0x00b8}
0x2324…2338 Head {h00=0x0010, h01=0x0050, text=» BNOK SNDERR«, t00=0x0016, t01=0x00cc}
0x2338…2346 Head {h00=0x000a, h01=0x0050, text=»SND090«, t00=0x0016, t01=0x00e0}
0x2346…2362 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN3,CBIN0 «, t00=0x0016, t01=0x00ee}
0x2362…237e Head {h00=0x0018, h01=0x0050, text=» MOVE CTRANBUF,=C' '«, t00=0x0016, t01=0x010a}
0x237e…23a6 Head {h00=0x0024, h01=0x0050, text=» EDSUB CTRANBUF,GSWBIN3,SNDFRM5 «, t00=0x0016, t01=0x0126}
0x23a6…23c2 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,CBIN18«, t00=0x0016, t01=0x014e}
0x23c2…23d6 Head {h00=0x0010, h01=0x0050, text=» PERF EXCHAN«, t00=0x0016, t01=0x016a}
0x23d6…23ea Head {h00=0x0010, h01=0x0050, text=» BNOK SNDERR«, t00=0x0016, t01=0x017e}
0x23ea…240a (23, 0, 400) Head {h00=0x001c, h01=0x0050, text=» PERF WRITID,CBIN5,CBIN2«, t00=0x0017, t01=0x0004}
0x240a…242a Head {h00=0x001c, h01=0x0050, text=» PERF WJDC PRINT ANSWER «, t00=0x0017, t01=0x0024}
0x242a…2448 Head {h00=0x001a, h01=0x0050, text=» TBT CTESTFLG,SNDSL10 «, t00=0x0017, t01=0x0044}
0x2448…2466 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR9,=C'0002'«, t00=0x0017, t01=0x0062}
0x2466…2482 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN0 «, t00=0x0017, t01=0x0080}
0x2482…249e Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,=W'52'«, t00=0x0017, t01=0x009c}
0x249e…24da Head {h00=0x0038, h01=0x0050, text=» MATCH CTRANBUF,GSWBIN1,GSWBIN2,GSWSTR9,CBIN0,CBIN4 «, t00=0x0017, t01=0x00b8}
0x24da…24ee Head {h00=0x0010, h01=0x0050, text=» BNE SNDERR «, t00=0x0017, t01=0x00f4}
0x24ee…24fe Head {h00=0x000c, h01=0x0050, text=»SNDSL10 «, t00=0x0017, t01=0x0108}
0x24fe…2516 Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x0017, t01=0x0118}
0x2516…2522 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0017, t01=0x0130}
0x2522…2530 Head {h00=0x000a, h01=0x0050, text=»SNDERR«, t00=0x0017, t01=0x013c}
0x2530…2548 Head {h00=0x0014, h01=0x0050, text=» CMP CBIN1,CBIN0«, t00=0x0017, t01=0x014a}
0x2548…2554 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0017, t01=0x0162}
0x2554…2562 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0017, t01=0x016e}
0x2562…2570 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0017, t01=0x017c}
0x2570…25a4 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0017, t01=0x018a}
0x25a4…25ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x002e}
0x25ae…25f0 Head {h00=0x003e, h01=0x0050, text=»* TERMIN - TERMINATE TRANSMISSION IN CASE OF ERROR«, t00=0x0018, t01=0x0038}
0x25f0…25fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x007a}
0x25fa…262e Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0018, t01=0x0084}
0x262e…2642 Head {h00=0x0010, h01=0x0050, text=»TERMIN PROC «, t00=0x0018, t01=0x00b8}
0x2642…265e Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN3,CBIN0 «, t00=0x0018, t01=0x00cc}
0x265e…267a Head {h00=0x0018, h01=0x0050, text=» MOVE CTRANBUF,=C' '«, t00=0x0018, t01=0x00e8}
0x267a…269e Head {h00=0x0020, h01=0x0050, text=» MOVE CPCKBUF,=C'TERMINATE '«, t00=0x0018, t01=0x0104}
0x269e…26ba Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN3,CBIN0 «, t00=0x0018, t01=0x0128}
0x26ba…26e2 Head {h00=0x0024, h01=0x0050, text=» EDSUB CTRANBUF,GSWBIN3,SNDFRM2 «, t00=0x0018, t01=0x0144}
0x26e2…26fe Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,CBIN14«, t00=0x0018, t01=0x016c}
0x26fe…271e Head {h00=0x001c, h01=0x0050, text=» PERF EXCHAN EXCHANGE DC«, t00=0x0018, t01=0x0188}
0x271e…2734 Head {h00=0x0012, h01=0x0050, text=» BNOK TERMRET «, t00=0x0019, t01=0x0018}
0x2734…2746 Head {h00=0x000e, h01=0x0050, text=» PERF WJDC«, t00=0x0019, t01=0x002e}
0x2746…2756 Head {h00=0x000c, h01=0x0050, text=»TERMRET «, t00=0x0019, t01=0x0040}
0x2756…2762 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0019, t01=0x0050}
0x2762…2770 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0019, t01=0x005c}
0x2770…277e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0019, t01=0x006a}
0x277e…27b4 Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0019, t01=0x0078}
0x27b4…27be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00ae}
0x27be…27d8 Head {h00=0x0016, h01=0x0050, text=»* SIGNOFF «, t00=0x0019, t01=0x00b8}
0x27d8…27e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00d2}
0x27e2…2818 Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0019, t01=0x00dc}
0x2818…282c Head {h00=0x0010, h01=0x0050, text=»SIGNOF PROC «, t00=0x0019, t01=0x0112}
0x282c…2848 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN3,CBIN0 «, t00=0x0019, t01=0x0126}
0x2848…2864 Head {h00=0x0018, h01=0x0050, text=» MOVE CTRANBUF,=C' '«, t00=0x0019, t01=0x0142}
0x2864…2884 Head {h00=0x001c, h01=0x0050, text=» MOVE CPCKBUF,=C'CSSF ' «, t00=0x0019, t01=0x015e}
0x2884…28ac Head {h00=0x0024, h01=0x0050, text=» EDSUB CTRANBUF,GSWBIN3,SNDFRM2 «, t00=0x0019, t01=0x017e}
0x28ac…28c8 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,CBIN9 «, t00=0x001a, t01=0x0016}
0x28c8…28dc Head {h00=0x0010, h01=0x0050, text=» PERF EXCHAN«, t00=0x001a, t01=0x0032}
0x28dc…28f2 Head {h00=0x0012, h01=0x0050, text=» BNOK SIGOFRET«, t00=0x001a, t01=0x0046}
0x28f2…2910 Head {h00=0x001a, h01=0x0050, text=» TBT CTESTFLG,SIGOFRT1«, t00=0x001a, t01=0x005c}
0x2910…2930 Head {h00=0x001c, h01=0x0050, text=» PERF WJDC PRINT ANSWER «, t00=0x001a, t01=0x007a}
0x2930…2940 Head {h00=0x000c, h01=0x0050, text=»SIGOFRET«, t00=0x001a, t01=0x009a}
0x2940…294c Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001a, t01=0x00aa}
0x294c…295c Head {h00=0x000c, h01=0x0050, text=»SIGOFRT1«, t00=0x001a, t01=0x00b6}
0x295c…2974 Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x001a, t01=0x00c6}
0x2974…2980 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001a, t01=0x00de}
0x2980…298e Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x001a, t01=0x00ea}
0x298e…299c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x00f8}
0x299c…29d2 Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x001a, t01=0x0106}
0x29d2…29dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x013c}
0x29dc…2a04 Head {h00=0x0024, h01=0x0050, text=»* EXCHAN - EXCHANGE DC«, t00=0x001a, t01=0x0146}
0x2a04…2a34 Head {h00=0x002c, h01=0x0050, text=»* IN CASE OF ERROR ERRORMESSAGE «, t00=0x001a, t01=0x016e}
0x2a34…2a64 Head {h00=0x002c, h01=0x0050, text=»* IS SHOWN ON SCREEN AND JOURNAL«, t00=0x001b, t01=0x000e}
0x2a64…2a6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x003e}
0x2a6e…2aa4 Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x001b, t01=0x0048}
0x2aa4…2ab8 Head {h00=0x0010, h01=0x0050, text=»EXCHAN PROC «, t00=0x001b, t01=0x007e}
0x2ab8…2ad6 Head {h00=0x001a, h01=0x0050, text=» TBT CTESTFLG,EXCHTEST«, t00=0x001b, t01=0x0092}
0x2ad6…2b02 Head {h00=0x0028, h01=0x0050, text=» MOVE GSWBIN5,=W'600' TIMEOUT VALUE «, t00=0x001b, t01=0x00b0}
0x2b02…2b32 Head {h00=0x002c, h01=0x0050, text=» DCWRITE DCOMM,CTRANBUF,GSWBIN2,GSWBIN5 «, t00=0x001b, t01=0x00dc}
0x2b32…2b48 Head {h00=0x0012, h01=0x0050, text=» BNOK EXCHNOK «, t00=0x001b, t01=0x010c}
0x2b48…2b66 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN2,=W'504' «, t00=0x001b, t01=0x0122}
0x2b66…2b84 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN5,=W'600' «, t00=0x001b, t01=0x0140}
0x2b84…2bb2 Head {h00=0x002a, h01=0x0050, text=» DCREAD DCOMM,CTRANBUF,GSWBIN2,GSWBIN5«, t00=0x001b, t01=0x015e}
0x2bb2…2bc6 Head {h00=0x0010, h01=0x0050, text=» BOK EXCHRET«, t00=0x001b, t01=0x018c}
0x2bc6…2bd6 Head {h00=0x000c, h01=0x0050, text=»EXCHNOK «, t00=0x001c, t01=0x0010}
0x2bd6…2c00 Head {h00=0x0026, h01=0x0050, text=» PERF GETBIT,DCOMM FETCH ERRORCODE«, t00=0x001c, t01=0x0020}
0x2c00…2c1c Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW4,CBIN21«, t00=0x001c, t01=0x004a}
0x2c1c…2c38 Head {h00=0x0018, h01=0x0050, text=» MOVE GTWBCD2,=D'60'«, t00=0x001c, t01=0x0066}
0x2c38…2c5c Head {h00=0x0020, h01=0x0050, text=» MOVE GSWSTR9,=C'TRANSMIT ' «, t00=0x001c, t01=0x0082}
0x2c5c…2c70 Head {h00=0x0010, h01=0x0050, text=» PERF SPERR «, t00=0x001c, t01=0x00a6}
0x2c70…2c8c Head {h00=0x0018, h01=0x0050, text=» PERF WRITJT,=W'14' «, t00=0x001c, t01=0x00ba}
0x2c8c…2ca4 Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN1«, t00=0x001c, t01=0x00d6}
0x2ca4…2cb0 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001c, t01=0x00ee}
0x2cb0…2cc0 Head {h00=0x000c, h01=0x0050, text=»EXCHRET «, t00=0x001c, t01=0x00fa}
0x2cc0…2cd8 Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x001c, t01=0x010a}
0x2cd8…2ce4 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001c, t01=0x0122}
0x2ce4…2cf4 Head {h00=0x000c, h01=0x0050, text=»EXCHTEST«, t00=0x001c, t01=0x012e}
0x2cf4…2d10 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,CBIN20«, t00=0x001c, t01=0x013e}
0x2d10…2d2e Head {h00=0x001a, h01=0x0050, text=» MOVE CTRANBUF,=X'35' «, t00=0x001c, t01=0x015a}
0x2d2e…2d44 Head {h00=0x0012, h01=0x0050, text=» DELAY GSWBIN2«, t00=0x001c, t01=0x0178}
0x2d44…2d5c Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x001c, t01=0x018e}
0x2d5c…2d68 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001d, t01=0x0016}
0x2d68…2d76 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x001d, t01=0x0022}
0x2d76…2d84 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001d, t01=0x0030}
0x2d84…2dba Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x001d, t01=0x003e}
0x2dba…2dc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0074}
0x2dc4…2dfe Head {h00=0x0036, h01=0x0050, text=»* TRNOK - CHECK IF MESSAGE CORRECT RECIEVED «, t00=0x001d, t01=0x007e}
0x2dfe…2e08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00b8}
0x2e08…2e3e Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x001d, t01=0x00c2}
0x2e3e…2e50 Head {h00=0x000e, h01=0x0050, text=»TRNOK PROC«, t00=0x001d, t01=0x00f8}
0x2e50…2e6c Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN3,CBIN0 «, t00=0x001d, t01=0x010a}
0x2e6c…2e88 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWSTR9,=X'35'«, t00=0x001d, t01=0x0126}
0x2e88…2ec4 Head {h00=0x0038, h01=0x0050, text=» MATCH CTRANBUF,GSWBIN3,GSWBIN2,GSWSTR9,CBIN0,CBIN1 «, t00=0x001d, t01=0x0142}
0x2ec4…2ed8 Head {h00=0x0010, h01=0x0050, text=» BNE TRNERR «, t00=0x001d, t01=0x017e}
0x2ed8…2ef4 (30, 0, 398) Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,CBIN0 «, t00=0x001e, t01=0x0004}
0x2ef4…2f10 Head {h00=0x0018, h01=0x0050, text=» MOVE CTRANBUF,=C' '«, t00=0x001e, t01=0x0020}
0x2f10…2f28 Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x001e, t01=0x003c}
0x2f28…2f34 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001e, t01=0x0054}
0x2f34…2f42 Head {h00=0x000a, h01=0x0050, text=»TRNERR«, t00=0x001e, t01=0x0060}
0x2f42…2f5a Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN1«, t00=0x001e, t01=0x006e}
0x2f5a…2f66 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001e, t01=0x0086}
0x2f66…2f74 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x001e, t01=0x0092}
0x2f74…2f82 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001e, t01=0x00a0}
0x2f82…2fbc Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x001e, t01=0x00ae}
0x2fbc…2fc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00e8}
0x2fc6…2ffc Head {h00=0x0032, h01=0x0050, text=»* WJDC - PRINT RECEIVED MESSAGE ON JOURNAL «, t00=0x001e, t01=0x00f2}
0x2ffc…3006 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0128}
0x3006…3040 Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x001e, t01=0x0132}
0x3040…3052 Head {h00=0x000e, h01=0x0050, text=»WJDC PROC «, t00=0x001e, t01=0x016c}
0x3052…3066 Head {h00=0x0010, h01=0x0050, text=» WAIT KTALLY«, t00=0x001e, t01=0x017e}
0x3066…3088 (31, 0, 400) Head {h00=0x001e, h01=0x0050, text=» CBL GSWBIN2,CBIN1,WJDCRET«, t00=0x001f, t01=0x0004}
0x3088…30ac Head {h00=0x0020, h01=0x0050, text=» CBG GSWBIN2,=W'504',WJDCRET«, t00=0x001f, t01=0x0026}
0x30ac…30ca Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR9,=C'DFH' «, t00=0x001f, t01=0x004a}
0x30ca…30e6 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN0 «, t00=0x001f, t01=0x0068}
0x30e6…3122 Head {h00=0x0038, h01=0x0050, text=» MATCH CTRANBUF,GSWBIN1,GSWBIN2,GSWSTR9,CBIN0,CBIN3 «, t00=0x001f, t01=0x0084}
0x3122…3142 Head {h00=0x001c, h01=0x0050, text=» BE WJDC100 CICS MESSAGE«, t00=0x001f, t01=0x00c0}
0x3142…314c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00e0}
0x314c…316e Head {h00=0x001e, h01=0x0050, text=»* APLICATION MESSAGE «, t00=0x001f, t01=0x00ea}
0x316e…3178 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x010c}
0x3178…3194 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWSTR9,=X'11'«, t00=0x001f, t01=0x0116}
0x3194…31b0 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN0 «, t00=0x001f, t01=0x0132}
0x31b0…31ec Head {h00=0x0038, h01=0x0050, text=» MATCH CTRANBUF,GSWBIN1,GSWBIN2,GSWSTR9,CBIN0,CBIN1 «, t00=0x001f, t01=0x014e}
0x31ec…3200 Head {h00=0x0010, h01=0x0050, text=» BNE WJDCRET«, t00=0x001f, t01=0x018a}
0x3200…322e Head {h00=0x002a, h01=0x0050, text=»* GSWBIN1=START «, t00=0x0020, t01=0x000e}
0x322e…325c Head {h00=0x002a, h01=0x0050, text=» ADD GSWBIN1,CBIN3 BYPASS SBA SEQUENSE«, t00=0x0020, t01=0x003c}
0x325c…327a Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN4,GSWBIN1 «, t00=0x0020, t01=0x006a}
0x327a…32a4 Head {h00=0x0026, h01=0x0050, text=» SUB GSWBIN2,GSWBIN4 ADJUST LENGTH«, t00=0x0020, t01=0x0088}
0x32a4…32c6 Head {h00=0x001e, h01=0x0050, text=» CBL GSWBIN2,CBIN1,WJDCRET«, t00=0x0020, t01=0x00b2}
0x32c6…32d6 Head {h00=0x000c, h01=0x0050, text=»WJDC005 «, t00=0x0020, t01=0x00d4}
0x32d6…32f2 Head {h00=0x0018, h01=0x0050, text=» MOVE CPCKBUF,=X'00'«, t00=0x0020, t01=0x00e4}
0x32f2…332e Head {h00=0x0038, h01=0x0050, text=» MATCH CTRANBUF,GSWBIN4,GSWBIN2,GSWSTR9,CBIN0,CBIN1 «, t00=0x0020, t01=0x0100}
0x332e…3342 Head {h00=0x0010, h01=0x0050, text=» BNE WJDC010«, t00=0x0020, t01=0x013c}
0x3342…3370 Head {h00=0x002a, h01=0x0050, text=» SUB GSWBIN4,GSWBIN1 GSWBIN4 = LENGTH «, t00=0x0020, t01=0x0150}
0x3370…33a4 Head {h00=0x0030, h01=0x0050, text=» COPY CPCKBUF,CBIN0,GSWBIN4,CTRANBUF,GSWBIN1«, t00=0x0020, t01=0x017e}
0x33a4…33c2 Head {h00=0x001a, h01=0x0050, text=» EDWRT KJTAPE,WJDCFRM «, t00=0x0021, t01=0x0022}
0x33c2…33dc Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN4,CBIN3«, t00=0x0021, t01=0x0040}
0x33dc…33f8 Head {h00=0x0018, h01=0x0050, text=» SUB GSWBIN2,GSWBIN4«, t00=0x0021, t01=0x005a}
0x33f8…3414 Head {h00=0x0018, h01=0x0050, text=» ADD GSWBIN4,GSWBIN1«, t00=0x0021, t01=0x0076}
0x3414…3432 Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GSWBIN4 «, t00=0x0021, t01=0x0092}
0x3432…3454 Head {h00=0x001e, h01=0x0050, text=» CBG GSWBIN2,CBIN3,WJDC005«, t00=0x0021, t01=0x00b0}
0x3454…3466 Head {h00=0x000e, h01=0x0050, text=» B WJDCRET«, t00=0x0021, t01=0x00d2}
0x3466…3476 Head {h00=0x000c, h01=0x0050, text=»WJDC010 «, t00=0x0021, t01=0x00e4}
0x3476…3488 Head {h00=0x000e, h01=0x0050, text=» B WJDC200«, t00=0x0021, t01=0x00f4}
0x3488…3498 Head {h00=0x000c, h01=0x0050, text=»WJDCRET «, t00=0x0021, t01=0x0106}
0x3498…34a4 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0021, t01=0x0116}
0x34a4…34ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0122}
0x34ae…34b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x012c}
0x34b8…34c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0136}
0x34c2…34d2 Head {h00=0x000c, h01=0x0050, text=»WJDC100 «, t00=0x0021, t01=0x0140}
0x34d2…34ee Head {h00=0x0018, h01=0x0050, text=» SUB GSWBIN2,GSWBIN1«, t00=0x0021, t01=0x0150}
0x34ee…3512 Head {h00=0x0020, h01=0x0050, text=» CBL GSWBIN2,=W'52',WJDC200 «, t00=0x0021, t01=0x016c}
0x3512…353a Head {h00=0x0024, h01=0x0050, text=» MOVE GSWBIN4,=W'30' FIND BLANK «, t00=0x0021, t01=0x0190}
0x353a…3576 Head {h00=0x0038, h01=0x0050, text=» MATCH CTRANBUF,GSWBIN4,GSWBIN2,CBLANKS,CBIN0,CBIN1 «, t00=0x0022, t01=0x0028}
0x3576…358a Head {h00=0x0010, h01=0x0050, text=» BNE WJDC200«, t00=0x0022, t01=0x0064}
0x358a…35a6 Head {h00=0x0018, h01=0x0050, text=» MOVE CPCKBUF,=X'00'«, t00=0x0022, t01=0x0078}
0x35a6…35c2 Head {h00=0x0018, h01=0x0050, text=» SUB GSWBIN4,GSWBIN1«, t00=0x0022, t01=0x0094}
0x35c2…35f6 Head {h00=0x0030, h01=0x0050, text=» COPY CPCKBUF,CBIN0,GSWBIN4,CTRANBUF,GSWBIN1«, t00=0x0022, t01=0x00b0}
0x35f6…3614 Head {h00=0x001a, h01=0x0050, text=» EDWRT KJTAPE,WJDCFRM «, t00=0x0022, t01=0x00e4}
0x3614…3630 Head {h00=0x0018, h01=0x0050, text=» SUB GSWBIN2,GSWBIN4«, t00=0x0022, t01=0x0102}
0x3630…364c Head {h00=0x0018, h01=0x0050, text=» ADD GSWBIN1,GSWBIN4«, t00=0x0022, t01=0x011e}
0x364c…365c Head {h00=0x000c, h01=0x0050, text=»WJDC200 «, t00=0x0022, t01=0x013a}
0x365c…3678 Head {h00=0x0018, h01=0x0050, text=» MOVE CPCKBUF,=X'00'«, t00=0x0022, t01=0x014a}
0x3678…369c Head {h00=0x0020, h01=0x0050, text=» CBL GSWBIN2,=W'52',WJDC210 «, t00=0x0022, t01=0x0166}
0x369c…36b8 Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,=W'52'«, t00=0x0022, t01=0x018a}
0x36b8…36c8 Head {h00=0x000c, h01=0x0050, text=»WJDC210 «, t00=0x0023, t01=0x0016}
0x36c8…36fc Head {h00=0x0030, h01=0x0050, text=» COPY CPCKBUF,CBIN0,GSWBIN2,CTRANBUF,GSWBIN1«, t00=0x0023, t01=0x0026}
0x36fc…371a Head {h00=0x001a, h01=0x0050, text=» EDWRT KJTAPE,WJDCFRM «, t00=0x0023, t01=0x005a}
0x371a…3726 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0023, t01=0x0078}
0x3726…3734 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0023, t01=0x0084}
0x3734…3742 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0023, t01=0x0092}
0x3742…3756 Head {h00=0x0010, h01=0x0050, text=»SNDFRM FRMT «, t00=0x0023, t01=0x00a0}
0x3756…3762 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0023, t01=0x00b4}
0x3762…3786 Head {h00=0x0020, h01=0x0050, text=» FCOPY =C'DATATRANSMISSION '«, t00=0x0023, t01=0x00c0}
0x3786…3792 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0023, t01=0x00e4}
0x3792…37ae Head {h00=0x0018, h01=0x0050, text=» FTEXT 'BRUGERNAVN' «, t00=0x0023, t01=0x00f0}
0x37ae…37d0 Head {h00=0x001e, h01=0x0050, text=» FKI 12,MINL=1,MAXL=13,ME «, t00=0x0023, t01=0x010c}
0x37d0…37fe Head {h00=0x002a, h01=0x0050, text=» FMEL 'AAAAAAAAAAAAAAAAAAA9',TTCYKTOT «, t00=0x0023, t01=0x012e}
0x37fe…380a Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0023, t01=0x015c}
0x380a…3824 Head {h00=0x0016, h01=0x0050, text=» FTEXT 'KENDEORD' «, t00=0x0023, t01=0x0168}
0x3824…3844 Head {h00=0x001c, h01=0x0050, text=» FKI 12,MINL=1,MAXL=4,ME«, t00=0x0023, t01=0x0182}
0x3844…3862 Head {h00=0x001a, h01=0x0050, text=» FMEL 'TTT9',TTARKSAV «, t00=0x0024, t01=0x0012}
0x3862…3878 Head {h00=0x0012, h01=0x0050, text=» FILLR X'07',1«, t00=0x0024, t01=0x0030}
0x3878…3886 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0024, t01=0x0046}
0x3886…3890 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0054}
0x3890…38a4 Head {h00=0x0010, h01=0x0050, text=»SIGONF FRMT «, t00=0x0024, t01=0x005e}
0x38a4…38b8 Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',2«, t00=0x0024, t01=0x0072}
0x38b8…38d2 Head {h00=0x0016, h01=0x0050, text=» FCOPY =X'272020' «, t00=0x0024, t01=0x0086}
0x38d2…38ec Head {h00=0x0016, h01=0x0050, text=» FTEXT 'CSSN PS=' «, t00=0x0024, t01=0x00a0}
0x38ec…390a Head {h00=0x001a, h01=0x0050, text=» FMEL '9999',TTARKSAV «, t00=0x0024, t01=0x00ba}
0x390a…3922 Head {h00=0x0014, h01=0x0050, text=» FTEXT ',NAME=' «, t00=0x0024, t01=0x00d8}
0x3922…3950 Head {h00=0x002a, h01=0x0050, text=» FMEL 'AAAAAAAAAAAAAAAAAAA9',TTCYKTOT «, t00=0x0024, t01=0x00f0}
0x3950…395e Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0024, t01=0x011e}
0x395e…3968 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x012c}
0x3968…397c Head {h00=0x0010, h01=0x0050, text=»SNDFRM2 FRMT«, t00=0x0024, t01=0x0136}
0x397c…3990 Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',2«, t00=0x0024, t01=0x014a}
0x3990…39aa Head {h00=0x0016, h01=0x0050, text=» FCOPY =X'272020' «, t00=0x0024, t01=0x015e}
0x39aa…39c0 Head {h00=0x0012, h01=0x0050, text=» FCOPY CPCKBUF«, t00=0x0024, t01=0x0178}
0x39c0…39ce Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0024, t01=0x018e}
0x39ce…39d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x000c}
0x39d8…39ec Head {h00=0x0010, h01=0x0050, text=»SNDFRM3 FRMT«, t00=0x0025, t01=0x0016}
0x39ec…3a00 Head {h00=0x0010, h01=0x0050, text=» FILLR '1',2«, t00=0x0025, t01=0x002a}
0x3a00…3a24 Head {h00=0x0020, h01=0x0050, text=» FCOPY =C'DATATRANSMISSION '«, t00=0x0025, t01=0x003e}
0x3a24…3a3a Head {h00=0x0012, h01=0x0050, text=» FILLR X'07',1«, t00=0x0025, t01=0x0062}
0x3a3a…3a48 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0025, t01=0x0078}
0x3a48…3a52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0086}
0x3a52…3a66 Head {h00=0x0010, h01=0x0050, text=»SNDFRM4 FRMT«, t00=0x0025, t01=0x0090}
0x3a66…3a7a Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',2«, t00=0x0025, t01=0x00a4}
0x3a7a…3a9a Head {h00=0x001c, h01=0x0050, text=» FTEXT 'ANTAL RECORDS:' «, t00=0x0025, t01=0x00b8}
0x3a9a…3aba Head {h00=0x001c, h01=0x0050, text=» FMEL 'ZZZZZ9',TTARKSAV «, t00=0x0025, t01=0x00d8}
0x3aba…3ac8 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0025, t01=0x00f8}
0x3ac8…3ad2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0106}
0x3ad2…3ae6 Head {h00=0x0010, h01=0x0050, text=»SNDFRM5 FRMT«, t00=0x0025, t01=0x0110}
0x3ae6…3b04 Head {h00=0x001a, h01=0x0050, text=» FBNZ GSWBIN3,SNDLAB10«, t00=0x0025, t01=0x0124}
0x3b04…3b18 Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',2«, t00=0x0025, t01=0x0142}
0x3b18…3b32 Head {h00=0x0016, h01=0x0050, text=» FCOPY =X'272020' «, t00=0x0025, t01=0x0156}
0x3b32…3b42 Head {h00=0x000c, h01=0x0050, text=»SNDLAB10«, t00=0x0025, t01=0x0170}
0x3b42…3b5c Head {h00=0x0016, h01=0x0050, text=» FCOPY =X'112020' «, t00=0x0025, t01=0x0180}
0x3b5c…3b72 Head {h00=0x0012, h01=0x0050, text=» FCOPY CPCKBUF«, t00=0x0026, t01=0x000a}
0x3b72…3b80 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0026, t01=0x0020}
0x3b80…3b94 Head {h00=0x0010, h01=0x0050, text=»SNDFRM6 FRMT«, t00=0x0026, t01=0x002e}
0x3b94…3ba0 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0026, t01=0x0042}
0x3ba0…3bc4 Head {h00=0x0020, h01=0x0050, text=» FCOPY =C'DATATRANSMISSION '«, t00=0x0026, t01=0x004e}
0x3bc4…3bd8 Head {h00=0x0010, h01=0x0050, text=» FILLR '?',1«, t00=0x0026, t01=0x0072}
0x3bd8…3bee Head {h00=0x0012, h01=0x0050, text=» FILLR X'07',1«, t00=0x0026, t01=0x0086}
0x3bee…3bfa Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0026, t01=0x009c}
0x3bfa…3c08 Head {h00=0x000a, h01=0x0050, text=» FKI 1«, t00=0x0026, t01=0x00a8}
0x3c08…3c22 Head {h00=0x0016, h01=0x0050, text=» FMEL 'B',TSWBCD2 «, t00=0x0026, t01=0x00b6}
0x3c22…3c30 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0026, t01=0x00d0}
0x3c30…3c3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00de}
0x3c3a…3c4e Head {h00=0x0010, h01=0x0050, text=»WJDCFRM FRMT«, t00=0x0026, t01=0x00e8}
0x3c4e…3c62 Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',2«, t00=0x0026, t01=0x00fc}
0x3c62…3c78 Head {h00=0x0012, h01=0x0050, text=» FCOPY CPCKBUF«, t00=0x0026, t01=0x0110}
0x3c78…3c86 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0026, t01=0x0126}
0x3c86…3c90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0134}
0x3c90…3ca4 Head {h00=0x0010, h01=0x0050, text=»LOKFMT FRMT «, t00=0x0026, t01=0x013e}
0x3ca4…3cb8 Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',2«, t00=0x0026, t01=0x0152}
0x3cb8…3cee Head {h00=0x0032, h01=0x0050, text=» FTEXT 'FLG. DISKETTE SENDES TIL LOKALSYSTEM' «, t00=0x0026, t01=0x0166}
0x3cee…3cfc Head {h00=0x000a, h01=0x0050, text=» FEOR «, t00=0x0027, t01=0x000c}
0x3cfc…3d10 Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',2«, t00=0x0027, t01=0x001a}
0x3d10…3d1e Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0027, t01=0x002e}
0x3d1e…3d2a Head {h00=0x0008, h01=0x0004, text=» END«, t00=0x0027, t01=0x003c}
0x3d2a…3d2e Head {h00=0x4004, h01=0x0000}
0x3d2e…3d32 00 27 00 48 ┆ ' H┆
0x3d32…3d3a (40, 1, 8) 20 04 00 00 00 28 00 04 ┆ ( ┆
0x3d3a…3d84 (41, 0, 74) 00 08 00 03 30 31 3b 20 00 01 00 04 00 0c 00 08 53 43 4c 3d 53 30 31 3b 00 01 00 10 00 06 00 02 55 3b 00 01 00 20 00 08 00 04 30 30 31 3b 00 01 00 2a 00 08 00 04 54 42 32 3b 00 01 00 36 00 08 00 50 30 31 32 3b 00 01 00 42 ┆ 01; SCL=S01; U; 001; * TB2; 6 P012; B┆
0x3d84…3d8c (42, 1, 8) 20 04 00 00 00 02 00 04 ┆ ┆
0x3d8c…3ddc (43, 0, 400) 45 47 53 45 54 20 00 02 01 76 00 26 00 50 44 4b 30 33 20 44 53 45 54 20 46 43 3d 43 33 5c 46 44 39 39 39 30 30 33 20 43 59 43 4c 45 20 53 45 54 00 03 00 0e 00 24 00 50 44 4b 30 34 20 44 53 45 54 20 46 43 3d 43 34 5c 46 44 39 39 39 30 30 34 ┆EGSET v & PDK03 DSET FC=C3 FD999003 CYCLE SET $ PDK04 DSET FC=C4 FD999004┆
0x3ddc…3e2c 20 4b 54 20 50 4c 41 4e 00 03 00 38 00 16 00 50 44 53 53 4f 50 49 20 44 53 45 54 20 46 43 3d 31 30 20 00 03 00 60 00 16 00 50 44 53 53 4f 50 4f 20 44 53 45 54 20 46 43 3d 31 31 20 00 03 00 7a 00 22 00 50 20 46 4d 54 43 54 4c 20 49 4e 44 53 ┆ KT PLAN 8 PDSSOPI DSET FC=10 ` PDSSOPO DSET FC=11 z " P FMTCTL INDS┆
0x3e2c…3e7c 3d 4b 45 59 42 2c 4f 55 54 44 53 3d 53 43 52 45 45 4e 00 03 00 94 00 06 00 50 2a 20 00 03 00 ba 00 06 00 50 2a 20 00 03 00 c4 00 06 00 50 2a 20 00 03 00 ce 00 06 00 50 2a 20 00 03 00 d8 00 06 00 50 2a 20 00 03 00 e2 00 10 00 50 5c 53 54 41 ┆=KEYB,OUTDS=SCREEN P* P* P* P* P* P STA┆
0x3e7c…3ecc 52 54 5c 52 45 47 47 4f 00 03 00 ec 00 0e 00 50 5c 53 54 41 43 4b 5c 31 36 30 00 03 01 00 00 0a 00 50 20 45 4a 45 43 54 00 03 01 12 00 4c 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆RT REGGO P STACK 160 P EJECT L P********************************┆
0x3ecc…3f1c 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 03 01 20 00 06 00 50 2a 20 00 03 01 70 00 46 00 50 2a 20 20 20 44 20 41 20 54 20 44 20 49 20 56 20 20 3a 20 20 44 41 ┆**************************************** P* p F P* D A T D I V : DA┆
0x3f1c…3f6c (44, 0, 400) 54 41 20 44 49 56 49 53 49 4f 4e 20 46 4f 52 20 49 42 4d 2d 33 32 37 30 20 45 4d 55 4c 41 54 49 4f 4e 20 50 41 43 4b 41 47 45 2e 20 00 03 01 7a 00 42 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 48 49 53 20 4d 4f 44 ┆TA DIVISION FOR IBM-3270 EMULATION PACKAGE. z B P* THIS MOD┆
0x3f6c…3fbc 55 4c 45 20 41 4c 53 4f 20 43 4f 4e 54 41 49 4e 53 20 54 48 45 20 43 52 45 44 49 54 20 43 4f 44 45 44 00 04 00 34 00 2a 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 54 41 52 54 2d 55 50 20 52 4f 55 54 49 4e 45 53 2e ┆ULE ALSO CONTAINS THE CREDIT CODED 4 * P* START-UP ROUTINES.┆
0x3fbc…400c 00 04 00 7a 00 06 00 50 2a 20 00 04 00 a8 00 48 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ z P* H P**************************************************************┆
0x400c…405c 2a 2a 2a 2a 2a 2a 00 04 00 b2 00 04 00 50 00 04 00 fe 00 0a 00 50 5c 45 4a 45 43 54 00 04 01 06 00 12 00 50 2a 5c 43 57 42 20 31 5c 43 4f 4d 4d 4f 4e 00 04 01 14 00 06 00 50 2a 20 00 04 01 2a 00 06 00 50 2a 20 00 04 01 34 00 0c 00 50 43 42 ┆****** P P EJECT P* CWB 1 COMMON P* * P* 4 PCB┆
0x405c…40ac 31 5c 42 4c 4b 20 00 04 01 3e 00 2e 00 50 43 42 4b 4f 46 4c 47 20 42 4f 4f 4c 20 54 52 55 45 20 54 3d 41 4c 4c 20 42 4b 4f 2d 43 4f 44 45 53 20 41 4c 4c 4f 57 45 44 20 00 04 01 4e 00 30 00 50 43 4b 54 46 4c 41 47 20 42 4f 4f 4c 20 54 52 55 ┆1 BLK > . PCBKOFLG BOOL TRUE T=ALL BKO-CODES ALLOWED N 0 PCKTFLAG BOOL TRU┆