|
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: 7628 (0x1dcc)
Notes: pts_type(SC)
Names: »DIQACT.SC«
└─⟦35fda6e03⟧ Bits:30009701 Philips computer tape "BARCLAY"
└─⟦this⟧ »DEMO6800/DIQACT.SC«
└─⟦e276fd206⟧ Bits:30009696 Philips computer tape "600413"
└─⟦this⟧ »DEMO6800/DIQACT.SC«
IDENT DIQACT INQUIRE ACCOUNT DDUM DEMODD PDIV ENTRY DIQACT INQUIRE ACCOUNT EXPROC PAJRN EXPROC QFLTRS EXPROC XBFMT EXPROC XEERR EXPROC ZCRDD EXPROC ZDRWRD *********************************************************************** * PROCEDURE NAME :* * DIQACT* * FUNCTIONAL DESCRIPTION :* * THIS PROCEDURE DISPLAYS A SPECIFIED ACCOUNT RECORD* * AND IF REQUIRED UP TO THE LAST EIGHT TRANSACTIONS * * ACTIONS :* * - PRINT JOURNAL-ROLL* * - UPDATE LAST TRANSACTION SEQUENCE NUMBER* * - DISPLAY ACCOUNT RECORD ( RECORD ALREADY IN UA1-* * WORKBLOCK); * THE OPERATOR CAN REQUEST TRANSACTION INQUIRY; * TRS.INQ. : READ LAST OR PREVIOUS TRANSACTION-* * RECORD INTO UT2* * DISPLAY TRANSACTIONRECORD* * OPERATOR MUST ANSWER : CONTINUE ,* * END-OF-ITEM OR CANCEL* * NO TRS. INQ. : REWRITE ACCOUNTRECORD* * RETURN* * CANCEL : RETURN * PROCEDURES USED :* * PAJRN PRINT JOURNAL-ROLL* * QFLTRS PREVIOUS TRANSACTIONNUMBER * * XBFMT SCREEN-CONTROL* * XEERR DISPLAY ERRORR-MESSAGE* * ZCRDD READ DATABASE* * ZDRWRD WRITE DATABASE* ************************************************************************ DIQACT PROC DI000 SET SBQACT PERF PAJRN,=W'1' MOVE TDTRSCDE,=D'70' PERF PAJRN,=W'2' DI100 MOVE IDNR1,=D'1' INIT OPERATOR ANSWER
0x0000…0034 (0, 0, 398) Head {h00=0x0030, h01=0x0050, text=» IDENT DIQACT INQUIRE ACCOUNT «, t00=0x0000, t01=0x0004}
0x0034…0084 Head {h00=0x004c, h01=0x0050, text=» DDUM DEMODD «, t00=0x0000, t01=0x0038}
0x0084…00d4 Head {h00=0x004c, h01=0x0050, text=» PDIV «, t00=0x0000, t01=0x0088}
0x00d4…0124 Head {h00=0x004c, h01=0x0050, text=» ENTRY DIQACT INQUIRE ACCOUNT «, t00=0x0000, t01=0x00d8}
0x0124…0178 Head {h00=0x0050, h01=0x0050, text=» EXPROC PAJRN «, t00=0x0000, t01=0x0128}
0x0178…018e Head {h00=0x0012, h01=0x0050, text=» EXPROC QFLTRS«, t00=0x0000, t01=0x017c}
0x018e…01e2 (1, 0, 400) Head {h00=0x0050, h01=0x0050, text=» EXPROC XBFMT «, t00=0x0001, t01=0x0004}
0x01e2…0236 Head {h00=0x0050, h01=0x0050, text=» EXPROC XEERR «, t00=0x0001, t01=0x0058}
0x0236…028a Head {h00=0x0050, h01=0x0050, text=» EXPROC ZCRDD «, t00=0x0001, t01=0x00ac}
0x028a…02de Head {h00=0x0050, h01=0x0050, text=» EXPROC ZDRWRD «, t00=0x0001, t01=0x0100}
0x02de…032e Head {h00=0x004c, h01=0x0050, text=»********************************************************************** *«, t00=0x0001, t01=0x0154}
0x032e…037e Head {h00=0x004c, h01=0x0050, text=»* PROCEDURE NAME : *«, t00=0x0002, t01=0x0014}
0x037e…03ce Head {h00=0x004c, h01=0x0050, text=»* DIQACT *«, t00=0x0002, t01=0x0064}
0x03ce…041e Head {h00=0x004c, h01=0x0050, text=»* FUNCTIONAL DESCRIPTION : *«, t00=0x0002, t01=0x00b4}
0x041e…046e Head {h00=0x004c, h01=0x0050, text=»* THIS PROCEDURE DISPLAYS A SPECIFIED ACCOUNT RECORD *«, t00=0x0002, t01=0x0104}
0x046e…04c0 Head {h00=0x004e, h01=0x0050, text=»* AND IF REQUIRED UP TO THE LAST EIGHT TRANSACTIONS * «, t00=0x0002, t01=0x0154}
0x04c0…0510 Head {h00=0x004c, h01=0x0050, text=»* ACTIONS : *«, t00=0x0003, t01=0x0016}
0x0510…0560 Head {h00=0x004c, h01=0x0050, text=»* - PRINT JOURNAL-ROLL *«, t00=0x0003, t01=0x0066}
0x0560…05b0 Head {h00=0x004c, h01=0x0050, text=»* - UPDATE LAST TRANSACTION SEQUENCE NUMBER *«, t00=0x0003, t01=0x00b6}
0x05b0…0600 Head {h00=0x004c, h01=0x0050, text=»* - DISPLAY ACCOUNT RECORD ( RECORD ALREADY IN UA1- *«, t00=0x0003, t01=0x0106}
0x0600…0628 Head {h00=0x0024, h01=0x0050, text=»* WORKBLOCK);«, t00=0x0003, t01=0x0156}
0x0628…0672 Head {h00=0x0046, h01=0x0050, text=»* THE OPERATOR CAN REQUEST TRANSACTION INQUIRY;«, t00=0x0003, t01=0x017e}
0x0672…06c2 Head {h00=0x004c, h01=0x0050, text=»* TRS.INQ. : READ LAST OR PREVIOUS TRANSACTION- *«, t00=0x0004, t01=0x0038}
0x06c2…0712 Head {h00=0x004c, h01=0x0050, text=»* RECORD INTO UT2 *«, t00=0x0004, t01=0x0088}
0x0712…0762 Head {h00=0x004c, h01=0x0050, text=»* DISPLAY TRANSACTIONRECORD *«, t00=0x0004, t01=0x00d8}
0x0762…07b2 Head {h00=0x004c, h01=0x0050, text=»* OPERATOR MUST ANSWER : CONTINUE , *«, t00=0x0004, t01=0x0128}
0x07b2…0802 Head {h00=0x004c, h01=0x0050, text=»* END-OF-ITEM OR CANCEL *«, t00=0x0004, t01=0x0178}
0x0802…0854 Head {h00=0x004e, h01=0x0050, text=»* NO TRS. INQ. : REWRITE ACCOUNTRECORD * «, t00=0x0005, t01=0x0038}
0x0854…08a4 Head {h00=0x004c, h01=0x0050, text=»* RETURN *«, t00=0x0005, t01=0x008a}
0x08a4…08d4 Head {h00=0x002c, h01=0x0050, text=»* CANCEL : RETURN «, t00=0x0005, t01=0x00da}
0x08d4…0924 Head {h00=0x004c, h01=0x0050, text=»* PROCEDURES USED : *«, t00=0x0005, t01=0x010a}
0x0924…0974 Head {h00=0x004c, h01=0x0050, text=»* PAJRN PRINT JOURNAL-ROLL *«, t00=0x0005, t01=0x015a}
0x0974…09c4 Head {h00=0x004c, h01=0x0050, text=»* QFLTRS PREVIOUS TRANSACTIONNUMBER *«, t00=0x0006, t01=0x001a}
0x09c4…0a14 Head {h00=0x004c, h01=0x0050, text=»* XBFMT SCREEN-CONTROL *«, t00=0x0006, t01=0x006a}
0x0a14…0a64 Head {h00=0x004c, h01=0x0050, text=»* XEERR DISPLAY ERRORR-MESSAGE *«, t00=0x0006, t01=0x00ba}
0x0a64…0ab4 Head {h00=0x004c, h01=0x0050, text=»* ZCRDD READ DATABASE *«, t00=0x0006, t01=0x010a}
0x0ab4…0b04 Head {h00=0x004c, h01=0x0050, text=»* ZDRWRD WRITE DATABASE *«, t00=0x0006, t01=0x015a}
0x0b04…0b54 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0007, t01=0x001a}
0x0b54…0ba4 Head {h00=0x004c, h01=0x0050, text=»DIQACT PROC «, t00=0x0007, t01=0x006a}
0x0ba4…0bf4 Head {h00=0x004c, h01=0x0050, text=»DI000 «, t00=0x0007, t01=0x00ba}
0x0bf4…0c44 Head {h00=0x004c, h01=0x0050, text=» SET SBQACT «, t00=0x0007, t01=0x010a}
0x0c44…0c94 Head {h00=0x004c, h01=0x0050, text=» PERF PAJRN,=W'1' «, t00=0x0007, t01=0x015a}
0x0c94…0ce4 Head {h00=0x004c, h01=0x0050, text=» «, t00=0x0008, t01=0x001a}
0x0ce4…0d34 Head {h00=0x004c, h01=0x0050, text=» MOVE TDTRSCDE,=D'70' «, t00=0x0008, t01=0x006a}
0x0d34…0d84 Head {h00=0x004c, h01=0x0050, text=» PERF PAJRN,=W'2' «, t00=0x0008, t01=0x00ba}
0x0d84…0dd4 Head {h00=0x004c, h01=0x0050, text=»DI100 «, t00=0x0008, t01=0x010a}
0x0dd4…0e02 Head {h00=0x002a, h01=0x0050, text=» MOVE IDNR1,=D'1' INIT OPERATOR ANSWER«, t00=0x0008, t01=0x015a}
0x0e02…0e06 Head {h00=0x0054, h01=0x0050}
0x0e06…0e0a Head {h00=0x5c50, h01=0x4552}
0x0e0a…0e0e 46 5c 58 42 ┆F XB┆
0x0e0e…0e5e (9, 0, 400) 46 4d 54 2c 3d 57 27 34 36 27 5c 49 4e 51 55 49 52 45 20 41 43 43 4f 55 4e 54 20 46 4f 52 4d 41 54 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 08 01 88 00 4c 00 50 ┆FMT,=W'46' INQUIRE ACCOUNT FORMAT L P┆
0x0e5e…0eae 5c 54 42 54 5c 53 42 43 41 4e 43 45 4c 2c 44 49 39 30 30 5c 43 41 4e 43 45 4c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 09 00 50 00 06 00 50 ┆ TBT SBCANCEL,DI900 CANCEL P P┆
0x0eae…0efe 2a 20 00 09 00 a0 00 3e 00 50 2a 20 49 46 20 49 44 4e 52 31 20 3d 20 31 20 54 48 45 4e 20 4c 41 53 54 20 54 52 41 4e 53 41 43 54 49 4f 4e 20 49 4e 51 55 49 52 59 20 49 53 20 52 45 51 55 45 53 54 45 44 20 00 09 00 aa 00 06 00 50 2a 20 00 09 ┆* > P* IF IDNR1 = 1 THEN LAST TRANSACTION INQUIRY IS REQUESTED P* ┆
0x0efe…0f4e 00 ec 00 22 00 50 5c 43 42 45 5c 49 44 4e 52 31 2c 3d 44 27 30 27 2c 44 49 38 30 30 5c 52 45 54 55 52 4e 20 00 09 00 f6 00 06 00 50 2a 20 00 09 01 1c 00 1a 00 50 2a 20 54 52 41 4e 53 41 43 54 49 4f 4e 20 49 4e 51 55 49 52 59 20 00 09 01 26 ┆ " P CBE IDNR1,=D'0',DI800 RETURN P* P* TRANSACTION INQUIRY &┆
0x0f4e…0f9e 00 06 00 50 2a 20 00 09 01 44 00 4c 00 50 44 49 32 30 30 5c 5c 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ P* D L PDI200 ┆
0x0f9e…0fee (10, 0, 400) 00 00 00 00 00 00 00 09 01 4e 00 4c 00 50 5c 4d 4f 56 45 5c 54 44 54 52 53 43 44 45 2c 3d 44 27 37 31 27 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ N L P MOVE TDTRSCDE,=D'71' ┆
0x0fee…103e 00 00 00 00 00 00 00 0a 00 0e 00 06 00 50 2a 20 00 0a 00 5e 00 28 00 50 2a 20 54 44 55 4d 4d 59 20 49 53 20 55 53 45 44 20 41 53 20 41 20 57 4f 52 4b 46 49 45 4c 44 20 48 45 52 45 00 0a 00 68 00 06 00 50 2a 20 00 0a 00 94 00 4c 00 50 5c 4d ┆ P* ^ ( P* TDUMMY IS USED AS A WORKFIELD HERE h P* L P M┆
0x103e…108e 4f 56 45 5c 54 44 55 4d 4d 59 2c 41 44 4c 41 53 54 52 53 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0a 00 9e 00 4c 00 50 44 49 ┆OVE TDUMMY,ADLASTRS L PDI┆
0x108e…10de 33 30 30 5c 5c 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0a 00 ee 00 4c 00 50 5c 4d ┆300 L P M┆
0x10de…112e 4f 56 45 5c 55 44 54 52 53 52 4e 52 2c 41 44 41 43 54 52 4e 52 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0a 01 3e 00 4c 00 50 5c 41 ┆OVE UDTRSRNR,ADACTRNR > L P A┆
0x112e…117e (11, 0, 400) 44 44 5c 55 44 54 52 53 52 4e 52 2c 54 44 55 4d 4d 59 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0a 01 8e 00 4c 00 50 5c 50 ┆DD UDTRSRNR,TDUMMY L P P┆
0x117e…11ce 45 52 46 5c 5a 43 52 44 44 2c 55 44 54 52 53 52 4e 52 2c 4e 44 4c 52 4e 32 2c 4b 57 31 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0b 00 4e 00 18 00 50 5c 54 ┆ERF ZCRDD,UDTRSRNR,NDLRN2,KW1 N P T┆
0x11ce…121e 42 54 5c 53 42 43 41 4e 43 45 4c 2c 44 49 39 30 30 20 00 0b 00 9e 00 4c 00 50 5c 54 42 46 5c 53 42 52 45 43 41 56 42 2c 44 49 37 30 30 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆BT SBCANCEL,DI900 L P TBF SBRECAVB,DI700 ┆
0x121e…126e 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0b 00 ba 00 4c 00 50 44 49 34 30 30 5c 5c 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ L PDI400 ┆
0x126e…12be 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0b 01 0a 00 22 00 50 5c 50 45 52 46 5c 50 41 4a 52 4e 2c 3d 57 27 32 27 5c 4c 49 4e 45 20 54 59 50 45 20 32 20 00 0b 01 5a 00 2a 00 50 5c 4d 4f 56 45 5c 49 44 4e 52 31 2c 3d 44 27 31 ┆ " P PERF PAJRN,=W'2' LINE TYPE 2 Z * P MOVE IDNR1,=D'1┆
0x12be…130e (12, 0, 400) 27 5c 49 4e 49 54 20 4f 50 45 52 41 54 4f 52 20 41 4e 53 57 45 52 00 0b 01 80 00 4c 00 50 5c 50 45 52 46 5c 58 42 46 4d 54 2c 3d 57 27 34 37 27 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆' INIT OPERATOR ANSWER L P PERF XBFMT,=W'47' ┆
0x130e…135e 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0c 00 1e 00 4c 00 50 5c 54 42 54 5c 53 42 43 41 4e 43 45 4c 2c 44 49 39 30 30 5c 43 41 4e 43 45 4c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ L P TBT SBCANCEL,DI900 CANCEL ┆
0x135e…13ae 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0c 00 6e 00 06 00 50 2a 20 00 0c 00 be 00 3c 00 50 2a 20 49 46 20 49 44 4e 52 31 20 3d 20 31 2c 20 54 48 45 4e 20 49 4e 51 55 49 52 59 20 4f 46 20 54 48 45 20 50 52 45 56 ┆ n P* < P* IF IDNR1 = 1, THEN INQUIRY OF THE PREV┆
0x13ae…13fe 49 4f 55 53 20 54 52 41 4e 53 41 43 54 49 4f 4e 00 0c 00 c8 00 16 00 50 2a 20 20 20 20 49 53 20 52 45 51 55 45 53 54 45 44 20 00 0c 01 08 00 06 00 50 2a 20 00 0c 01 22 00 22 00 50 5c 43 42 45 5c 49 44 4e 52 31 2c 3d 44 27 30 27 2c 44 49 38 ┆IOUS TRANSACTION P* IS REQUESTED P* " " P CBE IDNR1,=D'0',DI8┆
0x13fe…144e 30 30 5c 52 45 54 55 52 4e 20 00 0c 01 2c 00 18 00 50 5c 50 45 52 46 5c 51 46 4c 54 52 53 2c 54 44 55 4d 4d 59 20 00 0c 01 52 00 0c 00 50 5c 42 5c 44 49 33 30 30 00 0c 01 6e 00 4c 00 50 44 49 37 30 30 5c 5c 5c 5c 5c 00 00 00 00 00 00 00 00 ┆00 RETURN , P PERF QFLTRS,TDUMMY R P B DI300 n L PDI700 ┆
0x144e…149e (13, 0, 400) 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0c 01 7e 00 4c 00 50 5c 50 45 52 46 5c 58 45 45 52 52 2c 3d 57 27 33 38 27 ┆ ~ L P PERF XEERR,=W'38'┆
0x149e…14ee 2c 4b 57 31 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0d 00 3e 00 4c 00 50 2a 20 20 20 20 20 20 28 20 45 52 52 4f 52 2d 4d 45 53 ┆,KW1 > L P* ( ERROR-MES┆
0x14ee…153e 53 41 47 45 20 3b 20 4e 4f 20 28 4d 4f 52 45 29 20 54 52 41 4e 53 41 43 54 49 4f 4e 53 20 2c 20 41 4e 53 57 45 52 20 4d 55 53 54 20 42 45 00 00 00 00 00 00 00 2a 00 0d 00 8e 00 4c 00 50 2a 20 20 20 20 20 20 20 20 22 43 41 4e 43 45 4c 22 20 ┆SAGE ; NO (MORE) TRANSACTIONS , ANSWER MUST BE * L P* "CANCEL" ┆
0x153e…158e 29 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 2a 00 0d 00 de 00 18 00 50 5c 54 42 54 5c 53 42 43 41 4e 43 45 4c 2c 44 49 39 30 ┆) * P TBT SBCANCEL,DI90┆
0x158e…15de 30 20 00 0d 01 2e 00 4c 00 50 44 49 38 30 30 5c 5c 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆0 . L PDI800 ┆
0x15de…162e (14, 0, 400) 00 00 00 0d 01 4a 00 18 00 50 2a 20 20 20 20 45 4e 44 20 4f 46 20 49 4e 51 55 49 52 59 20 00 0e 00 0a 00 20 00 50 2a 20 20 20 20 20 52 45 57 52 49 54 45 20 41 43 43 4f 55 4e 54 2d 52 45 43 4f 52 44 00 0e 00 26 00 4e 00 50 5c 41 44 44 5c 59 ┆ J P* END OF INQUIRY P* REWRITE ACCOUNT-RECORD & N P ADD Y┆
0x162e…167e 44 4c 41 53 53 45 51 2c 3d 44 27 31 27 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0e 00 4a 00 4c 00 50 5c 4d 4f 56 ┆DLASSEQ,=D'1' J L P MOV┆
0x167e…16ce 45 5c 41 44 4c 41 53 53 45 51 2c 59 44 4c 41 53 53 45 51 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0e 00 9c 00 4c 00 50 5c 4d 4f 56 ┆E ADLASSEQ,YDLASSEQ L P MOV┆
0x16ce…171e 45 5c 54 44 54 52 53 53 45 51 2c 41 44 4c 41 53 53 45 51 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0e 00 ec 00 4c 00 50 5c 50 45 52 ┆E TDTRSSEQ,ADLASSEQ L P PER┆
0x171e…176e 46 5c 5a 44 52 57 52 44 2c 41 44 41 43 54 52 4e 52 2c 4e 44 4c 52 4e 31 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0e 01 3c 00 4c 00 50 44 49 39 30 ┆F ZDRWRD,ADACTRNR,NDLRN1 < L PDI90┆
0x176e…17be (15, 0, 400) 30 5c 5c 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0e 01 8c 00 12 00 50 5c 43 4c 45 ┆0 P CLE┆
0x17be…180e 41 52 5c 53 42 51 41 43 54 20 00 0f 00 4c 00 4c 00 50 5c 52 45 54 5c 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆AR SBQACT L L P RET ┆
0x180e…185e 00 00 00 00 00 00 00 00 00 00 00 0f 00 62 00 4c 00 50 5c 50 45 4e 44 5c 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ b L P PEND ┆
0x185e…18ae 00 00 00 00 00 00 00 00 00 00 00 0f 00 b2 00 4c 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ L P**************************************************************┆
0x18ae…18fe 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 0f 01 02 00 4c 00 50 5c 45 4e 44 5c 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆********** L P END ┆
0x18fe…1914 (16, 2, 22) 00 00 00 00 00 00 00 00 00 00 00 0f 01 52 40 04 00 00 00 10 00 12 ┆ R@ ┆
0x1914…191c (17, 1, 8) 20 04 00 00 00 11 00 04 ┆ ┆
0x191c…196c (18, 0, 400) 00 00 00 00 00 20 00 11 01 4a 00 50 00 50 5c 43 42 47 5c 49 44 4e 52 31 2c 3d 44 27 31 39 39 39 39 27 2c 53 30 36 34 30 30 5c 52 41 4e 47 45 20 45 52 52 4f 52 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ J P P CBG IDNR1,=D'19999',S06400 RANGE ERROR ┆
0x196c…19bc 00 00 00 00 00 00 00 00 00 20 00 12 00 0e 00 4c 00 50 2a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ L P* ┆
0x19bc…1a0c 00 00 00 00 00 00 00 00 00 2a 00 12 00 62 00 4c 00 50 2a 20 4f 50 45 52 41 54 4f 52 20 49 44 45 4e 54 49 46 49 43 41 54 49 4f 4e 20 49 53 20 49 4e 20 54 48 45 20 52 49 47 48 54 20 52 41 4e 47 45 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ * b L P* OPERATOR IDENTIFICATION IS IN THE RIGHT RANGE ┆
0x1a0c…1a5c 00 00 00 00 00 00 00 00 00 2a 00 12 00 b2 00 4c 00 50 2a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ * L P* ┆
0x1a5c…1aac 00 00 00 00 00 00 00 00 00 2a 00 12 01 02 00 2e 00 50 5c 4d 4f 56 45 5c 4f 44 4f 50 52 52 4e 52 2c 49 44 4e 52 31 5c 53 41 56 45 20 4f 50 45 52 41 54 4f 52 20 4e 55 4d 42 45 52 20 00 12 01 52 00 4c 00 50 5c 4d 55 4c 5c 4f 44 4f 50 52 52 4e ┆ * . P MOVE ODOPRRNR,IDNR1 SAVE OPERATOR NUMBER R L P MUL ODOPRRN┆
0x1aac…1afc (19, 0, 400) 52 2c 4b 44 53 48 49 46 54 5c 53 48 49 46 54 20 54 4f 20 47 45 54 20 52 45 43 4f 52 44 4e 55 4d 42 45 52 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 12 01 84 00 54 00 50 5c 50 45 52 46 5c 5a 43 52 44 44 2c ┆R,KDSHIFT SHIFT TO GET RECORDNUMBER T P PERF ZCRDD,┆
0x1afc…1b4c 4f 44 4f 50 52 52 4e 52 2c 4e 44 4c 52 4e 31 2c 4b 57 31 5c 52 45 41 44 20 4f 50 45 52 41 54 4f 52 20 52 45 43 4f 52 44 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 13 00 44 00 18 00 50 5c 54 42 54 ┆ODOPRRNR,NDLRN1,KW1 READ OPERATOR RECORD D P TBT┆
0x1b4c…1b9c 5c 53 42 43 41 4e 43 45 4c 2c 53 30 36 39 30 30 00 13 00 9c 00 4e 00 50 5c 54 42 54 5c 53 42 52 45 43 41 56 42 2c 53 30 36 39 39 30 5c 52 45 43 4f 52 44 20 49 53 20 50 52 45 53 45 4e 54 20 49 4e 20 54 48 45 20 44 42 53 5c 5c 00 00 00 00 00 ┆ SBCANCEL,S06900 N P TBT SBRECAVB,S06990 RECORD IS PRESENT IN THE DBS ┆
0x1b9c…1bec 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 20 00 13 00 b8 00 4e 00 50 5c 43 42 45 5c 52 44 41 4c 46 4b 42 2c 3d 44 27 31 27 2c 53 30 36 31 30 30 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ N P CBE RDALFKB,=D'1',S06100 ┆
0x1bec…1c3c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 20 00 13 01 0a 00 34 00 50 5c 4d 4f 56 45 5c 53 50 42 49 4e 57 34 2c 3d 57 27 32 33 27 5c 49 4e 53 45 52 54 20 4f 50 52 20 52 45 43 20 4e 4f 54 20 41 4c 4c 4f 57 45 44 20 00 13 01 5c ┆ 4 P MOVE SPBINW4,=W'23' INSERT OPR REC NOT ALLOWED ┆
0x1c3c…1c8c (20, 0, 400) 00 24 00 50 5c 42 5c 53 30 36 38 30 30 5c 45 52 52 4f 52 2c 20 43 4c 45 41 52 20 44 41 54 41 2d 49 54 45 4d 00 14 00 04 00 4c 00 50 2a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ $ P B S06800 ERROR, CLEAR DATA-ITEM L P* ┆
0x1c8c…1cdc 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 2a 00 14 00 2c 00 4c 00 50 2a 20 49 4e 49 54 49 41 4c 49 53 45 20 41 20 4e 45 57 20 4f 50 45 52 41 54 4f 52 20 52 45 43 4f 52 44 20 49 ┆ * , L P* INITIALISE A NEW OPERATOR RECORD I┆
0x1cdc…1d2c 4e 20 54 48 45 20 55 57 42 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 2a 00 14 00 7c 00 4c 00 50 2a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆N THE UWB * | L P* ┆
0x1d2c…1d7c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 2a 00 14 00 cc 00 4e 00 50 53 30 36 31 30 30 5c 5c 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ * N PS06100 ┆
0x1d7c…1dcc 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 20 00 14 01 1c 00 4c 00 50 5c 50 45 52 46 5c 45 41 49 4f 50 52 5c 49 4e 49 54 49 41 4c 49 53 45 20 4f 50 45 52 41 54 4f 52 20 52 ┆ L P PERF EAIOPR INITIALISE OPERATOR R┆