|
DataMuseum.dkPresents historical artifacts from the history of: IBM System/36 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about IBM System/36 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 8192 (0x2000)
Types: GA21-9182-File
Names: »QRY«
└─⟦631246a38⟧ Bits:30009808 REF.NO PWG83 PGM 5727-QU6 FEAT9074 QUERY/36 DA Z250-0037-2 REL/LEV 05.01 SEQ. 1/3 DISKET 2S 96TPI INTERNAL 88.01.08 31
└─⟦this⟧
0x0000…0020 (0,) d7 d8 d9 e8 40 40 40 40 40 00 00 04 50 00 0b 00 00 00 00 40 00 02 00 04 00 02 30 00 00 00 00 00 ┆PQRY & ┆
0x0020…0040 00 00 00 00 00 00 00 20 80 40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 a6 5c 40 f5 f7 f2 f7 60 ┆ Ø w* 5727-┆
0x0040…0060 d8 e4 f1 40 4d c3 5d 40 c3 d6 d7 e8 d9 c9 c7 c8 e3 40 c9 c2 d4 40 c3 d6 d9 d7 40 f1 f9 f8 f5 2a ┆QU1 (C) COPYRIGHT IBM CORP 1985 ┆
0x0060…0080 ad 5c 40 d3 c9 c3 c5 d5 e2 c5 c4 40 d4 c1 e3 c5 d9 c9 c1 d3 40 60 40 d7 d9 d6 c7 d9 c1 d4 40 d7 ┆Ý* LICENSED MATERIAL - PROGRAM P┆
0x0080…00a0 d9 d6 d7 c5 d9 e3 e8 40 d6 c6 40 c9 c2 d4 23 96 61 61 40 d4 c5 d4 c2 c5 d9 40 e4 e2 c5 d9 f1 60 ┆ROPERTY OF IBM o// MEMBER USER1-┆
0x00a0…00c0 7b 7b d4 e2 c7 f2 3a aa 61 61 40 c9 c6 40 d1 d6 c2 d8 60 d5 d6 40 c9 c6 40 c5 e5 d6 d2 c5 c4 60 ┆##MSG2 ¡// IF JOBQ-NO IF EVOKED-┆
0x00c0…00e0 d5 d6 40 5c 40 7d 40 d8 d9 e8 6f d4 f5 f5 f0 f0 6f 7d 26 91 61 61 40 d9 c5 c7 c9 d6 d5 40 e2 c9 ┆NO * ' QRY?M5500?' j// REGION SI┆
0x00e0…0100 e9 c5 60 f4 f8 3f a6 61 61 40 d4 c5 d4 c2 c5 d9 40 e4 e2 c5 d9 f2 60 7b d8 e4 7b f2 d4 6b d3 c9 ┆ZE-48 w// MEMBER USER2-#QU#2M,LI┆
0x0100…0120 c2 d9 c1 d9 e8 60 7b d8 d9 e8 d3 c9 c2 2a 95 61 61 40 d3 d6 c1 c4 40 7b d8 e4 c4 c1 6b 7b d8 d9 ┆BRARY-#QRYLIB n// LOAD #QUDA,#QR┆
0x0120…0140 e8 d3 c9 c2 3b 86 61 61 40 d9 e4 d5 4a 89 61 61 40 d9 c5 e3 e4 d9 d5 47 ae 5c 40 c9 c6 40 d8 d9 ┆YLIB f// RUN¢i// RETURNåÞ* IF QR┆
0x0140…0160 e8 40 d5 d6 e3 40 d7 d3 c1 c3 c5 c4 40 d6 d5 40 e3 c8 c5 40 d1 d6 c2 40 d8 e4 c5 e4 c5 40 d6 d9 ┆Y NOT PLACED ON THE JOB QUEUE OR┆
0x0160…0180 40 c5 e5 d6 d2 c5 c4 22 81 5c 04 a8 c9 e2 e2 e4 c5 40 7d d8 d9 e8 40 d7 d9 d6 c3 c5 c4 e4 d9 c5 ┆ EVOKED a* yISSUE 'QRY PROCEDURE┆
0x0180…01a0 40 c9 e2 40 d9 e4 d5 d5 c9 d5 c7 7d 40 d4 c5 e2 e2 c1 c7 c5 23 00 ff ff ff ff ff ff ff ff ff ff ┆ IS RUNNING' MESSAGE ┆
0x01a0…01c0 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
[…0x3…]
0x0220…0240 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff d7 d8 d9 e8 c4 c5 40 40 ┆ PQRYDE ┆
0x0240…0260 40 00 00 02 50 00 03 00 00 00 00 40 00 02 00 05 00 01 30 00 00 00 00 00 00 00 00 00 00 00 00 20 ┆ & ┆
0x0260…0280 80 3f 66 00 00 00 00 00 00 00 00 00 00 00 00 00 91 61 61 40 d9 c5 c7 c9 d6 d5 40 e2 c9 e9 c5 60 ┆Ø Ã j// REGION SIZE-┆
0x0280…02a0 f4 f8 3f 8d 61 61 40 d3 d6 c1 c4 40 7b c4 e2 c9 d5 43 86 61 61 40 d9 e4 d5 4a 00 00 00 00 00 00 ┆48 ý// LOAD #DSINäf// RUN¢ ┆
0x02a0…02c0 00 00 00 d7 d8 d9 e8 40 40 40 40 40 00 0e 23 50 00 0b 00 00 00 00 40 00 02 00 04 00 02 30 00 00 ┆ PQRY & ┆
0x02c0…02e0 00 00 00 00 00 00 00 00 00 00 00 80 40 00 00 00 00 00 00 00 00 00 d7 d8 d9 e8 c4 c5 40 40 40 00 ┆ Ø PQRYDE ┆
0x02e0…0300 0e 25 50 00 03 00 00 00 00 40 00 02 00 04 00 00 30 00 00 00 00 00 00 00 00 00 00 00 00 00 80 3f ┆ & Ø ┆
0x0300…0320 cc 00 00 00 00 00 00 00 00 d7 d8 d9 e8 c9 d3 d6 c4 40 00 0e 26 50 00 17 00 00 00 00 40 00 02 00 ┆ö PQRYILOD & ┆
0x0320…0340 05 00 04 30 00 00 00 00 00 00 00 00 00 00 00 00 00 80 3f cc 00 00 00 00 00 00 00 00 d7 d8 d9 e8 ┆ Ø ö PQRY┆
0x0340…0360 d3 d6 c1 c4 40 00 0e 2a 50 00 16 00 00 00 00 40 00 02 00 05 00 03 30 00 00 00 00 00 00 00 00 00 ┆LOAD & ┆
0x0360…0380 00 00 00 00 80 3f 99 00 00 00 00 00 00 00 00 ff d7 d8 d9 e8 c4 d9 d6 d7 40 00 00 08 50 00 16 00 ┆ Ø r PQRYDROP & ┆
0x0380…03a0 00 00 00 40 00 02 00 05 00 04 30 00 00 00 00 00 00 00 00 00 00 00 00 20 00 00 00 00 00 00 00 00 ┆ ┆
0x03a0…03c0 00 00 00 00 00 00 00 00 96 61 61 40 d4 c5 d4 c2 c5 d9 40 e4 e2 c5 d9 f1 60 7b 7b d4 e2 c7 f2 3a ┆ o// MEMBER USER1-##MSG2 ┆
0x03c0…03e0 ae 61 61 40 c9 c6 40 d1 d6 c2 d8 60 d5 d6 40 c9 c6 40 c5 e5 d6 d2 c5 c4 60 d5 d6 40 5c 40 7d 40 ┆Þ// IF JOBQ-NO IF EVOKED-NO * ' ┆
0x03e0…0400 d8 d9 e8 c4 d9 d6 d7 6f d4 f5 f5 f0 f0 6f 7d 22 b3 61 61 40 c9 c6 40 c4 c1 e3 c1 c6 f1 60 7b d8 ┆QRYDROP?M5500?' ·// IF DATAF1-#Q┆
0x0400…0420 (1,) d9 e8 d3 c9 c2 40 c4 c5 d3 c5 e3 c5 40 7b d8 d9 e8 d3 c9 c2 6b c6 f1 6b d9 c5 d4 d6 e5 c5 6b 6b ┆RYLIB DELETE #QRYLIB,F1,REMOVE,,┆
0x0420…0440 d3 c9 c2 d9 1d 8e 61 61 40 d3 d6 c1 c4 40 5b d4 c1 c9 d5 e3 42 86 61 61 40 d9 e4 d5 4a a9 61 61 ┆LIBR þ// LOAD $MAINTâf// RUN¢z//┆
0x0440…0460 40 c4 c5 d3 c5 e3 c5 40 d3 c9 c2 d9 c1 d9 e8 60 d7 6b d5 c1 d4 c5 60 d8 d9 e8 c9 d3 d6 c4 6b d9 ┆ DELETE LIBRARY-P,NAME-QRYILOD,R┆
0x0460…0480 c5 e3 c1 c9 d5 60 e2 27 a8 61 61 40 c4 c5 d3 c5 e3 c5 40 d3 c9 c2 d9 c1 d9 e8 60 d7 6b d5 c1 d4 ┆ETAIN-S y// DELETE LIBRARY-P,NAM┆
0x0480…04a0 c5 60 d8 d9 e8 d4 d9 c9 6b d9 c5 e3 c1 c9 d5 60 e2 28 a9 61 61 40 c4 c5 d3 c5 e3 c5 40 d3 c9 c2 ┆E-QRYMRI,RETAIN-S z// DELETE LIB┆
0x04a0…04c0 d9 c1 d9 e8 60 d7 6b d5 c1 d4 c5 60 d8 d9 e8 d3 d6 c1 c4 6b d9 c5 e3 c1 c9 d5 60 e2 27 a9 61 61 ┆RARY-P,NAME-QRYLOAD,RETAIN-S z//┆
0x04c0…04e0 40 c4 c5 d3 c5 e3 c5 40 d3 c9 c2 d9 c1 d9 e8 60 d7 6b d5 c1 d4 c5 60 d8 d9 e8 e2 c1 e5 c5 6b d9 ┆ DELETE LIBRARY-P,NAME-QRYSAVE,R┆
0x04e0…0500 c5 e3 c1 c9 d5 60 e2 27 a9 61 61 40 c4 c5 d3 c5 e3 c5 40 d3 c9 c2 d9 c1 d9 e8 60 d7 6b d5 c1 d4 ┆ETAIN-S z// DELETE LIBRARY-P,NAM┆
0x0500…0520 c5 60 d8 d9 e8 d6 d4 d9 c9 6b d9 c5 e3 c1 c9 d5 60 e2 27 a5 61 61 40 c4 c5 d3 c5 e3 c5 40 d3 c9 ┆E-QRYOMRI,RETAIN-S v// DELETE LI┆
0x0520…0540 c2 d9 c1 d9 e8 60 d7 6b d5 c1 d4 c5 60 d8 d9 e8 6b d9 c5 e3 c1 c9 d5 60 e2 2b a7 61 61 40 c4 c5 ┆BRARY-P,NAME-QRY,RETAIN-S x// DE┆
0x0540…0560 d3 c5 e3 c5 40 d3 c9 c2 d9 c1 d9 e8 60 d7 6b d5 c1 d4 c5 60 d8 d9 e8 c4 c5 6b d9 c5 e3 c1 c9 d5 ┆LETE LIBRARY-P,NAME-QRYDE,RETAIN┆
0x0560…0580 60 e2 29 a8 61 61 40 c4 c5 d3 c5 e3 c5 40 d3 c9 c2 d9 c1 d9 e8 60 d7 6b d5 c1 d4 c5 60 d8 d9 e8 ┆-S y// DELETE LIBRARY-P,NAME-QRY┆
0x0580…05a0 d9 e4 d5 6b d9 c5 e3 c1 c9 d5 60 e2 28 aa 61 61 40 c4 c5 d3 c5 e3 c5 40 d3 c9 c2 d9 c1 d9 e8 60 ┆RUN,RETAIN-S ¡// DELETE LIBRARY-┆
0x05a0…05c0 d7 6b d5 c1 d4 c5 60 d8 d9 e8 d6 c4 d9 d6 d7 6b d9 c5 e3 c1 c9 d5 60 e2 26 a9 61 61 40 c4 c5 d3 ┆P,NAME-QRYODROP,RETAIN-S z// DEL┆
0x05c0…05e0 c5 e3 c5 40 d3 c9 c2 d9 c1 d9 e8 60 d7 6b d5 c1 d4 c5 60 d8 d9 e8 c4 d9 d6 d7 6b d9 c5 e3 c1 c9 ┆ETE LIBRARY-P,NAME-QRYDROP,RETAI┆
0x05e0…0600 d5 60 e2 27 c8 61 61 40 c9 c6 40 d3 d6 c1 c4 60 7d 7b d8 d9 e8 d7 c4 f0 f1 6b 7b d3 c9 c2 d9 c1 ┆N-S H// IF LOAD-'#QRYPD01,#LIBRA┆
0x0600…0620 d9 e8 7d 40 c4 c5 d3 c5 e3 c5 40 d3 c9 c2 d9 c1 d9 e8 60 d6 6b d5 c1 d4 c5 60 7b d8 d9 e8 d7 c4 ┆RY' DELETE LIBRARY-O,NAME-#QRYPD┆
0x0620…0640 4b c1 d3 d3 6b d9 c5 e3 c1 c9 d5 60 e2 08 86 61 61 40 c5 d5 c4 4a 97 61 61 40 c9 c6 c6 40 6f c3 ┆.ALL,RETAIN-S f// END¢p// IFF ?C┆
0x0640…0660 c4 6f 61 f0 f0 f0 f0 40 d9 c5 e3 e4 d9 d5 39 91 d3 d6 c7 d7 d3 c4 40 c4 d9 d6 d7 6b d8 d9 e8 f3 ┆D?/0000 RETURN jLOGPLD DROP,QRY3┆
0x0660…0680 f6 3f af 61 61 40 d3 d6 c3 c1 d3 40 c1 d9 c5 c1 60 e2 e8 e2 e3 c5 d4 6b d6 c6 c6 e2 c5 e3 60 f1 ┆6 ®// LOCAL AREA-SYSTEM,OFFSET-1┆
0x0680…06a0 6b c4 c1 e3 c1 60 7d d8 d9 e8 c4 d9 d6 d7 40 f3 f2 7d 21 8e 61 61 40 d3 d6 c1 c4 40 5b c3 d5 c4 ┆,DATA-'QRYDROP 32' þ// LOAD $CND┆
0x06a0…06c0 d9 d7 42 86 61 61 40 d9 e4 d5 4a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆RPâf// RUN¢ ┆
0x06c0…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 ┆ ┆
[…0x6…]
0x07a0…07c0 00 00 00 00 00 00 00 00 d7 d8 d9 e8 c9 d3 d6 c4 40 00 00 06 50 00 17 00 00 00 00 40 00 02 00 05 ┆ PQRYILOD & ┆
0x07c0…07e0 00 03 30 00 00 00 00 00 00 00 00 00 00 00 00 20 80 3f 33 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ Ø ┆
0x07e0…0800 a1 61 61 40 c9 c6 c6 40 c4 c1 e3 c1 c6 f1 60 7b d8 d9 e8 d3 c9 c2 40 c7 d6 e3 d6 40 c2 d3 c4 d3 ┆~// IFF DATAF1-#QRYLIB GOTO BLDL┆
0x0800…0820 (2,) c9 c2 2f 9e c4 c5 d3 c5 e3 c5 40 7b d8 d9 e8 d3 c9 c2 6b c6 f1 6b d9 c5 d4 d6 e5 c5 6b 6b d3 c9 ┆IB ÆDELETE #QRYLIB,F1,REMOVE,,LI┆
0x0820…0840 c2 d9 32 8d 61 61 40 e3 c1 c7 40 c2 d3 c4 d3 c9 c2 43 8e 61 61 40 d3 d6 c1 c4 40 5b c3 d5 d2 c1 ┆BR ý// TAG BLDLIBäþ// LOAD $CNKA┆
0x0840…0860 d5 42 86 61 61 40 d9 e4 d5 4a 94 61 61 40 d3 d6 c3 c1 d3 40 c1 d9 c5 c1 60 e2 e8 e2 e3 c5 d4 3c ┆Nâf// RUN¢m// LOCAL AREA-SYSTEM ┆
0x0860…0880 a0 61 61 40 c9 c6 c6 40 6f d3 7d f2 f3 f0 6b f1 7d 6f 61 f1 40 c7 d6 e3 d6 40 c3 c8 d2 c1 d5 d1 ┆µ// IFF ?L'230,1'?/1 GOTO CHKANJ┆
0x0880…08a0 c9 30 a2 61 61 40 c5 d3 e2 c5 40 c2 d3 c4 d3 c9 c2 d9 40 7b d8 d9 e8 d3 c9 c2 6b f6 f0 f0 6b f3 ┆I s// ELSE BLDLIBR #QRYLIB,600,3┆
0x08a0…08c0 f5 6b 6f f2 6f 2e 90 61 61 40 c7 d6 e3 d6 40 d3 d6 c1 c4 c6 c9 d3 c5 40 8e 61 61 40 e3 c1 c7 40 ┆5,?2? °// GOTO LOADFILE þ// TAG ┆
0x08c0…08e0 c3 c8 d2 c1 d5 d1 c9 42 ac 61 61 40 c9 c6 40 6f d3 7d f6 f7 6b f1 7d 6f 61 f1 40 c2 d3 c4 d3 c9 ┆CHKANJIâÐ// IF ?L'67,1'?/1 BLDLI┆
0x08e0…0900 c2 d9 40 7b d8 d9 e8 d3 c9 c2 6b f8 f0 f0 6b f4 f0 6b 6f f2 6f 24 a2 61 61 40 c5 d3 e2 c5 40 c2 ┆BR #QRYLIB,800,40,?2? s// ELSE B┆
0x0900…0920 d3 c4 d3 c9 c2 d9 40 7b d8 d9 e8 d3 c9 c2 6b f3 f5 f0 6b f3 f5 6b 6f f2 6f 2e 8f 61 61 40 e3 c1 ┆LDLIBR #QRYLIB,350,35,?2? ±// TA┆
0x0920…0940 c7 40 d3 d6 c1 c4 c6 c9 d3 c5 41 8e 61 61 40 d3 d6 c1 c4 40 5b d4 c1 c9 d5 e3 42 bc 61 61 40 c6 ┆G LOADFILE þ// LOAD $MAINTâ¯// F┆
0x0940…0960 c9 d3 c5 40 d5 c1 d4 c5 60 d8 d9 e8 d3 c9 c2 6b e4 d5 c9 e3 60 c9 f1 6b d7 c1 c3 d2 60 d7 d7 d8 ┆ILE NAME-QRYLIB,UNIT-I1,PACK-PPQ┆
0x0960…0980 d9 e8 6b d3 d6 c3 c1 e3 c9 d6 d5 60 6f f1 6f 6b c1 e4 e3 d6 60 e8 c5 e2 14 86 61 61 40 d9 e4 d5 ┆RY,LOCATION-?1?,AUTO-YES f// RUN┆
0x0980…09a0 4a b9 61 61 40 c3 d6 d7 e8 40 c6 d9 d6 d4 60 c4 c9 e2 d2 6b e3 d6 60 7b d8 d9 e8 d3 c9 c2 6b c6 ┆¢¾// COPY FROM-DISK,TO-#QRYLIB,F┆
0x09a0…09c0 c9 d3 c5 60 d8 d9 e8 d3 c9 c2 6b d9 c5 e3 c1 c9 d5 60 d9 6b d9 c9 d7 60 e8 c5 e2 17 86 61 61 40 ┆ILE-QRYLIB,RETAIN-R,RIP-YES f// ┆
0x09c0…09e0 c5 d5 c4 4a 97 61 61 40 c9 c6 c6 40 6f c3 c4 6f 61 f0 f0 f0 f0 40 d9 c5 e3 e4 d9 d5 39 c6 d3 d6 ┆END¢p// IFF ?CD?/0000 RETURN FLO┆
0x09e0…0a00 c7 d7 d3 c4 40 d3 d6 c1 c4 6b d8 d9 e8 f3 f6 6b 7d 7b d8 e4 c4 c1 6b 7b d8 d9 e8 d3 c9 c2 7d 6b ┆GPLD LOAD,QRY36,'#QUDA,#QRYLIB',┆
0x0a00…0a20 6b 7d f0 f0 f1 f6 6b 7b 7b d4 e2 c7 d7 d3 f2 7d 6b 6b 7d 7b d3 c9 c2 d9 c1 d9 e8 6b 7b d8 d9 e8 ┆,'0016,##MSGPL2',,'#LIBRARY,#QRY┆
0x0a20…0a40 d3 c9 c2 7d 0a af 61 61 40 d3 d6 c3 c1 d3 40 c1 d9 c5 c1 60 e2 e8 e2 e3 c5 d4 6b d6 c6 c6 e2 c5 ┆LIB' ®// LOCAL AREA-SYSTEM,OFFSE┆
0x0a40…0a60 e3 60 f1 6b c4 c1 e3 c1 60 7d d8 d9 e8 c9 d3 d6 c4 40 f3 f2 7d 21 8d 61 61 40 d3 d6 c1 c4 40 5b ┆T-1,DATA-'QRYILOD 32' ý// LOAD $┆
0x0a60…0a80 c3 d5 c1 c4 43 86 61 61 40 d9 e4 d5 4a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆CNADäf// RUN¢ ┆
0x0a80…0aa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
[…0x2…]
0x0ae0…0b00 d7 d8 d9 e8 d3 d6 c1 c4 40 00 00 06 50 00 16 00 00 00 00 40 00 02 00 05 00 03 30 00 00 00 00 00 ┆PQRYLOAD & ┆
0x0b00…0b20 00 00 00 00 00 00 00 20 80 3f 99 00 00 00 00 00 00 00 00 00 00 00 00 00 81 5c 03 c0 e3 c8 c9 e2 ┆ Ø r a* {THIS┆
0x0b20…0b40 40 d7 d9 d6 c3 c5 c4 e4 d9 c5 40 c3 d6 d7 c9 c5 e2 40 e3 c8 c5 40 d8 e4 c5 d9 e8 40 d7 d9 d6 c7 ┆ PROCEDURE COPIES THE QUERY PROG┆
0x0b40…0b60 d9 c1 d4 40 d7 d9 d6 c4 e4 c3 e3 40 c6 d9 d6 d4 40 c4 c9 e2 d2 c5 e3 e3 c5 40 e3 d6 0c 81 5c 03 ┆RAM PRODUCT FROM DISKETTE TO a* ┆
0x0b60…0b80 85 c4 c9 e2 d2 4b 02 b6 7b d8 d9 e8 d3 c9 c2 40 c3 d6 d5 e3 c1 c9 d5 e2 40 d8 e4 c5 d9 e8 40 c5 ┆eDISK. ¶#QRYLIB CONTAINS QUERY E┆
0x0b80…0ba0 e7 c5 c3 e4 e3 c1 c2 d3 c5 40 d4 d6 c4 e4 d3 c5 e2 6b 40 d4 c5 e2 e2 c1 c7 c5 40 c1 d5 c4 0f 81 ┆XECUTABLE MODULES, MESSAGE AND a┆
0x0ba0…0bc0 5c 03 95 e2 c3 d9 c5 c5 d5 40 c6 d6 d9 d4 c1 e3 40 d4 c5 d4 c2 c5 d9 e2 37 81 5c 05 a8 60 40 d7 ┆* nSCREEN FORMAT MEMBERS a* y- P┆
0x0bc0…0be0 c1 d9 c1 d4 c5 e3 c5 d9 40 f1 40 c9 e2 40 c4 c9 e2 d2 40 e2 d7 c9 d5 c4 d3 c5 40 d7 d9 c5 c6 c5 ┆ARAMETER 1 IS DISK SPINDLE PREFE┆
0x0be0…0c00 d9 c5 d5 c3 c5 22 81 5c 05 a2 60 40 d7 c1 d9 c1 d4 c5 e3 c5 d9 40 f2 40 c9 e2 40 c4 c9 e2 d2 c5 ┆RENCE a* s- PARAMETER 2 IS DISKE┆
0x0c00…0c20 (3,) e3 e3 c5 40 d3 d6 c3 c1 e3 c9 d6 d5 28 96 61 61 40 d4 c5 d4 c2 c5 d9 40 e4 e2 c5 d9 f1 60 7b 7b ┆TTE LOCATION o// MEMBER USER1-##┆
0x0c20…0c40 d4 e2 c7 c3 3a ae 61 61 40 c9 c6 40 d1 d6 c2 d8 60 d5 d6 40 c9 c6 40 c5 e5 d6 d2 c5 c4 60 d5 d6 ┆MSGC Þ// IF JOBQ-NO IF EVOKED-NO┆
0x0c40…0c60 40 5c 40 7d 40 d8 d9 e8 d3 d6 c1 c4 6f d4 f3 f5 f0 f0 6f 7d 22 8e 61 61 40 e3 c1 c7 40 c3 c8 d2 ┆ * ' QRYLOAD?M3500?' þ// TAG CHK┆
0x0c60…0c80 c4 c9 e2 d2 42 ab 61 61 40 c9 c6 40 c4 c1 e3 c1 c9 f1 60 7d d8 d9 e8 d3 c9 c2 6b 6b 6f f2 7d e2 ┆DISKâ¿// IF DATAI1-'QRYLIB,,?2'S┆
0x0c80…0ca0 f1 7d 6f 7d 40 c7 d6 e3 d6 40 c3 c1 d3 d7 d9 d6 c3 25 89 61 61 40 5c 40 f3 f2 f9 f0 47 94 61 61 ┆1'?' GOTO CALPROC i// * 3290åm//┆
0x0ca0…0cc0 40 7b c5 d9 d9 40 f3 f2 f9 f1 6b f1 f3 6b c3 d5 c6 c7 3c 8f 61 61 40 c7 d6 e3 d6 40 c3 c8 d2 c4 ┆ #ERR 3291,13,CNFG ±// GOTO CHKD┆
0x0cc0…0ce0 c9 e2 d2 41 8e 61 61 40 e3 c1 c7 40 c3 c1 d3 d7 d9 d6 c3 42 93 d8 d9 e8 c9 d3 d6 c4 40 6f f2 7d ┆ISK þ// TAG CALPROCâlQRYILOD ?2'┆
0x0ce0…0d00 e2 f1 7d 6f 6b 6f f1 6f 3d a5 61 61 40 c9 c6 c6 40 d3 d6 c1 c4 60 7d 7b d8 e4 7b f1 d4 6b 7b d8 ┆S1'?,?1? v// IFF LOAD-'#QU#1M,#Q┆
0x0d00…0d20 d9 e8 d3 c9 c2 7d 40 c7 d6 e3 d6 40 d4 d9 c9 2b af 61 61 40 d3 d6 c3 c1 d3 40 c1 d9 c5 c1 60 e2 ┆RYLIB' GOTO MRI ®// LOCAL AREA-S┆
0x0d20…0d40 e8 e2 e3 c5 d4 6b d6 c6 c6 e2 c5 e3 60 f1 6b c4 c1 e3 c1 60 7d d8 d9 e8 d3 d6 c1 c4 40 f3 f2 7d ┆YSTEM,OFFSET-1,DATA-'QRYLOAD 32'┆
0x0d40…0d60 21 8d 61 61 40 d3 d6 c1 c4 40 5b c3 d5 c1 c4 43 86 61 61 40 d9 e4 d5 4a 89 61 61 40 d9 c5 e3 e4 ┆ ý// LOAD $CNADäf// RUN¢i// RETU┆
0x0d60…0d80 d9 d5 47 8a 61 61 40 e3 c1 c7 40 d4 d9 c9 46 9f 61 61 40 d7 c1 e4 e2 c5 40 7d 6f d4 7d f3 f5 f0 ┆RNå«// TAG MRIã¤// PAUSE '?M'350┆
0x0d80…0da0 f2 6b f1 6b f6 f0 7d 6f 40 d7 d7 d8 d9 e8 7d 31 8a d8 d9 e8 d4 d9 c9 40 6f f2 6f 46 00 00 00 00 ┆2,1,60'? PPQRY' «QRYMRI ?2?ã ┆
0x0da0…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 ┆ ┆
[…0x2…]
0x0e00…0e20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 d7 d8 d9 e8 d4 d9 c9 40 ┆ PQRYMRI ┆
0x0e20…0e40 40 00 00 02 50 00 09 00 00 00 00 40 00 02 00 05 00 01 30 00 00 00 00 00 00 00 00 00 00 00 00 20 ┆ & ┆
0x0e40…0e60 80 3f 99 00 00 00 00 00 00 00 00 00 00 00 00 00 8e 61 61 40 d3 d6 c1 c4 40 5b d4 c1 c9 d5 e3 42 ┆Ø r þ// LOAD $MAINTâ┆
0x0e60…0e80 bb 61 61 40 c6 c9 d3 c5 40 d5 c1 d4 c5 60 d8 d9 e8 d4 d9 c9 6b e4 d5 c9 e3 60 c9 f1 6b d7 c1 c3 ┆]// FILE NAME-QRYMRI,UNIT-I1,PAC┆
0x0e80…0ea0 d2 60 d7 d7 d8 d9 e8 6b d3 d6 c3 c1 e3 c9 d6 d5 60 6f f1 6f 6b c1 e4 e3 d6 60 d5 d6 15 86 61 61 ┆K-PPQRY,LOCATION-?1?,AUTO-NO f//┆
0x0ea0…0ec0 40 d9 e4 d5 4a b9 61 61 40 c3 d6 d7 e8 40 c6 d9 d6 d4 60 c4 c9 e2 d2 6b e3 d6 60 7b d8 d9 e8 d3 ┆ RUN¢¾// COPY FROM-DISK,TO-#QRYL┆
0x0ec0…0ee0 c9 c2 6b c6 c9 d3 c5 60 d8 d9 e8 d4 d9 c9 6b d9 c5 e3 c1 c9 d5 60 d9 6b d9 c9 d7 60 e8 c5 e2 17 ┆IB,FILE-QRYMRI,RETAIN-R,RIP-YES ┆
0x0ee0…0f00 86 61 61 40 c5 d5 c4 4a 97 61 61 40 c9 c6 c6 40 6f c3 c4 6f 61 f0 f0 f0 f0 40 d9 c5 e3 e4 d9 d5 ┆f// END¢p// IFF ?CD?/0000 RETURN┆
0x0f00…0f20 39 aa 61 61 40 d3 d6 c3 c1 d3 40 c1 d9 c5 c1 60 e2 e8 e2 e3 c5 d4 6b d6 c6 c6 e2 c5 e3 60 f1 6b ┆ ¡// LOCAL AREA-SYSTEM,OFFSET-1,┆
0x0f20…0f40 c4 c1 e3 c1 60 7d d8 d9 e8 d4 d9 c9 02 83 f3 f2 7d 21 8d 61 61 40 d3 d6 c1 c4 40 5b c3 d5 c1 c4 ┆DATA-'QRYMRI c32' ý// LOAD $CNAD┆
0x0f40…0f60 43 86 61 61 40 d9 e4 d5 4a 00 00 00 00 00 00 ff d7 d8 d9 e8 d6 c4 d9 d6 d7 00 00 04 50 00 0a 00 ┆äf// RUN¢ PQRYODROP & ┆
0x0f60…0f80 00 00 00 40 00 02 00 05 00 02 30 00 00 00 00 00 00 00 00 00 00 00 00 20 00 00 00 00 00 00 00 00 ┆ ┆
0x0f80…0fa0 00 00 00 00 00 00 00 00 96 61 61 40 d4 c5 d4 c2 c5 d9 40 e4 e2 c5 d9 f1 60 7b 7b d4 e2 c7 f2 3a ┆ o// MEMBER USER1-##MSG2 ┆
0x0fa0…0fc0 af 61 61 40 c9 c6 40 d1 d6 c2 d8 60 d5 d6 40 c9 c6 40 c5 e5 d6 d2 c5 c4 60 d5 d6 40 5c 40 7d 40 ┆®// IF JOBQ-NO IF EVOKED-NO * ' ┆
0x0fc0…0fe0 d8 d9 e8 d6 c4 d9 d6 d7 6f d4 f5 f5 f0 f0 6f 7d 21 b7 61 61 40 c9 c6 40 c4 c1 e3 c1 c6 f1 60 7b ┆QRYODROP?M5500?' ¼// IF DATAF1-#┆
0x0fe0…1000 d8 d9 e8 c6 d3 c4 d9 40 c4 c5 d3 c5 e3 c5 40 7b d8 d9 e8 c6 d3 c4 d9 6b c6 f1 6b d9 c5 d4 d6 e5 ┆QRYFLDR DELETE #QRYFLDR,F1,REMOV┆
0x1000…1020 (4,) c5 6b 6b c6 d6 d3 c4 c5 d9 19 b7 61 61 40 c9 c6 40 c4 c1 e3 c1 c6 f1 60 d8 d9 e8 e2 c1 d4 d7 d3 ┆E,,FOLDER ¼// IF DATAF1-QRYSAMPL┆
0x1020…1040 40 c4 c5 d3 c5 e3 c5 40 d8 d9 e8 e2 c1 d4 d7 d3 6b c6 f1 6b d9 c5 d4 d6 e5 c5 6b 6b c6 d6 d3 c4 ┆ DELETE QRYSAMPL,F1,REMOVE,,FOLD┆
0x1040…1060 c5 d9 19 97 61 61 40 c9 c6 c6 40 6f c3 c4 6f 61 f0 f0 f0 f0 40 d9 c5 e3 e4 d9 d5 39 af 61 61 40 ┆ER p// IFF ?CD?/0000 RETURN ®// ┆
0x1060…1080 d3 d6 c3 c1 d3 40 c1 d9 c5 c1 60 e2 e8 e2 e3 c5 d4 6b d6 c6 c6 e2 c5 e3 60 f1 6b c4 c1 e3 c1 60 ┆LOCAL AREA-SYSTEM,OFFSET-1,DATA-┆
0x1080…10a0 7d d8 d9 e8 d6 c4 d9 d6 d7 f1 f6 7d 21 94 d3 d6 c7 d7 d3 c4 40 c4 d9 d6 d7 6b d8 d9 e8 f3 f6 d6 ┆'QRYODROP16' mLOGPLD DROP,QRY36O┆
0x10a0…10c0 d5 d3 3c 8e 61 61 40 d3 d6 c1 c4 40 5b c3 d5 c4 d9 d7 42 86 61 61 40 d9 e4 d5 4a 89 61 61 40 d9 ┆NL þ// LOAD $CNDRPâf// RUN¢i// R┆
0x10c0…10e0 c5 e3 e4 d9 d5 47 00 50 00 16 00 00 00 00 40 00 02 00 05 00 03 30 00 00 00 00 00 00 00 00 00 00 ┆ETURNå & ┆
0x10e0…1100 00 00 00 80 3f 99 00 00 00 00 00 00 00 00 d7 d8 d9 e8 d4 d9 c9 40 40 00 0a 52 50 00 0b 00 00 00 ┆ Ø r PQRYMRI ê& ┆
0x1100…1120 00 40 00 02 00 05 00 02 30 00 00 00 00 00 00 00 00 00 00 00 00 00 80 3f cc 00 00 00 00 00 00 00 ┆ Ø ö ┆
0x1120…1140 00 d7 d8 d9 e8 d6 c1 c4 c4 40 00 0a 54 48 00 08 00 00 00 00 40 00 02 00 05 00 01 30 00 00 00 00 ┆ PQRYOADD èç ┆
0x1140…1160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 d7 d8 d9 e8 d6 d4 d9 c9 40 00 0a 55 ┆ PQRYOMRI í┆
0x1160…1180 50 00 50 00 00 00 00 40 00 02 00 04 00 0c 30 00 00 00 00 00 00 00 00 00 00 00 00 00 80 3f cc 00 ┆& & Ø ö ┆
0x1180…11a0 00 00 00 00 00 00 00 ff d7 d8 d9 e8 d6 d4 d9 c9 40 00 00 04 50 00 0c 00 00 00 00 40 00 02 00 05 ┆ PQRYOMRI & ┆
0x11a0…11c0 00 02 30 00 00 00 00 00 00 00 00 00 00 00 00 20 80 3f 99 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ Ø r ┆
0x11c0…11e0 9c 61 61 40 c9 c6 40 c4 c1 e3 c1 c6 f1 60 d8 d9 e8 e2 c1 d4 d7 d3 40 c4 c5 d3 c5 e3 c5 02 9a d8 ┆æ// IF DATAF1-QRYSAMPL DELETE ªQ┆
0x11e0…1200 d9 e8 e2 c1 d4 d7 d3 6b c6 f1 6b d9 c5 d4 d6 e5 c5 6b 6b c6 d6 d3 c4 c5 d9 18 9c 61 61 40 c9 c6 ┆RYSAMPL,F1,REMOVE,,FOLDER æ// IF┆
0x1200…1220 40 c4 c1 e3 c1 c6 f1 60 7b d8 d9 e8 c6 d3 c4 d9 40 c4 c5 d3 c5 e3 c5 02 9a 7b d8 d9 e8 c6 d3 c4 ┆ DATAF1-#QRYFLDR DELETE ª#QRYFLD┆
0x1220…1240 d9 6b c6 f1 6b d9 c5 d4 d6 e5 c5 6b 6b c6 d6 d3 c4 c5 d9 18 a2 61 61 40 d9 c5 e2 e3 c6 d3 c4 d9 ┆R,F1,REMOVE,,FOLDER s// RESTFLDR┆
0x1240…1260 40 7b d8 d9 e8 c6 d3 c4 d9 6b 6b 6b c9 f1 6b 6f f1 6f 6b c1 e4 e3 d6 2e 97 61 61 40 c9 c6 c6 40 ┆ #QRYFLDR,,,I1,?1?,AUTO p// IFF ┆
0x1260…1280 6f c3 c4 6f 61 f0 f0 f0 f0 40 d9 c5 e3 e4 d9 d5 39 b4 d3 d6 c7 d7 d3 c4 40 d3 d6 c1 c4 6b d8 d9 ┆?CD?/0000 RETURN ©LOGPLD LOAD,QR┆
0x1280…12a0 e8 f3 f6 d6 d5 d3 6b d5 d6 d5 c5 6b 6b 7d f0 f0 f1 f7 6b 7b 7b d4 e2 c7 d7 d3 f2 7d 6b 6b 7b d8 ┆Y36ONL,NONE,,'0017,##MSGPL2',,#Q┆
0x12a0…12c0 d9 e8 c6 d3 c4 d9 1c af 61 61 40 d3 d6 c3 c1 d3 40 c1 d9 c5 c1 60 e2 e8 e2 e3 c5 d4 6b d6 c6 c6 ┆RYFLDR ®// LOCAL AREA-SYSTEM,OFF┆
0x12c0…12e0 e2 c5 e3 60 f1 6b c4 c1 e3 c1 60 7d d8 d9 e8 d6 c9 d3 d6 c4 f1 f6 7d 21 8d 61 61 40 d3 d6 c1 c4 ┆SET-1,DATA-'QRYOILOD16' ý// LOAD┆
0x12e0…1300 40 5b c3 d5 c1 c4 43 86 61 61 40 d9 e4 d5 4a af 61 61 40 d3 d6 c3 c1 d3 40 c1 d9 c5 c1 60 e2 e8 ┆ $CNADäf// RUN¢®// LOCAL AREA-SY┆
0x1300…1320 e2 e3 c5 d4 6b d6 c6 c6 e2 c5 e3 60 f1 6b c4 c1 e3 c1 60 7d d8 d9 e8 d6 d4 d9 c9 40 f1 f6 7d 21 ┆STEM,OFFSET-1,DATA-'QRYOMRI 16' ┆
0x1320…1340 8d 61 61 40 d3 d6 c1 c4 40 5b c3 d5 c1 c4 43 86 61 61 40 d9 e4 d5 4a 89 61 61 40 d9 c5 e3 e4 d9 ┆ý// LOAD $CNADäf// RUN¢i// RETUR┆
0x1340…1360 d5 47 00 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆Nå ┆
0x1360…1380 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
[…0x2…]
0x13c0…13e0 d7 d8 d9 e8 d9 e4 d5 40 40 00 00 06 50 00 11 00 00 00 00 40 00 02 00 04 00 03 30 00 00 00 00 00 ┆PQRYRUN & ┆
0x13e0…1400 00 00 00 00 00 00 00 20 80 40 99 00 00 00 00 00 00 00 00 00 00 00 00 00 c3 61 61 40 d4 c5 d4 c2 ┆ Ø r C// MEMB┆
0x1400…1420 (5,) c5 d9 40 d7 d9 d6 c7 d9 c1 d4 f1 60 7b d8 e4 7b f1 d4 6b e4 e2 c5 d9 f1 60 7b d8 e4 7b f1 d4 6b ┆ER PROGRAM1-#QU#1M,USER1-#QU#1M,┆
0x1420…1440 e4 e2 c5 d9 f2 60 7b d8 e4 7b f2 d4 6b d3 c9 c2 d9 c1 d9 e8 60 7b d8 d9 e8 d3 c9 c2 0d 9e 61 61 ┆USER2-#QU#2M,LIBRARY-#QRYLIB Æ//┆
0x1440…1460 40 c9 c6 40 6f f6 f4 6f 7e d8 d9 e8 d9 e4 d5 40 c7 d6 e3 d6 40 c6 c9 e7 d3 d6 d6 d7 32 b0 61 61 ┆ IF ?64?=QRYRUN GOTO FIXLOOP ^//┆
0x1460…1480 40 c9 c6 40 6f f1 6f 61 40 c9 c6 40 6f f3 6f 61 40 c9 c6 40 c5 e5 d6 d2 c5 c4 60 e8 c5 e2 40 7b ┆ IF ?1?/ IF ?3?/ IF EVOKED-YES #┆
0x1480…14a0 c5 d9 d9 40 f1 f0 f1 f3 6b c3 6b d8 d9 e8 20 9e 61 61 40 c9 c6 40 6f f1 6f 61 40 c9 c6 40 6f f3 ┆ERR 1013,C,QRY Æ// IF ?1?/ IF ?3┆
0x14a0…14c0 6f 61 40 c9 c6 40 d1 d6 c2 d8 60 e8 c5 e2 02 8f 7b c5 d9 d9 40 f1 f0 f1 f3 6b c3 6b d8 d9 e8 21 ┆?/ IF JOBQ-YES ±#ERR 1013,C,QRY ┆
0x14c0…14e0 9e 61 61 40 c9 c6 40 6f f1 6f 61 40 c9 c6 40 6f f3 6f 61 40 c7 d6 e3 d6 40 d7 d9 d6 d4 d7 e3 32 ┆Æ// IF ?1?/ IF ?3?/ GOTO PROMPT ┆
0x14e0…1500 8e 61 61 40 e3 c1 c7 40 c6 c9 e7 d3 d6 d6 d7 42 96 61 61 40 d4 c5 d4 c2 c5 d9 40 e4 e2 c5 d9 f1 ┆þ// TAG FIXLOOPâo// MEMBER USER1┆
0x1500…1520 60 7b 7b d4 e2 c7 f2 3a ad 61 61 40 c9 c6 40 d1 d6 c2 d8 60 d5 d6 40 c9 c6 40 c5 e5 d6 d2 c5 c4 ┆-##MSG2 Ý// IF JOBQ-NO IF EVOKED┆
0x1520…1540 60 d5 d6 40 5c 40 7d 40 d8 d9 e8 d9 e4 d5 6f d4 f5 f5 f0 f0 6f 7d 23 91 61 61 40 d9 c5 c7 c9 d6 ┆-NO * ' QRYRUN?M5500?' j// REGIO┆
0x1540…1560 d5 40 e2 c9 e9 c5 60 f4 f8 3f 95 61 61 40 d3 d6 c1 c4 40 7b d8 e4 c4 c1 6b 7b d8 d9 e8 d3 c9 c2 ┆N SIZE-48 n// LOAD #QUDA,#QRYLIB┆
0x1560…1580 3b 86 61 61 40 d9 e4 d5 4a 89 61 61 40 d9 c5 e3 e4 d9 d5 47 8d 61 61 40 e3 c1 c7 40 d7 d9 d6 d4 ┆ f// RUN¢i// RETURNåý// TAG PROM┆
0x1580…15a0 d7 e3 43 bc 61 61 40 c8 c5 d3 d7 40 d8 d9 e8 d9 e4 d5 6b 6f f1 6f 6b 6f f2 6f 6b 6f f3 6f 6b 6f ┆PTä¯// HELP QRYRUN,?1?,?2?,?3?,?┆
0x15a0…15c0 f4 6f 6b 6f f5 6f 6b 6f f6 6f 6b 6f f7 6f 6b 6f f8 6f 6b 6f f9 6f 6b 6f f1 f0 6f 6b 6f f1 f1 6f ┆4?,?5?,?6?,?7?,?8?,?9?,?10?,?11?┆
0x15c0…15e0 14 be 5c 40 c6 c9 e7 d3 d6 d6 d7 40 e6 c9 d3 d3 40 c7 c5 e3 40 c3 d6 d5 e3 d9 d6 d3 40 e6 c8 c5 ┆ ´* FIXLOOP WILL GET CONTROL WHE┆
0x15e0…1600 d5 40 d9 c5 e3 e4 d9 d5 c9 d5 c7 40 c6 d9 d6 d4 40 e3 c8 c5 40 c8 c5 d3 d7 40 d7 d9 d6 d4 d7 e3 ┆N RETURNING FROM THE HELP PROMPT┆
0x1600…1620 12 b1 5c 40 c9 c6 40 d8 d9 e8 d9 e4 d5 40 d5 d6 e3 40 d7 d3 c1 c3 c5 c4 40 d6 d5 40 e3 c8 c5 40 ┆ £* IF QRYRUN NOT PLACED ON THE ┆
0x1620…1640 d1 d6 c2 40 d8 e4 c5 e4 c5 40 d6 d9 40 c5 e5 d6 d2 c5 c4 1f 81 5c 04 ab c9 e2 e2 e4 c5 40 7d d8 ┆JOB QUEUE OR EVOKED a* ¿ISSUE 'Q┆
0x1640…1660 d9 e8 d9 e4 d5 40 d7 d9 d6 c3 c5 c4 e4 d9 c5 40 c9 e2 40 d9 e4 d5 d5 c9 d5 c7 7d 40 d4 c5 e2 e2 ┆RYRUN PROCEDURE IS RUNNING' MESS┆
0x1660…1680 c1 c7 c5 20 00 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆AGE ┆
0x1680…16a0 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
[…0x2…]
0x16e0…1700 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff d7 d8 d9 e8 e2 c1 e5 c5 ┆ PQRYSAVE┆
0x1700…1720 40 00 00 0a 50 00 17 00 00 00 00 40 00 02 00 05 00 05 30 00 00 00 00 00 00 00 00 00 00 00 00 20 ┆ & ┆
0x1720…1740 80 3f 66 00 00 00 00 00 00 00 00 00 00 00 00 00 96 61 61 40 d4 c5 d4 c2 c5 d9 40 e4 e2 c5 d9 f1 ┆Ø Ã o// MEMBER USER1┆
0x1740…1760 60 7b 7b d4 e2 c7 f2 3a ae 61 61 40 c9 c6 40 d1 d6 c2 d8 60 d5 d6 40 c9 c6 40 c5 e5 d6 d2 c5 c4 ┆-##MSG2 Þ// IF JOBQ-NO IF EVOKED┆
0x1760…1780 60 d5 d6 40 5c 40 7d 40 d8 d9 e8 e2 c1 e5 c5 6f d4 f5 f5 f0 f0 6f 7d 22 ab 61 61 40 c9 c6 40 d1 ┆-NO * ' QRYSAVE?M5500?' ¿// IF J┆
0x1780…17a0 d6 c2 d8 60 d5 d6 40 c9 c6 40 c5 e5 d6 d2 c5 c4 60 d5 d6 40 d7 c1 e4 e2 c5 40 7d 40 6f d4 f2 f1 ┆OBQ-NO IF EVOKED-NO PAUSE ' ?M21┆
0x17a0…17c0 f9 f6 6f 7d 25 9e 61 61 40 c9 c6 40 c4 c1 e3 c1 c9 f1 60 d8 d9 e8 40 c4 c5 d3 c5 e3 c5 40 d8 d9 ┆96?' Æ// IF DATAI1-QRY DELETE QR┆
0x17c0…17e0 e8 6b c9 f1 32 a4 61 61 40 c9 c6 40 c4 c1 e3 c1 c9 f1 60 d8 d9 e8 d3 c9 c2 40 c4 c5 d3 c5 e3 c5 ┆Y,I1 u// IF DATAI1-QRYLIB DELETE┆
0x17e0…1800 40 d8 d9 e8 d3 c9 c2 6b c9 f1 2c 8e 61 61 40 d3 d6 c1 c4 40 5b d4 c1 c9 d5 e3 42 ae 61 61 40 c6 ┆ QRYLIB,I1 þ// LOAD $MAINTâÞ// F┆
0x1800…1820 (6,) c9 d3 c5 40 e4 d5 c9 e3 60 c9 f1 6b d7 c1 c3 d2 60 d7 d7 d8 d9 e8 6b d9 c5 e3 c1 c9 d5 60 f9 f9 ┆ILE UNIT-I1,PACK-PPQRY,RETAIN-99┆
0x1820…1840 f9 6b d5 c1 d4 c5 60 d8 d9 e8 22 b1 61 61 40 c6 c9 d3 c5 40 e4 d5 c9 e3 60 c9 f1 6b d7 c1 c3 d2 ┆9,NAME-QRY £// FILE UNIT-I1,PACK┆
0x1840…1860 60 d7 d7 d8 d9 e8 6b d9 c5 e3 c1 c9 d5 60 f9 f9 f9 6b d5 c1 d4 c5 60 d8 d9 e8 d3 c9 c2 1f 86 61 ┆-PPQRY,RETAIN-999,NAME-QRYLIB f/┆
0x1860…1880 61 40 d9 e4 d5 4a b9 61 61 40 c3 d6 d7 e8 40 c6 d9 d6 d4 60 7b d3 c9 c2 d9 c1 d9 e8 6b e3 d6 60 ┆/ RUN¢¾// COPY FROM-#LIBRARY,TO-┆
0x1880…18a0 c4 c9 e2 d2 6b c6 c9 d3 c5 60 d8 d9 e8 6b d3 c9 c2 d9 c1 d9 e8 60 d7 6b d5 c1 d4 c5 60 d8 d9 e8 ┆DISK,FILE-QRY,LIBRARY-P,NAME-QRY┆
0x18a0…18c0 17 c3 61 61 40 c3 d6 d7 e8 40 c6 d9 d6 d4 60 7b d3 c9 c2 d9 c1 d9 e8 6b e3 d6 60 c4 c9 e2 d2 6b ┆ C// COPY FROM-#LIBRARY,TO-DISK,┆
0x18c0…18e0 c6 c9 d3 c5 60 d8 d9 e8 6b d3 c9 c2 d9 c1 d9 e8 60 d7 6b d5 c1 d4 c5 60 d8 d9 e8 c4 c5 6b c1 c4 ┆FILE-QRY,LIBRARY-P,NAME-QRYDE,AD┆
0x18e0…1900 c4 60 e8 c5 e2 0d c5 61 61 40 c3 d6 d7 e8 40 c6 d9 d6 d4 60 7b d3 c9 c2 d9 c1 d9 e8 6b e3 d6 60 ┆D-YES E// COPY FROM-#LIBRARY,TO-┆
0x1900…1920 c4 c9 e2 d2 6b c6 c9 d3 c5 60 d8 d9 e8 6b d3 c9 c2 d9 c1 d9 e8 60 d7 6b d5 c1 d4 c5 60 d8 d9 e8 ┆DISK,FILE-QRY,LIBRARY-P,NAME-QRY┆
0x1920…1940 c4 d9 d6 d7 6b c1 c4 c4 60 e8 c5 e2 0b c5 61 61 40 c3 d6 d7 e8 40 c6 d9 d6 d4 60 7b d3 c9 c2 d9 ┆DROP,ADD-YES E// COPY FROM-#LIBR┆
0x1940…1960 c1 d9 e8 6b e3 d6 60 c4 c9 e2 d2 6b c6 c9 d3 c5 60 d8 d9 e8 6b d3 c9 c2 d9 c1 d9 e8 60 d7 6b d5 ┆ARY,TO-DISK,FILE-QRY,LIBRARY-P,N┆
0x1960…1980 c1 d4 c5 60 d8 d9 e8 c9 d3 d6 c4 6b c1 c4 c4 60 e8 c5 e2 0b c5 61 61 40 c3 d6 d7 e8 40 c6 d9 d6 ┆AME-QRYILOD,ADD-YES E// COPY FRO┆
0x1980…19a0 d4 60 7b d3 c9 c2 d9 c1 d9 e8 6b e3 d6 60 c4 c9 e2 d2 6b c6 c9 d3 c5 60 d8 d9 e8 6b d3 c9 c2 d9 ┆M-#LIBRARY,TO-DISK,FILE-QRY,LIBR┆
0x19a0…19c0 c1 d9 e8 60 d7 6b d5 c1 d4 c5 60 d8 d9 e8 d3 d6 c1 c4 6b c1 c4 c4 60 e8 c5 e2 0b c4 61 61 40 c3 ┆ARY-P,NAME-QRYLOAD,ADD-YES D// C┆
0x19c0…19e0 d6 d7 e8 40 c6 d9 d6 d4 60 7b d3 c9 c2 d9 c1 d9 e8 6b e3 d6 60 c4 c9 e2 d2 6b c6 c9 d3 c5 60 d8 ┆OPY FROM-#LIBRARY,TO-DISK,FILE-Q┆
0x19e0…1a00 d9 e8 6b d3 c9 c2 d9 c1 d9 e8 60 d7 6b d5 c1 d4 c5 60 d8 d9 e8 d4 d9 c9 6b c1 c4 c4 60 e8 c5 e2 ┆RY,LIBRARY-P,NAME-QRYMRI,ADD-YES┆
0x1a00…1a20 0c c6 61 61 40 c3 d6 d7 e8 40 c6 d9 d6 d4 60 7b d3 c9 c2 d9 c1 d9 e8 6b e3 d6 60 c4 c9 e2 d2 6b ┆ F// COPY FROM-#LIBRARY,TO-DISK,┆
0x1a20…1a40 c6 c9 d3 c5 60 d8 d9 e8 6b d3 c9 c2 d9 c1 d9 e8 60 d7 6b d5 c1 d4 c5 60 d8 d9 e8 d6 c4 d9 d6 d7 ┆FILE-QRY,LIBRARY-P,NAME-QRYODROP┆
0x1a40…1a60 6b c1 c4 c4 60 e8 c5 e2 0a c5 61 61 40 c3 d6 d7 e8 40 c6 d9 d6 d4 60 7b d3 c9 c2 d9 c1 d9 e8 6b ┆,ADD-YES E// COPY FROM-#LIBRARY,┆
0x1a60…1a80 e3 d6 60 c4 c9 e2 d2 6b c6 c9 d3 c5 60 d8 d9 e8 6b d3 c9 c2 d9 c1 d9 e8 60 d7 6b d5 c1 d4 c5 60 ┆TO-DISK,FILE-QRY,LIBRARY-P,NAME-┆
[…truncated at 200 lines…]