DataMuseum.dk Presents historical artifacts from the history of: IBM System/36

This is an automatic "excavation" of a thematic subset of artifacts from Datamuseum.dk's BitArchive. See our Wiki for more about IBM System/36 Excavated with: AutoArchaeologist - Free & Open Source Software.

top - metrics - download

⟦261eeb7c3⟧

    Length: 512 (0x200)
    Notes: MEMBER_P, Member_Text
    Names: »QRY     «

Derivation

└─⟦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
    └─⟦625cdda84⟧ 
        └─⟦this⟧ ».QRY     « 

* 5727-QU1 (C) COPYRIGHT IBM CORP 1985                                          
* LICENSED MATERIAL - PROGRAM PROPERTY OF IBM                                   
// MEMBER USER1-##MSG2                                                          
// IF JOBQ-NO IF EVOKED-NO * ' QRY?M5500?'                                      
// REGION SIZE-48                                                               
// MEMBER USER2-#QU#2M,LIBRARY-#QRYLIB                                          
// LOAD #QUDA,#QRYLIB                                                           
// RUN                                                                          
// RETURN                                                                       
* IF QRY NOT PLACED ON THE JOB QUEUE OR EVOKED                                  
*    ISSUE 'QRY PROCEDURE IS RUNNING' MESSAGE                                   

0x000…001 0xa6
0x001…027 »* 5727-QU1 (C) COPYRIGHT IBM CORP 1985«
0x027…028 0x2a
0x028…029 0xad
0x029…056 »* LICENSED MATERIAL - PROGRAM PROPERTY OF IBM«
0x056…057 0x23
0x057…058 0x96
0x058…06e »// MEMBER USER1-##MSG2«
0x06e…06f 0x3a
0x06f…070 0xaa
0x070…09a »// IF JOBQ-NO IF EVOKED-NO * ' QRY?M5500?'«
0x09a…09b 0x26
0x09b…09c 0x91
0x09c…0ad »// REGION SIZE-48«
0x0ad…0ae 0x3f
0x0ae…0af 0xa6
0x0af…0d5 »// MEMBER USER2-#QU#2M,LIBRARY-#QRYLIB«
0x0d5…0d6 0x2a
0x0d6…0d7 0x95
0x0d7…0ec »// LOAD #QUDA,#QRYLIB«
0x0ec…0ed 0x3b
0x0ed…0ee 0x86
0x0ee…0f4 »// RUN«
0x0f4…0f5 0x4a
0x0f5…0f6 0x89
0x0f6…0ff »// RETURN«
0x0ff…100 0x47
0x100…101 0xae
0x101…12f »* IF QRY NOT PLACED ON THE JOB QUEUE OR EVOKED«
0x12f…130 0x22
0x130…131 0x81
0x131…132 »*«
0x132…133 0x04
0x133…134 0xa8
0x134…15c »ISSUE 'QRY PROCEDURE IS RUNNING' MESSAGE«
0x15c…15d 0x23
0x15d…15e 0x00
0x15e…160 ff ff                                                                                             ┆  ┆
0x160…180 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   ┆                                ┆
          […0x4…]

Reduced view