|
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: 39796 (0x9b74)
Notes: pts_type(SC)
Names: »DEMODD.SC«
└─⟦f350e1b7a⟧ Bits:30009678 Philips computer tape "600219"
└─⟦this⟧ »DEMO/DEMODD.SC«
└─⟦this⟧ »FORMAT/DEMODD.SC«
└─⟦this⟧ »PTSDEMO/DEMODD.SC«
IDENT DEMODD DATA DIVISION
DDIV
************************************************************************
* *
* DATA DIVISION FOR THE PTS 6000 DEMO PACKAGE*
**
************************************************************************
* *
* KEY TO THE VARIABLE NAMES USED.*
**
* THE FIRST TWO LETTERS OF A VARIABLE NAME INDICATE THE USE AND*
* TYPE OF THE VARIABLE AS FOLLOWS:*
* *
* FIRST LETTER: VARIABLE USAGE; THE VARIABLE BELONGS TO THE*
* FOLLOWING GROUP OF VARIABLES.*
* *
* Y: SYSTEM RECORD*
* R: TERMINAL RECORD*
* C: CURRENCY RECORD*
* O: OPERATOR RECORD*
* A: ACCOUNT RECORD IN UWB UA1*
* B: ACCOUNT RECORD IN UWB UA2*
* T: TRANSACTION RECORD IN UWB UT1*
* U: TRANSACTION RECORD IN UWB UT2*
* SP: SCREEN MANAGEMENT VARIABLES (EXCEPTION, 2 LETTERS)*
* F: BUFFERS*
* I: INTERFACE BETWEEN FUNCTION MODULE, FORMATS AND*
* SPAPXX-ROUTINES, MAY NOT BE USED BY OTHER ROUTINES*
* K: CONSTANTS*
* N: NUMERIC VARIABLES, POINTERS, COUNTERS, CALCULATION VAR.*
* S: SWITCHES*
* V: TEXT VARIABLES*
* W: WORKVARIABLES, MAY BE USED BY ALL ROUTINES*
* *
* SECOND LETTER: INDICATES THE TYPE OF THE VARIABLE.*
* *
* B: BOOLEAN*
* C: STRING*
* D: BINARY CODED DECIMAL (BCD)*
* W: BINARY*
* *
* *
* FURTHERMORE THE FOLLOWING SHORTHANDS HAVE BEEN USED:*
* (LENGTH =< 3)*
* *
* ACT: ACCOUNT ADU: AD85*
* ALF: ALPHANUMERIC AVB: AVAILABLE*
* BAL: BALANCE BCK: BACK*
* BLK: BLOCK BOK: BOOK*
* BUY: BUY(ING)*
* CCY: CURRENCY CDE: CODE*
* CFG: CONFIGURATION CHK: CHECK*
* CHQ: CHEQUE CLS: CLOSE*
* CLR: CLEAR CMN: COMMON*
* CNT: CONTINUE CPY: COPY*
* CRD: CARD CUM: ACCUMULATED*
* CUR: CURRENT*
* DEL: DELETE
* DEP: DEPOSIT DI: INDICATOR DISPLAY*
* DMO: DEMONSTRATION DS: DATASET*
* DSK: DISK DY: DISPLAY*
* EA: EXCLUSIVE ACCES EXC: EXCHANGE*
* ERR: ERROR*
* FLE: FILE FNC: FUNCTION*
* FMT: FORMAT FRM: FROM*
* FRT: FRONT FTB: FORMATTABLE*
* HRD: HARD*
* ID: IDENTIFICATION IND: INDICATOR*
* INP: INPUT INQ: INQUIRY *
* INS: INSERT IX: INDEX*
* JRN: JOURNAL*
* KB: KEYBOARD KTB: KEYTABLE*
* KY: KEY*
* LAS: LAST LGG: LANGUAGE*
* LMT: LIMIT LNE: LINE*
* LNG: LENGTH LNS: LINES*
* LOG: LOGICAL LST: LIST*
* LT: LAST TRANSACTION LTS: LAST TRANS. STATM. *
* NME: NAME NR: NUMBER*
* NUM: NUMERIC*
* OFC: OFFICE OPN: OPEN*
* OPR: OPERATOR OTP: OUTPUT*
* PDU: PLASMA DISPLAY PRS: PRESENT*
* PRT: PRINT(ER) PTR: POINTER*
* RD: READ RDY: READY*
* REC: RECORD RNR: RECORD NUMBER*
* RTE: RATE RVS: REVERSE(AL)*
* RWR: REWRITE*
* SAV: SAVE, SAVINGS ACCOUNT SCR: SCREEN*
* SEL: SELL(ING) SEQ: SEQUENCE*
* SHR: SHARE(D) SP: SCREEN MANAGEMENT*
* SPC: SPECIFY(ICATION) STD: STARTED*
* STM: STATEMENT STT: START*
* SYS: SYSTEM*
* TAB: TABLE TRF: TRANSFER*
* TRM: TERMINAL TRS: TRANSACTION*
* TST: TEST TXT: TEXT*
* TYP: TYPE*
* UPD: UPDATE*
* VCH: VOUCHER VDU: VIDEO*
* VOL: VOLUME*
* WDR: WITHDRAWAL WR: WRITE*
* *
************************************************************************
TERM A0
**********************************************************************
CWB CW1
CWB CSY
TWB TRM
TWB TSP
UWB UBF
UWB UIF
UWB UCY
UWB UOP
UWB UA1
UWB UA2
UWB UT1
UWB UT2
CWB CK1
CWB CK2
UWB UQQ
SPDSSCRN DSET FC=X'50',DEV=DY,BUFL=82
SPDSDYKB DSET FC=X'20',DEV=KA
DSDI DSET FC=X'41',DEV=DI
SPDSPRT DSET FC=X'30',DEV=GP,BUFL=112
DSVCHPRT DSET FC=X'31',DEV=TV,BUFL=98,BUFDS=SPDSPRT
DS0DR DSET FC=X'70',DEV=OD,BUFL=43
DSBCR DSET FC=X'22',DEV=BC
SPDSCPY DSET FC=X'32',DEV=GP,BUFL=112
DSDBS DSET FC=X'C0',DEV=DL
DSEKOSA DSET FC=X'60',DEV=MS ZEKOSA MSU-UNIT
DSFMTFLE DSET FC=X'CA',DEV=DL
DSLNEPRT DSET FC=X'80',DEV=LP,BUFL=110,BUFDS=SPDSPRT
TNDSET DSET FC=X'65',DEV=ND
FMTCTL INDS=SPDSDYKB,OUTDS=SPDSSCRN
START AAMAIN
STACK 256
EJECT
*
CW1 BLK
*
*
*
* TND INDICATORS
*
*
NOPF BOOL F
TNDBAD BOOL F
TNDNDU BOOL F
TNDRCF BOOL F
TNDTRY BOOL F
TNDOPF BOOL F
CASEMP BOOL F
PAYOK BOOL F
TNDBLK BOOL F
TNDREPA BOOL F
TNDCIX BIN TABLE INDEX
TNDIOL BIN TND I/O WORK VARIABLE
TNDST BIN TND I/O STATUS
*
*
VCVOLNR1 STRG 3 DBS-VOLNR
VCVOLNR2 STRG 3 FMT-VOLNR
NDLASTRM BCD 4D'100' LAST TERMINAL NUMBER
FCPARAM STRG 102
FCPARAM1 STRG 66
* CHECK TABLE FOR FUNCTION-KEY COMBINATIONS (CDCHKY)
KDCHECKS BCDI (11,7), C
'1','1','1','1','1','2','1', 1:EOI C
'1','1','1','1','1','1','1', 2:LIST C
'1','0','1','1','3','1','3', 3:OPEN C
'1','1','1','1','0','1','0', 4:CLOSE C
'1','1','1','1','0','1','0', 5:BLOCK C
'2','1','1','1','0','1','0', 6:UPDATE C
'2','1','1','1','0','1','0', 7:INQUIRY C
'1','1','1','1','0','1','0', 8:DAILY STATEMENTS ( ) C
'2','1','2','0','2','0','2', 9:IN C
'2','2','1','0','2','0','2', 10:OUT C
'1','1','1','0','0','1','0' 11:TRANSFER
*
*
* TND VARIABLES
DELAMT BCD 8 AMOUNT TO DELIVER
TNDDVS STRG 4C DEVICE STATUS
TNDREJ STRG 16C REASONS FOR LAST 16
..REJECTS, FOLLOWED BY '0'
NDMAP STRG '3210' CASSETTE ORDER
NDDUMP BCD 4D NUMBER OF REJECTED NOTES
NDRCLIM BCD 4D'200' REJECT LIMIT
* COLUMN CODING:*
* COLUMN 1: CHECK CURRENCY OFF*
* COLUMN 2: CHECK CHEQUE OFF*
* COLUMN 3: CHECK NOBOOK OFF*
* COLUMN 4: CHECK REVERSAL OFF*
* COLUMN 5: CHECK CARD OFF*
* COLUMN 6: CHECK INPUT-FIELD EMPTY*
* COLUMN 7: CHECK ZEKOSA
* IF KDCHECKS(I,J) = 1*
* THEN FOR FUNCTION I, CHECK J WILL BE PERFORMED*
* IF KDCHECKS(I,J) = 2
* THEN FOR FUNCTION I, A SPECIFIC VERSION OF CHECK J
* WILL BE PERFORMED
************************************************************************
CSY BLK
**
************************************************************************
**
* SYSTEM RECORD*
**
************************************************************************
YDSYSRNR BCD 12 RECORD NUMBER
YDUMMY BCD 6
YDSTATUS BCD 2
* 0 = SYSTEM NOT STARTED*
* 1 = SYSTEM START OR CLOSE PROGRESSING
* 2 = SYSTEM STARTED*
* 3 = SYSTEM CLOSED
YCCCY STRGI (4)4 CURRENCIES
YDSYSLGG BCD 2 SYSTEM LANGUAGE
YDMLPINT BCD 2 LINE PRINTER INTEGRATED
YCTEXT STRG 25 DEMO TEXT
YDLASSAV BCD 12 LAST SAVINGS ACCOUNT NUMBER
YDLASCHQ BCD 12 LAST CHEQUE ACCOUNT NUMBER
YDLASCRD BCD 6 LAST DUMMY CARD NUMBER
YDLASSEQ BCD 12 LAST TRANSACTION SEQUENCE NR.
************************************************************************
*
* TWB VARIABLES
*
************************************************************************
TRM BLK
**
SBKEY1 BOOL TRUE
SBKEY2 BOOL FALSE
SBCANCEL BOOL FALSE
SB34KB BOOL FALSE 6231 OR 6234 TYPE KEYBOARD
SBTRMBLK BOOL FALSE TERMINAL BLOCKED
SBFT80 BOOL FALSE
SBMSU BOOL FALSE MAGNETIC STRIPE UNIT
SBTND BOOL FALSE TND AVAILABLE
SBFT80OP BOOL F FT80OP OPEN INDICATOR
SBCP80 BOOL F COPY80 (HP75) PRESENT (.T.)
NWUWBNR BIN UWB-NUMBER
NDTRMLGG BCD 2 TERMINAL LANGUAGE
NDTRMNR BCD 4 TERMINAL NUMBER
************************************************************************
**
* TERMINAL RECORD*
**
************************************************************************
RDTRMRNR BCD 12 RECORD NUMBER
RDUMMY BCD 6
RCTRMNME STRG 20 TERMINAL NAME
RDSTATUS BCD 2
* 0 = TERMINAL NOT SPECIFIED*
* 1 = TERMINAL SPECIFIED*
* 2 = TERMINAL STARTED*
* 3 = OPERATOR LOGGED ON*
RDSCRLNS BCD 4D'1' NUMBER OF AVAILABLE LINES
RDALFKB BCD 2D'0' ALPHANUMERIC KEYBOARD
RDSHRPRT BCD 2D'0' SHARED PRINTER
RDPRTTYP BCD 2D'0' PRINTER TYPE
RDBCR BCD 2D'0' BADGE CARD READER
RDODR BCD 2D'0' OPTICAL DOCUMENT READER
RDOPRNR BCD 6 OPERATOR NUMBER
RDCOPY BCD 2D'0' HARDCOPY PRINTER
RDTND BCD 2D'0' TELLER NOTE DISPENSER
************************************************************************
*
* SCREEN-MANAGEMENT VARAIBLES AND WORKVARIABLES
*
************************************************************************
TSP BLK
*
* SCREEN-MANAGEMENT VARIABLES
SPPROMPT BOOL TRUE
SPCHANGE BOOL FALSE
SBZEKERR BOOL FALSE USED IF ERROR IN ZEKOSA
...USAGE
SPBINW1 BIN W'0'
SPBINW2 BIN W'0'
SPBINW3 BIN W'0'
SPBINW4 BIN W'0'
* WORKFIELDS, MAY BE USED BY ALL ROUTINES
WW1 BIN
WW2 BIN
WW3 BIN
WWINDEX1 BIN
WWINDEX2 BIN
WWCOUNT BIN
WDEC1 BCD 12
WDEC2 BCD 12
* MORE SCREEN-MANAGEMENT VARIABLES
SPINPUT STRG 32
SPLSTLNE BCD 4D'1' LAST LINE ON THE SCREEN
************************************************************************
**
* MISCELANEOUS RESERVED VARIABLES AND I/O-BUFFERS
**
************************************************************************
UBF BLK
*
SBUSEDWB BOOL FALSE UWB USED
* RESERVED VARIABLES FOR XBFMT
NWTOTBYT BIN BYTES TO BE PROCESSED (XBFMT)
NWPTR BIN MATCH POINTER (XBFMT)
* RESERVED VARIABLES FOR BESELF
NWKTBIX BIN KEYTABLE INDEX (BESELF)
* SWITCHES USED BY BESELF
SWCCY BIN CURRENCY SWITCH (BESELF)
SBCHEQUE BOOL FALSE
SBNOBOOK BOOL FALSE
SBRVS BOOL FALSE REVERSAL SWITCH (BESELF)
SBCARD BOOL FALSE
SBZEK BOOL FALSE ZEKOSA SWITCH
SBFLDEMP BOOL FALSE INPUT FIELD EMPTY (BESELF)
SBOPRCLS BOOL FALSE OPERATOR CLOSE (BESELF)
* VARIABLES RESERVED FOR THE PRINT ROUTINES
SBFIL24 BOOL FALSE )CONTROL POSITIONING OF
SBFIL20 BOOL FALSE ) PRINT LINES ON
SBVCH BOOL FALSE ) VOUCHER (PCVCH)
NDNEWLNE BCD 4 NEXT FREE LINE (PRINT ROUT'S)
NDPRTTRS BCD 12 NEXT TRS. FOR PRINT (PRT RT'S)
VCDOCPAR STRG 22 TP71-DOCUMENT PARAMETER
SBFIL1 BOOL FALSE *****************
SBFIL2 BOOL FALSE FILLERSIZE IN
SBFIL3 BOOL FALSE TITLE LINE OF
SBFIL4 BOOL FALSE TP71 DEMONSTATION
SBFIL5 BOOL FALSE *****************
* WORKFIELDS, MAY BE USED BY ALL ROUTINES
WCSTRG6 STRG 6
WC1STRG8 STRG 8
WC2STRG8 STRG 8
WCSTRG12 STRG 12
WCSTRG25 STRG 25
************************************************************************
*
* I/O-BUFFERS
*
************************************************************************
**
* BUFFER USAGE:*
* IN XBFMT 'FCFMTBUF' IS FIRST USED TO READ A FORMAT INTO THE *
* BUFFER 'FCFORMAT'.*
* IF THEN THE FORMAT MUST BE SPLIT INTO PARTS 'FCFMTBUF' IS USED*
* AGAIN.*
* SO WHEN IN SCREEN MANAGEMENT THESE TWO BUFFERS MAY NOT BE USED!!!*
* 'FCBUFFER' CAN BE USED TO READ RECORDS FROM THE DATABASE,*
* TO READ ERRORS AND MESSAGES FROM THE FORMAT FILE OR TO*
* READ PRINT FORMATS FROM THE FORMAT FILE.*
* *
FCBUFFER STRG 399 BUFFER FOR DATABASE AND MSG'S
FCFMTBUF STRG 255 FORMAT BUFFER
FCFORMAT STRG 800 FORMAT STORAGE
FCFIELD STRG 10 INPUT-FIELD IN FUNCTION CHOISE
************************************************************************
UIF BLK
* *
************************************************************************
**
* INTERFACES BETWEEN FUNCTION MODULE, FORMAT AND SPAPPL*
**
************************************************************************
SBSTTO BOOL FALSE START OPERATOR
SBOACT BOOL FALSE OPEN ACCOUNT
SBCACT BOOL FALSE CLOSE ACCOUNT
SBBACT BOOL FALSE BLOCK ACCOUNT
SBDACT BOOL FALSE DEBLOCK ACCOUNT
SBUACT BOOL FALSE UPDATE ACCOUNT
SBUCCY BOOL FALSE UPDATE CURRENCY
SBQACT BOOL FALSE INQUIRY ACCOUNT
SBDSTM BOOL FALSE DAYLY STATEMENTS
SBCOPR BOOL FALSE OPERATOR CLOSE
SBCSYS BOOL FALSE SYSTEM CLOSE
SBECCY BOOL FALSE CURRENCY EXCHANGE
SBQCCY BOOL FALSE CURRENCY INQUIRY
SBLACT BOOL FALSE LIST ACCOUNTS
SBWDR BOOL FALSE
IWINDEX1 BIN
IDACTNR1 BCD 12
IDACTNR2 BCD 12
IDAMT1 BCD 12
IDAMT2 BCD 20
IDNR1 BCD 12
IDNR2 BCD 12
IDNR3 BCD 12
IDNR4 BCD 12
ICSTRG1 STRG 1
ICTEXT1 STRG 6
ICTEXT2 STRG 25
ICTEXT3 STRG 4
ICDUMMY STRG 5
TNDBFF STRG 40 TND I/O BUFFER
************************************************************************
UCY BLK
*
************************************************************************
**
* CURRENCY RECORD*
**
************************************************************************
CDCCYRNR BCD 12 RECORD NUMBER
CDUMMY BCD 6
CCCCYNME STRG 20 CURRENCY NAME
CCCCYCDE STRG 4 CURRENCY CODE
CDBUY1 BCD 8 BUYING RATE 1
CDBUY2 BCD 8 BUYING RATE 2
CDSEL1 BCD 8 SELLING RATE 1
CDSEL2 BCD 8 SELLING RATE 2
CDLIMIT BCD 12 LIMIT OF RATE 1
CDRELAT BCD 6 RELATION
************************************************************************
UOP BLK
**
************************************************************************
**
* OPERATOR RECORD*
**
************************************************************************
ODOPRRNR BCD 12 RECORD NUMBER
ODUMMY BCD 6
OCPASS STRG 6 PASSWORD
OCNAME STRG 18 OPERATOR NAME
ODSTATUS BCD 2
* 0 = OPERATOR NOT IN USE*
* 1 = OPERATOR INITIALISED*
* 2 = OPERATOR LOGGED ON*
ODTRMNR BCD 4 TERMINAL NUMBER
ODOPRLGG BCD 2 LANGUAGE USED BY OPERATOR
ODCASH BCDI (3,5)12 BALANCES AND ACCUMULATORS
* USAGE AS FOLLOWS:*
* 1,1 : BALANCE CURRENCY 1*
* 1,2 : BALANCE CURRENCY 2*
* 1,3 : BALANCE CURRENCY 3*
* 1,4 : BALANCE CASH*
* 1,5 : UNUSED*
* 2,1 : ACCUMULATED CHEQUES*
* 2,2 : ACCUMULATED TRANSFERS*
* 2,3 : ACCUMULATED DEPOSITS *
* 2,4 : ACCUMULATED WITHDRAWALS*
* 2,5 : UNUSED*
* 3,1 : ACCUMULATED CURRENCY 1 - BOUGHT AND SOLD*
* 3,2 : ACCUMULATED CURRENCY 2 - BOUGHT AND SOLD*
* 3,3 : ACCUMULATED CURRENCY 3 - BOUGHT AND SOLD*
* 3,4 : ACCUMULATED CURRENCY SOLD - LOCAL VALUE *
* 3,5 : ACCUMULATED CURRENCY BOUGHT - LOCAL VALUE *
*
*
*
* T N D REGISTERS:
* - - - ----------
*
NOTES BCDI (4),5D'10000',5D'5000',5D'2000',5D'1000'
TNDREG BCDI (4),5D NUMBER OF NOTEST TO
..DELIVER PER CASSTTE
NDDATA1 BCDI (5,4),5D
NDDATA2 BCDI (2,4),2D'4',2D'3',2D'2',2D'1', C
2D'0',2D'0',2D'0',2D'0'
************************************************************************
UA1 BLK
**
SBCHQACT BOOL FALSE IS ACCOUNT A CHEQUE ACC
************************************************************************
**
* ACCOUNT RECORD 1*
**
************************************************************************
ADACTRNR BCD 12 RECORD NUMBER
ADCARDNR BCD 6 CARD NUMBER
ACNAME STRG 20
ACADDRES STRG 20
ACTOWN STRG 20
ACPASS STRG 6 PASSWORD
ADSTATUS BCD 2
* 0 = DEBLOCKED*
* 1 = BLOCKED*
* 2 = CLOSED WITHOUT STATEMENT*
* 3 = CLOSED WITH STATEMENT*
ADBAL BCD 12 BALANCE
ADLIMBOK BCD 12 CREDIT LIMIT/BOOK BALANCE
ADLASTRS BCD 12 LAST TRANSACTION
ADSTMTRS BCD 12 LAST TRANSACTION STATEMENTED
ADLNENR BCD 4 LAST USED LINE IN BOOK
ADDEPCUM BCD 12 ACCUMULATED DEPOSITS
ADWDRCUM BCD 12 ACCUMULATED WITHDRAWALS
ADLASSEQ BCD 12 LAST TRANSACTION SEQUENCE NR.
ACRECNR STRG 3 INDEX 2 FOR DATABASE
************************************************************************
UA2 BLK
**
************************************************************************
**
* ACCOUNT RECORD 2*
**
************************************************************************
BDACTRNR BCD 12 RECORD NUMBER
BDCARDNR BCD 6 CARD NUMBER
BCNAME STRG 20
BCADDRES STRG 20
BCTOWN STRG 20
BCPASS STRG 6 PASSWORD
BDSTATUS BCD 2
* 0 = DEBLOCKED*
* 1 = BLOCKED*
* 2 = CLOSED WITHOUT STATEMENT*
* 3 = CLOSED WITH STATEMENT*
BDBAL BCD 12 BALANCE
BDLIMBOK BCD 12 CREDIT LIMIT/BOOK BALANCE
BDLASTRS BCD 12 LAST TRANSACTION
BDSTMTRS BCD 12 LAST TRANSACTION STATEMENTED
BDLNENR BCD 4 FIRST FREE LINE IN BOOK
BDDEPCUM BCD 12 ACCUMULATED DEPOSITS
BDWDRCUM BCD 12 ACCUMULATED WITHDRAWALS
BDLASSEQ BCD 12 LAST TRANSACTION SEQUENCE NR.
************************************************************************
UT1 BLK
**
************************************************************************
**
* TRANSACTION RECORD 1*
**
************************************************************************
TDTRSRNR BCD 12 RECORD NUMBER
TDUMMY BCD 6
TDTRSCDE BCD 4 TRANSACTION CODE
TDDATE BCD 8 TRANSACTION DATE
TDTRMNR BCD 12 TERMINAL NUMBER OF ISSUE
TDOPRNR BCD 12 OPERATOR NUMBER
TDTRSSEQ BCD 12 SEQUENCE NUMBER
TDAMOUNT BCD 12
TDNEWBAL BCD 12 NEW BALANCE
TDACTFRM BCD 12 ACCOUNT FROM
TDCHQNR BCD 8 CHEQUE NUMBER
TCTEXT STRG 20
************************************************************************
UT2 BLK
**
************************************************************************
**
* TRANSACTION RECORD 2*
**
************************************************************************
UDTRSRNR BCD 12 RECORD NUMBER
UDUMMY BCD 6
UDTRSCDE BCD 4 TRANSACTION CODE
UDDATE BCD 8 TRANSACTION DATE
UDTRMNR BCD 12 TERMINAL NUMBER OF ISSUE
UDOPRNR BCD 12 OPERATOR NUMBER
UDTRSSEQ BCD 12 SEQUENCE NUMBER
UDAMOUNT BCD 12
UDNEWBAL BCD 12 NEW BALANCE
UDACTFRM BCD 12 ACCOUNT FROM
UDCHQNR BCD 8 CHEQUE NUMBER
UCTEXT STRG 20
************************************************************************
*
* COMMON WORK-BLOCK CONTAINING CONSTANTS
*
************************************************************************
CK1 BLK
*
KW0 BIN W'0'
KW1 BIN W'1'
KW2 BIN W'2'
KW3 BIN W'3'
KW4 BIN W'4'
KW5 BIN W'5'
KW6 BIN W'6'
KWFMTLNG BIN W'255' FORMATRECORD LENGTH
KWNRFMT BIN W'100' NUMBER OF FORMATS
KD1 BCD 2D'1'
KDMAXLGG BCD 2D'4' NUMBER OF LANGUAGES
KDSHIFT BCD D'100' SHIFT TO GET RECORD NUMBER
NDDATE BCD 8
NDTIME BCD 8
VCTIME STRG 6
************************************************************************
*
* COMMON WORK-BLOCK CONTAINING CONSTANTS
*
************************************************************************
CK2 BLK
*
* INDICES IN THE FUNCTION KEYTABLE 'FNCKTB'
KWSTART BIN W'3'
KWEND BIN W'4'
KWEOI BIN W'1'
KWCONT BIN W'20'
KWCANCEL BIN W'19'
KWCLEAR BIN W'21'
* LENGTH OF THE FUNCTION KEYTABLE 'FNCKTB'
KWAPLKTB BIN W'24' LENGTH OF FUNCTION KEYTABLE
* INDICES IN THE SCREEN-MANAGEMENT KEYTABLES
KWSPEOI BIN W'3'
KWSPCANC BIN W'4'
KWSPCONT BIN W'17'
KWSPCLR BIN W'1'
* LENGTHS OF THE SCREEN-MANAGEMENT KEYTABLES
KWSPKTB BIN W'21' LENGTH OF SPKTAB1/2
KWSPKTB3 BIN W'12' LENGTH OF SPKTAB3
* 6371 PRINTER PARAMETERS FOR DEMO TP71
KCPRTPAR STRGI (21), C
4X'9066',4X'9266',4X'9366',4X'9466',4X'9566', C
4X'9666',4X'9766',4X'9966',4X'9866',4X'8066', C
4X'9166',4X'8066',4X'8055',4X'8044',4X'8044', C
4X'9044',4X'9055',4X'9055',4X'9066',4X'9044', C
4X'9A66'
************************************************************************
*
* MISCELANEOUS RESERVED VARIABLES
*
************************************************************************
UQQ BLK
*
* VARIABLES RESERVED FOR SPAPPL
NWRETCDE BIN W'0' RETURN CODE (SPAPPL)
* SWITCHES USED BY XAKBIN
SBNOWAIT BOOL FALSE NOWAIT OPTION (XAKBIN)
* SWITCHES USED BY DPECCY
SBEOI BOOL FALSE AMT. QUOTED IN SY.CCY (DPECCY)
SBCCYIN BOOL FALSE CURRENCY BUYING (DPECCY)
SBCCYKTB BOOL FALSE USE CCY KEYTABLE (DPECCY)
* SWITCHES USED BY DKDSTM
SBFIRST BOOL FALSE DISPLAY TRANS. DATE (DKDSTM)
SBDSDEP BOOL FALSE TRANS. IS A DEPOSIT (DKDSTM)
SBDSWDR BOOL FALSE TRANS. IS A WITHDRAW. (DKDSTM)
SBDSRVS BOOL FALSE TRANS. IS A REVERSAL (DKDSTM)
SBDSTRF BOOL FALSE TRANS. IS A TRANSFER (DKDSTM)
* VARIABLES USED BY ZDSCIO
NWXSTAT BIN EXTENDED STATUS CODE
NWRECLNG BIN RECORD LENGTH (ZDSCIO)
MAXOUT BIN W'50'
CASMAX BIN W'4' MAX NO. OF CASSETTES
KW7 BIN W'7'
KW8 BIN W'8'
KW9 BIN W'9'
NDLRN1 BCD 12 LOGICAL RECORD NUMBER (ZDSCIO)
NDLRN2 BCD 12 LOGICAL RECORD NUMBER (ZDSCIO)
NDLRN3 BCD 12 LOGICAL REC.NR. (ZDSCIO)
NDRCID BCD 6D'65535'
SBNOCOPY BOOL FALSE COPY NOT FROM/TO UWB (ZDSCIO)
SBRECAVB BOOL FALSE REC.AVAIL. AFTER READ (ZDSCIO)
************************************************************************
PDIV
*
*
END
0x0000…003e (0, 0, 400) Head {h00=0x003a, h01=0x0050, text=» IDENT DEMODD DATA DIVISION «, t00=0x0000, t01=0x0004}
0x003e…004c Head {h00=0x000a, h01=0x0050, text=» DDIV «, t00=0x0000, t01=0x0042}
0x004c…009c Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0000, t01=0x0050}
0x009c…00ec Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0000, t01=0x00a0}
0x00ec…013c Head {h00=0x004c, h01=0x0050, text=»* DATA DIVISION FOR THE PTS 6000 DEMO PACKAGE *«, t00=0x0000, t01=0x00f0}
0x013c…018c Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0000, t01=0x0140}
0x018c…01dc Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0000, t01=0x0190}
0x01dc…022c Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0001, t01=0x0050}
0x022c…027c Head {h00=0x004c, h01=0x0050, text=»* KEY TO THE VARIABLE NAMES USED. *«, t00=0x0001, t01=0x00a0}
0x027c…02cc Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0001, t01=0x00f0}
0x02cc…031c Head {h00=0x004c, h01=0x0050, text=»* THE FIRST TWO LETTERS OF A VARIABLE NAME INDICATE THE USE AND *«, t00=0x0001, t01=0x0140}
0x031c…036c Head {h00=0x004c, h01=0x0050, text=»* TYPE OF THE VARIABLE AS FOLLOWS: *«, t00=0x0001, t01=0x0190}
0x036c…03bc Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0002, t01=0x0050}
0x03bc…040c Head {h00=0x004c, h01=0x0050, text=»* FIRST LETTER: VARIABLE USAGE; THE VARIABLE BELONGS TO THE *«, t00=0x0002, t01=0x00a0}
0x040c…045c Head {h00=0x004c, h01=0x0050, text=»* FOLLOWING GROUP OF VARIABLES. *«, t00=0x0002, t01=0x00f0}
0x045c…04ac Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0002, t01=0x0140}
0x04ac…04fc Head {h00=0x004c, h01=0x0050, text=»* Y: SYSTEM RECORD *«, t00=0x0002, t01=0x0190}
0x04fc…054c Head {h00=0x004c, h01=0x0050, text=»* R: TERMINAL RECORD *«, t00=0x0003, t01=0x0050}
0x054c…059c Head {h00=0x004c, h01=0x0050, text=»* C: CURRENCY RECORD *«, t00=0x0003, t01=0x00a0}
0x059c…05ec Head {h00=0x004c, h01=0x0050, text=»* O: OPERATOR RECORD *«, t00=0x0003, t01=0x00f0}
0x05ec…063c Head {h00=0x004c, h01=0x0050, text=»* A: ACCOUNT RECORD IN UWB UA1 *«, t00=0x0003, t01=0x0140}
0x063c…068c Head {h00=0x004c, h01=0x0050, text=»* B: ACCOUNT RECORD IN UWB UA2 *«, t00=0x0003, t01=0x0190}
0x068c…06dc Head {h00=0x004c, h01=0x0050, text=»* T: TRANSACTION RECORD IN UWB UT1 *«, t00=0x0004, t01=0x0050}
0x06dc…072c Head {h00=0x004c, h01=0x0050, text=»* U: TRANSACTION RECORD IN UWB UT2 *«, t00=0x0004, t01=0x00a0}
0x072c…077c Head {h00=0x004c, h01=0x0050, text=»* SP: SCREEN MANAGEMENT VARIABLES (EXCEPTION, 2 LETTERS) *«, t00=0x0004, t01=0x00f0}
0x077c…07cc Head {h00=0x004c, h01=0x0050, text=»* F: BUFFERS *«, t00=0x0004, t01=0x0140}
0x07cc…081c Head {h00=0x004c, h01=0x0050, text=»* I: INTERFACE BETWEEN FUNCTION MODULE, FORMATS AND *«, t00=0x0004, t01=0x0190}
0x081c…086c Head {h00=0x004c, h01=0x0050, text=»* SPAPXX-ROUTINES, MAY NOT BE USED BY OTHER ROUTINES *«, t00=0x0005, t01=0x0050}
0x086c…08bc Head {h00=0x004c, h01=0x0050, text=»* K: CONSTANTS *«, t00=0x0005, t01=0x00a0}
0x08bc…090c Head {h00=0x004c, h01=0x0050, text=»* N: NUMERIC VARIABLES, POINTERS, COUNTERS, CALCULATION VAR. *«, t00=0x0005, t01=0x00f0}
0x090c…095c Head {h00=0x004c, h01=0x0050, text=»* S: SWITCHES *«, t00=0x0005, t01=0x0140}
0x095c…09ac Head {h00=0x004c, h01=0x0050, text=»* V: TEXT VARIABLES *«, t00=0x0005, t01=0x0190}
0x09ac…09fc Head {h00=0x004c, h01=0x0050, text=»* W: WORKVARIABLES, MAY BE USED BY ALL ROUTINES *«, t00=0x0006, t01=0x0050}
0x09fc…0a4c Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0006, t01=0x00a0}
0x0a4c…0a9c Head {h00=0x004c, h01=0x0050, text=»* SECOND LETTER: INDICATES THE TYPE OF THE VARIABLE. *«, t00=0x0006, t01=0x00f0}
0x0a9c…0aec Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0006, t01=0x0140}
0x0aec…0b3c Head {h00=0x004c, h01=0x0050, text=»* B: BOOLEAN *«, t00=0x0006, t01=0x0190}
0x0b3c…0b8c Head {h00=0x004c, h01=0x0050, text=»* C: STRING *«, t00=0x0007, t01=0x0050}
0x0b8c…0bdc Head {h00=0x004c, h01=0x0050, text=»* D: BINARY CODED DECIMAL (BCD) *«, t00=0x0007, t01=0x00a0}
0x0bdc…0c2c Head {h00=0x004c, h01=0x0050, text=»* W: BINARY *«, t00=0x0007, t01=0x00f0}
0x0c2c…0c7c Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0007, t01=0x0140}
0x0c7c…0ccc Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0007, t01=0x0190}
0x0ccc…0d1c Head {h00=0x004c, h01=0x0050, text=»* FURTHERMORE THE FOLLOWING SHORTHANDS HAVE BEEN USED: *«, t00=0x0008, t01=0x0050}
0x0d1c…0d6c Head {h00=0x004c, h01=0x0050, text=»* (LENGTH =< 3) *«, t00=0x0008, t01=0x00a0}
0x0d6c…0dbc Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0008, t01=0x00f0}
0x0dbc…0e0c Head {h00=0x004c, h01=0x0050, text=»* ACT: ACCOUNT ADU: AD85 *«, t00=0x0008, t01=0x0140}
0x0e0c…0e5c Head {h00=0x004c, h01=0x0050, text=»* ALF: ALPHANUMERIC AVB: AVAILABLE *«, t00=0x0008, t01=0x0190}
0x0e5c…0eac Head {h00=0x004c, h01=0x0050, text=»* BAL: BALANCE BCK: BACK *«, t00=0x0009, t01=0x0050}
0x0eac…0efc Head {h00=0x004c, h01=0x0050, text=»* BLK: BLOCK BOK: BOOK *«, t00=0x0009, t01=0x00a0}
0x0efc…0f4c Head {h00=0x004c, h01=0x0050, text=»* BUY: BUY(ING) *«, t00=0x0009, t01=0x00f0}
0x0f4c…0f9c Head {h00=0x004c, h01=0x0050, text=»* CCY: CURRENCY CDE: CODE *«, t00=0x0009, t01=0x0140}
0x0f9c…0fec Head {h00=0x004c, h01=0x0050, text=»* CFG: CONFIGURATION CHK: CHECK *«, t00=0x0009, t01=0x0190}
0x0fec…103c Head {h00=0x004c, h01=0x0050, text=»* CHQ: CHEQUE CLS: CLOSE *«, t00=0x000a, t01=0x0050}
0x103c…108c Head {h00=0x004c, h01=0x0050, text=»* CLR: CLEAR CMN: COMMON *«, t00=0x000a, t01=0x00a0}
0x108c…10dc Head {h00=0x004c, h01=0x0050, text=»* CNT: CONTINUE CPY: COPY *«, t00=0x000a, t01=0x00f0}
0x10dc…112c Head {h00=0x004c, h01=0x0050, text=»* CRD: CARD CUM: ACCUMULATED *«, t00=0x000a, t01=0x0140}
0x112c…117c Head {h00=0x004c, h01=0x0050, text=»* CUR: CURRENT *«, t00=0x000a, t01=0x0190}
0x117c…1198 Head {h00=0x0018, h01=0x0050, text=»* DEL: DELETE «, t00=0x000b, t01=0x0050}
0x1198…11e8 Head {h00=0x004c, h01=0x0050, text=»* DEP: DEPOSIT DI: INDICATOR DISPLAY *«, t00=0x000b, t01=0x006c}
0x11e8…1238 Head {h00=0x004c, h01=0x0050, text=»* DMO: DEMONSTRATION DS: DATASET *«, t00=0x000b, t01=0x00bc}
0x1238…1288 Head {h00=0x004c, h01=0x0050, text=»* DSK: DISK DY: DISPLAY *«, t00=0x000b, t01=0x010c}
0x1288…12d8 Head {h00=0x004c, h01=0x0050, text=»* EA: EXCLUSIVE ACCES EXC: EXCHANGE *«, t00=0x000b, t01=0x015c}
0x12d8…1328 Head {h00=0x004c, h01=0x0050, text=»* ERR: ERROR *«, t00=0x000c, t01=0x001c}
0x1328…1378 Head {h00=0x004c, h01=0x0050, text=»* FLE: FILE FNC: FUNCTION *«, t00=0x000c, t01=0x006c}
0x1378…13c8 Head {h00=0x004c, h01=0x0050, text=»* FMT: FORMAT FRM: FROM *«, t00=0x000c, t01=0x00bc}
0x13c8…1418 Head {h00=0x004c, h01=0x0050, text=»* FRT: FRONT FTB: FORMATTABLE *«, t00=0x000c, t01=0x010c}
0x1418…1468 Head {h00=0x004c, h01=0x0050, text=»* HRD: HARD *«, t00=0x000c, t01=0x015c}
0x1468…14b8 Head {h00=0x004c, h01=0x0050, text=»* ID: IDENTIFICATION IND: INDICATOR *«, t00=0x000d, t01=0x001c}
0x14b8…1508 Head {h00=0x004c, h01=0x0050, text=»* INP: INPUT INQ: INQUIRY *«, t00=0x000d, t01=0x006c}
0x1508…1558 Head {h00=0x004c, h01=0x0050, text=»* INS: INSERT IX: INDEX *«, t00=0x000d, t01=0x00bc}
0x1558…15a8 Head {h00=0x004c, h01=0x0050, text=»* JRN: JOURNAL *«, t00=0x000d, t01=0x010c}
0x15a8…15f8 Head {h00=0x004c, h01=0x0050, text=»* KB: KEYBOARD KTB: KEYTABLE *«, t00=0x000d, t01=0x015c}
0x15f8…1648 Head {h00=0x004c, h01=0x0050, text=»* KY: KEY *«, t00=0x000e, t01=0x001c}
0x1648…1698 Head {h00=0x004c, h01=0x0050, text=»* LAS: LAST LGG: LANGUAGE *«, t00=0x000e, t01=0x006c}
0x1698…16e8 Head {h00=0x004c, h01=0x0050, text=»* LMT: LIMIT LNE: LINE *«, t00=0x000e, t01=0x00bc}
0x16e8…1738 Head {h00=0x004c, h01=0x0050, text=»* LNG: LENGTH LNS: LINES *«, t00=0x000e, t01=0x010c}
0x1738…1788 Head {h00=0x004c, h01=0x0050, text=»* LOG: LOGICAL LST: LIST *«, t00=0x000e, t01=0x015c}
0x1788…17d8 Head {h00=0x004c, h01=0x0050, text=»* LT: LAST TRANSACTION LTS: LAST TRANS. STATM. *«, t00=0x000f, t01=0x001c}
0x17d8…1828 Head {h00=0x004c, h01=0x0050, text=»* NME: NAME NR: NUMBER *«, t00=0x000f, t01=0x006c}
0x1828…1878 Head {h00=0x004c, h01=0x0050, text=»* NUM: NUMERIC *«, t00=0x000f, t01=0x00bc}
0x1878…18c8 Head {h00=0x004c, h01=0x0050, text=»* OFC: OFFICE OPN: OPEN *«, t00=0x000f, t01=0x010c}
0x18c8…1918 Head {h00=0x004c, h01=0x0050, text=»* OPR: OPERATOR OTP: OUTPUT *«, t00=0x000f, t01=0x015c}
0x1918…1968 Head {h00=0x004c, h01=0x0050, text=»* PDU: PLASMA DISPLAY PRS: PRESENT *«, t00=0x0010, t01=0x001c}
0x1968…19b8 Head {h00=0x004c, h01=0x0050, text=»* PRT: PRINT(ER) PTR: POINTER *«, t00=0x0010, t01=0x006c}
0x19b8…1a08 Head {h00=0x004c, h01=0x0050, text=»* RD: READ RDY: READY *«, t00=0x0010, t01=0x00bc}
0x1a08…1a58 Head {h00=0x004c, h01=0x0050, text=»* REC: RECORD RNR: RECORD NUMBER *«, t00=0x0010, t01=0x010c}
0x1a58…1aa8 Head {h00=0x004c, h01=0x0050, text=»* RTE: RATE RVS: REVERSE(AL) *«, t00=0x0010, t01=0x015c}
0x1aa8…1af8 Head {h00=0x004c, h01=0x0050, text=»* RWR: REWRITE *«, t00=0x0011, t01=0x001c}
0x1af8…1b48 Head {h00=0x004c, h01=0x0050, text=»* SAV: SAVE, SAVINGS ACCOUNT SCR: SCREEN *«, t00=0x0011, t01=0x006c}
0x1b48…1b98 Head {h00=0x004c, h01=0x0050, text=»* SEL: SELL(ING) SEQ: SEQUENCE *«, t00=0x0011, t01=0x00bc}
0x1b98…1be8 Head {h00=0x004c, h01=0x0050, text=»* SHR: SHARE(D) SP: SCREEN MANAGEMENT *«, t00=0x0011, t01=0x010c}
0x1be8…1c38 Head {h00=0x004c, h01=0x0050, text=»* SPC: SPECIFY(ICATION) STD: STARTED *«, t00=0x0011, t01=0x015c}
0x1c38…1c88 Head {h00=0x004c, h01=0x0050, text=»* STM: STATEMENT STT: START *«, t00=0x0012, t01=0x001c}
0x1c88…1cd8 Head {h00=0x004c, h01=0x0050, text=»* SYS: SYSTEM *«, t00=0x0012, t01=0x006c}
0x1cd8…1d28 Head {h00=0x004c, h01=0x0050, text=»* TAB: TABLE TRF: TRANSFER *«, t00=0x0012, t01=0x00bc}
0x1d28…1d78 Head {h00=0x004c, h01=0x0050, text=»* TRM: TERMINAL TRS: TRANSACTION *«, t00=0x0012, t01=0x010c}
0x1d78…1dc8 Head {h00=0x004c, h01=0x0050, text=»* TST: TEST TXT: TEXT *«, t00=0x0012, t01=0x015c}
0x1dc8…1e18 Head {h00=0x004c, h01=0x0050, text=»* TYP: TYPE *«, t00=0x0013, t01=0x001c}
0x1e18…1e68 Head {h00=0x004c, h01=0x0050, text=»* UPD: UPDATE *«, t00=0x0013, t01=0x006c}
0x1e68…1eb8 Head {h00=0x004c, h01=0x0050, text=»* VCH: VOUCHER VDU: VIDEO *«, t00=0x0013, t01=0x00bc}
0x1eb8…1f08 Head {h00=0x004c, h01=0x0050, text=»* VOL: VOLUME *«, t00=0x0013, t01=0x010c}
0x1f08…1f58 Head {h00=0x004c, h01=0x0050, text=»* WDR: WITHDRAWAL WR: WRITE *«, t00=0x0013, t01=0x015c}
0x1f58…1fa8 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0014, t01=0x001c}
0x1fa8…1ff8 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0014, t01=0x006c}
0x1ff8…2008 Head {h00=0x000c, h01=0x0050, text=» TERM A0«, t00=0x0014, t01=0x00bc}
0x2008…2056 Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0014, t01=0x00cc}
0x2056…2066 Head {h00=0x000c, h01=0x0050, text=» CWB CW1«, t00=0x0014, t01=0x011a}
0x2066…2076 Head {h00=0x000c, h01=0x0050, text=» CWB CSY«, t00=0x0014, t01=0x012a}
0x2076…2086 Head {h00=0x000c, h01=0x0050, text=» TWB TRM«, t00=0x0014, t01=0x013a}
0x2086…2096 Head {h00=0x000c, h01=0x0050, text=» TWB TSP«, t00=0x0014, t01=0x014a}
0x2096…20a6 Head {h00=0x000c, h01=0x0050, text=» UWB UBF«, t00=0x0014, t01=0x015a}
0x20a6…20b6 Head {h00=0x000c, h01=0x0050, text=» UWB UIF«, t00=0x0014, t01=0x016a}
0x20b6…20c6 Head {h00=0x000c, h01=0x0050, text=» UWB UCY«, t00=0x0014, t01=0x017a}
0x20c6…20d6 Head {h00=0x000c, h01=0x0050, text=» UWB UOP«, t00=0x0014, t01=0x018a}
0x20d6…20e6 Head {h00=0x000c, h01=0x0050, text=» UWB UA1«, t00=0x0015, t01=0x000a}
0x20e6…20f6 Head {h00=0x000c, h01=0x0050, text=» UWB UA2«, t00=0x0015, t01=0x001a}
0x20f6…2106 Head {h00=0x000c, h01=0x0050, text=» UWB UT1«, t00=0x0015, t01=0x002a}
0x2106…2116 Head {h00=0x000c, h01=0x0050, text=» UWB UT2«, t00=0x0015, t01=0x003a}
0x2116…2126 Head {h00=0x000c, h01=0x0050, text=» CWB CK1«, t00=0x0015, t01=0x004a}
0x2126…2136 Head {h00=0x000c, h01=0x0050, text=» CWB CK2«, t00=0x0015, t01=0x005a}
0x2136…2146 Head {h00=0x000c, h01=0x0050, text=» UWB UQQ«, t00=0x0015, t01=0x006a}
0x2146…2174 Head {h00=0x002a, h01=0x0050, text=»SPDSSCRN DSET FC=X'50',DEV=DY,BUFL=82 «, t00=0x0015, t01=0x007a}
0x2174…219a Head {h00=0x0022, h01=0x0050, text=»SPDSDYKB DSET FC=X'20',DEV=KA «, t00=0x0015, t01=0x00a8}
0x219a…21bc Head {h00=0x001e, h01=0x0050, text=»DSDI DSET FC=X'41',DEV=DI «, t00=0x0015, t01=0x00ce}
0x21bc…21ea Head {h00=0x002a, h01=0x0050, text=»SPDSPRT DSET FC=X'30',DEV=GP,BUFL=112 «, t00=0x0015, t01=0x00f0}
0x21ea…2226 Head {h00=0x0038, h01=0x0050, text=»DSVCHPRT DSET FC=X'31',DEV=TV,BUFL=98,BUFDS=SPDSPRT «, t00=0x0015, t01=0x011e}
0x2226…2250 Head {h00=0x0026, h01=0x0050, text=»DS0DR DSET FC=X'70',DEV=OD,BUFL=43«, t00=0x0015, t01=0x015a}
0x2250…2272 Head {h00=0x001e, h01=0x0050, text=»DSBCR DSET FC=X'22',DEV=BC«, t00=0x0015, t01=0x0184}
0x2272…22a0 Head {h00=0x002a, h01=0x0050, text=»SPDSCPY DSET FC=X'32',DEV=GP,BUFL=112 «, t00=0x0016, t01=0x0016}
0x22a0…22c2 Head {h00=0x001e, h01=0x0050, text=»DSDBS DSET FC=X'C0',DEV=DL«, t00=0x0016, t01=0x0044}
0x22c2…22f6 Head {h00=0x0030, h01=0x0050, text=»DSEKOSA DSET FC=X'60',DEV=MS ZEKOSA MSU-UNIT«, t00=0x0016, t01=0x0066}
0x22f6…231c Head {h00=0x0022, h01=0x0050, text=»DSFMTFLE DSET FC=X'CA',DEV=DL «, t00=0x0016, t01=0x009a}
0x231c…2358 Head {h00=0x0038, h01=0x0050, text=»DSLNEPRT DSET FC=X'80',DEV=LP,BUFL=110,BUFDS=SPDSPRT«, t00=0x0016, t01=0x00c0}
0x2358…237c Head {h00=0x0020, h01=0x0050, text=»TNDSET DSET FC=X'65',DEV=ND «, t00=0x0016, t01=0x00fc}
0x237c…23a8 Head {h00=0x0028, h01=0x0050, text=» FMTCTL INDS=SPDSDYKB,OUTDS=SPDSSCRN«, t00=0x0016, t01=0x0120}
0x23a8…23be Head {h00=0x0012, h01=0x0050, text=» START AAMAIN «, t00=0x0016, t01=0x014c}
0x23be…23d0 Head {h00=0x000e, h01=0x0050, text=» STACK 256«, t00=0x0016, t01=0x0162}
0x23d0…23de Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x0174}
0x23de…23e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0182}
0x23e8…23f8 Head {h00=0x000c, h01=0x0050, text=»CW1 BLK «, t00=0x0016, t01=0x018c}
0x23f8…2402 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x000c}
0x2402…240c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0016}
0x240c…2416 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0020}
0x2416…242e Head {h00=0x0014, h01=0x0050, text=»* TND INDICATORS«, t00=0x0017, t01=0x002a}
0x242e…2438 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0042}
0x2438…2442 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x004c}
0x2442…2456 Head {h00=0x0010, h01=0x0050, text=»NOPF BOOL F «, t00=0x0017, t01=0x0056}
0x2456…246c Head {h00=0x0012, h01=0x0050, text=»TNDBAD BOOL F «, t00=0x0017, t01=0x006a}
0x246c…2482 Head {h00=0x0012, h01=0x0050, text=»TNDNDU BOOL F «, t00=0x0017, t01=0x0080}
0x2482…2498 Head {h00=0x0012, h01=0x0050, text=»TNDRCF BOOL F «, t00=0x0017, t01=0x0096}
0x2498…24ae Head {h00=0x0012, h01=0x0050, text=»TNDTRY BOOL F «, t00=0x0017, t01=0x00ac}
0x24ae…24c4 Head {h00=0x0012, h01=0x0050, text=»TNDOPF BOOL F «, t00=0x0017, t01=0x00c2}
0x24c4…24da Head {h00=0x0012, h01=0x0050, text=»CASEMP BOOL F «, t00=0x0017, t01=0x00d8}
0x24da…24ee Head {h00=0x0010, h01=0x0050, text=»PAYOK BOOL F«, t00=0x0017, t01=0x00ee}
0x24ee…2504 Head {h00=0x0012, h01=0x0050, text=»TNDBLK BOOL F «, t00=0x0017, t01=0x0102}
0x2504…251a Head {h00=0x0012, h01=0x0050, text=»TNDREPA BOOL F«, t00=0x0017, t01=0x0118}
0x251a…253a Head {h00=0x001c, h01=0x0050, text=»TNDCIX BIN TABLE INDEX «, t00=0x0017, t01=0x012e}
0x253a…2564 Head {h00=0x0026, h01=0x0050, text=»TNDIOL BIN TND I/O WORK VARIABLE «, t00=0x0017, t01=0x014e}
0x2564…2586 Head {h00=0x001e, h01=0x0050, text=»TNDST BIN TND I/O STATUS «, t00=0x0017, t01=0x0178}
0x2586…2590 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x000a}
0x2590…259a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0014}
0x259a…25bc Head {h00=0x001e, h01=0x0050, text=»VCVOLNR1 STRG 3 DBS-VOLNR «, t00=0x0018, t01=0x001e}
0x25bc…25de Head {h00=0x001e, h01=0x0050, text=»VCVOLNR2 STRG 3 FMT-VOLNR «, t00=0x0018, t01=0x0040}
0x25de…2610 Head {h00=0x002e, h01=0x0050, text=»NDLASTRM BCD 4D'100' LAST TERMINAL NUMBER «, t00=0x0018, t01=0x0062}
0x2610…2628 Head {h00=0x0014, h01=0x0050, text=»FCPARAM STRG 102«, t00=0x0018, t01=0x0094}
0x2628…2640 Head {h00=0x0014, h01=0x0050, text=»FCPARAM1 STRG 66«, t00=0x0018, t01=0x00ac}
0x2640…267c Head {h00=0x0038, h01=0x0050, text=»* CHECK TABLE FOR FUNCTION-KEY COMBINATIONS (CDCHKY)«, t00=0x0018, t01=0x00c4}
0x267c…269c Head {h00=0x001c, h01=0x0050, text=»KDCHECKS BCDI (11,7), C«, t00=0x0018, t01=0x0100}
0x269c…26f0 Head {h00=0x0050, h01=0x0050, text=» '1','1','1','1','1','2','1', 1:EOI C «, t00=0x0018, t01=0x0120}
0x26f0…2726 Head {h00=0x0032, h01=0x0050, text=» '1','1','1','1','1','1','1', 2:LIST C «, t00=0x0018, t01=0x0174}
0x2726…277a Head {h00=0x0050, h01=0x0050, text=» '1','0','1','1','3','1','3', 3:OPEN C «, t00=0x0019, t01=0x001a}
0x277a…27ce Head {h00=0x0050, h01=0x0050, text=» '1','1','1','1','0','1','0', 4:CLOSE C «, t00=0x0019, t01=0x006e}
0x27ce…2822 Head {h00=0x0050, h01=0x0050, text=» '1','1','1','1','0','1','0', 5:BLOCK C «, t00=0x0019, t01=0x00c2}
0x2822…2876 Head {h00=0x0050, h01=0x0050, text=» '2','1','1','1','0','1','0', 6:UPDATE C «, t00=0x0019, t01=0x0116}
0x2876…28ca Head {h00=0x0050, h01=0x0050, text=» '2','1','1','1','0','1','0', 7:INQUIRY C «, t00=0x0019, t01=0x016a}
0x28ca…291c Head {h00=0x004e, h01=0x0050, text=» '1','1','1','1','0','1','0', 8:DAILY STATEMENTS ( ) C «, t00=0x001a, t01=0x002e}
0x291c…2970 Head {h00=0x0050, h01=0x0050, text=» '2','1','2','0','2','0','2', 9:IN C «, t00=0x001a, t01=0x0080}
0x2970…29c4 Head {h00=0x0050, h01=0x0050, text=» '2','2','1','0','2','0','2', 10:OUT C «, t00=0x001a, t01=0x00d4}
0x29c4…2a18 Head {h00=0x0050, h01=0x0050, text=» '1','1','1','0','0','1','0' 11:TRANSFER «, t00=0x001a, t01=0x0128}
0x2a18…2a22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x017c}
0x2a22…2a2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0186}
0x2a2c…2a44 Head {h00=0x0014, h01=0x0050, text=»* TND VARIABLES «, t00=0x001a, t01=0x0190}
0x2a44…2a6a Head {h00=0x0022, h01=0x0050, text=»DELAMT BCD 8 AMOUNT TO DELIVER«, t00=0x001b, t01=0x0018}
0x2a6a…2a8e Head {h00=0x0020, h01=0x0050, text=»TNDDVS STRG 4C DEVICE STATUS«, t00=0x001b, t01=0x003e}
0x2a8e…2aba Head {h00=0x0028, h01=0x0050, text=»TNDREJ STRG 16C REASONS FOR LAST 16 «, t00=0x001b, t01=0x0062}
0x2aba…2ae0 Head {h00=0x0022, h01=0x0050, text=» ..REJECTS, FOLLOWED BY '0' «, t00=0x001b, t01=0x008e}
0x2ae0…2b08 Head {h00=0x0024, h01=0x0050, text=»NDMAP STRG '3210' CASSETTE ORDER«, t00=0x001b, t01=0x00b4}
0x2b08…2b36 Head {h00=0x002a, h01=0x0050, text=»NDDUMP BCD 4D NUMBER OF REJECTED NOTES«, t00=0x001b, t01=0x00dc}
0x2b36…2b5e Head {h00=0x0024, h01=0x0050, text=»NDRCLIM BCD 4D'200' REJECT LIMIT«, t00=0x001b, t01=0x010a}
0x2b5e…2bae Head {h00=0x004c, h01=0x0050, text=»* COLUMN CODING: *«, t00=0x001b, t01=0x0132}
0x2bae…2bfe Head {h00=0x004c, h01=0x0050, text=»* COLUMN 1: CHECK CURRENCY OFF *«, t00=0x001b, t01=0x0182}
0x2bfe…2c4e Head {h00=0x004c, h01=0x0050, text=»* COLUMN 2: CHECK CHEQUE OFF *«, t00=0x001c, t01=0x0042}
0x2c4e…2c9e Head {h00=0x004c, h01=0x0050, text=»* COLUMN 3: CHECK NOBOOK OFF *«, t00=0x001c, t01=0x0092}
0x2c9e…2cee Head {h00=0x004c, h01=0x0050, text=»* COLUMN 4: CHECK REVERSAL OFF *«, t00=0x001c, t01=0x00e2}
0x2cee…2d3e Head {h00=0x004c, h01=0x0050, text=»* COLUMN 5: CHECK CARD OFF *«, t00=0x001c, t01=0x0132}
0x2d3e…2d8e Head {h00=0x004c, h01=0x0050, text=»* COLUMN 6: CHECK INPUT-FIELD EMPTY *«, t00=0x001c, t01=0x0182}
0x2d8e…2dd0 Head {h00=0x003e, h01=0x0050, text=»* COLUMN 7: CHECK ZEKOSA«, t00=0x001d, t01=0x0042}
0x2dd0…2e20 Head {h00=0x004c, h01=0x0050, text=»* IF KDCHECKS(I,J) = 1 *«, t00=0x001d, t01=0x0084}
0x2e20…2e70 Head {h00=0x004c, h01=0x0050, text=»* THEN FOR FUNCTION I, CHECK J WILL BE PERFORMED *«, t00=0x001d, t01=0x00d4}
0x2e70…2e8e Head {h00=0x001a, h01=0x0050, text=»* IF KDCHECKS(I,J) = 2«, t00=0x001d, t01=0x0124}
0x2e8e…2ed0 Head {h00=0x003e, h01=0x0050, text=»* THEN FOR FUNCTION I, A SPECIFIC VERSION OF CHECK J «, t00=0x001d, t01=0x0142}
0x2ed0…2ef0 Head {h00=0x001c, h01=0x0050, text=»* WILL BE PERFORMED«, t00=0x001d, t01=0x0184}
0x2ef0…2f40 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x001e, t01=0x0014}
0x2f40…2f90 Head {h00=0x004c, h01=0x0050, text=»CSY BLK «, t00=0x001e, t01=0x0064}
0x2f90…2fe0 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x001e, t01=0x00b4}
0x2fe0…3030 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x001e, t01=0x0104}
0x3030…3080 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x001e, t01=0x0154}
0x3080…30d0 Head {h00=0x004c, h01=0x0050, text=»* SYSTEM RECORD *«, t00=0x001f, t01=0x0014}
0x30d0…3120 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x001f, t01=0x0064}
0x3120…3170 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x001f, t01=0x00b4}
0x3170…31c0 Head {h00=0x004c, h01=0x0050, text=»YDSYSRNR BCD 12 RECORD NUMBER «, t00=0x001f, t01=0x0104}
0x31c0…3210 Head {h00=0x004c, h01=0x0050, text=»YDUMMY BCD 6 «, t00=0x001f, t01=0x0154}
0x3210…3226 Head {h00=0x0012, h01=0x0050, text=»YDSTATUS BCD 2«, t00=0x0020, t01=0x0014}
0x3226…3276 Head {h00=0x004c, h01=0x0050, text=»* 0 = SYSTEM NOT STARTED *«, t00=0x0020, t01=0x002a}
0x3276…32a8 Head {h00=0x002e, h01=0x0050, text=»* 1 = SYSTEM START OR CLOSE PROGRESSING «, t00=0x0020, t01=0x007a}
0x32a8…32f8 Head {h00=0x004c, h01=0x0050, text=»* 2 = SYSTEM STARTED *«, t00=0x0020, t01=0x00ac}
0x32f8…3316 Head {h00=0x001a, h01=0x0050, text=»* 3 = SYSTEM CLOSED «, t00=0x0020, t01=0x00fc}
0x3316…3366 Head {h00=0x004c, h01=0x0050, text=»YCCCY STRGI (4)4 CURRENCIES «, t00=0x0020, t01=0x011a}
0x3366…33b6 Head {h00=0x004c, h01=0x0050, text=»YDSYSLGG BCD 2 SYSTEM LANGUAGE «, t00=0x0020, t01=0x016a}
0x33b6…3406 Head {h00=0x004c, h01=0x0050, text=»YDMLPINT BCD 2 LINE PRINTER INTEGRATED «, t00=0x0021, t01=0x002a}
0x3406…3456 Head {h00=0x004c, h01=0x0050, text=»YCTEXT STRG 25 DEMO TEXT «, t00=0x0021, t01=0x007a}
0x3456…34a6 Head {h00=0x004c, h01=0x0050, text=»YDLASSAV BCD 12 LAST SAVINGS ACCOUNT NUMBER «, t00=0x0021, t01=0x00ca}
0x34a6…34f6 Head {h00=0x004c, h01=0x0050, text=»YDLASCHQ BCD 12 LAST CHEQUE ACCOUNT NUMBER «, t00=0x0021, t01=0x011a}
0x34f6…3546 Head {h00=0x004c, h01=0x0050, text=»YDLASCRD BCD 6 LAST DUMMY CARD NUMBER «, t00=0x0021, t01=0x016a}
0x3546…3596 Head {h00=0x004c, h01=0x0050, text=»YDLASSEQ BCD 12 LAST TRANSACTION SEQUENCE NR. «, t00=0x0022, t01=0x002a}
0x3596…35e6 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0022, t01=0x007a}
0x35e6…35f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00ca}
0x35f0…3608 Head {h00=0x0014, h01=0x0050, text=»* TWB VARIABLES «, t00=0x0022, t01=0x00d4}
0x3608…3612 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00ec}
0x3612…3662 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0022, t01=0x00f6}
0x3662…36b2 Head {h00=0x004c, h01=0x0050, text=»TRM BLK «, t00=0x0022, t01=0x0146}
0x36b2…3702 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0023, t01=0x0008}
0x3702…3752 Head {h00=0x004c, h01=0x0050, text=»SBKEY1 BOOL TRUE «, t00=0x0023, t01=0x0058}
0x3752…37a2 Head {h00=0x004c, h01=0x0050, text=»SBKEY2 BOOL FALSE «, t00=0x0023, t01=0x00a8}
0x37a2…37f2 Head {h00=0x004c, h01=0x0050, text=»SBCANCEL BOOL FALSE «, t00=0x0023, t01=0x00f8}
0x37f2…3842 Head {h00=0x004c, h01=0x0050, text=»SB34KB BOOL FALSE 6231 OR 6234 TYPE KEYBOARD «, t00=0x0023, t01=0x0148}
0x3842…386e Head {h00=0x0028, h01=0x0050, text=»SBTRMBLK BOOL FALSE TERMINAL BLOCKED«, t00=0x0024, t01=0x0008}
0x386e…3888 Head {h00=0x0016, h01=0x0050, text=»SBFT80 BOOL FALSE «, t00=0x0024, t01=0x0034}
0x3888…38b6 Head {h00=0x002a, h01=0x0050, text=»SBMSU BOOL FALSE MAGNETIC STRIPE UNIT «, t00=0x0024, t01=0x004e}
0x38b6…38dc Head {h00=0x0022, h01=0x0050, text=»SBTND BOOL FALSE TND AVAILABLE«, t00=0x0024, t01=0x007c}
0x38dc…390a Head {h00=0x002a, h01=0x0050, text=»SBFT80OP BOOL F FT80OP OPEN INDICATOR «, t00=0x0024, t01=0x00a2}
0x390a…393c Head {h00=0x002e, h01=0x0050, text=»SBCP80 BOOL F COPY80 (HP75) PRESENT (.T.) «, t00=0x0024, t01=0x00d0}
0x393c…398c Head {h00=0x004c, h01=0x0050, text=»NWUWBNR BIN UWB-NUMBER «, t00=0x0024, t01=0x0102}
0x398c…39b4 Head {h00=0x0024, h01=0x0050, text=»NDTRMLGG BCD 2 TERMINAL LANGUAGE«, t00=0x0024, t01=0x0152}
0x39b4…39da Head {h00=0x0022, h01=0x0050, text=»NDTRMNR BCD 4 TERMINAL NUMBER «, t00=0x0024, t01=0x017a}
0x39da…3a2a Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0025, t01=0x0010}
0x3a2a…3a7a Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0025, t01=0x0060}
0x3a7a…3aca Head {h00=0x004c, h01=0x0050, text=»* TERMINAL RECORD *«, t00=0x0025, t01=0x00b0}
0x3aca…3b1a Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0025, t01=0x0100}
0x3b1a…3b6a Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0025, t01=0x0150}
0x3b6a…3bba Head {h00=0x004c, h01=0x0050, text=»RDTRMRNR BCD 12 RECORD NUMBER «, t00=0x0026, t01=0x0010}
0x3bba…3c0a Head {h00=0x004c, h01=0x0050, text=»RDUMMY BCD 6 «, t00=0x0026, t01=0x0060}
0x3c0a…3c5a Head {h00=0x004c, h01=0x0050, text=»RCTRMNME STRG 20 TERMINAL NAME «, t00=0x0026, t01=0x00b0}
0x3c5a…3caa Head {h00=0x004c, h01=0x0050, text=»RDSTATUS BCD 2 «, t00=0x0026, t01=0x0100}
0x3caa…3cfa Head {h00=0x004c, h01=0x0050, text=»* 0 = TERMINAL NOT SPECIFIED *«, t00=0x0026, t01=0x0150}
0x3cfa…3d4a Head {h00=0x004c, h01=0x0050, text=»* 1 = TERMINAL SPECIFIED *«, t00=0x0027, t01=0x0010}
0x3d4a…3d9a Head {h00=0x004c, h01=0x0050, text=»* 2 = TERMINAL STARTED *«, t00=0x0027, t01=0x0060}
0x3d9a…3dea Head {h00=0x004c, h01=0x0050, text=»* 3 = OPERATOR LOGGED ON *«, t00=0x0027, t01=0x00b0}
0x3dea…3e1e Head {h00=0x0030, h01=0x0050, text=»RDSCRLNS BCD 4D'1' NUMBER OF AVAILABLE LINES«, t00=0x0027, t01=0x0100}
0x3e1e…3e6e Head {h00=0x004c, h01=0x0050, text=»RDALFKB BCD 2D'0' ALPHANUMERIC KEYBOARD «, t00=0x0027, t01=0x0134}
0x3e6e…3ebe Head {h00=0x004c, h01=0x0050, text=»RDSHRPRT BCD 2D'0' SHARED PRINTER «, t00=0x0027, t01=0x0184}
0x3ebe…3f0e Head {h00=0x004c, h01=0x0050, text=»RDPRTTYP BCD 2D'0' PRINTER TYPE «, t00=0x0028, t01=0x0044}
0x3f0e…3f5e Head {h00=0x004c, h01=0x0050, text=»RDBCR BCD 2D'0' BADGE CARD READER «, t00=0x0028, t01=0x0094}
0x3f5e…3fae Head {h00=0x004c, h01=0x0050, text=»RDODR BCD 2D'0' OPTICAL DOCUMENT READER «, t00=0x0028, t01=0x00e4}
0x3fae…3fd4 Head {h00=0x0022, h01=0x0050, text=»RDOPRNR BCD 6 OPERATOR NUMBER «, t00=0x0028, t01=0x0134}
0x3fd4…3ffe Head {h00=0x0026, h01=0x0050, text=»RDCOPY BCD 2D'0' HARDCOPY PRINTER «, t00=0x0028, t01=0x015a}
0x3ffe…402c Head {h00=0x002a, h01=0x0050, text=»RDTND BCD 2D'0' TELLER NOTE DISPENSER «, t00=0x0028, t01=0x0184}
0x402c…407c Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0029, t01=0x0022}
0x407c…4086 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0072}
0x4086…40be Head {h00=0x0034, h01=0x0050, text=»* SCREEN-MANAGEMENT VARAIBLES AND WORKVARIABLES «, t00=0x0029, t01=0x007c}
0x40be…40c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00b4}
0x40c8…4118 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0029, t01=0x00be}
0x4118…4128 Head {h00=0x000c, h01=0x0050, text=»TSP BLK «, t00=0x0029, t01=0x010e}
0x4128…4132 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x011e}
0x4132…4158 Head {h00=0x0022, h01=0x0050, text=»* SCREEN-MANAGEMENT VARIABLES «, t00=0x0029, t01=0x0128}
0x4158…4172 Head {h00=0x0016, h01=0x0050, text=»SPPROMPT BOOL TRUE«, t00=0x0029, t01=0x014e}
0x4172…418e Head {h00=0x0018, h01=0x0050, text=»SPCHANGE BOOL FALSE «, t00=0x0029, t01=0x0168}
0x418e…41c2 Head {h00=0x0030, h01=0x0050, text=»SBZEKERR BOOL FALSE USED IF ERROR IN ZEKOSA «, t00=0x0029, t01=0x0184}
0x41c2…41d6 Head {h00=0x0010, h01=0x0050, text=» ...USAGE «, t00=0x002a, t01=0x0028}
0x41d6…41ee Head {h00=0x0014, h01=0x0050, text=»SPBINW1 BIN W'0'«, t00=0x002a, t01=0x003c}
0x41ee…4206 Head {h00=0x0014, h01=0x0050, text=»SPBINW2 BIN W'0'«, t00=0x002a, t01=0x0054}
0x4206…421e Head {h00=0x0014, h01=0x0050, text=»SPBINW3 BIN W'0'«, t00=0x002a, t01=0x006c}
0x421e…4236 Head {h00=0x0014, h01=0x0050, text=»SPBINW4 BIN W'0'«, t00=0x002a, t01=0x0084}
0x4236…4268 Head {h00=0x002e, h01=0x0050, text=»* WORKFIELDS, MAY BE USED BY ALL ROUTINES «, t00=0x002a, t01=0x009c}
0x4268…4278 Head {h00=0x000c, h01=0x0050, text=»WW1 BIN «, t00=0x002a, t01=0x00ce}
0x4278…4288 Head {h00=0x000c, h01=0x0050, text=»WW2 BIN «, t00=0x002a, t01=0x00de}
0x4288…4298 Head {h00=0x000c, h01=0x0050, text=»WW3 BIN «, t00=0x002a, t01=0x00ee}
0x4298…42ac Head {h00=0x0010, h01=0x0050, text=»WWINDEX1 BIN«, t00=0x002a, t01=0x00fe}
0x42ac…42c0 Head {h00=0x0010, h01=0x0050, text=»WWINDEX2 BIN«, t00=0x002a, t01=0x0112}
0x42c0…42d4 Head {h00=0x0010, h01=0x0050, text=»WWCOUNT BIN «, t00=0x002a, t01=0x0126}
0x42d4…42e8 Head {h00=0x0010, h01=0x0050, text=»WDEC1 BCD 12«, t00=0x002a, t01=0x013a}
0x42e8…42fc Head {h00=0x0010, h01=0x0050, text=»WDEC2 BCD 12«, t00=0x002a, t01=0x014e}
0x42fc…4326 Head {h00=0x0026, h01=0x0050, text=»* MORE SCREEN-MANAGEMENT VARIABLES«, t00=0x002a, t01=0x0162}
0x4326…433e Head {h00=0x0014, h01=0x0050, text=»SPINPUT STRG 32 «, t00=0x002a, t01=0x018c}
0x433e…4370 Head {h00=0x002e, h01=0x0050, text=»SPLSTLNE BCD 4D'1' LAST LINE ON THE SCREEN«, t00=0x002b, t01=0x0014}
0x4370…43c0 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x002b, t01=0x0046}
0x43c0…4410 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x002b, t01=0x0096}
0x4410…444a Head {h00=0x0036, h01=0x0050, text=»* MISCELANEOUS RESERVED VARIABLES AND I/O-BUFFERS «, t00=0x002b, t01=0x00e6}
0x444a…449a Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x002b, t01=0x0120}
0x449a…44ea Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x002b, t01=0x0170}
0x44ea…44fa Head {h00=0x000c, h01=0x0050, text=»UBF BLK «, t00=0x002c, t01=0x0030}
0x44fa…4504 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0040}
0x4504…4528 Head {h00=0x0020, h01=0x0050, text=»SBUSEDWB BOOL FALSE UWB USED«, t00=0x002c, t01=0x004a}
0x4528…454e Head {h00=0x0022, h01=0x0050, text=»* RESERVED VARIABLES FOR XBFMT«, t00=0x002c, t01=0x006e}
0x454e…4582 Head {h00=0x0030, h01=0x0050, text=»NWTOTBYT BIN BYTES TO BE PROCESSED (XBFMT) «, t00=0x002c, t01=0x0094}
0x4582…45aa Head {h00=0x0024, h01=0x0050, text=»NWPTR BIN MATCH POINTER (XBFMT)«, t00=0x002c, t01=0x00c8}
0x45aa…45d2 Head {h00=0x0024, h01=0x0050, text=»* RESERVED VARIABLES FOR BESELF «, t00=0x002c, t01=0x00f0}
0x45d2…45fe Head {h00=0x0028, h01=0x0050, text=»NWKTBIX BIN KEYTABLE INDEX (BESELF)«, t00=0x002c, t01=0x0118}
0x45fe…4620 Head {h00=0x001e, h01=0x0050, text=»* SWITCHES USED BY BESELF «, t00=0x002c, t01=0x0144}
0x4620…464c Head {h00=0x0028, h01=0x0050, text=»SWCCY BIN CURRENCY SWITCH (BESELF) «, t00=0x002c, t01=0x0166}
0x464c…4668 (45, 0, 400) Head {h00=0x0018, h01=0x0050, text=»SBCHEQUE BOOL FALSE «, t00=0x002d, t01=0x0004}
0x4668…4684 Head {h00=0x0018, h01=0x0050, text=»SBNOBOOK BOOL FALSE «, t00=0x002d, t01=0x0020}
0x4684…46b6 Head {h00=0x002e, h01=0x0050, text=»SBRVS BOOL FALSE REVERSAL SWITCH (BESELF) «, t00=0x002d, t01=0x003c}
0x46b6…46d0 Head {h00=0x0016, h01=0x0050, text=»SBCARD BOOL FALSE «, t00=0x002d, t01=0x006e}
0x46d0…46f6 Head {h00=0x0022, h01=0x0050, text=»SBZEK BOOL FALSE ZEKOSA SWITCH«, t00=0x002d, t01=0x0088}
0x46f6…472c Head {h00=0x0032, h01=0x0050, text=»SBFLDEMP BOOL FALSE INPUT FIELD EMPTY (BESELF)«, t00=0x002d, t01=0x00ae}
0x472c…4760 Head {h00=0x0030, h01=0x0050, text=»SBOPRCLS BOOL FALSE OPERATOR CLOSE (BESELF) «, t00=0x002d, t01=0x00e4}
0x4760…4794 Head {h00=0x0030, h01=0x0050, text=»* VARIABLES RESERVED FOR THE PRINT ROUTINES «, t00=0x002d, t01=0x0118}
0x4794…47c6 Head {h00=0x002e, h01=0x0050, text=»SBFIL24 BOOL FALSE )CONTROL POSITIONING OF«, t00=0x002d, t01=0x014c}
0x47c6…47f2 Head {h00=0x0028, h01=0x0050, text=»SBFIL20 BOOL FALSE ) PRINT LINES ON «, t00=0x002d, t01=0x017e}
0x47f2…481c Head {h00=0x0026, h01=0x0050, text=»SBVCH BOOL FALSE ) VOUCHER (PCVCH)«, t00=0x002e, t01=0x001a}
0x481c…4850 Head {h00=0x0030, h01=0x0050, text=»NDNEWLNE BCD 4 NEXT FREE LINE (PRINT ROUT'S)«, t00=0x002e, t01=0x0044}
0x4850…4886 Head {h00=0x0032, h01=0x0050, text=»NDPRTTRS BCD 12 NEXT TRS. FOR PRINT (PRT RT'S)«, t00=0x002e, t01=0x0078}
0x4886…48b6 Head {h00=0x002c, h01=0x0050, text=»VCDOCPAR STRG 22 TP71-DOCUMENT PARAMETER«, t00=0x002e, t01=0x00ae}
0x48b6…48e2 Head {h00=0x0028, h01=0x0050, text=»SBFIL1 BOOL FALSE ***************** «, t00=0x002e, t01=0x00de}
0x48e2…490a Head {h00=0x0024, h01=0x0050, text=»SBFIL2 BOOL FALSE FILLERSIZE IN «, t00=0x002e, t01=0x010a}
0x490a…4932 Head {h00=0x0024, h01=0x0050, text=»SBFIL3 BOOL FALSE TITLE LINE OF «, t00=0x002e, t01=0x0132}
0x4932…495e Head {h00=0x0028, h01=0x0050, text=»SBFIL4 BOOL FALSE TP71 DEMONSTATION «, t00=0x002e, t01=0x015a}
0x495e…498a Head {h00=0x0028, h01=0x0050, text=»SBFIL5 BOOL FALSE ***************** «, t00=0x002e, t01=0x0186}
0x498a…49bc Head {h00=0x002e, h01=0x0050, text=»* WORKFIELDS, MAY BE USED BY ALL ROUTINES «, t00=0x002f, t01=0x0022}
0x49bc…49d2 Head {h00=0x0012, h01=0x0050, text=»WCSTRG6 STRG 6«, t00=0x002f, t01=0x0054}
0x49d2…49ea Head {h00=0x0014, h01=0x0050, text=»WC1STRG8 STRG 8 «, t00=0x002f, t01=0x006a}
0x49ea…4a02 Head {h00=0x0014, h01=0x0050, text=»WC2STRG8 STRG 8 «, t00=0x002f, t01=0x0082}
0x4a02…4a1a Head {h00=0x0014, h01=0x0050, text=»WCSTRG12 STRG 12«, t00=0x002f, t01=0x009a}
0x4a1a…4a32 Head {h00=0x0014, h01=0x0050, text=»WCSTRG25 STRG 25«, t00=0x002f, t01=0x00b2}
0x4a32…4a82 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x002f, t01=0x00ca}
0x4a82…4a8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x011a}
0x4a8c…4aa2 Head {h00=0x0012, h01=0x0050, text=»* I/O-BUFFERS «, t00=0x002f, t01=0x0124}
0x4aa2…4aac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x013a}
0x4aac…4afc Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x002f, t01=0x0144}
0x4afc…4b4c (48, 0, 400) Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0030, t01=0x0004}
0x4b4c…4b9c Head {h00=0x004c, h01=0x0050, text=»* BUFFER USAGE: *«, t00=0x0030, t01=0x0054}
0x4b9c…4bec Head {h00=0x004c, h01=0x0050, text=»* IN XBFMT 'FCFMTBUF' IS FIRST USED TO READ A FORMAT INTO THE *«, t00=0x0030, t01=0x00a4}
0x4bec…4c3c Head {h00=0x004c, h01=0x0050, text=»* BUFFER 'FCFORMAT'. *«, t00=0x0030, t01=0x00f4}
0x4c3c…4c8c Head {h00=0x004c, h01=0x0050, text=»* IF THEN THE FORMAT MUST BE SPLIT INTO PARTS 'FCFMTBUF' IS USED *«, t00=0x0030, t01=0x0144}
0x4c8c…4cdc (49, 0, 400) Head {h00=0x004c, h01=0x0050, text=»* AGAIN. *«, t00=0x0031, t01=0x0004}
0x4cdc…4d2c Head {h00=0x004c, h01=0x0050, text=»* SO WHEN IN SCREEN MANAGEMENT THESE TWO BUFFERS MAY NOT BE USED!!! *«, t00=0x0031, t01=0x0054}
0x4d2c…4d7c Head {h00=0x004c, h01=0x0050, text=»* 'FCBUFFER' CAN BE USED TO READ RECORDS FROM THE DATABASE, *«, t00=0x0031, t01=0x00a4}
0x4d7c…4dcc Head {h00=0x004c, h01=0x0050, text=»* TO READ ERRORS AND MESSAGES FROM THE FORMAT FILE OR TO *«, t00=0x0031, t01=0x00f4}
0x4dcc…4e1c Head {h00=0x004c, h01=0x0050, text=»* READ PRINT FORMATS FROM THE FORMAT FILE. *«, t00=0x0031, t01=0x0144}
0x4e1c…4e6c (50, 0, 400) Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0032, t01=0x0004}
0x4e6c…4ea4 Head {h00=0x0034, h01=0x0050, text=»FCBUFFER STRG 399 BUFFER FOR DATABASE AND MSG'S «, t00=0x0032, t01=0x0054}
0x4ea4…4ecc Head {h00=0x0024, h01=0x0050, text=»FCFMTBUF STRG 255 FORMAT BUFFER «, t00=0x0032, t01=0x008c}
0x4ecc…4ef4 Head {h00=0x0024, h01=0x0050, text=»FCFORMAT STRG 800 FORMAT STORAGE«, t00=0x0032, t01=0x00b4}
0x4ef4…4f2a Head {h00=0x0032, h01=0x0050, text=»FCFIELD STRG 10 INPUT-FIELD IN FUNCTION CHOISE«, t00=0x0032, t01=0x00dc}
0x4f2a…4f7a Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0032, t01=0x0112}
0x4f7a…4fca Head {h00=0x004c, h01=0x0050, text=»UIF BLK «, t00=0x0032, t01=0x0162}
0x4fca…501a Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0033, t01=0x0022}
0x501a…506a Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0033, t01=0x0072}
0x506a…50ba Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0033, t01=0x00c2}
0x50ba…510a Head {h00=0x004c, h01=0x0050, text=»* INTERFACES BETWEEN FUNCTION MODULE, FORMAT AND SPAPPL *«, t00=0x0033, t01=0x0112}
0x510a…515a Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0033, t01=0x0162}
0x515a…51aa Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0034, t01=0x0022}
0x51aa…51fa Head {h00=0x004c, h01=0x0050, text=»SBSTTO BOOL FALSE START OPERATOR «, t00=0x0034, t01=0x0072}
0x51fa…524a Head {h00=0x004c, h01=0x0050, text=»SBOACT BOOL FALSE OPEN ACCOUNT «, t00=0x0034, t01=0x00c2}
0x524a…529a Head {h00=0x004c, h01=0x0050, text=»SBCACT BOOL FALSE CLOSE ACCOUNT «, t00=0x0034, t01=0x0112}
0x529a…52ea Head {h00=0x004c, h01=0x0050, text=»SBBACT BOOL FALSE BLOCK ACCOUNT «, t00=0x0034, t01=0x0162}
0x52ea…533a Head {h00=0x004c, h01=0x0050, text=»SBDACT BOOL FALSE DEBLOCK ACCOUNT «, t00=0x0035, t01=0x0022}
0x533a…538a Head {h00=0x004c, h01=0x0050, text=»SBUACT BOOL FALSE UPDATE ACCOUNT «, t00=0x0035, t01=0x0072}
0x538a…53da Head {h00=0x004c, h01=0x0050, text=»SBUCCY BOOL FALSE UPDATE CURRENCY «, t00=0x0035, t01=0x00c2}
0x53da…542a Head {h00=0x004c, h01=0x0050, text=»SBQACT BOOL FALSE INQUIRY ACCOUNT «, t00=0x0035, t01=0x0112}
0x542a…547a Head {h00=0x004c, h01=0x0050, text=»SBDSTM BOOL FALSE DAYLY STATEMENTS «, t00=0x0035, t01=0x0162}
0x547a…54ca Head {h00=0x004c, h01=0x0050, text=»SBCOPR BOOL FALSE OPERATOR CLOSE «, t00=0x0036, t01=0x0022}
0x54ca…551a Head {h00=0x004c, h01=0x0050, text=»SBCSYS BOOL FALSE SYSTEM CLOSE «, t00=0x0036, t01=0x0072}
0x551a…556a Head {h00=0x004c, h01=0x0050, text=»SBECCY BOOL FALSE CURRENCY EXCHANGE «, t00=0x0036, t01=0x00c2}
0x556a…55ba Head {h00=0x004c, h01=0x0050, text=»SBQCCY BOOL FALSE CURRENCY INQUIRY «, t00=0x0036, t01=0x0112}
0x55ba…560a Head {h00=0x004c, h01=0x0050, text=»SBLACT BOOL FALSE LIST ACCOUNTS «, t00=0x0036, t01=0x0162}
0x560a…5622 Head {h00=0x0014, h01=0x0050, text=»SBWDR BOOL FALSE«, t00=0x0037, t01=0x0022}
0x5622…5672 Head {h00=0x004c, h01=0x0050, text=»IWINDEX1 BIN «, t00=0x0037, t01=0x003a}
0x5672…56c2 Head {h00=0x004c, h01=0x0050, text=»IDACTNR1 BCD 12 «, t00=0x0037, t01=0x008a}
0x56c2…5712 Head {h00=0x004c, h01=0x0050, text=»IDACTNR2 BCD 12 «, t00=0x0037, t01=0x00da}
0x5712…5762 Head {h00=0x004c, h01=0x0050, text=»IDAMT1 BCD 12 «, t00=0x0037, t01=0x012a}
0x5762…57b2 Head {h00=0x004c, h01=0x0050, text=»IDAMT2 BCD 20 «, t00=0x0037, t01=0x017a}
0x57b2…5802 Head {h00=0x004c, h01=0x0050, text=»IDNR1 BCD 12 «, t00=0x0038, t01=0x003a}
0x5802…5816 Head {h00=0x0010, h01=0x0050, text=»IDNR2 BCD 12«, t00=0x0038, t01=0x008a}
0x5816…582a Head {h00=0x0010, h01=0x0050, text=»IDNR3 BCD 12«, t00=0x0038, t01=0x009e}
0x582a…583e Head {h00=0x0010, h01=0x0050, text=»IDNR4 BCD 12«, t00=0x0038, t01=0x00b2}
0x583e…5854 Head {h00=0x0012, h01=0x0050, text=»ICSTRG1 STRG 1«, t00=0x0038, t01=0x00c6}
0x5854…586a Head {h00=0x0012, h01=0x0050, text=»ICTEXT1 STRG 6«, t00=0x0038, t01=0x00dc}
0x586a…5882 Head {h00=0x0014, h01=0x0050, text=»ICTEXT2 STRG 25 «, t00=0x0038, t01=0x00f2}
0x5882…5898 Head {h00=0x0012, h01=0x0050, text=»ICTEXT3 STRG 4«, t00=0x0038, t01=0x010a}
0x5898…58e8 Head {h00=0x004c, h01=0x0050, text=»ICDUMMY STRG 5 «, t00=0x0038, t01=0x0120}
0x58e8…590e Head {h00=0x0022, h01=0x0050, text=»TNDBFF STRG 40 TND I/O BUFFER «, t00=0x0038, t01=0x0170}
0x590e…595e Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0039, t01=0x0008}
0x595e…596e Head {h00=0x000c, h01=0x0050, text=»UCY BLK «, t00=0x0039, t01=0x0058}
0x596e…5978 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0068}
0x5978…59c8 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0039, t01=0x0072}
0x59c8…5a18 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0039, t01=0x00c2}
0x5a18…5a68 Head {h00=0x004c, h01=0x0050, text=»* CURRENCY RECORD *«, t00=0x0039, t01=0x0112}
0x5a68…5ab8 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0039, t01=0x0162}
0x5ab8…5b08 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x003a, t01=0x0022}
0x5b08…5b2e Head {h00=0x0022, h01=0x0050, text=»CDCCYRNR BCD 12 RECORD NUMBER «, t00=0x003a, t01=0x0072}
0x5b2e…5b42 Head {h00=0x0010, h01=0x0050, text=»CDUMMY BCD 6«, t00=0x003a, t01=0x0098}
0x5b42…5b68 Head {h00=0x0022, h01=0x0050, text=»CCCCYNME STRG 20 CURRENCY NAME«, t00=0x003a, t01=0x00ac}
0x5b68…5b8e Head {h00=0x0022, h01=0x0050, text=»CCCCYCDE STRG 4 CURRENCY CODE «, t00=0x003a, t01=0x00d2}
0x5b8e…5bb0 Head {h00=0x001e, h01=0x0050, text=»CDBUY1 BCD 8 BUYING RATE 1«, t00=0x003a, t01=0x00f8}
0x5bb0…5bd2 Head {h00=0x001e, h01=0x0050, text=»CDBUY2 BCD 8 BUYING RATE 2«, t00=0x003a, t01=0x011a}
0x5bd2…5bf6 Head {h00=0x0020, h01=0x0050, text=»CDSEL1 BCD 8 SELLING RATE 1 «, t00=0x003a, t01=0x013c}
0x5bf6…5c1a Head {h00=0x0020, h01=0x0050, text=»CDSEL2 BCD 8 SELLING RATE 2 «, t00=0x003a, t01=0x0160}
0x5c1a…5c40 Head {h00=0x0022, h01=0x0050, text=»CDLIMIT BCD 12 LIMIT OF RATE 1«, t00=0x003a, t01=0x0184}
0x5c40…5c5e Head {h00=0x001a, h01=0x0050, text=»CDRELAT BCD 6 RELATION«, t00=0x003b, t01=0x001a}
0x5c5e…5cae Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x003b, t01=0x0038}
0x5cae…5cfe Head {h00=0x004c, h01=0x0050, text=»UOP BLK «, t00=0x003b, t01=0x0088}
0x5cfe…5d4e Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x003b, t01=0x00d8}
0x5d4e…5d9e Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x003b, t01=0x0128}
0x5d9e…5dee Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x003b, t01=0x0178}
0x5dee…5e3e Head {h00=0x004c, h01=0x0050, text=»* OPERATOR RECORD *«, t00=0x003c, t01=0x0038}
0x5e3e…5e8e Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x003c, t01=0x0088}
0x5e8e…5ede Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x003c, t01=0x00d8}
0x5ede…5f2e Head {h00=0x004c, h01=0x0050, text=»ODOPRRNR BCD 12 RECORD NUMBER «, t00=0x003c, t01=0x0128}
0x5f2e…5f7e Head {h00=0x004c, h01=0x0050, text=»ODUMMY BCD 6 «, t00=0x003c, t01=0x0178}
0x5f7e…5fce Head {h00=0x004c, h01=0x0050, text=»OCPASS STRG 6 PASSWORD «, t00=0x003d, t01=0x0038}
0x5fce…601e Head {h00=0x004c, h01=0x0050, text=»OCNAME STRG 18 OPERATOR NAME «, t00=0x003d, t01=0x0088}
0x601e…606e Head {h00=0x004c, h01=0x0050, text=»ODSTATUS BCD 2 «, t00=0x003d, t01=0x00d8}
0x606e…60be Head {h00=0x004c, h01=0x0050, text=»* 0 = OPERATOR NOT IN USE *«, t00=0x003d, t01=0x0128}
0x60be…610e Head {h00=0x004c, h01=0x0050, text=»* 1 = OPERATOR INITIALISED *«, t00=0x003d, t01=0x0178}
0x610e…615e Head {h00=0x004c, h01=0x0050, text=»* 2 = OPERATOR LOGGED ON *«, t00=0x003e, t01=0x0038}
0x615e…61ae Head {h00=0x004c, h01=0x0050, text=»ODTRMNR BCD 4 TERMINAL NUMBER «, t00=0x003e, t01=0x0088}
0x61ae…61fe Head {h00=0x004c, h01=0x0050, text=»ODOPRLGG BCD 2 LANGUAGE USED BY OPERATOR «, t00=0x003e, t01=0x00d8}
0x61fe…624e Head {h00=0x004c, h01=0x0050, text=»ODCASH BCDI (3,5)12 BALANCES AND ACCUMULATORS «, t00=0x003e, t01=0x0128}
0x624e…629e Head {h00=0x004c, h01=0x0050, text=»* USAGE AS FOLLOWS: *«, t00=0x003e, t01=0x0178}
0x629e…62ee Head {h00=0x004c, h01=0x0050, text=»* 1,1 : BALANCE CURRENCY 1 *«, t00=0x003f, t01=0x0038}
0x62ee…633e Head {h00=0x004c, h01=0x0050, text=»* 1,2 : BALANCE CURRENCY 2 *«, t00=0x003f, t01=0x0088}
0x633e…638e Head {h00=0x004c, h01=0x0050, text=»* 1,3 : BALANCE CURRENCY 3 *«, t00=0x003f, t01=0x00d8}
0x638e…63de Head {h00=0x004c, h01=0x0050, text=»* 1,4 : BALANCE CASH *«, t00=0x003f, t01=0x0128}
0x63de…642e Head {h00=0x004c, h01=0x0050, text=»* 1,5 : UNUSED *«, t00=0x003f, t01=0x0178}
0x642e…647e Head {h00=0x004c, h01=0x0050, text=»* 2,1 : ACCUMULATED CHEQUES *«, t00=0x0040, t01=0x0038}
0x647e…64ce Head {h00=0x004c, h01=0x0050, text=»* 2,2 : ACCUMULATED TRANSFERS *«, t00=0x0040, t01=0x0088}
0x64ce…651e Head {h00=0x004c, h01=0x0050, text=»* 2,3 : ACCUMULATED DEPOSITS *«, t00=0x0040, t01=0x00d8}
0x651e…656e Head {h00=0x004c, h01=0x0050, text=»* 2,4 : ACCUMULATED WITHDRAWALS *«, t00=0x0040, t01=0x0128}
0x656e…65be Head {h00=0x004c, h01=0x0050, text=»* 2,5 : UNUSED *«, t00=0x0040, t01=0x0178}
0x65be…660e Head {h00=0x004c, h01=0x0050, text=»* 3,1 : ACCUMULATED CURRENCY 1 - BOUGHT AND SOLD *«, t00=0x0041, t01=0x0038}
0x660e…665e Head {h00=0x004c, h01=0x0050, text=»* 3,2 : ACCUMULATED CURRENCY 2 - BOUGHT AND SOLD *«, t00=0x0041, t01=0x0088}
0x665e…66ae Head {h00=0x004c, h01=0x0050, text=»* 3,3 : ACCUMULATED CURRENCY 3 - BOUGHT AND SOLD *«, t00=0x0041, t01=0x00d8}
0x66ae…66fe Head {h00=0x004c, h01=0x0050, text=»* 3,4 : ACCUMULATED CURRENCY SOLD - LOCAL VALUE *«, t00=0x0041, t01=0x0128}
0x66fe…674e Head {h00=0x004c, h01=0x0050, text=»* 3,5 : ACCUMULATED CURRENCY BOUGHT - LOCAL VALUE *«, t00=0x0041, t01=0x0178}
0x674e…6758 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0038}
0x6758…6762 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0042}
0x6762…676c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x004c}
0x676c…6788 Head {h00=0x0018, h01=0x0050, text=»* T N D REGISTERS: «, t00=0x0042, t01=0x0056}
0x6788…67a4 Head {h00=0x0018, h01=0x0050, text=»* - - - ---------- «, t00=0x0042, t01=0x0072}
0x67a4…67ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x008e}
0x67ae…67ea Head {h00=0x0038, h01=0x0050, text=»NOTES BCDI (4),5D'10000',5D'5000',5D'2000',5D'1000' «, t00=0x0042, t01=0x0098}
0x67ea…6818 Head {h00=0x002a, h01=0x0050, text=»TNDREG BCDI (4),5D NUMBER OF NOTEST TO«, t00=0x0042, t01=0x00d4}
0x6818…6838 Head {h00=0x001c, h01=0x0050, text=» ..DELIVER PER CASSTTE«, t00=0x0042, t01=0x0102}
0x6838…6856 Head {h00=0x001a, h01=0x0050, text=»NDDATA1 BCDI (5,4),5D «, t00=0x0042, t01=0x0122}
0x6856…688c Head {h00=0x0032, h01=0x0050, text=»NDDATA2 BCDI (2,4),2D'4',2D'3',2D'2',2D'1', C«, t00=0x0042, t01=0x0140}
0x688c…68ae Head {h00=0x001e, h01=0x0050, text=» 2D'0',2D'0',2D'0',2D'0' «, t00=0x0042, t01=0x0176}
0x68ae…68fe Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0043, t01=0x0008}
0x68fe…694e Head {h00=0x004c, h01=0x0050, text=»UA1 BLK «, t00=0x0043, t01=0x0058}
0x694e…699e Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0043, t01=0x00a8}
0x699e…69d2 Head {h00=0x0030, h01=0x0050, text=»SBCHQACT BOOL FALSE IS ACCOUNT A CHEQUE ACC «, t00=0x0043, t01=0x00f8}
0x69d2…6a22 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0043, t01=0x012c}
0x6a22…6a72 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0043, t01=0x017c}
0x6a72…6ac2 Head {h00=0x004c, h01=0x0050, text=»* ACCOUNT RECORD 1 *«, t00=0x0044, t01=0x003c}
0x6ac2…6b12 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0044, t01=0x008c}
0x6b12…6b62 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0044, t01=0x00dc}
0x6b62…6bb2 Head {h00=0x004c, h01=0x0050, text=»ADACTRNR BCD 12 RECORD NUMBER «, t00=0x0044, t01=0x012c}
0x6bb2…6c02 Head {h00=0x004c, h01=0x0050, text=»ADCARDNR BCD 6 CARD NUMBER «, t00=0x0044, t01=0x017c}
0x6c02…6c52 Head {h00=0x004c, h01=0x0050, text=»ACNAME STRG 20 «, t00=0x0045, t01=0x003c}
0x6c52…6ca2 Head {h00=0x004c, h01=0x0050, text=»ACADDRES STRG 20 «, t00=0x0045, t01=0x008c}
0x6ca2…6cf2 Head {h00=0x004c, h01=0x0050, text=»ACTOWN STRG 20 «, t00=0x0045, t01=0x00dc}
0x6cf2…6d42 Head {h00=0x004c, h01=0x0050, text=»ACPASS STRG 6 PASSWORD «, t00=0x0045, t01=0x012c}
0x6d42…6d92 Head {h00=0x004c, h01=0x0050, text=»ADSTATUS BCD 2 «, t00=0x0045, t01=0x017c}
0x6d92…6de2 Head {h00=0x004c, h01=0x0050, text=»* 0 = DEBLOCKED *«, t00=0x0046, t01=0x003c}
0x6de2…6e32 Head {h00=0x004c, h01=0x0050, text=»* 1 = BLOCKED *«, t00=0x0046, t01=0x008c}
0x6e32…6e82 Head {h00=0x004c, h01=0x0050, text=»* 2 = CLOSED WITHOUT STATEMENT *«, t00=0x0046, t01=0x00dc}
0x6e82…6ed2 Head {h00=0x004c, h01=0x0050, text=»* 3 = CLOSED WITH STATEMENT *«, t00=0x0046, t01=0x012c}
0x6ed2…6f22 Head {h00=0x004c, h01=0x0050, text=»ADBAL BCD 12 BALANCE «, t00=0x0046, t01=0x017c}
0x6f22…6f72 Head {h00=0x004c, h01=0x0050, text=»ADLIMBOK BCD 12 CREDIT LIMIT/BOOK BALANCE «, t00=0x0047, t01=0x003c}
0x6f72…6fc2 Head {h00=0x004c, h01=0x0050, text=»ADLASTRS BCD 12 LAST TRANSACTION «, t00=0x0047, t01=0x008c}
0x6fc2…7012 Head {h00=0x004c, h01=0x0050, text=»ADSTMTRS BCD 12 LAST TRANSACTION STATEMENTED «, t00=0x0047, t01=0x00dc}
0x7012…703e Head {h00=0x0028, h01=0x0050, text=»ADLNENR BCD 4 LAST USED LINE IN BOOK«, t00=0x0047, t01=0x012c}
0x703e…708e Head {h00=0x004c, h01=0x0050, text=»ADDEPCUM BCD 12 ACCUMULATED DEPOSITS «, t00=0x0047, t01=0x0158}
0x708e…70de Head {h00=0x004c, h01=0x0050, text=»ADWDRCUM BCD 12 ACCUMULATED WITHDRAWALS «, t00=0x0048, t01=0x0018}
0x70de…7114 Head {h00=0x0032, h01=0x0050, text=»ADLASSEQ BCD 12 LAST TRANSACTION SEQUENCE NR. «, t00=0x0048, t01=0x0068}
0x7114…7140 Head {h00=0x0028, h01=0x0050, text=»ACRECNR STRG 3 INDEX 2 FOR DATABASE «, t00=0x0048, t01=0x009e}
0x7140…7190 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0048, t01=0x00ca}
0x7190…71e0 Head {h00=0x004c, h01=0x0050, text=»UA2 BLK «, t00=0x0048, t01=0x011a}
0x71e0…7230 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0048, t01=0x016a}
0x7230…7280 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0049, t01=0x002a}
0x7280…72d0 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0049, t01=0x007a}
0x72d0…7320 Head {h00=0x004c, h01=0x0050, text=»* ACCOUNT RECORD 2 *«, t00=0x0049, t01=0x00ca}
0x7320…7370 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0049, t01=0x011a}
0x7370…73c0 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0049, t01=0x016a}
0x73c0…7410 Head {h00=0x004c, h01=0x0050, text=»BDACTRNR BCD 12 RECORD NUMBER «, t00=0x004a, t01=0x002a}
0x7410…7460 Head {h00=0x004c, h01=0x0050, text=»BDCARDNR BCD 6 CARD NUMBER «, t00=0x004a, t01=0x007a}
0x7460…74b0 Head {h00=0x004c, h01=0x0050, text=»BCNAME STRG 20 «, t00=0x004a, t01=0x00ca}
0x74b0…7500 Head {h00=0x004c, h01=0x0050, text=»BCADDRES STRG 20 «, t00=0x004a, t01=0x011a}
0x7500…7550 Head {h00=0x004c, h01=0x0050, text=»BCTOWN STRG 20 «, t00=0x004a, t01=0x016a}
0x7550…75a0 Head {h00=0x004c, h01=0x0050, text=»BCPASS STRG 6 PASSWORD «, t00=0x004b, t01=0x002a}
0x75a0…75f0 Head {h00=0x004c, h01=0x0050, text=»BDSTATUS BCD 2 «, t00=0x004b, t01=0x007a}
0x75f0…7640 Head {h00=0x004c, h01=0x0050, text=»* 0 = DEBLOCKED *«, t00=0x004b, t01=0x00ca}
0x7640…7690 Head {h00=0x004c, h01=0x0050, text=»* 1 = BLOCKED *«, t00=0x004b, t01=0x011a}
0x7690…76e0 Head {h00=0x004c, h01=0x0050, text=»* 2 = CLOSED WITHOUT STATEMENT *«, t00=0x004b, t01=0x016a}
0x76e0…7730 Head {h00=0x004c, h01=0x0050, text=»* 3 = CLOSED WITH STATEMENT *«, t00=0x004c, t01=0x002a}
0x7730…7780 Head {h00=0x004c, h01=0x0050, text=»BDBAL BCD 12 BALANCE «, t00=0x004c, t01=0x007a}
0x7780…77d0 Head {h00=0x004c, h01=0x0050, text=»BDLIMBOK BCD 12 CREDIT LIMIT/BOOK BALANCE «, t00=0x004c, t01=0x00ca}
0x77d0…7820 Head {h00=0x004c, h01=0x0050, text=»BDLASTRS BCD 12 LAST TRANSACTION «, t00=0x004c, t01=0x011a}
0x7820…7870 Head {h00=0x004c, h01=0x0050, text=»BDSTMTRS BCD 12 LAST TRANSACTION STATEMENTED «, t00=0x004c, t01=0x016a}
0x7870…78c0 Head {h00=0x004c, h01=0x0050, text=»BDLNENR BCD 4 FIRST FREE LINE IN BOOK «, t00=0x004d, t01=0x002a}
0x78c0…7910 Head {h00=0x004c, h01=0x0050, text=»BDDEPCUM BCD 12 ACCUMULATED DEPOSITS «, t00=0x004d, t01=0x007a}
0x7910…7960 Head {h00=0x004c, h01=0x0050, text=»BDWDRCUM BCD 12 ACCUMULATED WITHDRAWALS «, t00=0x004d, t01=0x00ca}
0x7960…7996 Head {h00=0x0032, h01=0x0050, text=»BDLASSEQ BCD 12 LAST TRANSACTION SEQUENCE NR. «, t00=0x004d, t01=0x011a}
0x7996…79e6 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x004d, t01=0x0150}
0x79e6…7a36 Head {h00=0x004c, h01=0x0050, text=»UT1 BLK «, t00=0x004e, t01=0x0010}
0x7a36…7a86 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x004e, t01=0x0060}
0x7a86…7ad6 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x004e, t01=0x00b0}
0x7ad6…7b26 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x004e, t01=0x0100}
0x7b26…7b76 Head {h00=0x004c, h01=0x0050, text=»* TRANSACTION RECORD 1 *«, t00=0x004e, t01=0x0150}
0x7b76…7bc6 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x004f, t01=0x0010}
0x7bc6…7c16 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x004f, t01=0x0060}
0x7c16…7c66 Head {h00=0x004c, h01=0x0050, text=»TDTRSRNR BCD 12 RECORD NUMBER «, t00=0x004f, t01=0x00b0}
0x7c66…7cb6 Head {h00=0x004c, h01=0x0050, text=»TDUMMY BCD 6 «, t00=0x004f, t01=0x0100}
0x7cb6…7d06 Head {h00=0x004c, h01=0x0050, text=»TDTRSCDE BCD 4 TRANSACTION CODE «, t00=0x004f, t01=0x0150}
0x7d06…7d56 Head {h00=0x004c, h01=0x0050, text=»TDDATE BCD 8 TRANSACTION DATE «, t00=0x0050, t01=0x0010}
0x7d56…7da6 Head {h00=0x004c, h01=0x0050, text=»TDTRMNR BCD 12 TERMINAL NUMBER OF ISSUE «, t00=0x0050, t01=0x0060}
0x7da6…7df6 Head {h00=0x004c, h01=0x0050, text=»TDOPRNR BCD 12 OPERATOR NUMBER «, t00=0x0050, t01=0x00b0}
0x7df6…7e46 Head {h00=0x004c, h01=0x0050, text=»TDTRSSEQ BCD 12 SEQUENCE NUMBER «, t00=0x0050, t01=0x0100}
0x7e46…7e96 Head {h00=0x004c, h01=0x0050, text=»TDAMOUNT BCD 12 «, t00=0x0050, t01=0x0150}
0x7e96…7ee6 Head {h00=0x004c, h01=0x0050, text=»TDNEWBAL BCD 12 NEW BALANCE «, t00=0x0051, t01=0x0010}
0x7ee6…7f36 Head {h00=0x004c, h01=0x0050, text=»TDACTFRM BCD 12 ACCOUNT FROM «, t00=0x0051, t01=0x0060}
0x7f36…7f86 Head {h00=0x004c, h01=0x0050, text=»TDCHQNR BCD 8 CHEQUE NUMBER «, t00=0x0051, t01=0x00b0}
0x7f86…7fd6 Head {h00=0x004c, h01=0x0050, text=»TCTEXT STRG 20 «, t00=0x0051, t01=0x0100}
0x7fd6…8026 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0051, t01=0x0150}
0x8026…8076 Head {h00=0x004c, h01=0x0050, text=»UT2 BLK «, t00=0x0052, t01=0x0010}
0x8076…80c6 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0052, t01=0x0060}
0x80c6…8116 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0052, t01=0x00b0}
0x8116…8166 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0052, t01=0x0100}
0x8166…81b6 Head {h00=0x004c, h01=0x0050, text=»* TRANSACTION RECORD 2 *«, t00=0x0052, t01=0x0150}
0x81b6…8206 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0053, t01=0x0010}
0x8206…8256 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0053, t01=0x0060}
0x8256…82a6 Head {h00=0x004c, h01=0x0050, text=»UDTRSRNR BCD 12 RECORD NUMBER «, t00=0x0053, t01=0x00b0}
0x82a6…82f6 Head {h00=0x004c, h01=0x0050, text=»UDUMMY BCD 6 «, t00=0x0053, t01=0x0100}
0x82f6…8346 Head {h00=0x004c, h01=0x0050, text=»UDTRSCDE BCD 4 TRANSACTION CODE «, t00=0x0053, t01=0x0150}
0x8346…8396 Head {h00=0x004c, h01=0x0050, text=»UDDATE BCD 8 TRANSACTION DATE «, t00=0x0054, t01=0x0010}
0x8396…83e6 Head {h00=0x004c, h01=0x0050, text=»UDTRMNR BCD 12 TERMINAL NUMBER OF ISSUE «, t00=0x0054, t01=0x0060}
0x83e6…8436 Head {h00=0x004c, h01=0x0050, text=»UDOPRNR BCD 12 OPERATOR NUMBER «, t00=0x0054, t01=0x00b0}
0x8436…8486 Head {h00=0x004c, h01=0x0050, text=»UDTRSSEQ BCD 12 SEQUENCE NUMBER «, t00=0x0054, t01=0x0100}
0x8486…84d6 Head {h00=0x004c, h01=0x0050, text=»UDAMOUNT BCD 12 «, t00=0x0054, t01=0x0150}
0x84d6…8526 Head {h00=0x004c, h01=0x0050, text=»UDNEWBAL BCD 12 NEW BALANCE «, t00=0x0055, t01=0x0010}
0x8526…8576 Head {h00=0x004c, h01=0x0050, text=»UDACTFRM BCD 12 ACCOUNT FROM «, t00=0x0055, t01=0x0060}
0x8576…85c6 Head {h00=0x004c, h01=0x0050, text=»UDCHQNR BCD 8 CHEQUE NUMBER «, t00=0x0055, t01=0x00b0}
0x85c6…8616 Head {h00=0x004c, h01=0x0050, text=»UCTEXT STRG 20 «, t00=0x0055, t01=0x0100}
0x8616…8666 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0055, t01=0x0150}
0x8666…8670 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0010}
0x8670…86a0 Head {h00=0x002c, h01=0x0050, text=»* COMMON WORK-BLOCK CONTAINING CONSTANTS«, t00=0x0056, t01=0x001a}
0x86a0…86aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x004a}
0x86aa…86fa Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0056, t01=0x0054}
0x86fa…870a Head {h00=0x000c, h01=0x0050, text=»CK1 BLK «, t00=0x0056, t01=0x00a4}
0x870a…8714 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00b4}
0x8714…8728 Head {h00=0x0010, h01=0x0050, text=»KW0 BIN W'0'«, t00=0x0056, t01=0x00be}
0x8728…873c Head {h00=0x0010, h01=0x0050, text=»KW1 BIN W'1'«, t00=0x0056, t01=0x00d2}
0x873c…8750 Head {h00=0x0010, h01=0x0050, text=»KW2 BIN W'2'«, t00=0x0056, t01=0x00e6}
0x8750…8764 Head {h00=0x0010, h01=0x0050, text=»KW3 BIN W'3'«, t00=0x0056, t01=0x00fa}
0x8764…8778 Head {h00=0x0010, h01=0x0050, text=»KW4 BIN W'4'«, t00=0x0056, t01=0x010e}
0x8778…878c Head {h00=0x0010, h01=0x0050, text=»KW5 BIN W'5'«, t00=0x0056, t01=0x0122}
0x878c…87a0 Head {h00=0x0010, h01=0x0050, text=»KW6 BIN W'6'«, t00=0x0056, t01=0x0136}
0x87a0…87d0 Head {h00=0x002c, h01=0x0050, text=»KWFMTLNG BIN W'255' FORMATRECORD LENGTH «, t00=0x0056, t01=0x014a}
0x87d0…87fc Head {h00=0x0028, h01=0x0050, text=»KWNRFMT BIN W'100' NUMBER OF FORMATS«, t00=0x0056, t01=0x017a}
0x87fc…8812 Head {h00=0x0012, h01=0x0050, text=»KD1 BCD 2D'1' «, t00=0x0057, t01=0x0016}
0x8812…8840 Head {h00=0x002a, h01=0x0050, text=»KDMAXLGG BCD 2D'4' NUMBER OF LANGUAGES«, t00=0x0057, t01=0x002c}
0x8840…8876 Head {h00=0x0032, h01=0x0050, text=»KDSHIFT BCD D'100' SHIFT TO GET RECORD NUMBER «, t00=0x0057, t01=0x005a}
0x8876…888a Head {h00=0x0010, h01=0x0050, text=»NDDATE BCD 8«, t00=0x0057, t01=0x0090}
0x888a…889e Head {h00=0x0010, h01=0x0050, text=»NDTIME BCD 8«, t00=0x0057, t01=0x00a4}
0x889e…88b4 Head {h00=0x0012, h01=0x0050, text=»VCTIME STRG 6 «, t00=0x0057, t01=0x00b8}
0x88b4…8904 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0057, t01=0x00ce}
0x8904…890e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x011e}
0x890e…893e Head {h00=0x002c, h01=0x0050, text=»* COMMON WORK-BLOCK CONTAINING CONSTANTS«, t00=0x0057, t01=0x0128}
0x893e…8948 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0158}
0x8948…8998 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0057, t01=0x0162}
0x8998…89a8 Head {h00=0x000c, h01=0x0050, text=»CK2 BLK «, t00=0x0058, t01=0x0022}
0x89a8…89b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0032}
0x89b2…89e6 Head {h00=0x0030, h01=0x0050, text=»* INDICES IN THE FUNCTION KEYTABLE 'FNCKTB' «, t00=0x0058, t01=0x003c}
0x89e6…89fe Head {h00=0x0014, h01=0x0050, text=»KWSTART BIN W'3'«, t00=0x0058, t01=0x0070}
0x89fe…8a14 Head {h00=0x0012, h01=0x0050, text=»KWEND BIN W'4'«, t00=0x0058, t01=0x0088}
0x8a14…8a2a Head {h00=0x0012, h01=0x0050, text=»KWEOI BIN W'1'«, t00=0x0058, t01=0x009e}
0x8a2a…8a42 Head {h00=0x0014, h01=0x0050, text=»KWCONT BIN W'20'«, t00=0x0058, t01=0x00b4}
0x8a42…8a5c Head {h00=0x0016, h01=0x0050, text=»KWCANCEL BIN W'19'«, t00=0x0058, t01=0x00cc}
0x8a5c…8a76 Head {h00=0x0016, h01=0x0050, text=»KWCLEAR BIN W'21' «, t00=0x0058, t01=0x00e6}
0x8a76…8aa8 Head {h00=0x002e, h01=0x0050, text=»* LENGTH OF THE FUNCTION KEYTABLE 'FNCKTB'«, t00=0x0058, t01=0x0100}
0x8aa8…8ade Head {h00=0x0032, h01=0x0050, text=»KWAPLKTB BIN W'24' LENGTH OF FUNCTION KEYTABLE«, t00=0x0058, t01=0x0132}
0x8ade…8b12 Head {h00=0x0030, h01=0x0050, text=»* INDICES IN THE SCREEN-MANAGEMENT KEYTABLES«, t00=0x0058, t01=0x0168}
0x8b12…8b2a Head {h00=0x0014, h01=0x0050, text=»KWSPEOI BIN W'3'«, t00=0x0059, t01=0x000c}
0x8b2a…8b44 Head {h00=0x0016, h01=0x0050, text=»KWSPCANC BIN W'4' «, t00=0x0059, t01=0x0024}
0x8b44…8b5e Head {h00=0x0016, h01=0x0050, text=»KWSPCONT BIN W'17'«, t00=0x0059, t01=0x003e}
0x8b5e…8b76 Head {h00=0x0014, h01=0x0050, text=»KWSPCLR BIN W'1'«, t00=0x0059, t01=0x0058}
0x8b76…8baa Head {h00=0x0030, h01=0x0050, text=»* LENGTHS OF THE SCREEN-MANAGEMENT KEYTABLES«, t00=0x0059, t01=0x0070}
0x8baa…8bd8 Head {h00=0x002a, h01=0x0050, text=»KWSPKTB BIN W'21' LENGTH OF SPKTAB1/2 «, t00=0x0059, t01=0x00a4}
0x8bd8…8c04 Head {h00=0x0028, h01=0x0050, text=»KWSPKTB3 BIN W'12' LENGTH OF SPKTAB3«, t00=0x0059, t01=0x00d2}
0x8c04…8c34 Head {h00=0x002c, h01=0x0050, text=»* 6371 PRINTER PARAMETERS FOR DEMO TP71 «, t00=0x0059, t01=0x00fe}
0x8c34…8c54 Head {h00=0x001c, h01=0x0050, text=»KCPRTPAR STRGI (21), C «, t00=0x0059, t01=0x012e}
0x8c54…8c8e Head {h00=0x0036, h01=0x0050, text=» 4X'9066',4X'9266',4X'9366',4X'9466',4X'9566', C«, t00=0x0059, t01=0x014e}
0x8c8e…8cc8 Head {h00=0x0036, h01=0x0050, text=» 4X'9666',4X'9766',4X'9966',4X'9866',4X'8066', C«, t00=0x0059, t01=0x0188}
0x8cc8…8d02 Head {h00=0x0036, h01=0x0050, text=» 4X'9166',4X'8066',4X'8055',4X'8044',4X'8044', C«, t00=0x005a, t01=0x0032}
0x8d02…8d3c Head {h00=0x0036, h01=0x0050, text=» 4X'9044',4X'9055',4X'9055',4X'9066',4X'9044', C«, t00=0x005a, t01=0x006c}
0x8d3c…8d4e Head {h00=0x000e, h01=0x0050, text=» 4X'9A66'«, t00=0x005a, t01=0x00a6}
0x8d4e…8d9e Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x005a, t01=0x00b8}
0x8d9e…8da8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0108}
0x8da8…8dd2 Head {h00=0x0026, h01=0x0050, text=»* MISCELANEOUS RESERVED VARIABLES «, t00=0x005a, t01=0x0112}
0x8dd2…8ddc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x013c}
0x8ddc…8e2c Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x005a, t01=0x0146}
0x8e2c…8e3c Head {h00=0x000c, h01=0x0050, text=»UQQ BLK «, t00=0x005b, t01=0x0008}
0x8e3c…8e46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0018}
0x8e46…8e6e Head {h00=0x0024, h01=0x0050, text=»* VARIABLES RESERVED FOR SPAPPL «, t00=0x005b, t01=0x0022}
0x8e6e…8e9c Head {h00=0x002a, h01=0x0050, text=»NWRETCDE BIN W'0' RETURN CODE (SPAPPL)«, t00=0x005b, t01=0x004a}
0x8e9c…8ebe Head {h00=0x001e, h01=0x0050, text=»* SWITCHES USED BY XAKBIN «, t00=0x005b, t01=0x0078}
0x8ebe…8ef0 Head {h00=0x002e, h01=0x0050, text=»SBNOWAIT BOOL FALSE NOWAIT OPTION (XAKBIN)«, t00=0x005b, t01=0x009a}
0x8ef0…8f12 Head {h00=0x001e, h01=0x0050, text=»* SWITCHES USED BY DPECCY «, t00=0x005b, t01=0x00cc}
0x8f12…8f4a Head {h00=0x0034, h01=0x0050, text=»SBEOI BOOL FALSE AMT. QUOTED IN SY.CCY (DPECCY) «, t00=0x005b, t01=0x00ee}
0x8f4a…8f7e Head {h00=0x0030, h01=0x0050, text=»SBCCYIN BOOL FALSE CURRENCY BUYING (DPECCY) «, t00=0x005b, t01=0x0126}
0x8f7e…8fb4 Head {h00=0x0032, h01=0x0050, text=»SBCCYKTB BOOL FALSE USE CCY KEYTABLE (DPECCY) «, t00=0x005b, t01=0x015a}
0x8fb4…8fd6 Head {h00=0x001e, h01=0x0050, text=»* SWITCHES USED BY DKDSTM «, t00=0x005b, t01=0x0190}
0x8fd6…900e Head {h00=0x0034, h01=0x0050, text=»SBFIRST BOOL FALSE DISPLAY TRANS. DATE (DKDSTM) «, t00=0x005c, t01=0x0022}
0x900e…9046 Head {h00=0x0034, h01=0x0050, text=»SBDSDEP BOOL FALSE TRANS. IS A DEPOSIT (DKDSTM) «, t00=0x005c, t01=0x005a}
0x9046…9080 Head {h00=0x0036, h01=0x0050, text=»SBDSWDR BOOL FALSE TRANS. IS A WITHDRAW. (DKDSTM) «, t00=0x005c, t01=0x0092}
0x9080…90b8 Head {h00=0x0034, h01=0x0050, text=»SBDSRVS BOOL FALSE TRANS. IS A REVERSAL (DKDSTM)«, t00=0x005c, t01=0x00cc}
0x90b8…90f0 Head {h00=0x0034, h01=0x0050, text=»SBDSTRF BOOL FALSE TRANS. IS A TRANSFER (DKDSTM)«, t00=0x005c, t01=0x0104}
0x90f0…9112 Head {h00=0x001e, h01=0x0050, text=»* VARIABLES USED BY ZDSCIO«, t00=0x005c, t01=0x013c}
0x9112…913c Head {h00=0x0026, h01=0x0050, text=»NWXSTAT BIN EXTENDED STATUS CODE «, t00=0x005c, t01=0x015e}
0x913c…9168 Head {h00=0x0028, h01=0x0050, text=»NWRECLNG BIN RECORD LENGTH (ZDSCIO)«, t00=0x005c, t01=0x0188}
0x9168…9180 Head {h00=0x0014, h01=0x0050, text=»MAXOUT BIN W'50'«, t00=0x005d, t01=0x0024}
0x9180…91ac Head {h00=0x0028, h01=0x0050, text=»CASMAX BIN W'4' MAX NO. OF CASSETTES«, t00=0x005d, t01=0x003c}
0x91ac…91c0 Head {h00=0x0010, h01=0x0050, text=»KW7 BIN W'7'«, t00=0x005d, t01=0x0068}
0x91c0…91c8 Head {h00=0x0004, h01=0x0050, t00=0x005d, t01=0x007c}
0x91c8…91dc Head {h00=0x0010, h01=0x0050, text=»KW8 BIN W'8'«, t00=0x005d, t01=0x0084}
0x91dc…91f0 Head {h00=0x0010, h01=0x0050, text=»KW9 BIN W'9'«, t00=0x005d, t01=0x0098}
0x91f0…9224 Head {h00=0x0030, h01=0x0050, text=»NDLRN1 BCD 12 LOGICAL RECORD NUMBER (ZDSCIO)«, t00=0x005d, t01=0x00ac}
0x9224…9258 Head {h00=0x0030, h01=0x0050, text=»NDLRN2 BCD 12 LOGICAL RECORD NUMBER (ZDSCIO)«, t00=0x005d, t01=0x00e0}
0x9258…9286 Head {h00=0x002a, h01=0x0050, text=»NDLRN3 BCD 12 LOGICAL REC.NR. (ZDSCIO)«, t00=0x005d, t01=0x0114}
0x9286…92a2 Head {h00=0x0018, h01=0x0050, text=»NDRCID BCD 6D'65535'«, t00=0x005d, t01=0x0142}
0x92a2…92dc Head {h00=0x0036, h01=0x0050, text=»SBNOCOPY BOOL FALSE COPY NOT FROM/TO UWB (ZDSCIO) «, t00=0x005d, t01=0x015e}
0x92dc…9316 Head {h00=0x0036, h01=0x0050, text=»SBRECAVB BOOL FALSE REC.AVAIL. AFTER READ (ZDSCIO)«, t00=0x005e, t01=0x0008}
0x9316…9366 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x005e, t01=0x0042}
0x9366…9374 Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x005e, t01=0x0092}
0x9374…937e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x00a0}
0x937e…9388 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x00aa}
0x9388…9394 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x005e, t01=0x00b4}
0x9394…9398 Head {h00=0x4004, h01=0x0000}
0x9398…939c 00 5e 00 c0 ┆ ^ ┆
0x939c…93a4 (95, 1, 8) 20 04 00 00 00 5f 00 04 ┆ _ ┆
0x93a4…93f4 (96, 0, 400) 53 45 43 54 4f 52 20 4e 55 4d 42 45 52 3a 3b 20 50 4f 53 49 54 49 4f 4e 3a 3b 48 45 58 2e 56 41 4c 55 45 3a 3b 20 46 49 4c 45 20 4f 52 47 3a 3b 56 4f 4c 55 4d 45 20 4e 41 4d 45 20 44 45 53 54 2e 20 44 49 53 43 3a 3b 2a 2a 2a 49 4e 50 55 54 ┆SECTOR NUMBER:; POSITION:;HEX.VALUE:; FILE ORG:;VOLUME NAME DEST. DISC:;***INPUT┆
0x93f4…9444 20 44 45 46 49 4e 49 54 49 4f 4e 2a 2a 2a 3b 20 2a 2a 2a 4f 55 54 50 55 54 20 44 45 46 49 4e 49 54 49 4f 4e 2a 2a 2a 3b 50 41 43 4b 3a 3b 4f 55 54 50 55 54 20 44 45 56 49 43 45 3a 3b 20 4c 41 42 45 4c 4c 45 44 20 54 41 50 45 3a 3b 20 53 45 ┆ DEFINITION***; ***OUTPUT DEFINITION***;PACK:;OUTPUT DEVICE:; LABELLED TAPE:; SE┆
0x9444…9494 51 2e 20 4e 55 4d 42 45 52 20 49 4e 50 55 54 20 54 41 50 45 3a 3b 53 45 51 2e 20 4e 55 4d 42 45 52 20 4f 55 54 50 55 54 20 54 41 50 45 3a 3b 20 42 4c 4f 43 4b 20 46 41 43 54 4f 52 20 49 4e 50 55 54 20 54 41 50 45 3a 3b 20 42 4c 4f 43 4b 20 ┆Q. NUMBER INPUT TAPE:;SEQ. NUMBER OUTPUT TAPE:; BLOCK FACTOR INPUT TAPE:; BLOCK ┆
0x9494…94e4 46 41 43 54 4f 52 20 4f 55 54 50 55 54 20 54 41 50 45 3a 3b 54 41 50 45 20 56 4f 4c 55 4d 45 20 49 44 3a 3b 52 45 43 4f 52 44 20 4c 49 4d 49 54 53 3a 3b 20 50 52 49 4e 54 20 46 4f 52 4d 41 54 3a 3b 52 45 43 4f 52 44 20 4b 45 59 53 20 49 4e ┆FACTOR OUTPUT TAPE:;TAPE VOLUME ID:;RECORD LIMITS:; PRINT FORMAT:;RECORD KEYS IN┆
0x94e4…9534 20 4c 49 53 54 49 4e 47 3a 3b 43 48 41 52 41 43 54 45 52 20 43 4f 44 45 3a 3b 50 52 4f 47 52 41 4d 20 4c 45 4e 47 54 48 3a 3b 4d 4f 4e 49 54 4f 52 20 4e 55 4d 42 45 52 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ LISTING:;CHARACTER CODE:;PROGRAM LENGTH:;MONITOR NUMBER ┆
0x9534…9584 (97, 0, 400) 3a 3b 53 54 41 52 54 20 53 57 49 54 43 48 20 4f 4e 20 53 4f 50 3a 3b 20 4d 4f 52 45 20 54 48 41 4e 20 4f 4e 45 20 41 50 50 4c 49 43 41 54 49 4f 4e 20 3a 3b 44 41 54 41 20 53 45 54 20 4e 41 4d 45 3a 3b 20 42 4f 45 2d 53 45 43 54 4f 52 3a 3b ┆:;START SWITCH ON SOP:; MORE THAN ONE APPLICATION :;DATA SET NAME:; BOE-SECTOR:;┆
0x9584…95d4 45 4f 45 2d 53 45 43 54 4f 52 3a 3b 45 58 50 49 52 41 54 49 4f 4e 20 44 41 54 45 3a 3b 20 56 4f 4c 55 4d 45 20 49 4e 49 54 49 41 4c 49 5a 41 54 49 4f 4e 3a 3b 20 44 41 54 41 53 45 54 20 4e 55 4d 42 45 52 3a 3b 4e 55 4d 42 45 52 20 4f 46 20 ┆EOE-SECTOR:;EXPIRATION DATE:; VOLUME INITIALIZATION:; DATASET NUMBER:;NUMBER OF ┆
0x95d4…9624 49 4e 44 45 58 20 46 49 4c 45 53 3a 3b 20 4b 45 59 20 41 44 44 52 45 53 53 20 57 49 54 48 49 4e 20 44 41 54 41 20 52 45 43 4f 52 44 3a 3b 4b 45 59 20 4c 45 4e 47 54 48 20 49 4e 20 44 41 54 41 20 52 45 43 4f 52 44 3a 3b 20 52 45 43 4f 52 44 ┆INDEX FILES:; KEY ADDRESS WITHIN DATA RECORD:;KEY LENGTH IN DATA RECORD:; RECORD┆
0x9624…9674 20 4c 45 4e 47 54 48 20 49 4e 50 55 54 20 54 41 50 45 3a 3b 4c 4f 41 44 20 46 41 43 54 4f 52 3a 3b 20 49 4e 44 45 58 20 46 49 4c 45 20 4e 41 4d 45 3a 3b 20 4d 41 53 54 45 52 20 49 4e 44 45 58 20 46 49 4c 45 20 4e 41 4d 45 3a 3b 49 4e 50 55 ┆ LENGTH INPUT TAPE:;LOAD FACTOR:; INDEX FILE NAME:; MASTER INDEX FILE NAME:;INPU┆
0x9674…96c4 54 20 44 45 56 49 43 45 3a 3b 50 54 53 20 36 38 37 36 20 44 49 53 43 20 3a 3b 4d 41 58 20 4e 4f 20 4f 46 20 52 45 43 4f 52 44 53 20 4f 4e 20 4f 55 54 50 55 54 20 49 4e 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆T DEVICE:;PTS 6876 DISC :;MAX NO OF RECORDS ON OUTPUT IN ┆
0x96c4…9714 (98, 0, 400) 44 45 58 20 46 49 4c 45 3a 3b 53 55 42 2d 4b 45 59 20 41 44 44 52 45 53 53 45 53 20 49 4e 20 52 45 43 4f 52 44 3a 3b 20 53 55 42 2d 4b 45 59 20 4c 45 4e 47 54 48 53 20 49 4e 20 52 45 43 4f 52 44 3a 3b 20 2a 2a 2a 57 4f 52 4b 20 46 49 4c 45 ┆DEX FILE:;SUB-KEY ADDRESSES IN RECORD:; SUB-KEY LENGTHS IN RECORD:; ***WORK FILE┆
0x9714…9764 20 44 45 46 49 4e 49 54 49 4f 4e 2a 2a 2a 3b 20 57 4f 52 4b 20 46 49 4c 45 20 4e 41 4d 45 3a 3b 53 4f 52 54 49 4e 47 20 49 4e 20 41 53 43 45 4e 44 49 4e 47 20 4f 52 44 45 52 3a 3b 52 45 4f 52 47 41 4e 49 5a 45 20 44 49 53 43 3a 3b 20 44 49 ┆ DEFINITION***; WORK FILE NAME:;SORTING IN ASCENDING ORDER:;REORGANIZE DISC:; DI┆
0x9764…97b4 53 43 20 56 45 52 53 49 4f 4e 3a 3b 49 4e 44 45 58 20 56 4f 4c 55 4d 45 20 4e 41 4d 45 3a 3b 20 20 20 44 55 50 4c 2e 20 41 4c 4c 4f 57 45 44 3a 20 3b 20 20 43 4f 4e 44 2e 20 49 4e 44 45 58 3a 20 3b 20 20 45 58 50 2e 20 54 59 50 45 3a 3b 20 ┆SC VERSION:;INDEX VOLUME NAME:; DUPL. ALLOWED: ; COND. INDEX: ; EXP. TYPE:; ┆
0x97b4…9804 20 20 43 4f 4e 44 20 49 54 45 4d 20 44 49 53 50 4c 2e 3a 3b 20 20 43 4f 4e 44 20 49 54 45 4d 20 56 41 4c 55 45 3a 3b 20 20 20 20 20 49 54 45 4d 20 44 49 53 50 4c 2e 3a 3b 20 20 20 20 20 49 54 45 4d 20 4c 45 4e 47 54 48 3a 3b 20 49 4e 44 45 ┆ COND ITEM DISPL.:; COND ITEM VALUE:; ITEM DISPL.:; ITEM LENGTH:; INDE┆
0x9804…9854 58 20 46 49 4c 45 20 4c 45 4e 47 54 48 3a 3b 20 2a 2a 2a 20 49 4e 44 45 58 20 44 45 53 43 52 49 50 54 49 4f 4e 20 2a 2a 2a 3b 2a 2a 2a 20 4b 45 59 20 44 45 53 43 52 49 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆X FILE LENGTH:; *** INDEX DESCRIPTION ***;*** KEY DESCRI ┆
0x9854…98a4 (99, 0, 400) 50 54 49 4f 4e 20 2a 2a 2a 3b 54 45 53 54 49 4e 47 20 4d 45 54 48 4f 44 20 28 49 2f 41 2f 51 29 3a 3b 43 41 4c 43 55 4c 41 54 49 4f 4e 53 20 4f 46 20 4e 4f 2e 20 4f 46 20 55 53 45 44 20 52 45 43 4f 52 44 53 20 41 4e 44 20 46 49 4c 4c 49 4e ┆PTION ***;TESTING METHOD (I/A/Q):;CALCULATIONS OF NO. OF USED RECORDS AND FILLIN┆
0x98a4…98f4 47 20 44 45 47 52 45 45 3a 3b 4e 45 57 20 46 49 4c 45 20 4e 41 4d 45 3a 3b 20 44 49 53 43 20 44 45 56 49 43 45 20 20 3a 20 3b 54 41 50 45 20 44 45 56 49 43 45 20 20 3a 3b 20 45 58 54 45 4e 53 49 4f 4e 20 53 49 5a 45 20 3a 3b 20 46 55 4e 43 ┆G DEGREE:;NEW FILE NAME:; DISC DEVICE : ;TAPE DEVICE :; EXTENSION SIZE :; FUNC┆
0x98f4…9944 54 49 4f 4e 20 3a 3b 20 20 20 55 53 41 47 45 20 3a 3b 55 53 41 47 45 20 3a 3b 56 4f 4c 55 4d 45 20 4e 41 4d 45 20 4f 46 20 57 4f 52 4b 46 49 4c 45 3a 3b 20 41 4c 4c 20 49 4e 44 49 43 45 53 3a 3b 20 4c 4f 47 20 46 49 4c 45 20 56 4f 4c 55 4d ┆TION :; USAGE :;USAGE :;VOLUME NAME OF WORKFILE:; ALL INDICES:; LOG FILE VOLUM┆
0x9944…9994 45 20 4e 41 4d 45 3a 3b 4c 4f 57 45 52 20 52 45 43 4f 52 44 20 4c 49 4d 49 54 3a 3b 55 50 50 45 52 20 52 45 43 4f 52 44 20 4c 49 4d 49 54 3a 3b 44 49 53 43 20 4e 4f 54 20 4f 50 45 52 41 42 4c 45 3b 42 41 44 53 50 4f 54 20 4f 4e 20 53 59 53 ┆E NAME:;LOWER RECORD LIMIT:;UPPER RECORD LIMIT:;DISC NOT OPERABLE;BADSPOT ON SYS┆
0x9994…99e4 54 45 4d 20 41 52 45 41 2e 20 44 49 53 43 20 4e 4f 54 20 55 53 45 41 42 4c 45 3b 20 4d 4f 52 45 20 54 48 41 4e 20 31 38 20 42 41 44 53 50 4f 54 53 2e 44 49 53 43 20 4e 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆TEM AREA. DISC NOT USEABLE; MORE THAN 18 BADSPOTS.DISC N ┆
0x99e4…9a34 (100, 0, 400) 4f 54 20 55 53 41 42 4c 45 3b 44 49 53 43 20 49 2f 4f 20 45 52 52 4f 52 2e 3b 50 52 49 4e 54 45 52 20 4e 4f 54 20 4f 50 45 52 41 42 4c 45 3b 20 54 4f 4f 20 4d 41 4e 59 20 53 45 43 54 4f 52 53 20 49 4e 20 46 49 4c 45 3b 20 44 49 53 43 20 4f ┆OT USABLE;DISC I/O ERROR.;PRINTER NOT OPERABLE; TOO MANY SECTORS IN FILE; DISC O┆
0x9a34…9a84 56 45 52 46 4c 4f 57 3b 54 4f 4f 20 4d 41 4e 59 20 45 58 54 45 4e 54 53 20 4e 45 45 44 45 44 3b 49 4c 4c 45 47 41 4c 20 42 4c 4f 43 4b 20 4c 45 4e 47 54 48 3b 20 56 54 4f 43 20 4f 56 45 52 46 4c 4f 57 3b 4e 4f 20 46 52 45 45 20 53 50 41 43 ┆VERFLOW;TOO MANY EXTENTS NEEDED;ILLEGAL BLOCK LENGTH; VTOC OVERFLOW;NO FREE SPAC┆
0x9a84…9ad4 45 20 45 4e 54 52 59 20 41 56 41 49 4c 41 42 4c 45 3b 46 49 4c 45 20 4e 41 4d 45 20 41 4c 52 45 41 44 59 20 55 53 45 44 3b 20 4e 4f 20 54 4f 53 53 20 44 49 53 43 20 46 4f 52 4d 41 54 3b 54 41 50 45 20 55 4e 49 54 20 4e 4f 54 20 4f 50 45 52 ┆E ENTRY AVAILABLE;FILE NAME ALREADY USED; NO TOSS DISC FORMAT;TAPE UNIT NOT OPER┆
0x9ad4…9b24 41 42 4c 45 3b 20 4f 55 54 50 55 54 20 44 49 53 43 20 4e 4f 54 20 45 4d 50 54 59 3b 46 41 55 4c 54 59 20 52 45 43 4f 52 44 20 4c 45 4e 47 54 48 3b 20 4f 55 54 50 55 54 20 46 49 4c 45 20 4e 4f 54 20 4c 41 52 47 45 20 45 4e 4f 55 47 48 3b 20 ┆ABLE; OUTPUT DISC NOT EMPTY;FAULTY RECORD LENGTH; OUTPUT FILE NOT LARGE ENOUGH; ┆
0x9b24…9b74 4f 55 54 50 55 54 20 46 49 4c 45 20 4e 4f 54 20 45 4d 50 54 59 3b 54 41 50 45 20 55 4e 49 54 20 4e 4f 54 20 4c 4f 43 4b 45 44 2f 4c 4f 41 44 45 44 3b 49 4e 43 4f 52 52 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆OUTPUT FILE NOT EMPTY;TAPE UNIT NOT LOCKED/LOADED;INCORR ┆