DataMuseum.dk

Presents historical artifacts from the history of:

Philips Data Systems

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Philips Data Systems

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦84a9568ba⟧

    Length: 14834 (0x39f2)
    Notes: pts_type(SC)
    Names: »ADM6.SC«

Derivation

└─⟦b6546aa17⟧ Bits:30009689 Philips computer tape "600325"
    └─⟦this⟧ »REMIT2/ADM6.SC« 

PTS(SC)

	IDENT ADM6 	03.01.XXX.1
 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
 SET CCONVFLG 
 CLEAR SPKEYFLG 
 TEST GTKASSE 
 BNZ ADM06RET 
 CMP TTASKNR,CBIN1 MASTER ? 
 BNE ADM06RET NO
 CMP CTASKNR,CBIN0 ALL CLOSED 
 BNE ADM06RET 
 SET SPPROMPT 
 MOVE SPKEY,CBIN2 
 ATTFMT SNDFRM
 PERF SPCLRS
 IB SPBINW2,ADM06RET,ADM06RET,ADM0610 
 B ADM600 
* 
*                           WRITE SLUTD 
* 
ADM0610 
 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 
*     SEND NEXT OR SIGNOFF
 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
			IF NOT OK
 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
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'64' LAMP 5
 PERF LAMPON,=W'32' LAMP 6
 PERF LAMPON,=W'16' LAMP 7
CHNG010 
 PERF SOPRD 
 IB GSWBIN2,		C 
		CHSOP10,CHSOP09,CHSOP08,CHSOP07,CHSOP06,		C 
		CHSOP05,CHSOP04,CHSOP03,CHSOP02,CHSOP01 
CHSOP01 
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 ? 
 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 
*****DCEXCH DCOMM,CTRANBUF,GSWBIN2,GSWBIN5,CTRANBUF 
* 
 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
************************************************
* 
*         FORMATS USED
* 
************************************************
* 
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
* 
WJDCFRM FRMT
 FILLR ' ',2
 FCOPY CPCKBUF
 FMEND
* 
 END

HexDump

0x0000…0020 (0, 0, 400)  Head {h00=0x001c, h01=0x0050, text=» IDENT ADM6  03.01.XXX.1«, t00=0x0000, t01=0x0004}
0x0020…0034              Head {h00=0x0010, h01=0x000b, text=» DDUM KMD08 «, t00=0x0000, t01=0x0024}
0x0034…0042              Head {h00=0x000a, h01=0x0005, text=» PDIV «, t00=0x0000, t01=0x0038}
0x0042…0058              Head {h00=0x0012, h01=0x0050, text=» ENTRY ADM600 «, t00=0x0000, t01=0x0046}
0x0058…006e              Head {h00=0x0012, h01=0x0050, text=» ENTRY SIGNON «, t00=0x0000, t01=0x005c}
0x006e…0084              Head {h00=0x0012, h01=0x0050, text=» ENTRY CHNGDK «, t00=0x0000, t01=0x0072}
0x0084…009a              Head {h00=0x0012, h01=0x0050, text=» ENTRY STRTRC «, t00=0x0000, t01=0x0088}
0x009a…00b0              Head {h00=0x0012, h01=0x0050, text=» ENTRY SENDRC «, t00=0x0000, t01=0x009e}
0x00b0…00c6              Head {h00=0x0012, h01=0x0050, text=» ENTRY TERMIN «, t00=0x0000, t01=0x00b4}
0x00c6…00dc              Head {h00=0x0012, h01=0x0050, text=» ENTRY SIGNOF «, t00=0x0000, t01=0x00ca}
0x00dc…00f2              Head {h00=0x0012, h01=0x0050, text=» ENTRY EXCHAN «, t00=0x0000, t01=0x00e0}
0x00f2…0106              Head {h00=0x0010, h01=0x0050, text=» ENTRY TRNOK«, t00=0x0000, t01=0x00f6}
0x0106…011a              Head {h00=0x0010, h01=0x0050, text=» ENTRY WJDC «, t00=0x0000, t01=0x010a}
0x011a…0124              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x011e}
0x0124…0138              Head {h00=0x0010, h01=0x0050, text=» EXT SPCLRS «, t00=0x0000, t01=0x0128}
0x0138…014c              Head {h00=0x0010, h01=0x0050, text=» EXT SLUTID «, t00=0x0000, t01=0x013c}
0x014c…0160              Head {h00=0x0010, h01=0x0050, text=» EXT RAWRIT «, t00=0x0000, t01=0x0150}
0x0160…0174              Head {h00=0x0010, h01=0x0050, text=» EXT WRITID «, t00=0x0000, t01=0x0164}
0x0174…0188              Head {h00=0x0010, h01=0x0050, text=» EXT LAMPOF «, t00=0x0000, t01=0x0178}
0x0188…019c              Head {h00=0x0010, h01=0x0050, text=» EXT ADMRET «, t00=0x0000, t01=0x018c}
0x019c…01ae              Head {h00=0x000e, h01=0x0050, text=» EXT SPERR«, t00=0x0001, t01=0x0010}
0x01ae…01c2              Head {h00=0x0010, h01=0x0050, text=» EXT CLSVOL «, t00=0x0001, t01=0x0022}
0x01c2…01d6              Head {h00=0x0010, h01=0x0050, text=» EXT LAMPON «, t00=0x0001, t01=0x0036}
0x01d6…01e8              Head {h00=0x000e, h01=0x0050, text=» EXT SOPRD«, t00=0x0001, t01=0x004a}
0x01e8…01fc              Head {h00=0x0010, h01=0x0050, text=» EXT ASGVOL «, t00=0x0001, t01=0x005c}
0x01fc…020e              Head {h00=0x000e, h01=0x0050, text=» EXT BCKUP«, t00=0x0001, t01=0x0070}
0x020e…0222              Head {h00=0x0010, h01=0x0050, text=» EXT RAREAD «, t00=0x0001, t01=0x0082}
0x0222…0236              Head {h00=0x0010, h01=0x0050, text=» EXT GETBIT «, t00=0x0001, t01=0x0096}
0x0236…024a              Head {h00=0x0010, h01=0x0050, text=» EXT WRITJT «, t00=0x0001, t01=0x00aa}
0x024a…0254              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00be}
0x0254…026c              Head {h00=0x0014, h01=0x0050, text=» INCLUDE EQUATE «, t00=0x0001, t01=0x00c8}
0x026c…027a              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x00e0}
0x027a…0288              Head {h00=0x000a, h01=0x0050, text=»ADM600«, t00=0x0001, t01=0x00ee}
0x0288…029e              Head {h00=0x0012, h01=0x0050, text=» SET CCONVFLG «, t00=0x0001, t01=0x00fc}
0x029e…02b6              Head {h00=0x0014, h01=0x0050, text=» CLEAR SPKEYFLG «, t00=0x0001, t01=0x0112}
0x02b6…02cc              Head {h00=0x0012, h01=0x0050, text=» TEST GTKASSE «, t00=0x0001, t01=0x012a}
0x02cc…02e2              Head {h00=0x0012, h01=0x0050, text=» BNZ ADM06RET «, t00=0x0001, t01=0x0140}
0x02e2…0306              Head {h00=0x0020, h01=0x0050, text=» CMP TTASKNR,CBIN1 MASTER ? «, t00=0x0001, t01=0x0156}
0x0306…031e              Head {h00=0x0014, h01=0x0050, text=» BNE ADM06RET NO«, t00=0x0001, t01=0x017a}
0x031e…0344 (2, 0, 400)  Head {h00=0x0022, h01=0x0050, text=» CMP CTASKNR,CBIN0 ALL CLOSED «, t00=0x0002, t01=0x0004}
0x0344…035a              Head {h00=0x0012, h01=0x0050, text=» BNE ADM06RET «, t00=0x0002, t01=0x002a}
0x035a…0370              Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0002, t01=0x0040}
0x0370…038a              Head {h00=0x0016, h01=0x0050, text=» MOVE SPKEY,CBIN2 «, t00=0x0002, t01=0x0056}
0x038a…03a0              Head {h00=0x0012, h01=0x0050, text=» ATTFMT SNDFRM«, t00=0x0002, t01=0x0070}
0x03a0…03b4              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRS«, t00=0x0002, t01=0x0086}
0x03b4…03e2              Head {h00=0x002a, h01=0x0050, text=» IB SPBINW2,ADM06RET,ADM06RET,ADM0610 «, t00=0x0002, t01=0x009a}
0x03e2…03f4              Head {h00=0x000e, h01=0x0050, text=» B ADM600 «, t00=0x0002, t01=0x00c8}
0x03f4…03fe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00da}
0x03fe…042e              Head {h00=0x002c, h01=0x0050, text=»*                           WRITE SLUTD «, t00=0x0002, t01=0x00e4}
0x042e…0438              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0114}
0x0438…0448              Head {h00=0x000c, h01=0x0050, text=»ADM0610 «, t00=0x0002, t01=0x011e}
0x0448…0462              Head {h00=0x0016, h01=0x0050, text=» SUB CRECBCD,=D'1'«, t00=0x0002, t01=0x012e}
0x0462…047e              Head {h00=0x0018, h01=0x0050, text=» PERF SLUTID,CRECBCD«, t00=0x0002, t01=0x0148}
0x047e…0498              Head {h00=0x0016, h01=0x0050, text=» ADD CRECBCD,=D'1'«, t00=0x0002, t01=0x0164}
0x0498…04c6              Head {h00=0x002a, h01=0x0050, text=» PERF RAWRIT,DK02,=D'2',CPCKBUF,CRECNR«, t00=0x0002, t01=0x017e}
0x04c6…04da              Head {h00=0x0010, h01=0x0050, text=» BNOK ADM600«, t00=0x0003, t01=0x001c}
0x04da…050c              Head {h00=0x002e, h01=0x0050, text=» PERF WRITID,CBIN5,CBIN2 SLUTID ON JOURNAL«, t00=0x0003, t01=0x0030}
0x050c…051a              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x0062}
0x051a…0554              Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0003, t01=0x0070}
0x0554…055e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00aa}
0x055e…0586              Head {h00=0x0024, h01=0x0050, text=»*             BATCH TRANSMISSION«, t00=0x0003, t01=0x00b4}
0x0586…05a0              Head {h00=0x0016, h01=0x0050, text=»*       1)  SIGNON«, t00=0x0003, t01=0x00dc}
0x05a0…05c0              Head {h00=0x001c, h01=0x0050, text=»*       2)  CHANGE DISK «, t00=0x0003, t01=0x00f6}
0x05c0…05e4              Head {h00=0x0020, h01=0x0050, text=»*       3)  SEND STARTIDENT «, t00=0x0003, t01=0x0116}
0x05e4…0614              Head {h00=0x002c, h01=0x0050, text=»*       4)  SEND TRANSACTIONS AND SLUTID«, t00=0x0003, t01=0x013a}
0x0614…0648              Head {h00=0x0030, h01=0x0050, text=»*       5)  IN CASE OF ERROR SEND TERMINATE «, t00=0x0003, t01=0x016a}
0x0648…067e              Head {h00=0x0032, h01=0x0050, text=»*       6)  WHEN ALL TRANSMITTED SEND SIGNOFF «, t00=0x0004, t01=0x000e}
0x067e…0688              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0044}
0x0688…06c2              Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x0004, t01=0x004e}
0x06c2…06d6              Head {h00=0x0010, h01=0x0050, text=» PERF SIGNON«, t00=0x0004, t01=0x0088}
0x06d6…06ec              Head {h00=0x0012, h01=0x0050, text=» BNOK ADM06OUT«, t00=0x0004, t01=0x009c}
0x06ec…06fc              Head {h00=0x000c, h01=0x0050, text=»ADM0620 «, t00=0x0004, t01=0x00b2}
0x06fc…071e              Head {h00=0x001e, h01=0x0050, text=»*     SEND NEXT OR SIGNOFF«, t00=0x0004, t01=0x00c2}
0x071e…073c              Head {h00=0x001a, h01=0x0050, text=» PERF LAMPOF,=W'2047' «, t00=0x0004, t01=0x00e4}
0x073c…074c              Head {h00=0x000c, h01=0x0050, text=»ADM0630 «, t00=0x0004, t01=0x0102}
0x074c…076c              Head {h00=0x001c, h01=0x0050, text=» PERF CHNGDK CHANGE DISC«, t00=0x0004, t01=0x0112}
0x076c…0782              Head {h00=0x0012, h01=0x0050, text=» BNOK ADM6SOFF«, t00=0x0004, t01=0x0132}
0x0782…07a6              Head {h00=0x0020, h01=0x0050, text=» PERF STRTRC SEND STARTIDENT«, t00=0x0004, t01=0x0148}
0x07a6…07d0              Head {h00=0x0026, h01=0x0050, text=» BNOK ADM0630 IF NOT OK, TRY NEXT «, t00=0x0004, t01=0x016c}
0x07d0…07f0              Head {h00=0x001c, h01=0x0050, text=» PERF SENDRC SEND BATCH «, t00=0x0005, t01=0x0008}
0x07f0…0804              Head {h00=0x0010, h01=0x0050, text=» BOK ADM0620«, t00=0x0005, t01=0x0028}
0x0804…0818              Head {h00=0x0010, h01=0x0050, text=»   IF NOT OK«, t00=0x0005, t01=0x003c}
0x0818…083c              Head {h00=0x0020, h01=0x0050, text=» PERF TERMIN SEND TERMINATE «, t00=0x0005, t01=0x0050}
0x083c…085a              Head {h00=0x001a, h01=0x0050, text=» PERF LAMPOF,=W'2047' «, t00=0x0005, t01=0x0074}
0x085a…0884              Head {h00=0x0026, h01=0x0050, text=» PERF LAMPON,=W'2' LAMP 10, ERROR «, t00=0x0005, t01=0x0092}
0x0884…0896              Head {h00=0x000e, h01=0x0050, text=» B ADM0630«, t00=0x0005, t01=0x00bc}
0x0896…08a6              Head {h00=0x000c, h01=0x0050, text=»ADM6SOFF«, t00=0x0005, t01=0x00ce}
0x08a6…08c8              Head {h00=0x001e, h01=0x0050, text=» PERF SIGNOF SEND SIGNOFF «, t00=0x0005, t01=0x00de}
0x08c8…08d8              Head {h00=0x000c, h01=0x0050, text=»ADM06OUT«, t00=0x0005, t01=0x0100}
0x08d8…090a              Head {h00=0x002e, h01=0x0050, text=» MOVE CTRANBUF,=X'00' CLEAR TR 12 COUNTERS«, t00=0x0005, t01=0x0110}
0x090a…091a              Head {h00=0x000c, h01=0x0050, text=»ADM06RET«, t00=0x0005, t01=0x0142}
0x091a…0932              Head {h00=0x0014, h01=0x0050, text=» CLEAR CCONVFLG «, t00=0x0005, t01=0x0152}
0x0932…0948              Head {h00=0x0012, h01=0x0050, text=» SET SPKEYFLG «, t00=0x0005, t01=0x016a}
0x0948…0966              Head {h00=0x001a, h01=0x0050, text=» PERF LAMPOF,=W'2047' «, t00=0x0005, t01=0x0180}
0x0966…0978              Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x0006, t01=0x000e}
0x0978…0986              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x0020}
0x0986…09be              Head {h00=0x0034, h01=0x0050, text=»************************************************«, t00=0x0006, t01=0x002e}
0x09be…09c8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0066}
0x09c8…09e4              Head {h00=0x0018, h01=0x0050, text=»*             SIGNON«, t00=0x0006, t01=0x0070}
0x09e4…0a06              Head {h00=0x001e, h01=0x0050, text=»*    IF NOT OK CR NOT = 0 «, t00=0x0006, t01=0x008c}
0x0a06…0a10              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00ae}
0x0a10…0a48              Head {h00=0x0034, h01=0x0050, text=»************************************************«, t00=0x0006, t01=0x00b8}
0x0a48…0a5c              Head {h00=0x0010, h01=0x0050, text=»SIGNON PROC «, t00=0x0006, t01=0x00f0}
0x0a5c…0a78              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN5 «, t00=0x0006, t01=0x0104}
0x0a78…0a94              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,=W'50'«, t00=0x0006, t01=0x0120}
0x0a94…0ab0              Head {h00=0x0018, h01=0x0050, text=» MOVE CTRANBUF,=C' '«, t00=0x0006, t01=0x013c}
0x0ab0…0ace              Head {h00=0x001a, h01=0x0050, text=» EDIT CTRANBUF,SIGONF «, t00=0x0006, t01=0x0158}
0x0ace…0afc              Head {h00=0x002a, h01=0x0050, text=»*                          FIND LENGTH«, t00=0x0006, t01=0x0176}
0x0afc…0b38              Head {h00=0x0038, h01=0x0050, text=» MATCH CTRANBUF,GSWBIN1,GSWBIN2,CBLANKS,CBIN0,CBIN2 «, t00=0x0007, t01=0x0014}
0x0b38…0b56              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN2,GSWBIN1 «, t00=0x0007, t01=0x0050}
0x0b56…0b74              Head {h00=0x001a, h01=0x0050, text=» TBT CTESTFLG,SIGON10 «, t00=0x0007, t01=0x006e}
0x0b74…0b94              Head {h00=0x001c, h01=0x0050, text=» PERF EXCHAN EXCHANGE DC«, t00=0x0007, t01=0x008c}
0x0b94…0baa              Head {h00=0x0012, h01=0x0050, text=» BNOK SIGON100«, t00=0x0007, t01=0x00ac}
0x0baa…0bbc              Head {h00=0x000e, h01=0x0050, text=» PERF WJDC«, t00=0x0007, t01=0x00c2}
0x0bbc…0bde              Head {h00=0x001e, h01=0x0050, text=» MOVE GSWSTR20,=C'DFH3504'«, t00=0x0007, t01=0x00d4}
0x0bde…0bfa              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN0 «, t00=0x0007, t01=0x00f6}
0x0bfa…0c36              Head {h00=0x0038, h01=0x0050, text=» MATCH CTRANBUF,GSWBIN1,GSWBIN2,GSWSTR20,CBIN0,CBIN7«, t00=0x0007, t01=0x0112}
0x0c36…0c4c              Head {h00=0x0012, h01=0x0050, text=» BNE SIGON100 «, t00=0x0007, t01=0x014e}
0x0c4c…0c5c              Head {h00=0x000c, h01=0x0050, text=»SIGON10 «, t00=0x0007, t01=0x0164}
0x0c5c…0c7a              Head {h00=0x001a, h01=0x0050, text=» EDWRT SCREEN,SNDFRM3 «, t00=0x0007, t01=0x0174}
0x0c7a…0c92 (8, 0, 400)  Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x0008, t01=0x0004}
0x0c92…0c9e              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0008, t01=0x001c}
0x0c9e…0cae              Head {h00=0x000c, h01=0x0050, text=»SIGON100«, t00=0x0008, t01=0x0028}
0x0cae…0cca              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW4,CBIN21«, t00=0x0008, t01=0x0038}
0x0cca…0ce6              Head {h00=0x0018, h01=0x0050, text=» MOVE GTWBCD2,=D'60'«, t00=0x0008, t01=0x0054}
0x0ce6…0d0a              Head {h00=0x0020, h01=0x0050, text=» MOVE GSWSTR9,=C'TRANSMIT ' «, t00=0x0008, t01=0x0070}
0x0d0a…0d26              Head {h00=0x0018, h01=0x0050, text=» MOVE GTWBCD1,=D'16'«, t00=0x0008, t01=0x0094}
0x0d26…0d3a              Head {h00=0x0010, h01=0x0050, text=» PERF SPERR «, t00=0x0008, t01=0x00b0}
0x0d3a…0d56              Head {h00=0x0018, h01=0x0050, text=» PERF WRITJT,=W'14' «, t00=0x0008, t01=0x00c4}
0x0d56…0d6e              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN1«, t00=0x0008, t01=0x00e0}
0x0d6e…0d7a              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0008, t01=0x00f8}
0x0d7a…0d88              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0008, t01=0x0104}
0x0d88…0d96              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x0112}
0x0d96…0dcc              Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0008, t01=0x0120}
0x0dcc…0dd6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0156}
0x0dd6…0e00              Head {h00=0x0026, h01=0x0050, text=»*            CHNGDK - CHANGE DISK «, t00=0x0008, t01=0x0160}
0x0e00…0e0a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x018a}
0x0e0a…0e2c (9, 0, 400)  Head {h00=0x001e, h01=0x0050, text=»*         STOP SEND PIN 6 «, t00=0x0009, t01=0x0004}
0x0e2c…0e4e              Head {h00=0x001e, h01=0x0050, text=»*         CONTINIUE PIN 5 «, t00=0x0009, t01=0x0026}
0x0e4e…0e58              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0048}
0x0e58…0e8e              Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0009, t01=0x0052}
0x0e8e…0ea2              Head {h00=0x0010, h01=0x0050, text=»CHNGDK PROC «, t00=0x0009, t01=0x0088}
0x0ea2…0eb2              Head {h00=0x000c, h01=0x0050, text=»CHNG000 «, t00=0x0009, t01=0x009c}
0x0eb2…0ee2              Head {h00=0x002c, h01=0x0050, text=» PERF CLSVOL,CBIN2 CLOSE FILES ON VOL 2 «, t00=0x0009, t01=0x00ac}
0x0ee2…0efc              Head {h00=0x0016, h01=0x0050, text=» MOVE CRECNR,CBIN1«, t00=0x0009, t01=0x00dc}
0x0efc…0f18              Head {h00=0x0018, h01=0x0050, text=» MOVE CRECBCD,=D'1' «, t00=0x0009, t01=0x00f6}
0x0f18…0f3a              Head {h00=0x001e, h01=0x0050, text=» PERF LAMPON,=W'64' LAMP 5«, t00=0x0009, t01=0x0112}
0x0f3a…0f5c              Head {h00=0x001e, h01=0x0050, text=» PERF LAMPON,=W'32' LAMP 6«, t00=0x0009, t01=0x0134}
0x0f5c…0f7e              Head {h00=0x001e, h01=0x0050, text=» PERF LAMPON,=W'16' LAMP 7«, t00=0x0009, t01=0x0156}
0x0f7e…0f8e              Head {h00=0x000c, h01=0x0050, text=»CHNG010 «, t00=0x0009, t01=0x0178}
0x0f8e…0fa2              Head {h00=0x0010, h01=0x0050, text=» PERF SOPRD «, t00=0x0009, t01=0x0188}
0x0fa2…0fba              Head {h00=0x0014, h01=0x0050, text=» IB GSWBIN2,  C «, t00=0x000a, t01=0x000c}
0x0fba…0ff0              Head {h00=0x0032, h01=0x0050, text=»  CHSOP10,CHSOP09,CHSOP08,CHSOP07,CHSOP06,  C «, t00=0x000a, t01=0x0024}
0x0ff0…1022              Head {h00=0x002e, h01=0x0050, text=»  CHSOP05,CHSOP04,CHSOP03,CHSOP02,CHSOP01 «, t00=0x000a, t01=0x005a}
0x1022…1032              Head {h00=0x000c, h01=0x0050, text=»CHSOP01 «, t00=0x000a, t01=0x008c}
0x1032…1042              Head {h00=0x000c, h01=0x0050, text=»CHSOP02 «, t00=0x000a, t01=0x009c}
0x1042…1052              Head {h00=0x000c, h01=0x0050, text=»CHSOP03 «, t00=0x000a, t01=0x00ac}
0x1052…1062              Head {h00=0x000c, h01=0x0050, text=»CHSOP04 «, t00=0x000a, t01=0x00bc}
0x1062…1072              Head {h00=0x000c, h01=0x0050, text=»CHSOP08 «, t00=0x000a, t01=0x00cc}
0x1072…1082              Head {h00=0x000c, h01=0x0050, text=»CHSOP09 «, t00=0x000a, t01=0x00dc}
0x1082…1094              Head {h00=0x000e, h01=0x0050, text=» B CHNG010«, t00=0x000a, t01=0x00ec}
0x1094…109e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00fe}
0x109e…10ae              Head {h00=0x000c, h01=0x0050, text=»CHSOP10 «, t00=0x000a, t01=0x0108}
0x10ae…10ce              Head {h00=0x001c, h01=0x0050, text=»*   ERROR, SIGN ON AGAIN«, t00=0x000a, t01=0x0118}
0x10ce…10f6              Head {h00=0x0024, h01=0x0050, text=» PERF LAMPOF,=W'2047' LAMPS OFF «, t00=0x000a, t01=0x0138}
0x10f6…1118              Head {h00=0x001e, h01=0x0050, text=» PERF LAMPON,=W'2' LAMP 10«, t00=0x000a, t01=0x0160}
0x1118…112e              Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x000a, t01=0x0182}
0x112e…1152              Head {h00=0x0020, h01=0x0050, text=» ATTFMT SNDFRM SIGNON FORMAT«, t00=0x000b, t01=0x0008}
0x1152…1166              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRS«, t00=0x000b, t01=0x002c}
0x1166…118e              Head {h00=0x0024, h01=0x0050, text=» IB SPBINW2,CH1010,CH1010,CH1020«, t00=0x000b, t01=0x0040}
0x118e…119c              Head {h00=0x000a, h01=0x0050, text=»CH1010«, t00=0x000b, t01=0x0068}
0x119c…11ae              Head {h00=0x000e, h01=0x0050, text=» B CHNG000«, t00=0x000b, t01=0x0076}
0x11ae…11bc              Head {h00=0x000a, h01=0x0050, text=»CH1020«, t00=0x000b, t01=0x0088}
0x11bc…11d0              Head {h00=0x0010, h01=0x0050, text=» PERF SIGNON«, t00=0x000b, t01=0x0096}
0x11d0…11e6              Head {h00=0x0012, h01=0x0050, text=» BNOK CHNG000 «, t00=0x000b, t01=0x00aa}
0x11e6…1204              Head {h00=0x001a, h01=0x0050, text=» PERF LAMPOF =W'2047' «, t00=0x000b, t01=0x00c0}
0x1204…1216              Head {h00=0x000e, h01=0x0050, text=» B CHNG000«, t00=0x000b, t01=0x00de}
0x1216…1220              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00f0}
0x1220…1230              Head {h00=0x000c, h01=0x0050, text=»CHSOP05 «, t00=0x000b, t01=0x00fa}
0x1230…1258              Head {h00=0x0024, h01=0x0050, text=» PERF LAMPOF,=W'2047' LAMPS OFF «, t00=0x000b, t01=0x010a}
0x1258…1280              Head {h00=0x0024, h01=0x0050, text=» PERF ASGVOL,CBIN2 ASSIGN DISK 2«, t00=0x000b, t01=0x0132}
0x1280…1294              Head {h00=0x0010, h01=0x0050, text=» BOK CHNG050«, t00=0x000b, t01=0x015a}
0x1294…12ae              Head {h00=0x0016, h01=0x0050, text=» PERF LAMPON,=W'2'«, t00=0x000b, t01=0x016e}
0x12ae…12c0              Head {h00=0x000e, h01=0x0050, text=» B CHNG000«, t00=0x000b, t01=0x0188}
0x12c0…12d0              Head {h00=0x000c, h01=0x0050, text=»CHNG050 «, t00=0x000c, t01=0x000a}
0x12d0…12f2              Head {h00=0x001e, h01=0x0050, text=» PERF LAMPON,=W'64' LAMP 5«, t00=0x000c, t01=0x001a}
0x12f2…1312              Head {h00=0x001c, h01=0x0050, text=» CMP CBIN0,CBIN0 SET CR «, t00=0x000c, t01=0x003c}
0x1312…131e              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000c, t01=0x005c}
0x131e…1328              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0068}
0x1328…1340              Head {h00=0x0014, h01=0x0050, text=»CHSOP06   SOP 6 «, t00=0x000c, t01=0x0072}
0x1340…1368              Head {h00=0x0024, h01=0x0050, text=» PERF LAMPOF,=W'2047' LAMPS OFF «, t00=0x000c, t01=0x008a}
0x1368…1390              Head {h00=0x0024, h01=0x0050, text=» PERF BCKUP,=W'1' WITHOUT BACKUP«, t00=0x000c, t01=0x00b2}
0x1390…13a6              Head {h00=0x0012, h01=0x0050, text=» BNOK CHNG000 «, t00=0x000c, t01=0x00da}
0x13a6…13b8              Head {h00=0x000e, h01=0x0050, text=» B CHNG130«, t00=0x000c, t01=0x00f0}
0x13b8…13c2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0102}
0x13c2…13d2              Head {h00=0x000c, h01=0x0050, text=»CHSOP07 «, t00=0x000c, t01=0x010c}
0x13d2…13fa              Head {h00=0x0024, h01=0x0050, text=» PERF LAMPOF,=W'2047' LAMPS OFF «, t00=0x000c, t01=0x011c}
0x13fa…1420              Head {h00=0x0022, h01=0x0050, text=» PERF BCKUP,=W'2' WITH BACKUP «, t00=0x000c, t01=0x0144}
0x1420…1436              Head {h00=0x0012, h01=0x0050, text=» BNOK CHNG000 «, t00=0x000c, t01=0x016a}
0x1436…1448              Head {h00=0x000e, h01=0x0050, text=» B CHNG130«, t00=0x000c, t01=0x0180}
0x1448…1452 (13, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0004}
0x1452…1462              Head {h00=0x000c, h01=0x0050, text=»CHNG130 «, t00=0x000d, t01=0x000e}
0x1462…1480              Head {h00=0x001a, h01=0x0050, text=» PERF LAMPOF,=W'2047' «, t00=0x000d, t01=0x001e}
0x1480…14b8              Head {h00=0x0034, h01=0x0050, text=» CMP CBIN0,CBIN1 INDICATE ERROR OR END OF TRANS «, t00=0x000d, t01=0x003c}
0x14b8…14c4              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000d, t01=0x0074}
0x14c4…14d2              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000d, t01=0x0080}
0x14d2…14e0              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x008e}
0x14e0…1512              Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x000d, t01=0x009c}
0x1512…151c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00ce}
0x151c…154a              Head {h00=0x002a, h01=0x0050, text=»*         STRTRC - SEND OF STARTIDENT «, t00=0x000d, t01=0x00d8}
0x154a…156c              Head {h00=0x001e, h01=0x0050, text=»*         AND CHECK REPLY «, t00=0x000d, t01=0x0106}
0x156c…1576              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0128}
0x1576…15aa              Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x000d, t01=0x0132}
0x15aa…15be              Head {h00=0x0010, h01=0x0050, text=»STRTRC PROC «, t00=0x000d, t01=0x0166}
0x15be…15dc              Head {h00=0x001a, h01=0x0050, text=» PERF LAMPOF,=W'2047' «, t00=0x000d, t01=0x017a}
0x15dc…15f8              Head {h00=0x0018, h01=0x0050, text=» PERF LAMPON,=W'64' «, t00=0x000e, t01=0x0008}
0x15f8…1614              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN6,CBIN1 «, t00=0x000e, t01=0x0024}
0x1614…1632              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,=W'128' «, t00=0x000e, t01=0x0040}
0x1632…166a              Head {h00=0x0034, h01=0x0050, text=» PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,GSWBIN6 «, t00=0x000e, t01=0x005e}
0x166a…1680              Head {h00=0x0012, h01=0x0050, text=» BNOK STRTRET «, t00=0x000e, t01=0x0096}
0x1680…16b2              Head {h00=0x002e, h01=0x0050, text=» CBE GTWBCD1,=D'4',STRTRET RECORD DELETED?«, t00=0x000e, t01=0x00ac}
0x16b2…16d2              Head {h00=0x001c, h01=0x0050, text=» PERF WRITID,CBIN5,CBIN1«, t00=0x000e, t01=0x00de}
0x16d2…16ee              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN6,CBIN0 «, t00=0x000e, t01=0x00fe}
0x16ee…170a              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'40'«, t00=0x000e, t01=0x011a}
0x170a…1728              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR20,CBLANKS«, t00=0x000e, t01=0x0136}
0x1728…175e              Head {h00=0x0032, h01=0x0050, text=» COPY CPCKBUF,GSWBIN1,CBIN20,GSWSTR20,GSWBIN6 «, t00=0x000e, t01=0x0154}
0x175e…177a              Head {h00=0x0018, h01=0x0050, text=» MOVE CTRANBUF,=C' '«, t00=0x000e, t01=0x018a}
0x177a…1798              Head {h00=0x001a, h01=0x0050, text=» EDIT CTRANBUF,SNDFRM2«, t00=0x000f, t01=0x0016}
0x1798…17bc              Head {h00=0x0020, h01=0x0050, text=» MOVE GSWBIN2,=W'31' LENGTH «, t00=0x000f, t01=0x0034}
0x17bc…17dc              Head {h00=0x001c, h01=0x0050, text=» PERF EXCHAN EXCHANGE DC«, t00=0x000f, t01=0x0058}
0x17dc…17f2              Head {h00=0x0012, h01=0x0050, text=» BNOK STRTRET «, t00=0x000f, t01=0x0078}
0x17f2…1812              Head {h00=0x001c, h01=0x0050, text=» PERF TRNOK CHECK IF OK «, t00=0x000f, t01=0x008e}
0x1812…1828              Head {h00=0x0012, h01=0x0050, text=» BNOK STRTRET «, t00=0x000f, t01=0x00ae}
0x1828…1848              Head {h00=0x001c, h01=0x0050, text=» CMP CBIN0,CBIN0 SET CR «, t00=0x000f, t01=0x00c4}
0x1848…1854              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000f, t01=0x00e4}
0x1854…1864              Head {h00=0x000c, h01=0x0050, text=»STRTRET «, t00=0x000f, t01=0x00f0}
0x1864…187c              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN1«, t00=0x000f, t01=0x0100}
0x187c…1888              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000f, t01=0x0118}
0x1888…1896              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000f, t01=0x0124}
0x1896…18a4              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x0132}
0x18a4…18da              Head {h00=0x0032, h01=0x0050, text=»**********************************************«, t00=0x000f, t01=0x0140}
0x18da…18e4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0176}
0x18e4…1916              Head {h00=0x002e, h01=0x0050, text=»*         SENDRC - SEND BATCH UNTIL SLUTID«, t00=0x000f, t01=0x0180}
0x1916…1920              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0022}
0x1920…1956              Head {h00=0x0032, h01=0x0050, text=»**********************************************«, t00=0x0010, t01=0x002c}
0x1956…196a              Head {h00=0x0010, h01=0x0050, text=»SENDRC PROC «, t00=0x0010, t01=0x0062}
0x196a…1984              Head {h00=0x0016, h01=0x0050, text=» MOVE CRECNR,CBIN1«, t00=0x0010, t01=0x0076}
0x1984…1992              Head {h00=0x000a, h01=0x0050, text=»SND005«, t00=0x0010, t01=0x0090}
0x1992…19ba              Head {h00=0x0024, h01=0x0050, text=» MOVE GSWBIN3,CBIN0 PACKPOINTER «, t00=0x0010, t01=0x009e}
0x19ba…19c8              Head {h00=0x000a, h01=0x0050, text=»SND010«, t00=0x0010, t01=0x00c6}
0x19c8…19e2              Head {h00=0x0016, h01=0x0050, text=» ADD CRECNR,CBIN1 «, t00=0x0010, t01=0x00d4}
0x19e2…1a00              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,=W'128' «, t00=0x0010, t01=0x00ee}
0x1a00…1a36              Head {h00=0x0032, h01=0x0050, text=» PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,CRECNR«, t00=0x0010, t01=0x010c}
0x1a36…1a4a              Head {h00=0x0010, h01=0x0050, text=» BNOK SNDERR«, t00=0x0010, t01=0x0142}
0x1a4a…1a64              Head {h00=0x0016, h01=0x0050, text=» CMP GTWBCD1,=D'4'«, t00=0x0010, t01=0x0156}
0x1a64…1a88              Head {h00=0x0020, h01=0x0050, text=» BE SNDERR RECORD DELETED ? «, t00=0x0010, t01=0x0170}
0x1a88…1aa8 (17, 0, 400) Head {h00=0x001c, h01=0x0050, text=» MOVE GSWSTR20,=C'SLUTD'«, t00=0x0011, t01=0x0004}
0x1aa8…1ac4              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN5,CBIN0 «, t00=0x0011, t01=0x0024}
0x1ac4…1afe              Head {h00=0x0036, h01=0x0050, text=» MATCH GSWSTR20,GSWBIN5,CBIN5,CPCKBUF,CBIN0,CBIN5 «, t00=0x0011, t01=0x0040}
0x1afe…1b12              Head {h00=0x0010, h01=0x0050, text=» BE SNDSLUT «, t00=0x0011, t01=0x007a}
0x1b12…1b3a              Head {h00=0x0024, h01=0x0050, text=» MOVE GSWSTR9,=X'7F' FIND LENGTH«, t00=0x0011, t01=0x008e}
0x1b3a…1b48              Head {h00=0x000a, h01=0x0050, text=»SND015«, t00=0x0011, t01=0x00b6}
0x1b48…1b64              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN4,CBIN0 «, t00=0x0011, t01=0x00c4}
0x1b64…1b82              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN5,=W'128' «, t00=0x0011, t01=0x00e0}
0x1b82…1bbc              Head {h00=0x0036, h01=0x0050, text=» MATCH CPCKBUF,GSWBIN4,GSWBIN5,GSWSTR9,CBIN0,CBIN1«, t00=0x0011, t01=0x00fe}
0x1bbc…1bce              Head {h00=0x000e, h01=0x0050, text=» BE SND020«, t00=0x0011, t01=0x0138}
0x1bce…1bea              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWSTR9,=X'21'«, t00=0x0011, t01=0x014a}
0x1bea…1bfc              Head {h00=0x000e, h01=0x0050, text=» B SND015 «, t00=0x0011, t01=0x0166}
0x1bfc…1c0a              Head {h00=0x000a, h01=0x0050, text=»SND020«, t00=0x0011, t01=0x0178}
0x1c0a…1c38              Head {h00=0x002a, h01=0x0050, text=» ADD GSWBIN4,GSWBIN3 SEE IF MORE SPACE«, t00=0x0011, t01=0x0186}
0x1c38…1c5c              Head {h00=0x0020, h01=0x0050, text=» CBNG GSWBIN4,=W'504',SND030«, t00=0x0012, t01=0x0024}
0x1c5c…1c84              Head {h00=0x0024, h01=0x0050, text=» SUB CRECNR,CBIN1 NO MORE SPACE «, t00=0x0012, t01=0x0048}
0x1c84…1ca2              Head {h00=0x001a, h01=0x0050, text=» B SND040 SEND BUFFER «, t00=0x0012, t01=0x0070}
0x1ca2…1cb0              Head {h00=0x000a, h01=0x0050, text=»SND030«, t00=0x0012, t01=0x008e}
0x1cb0…1cd4              Head {h00=0x0020, h01=0x0050, text=» SUB GSWBIN4,GSWBIN3 RESTORE«, t00=0x0012, t01=0x009c}
0x1cd4…1cfe              Head {h00=0x0026, h01=0x0050, text=» ADD GSWBIN4,CBIN1 FILL WITH X'00'«, t00=0x0012, t01=0x00c0}
0x1cfe…1d22              Head {h00=0x0020, h01=0x0050, text=» CBE GSWBIN4,=W'128',SND037 «, t00=0x0012, t01=0x00ea}
0x1d22…1d40              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR20,=X'00' «, t00=0x0012, t01=0x010e}
0x1d40…1d5e              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN5,=W'128' «, t00=0x0012, t01=0x012c}
0x1d5e…1d6c              Head {h00=0x000a, h01=0x0050, text=»SND035«, t00=0x0012, t01=0x014a}
0x1d6c…1da0              Head {h00=0x0030, h01=0x0050, text=» INSRT CPCKBUF,GSWBIN4,CBIN20,GSWSTR20,CBIN0«, t00=0x0012, t01=0x0158}
0x1da0…1dbc              Head {h00=0x0018, h01=0x0050, text=» SUB GSWBIN5,CBIN20 «, t00=0x0012, t01=0x018c}
0x1dbc…1df4              Head {h00=0x0034, h01=0x0050, text=» CBG GSWBIN5,GSWBIN4,SND035 ALL TRAILING FILLED «, t00=0x0013, t01=0x0018}
0x1df4…1e02              Head {h00=0x000a, h01=0x0050, text=»SND037«, t00=0x0013, t01=0x0050}
0x1e02…1e38              Head {h00=0x0032, h01=0x0050, text=» EDSUB CTRANBUF,GSWBIN3,SNDFRM5 INSERT RECORD «, t00=0x0013, t01=0x005e}
0x1e38…1e54              Head {h00=0x0018, h01=0x0050, text=» B SND010 READ NEXT «, t00=0x0013, t01=0x0094}
0x1e54…1e62              Head {h00=0x000a, h01=0x0050, text=»SND040«, t00=0x0013, t01=0x00b0}
0x1e62…1e80              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN2,GSWBIN3 «, t00=0x0013, t01=0x00be}
0x1e80…1e9e              Head {h00=0x001a, h01=0x0050, text=» MOVE SPBINW1,=X'0301'«, t00=0x0013, t01=0x00dc}
0x1e9e…1ebc              Head {h00=0x001a, h01=0x0050, text=» MOVE TTARKSAV,CRECNR «, t00=0x0013, t01=0x00fa}
0x1ebc…1edc              Head {h00=0x001c, h01=0x0050, text=» DSC1 SCREEN,POS,SPBINW1«, t00=0x0013, t01=0x0118}
0x1edc…1f0c              Head {h00=0x002c, h01=0x0050, text=» EDWRT .NW,SCREEN,SNDFRM4 DISPLAY RECNR «, t00=0x0013, t01=0x0138}
0x1f0c…1f20              Head {h00=0x0010, h01=0x0050, text=» PERF EXCHAN«, t00=0x0013, t01=0x0168}
0x1f20…1f34              Head {h00=0x0010, h01=0x0050, text=» BNOK SNDERR«, t00=0x0013, t01=0x017c}
0x1f34…1f48              Head {h00=0x0010, h01=0x0050, text=» PERF TRNOK «, t00=0x0013, t01=0x0190}
0x1f48…1f5c              Head {h00=0x0010, h01=0x0050, text=» BNOK SNDERR«, t00=0x0014, t01=0x0014}
0x1f5c…1f6e              Head {h00=0x000e, h01=0x0050, text=» B SND005 «, t00=0x0014, t01=0x0028}
0x1f6e…1f7e              Head {h00=0x000c, h01=0x0050, text=»SNDSLUT «, t00=0x0014, t01=0x003a}
0x1f7e…1fae              Head {h00=0x002c, h01=0x0050, text=» CBE GSWBIN3,CBIN0,SND090 REQ.LGTH.=0 ? «, t00=0x0014, t01=0x004a}
0x1fae…1fcc              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN2,GSWBIN3 «, t00=0x0014, t01=0x007a}
0x1fcc…1fec              Head {h00=0x001c, h01=0x0050, text=» PERF EXCHAN EXCHANGE DC«, t00=0x0014, t01=0x0098}
0x1fec…2000              Head {h00=0x0010, h01=0x0050, text=» BNOK SNDERR«, t00=0x0014, t01=0x00b8}
0x2000…2014              Head {h00=0x0010, h01=0x0050, text=» PERF TRNOK «, t00=0x0014, t01=0x00cc}
0x2014…2028              Head {h00=0x0010, h01=0x0050, text=» BNOK SNDERR«, t00=0x0014, t01=0x00e0}
0x2028…2036              Head {h00=0x000a, h01=0x0050, text=»SND090«, t00=0x0014, t01=0x00f4}
0x2036…2052              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN3,CBIN0 «, t00=0x0014, t01=0x0102}
0x2052…206e              Head {h00=0x0018, h01=0x0050, text=» MOVE CTRANBUF,=C' '«, t00=0x0014, t01=0x011e}
0x206e…2096              Head {h00=0x0024, h01=0x0050, text=» EDSUB CTRANBUF,GSWBIN3,SNDFRM5 «, t00=0x0014, t01=0x013a}
0x2096…20b2              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,CBIN18«, t00=0x0014, t01=0x0162}
0x20b2…20c6              Head {h00=0x0010, h01=0x0050, text=» PERF EXCHAN«, t00=0x0014, t01=0x017e}
0x20c6…20da (21, 0, 400) Head {h00=0x0010, h01=0x0050, text=» BNOK SNDERR«, t00=0x0015, t01=0x0004}
0x20da…20fa              Head {h00=0x001c, h01=0x0050, text=» PERF WRITID,CBIN5,CBIN2«, t00=0x0015, t01=0x0018}
0x20fa…211a              Head {h00=0x001c, h01=0x0050, text=» PERF WJDC PRINT ANSWER «, t00=0x0015, t01=0x0038}
0x211a…2138              Head {h00=0x001a, h01=0x0050, text=» TBT CTESTFLG,SNDSL10 «, t00=0x0015, t01=0x0058}
0x2138…2156              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR9,=C'0002'«, t00=0x0015, t01=0x0076}
0x2156…2172              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN0 «, t00=0x0015, t01=0x0094}
0x2172…218e              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,=W'52'«, t00=0x0015, t01=0x00b0}
0x218e…21ca              Head {h00=0x0038, h01=0x0050, text=» MATCH CTRANBUF,GSWBIN1,GSWBIN2,GSWSTR9,CBIN0,CBIN4 «, t00=0x0015, t01=0x00cc}
0x21ca…21de              Head {h00=0x0010, h01=0x0050, text=» BNE SNDERR «, t00=0x0015, t01=0x0108}
0x21de…21ee              Head {h00=0x000c, h01=0x0050, text=»SNDSL10 «, t00=0x0015, t01=0x011c}
0x21ee…2206              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x0015, t01=0x012c}
0x2206…2212              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0015, t01=0x0144}
0x2212…2220              Head {h00=0x000a, h01=0x0050, text=»SNDERR«, t00=0x0015, t01=0x0150}
0x2220…2238              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN1,CBIN0«, t00=0x0015, t01=0x015e}
0x2238…2244              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0015, t01=0x0176}
0x2244…2252              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0015, t01=0x0182}
0x2252…2260              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x0190}
0x2260…2294              Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0016, t01=0x000e}
0x2294…229e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0042}
0x229e…22e0              Head {h00=0x003e, h01=0x0050, text=»*         TERMIN - TERMINATE TRANSMISSION IN CASE OF ERROR«, t00=0x0016, t01=0x004c}
0x22e0…22ea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x008e}
0x22ea…231e              Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0016, t01=0x0098}
0x231e…2332              Head {h00=0x0010, h01=0x0050, text=»TERMIN PROC «, t00=0x0016, t01=0x00cc}
0x2332…234e              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN3,CBIN0 «, t00=0x0016, t01=0x00e0}
0x234e…236a              Head {h00=0x0018, h01=0x0050, text=» MOVE CTRANBUF,=C' '«, t00=0x0016, t01=0x00fc}
0x236a…238e              Head {h00=0x0020, h01=0x0050, text=» MOVE CPCKBUF,=C'TERMINATE '«, t00=0x0016, t01=0x0118}
0x238e…23aa              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN3,CBIN0 «, t00=0x0016, t01=0x013c}
0x23aa…23d2              Head {h00=0x0024, h01=0x0050, text=» EDSUB CTRANBUF,GSWBIN3,SNDFRM2 «, t00=0x0016, t01=0x0158}
0x23d2…23ee              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,CBIN14«, t00=0x0016, t01=0x0180}
0x23ee…240e              Head {h00=0x001c, h01=0x0050, text=» PERF EXCHAN EXCHANGE DC«, t00=0x0017, t01=0x000c}
0x240e…2424              Head {h00=0x0012, h01=0x0050, text=» BNOK TERMRET «, t00=0x0017, t01=0x002c}
0x2424…2436              Head {h00=0x000e, h01=0x0050, text=» PERF WJDC«, t00=0x0017, t01=0x0042}
0x2436…2446              Head {h00=0x000c, h01=0x0050, text=»TERMRET «, t00=0x0017, t01=0x0054}
0x2446…2452              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0017, t01=0x0064}
0x2452…2460              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0017, t01=0x0070}
0x2460…246e              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0017, t01=0x007e}
0x246e…24a4              Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0017, t01=0x008c}
0x24a4…24ae              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00c2}
0x24ae…24c8              Head {h00=0x0016, h01=0x0050, text=»*         SIGNOFF «, t00=0x0017, t01=0x00cc}
0x24c8…24d2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00e6}
0x24d2…2508              Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0017, t01=0x00f0}
0x2508…251c              Head {h00=0x0010, h01=0x0050, text=»SIGNOF PROC «, t00=0x0017, t01=0x0126}
0x251c…2538              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN3,CBIN0 «, t00=0x0017, t01=0x013a}
0x2538…2554              Head {h00=0x0018, h01=0x0050, text=» MOVE CTRANBUF,=C' '«, t00=0x0017, t01=0x0156}
0x2554…2574              Head {h00=0x001c, h01=0x0050, text=» MOVE CPCKBUF,=C'CSSF ' «, t00=0x0017, t01=0x0172}
0x2574…259c (24, 0, 400) Head {h00=0x0024, h01=0x0050, text=» EDSUB CTRANBUF,GSWBIN3,SNDFRM2 «, t00=0x0018, t01=0x0004}
0x259c…25b8              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,CBIN9 «, t00=0x0018, t01=0x002c}
0x25b8…25cc              Head {h00=0x0010, h01=0x0050, text=» PERF EXCHAN«, t00=0x0018, t01=0x0048}
0x25cc…25e2              Head {h00=0x0012, h01=0x0050, text=» BNOK SIGOFRET«, t00=0x0018, t01=0x005c}
0x25e2…2600              Head {h00=0x001a, h01=0x0050, text=» TBT CTESTFLG,SIGOFRT1«, t00=0x0018, t01=0x0072}
0x2600…2620              Head {h00=0x001c, h01=0x0050, text=» PERF WJDC PRINT ANSWER «, t00=0x0018, t01=0x0090}
0x2620…2630              Head {h00=0x000c, h01=0x0050, text=»SIGOFRET«, t00=0x0018, t01=0x00b0}
0x2630…263c              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0018, t01=0x00c0}
0x263c…264c              Head {h00=0x000c, h01=0x0050, text=»SIGOFRT1«, t00=0x0018, t01=0x00cc}
0x264c…2664              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x0018, t01=0x00dc}
0x2664…2670              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0018, t01=0x00f4}
0x2670…267e              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0018, t01=0x0100}
0x267e…268c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0018, t01=0x010e}
0x268c…26c2              Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0018, t01=0x011c}
0x26c2…26cc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0152}
0x26cc…26f4              Head {h00=0x0024, h01=0x0050, text=»*           EXCHAN - EXCHANGE DC«, t00=0x0018, t01=0x015c}
0x26f4…26fe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0184}
0x26fe…272e              Head {h00=0x002c, h01=0x0050, text=»*         IN CASE OF ERROR ERRORMESSAGE «, t00=0x0018, t01=0x018e}
0x272e…275e              Head {h00=0x002c, h01=0x0050, text=»*         IS SHOWN ON SCREEN AND JOURNAL«, t00=0x0019, t01=0x002e}
0x275e…2768              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x005e}
0x2768…279e              Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0019, t01=0x0068}
0x279e…27b2              Head {h00=0x0010, h01=0x0050, text=»EXCHAN PROC «, t00=0x0019, t01=0x009e}
0x27b2…27d0              Head {h00=0x001a, h01=0x0050, text=» TBT CTESTFLG,EXCHTEST«, t00=0x0019, t01=0x00b2}
0x27d0…27fc              Head {h00=0x0028, h01=0x0050, text=» MOVE GSWBIN5,=W'600' TIMEOUT VALUE «, t00=0x0019, t01=0x00d0}
0x27fc…2838              Head {h00=0x0038, h01=0x0050, text=»*****DCEXCH DCOMM,CTRANBUF,GSWBIN2,GSWBIN5,CTRANBUF «, t00=0x0019, t01=0x00fc}
0x2838…2842              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0138}
0x2842…2872              Head {h00=0x002c, h01=0x0050, text=» DCWRITE DCOMM,CTRANBUF,GSWBIN2,GSWBIN5 «, t00=0x0019, t01=0x0142}
0x2872…2888              Head {h00=0x0012, h01=0x0050, text=» BNOK EXCHNOK «, t00=0x0019, t01=0x0172}
0x2888…28a6              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN2,=W'504' «, t00=0x0019, t01=0x0188}
0x28a6…28c4              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN5,=W'600' «, t00=0x001a, t01=0x0016}
0x28c4…28f2              Head {h00=0x002a, h01=0x0050, text=» DCREAD DCOMM,CTRANBUF,GSWBIN2,GSWBIN5«, t00=0x001a, t01=0x0034}
0x28f2…28fc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0062}
0x28fc…2910              Head {h00=0x0010, h01=0x0050, text=» BOK EXCHRET«, t00=0x001a, t01=0x006c}
0x2910…2920              Head {h00=0x000c, h01=0x0050, text=»EXCHNOK «, t00=0x001a, t01=0x0080}
0x2920…294a              Head {h00=0x0026, h01=0x0050, text=» PERF GETBIT,DCOMM FETCH ERRORCODE«, t00=0x001a, t01=0x0090}
0x294a…2966              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW4,CBIN21«, t00=0x001a, t01=0x00ba}
0x2966…2982              Head {h00=0x0018, h01=0x0050, text=» MOVE GTWBCD2,=D'60'«, t00=0x001a, t01=0x00d6}
0x2982…29a6              Head {h00=0x0020, h01=0x0050, text=» MOVE GSWSTR9,=C'TRANSMIT ' «, t00=0x001a, t01=0x00f2}
0x29a6…29ba              Head {h00=0x0010, h01=0x0050, text=» PERF SPERR «, t00=0x001a, t01=0x0116}
0x29ba…29d6              Head {h00=0x0018, h01=0x0050, text=» PERF WRITJT,=W'14' «, t00=0x001a, t01=0x012a}
0x29d6…29ee              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN1«, t00=0x001a, t01=0x0146}
0x29ee…29fa              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001a, t01=0x015e}
0x29fa…2a0a              Head {h00=0x000c, h01=0x0050, text=»EXCHRET «, t00=0x001a, t01=0x016a}
0x2a0a…2a22              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x001a, t01=0x017a}
0x2a22…2a2e (27, 0, 400) Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001b, t01=0x0004}
0x2a2e…2a3e              Head {h00=0x000c, h01=0x0050, text=»EXCHTEST«, t00=0x001b, t01=0x0010}
0x2a3e…2a5a              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,CBIN20«, t00=0x001b, t01=0x0020}
0x2a5a…2a78              Head {h00=0x001a, h01=0x0050, text=» MOVE CTRANBUF,=X'35' «, t00=0x001b, t01=0x003c}
0x2a78…2a8e              Head {h00=0x0012, h01=0x0050, text=» DELAY GSWBIN2«, t00=0x001b, t01=0x005a}
0x2a8e…2aa6              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x001b, t01=0x0070}
0x2aa6…2ab2              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001b, t01=0x0088}
0x2ab2…2ac0              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x001b, t01=0x0094}
0x2ac0…2ace              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x00a2}
0x2ace…2b04              Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x001b, t01=0x00b0}
0x2b04…2b0e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00e6}
0x2b0e…2b48              Head {h00=0x0036, h01=0x0050, text=»*       TRNOK - CHECK IF MESSAGE CORRECT RECIEVED «, t00=0x001b, t01=0x00f0}
0x2b48…2b52              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x012a}
0x2b52…2b88              Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x001b, t01=0x0134}
0x2b88…2b9a              Head {h00=0x000e, h01=0x0050, text=»TRNOK PROC«, t00=0x001b, t01=0x016a}
0x2b9a…2bb6              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN3,CBIN0 «, t00=0x001b, t01=0x017c}
0x2bb6…2bd2              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWSTR9,=X'35'«, t00=0x001c, t01=0x0008}
0x2bd2…2c0e              Head {h00=0x0038, h01=0x0050, text=» MATCH CTRANBUF,GSWBIN3,GSWBIN2,GSWSTR9,CBIN0,CBIN1 «, t00=0x001c, t01=0x0024}
0x2c0e…2c22              Head {h00=0x0010, h01=0x0050, text=» BNE TRNERR «, t00=0x001c, t01=0x0060}
0x2c22…2c3e              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,CBIN0 «, t00=0x001c, t01=0x0074}
0x2c3e…2c5a              Head {h00=0x0018, h01=0x0050, text=» MOVE CTRANBUF,=C' '«, t00=0x001c, t01=0x0090}
0x2c5a…2c72              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x001c, t01=0x00ac}
0x2c72…2c7e              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001c, t01=0x00c4}
0x2c7e…2c8c              Head {h00=0x000a, h01=0x0050, text=»TRNERR«, t00=0x001c, t01=0x00d0}
0x2c8c…2ca4              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN1«, t00=0x001c, t01=0x00de}
0x2ca4…2cb0              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001c, t01=0x00f6}
0x2cb0…2cbe              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x001c, t01=0x0102}
0x2cbe…2ccc              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001c, t01=0x0110}
0x2ccc…2d06              Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x001c, t01=0x011e}
0x2d06…2d10              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0158}
0x2d10…2d46              Head {h00=0x0032, h01=0x0050, text=»*    WJDC - PRINT RECEIVED MESSAGE ON JOURNAL «, t00=0x001c, t01=0x0162}
0x2d46…2d50              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0008}
0x2d50…2d8a              Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x001d, t01=0x0012}
0x2d8a…2d9c              Head {h00=0x000e, h01=0x0050, text=»WJDC PROC «, t00=0x001d, t01=0x004c}
0x2d9c…2db0              Head {h00=0x0010, h01=0x0050, text=» WAIT KTALLY«, t00=0x001d, t01=0x005e}
0x2db0…2dd2              Head {h00=0x001e, h01=0x0050, text=» CBL GSWBIN2,CBIN1,WJDCRET«, t00=0x001d, t01=0x0072}
0x2dd2…2df6              Head {h00=0x0020, h01=0x0050, text=» CBG GSWBIN2,=W'504',WJDCRET«, t00=0x001d, t01=0x0094}
0x2df6…2e14              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR9,=C'DFH' «, t00=0x001d, t01=0x00b8}
0x2e14…2e30              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN0 «, t00=0x001d, t01=0x00d6}
0x2e30…2e6c              Head {h00=0x0038, h01=0x0050, text=» MATCH CTRANBUF,GSWBIN1,GSWBIN2,GSWSTR9,CBIN0,CBIN3 «, t00=0x001d, t01=0x00f2}
0x2e6c…2e8c              Head {h00=0x001c, h01=0x0050, text=» BE WJDC100 CICS MESSAGE«, t00=0x001d, t01=0x012e}
0x2e8c…2e96              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x014e}
0x2e96…2eb8              Head {h00=0x001e, h01=0x0050, text=»*      APLICATION MESSAGE «, t00=0x001d, t01=0x0158}
0x2eb8…2ec2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x017a}
0x2ec2…2ede              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWSTR9,=X'11'«, t00=0x001d, t01=0x0184}
0x2ede…2efa              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN0 «, t00=0x001e, t01=0x0010}
0x2efa…2f36              Head {h00=0x0038, h01=0x0050, text=» MATCH CTRANBUF,GSWBIN1,GSWBIN2,GSWSTR9,CBIN0,CBIN1 «, t00=0x001e, t01=0x002c}
0x2f36…2f4a              Head {h00=0x0010, h01=0x0050, text=» BNE WJDCRET«, t00=0x001e, t01=0x0068}
0x2f4a…2f78              Head {h00=0x002a, h01=0x0050, text=»*                       GSWBIN1=START «, t00=0x001e, t01=0x007c}
0x2f78…2fa6              Head {h00=0x002a, h01=0x0050, text=» ADD GSWBIN1,CBIN3 BYPASS SBA SEQUENSE«, t00=0x001e, t01=0x00aa}
0x2fa6…2fc4              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN4,GSWBIN1 «, t00=0x001e, t01=0x00d8}
0x2fc4…2fee              Head {h00=0x0026, h01=0x0050, text=» SUB GSWBIN2,GSWBIN4 ADJUST LENGTH«, t00=0x001e, t01=0x00f6}
0x2fee…3010              Head {h00=0x001e, h01=0x0050, text=» CBL GSWBIN2,CBIN1,WJDCRET«, t00=0x001e, t01=0x0120}
0x3010…3020              Head {h00=0x000c, h01=0x0050, text=»WJDC005 «, t00=0x001e, t01=0x0142}
0x3020…303c              Head {h00=0x0018, h01=0x0050, text=» MOVE CPCKBUF,=X'00'«, t00=0x001e, t01=0x0152}
0x303c…3078              Head {h00=0x0038, h01=0x0050, text=» MATCH CTRANBUF,GSWBIN4,GSWBIN2,GSWSTR9,CBIN0,CBIN1 «, t00=0x001e, t01=0x016e}
0x3078…308c              Head {h00=0x0010, h01=0x0050, text=» BNE WJDC010«, t00=0x001f, t01=0x001a}
0x308c…30ba              Head {h00=0x002a, h01=0x0050, text=» SUB GSWBIN4,GSWBIN1 GSWBIN4 = LENGTH «, t00=0x001f, t01=0x002e}
0x30ba…30ee              Head {h00=0x0030, h01=0x0050, text=» COPY CPCKBUF,CBIN0,GSWBIN4,CTRANBUF,GSWBIN1«, t00=0x001f, t01=0x005c}
0x30ee…310c              Head {h00=0x001a, h01=0x0050, text=» EDWRT KJTAPE,WJDCFRM «, t00=0x001f, t01=0x0090}
0x310c…3126              Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN4,CBIN3«, t00=0x001f, t01=0x00ae}
0x3126…3142              Head {h00=0x0018, h01=0x0050, text=» SUB GSWBIN2,GSWBIN4«, t00=0x001f, t01=0x00c8}
0x3142…315e              Head {h00=0x0018, h01=0x0050, text=» ADD GSWBIN4,GSWBIN1«, t00=0x001f, t01=0x00e4}
0x315e…317c              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GSWBIN4 «, t00=0x001f, t01=0x0100}
0x317c…319e              Head {h00=0x001e, h01=0x0050, text=» CBG GSWBIN2,CBIN3,WJDC005«, t00=0x001f, t01=0x011e}
0x319e…31b0              Head {h00=0x000e, h01=0x0050, text=» B WJDCRET«, t00=0x001f, t01=0x0140}
0x31b0…31c0              Head {h00=0x000c, h01=0x0050, text=»WJDC010 «, t00=0x001f, t01=0x0152}
0x31c0…31d2              Head {h00=0x000e, h01=0x0050, text=» B WJDC200«, t00=0x001f, t01=0x0162}
0x31d2…31e2              Head {h00=0x000c, h01=0x0050, text=»WJDCRET «, t00=0x001f, t01=0x0174}
0x31e2…31ee              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001f, t01=0x0184}
0x31ee…31f8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0190}
0x31f8…3202              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x000a}
0x3202…320c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0014}
0x320c…321c              Head {h00=0x000c, h01=0x0050, text=»WJDC100 «, t00=0x0020, t01=0x001e}
0x321c…3238              Head {h00=0x0018, h01=0x0050, text=» SUB GSWBIN2,GSWBIN1«, t00=0x0020, t01=0x002e}
0x3238…325c              Head {h00=0x0020, h01=0x0050, text=» CBL GSWBIN2,=W'52',WJDC200 «, t00=0x0020, t01=0x004a}
0x325c…3284              Head {h00=0x0024, h01=0x0050, text=» MOVE GSWBIN4,=W'30' FIND BLANK «, t00=0x0020, t01=0x006e}
0x3284…32c0              Head {h00=0x0038, h01=0x0050, text=» MATCH CTRANBUF,GSWBIN4,GSWBIN2,CBLANKS,CBIN0,CBIN1 «, t00=0x0020, t01=0x0096}
0x32c0…32d4              Head {h00=0x0010, h01=0x0050, text=» BNE WJDC200«, t00=0x0020, t01=0x00d2}
0x32d4…32f0              Head {h00=0x0018, h01=0x0050, text=» MOVE CPCKBUF,=X'00'«, t00=0x0020, t01=0x00e6}
0x32f0…330c              Head {h00=0x0018, h01=0x0050, text=» SUB GSWBIN4,GSWBIN1«, t00=0x0020, t01=0x0102}
0x330c…3340              Head {h00=0x0030, h01=0x0050, text=» COPY CPCKBUF,CBIN0,GSWBIN4,CTRANBUF,GSWBIN1«, t00=0x0020, t01=0x011e}
0x3340…335e              Head {h00=0x001a, h01=0x0050, text=» EDWRT KJTAPE,WJDCFRM «, t00=0x0020, t01=0x0152}
0x335e…337a              Head {h00=0x0018, h01=0x0050, text=» SUB GSWBIN2,GSWBIN4«, t00=0x0020, t01=0x0170}
0x337a…3396              Head {h00=0x0018, h01=0x0050, text=» ADD GSWBIN1,GSWBIN4«, t00=0x0020, t01=0x018c}
0x3396…33a6              Head {h00=0x000c, h01=0x0050, text=»WJDC200 «, t00=0x0021, t01=0x0018}
0x33a6…33c2              Head {h00=0x0018, h01=0x0050, text=» MOVE CPCKBUF,=X'00'«, t00=0x0021, t01=0x0028}
0x33c2…33e6              Head {h00=0x0020, h01=0x0050, text=» CBL GSWBIN2,=W'52',WJDC210 «, t00=0x0021, t01=0x0044}
0x33e6…3402              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,=W'52'«, t00=0x0021, t01=0x0068}
0x3402…3412              Head {h00=0x000c, h01=0x0050, text=»WJDC210 «, t00=0x0021, t01=0x0084}
0x3412…3446              Head {h00=0x0030, h01=0x0050, text=» COPY CPCKBUF,CBIN0,GSWBIN2,CTRANBUF,GSWBIN1«, t00=0x0021, t01=0x0094}
0x3446…3464              Head {h00=0x001a, h01=0x0050, text=» EDWRT KJTAPE,WJDCFRM «, t00=0x0021, t01=0x00c8}
0x3464…3470              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0021, t01=0x00e6}
0x3470…347e              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0021, t01=0x00f2}
0x347e…348c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0021, t01=0x0100}
0x348c…34c4              Head {h00=0x0034, h01=0x0050, text=»************************************************«, t00=0x0021, t01=0x010e}
0x34c4…34ce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0146}
0x34ce…34ec              Head {h00=0x001a, h01=0x0050, text=»*         FORMATS USED«, t00=0x0021, t01=0x0150}
0x34ec…34f6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x016e}
0x34f6…352e              Head {h00=0x0034, h01=0x0050, text=»************************************************«, t00=0x0021, t01=0x0178}
0x352e…3538              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0020}
0x3538…354c              Head {h00=0x0010, h01=0x0050, text=»SNDFRM FRMT «, t00=0x0022, t01=0x002a}
0x354c…3558              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0022, t01=0x003e}
0x3558…357c              Head {h00=0x0020, h01=0x0050, text=» FCOPY =C'DATATRANSMISSION '«, t00=0x0022, t01=0x004a}
0x357c…3588              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0022, t01=0x006e}
0x3588…35a4              Head {h00=0x0018, h01=0x0050, text=» FTEXT 'BRUGERNAVN' «, t00=0x0022, t01=0x007a}
0x35a4…35c6              Head {h00=0x001e, h01=0x0050, text=» FKI 12,MINL=1,MAXL=13,ME «, t00=0x0022, t01=0x0096}
0x35c6…35f4              Head {h00=0x002a, h01=0x0050, text=» FMEL 'AAAAAAAAAAAAAAAAAAA9',TTCYKTOT «, t00=0x0022, t01=0x00b8}
0x35f4…3600              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0022, t01=0x00e6}
0x3600…361a              Head {h00=0x0016, h01=0x0050, text=» FTEXT 'KENDEORD' «, t00=0x0022, t01=0x00f2}
0x361a…363a              Head {h00=0x001c, h01=0x0050, text=» FKI 12,MINL=1,MAXL=4,ME«, t00=0x0022, t01=0x010c}
0x363a…3658              Head {h00=0x001a, h01=0x0050, text=» FMEL 'TTT9',TTARKSAV «, t00=0x0022, t01=0x012c}
0x3658…366e              Head {h00=0x0012, h01=0x0050, text=» FILLR X'07',1«, t00=0x0022, t01=0x014a}
0x366e…367c              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0022, t01=0x0160}
0x367c…3686              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x016e}
0x3686…369a              Head {h00=0x0010, h01=0x0050, text=»SIGONF FRMT «, t00=0x0022, t01=0x0178}
0x369a…36ae              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',2«, t00=0x0022, t01=0x018c}
0x36ae…36c8              Head {h00=0x0016, h01=0x0050, text=» FCOPY =X'272020' «, t00=0x0023, t01=0x0010}
0x36c8…36e2              Head {h00=0x0016, h01=0x0050, text=» FTEXT 'CSSN PS=' «, t00=0x0023, t01=0x002a}
0x36e2…3700              Head {h00=0x001a, h01=0x0050, text=» FMEL '9999',TTARKSAV «, t00=0x0023, t01=0x0044}
0x3700…3718              Head {h00=0x0014, h01=0x0050, text=» FTEXT ',NAME=' «, t00=0x0023, t01=0x0062}
0x3718…3746              Head {h00=0x002a, h01=0x0050, text=» FMEL 'AAAAAAAAAAAAAAAAAAA9',TTCYKTOT «, t00=0x0023, t01=0x007a}
0x3746…3754              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0023, t01=0x00a8}
0x3754…375e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00b6}
0x375e…3772              Head {h00=0x0010, h01=0x0050, text=»SNDFRM2 FRMT«, t00=0x0023, t01=0x00c0}
0x3772…3786              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',2«, t00=0x0023, t01=0x00d4}
0x3786…37a0              Head {h00=0x0016, h01=0x0050, text=» FCOPY =X'272020' «, t00=0x0023, t01=0x00e8}
0x37a0…37b6              Head {h00=0x0012, h01=0x0050, text=» FCOPY CPCKBUF«, t00=0x0023, t01=0x0102}
0x37b6…37c4              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0023, t01=0x0118}
0x37c4…37ce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0126}
0x37ce…37e2              Head {h00=0x0010, h01=0x0050, text=»SNDFRM3 FRMT«, t00=0x0023, t01=0x0130}
0x37e2…37f6              Head {h00=0x0010, h01=0x0050, text=» FILLR '1',2«, t00=0x0023, t01=0x0144}
0x37f6…381a              Head {h00=0x0020, h01=0x0050, text=» FCOPY =C'DATATRANSMISSION '«, t00=0x0023, t01=0x0158}
0x381a…3830              Head {h00=0x0012, h01=0x0050, text=» FILLR X'07',1«, t00=0x0023, t01=0x017c}
0x3830…383e (36, 0, 398) Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0024, t01=0x0004}
0x383e…3848              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0012}
0x3848…385c              Head {h00=0x0010, h01=0x0050, text=»SNDFRM4 FRMT«, t00=0x0024, t01=0x001c}
0x385c…3870              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',2«, t00=0x0024, t01=0x0030}
0x3870…3890              Head {h00=0x001c, h01=0x0050, text=» FTEXT 'ANTAL RECORDS:' «, t00=0x0024, t01=0x0044}
0x3890…38b0              Head {h00=0x001c, h01=0x0050, text=» FMEL 'ZZZZZ9',TTARKSAV «, t00=0x0024, t01=0x0064}
0x38b0…38be              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0024, t01=0x0084}
0x38be…38c8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0092}
0x38c8…38dc              Head {h00=0x0010, h01=0x0050, text=»SNDFRM5 FRMT«, t00=0x0024, t01=0x009c}
0x38dc…38fa              Head {h00=0x001a, h01=0x0050, text=» FBNZ GSWBIN3,SNDLAB10«, t00=0x0024, t01=0x00b0}
0x38fa…390e              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',2«, t00=0x0024, t01=0x00ce}
0x390e…3928              Head {h00=0x0016, h01=0x0050, text=» FCOPY =X'272020' «, t00=0x0024, t01=0x00e2}
0x3928…3938              Head {h00=0x000c, h01=0x0050, text=»SNDLAB10«, t00=0x0024, t01=0x00fc}
0x3938…3952              Head {h00=0x0016, h01=0x0050, text=» FCOPY =X'112020' «, t00=0x0024, t01=0x010c}
0x3952…3968              Head {h00=0x0012, h01=0x0050, text=» FCOPY CPCKBUF«, t00=0x0024, t01=0x0126}
0x3968…3976              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0024, t01=0x013c}
0x3976…3980              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x014a}
0x3980…3994              Head {h00=0x0010, h01=0x0050, text=»WJDCFRM FRMT«, t00=0x0024, t01=0x0154}
0x3994…39a8              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',2«, t00=0x0024, t01=0x0168}
0x39a8…39be              Head {h00=0x0012, h01=0x0050, text=» FCOPY CPCKBUF«, t00=0x0024, t01=0x017c}
0x39be…39cc (37, 2, 44)  Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0025, t01=0x0004}
0x39cc…39d6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0012}
0x39d6…39e2              Head {h00=0x0008, h01=0x0004, text=» END«, t00=0x0025, t01=0x001c}
0x39e2…39e6              Head {h00=0x4004, h01=0x0000}
0x39e6…39ea              00 25 00 28                                                                                                                                                                                                                                       ┆ % (┆
0x39ea…39f2 (38, 1, 8)   20 04 00 00 00 26 00 04                                                                                                                                                                                                                           ┆     &  ┆

Reduced view