|
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: 20426 (0x4fca)
Notes: pts_type(SC)
Names: »BESELF.SC«
└─⟦f350e1b7a⟧ Bits:30009678 Philips computer tape "600219"
└─⟦this⟧ »PTSDEMO/BESELF.SC«
IDENT BESELF SELECT FUNCTION
DDUM DEMODD
PDIV
EXPROC XAKBIN
EXPROC XDMSG
EXPROC XEERR
EXPROC CDCHKY
EXPROC CEGACT
EXPROC CFCHKH
EXPROC DAUCCY
EXPROC DQCOPR
EXPROC DOQCCY
EXPROC DPECCY
EXPROC DCVDU
EXPROC DDTP71
EXPROC DELACT
EXPROC DFOACT
EXPROC DGCACT
EXPROC DHBACT
EXPROC DJUACT
EXPROC DIQACT
EXPROC DKDSTM
EXPROC DLDEP
EXPROC DMWDR
EXPROC DNTRF
EXPROC EZIBUF
EXPROC ECICCY
EXPROC PAJRN
EXPROC ZCRDD
EXPROC ZGREA
EXPROC TNDOPN
ENTRY BESELF
*
*
*
BESELF PROC
BE000
*
* INITIALISE ALL BUFFERS
*
PERF EZIBUF
PERF ZGREA RELEASE EXCL. ACCES
**
* RESET ALL SWITCHES*
**
CLEAR SBOPRCLS OPERATOR CLOSE SWITCH
CLEAR SBCANCEL
CLEAR SBCHEQUE
MOVE SWCCY,=W'0' CURRENCY SWITCH
CLEAR SBNOBOOK
CLEAR SBRVS REVERSAL SWITCH
CLEAR SBCARD
CLEAR SBZEK ZEKOSA SWITCHED OFF
CLEAR SBFLDEMP
MOVE FCFIELD,=C' ' CLEAR INPUT FIELD
**
* ACCEPT A FUNCTION KEY*
**
BE004
PERF XDMSG,=W'30' ENTER FUNCTION
BE006
PERF XAKBIN,=W'10'
MOVE NWKTBIX,SPBINW2 SAVE FUNCTION KEY INDEX
CBE NWKTBIX,KWCANCEL,BE000 CANCEL KEY PRESSED
* KEYLOCK TURN, POWER OFF OR UNDEFINED KEY
CBNG NWKTBIX,=W'0',BE006 KEYLOCK TURN OR POWER OFF
CBL NWKTBIX,=W'12',BE100 NON PREFIX KEY
**
* PREFIX KEY, SET CORRESPONDING SWITCHES*
* HOWEVER, THE INPUT FIELD MUST BE EMPTY
**
CBE SPBINW1,=W'0',BE008 INPUT FIELD IS EMPTY
PERF XEERR,=W'10',KW1 'UNSERVICEABLE REQUEST'
B BE000 RESTART INPUT
BE008
CBE SPBINW2,=W'23',BE060
CBE SPBINW2,=W'24',BE820 OPEN TND
SUB SPBINW2,=W'11' ADJUST INDEX
IB SPBINW2,BE010,BE010,BE010, CURRENCY 1,2 OR 3 C
BE020,BE030,BE040,BE050
B BE006
BE010
*
* CURRENCY KEY 1,2 OR 3*
*
MOVE SWCCY,SPBINW2 CURRENCY NUMBER
B BE006 ACCEPT NEXT FUNCTION KEY
BE020
SET SBCHEQUE
B BE006 ACCEPT NEXT FUNCTION KEY
BE030
SET SBNOBOOK
B BE006 ACCEPT NEXT FUNCTION KEY
BE040
SET SBRVS REVERSAL
B BE006 ACCEPT NEXT FUNCTION KEY
BE050
SET SBCARD
B BE006 ACCEPT NEXT FUNCTION KEY
BE060
SET SBZEK ZEKOSA REQUEST
B BE006 ACCEPT NEXT FUNCTION
**
* NON PREFIX KEY PRESSED*
**
BE100
COPY FCFIELD,KW0,SPBINW1,SPINPUT,KW0 COPY NON EOI CHARACTERS
CBG SPBINW1,=W'0',BE110 FIELD NOT EMPTY
SET SBFLDEMP INDICATE FIELD EMPTY
************************************************************************
*
* CHECK FUNCTION-KEY COMBINATIONS
*
************************************************************************
BE110
PERF CDCHKY
TBT SBCANCEL,BE990 ERROR DETECTED
************************************************************************
**
* CHECK HARDWARE AVAILABILITY AND KEYHOLE SETTING
**
************************************************************************
PERF CFCHKH
TBT SBCANCEL,BE990
************************************************************************
**
* GET ADDITIONAL INPUT*
**
************************************************************************
BE500
CBE NWKTBIX,=W'1',BE600 'EOI'
CBE NWKTBIX,=W'2',BE600 'LIST'
CBE NWKTBIX,=W'3',BE600 'OPEN'
CBE SWCCY,=W'0',BE550
**
* CURRENCY IS ON*
**
TBT SBFLDEMP,BE520
**
* CURRENCY IS ON AND THE FIELD IS NOT EMPTY*
* INITIALISE A CURRENCY RECORD IN THE UWB*
**
PERF ECICCY INITIALISE UWB
MOVE CCCCYCDE,FCFIELD INIT CURRENCY CODE
B BE600 SELECT FUNCTION
**
* CURRENCY IS ON AND FIELD IS EMPTY*
* READ CURRENCY RECORD*
**
BE520
MOVE CDCCYRNR,SWCCY CURRENCY NUMBER
ADD CDCCYRNR,=D'10'
MUL CDCCYRNR,KDSHIFT SHIFT TO GET RECORD NUMBER
PERF ZCRDD,CDCCYRNR,NDLRN1,KW1
TBT SBCANCEL,BE990
B BE600 SELECT FUNCTION
**
* CURRENCY IS OFF*
* GET OPERATOR INPUT*
**
BE550
PERF CEGACT GET ACCOUNT NUMBER
TBT SBCANCEL,BE990 ERROR DETECTED OR CANCEL
TBT SBZEK,BE600
MOVE IDNR1,=D'0' INIT PASSBOOK LINE
MOVE IDAMT1,=D'0' ....AND BOOK BALANCE
* *
* AT THIS POINT, WHEN THE FUNCTION SELECTED IS NOT 'CARD TRANSFER',*
* 'OPERATOR CLOSE' OR 'D-S (ALL ACCOUNT OPTION)'
* - THE REQUIRED ACCOUNT RECORD HAS BEEN READ INTO UWB UA1,*
* - THE VARIABLE 'IDACTNR1' CONTAINS THE UNSHIFTED ACCOUNT NUMBER,*
* - THE VARIABLE 'IDNR1' CONTAINS THE PASSBOOK LINE NUMBER
* - THE VARIABLE 'NDLRN1' CONTAINS THE LOGICAL RECORD NUMBER OF THE*
* ACCOUNT RECORD,*
* - THE BOOLEAN 'SBCHQACT' INDICATES WHETHER THE ACCOUNT*
* READ IN IS A CHEQUE ACCOUNT OR NOT.*
* *
************************************************************************
**
* SELECT FUNCTION*
**
************************************************************************
BE600
TBF SBOPRCLS,BE610
PERF DQCOPR OPERATOR CLOSE
B BE900
**
* CURRENCY SWITCH ?*
**
BE610
CBE SWCCY,=W'0',BE700
**
* CURRENCY IS ON*
**
CBNE NWKTBIX,=W'6',BE620 NOT 'UPDATE'
PERF DAUCCY CURRENCY UPDATE
B BE900
BE620
CBNE NWKTBIX,=W'7',BE630 NOT 'INQUIRY'
PERF DOQCCY CURRENCY INQUIRY
B BE900
BE630
CBE NWKTBIX,=W'9',BE640 'IN'
CBNE NWKTBIX,=W'10',BE700 NOT 'OUT'
BE640
PERF DPECCY CURRENCY EXCHANGE
B BE900
**
* BRANCH TO SEVERAL FUNCTIONS*
**
BE700
IB NWKTBIX,BE710,BE720,BE730,BE740,BE750, C
BE760,BE770,BE780,BE790,BE800, C
BE810
BE710
CBE FCFIELD,=C'6371',BE712
PERF DCVDU DEMONSTRATE VIDEO
B BE900
BE712
PERF DDTP71 DEMONSTRATE TP71
B BE900
BE720
PERF DELACT LIST ACCOUNT
B BE900
BE730
PERF DFOACT OPEN ACCOUNT
B BE900
BE740
PERF DGCACT CLOSE ACCOUNT
B BE900
BE750
PERF DHBACT BLOCK/DEBLOCK ACCOUNT
B BE900
BE760
PERF DJUACT UPDATE ACCOUNT
B BE900
BE770
PERF DIQACT INQUIRY ACCOUNT
B BE900
BE780
PERF DKDSTM DAILY STATEMENT
B BE900
BE790
PERF DLDEP DEPOSIT
B BE900
BE800
PERF DMWDR WITHDRAWAL
B BE900
BE810
PERF DNTRF TRANSFER
B BE900
BE820
PERF TNDOPN OPEN TND
B BE900
**
* NORMAL EXIT FROM FUNCTION MODULE*
**
BE900
CBE NWKTBIX,=W'1',BE910 NOT FOR DEMO-FUNCTIONS
*
* PRINT LINE TYPE 3: CLOSING OF FUNCTION
*
PERF PAJRN,=W'3'
*
* CHECK STATUS
*
BE910
CBE YDSTATUS,=D'3',BE999 SYSTEM HAS BEEN CLOSED
CBNE ODSTATUS,=D'2',BE999 OPERATOR CLOSE HAS SUCCEEDED
**
* RE-EXECUTE FUNCTION CHOISE
**
BE990
TBT SBZEKERR,BE991
TBF SBZEK,BE992
BE991
DSC0 DSVCHPRT,1 RESET VOUCHER-PRINTER
BE992
B BE000
**
* RETURN TO CALLING MODULE*
**
BE999
RET
PEND
*
*
END
0x0000…0040 (0, 0, 400) Head {h00=0x003c, h01=0x0050, text=» IDENT BESELF SELECT FUNCTION «, t00=0x0000, t01=0x0004}
0x0040…0090 Head {h00=0x004c, h01=0x0050, text=» DDUM DEMODD «, t00=0x0000, t01=0x0044}
0x0090…009e Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x0000, t01=0x0094}
0x009e…00b4 Head {h00=0x0012, h01=0x0050, text=» EXPROC XAKBIN«, t00=0x0000, t01=0x00a2}
0x00b4…00ca Head {h00=0x0012, h01=0x0050, text=» EXPROC XDMSG «, t00=0x0000, t01=0x00b8}
0x00ca…00e0 Head {h00=0x0012, h01=0x0050, text=» EXPROC XEERR «, t00=0x0000, t01=0x00ce}
0x00e0…00f6 Head {h00=0x0012, h01=0x0050, text=» EXPROC CDCHKY«, t00=0x0000, t01=0x00e4}
0x00f6…010c Head {h00=0x0012, h01=0x0050, text=» EXPROC CEGACT«, t00=0x0000, t01=0x00fa}
0x010c…0122 Head {h00=0x0012, h01=0x0050, text=» EXPROC CFCHKH«, t00=0x0000, t01=0x0110}
0x0122…0142 Head {h00=0x001c, h01=0x0050, text=» EXPROC DAUCCY«, t00=0x0000, t01=0x0126}
0x0142…0196 Head {h00=0x0050, h01=0x0050, text=» EXPROC DQCOPR «, t00=0x0000, t01=0x0146}
0x0196…01ea Head {h00=0x0050, h01=0x0050, text=» EXPROC DOQCCY «, t00=0x0001, t01=0x000a}
0x01ea…023e Head {h00=0x0050, h01=0x0050, text=» EXPROC DPECCY «, t00=0x0001, t01=0x005e}
0x023e…0292 Head {h00=0x0050, h01=0x0050, text=» EXPROC DCVDU «, t00=0x0001, t01=0x00b2}
0x0292…02e6 Head {h00=0x0050, h01=0x0050, text=» EXPROC DDTP71 «, t00=0x0001, t01=0x0106}
0x02e6…033a Head {h00=0x0050, h01=0x0050, text=» EXPROC DELACT «, t00=0x0001, t01=0x015a}
0x033a…038e Head {h00=0x0050, h01=0x0050, text=» EXPROC DFOACT «, t00=0x0002, t01=0x001e}
0x038e…03e2 Head {h00=0x0050, h01=0x0050, text=» EXPROC DGCACT «, t00=0x0002, t01=0x0072}
0x03e2…0436 Head {h00=0x0050, h01=0x0050, text=» EXPROC DHBACT «, t00=0x0002, t01=0x00c6}
0x0436…048a Head {h00=0x0050, h01=0x0050, text=» EXPROC DJUACT «, t00=0x0002, t01=0x011a}
0x048a…04de Head {h00=0x0050, h01=0x0050, text=» EXPROC DIQACT «, t00=0x0002, t01=0x016e}
0x04de…0532 Head {h00=0x0050, h01=0x0050, text=» EXPROC DKDSTM «, t00=0x0003, t01=0x0032}
0x0532…0586 Head {h00=0x0050, h01=0x0050, text=» EXPROC DLDEP «, t00=0x0003, t01=0x0086}
0x0586…05da Head {h00=0x0050, h01=0x0050, text=» EXPROC DMWDR «, t00=0x0003, t01=0x00da}
0x05da…062e Head {h00=0x0050, h01=0x0050, text=» EXPROC DNTRF «, t00=0x0003, t01=0x012e}
0x062e…0644 Head {h00=0x0012, h01=0x0050, text=» EXPROC EZIBUF«, t00=0x0003, t01=0x0182}
0x0644…065a Head {h00=0x0012, h01=0x0050, text=» EXPROC ECICCY«, t00=0x0004, t01=0x0008}
0x065a…0670 Head {h00=0x0012, h01=0x0050, text=» EXPROC PAJRN «, t00=0x0004, t01=0x001e}
0x0670…0686 Head {h00=0x0012, h01=0x0050, text=» EXPROC ZCRDD «, t00=0x0004, t01=0x0034}
0x0686…069c Head {h00=0x0012, h01=0x0050, text=» EXPROC ZGREA «, t00=0x0004, t01=0x004a}
0x069c…06b2 Head {h00=0x0012, h01=0x0050, text=» EXPROC TNDOPN«, t00=0x0004, t01=0x0060}
0x06b2…06c8 Head {h00=0x0012, h01=0x0050, text=» ENTRY BESELF «, t00=0x0004, t01=0x0076}
0x06c8…06d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x008c}
0x06d2…06dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0096}
0x06dc…06e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00a0}
0x06e6…0736 Head {h00=0x004c, h01=0x0050, text=»BESELF PROC «, t00=0x0004, t01=0x00aa}
0x0736…0786 Head {h00=0x004c, h01=0x0050, text=»BE000 «, t00=0x0004, t01=0x00fa}
0x0786…0790 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x014a}
0x0790…07b0 Head {h00=0x001c, h01=0x0050, text=»* INITIALISE ALL BUFFERS«, t00=0x0004, t01=0x0154}
0x07b0…07ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0174}
0x07ba…07ce Head {h00=0x0010, h01=0x0050, text=» PERF EZIBUF«, t00=0x0004, t01=0x017e}
0x07ce…07f6 (5, 0, 400) Head {h00=0x0024, h01=0x0050, text=» PERF ZGREA RELEASE EXCL. ACCES «, t00=0x0005, t01=0x0004}
0x07f6…0846 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0005, t01=0x002c}
0x0846…0896 Head {h00=0x004c, h01=0x0050, text=»* RESET ALL SWITCHES *«, t00=0x0005, t01=0x007c}
0x0896…08e6 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0005, t01=0x00cc}
0x08e6…0914 Head {h00=0x002a, h01=0x0050, text=» CLEAR SBOPRCLS OPERATOR CLOSE SWITCH «, t00=0x0005, t01=0x011c}
0x0914…092c Head {h00=0x0014, h01=0x0050, text=» CLEAR SBCANCEL «, t00=0x0005, t01=0x014a}
0x092c…097c Head {h00=0x004c, h01=0x0050, text=» CLEAR SBCHEQUE «, t00=0x0005, t01=0x0162}
0x097c…09cc Head {h00=0x004c, h01=0x0050, text=» MOVE SWCCY,=W'0' CURRENCY SWITCH «, t00=0x0006, t01=0x0022}
0x09cc…0a1c Head {h00=0x004c, h01=0x0050, text=» CLEAR SBNOBOOK «, t00=0x0006, t01=0x0072}
0x0a1c…0a6c Head {h00=0x004c, h01=0x0050, text=» CLEAR SBRVS REVERSAL SWITCH «, t00=0x0006, t01=0x00c2}
0x0a6c…0abc Head {h00=0x004c, h01=0x0050, text=» CLEAR SBCARD «, t00=0x0006, t01=0x0112}
0x0abc…0ae4 Head {h00=0x0024, h01=0x0050, text=» CLEAR SBZEK ZEKOSA SWITCHED OFF«, t00=0x0006, t01=0x0162}
0x0ae4…0afc Head {h00=0x0014, h01=0x0050, text=» CLEAR SBFLDEMP «, t00=0x0006, t01=0x018a}
0x0afc…0b2a Head {h00=0x002a, h01=0x0050, text=» MOVE FCFIELD,=C' ' CLEAR INPUT FIELD «, t00=0x0007, t01=0x0012}
0x0b2a…0b7a Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0007, t01=0x0040}
0x0b7a…0bca Head {h00=0x004c, h01=0x0050, text=»* ACCEPT A FUNCTION KEY *«, t00=0x0007, t01=0x0090}
0x0bca…0c1a Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0007, t01=0x00e0}
0x0c1a…0c28 Head {h00=0x000a, h01=0x0050, text=»BE004 «, t00=0x0007, t01=0x0130}
0x0c28…0c52 Head {h00=0x0026, h01=0x0050, text=» PERF XDMSG,=W'30' ENTER FUNCTION «, t00=0x0007, t01=0x013e}
0x0c52…0c60 Head {h00=0x000a, h01=0x0050, text=»BE006 «, t00=0x0007, t01=0x0168}
0x0c60…0c7c Head {h00=0x0018, h01=0x0050, text=» PERF XAKBIN,=W'10' «, t00=0x0007, t01=0x0176}
0x0c7c…0ccc (8, 0, 400) Head {h00=0x004c, h01=0x0050, text=» MOVE NWKTBIX,SPBINW2 SAVE FUNCTION KEY INDEX «, t00=0x0008, t01=0x0004}
0x0ccc…0d02 Head {h00=0x0032, h01=0x0050, text=» CBE NWKTBIX,KWCANCEL,BE000 CANCEL KEY PRESSED«, t00=0x0008, t01=0x0054}
0x0d02…0d34 Head {h00=0x002e, h01=0x0050, text=»* KEYLOCK TURN, POWER OFF OR UNDEFINED KEY«, t00=0x0008, t01=0x008a}
0x0d34…0d70 Head {h00=0x0038, h01=0x0050, text=» CBNG NWKTBIX,=W'0',BE006 KEYLOCK TURN OR POWER OFF «, t00=0x0008, t01=0x00bc}
0x0d70…0dc0 Head {h00=0x004c, h01=0x0050, text=» CBL NWKTBIX,=W'12',BE100 NON PREFIX KEY «, t00=0x0008, t01=0x00f8}
0x0dc0…0e10 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0008, t01=0x0148}
0x0e10…0e60 Head {h00=0x004c, h01=0x0050, text=»* PREFIX KEY, SET CORRESPONDING SWITCHES *«, t00=0x0009, t01=0x0008}
0x0e60…0e90 Head {h00=0x002c, h01=0x0050, text=»* HOWEVER, THE INPUT FIELD MUST BE EMPTY«, t00=0x0009, t01=0x0058}
0x0e90…0ee0 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0009, t01=0x0088}
0x0ee0…0f16 Head {h00=0x0032, h01=0x0050, text=» CBE SPBINW1,=W'0',BE008 INPUT FIELD IS EMPTY «, t00=0x0009, t01=0x00d8}
0x0f16…0f4c Head {h00=0x0032, h01=0x0050, text=» PERF XEERR,=W'10',KW1 'UNSERVICEABLE REQUEST'«, t00=0x0009, t01=0x010e}
0x0f4c…0f6a Head {h00=0x001a, h01=0x0050, text=» B BE000 RESTART INPUT«, t00=0x0009, t01=0x0144}
0x0f6a…0f78 Head {h00=0x000a, h01=0x0050, text=»BE008 «, t00=0x0009, t01=0x0162}
0x0f78…0f9a Head {h00=0x001e, h01=0x0050, text=» CBE SPBINW2,=W'23',BE060 «, t00=0x0009, t01=0x0170}
0x0f9a…0fc4 (10, 0, 400) Head {h00=0x0026, h01=0x0050, text=» CBE SPBINW2,=W'24',BE820 OPEN TND«, t00=0x000a, t01=0x0004}
0x0fc4…1014 Head {h00=0x004c, h01=0x0050, text=» SUB SPBINW2,=W'11' ADJUST INDEX «, t00=0x000a, t01=0x002e}
0x1014…1050 Head {h00=0x0038, h01=0x0050, text=» IB SPBINW2,BE010,BE010,BE010, CURRENCY 1,2 OR 3 C«, t00=0x000a, t01=0x007e}
0x1050…10a0 Head {h00=0x004c, h01=0x0050, text=» BE020,BE030,BE040,BE050 «, t00=0x000a, t01=0x00ba}
0x10a0…10b0 Head {h00=0x000c, h01=0x0050, text=» B BE006«, t00=0x000a, t01=0x010a}
0x10b0…1100 Head {h00=0x004c, h01=0x0050, text=»BE010 «, t00=0x000a, t01=0x011a}
0x1100…110a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x016a}
0x110a…115a Head {h00=0x004c, h01=0x0050, text=»* CURRENCY KEY 1,2 OR 3 *«, t00=0x000a, t01=0x0174}
0x115a…1164 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0034}
0x1164…11b4 Head {h00=0x004c, h01=0x0050, text=» MOVE SWCCY,SPBINW2 CURRENCY NUMBER «, t00=0x000b, t01=0x003e}
0x11b4…1204 Head {h00=0x004c, h01=0x0050, text=» B BE006 ACCEPT NEXT FUNCTION KEY «, t00=0x000b, t01=0x008e}
0x1204…1254 Head {h00=0x004c, h01=0x0050, text=»BE020 «, t00=0x000b, t01=0x00de}
0x1254…12a4 Head {h00=0x004c, h01=0x0050, text=» SET SBCHEQUE «, t00=0x000b, t01=0x012e}
0x12a4…12f4 Head {h00=0x004c, h01=0x0050, text=» B BE006 ACCEPT NEXT FUNCTION KEY «, t00=0x000b, t01=0x017e}
0x12f4…1344 Head {h00=0x004c, h01=0x0050, text=»BE030 «, t00=0x000c, t01=0x003e}
0x1344…1394 Head {h00=0x004c, h01=0x0050, text=» SET SBNOBOOK «, t00=0x000c, t01=0x008e}
0x1394…13e4 Head {h00=0x004c, h01=0x0050, text=» B BE006 ACCEPT NEXT FUNCTION KEY «, t00=0x000c, t01=0x00de}
0x13e4…1434 Head {h00=0x004c, h01=0x0050, text=»BE040 «, t00=0x000c, t01=0x012e}
0x1434…1484 Head {h00=0x004c, h01=0x0050, text=» SET SBRVS REVERSAL «, t00=0x000c, t01=0x017e}
0x1484…14d4 Head {h00=0x004c, h01=0x0050, text=» B BE006 ACCEPT NEXT FUNCTION KEY «, t00=0x000d, t01=0x003e}
0x14d4…14e2 Head {h00=0x000a, h01=0x0050, text=»BE050 «, t00=0x000d, t01=0x008e}
0x14e2…1532 Head {h00=0x004c, h01=0x0050, text=» SET SBCARD «, t00=0x000d, t01=0x009c}
0x1532…1582 Head {h00=0x004c, h01=0x0050, text=» B BE006 ACCEPT NEXT FUNCTION KEY «, t00=0x000d, t01=0x00ec}
0x1582…1590 Head {h00=0x000a, h01=0x0050, text=»BE060 «, t00=0x000d, t01=0x013c}
0x1590…15b2 Head {h00=0x001e, h01=0x0050, text=» SET SBZEK ZEKOSA REQUEST «, t00=0x000d, t01=0x014a}
0x15b2…15d8 Head {h00=0x0022, h01=0x0050, text=» B BE006 ACCEPT NEXT FUNCTION «, t00=0x000d, t01=0x016c}
0x15d8…1628 (14, 0, 400) Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x000e, t01=0x0004}
0x1628…1678 Head {h00=0x004c, h01=0x0050, text=»* NON PREFIX KEY PRESSED *«, t00=0x000e, t01=0x0054}
0x1678…16c8 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x000e, t01=0x00a4}
0x16c8…1718 Head {h00=0x004c, h01=0x0050, text=»BE100 «, t00=0x000e, t01=0x00f4}
0x1718…175e Head {h00=0x0042, h01=0x0050, text=» COPY FCFIELD,KW0,SPBINW1,SPINPUT,KW0 COPY NON EOI CHARACTERS «, t00=0x000e, t01=0x0144}
0x175e…178e Head {h00=0x002c, h01=0x0050, text=» CBG SPBINW1,=W'0',BE110 FIELD NOT EMPTY«, t00=0x000e, t01=0x018a}
0x178e…17de Head {h00=0x004c, h01=0x0050, text=» SET SBFLDEMP INDICATE FIELD EMPTY «, t00=0x000f, t01=0x002a}
0x17de…182e Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x000f, t01=0x007a}
0x182e…1838 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00ca}
0x1838…1862 Head {h00=0x0026, h01=0x0050, text=»* CHECK FUNCTION-KEY COMBINATIONS «, t00=0x000f, t01=0x00d4}
0x1862…186c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00fe}
0x186c…18bc Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x000f, t01=0x0108}
0x18bc…18ca Head {h00=0x000a, h01=0x0050, text=»BE110 «, t00=0x000f, t01=0x0158}
0x18ca…18de Head {h00=0x0010, h01=0x0050, text=» PERF CDCHKY«, t00=0x000f, t01=0x0166}
0x18de…1908 Head {h00=0x0026, h01=0x0050, text=» TBT SBCANCEL,BE990 ERROR DETECTED«, t00=0x000f, t01=0x017a}
0x1908…1958 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0010, t01=0x0014}
0x1958…19a8 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0010, t01=0x0064}
0x19a8…19e2 Head {h00=0x0036, h01=0x0050, text=»* CHECK HARDWARE AVAILABILITY AND KEYHOLE SETTING «, t00=0x0010, t01=0x00b4}
0x19e2…1a32 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0010, t01=0x00ee}
0x1a32…1a82 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0010, t01=0x013e}
0x1a82…1a96 Head {h00=0x0010, h01=0x0050, text=» PERF CFCHKH«, t00=0x0010, t01=0x018e}
0x1a96…1ab2 Head {h00=0x0018, h01=0x0050, text=» TBT SBCANCEL,BE990 «, t00=0x0011, t01=0x0012}
0x1ab2…1b02 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0011, t01=0x002e}
0x1b02…1b52 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0011, t01=0x007e}
0x1b52…1ba2 Head {h00=0x004c, h01=0x0050, text=»* GET ADDITIONAL INPUT *«, t00=0x0011, t01=0x00ce}
0x1ba2…1bf2 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0011, t01=0x011e}
0x1bf2…1c42 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0011, t01=0x016e}
0x1c42…1c92 Head {h00=0x004c, h01=0x0050, text=»BE500 «, t00=0x0012, t01=0x002e}
0x1c92…1ce2 Head {h00=0x004c, h01=0x0050, text=» CBE NWKTBIX,=W'1',BE600 'EOI' «, t00=0x0012, t01=0x007e}
0x1ce2…1d32 Head {h00=0x004c, h01=0x0050, text=» CBE NWKTBIX,=W'2',BE600 'LIST' «, t00=0x0012, t01=0x00ce}
0x1d32…1d82 Head {h00=0x004c, h01=0x0050, text=» CBE NWKTBIX,=W'3',BE600 'OPEN' «, t00=0x0012, t01=0x011e}
0x1d82…1dd2 Head {h00=0x004c, h01=0x0050, text=» CBE SWCCY,=W'0',BE550 «, t00=0x0012, t01=0x016e}
0x1dd2…1e22 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0013, t01=0x002e}
0x1e22…1e72 Head {h00=0x004c, h01=0x0050, text=»* CURRENCY IS ON *«, t00=0x0013, t01=0x007e}
0x1e72…1ec2 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0013, t01=0x00ce}
0x1ec2…1f12 Head {h00=0x004c, h01=0x0050, text=» TBT SBFLDEMP,BE520 «, t00=0x0013, t01=0x011e}
0x1f12…1f62 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0013, t01=0x016e}
0x1f62…1fb2 Head {h00=0x004c, h01=0x0050, text=»* CURRENCY IS ON AND THE FIELD IS NOT EMPTY *«, t00=0x0014, t01=0x002e}
0x1fb2…2002 Head {h00=0x004c, h01=0x0050, text=»* INITIALISE A CURRENCY RECORD IN THE UWB *«, t00=0x0014, t01=0x007e}
0x2002…2052 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0014, t01=0x00ce}
0x2052…20a2 Head {h00=0x004c, h01=0x0050, text=» PERF ECICCY INITIALISE UWB «, t00=0x0014, t01=0x011e}
0x20a2…20f2 Head {h00=0x004c, h01=0x0050, text=» MOVE CCCCYCDE,FCFIELD INIT CURRENCY CODE «, t00=0x0014, t01=0x016e}
0x20f2…2142 Head {h00=0x004c, h01=0x0050, text=» B BE600 SELECT FUNCTION «, t00=0x0015, t01=0x002e}
0x2142…2192 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0015, t01=0x007e}
0x2192…21e2 Head {h00=0x004c, h01=0x0050, text=»* CURRENCY IS ON AND FIELD IS EMPTY *«, t00=0x0015, t01=0x00ce}
0x21e2…2232 Head {h00=0x004c, h01=0x0050, text=»* READ CURRENCY RECORD *«, t00=0x0015, t01=0x011e}
0x2232…2282 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0015, t01=0x016e}
0x2282…22d2 Head {h00=0x004c, h01=0x0050, text=»BE520 «, t00=0x0016, t01=0x002e}
0x22d2…2322 Head {h00=0x004c, h01=0x0050, text=» MOVE CDCCYRNR,SWCCY CURRENCY NUMBER «, t00=0x0016, t01=0x007e}
0x2322…2372 Head {h00=0x004c, h01=0x0050, text=» ADD CDCCYRNR,=D'10' «, t00=0x0016, t01=0x00ce}
0x2372…23c2 Head {h00=0x004c, h01=0x0050, text=» MUL CDCCYRNR,KDSHIFT SHIFT TO GET RECORD NUMBER «, t00=0x0016, t01=0x011e}
0x23c2…23ea Head {h00=0x0024, h01=0x0050, text=» PERF ZCRDD,CDCCYRNR,NDLRN1,KW1 «, t00=0x0016, t01=0x016e}
0x23ea…2406 Head {h00=0x0018, h01=0x0050, text=» TBT SBCANCEL,BE990 «, t00=0x0017, t01=0x0008}
0x2406…2456 Head {h00=0x004c, h01=0x0050, text=» B BE600 SELECT FUNCTION «, t00=0x0017, t01=0x0024}
0x2456…24a6 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0017, t01=0x0074}
0x24a6…24f6 Head {h00=0x004c, h01=0x0050, text=»* CURRENCY IS OFF *«, t00=0x0017, t01=0x00c4}
0x24f6…2546 Head {h00=0x004c, h01=0x0050, text=»* GET OPERATOR INPUT *«, t00=0x0017, t01=0x0114}
0x2546…2596 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0017, t01=0x0164}
0x2596…25e6 Head {h00=0x004c, h01=0x0050, text=»BE550 «, t00=0x0018, t01=0x0024}
0x25e6…2636 Head {h00=0x004c, h01=0x0050, text=» PERF CEGACT GET ACCOUNT NUMBER «, t00=0x0018, t01=0x0074}
0x2636…2686 Head {h00=0x004c, h01=0x0050, text=» TBT SBCANCEL,BE990 ERROR DETECTED OR CANCEL «, t00=0x0018, t01=0x00c4}
0x2686…269e Head {h00=0x0014, h01=0x0050, text=» TBT SBZEK,BE600«, t00=0x0018, t01=0x0114}
0x269e…26ca Head {h00=0x0028, h01=0x0050, text=» MOVE IDNR1,=D'0' INIT PASSBOOK LINE«, t00=0x0018, t01=0x012c}
0x26ca…26fa Head {h00=0x002c, h01=0x0050, text=» MOVE IDAMT1,=D'0' ....AND BOOK BALANCE «, t00=0x0018, t01=0x0158}
0x26fa…274a Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0018, t01=0x0188}
0x274a…279a Head {h00=0x004c, h01=0x0050, text=»* AT THIS POINT, WHEN THE FUNCTION SELECTED IS NOT 'CARD TRANSFER', *«, t00=0x0019, t01=0x0048}
0x279a…27d4 Head {h00=0x0036, h01=0x0050, text=»* 'OPERATOR CLOSE' OR 'D-S (ALL ACCOUNT OPTION)' «, t00=0x0019, t01=0x0098}
0x27d4…2824 Head {h00=0x004c, h01=0x0050, text=»* - THE REQUIRED ACCOUNT RECORD HAS BEEN READ INTO UWB UA1, *«, t00=0x0019, t01=0x00d2}
0x2824…2874 Head {h00=0x004c, h01=0x0050, text=»* - THE VARIABLE 'IDACTNR1' CONTAINS THE UNSHIFTED ACCOUNT NUMBER, *«, t00=0x0019, t01=0x0122}
0x2874…28b8 Head {h00=0x0040, h01=0x0050, text=»* - THE VARIABLE 'IDNR1' CONTAINS THE PASSBOOK LINE NUMBER «, t00=0x0019, t01=0x0172}
0x28b8…2908 Head {h00=0x004c, h01=0x0050, text=»* - THE VARIABLE 'NDLRN1' CONTAINS THE LOGICAL RECORD NUMBER OF THE *«, t00=0x001a, t01=0x0026}
0x2908…2958 Head {h00=0x004c, h01=0x0050, text=»* ACCOUNT RECORD, *«, t00=0x001a, t01=0x0076}
0x2958…29a8 Head {h00=0x004c, h01=0x0050, text=»* - THE BOOLEAN 'SBCHQACT' INDICATES WHETHER THE ACCOUNT *«, t00=0x001a, t01=0x00c6}
0x29a8…29f8 Head {h00=0x004c, h01=0x0050, text=»* READ IN IS A CHEQUE ACCOUNT OR NOT. *«, t00=0x001a, t01=0x0116}
0x29f8…2a48 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x001a, t01=0x0166}
0x2a48…2a98 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x001b, t01=0x0026}
0x2a98…2ae8 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x001b, t01=0x0076}
0x2ae8…2b38 Head {h00=0x004c, h01=0x0050, text=»* SELECT FUNCTION *«, t00=0x001b, t01=0x00c6}
0x2b38…2b88 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x001b, t01=0x0116}
0x2b88…2bd8 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x001b, t01=0x0166}
0x2bd8…2c28 Head {h00=0x004c, h01=0x0050, text=»BE600 «, t00=0x001c, t01=0x0026}
0x2c28…2c78 Head {h00=0x004c, h01=0x0050, text=» TBF SBOPRCLS,BE610 «, t00=0x001c, t01=0x0076}
0x2c78…2c9c Head {h00=0x0020, h01=0x0050, text=» PERF DQCOPR OPERATOR CLOSE «, t00=0x001c, t01=0x00c6}
0x2c9c…2cec Head {h00=0x004c, h01=0x0050, text=» B BE900 «, t00=0x001c, t01=0x00ea}
0x2cec…2d3c Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x001c, t01=0x013a}
0x2d3c…2d8c Head {h00=0x004c, h01=0x0050, text=»* CURRENCY SWITCH ? *«, t00=0x001c, t01=0x018a}
0x2d8c…2ddc Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x001d, t01=0x004a}
0x2ddc…2e2c Head {h00=0x004c, h01=0x0050, text=»BE610 «, t00=0x001d, t01=0x009a}
0x2e2c…2e7c Head {h00=0x004c, h01=0x0050, text=» CBE SWCCY,=W'0',BE700 «, t00=0x001d, t01=0x00ea}
0x2e7c…2ecc Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x001d, t01=0x013a}
0x2ecc…2f1c Head {h00=0x004c, h01=0x0050, text=»* CURRENCY IS ON *«, t00=0x001d, t01=0x018a}
0x2f1c…2f6c Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x001e, t01=0x004a}
0x2f6c…2fbc Head {h00=0x004c, h01=0x0050, text=» CBNE NWKTBIX,=W'6',BE620 NOT 'UPDATE' «, t00=0x001e, t01=0x009a}
0x2fbc…2fe0 Head {h00=0x0020, h01=0x0050, text=» PERF DAUCCY CURRENCY UPDATE«, t00=0x001e, t01=0x00ea}
0x2fe0…3030 Head {h00=0x004c, h01=0x0050, text=» B BE900 «, t00=0x001e, t01=0x010e}
0x3030…3080 Head {h00=0x004c, h01=0x0050, text=»BE620 «, t00=0x001e, t01=0x015e}
0x3080…30d0 Head {h00=0x004c, h01=0x0050, text=» CBNE NWKTBIX,=W'7',BE630 NOT 'INQUIRY' «, t00=0x001f, t01=0x001e}
0x30d0…30f6 Head {h00=0x0022, h01=0x0050, text=» PERF DOQCCY CURRENCY INQUIRY «, t00=0x001f, t01=0x006e}
0x30f6…3146 Head {h00=0x004c, h01=0x0050, text=» B BE900 «, t00=0x001f, t01=0x0094}
0x3146…3196 Head {h00=0x004c, h01=0x0050, text=»BE630 «, t00=0x001f, t01=0x00e4}
0x3196…31bc Head {h00=0x0022, h01=0x0050, text=» CBE NWKTBIX,=W'9',BE640 'IN' «, t00=0x001f, t01=0x0134}
0x31bc…320c Head {h00=0x004c, h01=0x0050, text=» CBNE NWKTBIX,=W'10',BE700 NOT 'OUT' «, t00=0x001f, t01=0x015a}
0x320c…321a Head {h00=0x000a, h01=0x0050, text=»BE640 «, t00=0x0020, t01=0x001a}
0x321a…3240 Head {h00=0x0022, h01=0x0050, text=» PERF DPECCY CURRENCY EXCHANGE«, t00=0x0020, t01=0x0028}
0x3240…3290 Head {h00=0x004c, h01=0x0050, text=» B BE900 «, t00=0x0020, t01=0x004e}
0x3290…32e0 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0020, t01=0x009e}
0x32e0…3330 Head {h00=0x004c, h01=0x0050, text=»* BRANCH TO SEVERAL FUNCTIONS *«, t00=0x0020, t01=0x00ee}
0x3330…3380 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0020, t01=0x013e}
0x3380…33d0 Head {h00=0x004c, h01=0x0050, text=»BE700 «, t00=0x0020, t01=0x018e}
0x33d0…3406 Head {h00=0x0032, h01=0x0050, text=» IB NWKTBIX,BE710,BE720,BE730,BE740,BE750, C «, t00=0x0021, t01=0x004e}
0x3406…3432 Head {h00=0x0028, h01=0x0050, text=» BE760,BE770,BE780,BE790,BE800, C «, t00=0x0021, t01=0x0084}
0x3432…3442 Head {h00=0x000c, h01=0x0050, text=» BE810 «, t00=0x0021, t01=0x00b0}
0x3442…3492 Head {h00=0x004c, h01=0x0050, text=»BE710 «, t00=0x0021, t01=0x00c0}
0x3492…34e2 Head {h00=0x004c, h01=0x0050, text=» CBE FCFIELD,=C'6371',BE712 «, t00=0x0021, t01=0x0110}
0x34e2…3508 Head {h00=0x0022, h01=0x0050, text=» PERF DCVDU DEMONSTRATE VIDEO «, t00=0x0021, t01=0x0160}
0x3508…3558 Head {h00=0x004c, h01=0x0050, text=» B BE900 «, t00=0x0021, t01=0x0186}
0x3558…35a8 Head {h00=0x004c, h01=0x0050, text=»BE712 «, t00=0x0022, t01=0x0046}
0x35a8…35f8 Head {h00=0x004c, h01=0x0050, text=» PERF DDTP71 DEMONSTRATE TP71 «, t00=0x0022, t01=0x0096}
0x35f8…3648 Head {h00=0x004c, h01=0x0050, text=» B BE900 «, t00=0x0022, t01=0x00e6}
0x3648…3698 Head {h00=0x004c, h01=0x0050, text=»BE720 «, t00=0x0022, t01=0x0136}
0x3698…36e8 Head {h00=0x004c, h01=0x0050, text=» PERF DELACT LIST ACCOUNT «, t00=0x0022, t01=0x0186}
0x36e8…3738 Head {h00=0x004c, h01=0x0050, text=» B BE900 «, t00=0x0023, t01=0x0046}
0x3738…3788 Head {h00=0x004c, h01=0x0050, text=»BE730 «, t00=0x0023, t01=0x0096}
0x3788…37d8 Head {h00=0x004c, h01=0x0050, text=» PERF DFOACT OPEN ACCOUNT «, t00=0x0023, t01=0x00e6}
0x37d8…3828 Head {h00=0x004c, h01=0x0050, text=» B BE900 «, t00=0x0023, t01=0x0136}
0x3828…3878 Head {h00=0x004c, h01=0x0050, text=»BE740 «, t00=0x0023, t01=0x0186}
0x3878…38c8 Head {h00=0x004c, h01=0x0050, text=» PERF DGCACT CLOSE ACCOUNT «, t00=0x0024, t01=0x0046}
0x38c8…3918 Head {h00=0x004c, h01=0x0050, text=» B BE900 «, t00=0x0024, t01=0x0096}
0x3918…3968 Head {h00=0x004c, h01=0x0050, text=»BE750 «, t00=0x0024, t01=0x00e6}
0x3968…39b8 Head {h00=0x004c, h01=0x0050, text=» PERF DHBACT BLOCK/DEBLOCK ACCOUNT «, t00=0x0024, t01=0x0136}
0x39b8…3a08 Head {h00=0x004c, h01=0x0050, text=» B BE900 «, t00=0x0024, t01=0x0186}
0x3a08…3a58 Head {h00=0x004c, h01=0x0050, text=»BE760 «, t00=0x0025, t01=0x0046}
0x3a58…3aa8 Head {h00=0x004c, h01=0x0050, text=» PERF DJUACT UPDATE ACCOUNT «, t00=0x0025, t01=0x0096}
0x3aa8…3af8 Head {h00=0x004c, h01=0x0050, text=» B BE900 «, t00=0x0025, t01=0x00e6}
0x3af8…3b48 Head {h00=0x004c, h01=0x0050, text=»BE770 «, t00=0x0025, t01=0x0136}
0x3b48…3b98 Head {h00=0x004c, h01=0x0050, text=» PERF DIQACT INQUIRY ACCOUNT «, t00=0x0025, t01=0x0186}
0x3b98…3be8 Head {h00=0x004c, h01=0x0050, text=» B BE900 «, t00=0x0026, t01=0x0046}
0x3be8…3c38 Head {h00=0x004c, h01=0x0050, text=»BE780 «, t00=0x0026, t01=0x0096}
0x3c38…3c88 Head {h00=0x004c, h01=0x0050, text=» PERF DKDSTM DAILY STATEMENT «, t00=0x0026, t01=0x00e6}
0x3c88…3cd8 Head {h00=0x004c, h01=0x0050, text=» B BE900 «, t00=0x0026, t01=0x0136}
0x3cd8…3d28 Head {h00=0x004c, h01=0x0050, text=»BE790 «, t00=0x0026, t01=0x0186}
0x3d28…3d78 Head {h00=0x004c, h01=0x0050, text=» PERF DLDEP DEPOSIT «, t00=0x0027, t01=0x0046}
0x3d78…3dc8 Head {h00=0x004c, h01=0x0050, text=» B BE900 «, t00=0x0027, t01=0x0096}
0x3dc8…3e18 Head {h00=0x004c, h01=0x0050, text=»BE800 «, t00=0x0027, t01=0x00e6}
0x3e18…3e68 Head {h00=0x004c, h01=0x0050, text=» PERF DMWDR WITHDRAWAL «, t00=0x0027, t01=0x0136}
0x3e68…3eb8 Head {h00=0x004c, h01=0x0050, text=» B BE900 «, t00=0x0027, t01=0x0186}
0x3eb8…3f08 Head {h00=0x004c, h01=0x0050, text=»BE810 «, t00=0x0028, t01=0x0046}
0x3f08…3f58 Head {h00=0x004c, h01=0x0050, text=» PERF DNTRF TRANSFER «, t00=0x0028, t01=0x0096}
0x3f58…3f68 Head {h00=0x000c, h01=0x0050, text=» B BE900«, t00=0x0028, t01=0x00e6}
0x3f68…3f76 Head {h00=0x000a, h01=0x0050, text=»BE820 «, t00=0x0028, t01=0x00f6}
0x3f76…3f94 Head {h00=0x001a, h01=0x0050, text=» PERF TNDOPN OPEN TND «, t00=0x0028, t01=0x0104}
0x3f94…3fa4 Head {h00=0x000c, h01=0x0050, text=» B BE900«, t00=0x0028, t01=0x0122}
0x3fa4…3ff4 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0028, t01=0x0132}
0x3ff4…4044 Head {h00=0x004c, h01=0x0050, text=»* NORMAL EXIT FROM FUNCTION MODULE *«, t00=0x0028, t01=0x0182}
0x4044…4094 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0029, t01=0x0042}
0x4094…40e4 Head {h00=0x004c, h01=0x0050, text=»BE900 «, t00=0x0029, t01=0x0092}
0x40e4…411c Head {h00=0x0034, h01=0x0050, text=» CBE NWKTBIX,=W'1',BE910 NOT FOR DEMO-FUNCTIONS «, t00=0x0029, t01=0x00e2}
0x411c…4126 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x011a}
0x4126…4156 Head {h00=0x002c, h01=0x0050, text=»* PRINT LINE TYPE 3: CLOSING OF FUNCTION«, t00=0x0029, t01=0x0124}
0x4156…4160 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0154}
0x4160…417a Head {h00=0x0016, h01=0x0050, text=» PERF PAJRN,=W'3' «, t00=0x0029, t01=0x015e}
0x417a…4184 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0178}
0x4184…419a Head {h00=0x0012, h01=0x0050, text=»* CHECK STATUS«, t00=0x0029, t01=0x0182}
0x419a…41a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0008}
0x41a4…41b2 Head {h00=0x000a, h01=0x0050, text=»BE910 «, t00=0x002a, t01=0x0012}
0x41b2…41ea Head {h00=0x0034, h01=0x0050, text=» CBE YDSTATUS,=D'3',BE999 SYSTEM HAS BEEN CLOSED«, t00=0x002a, t01=0x0020}
0x41ea…423a Head {h00=0x004c, h01=0x0050, text=» CBNE ODSTATUS,=D'2',BE999 OPERATOR CLOSE HAS SUCCEEDED «, t00=0x002a, t01=0x0058}
0x423a…428a Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x002a, t01=0x00a8}
0x428a…42ae Head {h00=0x0020, h01=0x0050, text=»* RE-EXECUTE FUNCTION CHOISE«, t00=0x002a, t01=0x00f8}
0x42ae…42fe Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x002a, t01=0x011c}
0x42fe…434e Head {h00=0x004c, h01=0x0050, text=»BE990 «, t00=0x002a, t01=0x016c}
0x434e…436a Head {h00=0x0018, h01=0x0050, text=» TBT SBZEKERR,BE991 «, t00=0x002b, t01=0x002c}
0x436a…4382 Head {h00=0x0014, h01=0x0050, text=» TBF SBZEK,BE992«, t00=0x002b, t01=0x0048}
0x4382…4390 Head {h00=0x000a, h01=0x0050, text=»BE991 «, t00=0x002b, t01=0x0060}
0x4390…43be Head {h00=0x002a, h01=0x0050, text=» DSC0 DSVCHPRT,1 RESET VOUCHER-PRINTER«, t00=0x002b, t01=0x006e}
0x43be…43cc Head {h00=0x000a, h01=0x0050, text=»BE992 «, t00=0x002b, t01=0x009c}
0x43cc…441c Head {h00=0x004c, h01=0x0050, text=» B BE000 «, t00=0x002b, t01=0x00aa}
0x441c…446c Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x002b, t01=0x00fa}
0x446c…44bc Head {h00=0x004c, h01=0x0050, text=»* RETURN TO CALLING MODULE *«, t00=0x002b, t01=0x014a}
0x44bc…450c Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x002c, t01=0x000a}
0x450c…455c Head {h00=0x004c, h01=0x0050, text=»BE999 «, t00=0x002c, t01=0x005a}
0x455c…45ac Head {h00=0x004c, h01=0x0050, text=» RET «, t00=0x002c, t01=0x00aa}
0x45ac…45fc Head {h00=0x004c, h01=0x0050, text=» PEND «, t00=0x002c, t01=0x00fa}
0x45fc…4606 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x014a}
0x4606…4610 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0154}
0x4610…4660 Head {h00=0x004c, h01=0x0050, text=» END «, t00=0x002c, t01=0x015e}
0x4660…4664 Head {h00=0x4004, h01=0x0000}
0x4664…4668 00 2d 00 1e ┆ - ┆
0x4668…4670 (46, 1, 8) 20 04 00 00 00 2e 00 04 ┆ . ┆
0x4670…46c0 (47, 0, 398) 00 18 00 13 00 09 26 11 c3 0d 43 4c 4f 53 45 20 41 43 43 4f 55 4e 54 54 00 e7 00 04 00 0c 00 07 00 03 26 05 da 63 0f 4c 00 e7 00 20 00 18 00 13 00 09 26 11 c3 0d 42 4c 4f 43 4b 20 41 43 43 4f 55 4e 54 54 00 e7 00 30 00 0c 00 07 00 03 26 05 ┆ & CLOSE ACCOUNTT & c L & BLOCK ACCOUNTT 0 & ┆
0x46c0…4710 da 64 11 4c 00 e7 00 4c 00 1a 00 15 00 0a 26 13 c3 0f 44 45 42 4c 4f 43 4b 20 41 43 43 4f 55 4e 54 20 00 e7 00 5c 00 0c 00 07 00 03 26 05 da 65 10 45 00 e7 00 7a 00 18 00 14 00 09 26 12 c3 0e 55 50 44 41 54 45 20 41 43 43 4f 55 4e 54 00 e7 ┆ d L L & DEBLOCK ACCOUNT & e E z & UPDATE ACCOUNT ┆
0x4710…4760 00 8a 00 0c 00 07 00 03 26 05 da 66 11 50 00 e7 00 a6 00 1a 00 15 00 0a 26 13 c3 0f 55 50 44 41 54 45 20 43 55 52 52 45 4e 43 59 20 00 e7 00 b6 00 0c 00 07 00 03 26 05 da 67 11 50 00 e7 00 d4 00 1a 00 15 00 0a 26 13 c3 0f 49 4e 51 55 49 52 ┆ & f P & UPDATE CURRENCY & g P & INQUIR┆
0x4760…47b0 59 20 41 43 43 4f 55 4e 54 20 00 e7 00 e4 00 0c 00 07 00 03 26 05 da 68 11 4e 00 e7 01 02 00 1a 00 15 00 0a 26 13 c3 0f 44 41 49 4c 59 20 53 54 41 54 45 4d 45 4e 54 20 00 e7 01 12 00 0c 00 07 00 03 26 05 da 69 10 41 00 e7 01 30 00 18 00 14 ┆Y ACCOUNT & h N & DAILY STATEMENT & i A 0 ┆
0x47b0…47fe 00 09 26 12 c3 0e 4f 50 45 52 41 54 4f 52 20 43 4c 4f 53 45 00 e7 01 40 00 0c 00 07 00 03 26 05 da 6a 0e 50 00 e7 01 5c 00 16 00 12 00 08 26 10 c3 0c 53 59 53 54 45 4d 20 43 4c 4f 53 45 00 e7 01 6c 00 0c 00 07 00 03 26 05 da 6b 10 59 ┆ & OPERATOR CLOSE @ & j P & SYSTEM CLOSE l & k Y┆
0x47fe…484e (48, 0, 400) 00 e7 01 86 00 18 00 14 00 09 26 12 c3 0e 43 55 52 52 45 4e 43 59 20 45 58 43 48 2e 00 e8 00 08 00 0c 00 07 00 03 26 05 da 6c 0f 55 00 e8 00 24 00 18 00 13 00 09 26 11 c3 0d 43 55 52 52 45 4e 43 59 20 49 4e 51 2e 2e 00 e8 00 34 00 0c 00 07 ┆ & CURRENCY EXCH. & l U $ & CURRENCY INQ.. 4 ┆
0x484e…489e 00 03 26 05 da 6d 0f 55 00 e8 00 50 00 18 00 13 00 09 26 11 c3 0d 4c 49 53 54 20 41 43 43 4f 55 4e 54 53 2e 00 e8 00 60 00 0a 00 06 00 02 26 04 c4 15 00 e8 00 7c 00 0c 00 07 00 03 26 05 db 60 0a 49 00 e8 00 8a 00 0c 00 07 00 03 26 05 db 69 ┆ & m U P & LIST ACCOUNTS. ` & | & ` I & i┆
0x489e…48ee 07 49 00 e8 00 9a 00 0c 00 07 00 03 26 05 db 5a 04 49 00 e8 00 aa 00 0a 00 06 00 02 26 04 86 20 00 e8 00 ba 00 0a 00 06 00 02 26 04 d8 02 00 e8 00 c8 00 12 00 0e 00 06 1a 0c 00 58 10 06 5a 5a 5a 5a 5a 5a 00 e8 00 d6 00 0c 00 07 00 03 22 05 ┆ I & Z I & & X ZZZZZZ " ┆
0x48ee…493e 00 58 dc 49 00 e8 00 ec 00 0c 00 07 00 03 26 05 db 58 05 49 00 e8 00 fc 00 0c 00 07 00 03 26 05 db 59 04 49 00 e8 01 0c 00 0a 00 06 00 02 26 04 d8 04 00 e8 01 1c 00 0a 00 06 00 02 26 04 84 20 00 e8 01 2a 00 0a 00 06 00 02 26 04 94 20 00 e8 ┆ X I & X I & Y I & & * & ┆
0x493e…498e 01 38 00 08 00 04 00 01 28 02 00 e8 01 46 00 0c 00 08 00 03 20 06 00 59 00 34 00 e8 01 52 00 0a 00 08 00 03 26 06 c3 02 00 e8 01 62 00 0c 00 07 00 03 26 05 db 5a 04 20 00 e8 01 70 00 0a 00 06 00 02 26 04 c4 03 00 e8 01 80 00 0e 00 09 00 04 ┆ 8 ( F Y 4 R & b & Z p & ┆
0x498e…49de (49, 0, 400) 1a 07 00 5a 10 01 5a 54 00 e8 01 8e 00 0c 00 07 00 03 22 05 00 5a 39 20 00 e9 00 10 00 0a 00 06 00 02 26 04 c4 05 00 e9 00 20 00 0c 00 07 00 03 26 05 da 32 0a 20 00 e9 00 2e 00 10 00 0c 00 05 26 0a c3 06 43 41 4e 43 45 4c 00 e9 00 3e 00 0a ┆ Z ZT " Z9 & & 2 . & CANCEL > ┆
0x49de…4a2e 00 06 00 02 26 04 d8 02 00 e9 00 52 00 12 00 0e 00 06 1a 0c 00 5b 10 06 39 39 39 39 39 39 00 e9 00 60 00 0c 00 07 00 03 22 05 00 5b b6 41 00 e9 00 76 00 0a 00 06 00 02 26 04 c4 0c 00 e9 00 86 00 12 00 0d 00 06 1a 0b 00 5c 10 05 39 39 39 39 ┆ & R [ 999999 ` " [ A v & 9999┆
0x4a2e…4a7e 39 43 00 e9 00 94 00 0c 00 07 00 03 22 05 00 5c 3d 41 00 e9 00 aa 00 0a 00 06 00 02 26 04 c4 12 00 e9 00 ba 00 10 00 0b 00 05 1a 09 00 5d 10 03 39 39 39 4c 00 e9 00 c8 00 0c 00 07 00 03 22 05 00 5d 32 41 00 e9 00 dc 00 0a 00 06 00 02 26 04 ┆9C " =A & ] 999L " ]2A & ┆
0x4a7e…4ace c4 16 00 e9 00 ec 00 12 00 0e 00 06 1a 0c 00 5e 10 06 39 39 45 3a 39 39 00 e9 00 fa 00 0c 00 07 00 03 22 05 00 5e dd 41 00 e9 01 10 00 0c 00 07 00 03 26 05 db 58 05 41 00 e9 01 20 00 0c 00 07 00 03 26 05 db 59 04 41 00 e9 01 30 00 0a 00 06 ┆ ^ 99E:99 " ^ A & X A & Y A 0 ┆
0x4ace…4b1e 00 02 26 04 d8 04 00 e9 01 40 00 0a 00 06 00 02 26 04 84 20 00 e9 01 4e 00 0a 00 06 00 02 26 04 94 20 00 e9 01 5c 00 08 00 04 00 01 28 02 00 e9 01 6a 00 0c 00 08 00 03 20 06 00 5f 00 cb 00 e9 01 76 00 0a 00 05 00 02 26 03 e0 20 00 e9 01 86 ┆ & @ & N & ( j _ v & ┆
0x4b1e…4b6e (50, 0, 400) 00 22 00 20 00 0f 26 1e c3 1a 54 52 41 4e 53 46 45 52 20 46 52 4f 4d 20 41 43 43 4f 55 4e 54 20 3a 20 00 ea 00 04 00 0c 00 07 00 03 26 05 db 54 0d 52 00 ea 00 2a 00 0c 00 07 00 03 26 05 db 55 0a 52 00 ea 00 3a 00 0e 00 0a 00 04 26 08 f2 1e ┆ " & TRANSFER FROM ACCOUNT : & T R * & U R : & ┆
0x4b6e…4bbe 13 86 86 80 00 ea 00 4a 00 12 00 0e 00 06 1a 0c 00 60 10 06 5a 5a 5a 5a 5a 5a 00 ea 00 5c 00 0c 00 07 00 03 22 05 00 60 61 86 00 ea 00 72 00 0a 00 06 00 02 26 04 d8 04 00 ea 00 82 00 0a 00 06 00 02 26 04 c4 1e 00 ea 00 90 00 12 00 0e 00 06 ┆ J ` ZZZZZZ " `a r & & ┆
0x4bbe…4c0e 1a 0c 00 61 10 06 39 39 39 39 39 39 00 ea 00 9e 00 0c 00 07 00 03 22 05 00 61 61 86 00 ea 00 b4 00 0a 00 05 00 02 26 03 e1 61 00 ea 00 c4 00 0c 00 07 00 03 26 05 db 90 35 86 00 ea 00 d2 00 18 00 14 00 09 26 12 c3 0e 42 4f 4f 4b 20 42 41 4c ┆ a 999999 " aa & a & 5 & BOOK BAL┆
0x4c0e…4c5e 41 4e 43 45 3a 20 00 ea 00 e2 00 0a 00 06 00 02 26 04 c4 0f 00 ea 00 fe 00 0c 00 07 00 03 26 05 db 55 06 4f 00 ea 01 0c 00 0e 00 0a 00 04 26 08 f2 0f 0a 81 8b 80 00 ea 01 1c 00 18 00 14 00 09 1a 12 00 62 10 0c 5a 5a 5a 5a 5a 5a 5a 5a 5a 2c ┆ANCE: & & U O & b ZZZZZZZZZ,┆
0x4c5e…4cae 5a 5a 00 ea 01 2e 00 0c 00 07 00 03 22 05 00 62 63 81 00 ea 01 4a 00 10 00 0d 00 06 26 0b c3 07 20 4c 49 4e 45 3a 00 ea 01 5a 00 0a 00 06 00 02 26 04 c4 22 00 ea 01 6e 00 0c 00 07 00 03 26 05 db 55 06 4c 00 ea 01 7c 00 0e 00 0a 00 04 26 08 ┆ZZ . " bc J & LINE: Z & " n & U L | & ┆
0x4cae…4cfe (51, 0, 398) f2 22 0b 81 82 80 00 ea 01 8c 00 0e 00 0a 00 04 1a 08 00 63 10 02 5a 5a 00 eb 00 0e 00 0c 00 07 00 03 22 05 00 63 65 81 00 eb 00 20 00 0a 00 06 00 02 26 04 d8 13 00 eb 00 30 00 18 00 13 00 09 26 11 c3 0d 43 52 45 44 49 54 20 4c 49 4d 49 54 ┆ " c ZZ " ce & 0 & CREDIT LIMIT┆
0x4cfe…4d4e 3a 20 00 eb 00 3e 00 0a 00 06 00 02 26 04 c4 18 00 eb 00 5a 00 18 00 14 00 09 1a 12 00 64 10 0c 5a 5a 5a 5a 5a 5a 5a 5a 39 2c 39 39 00 eb 00 68 00 0c 00 07 00 03 22 05 00 64 98 52 00 eb 00 84 00 0a 00 05 00 02 26 03 e1 64 00 eb 00 94 00 18 ┆: > & Z d ZZZZZZZZ9,99 h " d R & d ┆
0x4d4e…4d9e 00 13 00 09 26 11 c3 0d 41 4d 4f 55 4e 54 20 20 20 20 20 20 3a 20 00 eb 00 a2 00 0e 00 0a 00 04 26 08 f2 18 0e 81 8b 80 00 eb 00 be 00 18 00 14 00 09 1a 12 00 65 10 0c 5a 5a 5a 5a 5a 5a 5a 5a 5a 2c 5a 5a 00 eb 00 d0 00 0c 00 07 00 03 22 05 ┆ & AMOUNT : & e ZZZZZZZZZ,ZZ " ┆
0x4d9e…4dee 00 65 b7 81 00 eb 00 ec 00 0a 00 05 00 02 26 03 e1 65 00 eb 00 fc 00 18 00 13 00 09 26 11 c3 0d 4e 45 57 20 42 41 4c 41 4e 43 45 20 3a 20 00 eb 01 0a 00 0a 00 06 00 02 26 04 c4 18 00 eb 01 26 00 1a 00 15 00 0a 1a 13 00 66 10 0d 5a 5a 5a 5a ┆ e & e & NEW BALANCE : & & f ZZZZ┆
0x4dee…4e3c 5a 5a 5a 5a 5a 2c 5a 5a 2d 43 00 eb 01 34 00 0c 00 07 00 03 22 05 00 66 b8 45 00 eb 01 52 00 0a 00 05 00 02 26 03 e1 66 00 eb 01 62 00 22 00 1d 00 0e 26 1b c3 17 54 52 41 4e 53 46 45 52 20 54 4f 20 41 43 43 4f 55 4e 54 20 20 20 3a 20 ┆ZZZZZ,ZZ-C 4 " f E R & f b " & TRANSFER TO ACCOUNT : ┆
0x4e3c…4e8c (52, 0, 398) 00 eb 01 70 00 0e 00 0a 00 04 26 08 f2 1e 14 86 86 00 00 ec 00 08 00 12 00 0e 00 06 1a 0c 00 67 10 06 5a 5a 5a 5a 5a 5a 00 ec 00 1a 00 0c 00 07 00 03 22 05 00 67 62 86 00 ec 00 30 00 08 00 04 00 01 28 02 00 ec 00 40 00 0c 00 08 00 03 20 06 ┆ p & g ZZZZZZ " gb 0 ( @ ┆
0x4e8c…4edc 00 68 00 d8 00 ec 00 4c 00 0a 00 05 00 02 26 03 e0 67 00 ec 00 5c 00 0c 00 07 00 03 26 05 db 90 21 86 00 ec 00 6a 00 26 00 23 00 11 26 21 c3 1d 49 4e 51 55 49 52 59 20 53 41 56 49 4e 47 53 20 41 43 43 4f 55 4e 54 20 4e 52 20 3a 00 ec 00 7a ┆ h L & g & ! j & # &! INQUIRY SAVINGS ACCOUNT NR : z┆
0x4edc…4f2c 00 0a 00 06 00 02 26 04 d8 1a 00 ec 00 a4 00 22 00 1e 00 0e 26 1c c3 18 49 4e 51 55 49 52 59 20 43 48 45 51 55 45 20 41 43 43 4f 55 4e 54 20 3a 00 ec 00 b2 00 0a 00 06 00 02 26 04 c4 1a 00 ec 00 d8 00 12 00 0e 00 06 1a 0c 00 69 10 06 39 39 ┆ & " & INQUIRY CHEQUE ACCOUNT : & i 99┆
0x4f2c…4f7c 39 39 39 39 00 ec 00 e6 00 0c 00 07 00 03 22 05 00 69 61 4e 00 ec 00 fc 00 0a 00 05 00 02 26 03 e1 69 00 ec 01 0c 00 1a 00 19 00 0c 26 17 c3 13 42 41 4c 41 4e 43 45 20 20 20 20 20 20 20 3a 20 00 ec 01 1a 00 0a 00 06 00 02 26 04 c4 18 00 ec ┆9999 " iaN & i & BALANCE : & ┆
0x4f7c…4fca 01 38 00 1a 00 15 00 0a 1a 13 00 6a 10 0d 5a 5a 5a 5a 5a 5a 5a 5a 39 2c 39 39 2d 20 00 ec 01 46 00 0c 00 07 00 03 22 05 00 6a 97 41 00 ec 01 64 00 0a 00 05 00 02 26 03 e1 6a 00 ec 01 74 00 0c 00 07 00 03 26 05 db 90 17 41 00 ec 01 82 ┆ 8 j ZZZZZZZZ9,99- F " j A d & j t & A ┆