|
|
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: 17296 (0x4390)
Notes: pts_type(SC)
Names: »SPACHQ.SC«
└─⟦f350e1b7a⟧ Bits:30009678 Philips computer tape "600219"
└─⟦this⟧ »PTSDEMO/SPACHQ.SC«
IDENT SPACHQ APPL-XX CONTROL
DDUM DEMODD
PDIV
EXPROC SPAP06
EXPROC SPAP07
EXPROC SPAP08
EXPROC SPAP09
EXPROC SPAP10
EXPROC SPAP11
EXPROC SPAP12
EXPROC SPAP13
EXPROC SPAP14
0x0000…0040 (0, 0, 400) Head {h00=0x003c, h01=0x0050, text=» IDENT SPACHQ APPL-XX CONTROL «, t00=0x0000, t01=0x0004}
0x0040…0054 Head {h00=0x0010, h01=0x000c, text=» DDUM DEMODD«, t00=0x0000, t01=0x0044}
0x0054…0062 Head {h00=0x000a, h01=0x0005, text=» PDIV «, t00=0x0000, t01=0x0058}
0x0062…0078 Head {h00=0x0012, h01=0x0050, text=» EXPROC SPAP06«, t00=0x0000, t01=0x0066}
0x0078…008e Head {h00=0x0012, h01=0x0050, text=» EXPROC SPAP07«, t00=0x0000, t01=0x007c}
0x008e…00a4 Head {h00=0x0012, h01=0x0050, text=» EXPROC SPAP08«, t00=0x0000, t01=0x0092}
0x00a4…00ba Head {h00=0x0012, h01=0x0050, text=» EXPROC SPAP09«, t00=0x0000, t01=0x00a8}
0x00ba…00d0 Head {h00=0x0012, h01=0x0050, text=» EXPROC SPAP10«, t00=0x0000, t01=0x00be}
0x00d0…00e6 Head {h00=0x0012, h01=0x0050, text=» EXPROC SPAP11«, t00=0x0000, t01=0x00d4}
0x00e6…00fc Head {h00=0x0012, h01=0x0050, text=» EXPROC SPAP12«, t00=0x0000, t01=0x00ea}
0x00fc…0112 Head {h00=0x0012, h01=0x0050, text=» EXPROC SPAP13«, t00=0x0000, t01=0x0100}
0x0112…0128 Head {h00=0x0012, h01=0x0050, text=» EXPROC SPAP14«, t00=0x0000, t01=0x0116}
0x0128…012c Head {h00=0x0054, h01=0x0050}
0x012c…0130 Head {h00=0x5c45, h01=0x5850}
0x0130…0140 52 4f 43 5c 53 50 41 50 31 35 5c 5c 5c 00 00 00 ┆ROC SPAP15 ┆
0x0140…0190 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 2c 00 50 00 50 5c 45 58 50 52 4f 43 5c 53 50 41 50 ┆ , P P EXPROC SPAP┆
0x0190…01e0 (1, 0, 400) 31 39 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 20 00 00 01 84 00 50 00 50 5c 45 58 50 52 4f 43 5c ┆19 P P EXPROC ┆
0x01e0…0230 53 50 41 50 32 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 20 00 01 00 48 00 54 00 50 5c 45 58 50 ┆SPAP20 H T P EXP┆
0x0230…0280 52 4f 43 5c 53 50 41 50 32 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 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 9c ┆ROC SPAP21 ┆
0x0280…02d0 00 54 00 50 5c 45 58 50 52 4f 43 5c 53 50 41 50 32 33 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 ┆ T P EXPROC SPAP23 ┆
0x02d0…0320 00 00 00 00 00 01 00 f4 00 54 00 50 5c 45 58 50 52 4f 43 5c 53 50 41 50 32 34 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 ┆ T P EXPROC SPAP24 ┆
0x0320…0370 (2, 0, 400) 00 00 00 00 00 00 00 00 00 00 00 00 00 01 01 4c 00 54 00 50 5c 45 58 50 52 4f 43 5c 53 50 41 50 32 35 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 ┆ L T P EXPROC SPAP25 ┆
0x0370…03c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 02 00 14 00 12 00 50 5c 45 58 50 52 4f 43 5c 53 50 41 50 32 36 00 02 00 6c 00 12 00 50 5c 45 58 50 52 4f 43 5c 53 50 41 50 32 38 00 02 00 82 00 12 00 50 5c 45 58 50 52 4f 43 5c ┆ P EXPROC SPAP26 l P EXPROC SPAP28 P EXPROC ┆
0x03c0…0410 53 50 41 50 32 39 00 02 00 98 00 12 00 50 5c 45 58 50 52 4f 43 5c 53 50 41 50 33 30 00 02 00 ae 00 12 00 50 5c 45 58 50 52 4f 43 5c 53 50 41 50 33 31 00 02 00 c4 00 12 00 50 5c 45 58 50 52 4f 43 5c 53 50 41 50 33 32 00 02 00 da 00 12 00 50 ┆SPAP29 P EXPROC SPAP30 P EXPROC SPAP31 P EXPROC SPAP32 P┆
0x0410…0460 5c 45 58 50 52 4f 43 5c 53 50 41 50 33 33 00 02 00 f0 00 12 00 50 5c 45 58 50 52 4f 43 5c 53 50 41 50 33 34 00 02 01 06 00 12 00 0d 20 45 4e 54 52 59 20 53 50 41 50 50 4c 20 00 02 01 1c 00 12 00 50 5c 45 4e 54 52 59 5c 53 50 41 50 31 36 20 ┆ EXPROC SPAP33 P EXPROC SPAP34 ENTRY SPAPPL P ENTRY SPAP16 ┆
0x0460…04b0 00 02 01 32 00 12 00 50 5c 45 4e 54 52 59 5c 53 50 41 50 31 37 20 00 02 01 48 00 12 00 50 5c 45 4e 54 52 59 5c 53 50 41 50 31 38 20 00 02 01 5e 00 12 00 50 5c 45 4e 54 52 59 5c 53 50 41 50 32 32 20 00 02 01 74 00 1c 00 50 20 20 20 20 20 20 ┆ 2 P ENTRY SPAP17 H P ENTRY SPAP18 ^ P ENTRY SPAP22 t P ┆
0x04b0…0500 (3, 0, 400) 20 20 20 45 4e 54 52 59 20 20 20 53 50 41 50 32 37 20 00 02 01 8a 00 12 00 50 20 45 4e 54 52 59 20 53 50 43 48 4b 31 20 00 03 00 1a 00 12 00 50 20 45 4e 54 52 59 20 53 50 43 48 4b 32 20 00 03 00 30 00 12 00 50 20 45 4e 54 52 59 20 53 50 43 ┆ ENTRY SPAP27 P ENTRY SPCHK1 P ENTRY SPCHK2 0 P ENTRY SPC┆
0x0500…0550 48 4b 33 20 00 03 00 46 00 12 00 50 20 45 4e 54 52 59 20 53 50 43 48 4b 34 20 00 03 00 5c 00 12 00 50 20 45 4e 54 52 59 20 53 50 43 48 4b 35 20 00 03 00 72 00 12 00 50 5c 45 4e 54 52 59 5c 53 50 43 48 4b 36 20 00 03 00 88 00 12 00 50 5c 45 ┆HK3 F P ENTRY SPCHK4 P ENTRY SPCHK5 r P ENTRY SPCHK6 P E┆
0x0550…05a0 4e 54 52 59 5c 53 50 43 48 4b 37 20 00 03 00 9e 00 12 00 50 5c 45 4e 54 52 59 5c 53 50 54 43 48 4b 20 00 03 00 b4 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 ┆NTRY SPCHK7 P ENTRY SPTCHK L P**************************************┆
0x05a0…05f0 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 00 03 00 ca 00 4c 00 50 2a 20 00 00 00 00 00 00 00 00 00 00 00 00 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* ┆
0x05f0…0640 00 00 00 00 00 00 00 00 00 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 03 01 1a 00 4c 00 50 2a 20 20 20 50 52 4f 43 45 44 55 52 45 3a 20 20 20 20 20 53 50 41 50 50 4c 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ * L P* PROCEDURE: SPAPPL ┆
0x0640…0690 (4, 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 2a 00 03 01 6a 00 4c 00 50 2a 20 20 20 46 55 4e 43 54 49 4f 4e 41 4c 20 44 45 53 43 52 49 50 54 49 4f 4e 3a 00 00 00 00 00 00 00 00 00 00 00 ┆ * j L P* FUNCTIONAL DESCRIPTION: ┆
0x0690…06e0 00 00 00 00 00 00 00 00 00 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 04 00 2a 00 4c 00 50 2a 20 20 20 20 20 20 50 45 52 46 4f 52 4d 20 43 48 45 43 4b 53 20 4f 4e 20 56 41 4c 55 45 20 45 4e 54 45 52 45 44 ┆ * * L P* PERFORM CHECKS ON VALUE ENTERED┆
0x06e0…0730 20 57 48 49 4c 45 20 49 4e 20 53 43 52 45 45 4e 20 4d 41 4e 41 47 45 4d 45 4e 54 00 00 00 00 00 00 2a 00 04 00 7a 00 4c 00 50 2a 20 20 20 20 20 20 41 46 54 45 52 20 54 48 45 20 4f 50 45 52 41 54 4f 52 20 48 41 53 20 45 4e 54 45 52 45 44 20 ┆ WHILE IN SCREEN MANAGEMENT * z L P* AFTER THE OPERATOR HAS ENTERED ┆
0x0730…0780 41 20 56 41 4c 55 45 20 49 4e 20 41 20 46 49 45 4c 44 20 57 48 49 43 48 00 00 00 00 00 00 00 00 00 2a 00 04 00 ca 00 4c 00 50 2a 20 20 20 20 20 20 43 4f 4e 54 41 49 4e 53 20 41 4e 20 41 50 50 4c 2d 50 41 52 41 4d 45 54 45 52 2c 20 53 43 52 ┆A VALUE IN A FIELD WHICH * L P* CONTAINS AN APPL-PARAMETER, SCR┆
0x0780…07d0 45 45 4e 2d 4d 41 4e 41 47 45 4d 45 4e 54 20 57 49 4c 4c 20 47 49 56 45 00 00 00 00 00 00 00 00 00 2a 00 04 01 1a 00 4c 00 50 2a 20 20 20 20 20 20 43 4f 4e 54 52 4f 4c 20 54 4f 20 53 50 41 50 50 4c 2e 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆EEN-MANAGEMENT WILL GIVE * L P* CONTROL TO SPAPPL. ┆
0x07d0…0820 (5, 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 2a 00 04 01 6a 00 4c 00 50 2a 20 20 20 20 20 20 53 50 41 50 50 4c 20 57 49 4c 4c 20 54 48 45 4e 20 50 45 52 46 4f 52 4d 20 43 48 45 43 4b 53 ┆ * j L P* SPAPPL WILL THEN PERFORM CHECKS┆
0x0820…0870 20 4f 4e 20 54 48 45 20 56 41 4c 55 45 20 45 4e 54 45 52 45 44 20 41 4e 44 00 00 00 00 00 00 00 00 2a 00 05 00 2a 00 4c 00 50 2a 20 20 20 20 20 20 54 45 4c 4c 20 53 43 52 45 45 4e 2d 4d 41 4e 41 47 45 4d 45 4e 54 20 57 48 41 54 20 54 4f 20 ┆ ON THE VALUE ENTERED AND * * L P* TELL SCREEN-MANAGEMENT WHAT TO ┆
0x0870…08c0 44 4f 20 46 55 52 54 48 45 52 2e 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 2a 00 05 00 7a 00 4c 00 50 2a 20 20 20 20 20 20 2d 20 54 48 45 20 56 41 4c 55 45 20 45 4e 54 45 52 45 44 20 49 53 20 46 49 52 53 54 20 4d 4f ┆DO FURTHER. * z L P* - THE VALUE ENTERED IS FIRST MO┆
0x08c0…0910 56 45 44 20 54 4f 20 54 48 45 20 43 4f 52 52 45 53 50 4f 4e 44 49 4e 47 00 00 00 00 00 00 00 00 00 2a 00 05 00 ca 00 4c 00 50 2a 20 20 20 20 20 20 20 20 44 41 54 41 2d 49 54 45 4d 2c 20 53 4f 20 43 48 45 43 4b 53 20 43 41 4e 20 42 45 20 50 ┆VED TO THE CORRESPONDING * L P* DATA-ITEM, SO CHECKS CAN BE P┆
0x0910…0960 45 52 46 4f 52 4d 45 44 20 4f 4e 20 54 48 41 54 20 44 41 54 41 2d 49 54 45 4d 00 00 00 00 00 00 00 2a 00 05 01 1a 00 4c 00 50 2a 20 20 20 20 20 20 20 20 4f 52 20 4f 4e 20 54 48 45 20 43 4f 4e 54 45 4e 54 53 20 4f 46 20 53 50 49 4e 50 55 54 ┆ERFORMED ON THAT DATA-ITEM * L P* OR ON THE CONTENTS OF SPINPUT┆
0x0960…09b0 (6, 0, 400) 20 28 3d 20 54 48 45 20 53 43 52 45 45 4e 20 4d 41 4e 41 47 45 4d 45 4e 54 00 00 00 00 00 00 00 00 2a 00 05 01 6a 00 4c 00 50 2a 20 20 20 20 20 20 20 20 49 4e 50 55 54 20 42 55 46 46 45 52 29 2e 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ (= THE SCREEN MANAGEMENT * j L P* INPUT BUFFER). ┆
0x09b0…0a00 00 00 00 00 00 00 00 00 00 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 06 00 2a 00 4c 00 50 2a 20 20 20 20 20 2d 20 49 4e 20 4d 4f 53 54 20 43 41 53 45 53 20 54 48 45 20 41 43 54 55 41 4c 20 43 48 45 43 4b ┆ * * L P* - IN MOST CASES THE ACTUAL CHECK┆
0x0a00…0a50 49 4e 47 20 49 53 20 44 4f 4e 45 20 42 59 20 41 20 53 50 41 50 58 58 2d 52 4f 55 54 49 4e 45 00 00 2a 00 06 00 7a 00 4c 00 50 2a 20 20 20 20 20 20 20 57 48 45 52 45 20 58 58 20 49 53 20 54 48 45 20 56 41 4c 55 45 20 4f 46 20 54 48 45 20 41 ┆ING IS DONE BY A SPAPXX-ROUTINE * z L P* WHERE XX IS THE VALUE OF THE A┆
0x0a50…0aa0 50 50 4c 2d 50 41 52 41 4d 45 54 45 52 20 49 4e 20 54 48 45 20 46 4f 52 4d 41 54 00 00 00 00 00 00 2a 00 06 00 ca 00 4c 00 50 2a 20 20 20 20 20 20 20 44 45 46 49 4e 49 54 49 4f 4e 2e 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆PPL-PARAMETER IN THE FORMAT * L P* DEFINITION. ┆
0x0aa0…0af0 00 00 00 00 00 00 00 00 00 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 06 01 1a 00 4c 00 50 2a 20 20 20 20 20 20 20 49 4e 54 45 52 46 41 43 45 20 42 45 54 57 45 45 4e 20 53 50 41 50 50 4c 20 41 4e 44 20 41 ┆ * L P* INTERFACE BETWEEN SPAPPL AND A┆
0x0af0…0b40 (7, 0, 400) 4e 20 53 50 41 50 58 58 2d 52 4f 55 54 49 4e 45 20 49 53 20 44 4f 4e 45 00 00 00 00 00 00 00 00 00 2a 00 06 01 6a 00 4c 00 50 2a 20 20 20 20 20 20 20 42 59 20 54 48 45 20 56 41 52 49 41 42 4c 45 20 4e 57 52 45 54 43 44 45 2c 20 41 53 20 46 ┆N SPAPXX-ROUTINE IS DONE * j L P* BY THE VARIABLE NWRETCDE, AS F┆
0x0b40…0b90 4f 4c 4c 4f 57 53 3a 00 00 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 00 2a 00 4c 00 50 2a 20 20 20 20 20 20 20 20 20 56 41 4c 55 45 20 4f 46 20 4e 57 52 45 54 43 44 45 3a 20 20 20 20 20 20 20 20 20 20 ┆OLLOWS: * * L P* VALUE OF NWRETCDE: ┆
0x0b90…0be0 20 4d 45 41 4e 53 3a 00 00 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 00 7a 00 4c 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 48 ┆ MEANS: * z L P* 0 CH┆
0x0be0…0c30 45 43 4b 20 4f 4b 45 20 28 44 45 46 41 55 4c 54 29 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 2a 00 07 00 ca 00 4c 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 52 ┆ECK OKE (DEFAULT) * L P* 1 ER┆
0x0c30…0c80 52 4f 52 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 00 00 00 2a 00 07 01 1a 00 4c 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 ┆ROR DETECTED * L P* 3 CA┆
0x0c80…0cd0 (8, 0, 400) 4e 43 45 4c 20 4f 43 43 55 52 52 45 44 20 4f 52 20 4e 45 43 45 53 53 41 52 59 00 00 00 00 00 00 00 2a 00 07 01 6a 00 4c 00 50 2a 20 20 20 55 53 45 20 4f 46 20 56 41 52 49 41 42 4c 45 53 3a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆NCEL OCCURRED OR NECESSARY * j L P* USE OF VARIABLES: ┆
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 00 00 2a 00 08 00 2a 00 4c 00 50 2a 20 20 20 20 20 20 53 50 42 49 4e 57 32 20 28 55 50 44 41 54 45 29 3a 20 49 4e 44 45 58 20 49 4e 20 54 48 45 20 ┆ * * L P* SPBINW2 (UPDATE): INDEX IN THE ┆
0x0d20…0d70 53 43 52 45 45 4e 2d 4d 41 4e 41 47 45 4d 45 4e 54 20 4b 45 59 54 41 42 4c 45 00 00 00 00 00 00 00 2a 00 08 00 7a 00 4c 00 50 2a 20 20 20 20 20 20 53 50 42 49 4e 57 33 20 28 49 4e 50 55 54 29 3a 20 20 41 50 50 4c 2d 50 41 52 41 4d 45 54 45 ┆SCREEN-MANAGEMENT KEYTABLE * z L P* SPBINW3 (INPUT): APPL-PARAMETE┆
0x0d70…0dc0 52 20 46 52 4f 4d 20 46 4f 52 4d 41 54 20 44 45 46 49 4e 49 54 49 4f 4e 00 00 00 00 00 00 00 00 00 2a 00 08 00 ca 00 4c 00 50 2a 20 20 20 20 20 20 53 50 42 49 4e 57 33 20 28 4f 55 54 50 55 54 29 3a 20 41 43 54 49 4f 4e 20 54 4f 20 42 45 20 ┆R FROM FORMAT DEFINITION * L P* SPBINW3 (OUTPUT): ACTION TO BE ┆
0x0dc0…0e10 54 41 4b 45 4e 20 42 59 20 53 43 52 45 45 4e 2d 4d 41 4e 41 47 45 4d 45 4e 54 3a 00 00 00 00 00 00 2a 00 08 01 1a 00 4c 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 56 41 4c 55 45 20 3d 20 30 20 3a 20 20 20 43 4f 4e 54 49 4e 55 45 ┆TAKEN BY SCREEN-MANAGEMENT: * L P* IF VALUE = 0 : CONTINUE┆
0x0e10…0e60 (9, 0, 400) 20 41 43 43 4f 52 44 49 4e 47 20 54 4f 20 49 4e 44 45 58 20 49 4e 20 53 50 42 49 4e 57 32 00 00 00 2a 00 08 01 6a 00 4c 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 56 41 4c 55 45 20 3d 20 33 20 3a 20 20 20 45 52 52 4f 52 20 44 45 ┆ ACCORDING TO INDEX IN SPBINW2 * j L P* IF VALUE = 3 : ERROR DE┆
0x0e60…0eb0 54 45 43 54 45 44 2c 20 44 49 53 50 4c 41 59 20 45 52 52 4f 52 4d 45 53 53 41 47 45 00 00 00 00 00 2a 00 09 00 2a 00 4c 00 50 2a 20 20 20 20 20 20 53 50 42 49 4e 57 34 20 28 4f 55 54 50 55 54 29 3a 20 43 4f 4e 54 41 49 4e 53 20 54 48 45 20 ┆TECTED, DISPLAY ERRORMESSAGE * * L P* SPBINW4 (OUTPUT): CONTAINS THE ┆
0x0eb0…0f00 4e 55 4d 42 45 52 20 4f 46 20 54 48 45 20 45 52 52 4f 52 20 4d 45 53 53 41 47 45 00 00 00 00 00 00 2a 00 09 00 7a 00 4c 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 4f 20 42 45 20 44 49 53 50 4c 41 59 ┆NUMBER OF THE ERROR MESSAGE * z L P* TO BE DISPLAY┆
0x0f00…0f50 45 44 20 42 59 20 53 43 52 45 45 4e 2d 4d 41 4e 41 47 45 4d 45 4e 54 00 00 00 00 00 00 00 00 00 00 2a 00 09 00 ca 00 4c 00 50 2a 20 20 20 20 20 20 53 50 49 4e 50 55 54 20 28 49 4e 50 55 54 29 3a 20 20 43 4f 4e 54 41 49 4e 53 20 54 48 45 20 ┆ED BY SCREEN-MANAGEMENT * L P* SPINPUT (INPUT): CONTAINS THE ┆
0x0f50…0fa0 56 41 4c 55 45 20 45 4e 54 45 52 45 44 20 42 59 20 54 48 45 20 4f 50 45 52 41 54 4f 52 00 00 00 00 2a 00 09 01 1a 00 4c 00 50 2a 20 20 20 20 20 20 4e 57 52 45 54 43 44 45 3a 20 20 20 20 20 20 20 20 20 49 4e 54 45 52 46 41 43 45 20 57 49 54 ┆VALUE ENTERED BY THE OPERATOR * L P* NWRETCDE: INTERFACE WIT┆
0x0fa0…0ff0 (10, 0, 400) 48 20 53 50 41 50 58 58 2d 52 4f 55 54 49 4e 45 53 2e 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 2a 00 09 01 6a 00 4c 00 50 2a 20 00 00 00 00 00 00 00 00 00 00 00 00 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 SPAPXX-ROUTINES. * j L P* ┆
0x0ff0…1040 00 00 00 00 00 00 00 00 00 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 2a 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 ┆ * * L P**************************************┆
0x1040…1090 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 00 0a 00 7a 00 4c 00 50 53 50 41 50 50 4c 5c 50 52 4f 43 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 ┆********************************** z L PSPAPPL PROC ┆
0x1090…10e0 00 00 00 00 00 00 00 00 00 00 00 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 ca 00 4c 00 50 53 50 30 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 ┆ L PSP000 ┆
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 0a 01 1a 00 30 00 50 5c 55 50 44 46 4c 44 5c 31 2c 53 50 49 4e 50 55 54 5c 55 50 44 41 54 45 20 46 49 45 4c 44 20 42 45 46 4f 52 45 20 ┆ 0 P UPDFLD 1,SPINPUT UPDATE FIELD BEFORE ┆
0x1130…3390 (11, 0, 400) […elided…]
0x3390…33e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 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 21 00 04 00 4c 00 50 2a 2a ┆ * ! L P**┆
0x33e0…3430 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 00 21 00 54 00 4c 00 50 53 50 ┆********************************************************************** ! T L PSP┆
0x3430…3480 41 50 31 37 5c 50 52 4f 43 5c 58 57 52 45 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 21 00 a4 00 10 00 50 5c 50 ┆AP17 PROC XWRET ! P P┆
0x3480…34d0 42 49 4e 5c 58 57 52 45 54 20 00 21 00 f4 00 4c 00 50 53 31 37 30 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 ┆BIN XWRET ! L PS17000 ┆
0x34d0…351a 00 00 00 00 00 00 00 00 00 00 00 21 01 08 00 4c 00 50 5c 4d 4f 56 45 5c 57 44 45 43 31 2c 53 50 49 4e 50 55 54 5c 43 4f 4e 56 45 52 54 20 54 4f 20 44 45 43 49 4d 41 4c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ! L P MOVE WDEC1,SPINPUT CONVERT TO DECIMAL ┆
0x351a…356a (34, 0, 400) 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 21 01 58 00 4c 00 50 5c 43 42 4c 5c 57 44 45 43 31 2c 3d 44 27 31 27 2c 53 31 37 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 ┆ ! X L P CBL WDEC1,=D'1',S17500 ┆
0x356a…35ba 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 22 00 18 00 4c 00 50 5c 43 42 47 5c 57 44 45 43 31 2c 3d 44 27 38 27 2c 53 31 37 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 ┆ " L P CBG WDEC1,=D'8',S17500 ┆
0x35ba…360a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 22 00 68 00 4c 00 50 5c 42 5c 53 31 37 39 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 ┆ " h L P B S17900 ┆
0x360a…365a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 22 00 b8 00 4c 00 50 53 31 37 35 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 ┆ " L PS17500 ┆
0x365a…36aa 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 22 01 08 00 4c 00 50 5c 4d 4f 56 45 5c 58 57 52 45 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 ┆ " L P MOVE XWRET,=W'1' ┆
0x36aa…36fa (35, 0, 400) 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 22 01 58 00 4c 00 50 5c 4d 4f 56 45 5c 53 50 42 49 4e 57 34 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 ┆ " X L P MOVE SPBINW4,=W'1' ┆
0x36fa…374a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 23 00 18 00 4c 00 50 53 31 37 39 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 ┆ # L PS17900 ┆
0x374a…379a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 23 00 68 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 ┆ # h L P RET ┆
0x379a…37ea 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 23 00 b8 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 ┆ # L P PEND ┆
0x37ea…383a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 23 01 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 ┆ # L P********************************************************┆
0x383a…388a (36, 0, 400) 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 23 01 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 ┆**************** # X L P* ┆
0x388a…38da 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 2a 00 24 00 18 00 4c 00 50 2a 20 20 20 49 4e 50 55 54 2d 46 49 45 4c 44 20 4d 55 53 54 20 4e 4f 54 20 42 45 20 53 50 41 43 45 53 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ * $ L P* INPUT-FIELD MUST NOT BE SPACES ┆
0x38da…392a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 2a 00 24 00 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 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ * $ h L P* ┆
0x392a…397a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 2a 00 24 00 b8 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 ┆ * $ L P********************************************************┆
0x397a…39ca 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 24 01 08 00 4c 00 50 53 50 41 50 31 38 5c 50 52 4f 43 5c 58 57 52 45 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 ┆**************** $ L PSPAP18 PROC XWRET ┆
0x39ca…3a1a (37, 0, 400) 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 24 01 58 00 10 00 50 5c 50 42 49 4e 5c 58 57 52 45 54 20 00 25 00 18 00 4c 00 50 53 31 38 30 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 ┆ $ X P PBIN XWRET % L PS18000 ┆
0x3a1a…3a6a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 25 00 2c 00 4c 00 50 5c 4d 4f 56 45 5c 57 43 53 54 52 47 32 35 2c 3d 43 27 20 27 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ % , L P MOVE WCSTRG25,=C' ' ┆
0x3a6a…3aba 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 25 00 7c 00 4c 00 50 5c 43 4f 50 59 5c 57 43 53 54 52 47 32 35 2c 4b 57 30 2c 53 50 42 49 4e 57 31 2c 53 50 49 4e 50 55 54 2c 4b ┆ % | L P COPY WCSTRG25,KW0,SPBINW1,SPINPUT,K┆
0x3aba…3b0a 57 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 25 00 cc 00 4c 00 50 5c 43 42 45 5c 57 43 53 54 52 47 32 35 2c 3d 43 27 20 27 2c 53 31 38 35 30 30 5c 5c 5c 00 00 00 00 00 00 00 ┆W0 % L P CBE WCSTRG25,=C' ',S18500 ┆
0x3b0a…3b5a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 25 01 1c 00 4c 00 50 5c 42 5c 53 31 38 39 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 ┆ % L P B S18900 ┆
0x3b5a…3baa (38, 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 25 01 6c 00 4c 00 50 53 31 38 35 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 ┆ % l L PS18500 ┆
0x3baa…3bfa 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 26 00 2c 00 4c 00 50 5c 4d 4f 56 45 5c 58 57 52 45 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 ┆ & , L P MOVE XWRET,=W'1' ┆
0x3bfa…3c4a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 26 00 7c 00 4c 00 50 5c 4d 4f 56 45 5c 53 50 42 49 4e 57 34 2c 3d 57 27 31 27 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ & | L P MOVE SPBINW4,=W'1' ┆
0x3c4a…3c9a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 26 00 cc 00 4c 00 50 53 31 38 39 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 ┆ & L PS18900 ┆
0x3c9a…3cea 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 26 01 1c 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 ┆ & L P RET ┆
0x3cea…3d3a (39, 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 26 01 6c 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 ┆ & l L P PEND ┆
0x3d3a…3d8a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 27 00 2c 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 ┆ ' , L P************************************┆
0x3d8a…3dda 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 00 27 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 ┆************************************ ' | L P* ┆
0x3dda…3e2a 00 00 00 00 00 00 00 00 00 00 00 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 27 00 cc 00 24 00 50 2a 20 20 20 43 4f 4e 54 49 4e 55 45 20 46 52 4f 4d 20 43 55 52 52 45 4e 54 20 53 43 52 45 45 4e 00 27 01 1c ┆ * ' $ P* CONTINUE FROM CURRENT SCREEN ' ┆
0x3e2a…3e7a 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 00 27 01 44 ┆ L P* * ' D┆
0x3e7a…3eca (40, 0, 400) 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 00 28 00 04 ┆ L P************************************************************************ ( ┆
0x3eca…3f1a 00 16 00 50 53 50 41 50 32 32 5c 50 52 4f 43 5c 58 57 52 45 54 20 00 28 00 54 00 10 00 50 5c 50 42 49 4e 5c 58 57 52 45 54 20 00 28 00 6e 00 0a 00 50 53 32 32 30 30 30 00 28 00 82 00 1a 00 50 5c 4d 4f 56 45 5c 53 50 42 49 4e 57 32 2c 4b 57 ┆ PSPAP22 PROC XWRET ( T P PBIN XWRET ( n PS22000 ( P MOVE SPBINW2,KW┆
0x3f1a…3f6a 53 50 43 4f 4e 54 00 28 00 90 00 0a 00 50 53 32 32 39 39 39 00 28 00 ae 00 08 00 50 5c 52 45 54 00 28 00 bc 00 0a 00 50 5c 50 45 4e 44 20 00 28 00 c8 00 4a 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 ┆SPCONT ( PS22999 ( P RET ( P PEND ( J P**************************┆
0x3f6a…3fba 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 20 00 28 00 d6 00 06 00 50 2a 20 00 28 01 24 00 30 00 50 2a 20 20 20 56 41 4c 55 45 20 45 4e 54 45 52 45 44 20 ┆******************************************* ( P* ( $ 0 P* VALUE ENTERED ┆
0x3fba…400a 4d 55 53 54 20 42 45 20 47 52 45 41 54 45 52 20 54 48 45 4e 20 5a 45 52 4f 20 00 28 01 2e 00 06 00 50 2a 20 00 28 01 62 00 4a 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 ┆MUST BE GREATER THEN ZERO ( . P* ( b J P************************************┆
0x400a…405a (41, 0, 400) 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 20 00 28 01 6c 00 1a 00 50 53 50 41 50 32 37 20 20 20 50 52 4f 43 20 20 20 20 58 57 52 45 54 00 29 00 2a 00 10 00 50 5c 50 42 49 4e 5c 58 57 ┆********************************* ( l PSPAP27 PROC XWRET ) * P PBIN XW┆
0x405a…40aa 52 45 54 20 00 29 00 48 00 0a 00 50 53 32 37 30 30 30 00 29 00 5c 00 22 00 50 20 20 20 20 20 20 20 20 20 4d 4f 56 45 20 20 20 20 57 44 45 43 31 2c 53 50 49 4e 50 55 54 00 29 00 6a 00 28 00 50 20 20 20 20 20 20 20 20 20 43 42 47 20 20 20 20 ┆RET ) H PS27000 ) " P MOVE WDEC1,SPINPUT ) j ( P CBG ┆
0x40aa…40fa 20 57 44 45 43 31 2c 3d 44 27 30 27 2c 53 32 37 35 30 30 20 00 29 00 90 00 20 00 50 20 20 20 20 20 20 20 20 20 4d 4f 56 45 20 20 20 20 58 57 52 45 54 2c 3d 57 27 31 27 00 29 00 bc 00 40 00 50 20 20 20 20 20 20 20 20 20 4d 4f 56 45 20 20 20 ┆ WDEC1,=D'0',S27500 ) P MOVE XWRET,=W'1' ) @ P MOVE ┆
0x40fa…414a 20 53 50 42 49 4e 57 34 2c 3d 57 27 31 27 20 20 20 20 20 20 20 20 20 27 56 41 4c 55 45 20 4e 4f 54 20 49 4e 20 52 41 4e 47 45 27 20 00 29 00 e0 00 1c 00 50 20 20 20 20 20 20 20 20 20 42 20 20 20 20 20 20 20 53 32 37 39 39 39 20 00 29 01 24 ┆ SPBINW4,=W'1' 'VALUE NOT IN RANGE' ) P B S27999 ) $┆
0x414a…419a 00 0a 00 50 53 32 37 35 30 30 00 29 01 44 00 20 00 50 20 20 20 20 20 20 20 20 20 4d 4f 56 45 20 20 20 20 58 57 52 45 54 2c 3d 57 27 30 27 00 29 01 52 00 0a 00 50 53 32 37 39 39 39 00 29 01 76 00 10 00 50 20 20 20 20 20 20 20 20 20 52 45 54 ┆ PS27500 ) D P MOVE XWRET,=W'0' ) R PS27999 ) v P RET┆
0x419a…41ea (42, 0, 398) 00 29 01 84 00 12 00 50 20 20 20 20 20 20 20 20 20 50 45 4e 44 20 00 2a 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 ┆ ) P PEND * L P**************************************************┆
0x41ea…423a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 2a 00 1e 00 10 00 50 53 50 43 48 4b 31 20 50 52 4f 43 20 00 2a 00 6e 00 08 00 04 20 52 45 54 00 2a 00 82 00 0a 00 05 20 50 45 4e 44 20 00 2a 00 8e 00 10 00 50 53 50 43 48 ┆********************** * PSPCHK1 PROC * n RET * PEND * PSPCH┆
0x423a…428a 4b 32 20 50 52 4f 43 20 00 2a 00 9c 00 08 00 04 20 52 45 54 00 2a 00 b0 00 0a 00 05 20 50 45 4e 44 20 00 2a 00 bc 00 10 00 50 53 50 43 48 4b 33 20 50 52 4f 43 20 00 2a 00 ca 00 08 00 04 20 52 45 54 00 2a 00 de 00 0a 00 05 20 50 45 4e 44 20 ┆K2 PROC * RET * PEND * PSPCHK3 PROC * RET * PEND ┆
0x428a…42da 00 2a 00 ea 00 10 00 50 53 50 43 48 4b 34 20 50 52 4f 43 20 00 2a 00 f8 00 08 00 04 20 52 45 54 00 2a 01 0c 00 0a 00 05 20 50 45 4e 44 20 00 2a 01 18 00 10 00 50 53 50 43 48 4b 35 20 50 52 4f 43 20 00 2a 01 26 00 08 00 04 20 52 45 54 00 2a ┆ * PSPCHK4 PROC * RET * PEND * PSPCHK5 PROC * & RET *┆
0x42da…4328 01 3a 00 0a 00 05 20 50 45 4e 44 20 00 2a 01 46 00 10 00 50 53 50 43 48 4b 36 20 50 52 4f 43 20 00 2a 01 54 00 08 00 50 20 52 45 54 00 2a 01 68 00 0a 00 50 20 50 45 4e 44 20 00 2a 01 74 00 10 00 50 53 50 43 48 4b 37 20 50 52 4f 43 20 ┆ : PEND * F PSPCHK6 PROC * T P RET * h P PEND * t PSPCHK7 PROC ┆
0x4328…4378 (43, 2, 96) 00 2a 01 82 00 08 00 50 20 52 45 54 00 2b 00 08 00 0a 00 50 20 50 45 4e 44 20 00 2b 00 14 00 10 00 50 53 50 54 43 48 4b 20 50 52 4f 43 20 00 2b 00 22 00 08 00 50 5c 52 45 54 00 2b 00 36 00 0a 00 50 5c 50 45 4e 44 20 00 2b 00 42 00 08 00 04 ┆ * P RET + P PEND + PSPTCHK PROC + " P RET + 6 P PEND + B ┆
0x4378…4388 20 45 4e 44 00 2b 00 50 40 04 00 00 00 2b 00 5c ┆ END + P@ + ┆
0x4388…4390 (44, 1, 8) 20 04 00 00 00 2c 00 04 ┆ , ┆