DataMuseum.dk

Presents historical artifacts from the history of:

Philips Data Systems

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

See our Wiki for more about Philips Data Systems

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦6d2e54fa9⟧

    Length: 14078 (0x36fe)
    Notes: pts_type(SC)
    Names: »QIRDBS.SC«

Derivation

└─⟦35fda6e03⟧ Bits:30009701 Philips computer tape "BARCLAY"
    └─⟦this⟧ »DEMO6800/QIRDBS.SC« 
└─⟦e276fd206⟧ Bits:30009696 Philips computer tape "600413"
    └─⟦this⟧ »DEMO6800/QIRDBS.SC« 

PTS(SC)

         IDENT    QIRDBS                DATABASE RECOVERY 
	DDUM	DEMODD			
	PDIV				
	EXPROC	ZAOPND
	EXPROC	ZBCLSD
	EXPROC	ZCRDD			 
	EXPROC	ZDRWRD			 
	EXPROC	ZEINSD			 
	EXPROC	ZGREA 
	EXPROC	MASK			 
	ENTRY	QIRDBS			
************************************************************************
* *
* DATABASE RECOVERY*
*    - UPDATE THE LAST RECORD NUMBER OF THE DATABASE*
*    - UPDATE SYSTEM RECORD VARIABLES:*
*        YDLASSAV, YDLASCHQ, YDLASSEQ*
*    - RESET THE STATUS OF ALL ACCOUNT RECORDS TO DEBLOCKED*
* *
************************************************************************
QIRDBS	PROC				
QI000					
* *
* UPDATE THE LAST RECORD NUMBER OF THE DATABASE*
**
* TO DO THIS, THE RECORDS BEHIND THE LRN ARE RANDOMLY READ*
*    BY 'RREAD', THEN THESE RECORDS ARE INDEXED DELETED*
*    AND AFTER THAT INDEXED INSERTED AGAIN*
**

HexDump

0x0000…0042 (0, 0, 400)  Head {h00=0x003e, h01=0x0050, text=»         IDENT    QIRDBS                DATABASE RECOVERY «, t00=0x0000, t01=0x0004}
0x0042…0092              Head {h00=0x004c, h01=0x0050, text=» DDUM DEMODD                                                            «, t00=0x0000, t01=0x0046}
0x0092…00e2              Head {h00=0x004c, h01=0x0050, text=» PDIV                                                                   «, t00=0x0000, t01=0x0096}
0x00e2…00f8              Head {h00=0x0012, h01=0x0050, text=» EXPROC ZAOPND«, t00=0x0000, t01=0x00e6}
0x00f8…010e              Head {h00=0x0012, h01=0x0050, text=» EXPROC ZBCLSD«, t00=0x0000, t01=0x00fc}
0x010e…0162              Head {h00=0x0050, h01=0x0050, text=» EXPROC ZCRDD                                                               «, t00=0x0000, t01=0x0112}
0x0162…01b6              Head {h00=0x0050, h01=0x0050, text=» EXPROC ZDRWRD                                                              «, t00=0x0000, t01=0x0166}
0x01b6…020a              Head {h00=0x0050, h01=0x0050, text=» EXPROC ZEINSD                                                              «, t00=0x0001, t01=0x002a}
0x020a…0220              Head {h00=0x0012, h01=0x0050, text=» EXPROC ZGREA «, t00=0x0001, t01=0x007e}
0x0220…0274              Head {h00=0x0050, h01=0x0050, text=» EXPROC MASK                                                                «, t00=0x0001, t01=0x0094}
0x0274…02c4              Head {h00=0x004c, h01=0x0050, text=» ENTRY QIRDBS                                                           «, t00=0x0001, t01=0x00e8}
0x02c4…0314              Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0001, t01=0x0138}
0x0314…0364              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x0001, t01=0x0188}
0x0364…03b4              Head {h00=0x004c, h01=0x0050, text=»* DATABASE RECOVERY                                                    *«, t00=0x0002, t01=0x0048}
0x03b4…0404              Head {h00=0x004c, h01=0x0050, text=»*    - UPDATE THE LAST RECORD NUMBER OF THE DATABASE                   *«, t00=0x0002, t01=0x0098}
0x0404…0454              Head {h00=0x004c, h01=0x0050, text=»*    - UPDATE SYSTEM RECORD VARIABLES:                                 *«, t00=0x0002, t01=0x00e8}
0x0454…04a4              Head {h00=0x004c, h01=0x0050, text=»*        YDLASSAV, YDLASCHQ, YDLASSEQ                                  *«, t00=0x0002, t01=0x0138}
0x04a4…04f4              Head {h00=0x004c, h01=0x0050, text=»*    - RESET THE STATUS OF ALL ACCOUNT RECORDS TO DEBLOCKED            *«, t00=0x0002, t01=0x0188}
0x04f4…0544              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x0003, t01=0x0048}
0x0544…0594              Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0003, t01=0x0098}
0x0594…05e4              Head {h00=0x004c, h01=0x0050, text=»QIRDBS PROC                                                             «, t00=0x0003, t01=0x00e8}
0x05e4…0634              Head {h00=0x004c, h01=0x0050, text=»QI000                                                                   «, t00=0x0003, t01=0x0138}
0x0634…0684              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x0003, t01=0x0188}
0x0684…06d4              Head {h00=0x004c, h01=0x0050, text=»* UPDATE THE LAST RECORD NUMBER OF THE DATABASE                        *«, t00=0x0004, t01=0x0048}
0x06d4…0724              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x0004, t01=0x0098}
0x0724…0774              Head {h00=0x004c, h01=0x0050, text=»* TO DO THIS, THE RECORDS BEHIND THE LRN ARE RANDOMLY READ             *«, t00=0x0004, t01=0x00e8}
0x0774…07c4              Head {h00=0x004c, h01=0x0050, text=»*    BY 'RREAD', THEN THESE RECORDS ARE INDEXED DELETED                *«, t00=0x0004, t01=0x0138}
0x07c4…0814              Head {h00=0x004c, h01=0x0050, text=»*    AND AFTER THAT INDEXED INSERTED AGAIN                             *«, t00=0x0004, t01=0x0188}
0x0814…0864              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x0005, t01=0x0048}
0x0864…0868              Head {h00=0x0054, h01=0x0050}
0x0868…086c              Head {h00=0x5c4d, h01=0x4f56}
0x086c…0870              45 5c 4e 44                                                                                                                                                                                                                                       ┆E ND┆
0x0870…08c0              4c 52 4e 32 2c 3d 44 27 30 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 00 00 00 00 00 00 00 05 00 98 00 54 00 50   ┆LRN2,=D'0'                                                                   T P┆
0x08c0…0910              5c 4d 4f 56 45 5c 57 57 32 2c 3d 57 27 31 32 37 27 5c 53 45 54 20 52 45 43 4f 52 44 20 4c 45 4e 47 54 48 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   ┆ MOVE WW2,=W'127' SET RECORD LENGTH                                             ┆
0x0910…0960              00 05 00 f0 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 00 00 00 00 00 00 00 00 00 2a   ┆     L P*                                                                      *┆
0x0960…09b0 (6, 0, 400)  00 05 01 48 00 4c 00 50 2a 20 52 45 41 44 20 4e 45 58 54 20 52 45 43 4f 52 44 20 49 4e 20 54 48 45 20 44 41 54 41 42 41 53 45 00 00 00 00 00 00 00 00 00 00 00 00 00 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   ┆   H L P* READ NEXT RECORD IN THE DATABASE                                     *┆
0x09b0…0a00              00 06 00 08 00 4c 00 50 2a 20 20 20 20 55 4e 54 49 4c 20 45 4e 44 2d 4f 46 2d 46 49 4c 45 20 4f 43 43 55 52 53 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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   ┆     L P*    UNTIL END-OF-FILE OCCURS                                          *┆
0x0a00…0a50              00 06 00 58 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 00 00 00 00 00 00 00 00 00 2a   ┆   X L P*                                                                      *┆
0x0a50…0aa0              00 06 00 a8 00 20 00 50 5c 50 45 52 46 5c 5a 42 43 4c 53 44 5c 43 4c 4f 53 45 20 44 41 54 41 42 41 53 45 20 00 06 00 f8 00 24 00 50 5c 50 45 52 46 5c 5a 41 4f 50 4e 44 5c 4f 50 45 4e 20 44 41 54 41 42 41 53 45 20 41 47 41 49 4e 00 06 01 1c   ┆       P PERF ZBCLSD CLOSE DATABASE      $ P PERF ZAOPND OPEN DATABASE AGAIN    ┆
0x0aa0…0af0              00 16 00 50 5c 50 45 52 46 5c 5a 47 52 45 41 5c 43 4f 4d 4d 49 54 00 06 01 44 00 0a 00 50 51 49 30 31 30 20 00 06 01 5e 00 54 00 50 5c 41 44 44 5c 4e 44 4c 52 4e 32 2c 3d 44 27 31 27 5c 4e 45 58 54 20 52 45 43 4f 52 44 5c 5c 00 00 00 00 00   ┆   P PERF ZGREA COMMIT   D   PQI010    ^ T P ADD NDLRN2,=D'1' NEXT RECORD       ┆
0x0af0…0b40 (7, 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 06 01 6c 00 22 00 50 5c 52 45 41 44 5c 2e 53 45 51 2c 44 53 44 42 53 2c 46 43 42 55 46 46 45 52 2c 57 57   ┆                                               l " P READ .SEQ,DSDBS,FCBUFFER,WW┆
0x0b40…0b90              32 20 00 07 00 34 00 54 00 50 5c 58 53 54 41 54 5c 44 53 44 42 53 2c 4e 57 58 53 54 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 00 00 00 00 00 00 00 00 00 00   ┆2    4 T P XSTAT DSDBS,NWXSTAT                                                  ┆
0x0b90…0be0              00 00 00 00 00 00 00 00 00 20 00 07 00 5a 00 2a 00 50 5c 4d 4f 56 45 5c 57 57 31 2c 3d 58 27 31 30 30 30 27 5c 53 45 54 20 45 4e 44 2d 4f 46 2d 46 49 4c 45 20 42 49 54 00 07 00 b2 00 1a 00 50 5c 43 41 4c 4c 5c 4d 41 53 4b 2c 4e 57 58 53 54   ┆             Z * P MOVE WW1,=X'1000' SET END-OF-FILE BIT       P CALL MASK,NWXST┆
0x0be0…0c30              41 54 2c 57 57 31 00 07 00 e0 00 16 00 50 5c 42 4f 4b 5c 51 49 30 31 30 5c 4e 4f 54 20 45 4f 46 00 07 00 fe 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   ┆AT,WW1       P BOK QI010 NOT EOF     L P*                                       ┆
0x0c30…0c80              00 00 00 00 00 00 00 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 07 01 18 00 4c 00 50 2a 20 45 4e 44 2d 4f 46 2d 46 49 4c 45 20 44 45 54 45 43 54 45 44 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                               *     L P* END-OF-FILE DETECTED                  ┆
0x0c80…0cd0 (8, 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 2a 00 07 01 68 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   ┆                               *   h L P*                                       ┆
0x0cd0…0d20              00 00 00 00 00 00 00 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 08 00 28 00 54 00 50 5c 53 55 42 5c 4e 44 4c 52 4e 32 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   ┆                               *   ( T P SUB NDLRN2,=D'1'                       ┆
0x0d20…0d70              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 00 78 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   ┆                                           x L P*                               ┆
0x0d70…0dc0              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 08 00 d0 00 4c 00 50 2a 20 4e 44 4c 52 4e 32 20 4e 4f 57 20 43 4f 4e 54 41 49 4e 53 20 54 48 45 20 4c 41 53 54 20 52   ┆                                       *     L P* NDLRN2 NOW CONTAINS THE LAST R┆
0x0dc0…0e10              45 43 4f 52 44 20 4e 55 4d 42 45 52 20 4f 46 20 54 48 45 20 44 41 54 41 42 41 53 45 00 00 00 00 00 00 00 00 00 00 00 2a 00 08 01 20 00 4c 00 50 2a 20 20 20 20 53 54 41 52 54 20 52 45 41 44 49 4e 47 20 52 45 43 4f 52 44 53 20 42 45 48 49 4e   ┆ECORD NUMBER OF THE DATABASE           *     L P*    START READING RECORDS BEHIN┆
0x0e10…0e60 (9, 0, 400)  44 20 4c 52 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 00 00 00 00 00 00 00 00 00 00 2a 00 08 01 70 00 4c 00 50 2a 20 54 48 45 20 52 45 43 4f 52 44 53 20 41 52 45 20 53 54 4f 52 45 44 20 49 4e 20 27 46 43 42   ┆D LRN                                  *   p L P* THE RECORDS ARE STORED IN 'FCB┆
0x0e60…0eb0              55 46 46 45 52 27 00 00 00 00 00 00 00 00 00 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 09 00 30 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   ┆UFFER'                                 *   0 L P*                               ┆
0x0eb0…0f00              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 09 00 80 00 54 00 50 5c 4d 4f 56 45 5c 57 57 32 2c 3d 57 27 31 32 37 27 5c 53 45 54 20 52 45 43 4f 52 44 20 4c 45 4e   ┆                                       *     T P MOVE WW2,=W'127' SET RECORD LEN┆
0x0f00…0f50              47 54 48 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 09 00 d0 00 54 00 50 5c 4d 4f 56 45 5c 57 57 43 4f 55 4e 54 2c 3d 57 27 30 27 5c 49 4e 49 54   ┆GTH                                                  T P MOVE WWCOUNT,=W'0' INIT┆
0x0f50…0fa0              20 27 4e 4f 20 44 41 54 41 27 20 43 4f 55 4e 54 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 09 01 28 00 4c 00 50 2a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆ 'NO DATA' COUNT                                           ( L P*               ┆
0x0fa0…0ff0 (10, 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 2a 00 09 01 80 00 4c 00 50 2a 20 52 45 41 44 20 4e 45 58 54 20 52 45 43 4f   ┆                                                       *     L P* READ NEXT RECO┆
0x0ff0…1040              52 44 20 42 45 48 49 4e 44 20 4c 52 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 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 2a 00 0a 00 40 00 4c 00 50 2a 20 20 20 20 49 46 20 54 48 45 52 45 20 41 52   ┆RD BEHIND LRN                                          *   @ L P*    IF THERE AR┆
0x1040…1090              45 20 4d 4f 52 45 20 54 48 45 4e 20 35 30 20 43 4f 4e 53 45 43 55 54 49 56 45 20 52 45 43 4f 52 44 53 20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 2a 00 0a 00 90 00 4c 00 50 2a 20 20 20 20 43 4f 4e 54 41 49 4e 49 4e 47 20   ┆E MORE THEN 50 CONSECUTIVE RECORDS                     *     L P*    CONTAINING ┆
0x1090…10e0              4e 4f 20 44 41 54 41 2c 20 52 45 43 4f 56 45 52 59 20 49 53 20 41 53 53 55 4d 45 44 20 54 4f 20 42 45 20 43 4f 4d 50 4c 45 54 45 44 00 00 00 00 00 00 00 00 00 00 00 2a 00 0a 00 e0 00 4c 00 50 2a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆NO DATA, RECOVERY IS ASSUMED TO BE COMPLETED           *     L P*               ┆
0x10e0…1130              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 0a 01 30 00 54 00 50 51 49 30 35 30 5c 5c 5c 5c 5c 00 00 00 00 00 00   ┆                                                       *   0 T PQI050           ┆
0x1130…1180 (11, 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 00 00 00 00 00 00 00 00 00 00 0a 01 80 00 24 00 50 5c 50 45 52 46 5c 5a 47   ┆                                                                     $ P PERF ZG┆
0x1180…11d0              52 45 41 5c 52 45 4c 45 41 53 45 20 45 58 43 4c 2e 20 41 43 43 45 53 20 00 0b 00 48 00 54 00 50 5c 41 44 44 5c 4e 44 4c 52 4e 32 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   ┆REA RELEASE EXCL. ACCES    H T P ADD NDLRN2,=D'1'                               ┆
0x11d0…1220              00 00 00 00 00 00 00 00 00 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 70 00 28 00 50 5c 52 45 41 44 5c 2e 44 49 52 2c 44 53 44 42 53 2c 46 43 42 55 46 46 45 52 2c 57 57 32 2c 4e 44 4c 52 4e 32 00 0b 00 c8   ┆                                   p ( P READ .DIR,DSDBS,FCBUFFER,WW2,NDLRN2    ┆
0x1220…1270              00 54 00 50 5c 58 53 54 41 54 5c 44 53 44 42 53 2c 4e 57 58 53 54 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 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆ T P XSTAT DSDBS,NWXSTAT                                                        ┆
0x1270…12c0              00 00 00 20 00 0b 00 f4 00 54 00 50 5c 4d 4f 56 45 5c 57 57 31 2c 3d 58 27 30 38 30 30 27 5c 53 45 54 20 42 49 54 20 34 3a 20 4e 4f 20 44 41 54 41 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   ┆         T P MOVE WW1,=X'0800' SET BIT 4: NO DATA                               ┆
0x12c0…1310 (12, 0, 400) 00 00 00 00 00 00 00 00 00 00 00 00 00 0b 01 4c 00 54 00 50 5c 43 41 4c 4c 5c 4d 41 53 4b 2c 4e 57 58 53 54 41 54 2c 57 57 31 5c 43 48 45 43 4b 20 42 49 54 20 34 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   ┆               L T P CALL MASK,NWXSTAT,WW1 CHECK BIT 4                          ┆
0x1310…1360              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0c 00 14 00 54 00 50 5c 42 4f 4b 5c 51 49 30 37 30 5c 52 45 43 4f 52 44 20 49 53 20 55 53 45 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   ┆                         T P BOK QI070 RECORD IS USED                           ┆
0x1360…13b0              00 00 00 00 00 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 00 6c 00 4c 00 50 2a 20 4e 4f 20 44 41 54 41 00 00 00 00 00 00 00 00 00 00 00 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 L P* NO DATA                                   ┆
0x13b0…1400              00 00 00 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 0c 00 c4 00 54 00 50 5c 41 44 44 5c 57 57 43 4f 55 4e 54 2c 3d 57 27 31 27 5c 4f 4e 45 20 4d 4f 52 45 20 46 52 45 45 20 52 45 43 4f 52 44 5c 5c 00 00 00   ┆                           *     T P ADD WWCOUNT,=W'1' ONE MORE FREE RECORD     ┆
0x1400…1450              00 00 00 00 00 00 00 00 00 00 00 00 00 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 14 00 54 00 50 5c 43 42 47 5c 57 57 43 4f 55 4e 54 2c 3d 57 27 35 30 27 2c 51 49 31 30 30 5c 52 45 43 4f 56 45 52 59 20 43   ┆                                         T P CBG WWCOUNT,=W'50',QI100 RECOVERY C┆
0x1450…14a0 (13, 0, 400) 4f 4d 50 4c 45 54 45 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 00 00 00 00 00 00 00 00 0c 01 6c 00 54 00 50 5c 42 5c 51 49 30 35 30 5c 52 45 41 44 20 4e 45 58 54 20 52 45 43 4f 52 44 5c 5c 00   ┆OMPLETED                                       l T P B QI050 READ NEXT RECORD   ┆
0x14a0…14f0              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 34 00 4c 00 50 2a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                                       4 L P*                   ┆
0x14f0…1540              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 8c 00 2e 00 50 2a 20 27 4e 4f 20 44 41 54 41 27 20 49 53 20 4f 46 46 2c 20   ┆                                                   *     . P* 'NO DATA' IS OFF, ┆
0x1540…1590              43 48 45 43 4b 20 46 4f 52 20 44 49 53 4b 2d 45 52 52 4f 52 53 20 00 0d 00 dc 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   ┆CHECK FOR DISK-ERRORS      L P*                                                 ┆
0x1590…15e0              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 2a 00 0d 01 0e 00 54 00 50 51 49 30 37 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   ┆                     *     T PQI070                                             ┆
0x15e0…1630 (14, 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 0d 01 5e 00 54 00 50 5c 4d 4f 56 45 5c 57 57 31 2c 3d 58 27 32 30 33 42 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   ┆                                 ^ T P MOVE WW1,=X'203B'                        ┆
0x1630…1680              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 26 00 54 00 50 5c 43 41 4c 4c 5c 4d 41 53 4b 2c 4e 57 58 53 54 41 54 2c 57 57 31 5c 43 48 45 43 4b 20 44 49 53 4b 2d   ┆                                         & T P CALL MASK,NWXSTAT,WW1 CHECK DISK-┆
0x1680…16d0              45 52 52 4f 52 53 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 0e 00 7e 00 54 00 50 5c 42 4e 4f 4b 5c 51 49 30 35 30 5c 44 49 53 4b 2d 45 52 52 4f 52 20 46 4f 55   ┆ERRORS                                           ~ T P BNOK QI050 DISK-ERROR FOU┆
0x16d0…1720              4e 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 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 d6 00 4c 00 50 2a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆ND                                                         L P*                 ┆
0x1720…1770              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 0e 01 2e 00 4c 00 50 2a 20 4e 4f 20 44 49 53 4b 2d 45 52 52 4f 52 53 00 00   ┆                                                     *   . L P* NO DISK-ERRORS  ┆
0x1770…17c0 (15, 0, 398) 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 0e 01 7e 00 4c 00 50 2a 20 44 4f 20 54 48 45 20 49 4e 44 45 58 45 44 20 44   ┆                                                     *   ~ L P* DO THE INDEXED D┆
0x17c0…1810              45 4c 45 54 45 20 41 4e 44 20 54 48 45 20 49 4e 44 45 58 45 44 20 49 4e 53 45 52 54 00 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 0f 00 3e 00 4c 00 50 2a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆ELETE AND THE INDEXED INSERT                         *   > L P*                 ┆
0x1810…1860              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 0f 00 8e 00 54 00 50 5c 4d 4f 56 45 5c 57 57 43 4f 55 4e 54 2c 3d 57 27 30   ┆                                                     *     T P MOVE WWCOUNT,=W'0┆
0x1860…18b0              27 5c 52 45 53 45 54 20 43 4f 55 4e 54 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 0f 00 de 00 22 00 50 5c 44 49 53 43 41 52 44 5c 2e   ┆' RESET COUNT                                                      " P DISCARD .┆
0x18b0…18fe              49 58 44 49 52 2c 44 53 44 42 53 2c 46 43 42 55 46 46 45 52 00 0f 01 36 00 18 00 50 5c 58 53 54 41 54 5c 44 53 44 42 53 2c 4e 57 58 53 54 41 54 00 0f 01 5c 00 16 00 50 5c 4d 4f 56 45 5c 57 57 31 2c 3d 58 27 32 35 33 42 27 00 0f 01 78         ┆IXDIR,DSDBS,FCBUFFER   6   P XSTAT DSDBS,NWXSTAT       P MOVE WW1,=X'253B'   x┆
0x18fe…194e (16, 0, 400) 00 1a 00 50 5c 43 41 4c 4c 5c 4d 41 53 4b 2c 4e 57 58 53 54 41 54 2c 57 57 31 00 10 00 04 00 20 00 50 5c 42 4e 4f 4b 5c 51 49 30 35 30 5c 44 49 53 4b 2d 45 52 52 4f 52 20 46 4f 55 4e 44 00 10 00 22 00 4c 00 50 2a 20 00 00 00 00 00 00 00 00   ┆   P CALL MASK,NWXSTAT,WW1       P BNOK QI050 DISK-ERROR FOUND   " L P*         ┆
0x194e…199e              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 10 00 46 00 4c 00 50 2a 20 42 45 43 41 55 53 45 20   ┆                                                             *   F L P* BECAUSE ┆
0x199e…19ee              54 48 45 20 52 45 43 4f 52 44 20 49 53 20 41 4c 52 45 41 44 59 20 49 4e 20 27 46 43 42 55 46 46 45 52 27 00 00 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 10 00 96 00 4c 00 50 2a 20 20 20 20 43 4f 50 59 49   ┆THE RECORD IS ALREADY IN 'FCBUFFER'                          *     L P*    COPYI┆
0x19ee…1a3e              4e 47 20 46 52 4f 4d 20 54 48 45 20 55 57 42 20 49 53 20 4e 4f 54 20 4e 45 43 45 53 53 41 52 59 00 00 00 00 00 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 10 00 e6 00 4c 00 50 2a 20 20 20 20 54 48 45 52 45   ┆NG FROM THE UWB IS NOT NECESSARY                             *     L P*    THERE┆
0x1a3e…1a8e              46 4f 52 45 20 27 53 42 4e 4f 43 4f 50 59 27 20 49 53 20 53 45 54 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 10 01 36 00 4c 00 50 2a 20 00 00 00 00 00 00 00 00   ┆FORE 'SBNOCOPY' IS SET                                       *   6 L P*         ┆
0x1a8e…1ade (17, 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 00 00 00 00 00 00 2a 00 10 01 86 00 14 00 50 5c 43 4f 4d 4d 49 54 5c 4e 57   ┆                                                             *       P COMMIT NW┆
0x1ade…1b2e              58 53 54 41 54 20 00 11 00 46 00 54 00 50 5c 53 45 54 5c 53 42 4e 4f 43 4f 50 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   ┆XSTAT    F T P SET SBNOCOPY                                                     ┆
0x1b2e…1b7e              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 11 00 5e 00 54 00 50 5c 50 45 52 46 5c 5a 45 49 4e 53 44 2c 57 44 45 43 31 5c 49 4e 53 45 52 54 2c 20 50 41 52 41 4d 45 54 45 52 20 49 53 20 41 20 44 55 4d 4d 59 5c 5c 00 00 00 00 00 00 00 00 00   ┆                 ^ T P PERF ZEINSD,WDEC1 INSERT, PARAMETER IS A DUMMY           ┆
0x1b7e…1bce              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 11 00 b6 00 54 00 50 5c 54 42 54 5c 53 42 43 41 4e 43 45 4c 2c 51 49 39 38 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   ┆                           T P TBT SBCANCEL,QI980                               ┆
0x1bce…1c1e              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 11 01 0e 00 54 00 50 5c 42 5c 51 49 30 35 30 5c 52 45 41 44 20 4e 45 58 54 20 52 45 43 4f 52 44 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                   T P B QI050 READ NEXT RECORD                 ┆
0x1c1e…1c6e (18, 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 11 01 66 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   ┆                                         f L P*                                 ┆
0x1c6e…1cbe              00 00 00 00 00 00 00 00 00 00 00 00 00 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 12 00 2e 00 18 00 50 2a 20 45 4e 44 20 4f 46 20 4c 52 4e 20 55 50 44 41 54 45 20 00 12 00 7e 00 4c 00 50 2a 00 00 00 00 00   ┆                                     *   .   P* END OF LRN UPDATE    ~ L P*     ┆
0x1cbe…1d0e              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 12 00 9a 00 4c 00 50 2a 20 00 00 00 00   ┆                                                                 *     L P*     ┆
0x1d0e…1d5e              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 12 00 ea 00 4c 00 50 2a 20 55 50 44 41   ┆                                                                 *     L P* UPDA┆
0x1d5e…1dae              54 45 20 53 59 53 54 45 4d 20 52 45 43 4f 52 44 20 56 41 52 49 41 42 4c 45 53 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 12 01 3a 00 4c 00 50 2a 20 20 20 20 54   ┆TE SYSTEM RECORD VARIABLES                                       *   : L P*    T┆
0x1dae…1dfe (19, 0, 400) 4f 20 52 45 46 4c 45 43 54 20 54 48 45 20 43 55 52 52 45 4e 54 20 53 49 54 55 41 54 49 4f 4e 20 4f 46 20 54 48 45 20 44 41 54 41 42 41 53 45 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 2a 00 12 01 8a 00 4c 00 50 2a 20 41 43 43 4f   ┆O REFLECT THE CURRENT SITUATION OF THE DATABASE                  *     L P* ACCO┆
0x1dfe…1e4e              55 4e 54 20 52 45 43 4f 52 44 53 20 41 52 45 20 53 43 41 4e 4e 45 44 20 55 4e 54 49 4c 20 35 30 20 43 4f 4e 53 45 43 55 54 49 56 45 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 2a 00 13 00 4a 00 4c 00 50 2a 20 20 20 20 55   ┆UNT RECORDS ARE SCANNED UNTIL 50 CONSECUTIVE                     *   J L P*    U┆
0x1e4e…1e9e              4e 55 53 45 44 20 41 43 43 4f 55 4e 54 20 4e 55 4d 42 45 52 53 20 48 41 56 45 20 42 45 45 4e 20 46 4f 55 4e 44 00 00 00 00 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 13 00 9a 00 4c 00 50 2a 20 00 00 00 00   ┆NUSED ACCOUNT NUMBERS HAVE BEEN FOUND                            *     L P*     ┆
0x1e9e…1eee              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 13 00 ea 00 4c 00 50 51 49 31 30 30 5c   ┆                                                                 *     L PQI100 ┆
0x1eee…1f3e              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 13 01 3a 00 52 00 50 5c 4d 4f 56 45 5c   ┆                                                                     : R P MOVE ┆
0x1f3e…1f8e (20, 0, 398) 59 44 4c 41 53 53 41 56 2c 3d 44 27 31 36 37 39 39 39 27 5c 4c 41 53 54 20 53 41 56 49 4e 47 53 2d 41 43 54 2e 20 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 00 20 00 13 01 8a 00 52 00 50   ┆YDLASSAV,=D'167999' LAST SAVINGS-ACT. NUMBER                                 R P┆
0x1f8e…1fde              5c 4d 4f 56 45 5c 59 44 4c 41 53 43 48 51 2c 3d 44 27 31 36 37 39 39 38 27 5c 4c 41 53 54 20 43 48 45 51 55 45 2d 41 43 54 2e 20 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 00 00 20 00 14   ┆ MOVE YDLASCHQ,=D'167998' LAST CHEQUE-ACT. NUMBER                               ┆
0x1fde…202e              00 50 00 4c 00 50 5c 4d 4f 56 45 5c 59 44 4c 41 53 53 45 51 2c 3d 44 27 30 27 5c 4c 41 53 54 20 54 52 41 4e 53 2e 20 53 45 51 55 45 4e 43 45 20 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 14   ┆ P L P MOVE YDLASSEQ,=D'0' LAST TRANS. SEQUENCE NUMBER                          ┆
0x202e…207e              00 a6 00 4c 00 50 5c 4d 4f 56 45 5c 57 57 43 4f 55 4e 54 2c 3d 44 27 30 27 5c 49 4e 49 54 20 43 4f 55 4e 54 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 14   ┆   L P MOVE WWCOUNT,=D'0' INIT COUNT                                            ┆
0x207e…20cc              00 f6 00 4c 00 50 2a 20 53 54 41 52 54 20 57 49 54 48 20 53 41 56 49 4e 47 53 20 41 43 43 4f 55 4e 54 53 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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         ┆   L P* START WITH SAVINGS ACCOUNTS                                          *┆
0x20cc…211c (21, 0, 400) 00 14 01 46 00 14 00 50 5c 43 4c 45 41 52 5c 53 42 43 48 51 41 43 54 20 00 15 00 08 00 4e 00 50 5c 4d 4f 56 45 5c 49 44 41 43 54 4e 52 31 2c 3d 44 27 31 36 37 39 39 39 27 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆   F   P CLEAR SBCHQACT      N P MOVE IDACTNR1,=D'167999'                       ┆
0x211c…216c              00 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 15 00 20 00 4c 00 50 51 49 31 35 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   ┆                               L PQI150                                         ┆
0x216c…21bc              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 15 00 72 00 24 00 50 5c 50 45 52 46 5c 5a 47 52 45 41 5c 52 45 4c 45 41 53 45 20 45 58 43 4c 2e 20 41 43 43 45 53 20 00 15 00 c2 00 4c 00 50 5c 41 44 44 5c 49   ┆                             r $ P PERF ZGREA RELEASE EXCL. ACCES      L P ADD I┆
0x21bc…220c              44 41 43 54 4e 52 31 2c 3d 44 27 32 27 5c 4e 45 58 54 20 41 43 43 4f 55 4e 54 20 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 00 00 00 00 00 00 00 00 15 00 ea 00 4c 00 50 5c 4d 4f 56 45 5c   ┆DACTNR1,=D'2' NEXT ACCOUNT NUMBER                                      L P MOVE ┆
0x220c…225c              41 44 41 43 54 52 4e 52 2c 49 44 41 43 54 4e 52 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 15 01 3a 00 4c 00 50 5c 4d 55 4c 5c 41   ┆ADACTRNR,IDACTNR1                                                    : L P MUL A┆
0x225c…22ac (22, 0, 400) 44 41 43 54 52 4e 52 2c 4b 44 53 48 49 46 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 00 00 00 00 00 00 00 00 00 00 00 00 15 01 8a 00 4c 00 50 5c 50 45 52 46 5c   ┆DACTRNR,KDSHIFT                                                        L P PERF ┆
0x22ac…22fc              5a 43 52 44 44 2c 41 44 41 43 54 52 4e 52 2c 4e 44 4c 52 4e 31 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 16 00 4a 00 4c 00 50 5c 54 42 54 5c 53   ┆ZCRDD,ADACTRNR,NDLRN1,KW1                                            J L P TBT S┆
0x22fc…234c              42 43 41 4e 43 45 4c 2c 51 49 39 38 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 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 16 00 9a 00 4c 00 50 5c 54 42 54 5c 53   ┆BCANCEL,QI980                                                          L P TBT S┆
0x234c…239c              42 52 45 43 41 56 42 2c 51 49 32 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 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 16 00 ea 00 4c 00 50 2a 20 55 4e 55 53   ┆BRECAVB,QI200                                                          L P* UNUS┆
0x239c…23ec              45 44 20 41 43 43 4f 55 4e 54 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 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 16 01 3a 00 4c 00 50 5c 41 44 44 5c 57   ┆ED ACCOUNT NUMBER                                                *   : L P ADD W┆
0x23ec…243c (23, 0, 400) 57 43 4f 55 4e 54 2c 3d 57 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 16 01 8a 00 4c 00 50 5c 43 42 47 5c 57   ┆WCOUNT,=W'1'                                                           L P CBG W┆
0x243c…248c              57 43 4f 55 4e 54 2c 3d 57 27 35 30 27 2c 51 49 37 30 30 5c 52 45 41 44 59 2c 20 53 54 4f 50 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 17 00 4a 00 4c 00 50 5c 42 5c 51 49 31   ┆WCOUNT,=W'50',QI700 READY, STOP                                      J L P B QI1┆
0x248c…24dc              35 30 5c 4e 45 58 54 20 41 43 43 4f 55 4e 54 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 17 00 9a 00 4c 00 50 2a 20 00 00 00 00   ┆50 NEXT ACCOUNT                                                        L P*     ┆
0x24dc…252c              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 17 00 ea 00 4c 00 50 2a 20 54 48 45 20   ┆                                                                 *     L P* THE ┆
0x252c…257c              41 43 43 4f 55 4e 54 20 52 45 43 4f 52 44 20 49 53 20 41 56 41 49 4c 41 42 4c 45 2c 00 00 00 00 00 00 00 00 00 00 00 00 00 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 17 01 3a 00 4c 00 50 2a 20 20 20 20 55   ┆ACCOUNT RECORD IS AVAILABLE,                                     *   : L P*    U┆
0x257c…25cc (24, 0, 400) 50 44 41 54 45 20 53 59 53 54 45 4d 20 52 45 43 4f 52 44 20 56 41 52 49 41 42 4c 45 53 00 00 00 00 00 00 00 00 00 00 00 00 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 17 01 8a 00 4c 00 50 2a 20 00 00 00 00   ┆PDATE SYSTEM RECORD VARIABLES                                    *     L P*     ┆
0x25cc…261c              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 18 00 4a 00 4c 00 50 51 49 32 30 30 5c   ┆                                                                 *   J L PQI200 ┆
0x261c…266c              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 18 00 9a 00 4c 00 50 5c 4d 4f 56 45 5c   ┆                                                                       L P MOVE ┆
0x266c…26bc              57 57 43 4f 55 4e 54 2c 3d 57 27 30 27 5c 52 45 53 45 54 20 43 4f 55 4e 54 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 18 00 ea 00 4c 00 50 2a 20 00 00 00 00   ┆WWCOUNT,=W'0' RESET COUNT                                              L P*     ┆
0x26bc…270c              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 18 01 3a 00 4c 00 50 2a 20 55 50 44 41   ┆                                                                 *   : L P* UPDA┆
0x270c…275c (25, 0, 400) 54 45 20 4c 41 53 54 20 53 41 56 49 4e 47 53 2f 43 48 45 51 55 45 20 41 43 43 4f 55 4e 54 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 00 00 00 00 2a 00 18 01 8a 00 4c 00 50 2a 20 00 00 00 00   ┆TE LAST SAVINGS/CHEQUE ACCOUNT NUMBER                            *     L P*     ┆
0x275c…27ac              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 19 00 4a 00 4c 00 50 5c 54 42 54 5c 53   ┆                                                                 *   J L P TBT S┆
0x27ac…27fc              42 43 48 51 41 43 54 2c 51 49 33 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 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 19 00 9a 00 4c 00 50 2a 20 00 00 00 00   ┆BCHQACT,QI300                                                          L P*     ┆
0x27fc…284c              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 19 00 ea 00 4c 00 50 2a 20 53 41 56 49   ┆                                                                 *     L P* SAVI┆
0x284c…289c              4e 47 53 20 41 43 43 4f 55 4e 54 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 19 01 3a 00 4c 00 50 2a 20 00 00 00 00   ┆NGS ACCOUNT                                                      *   : L P*     ┆
0x289c…28ec (26, 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 00 00 00 00 00 00 00 00 00 00 2a 00 19 01 8a 00 4c 00 50 5c 43 42 4c 5c 49   ┆                                                                 *     L P CBL I┆
0x28ec…293c              44 41 43 54 4e 52 31 2c 59 44 4c 41 53 53 41 56 2c 51 49 34 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 00 00 00 00 00 00 00 00 00 00 1a 00 4a 00 4c 00 50 5c 4d 4f 56 45 5c   ┆DACTNR1,YDLASSAV,QI400                                               J L P MOVE ┆
0x293c…298c              59 44 4c 41 53 53 41 56 2c 49 44 41 43 54 4e 52 31 5c 55 50 44 41 54 45 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 1a 00 9a 00 4c 00 50 5c 42 5c 51 49 34   ┆YDLASSAV,IDACTNR1 UPDATE                                               L P B QI4┆
0x298c…29dc              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 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 1a 00 ea 00 4c 00 50 2a 20 00 00 00 00   ┆00                                                                     L P*     ┆
0x29dc…2a2c              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 1a 01 3a 00 4c 00 50 2a 20 43 48 45 51   ┆                                                                 *   : L P* CHEQ┆
0x2a2c…2a7c (27, 0, 400) 55 45 20 41 43 43 4f 55 4e 54 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 1a 01 8a 00 4c 00 50 2a 20 00 00 00 00   ┆UE ACCOUNT                                                       *     L P*     ┆
0x2a7c…2acc              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 1b 00 4a 00 4c 00 50 51 49 33 30 30 5c   ┆                                                                 *   J L PQI300 ┆
0x2acc…2b1c              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 1b 00 9a 00 4c 00 50 5c 43 42 4c 5c 49   ┆                                                                       L P CBL I┆
0x2b1c…2b6c              44 41 43 54 4e 52 31 2c 59 44 4c 41 53 43 48 51 2c 51 49 34 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 00 00 00 00 00 00 00 00 00 00 1b 00 ea 00 4c 00 50 5c 4d 4f 56 45 5c   ┆DACTNR1,YDLASCHQ,QI400                                                 L P MOVE ┆
0x2b6c…2bbc              59 44 4c 41 53 43 48 51 2c 49 44 41 43 54 4e 52 31 5c 55 50 44 41 54 45 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 1b 01 3a 00 4c 00 50 2a 20 00 00 00 00   ┆YDLASCHQ,IDACTNR1 UPDATE                                             : L P*     ┆
0x2bbc…2c0c (28, 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 00 00 00 00 00 00 00 00 00 00 2a 00 1b 01 8a 00 4c 00 50 2a 20 55 50 44 41   ┆                                                                 *     L P* UPDA┆
0x2c0c…2c5c              54 45 20 4c 41 53 54 20 54 52 41 4e 53 41 43 54 49 4f 4e 20 53 45 51 55 45 4e 43 45 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 00 00 00 00 00 00 2a 00 1c 00 4a 00 4c 00 50 2a 20 00 00 00 00   ┆TE LAST TRANSACTION SEQUENCE NUMBER                              *   J L P*     ┆
0x2c5c…2cac              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 1c 00 9a 00 4c 00 50 51 49 34 30 30 5c   ┆                                                                 *     L PQI400 ┆
0x2cac…2cfc              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 1c 00 ea 00 4c 00 50 5c 43 42 4c 5c 41   ┆                                                                       L P CBL A┆
0x2cfc…2d4c              44 4c 41 53 53 45 51 2c 59 44 4c 41 53 53 45 51 2c 51 49 35 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 00 00 00 00 00 00 00 00 00 00 1c 01 3a 00 4c 00 50 5c 4d 4f 56 45 5c   ┆DLASSEQ,YDLASSEQ,QI500                                               : L P MOVE ┆
0x2d4c…2d9c (29, 0, 400) 59 44 4c 41 53 53 45 51 2c 41 44 4c 41 53 53 45 51 5c 55 50 44 41 54 45 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 1c 01 8a 00 4c 00 50 2a 20 00 00 00 00   ┆YDLASSEQ,ADLASSEQ UPDATE                                               L P*     ┆
0x2d9c…2dec              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 1d 00 4a 00 4c 00 50 2a 20 52 45 53 45   ┆                                                                 *   J L P* RESE┆
0x2dec…2e3c              54 20 41 43 43 4f 55 4e 54 20 53 54 41 54 55 53 20 54 4f 20 44 45 42 4c 4f 43 4b 45 44 2c 00 00 00 00 00 00 00 00 00 00 00 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 1d 00 9a 00 4c 00 50 2a 20 20 20 20 49   ┆T ACCOUNT STATUS TO DEBLOCKED,                                   *     L P*    I┆
0x2e3c…2e8c              46 20 41 43 43 4f 55 4e 54 20 57 41 53 20 43 4c 4f 53 45 44 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 1d 00 ea 00 4c 00 50 2a 20 00 00 00 00   ┆F ACCOUNT WAS CLOSED                                             *     L P*     ┆
0x2e8c…2edc              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 1d 01 3a 00 4c 00 50 51 49 35 30 30 5c   ┆                                                                 *   : L PQI500 ┆
0x2edc…2f2c (30, 0, 400) 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 1d 01 8a 00 4c 00 50 5c 43 42 4c 5c 41   ┆                                                                       L P CBL A┆
0x2f2c…2f7c              44 53 54 41 54 55 53 2c 3d 44 27 32 27 2c 51 49 36 30 30 5c 41 43 43 4f 55 4e 54 20 4e 4f 54 20 43 4c 4f 53 45 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 1e 00 4a 00 4c 00 50 5c 4d 4f 56 45 5c   ┆DSTATUS,=D'2',QI600 ACCOUNT NOT CLOSED                               J L P MOVE ┆
0x2f7c…2fcc              41 44 53 54 41 54 55 53 2c 3d 44 27 30 27 5c 44 45 42 4c 4f 43 4b 45 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 00 00 00 00 00 00 00 00 00 00 00 00 00 00 1e 00 9a 00 4c 00 50 5c 50 45 52 46 5c   ┆ADSTATUS,=D'0' DEBLOCKED                                               L P PERF ┆
0x2fcc…301c              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 1e 00 ea 00 4c 00 50 5c 54 42 54 5c 53   ┆ZDRWRD,ADACTRNR,NDLRN1                                                 L P TBT S┆
0x301c…306c              42 43 41 4e 43 45 4c 2c 51 49 39 38 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 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 1e 01 3a 00 4c 00 50 51 49 36 30 30 5c   ┆BCANCEL,QI980                                                        : L PQI600 ┆
0x306c…30bc (31, 0, 400) 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 1e 01 8a 00 4c 00 50 5c 42 5c 51 49 31   ┆                                                                       L P B QI1┆
0x30bc…310c              35 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 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 1f 00 4a 00 4c 00 50 2a 20 00 00 00 00   ┆50                                                                   J L P*     ┆
0x310c…315c              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 1f 00 9a 00 4c 00 50 2a 20 55 50 44 41   ┆                                                                 *     L P* UPDA┆
0x315c…31ac              54 45 20 53 59 53 54 45 4d 20 52 45 43 4f 52 44 20 56 41 52 49 41 42 4c 45 53 20 46 4f 52 20 4f 4e 45 20 54 59 50 45 20 4f 46 20 41 43 43 4f 55 4e 54 20 44 4f 4e 45 00 00 00 00 00 00 00 00 00 00 2a 00 1f 00 ea 00 4c 00 50 2a 20 20 20 20 53   ┆TE SYSTEM RECORD VARIABLES FOR ONE TYPE OF ACCOUNT DONE          *     L P*    S┆
0x31ac…31fc              45 45 20 49 46 20 54 48 45 20 43 48 45 51 55 45 20 41 43 43 4f 55 4e 54 53 20 4d 55 53 54 20 53 54 49 4c 4c 20 42 45 20 44 4f 4e 45 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 2a 00 1f 01 3a 00 4c 00 50 2a 20 00 00 00 00   ┆EE IF THE CHEQUE ACCOUNTS MUST STILL BE DONE                     *   : L P*     ┆
0x31fc…324c (32, 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 00 00 00 00 00 00 00 00 00 00 2a 00 1f 01 8a 00 4c 00 50 51 49 37 30 30 5c   ┆                                                                 *     L PQI700 ┆
0x324c…329c              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 20 00 4a 00 4c 00 50 5c 54 42 54 5c 53   ┆                                                                     J L P TBT S┆
0x329c…32ec              42 43 48 51 41 43 54 2c 51 49 39 38 30 5c 52 45 41 44 59 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 20 00 9a 00 4c 00 50 2a 20 44 4f 20 54   ┆BCHQACT,QI980 READY                                                    L P* DO T┆
0x32ec…333c              48 45 20 43 48 45 51 55 45 20 41 43 43 4f 55 4e 54 53 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 20 00 ea 00 4c 00 50 5c 53 45 54 5c 53   ┆HE CHEQUE ACCOUNTS                                               *     L P SET S┆
0x333c…338c              42 43 48 51 41 43 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 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 20 01 3a 00 4e 00 50 5c 4d 4f 56 45 5c   ┆BCHQACT                                                              : N P MOVE ┆
0x338c…33dc (33, 0, 400) 49 44 41 43 54 4e 52 31 2c 3d 44 27 31 36 37 39 39 38 27 5c 53 54 41 52 54 20 57 49 54 48 20 43 48 45 51 55 45 20 41 43 43 4f 55 4e 54 53 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 20 00 20 01 8a 00 24 00 50 5c 4d 4f 56   ┆IDACTNR1,=D'167998' START WITH CHEQUE ACCOUNTS                           $ P MOV┆
0x33dc…342c              45 5c 57 57 43 4f 55 4e 54 2c 3d 57 27 30 27 5c 52 45 53 45 54 20 43 4f 55 4e 54 20 00 21 00 4c 00 4c 00 50 5c 42 5c 51 49 31 35 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 00   ┆E WWCOUNT,=W'0' RESET COUNT  ! L L P B QI150                                    ┆
0x342c…347c              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 21 00 74 00 4c 00 50 51 49 39 38 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   ┆                             ! t L PQI980                                       ┆
0x347c…34cc              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 21 00 c4 00 30 00 50 5c 41 44 44 5c 59 44 4c 41 53 53 45 51 2c 3d 44 27 32 35 27 5c 54 4f 20 47 45 54 20 55 4e 49 51 55 45 20 53 45 51 2e 20 4e 52 53 2e   ┆                             !   0 P ADD YDLASSEQ,=D'25' TO GET UNIQUE SEQ. NRS.┆
0x34cc…351c              00 21 01 14 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 00 00 00 00 00 00 00 00 00 00   ┆ !   L P RET                                                                    ┆
0x351c…356c (34, 2, 252) 00 21 01 48 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 00 00 00 00 00 00 00 00 00 00   ┆ ! H L P PEND                                                                   ┆
0x356c…35bc              00 22 00 08 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 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a   ┆ "   L P************************************************************************┆
0x35bc…360c              00 22 00 58 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 00 00 00 00 00 00 00 00 00 00   ┆ " X L P END                                                                    ┆
0x360c…3618              00 22 00 a8 40 04 00 00 00 22 00 f8                                                                                                                                                                                                               ┆ "  @    "  ┆
0x3618…3620 (35, 1, 8)   20 04 00 00 00 23 00 04                                                                                                                                                                                                                           ┆     #  ┆
0x3620…3670 (36, 2, 222) 00 3c 00 48 20 49 44 45 4e 54 20 54 3a 44 41 30 30 20 20 54 52 41 20 31 30 2e 30 20 38 30 2d 30 36 2d 32 37 20 46 31 20 4f 31 31 31 31 20 20 44 41 54 41 20 44 49 56 49 53 49 4f 4e 00 04 00 04 00 0e 00 0a 01 04 c8 54 3a 44 41 30 30 00 00 04   ┆ < H IDENT T:DA00  TRA 10.0 80-06-27 F1 O1111  DATA DIVISION           T:DA00   ┆
0x3670…36c0              00 44 00 10 00 0c 05 05 c8 54 3a 44 41 30 30 44 00 00 00 04 00 56 00 0e 00 0a 02 04 c8 41 41 4d 41 49 4e 00 00 04 00 6a 00 2a 00 26 03 12 00 00 00 01 00 00 fe e8 41 30 00 0a 00 0f 30 00 00 00 c0 0c 0f f2 2a 00 00 00 00 00 00 00 00 00 00 00   ┆ D       T:DA00D     V       AAMAIN    j * &          A0    0       *           ┆
0x36c0…36fe              00 00 00 04 00 7c 00 1a 00 16 03 0a 00 00 00 1f 04 00 00 00 ff ff 00 00 00 01 00 01 00 00 00 02 00 04 00 aa 00 0e 00 0a 07 04 00 00 00 01 00 2a 00 00 00 04 00 c8 40 04 00 00 00 04 00 da                                                         ┆     |                                         *      @       ┆

Reduced view