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

⟦12aa0b613⟧

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

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⟧ ».QRYOMRI « 

// IF DATAF1-QRYSAMPL DELETE  QRYSAMPL,F1,REMOVE,,FOLDER                        
// IF DATAF1-#QRYFLDR DELETE  #QRYFLDR,F1,REMOVE,,FOLDER                        
// RESTFLDR #QRYFLDR,,,I1,?1?,AUTO                                              
// IFF ?CD?/0000 RETURN                                                         
LOGPLD LOAD,QRY36ONL,NONE,,'0017,##MSGPL2',,#QRYFLDR                            
// LOCAL AREA-SYSTEM,OFFSET-1,DATA-'QRYOILOD16'                                 
// LOAD $CNAD                                                                   
// RUN                                                                          
// LOCAL AREA-SYSTEM,OFFSET-1,DATA-'QRYOMRI 16'                                 
// LOAD $CNAD                                                                   
// RUN                                                                          
// RETURN                                                                       

0x000…001 0x9c
0x001…01d »// IF DATAF1-QRYSAMPL DELETE«
0x01d…01e 0x02
0x01e…01f 0x9a
0x01f…039 »QRYSAMPL,F1,REMOVE,,FOLDER«
0x039…03a 0x18
0x03a…03b 0x9c
0x03b…057 »// IF DATAF1-#QRYFLDR DELETE«
0x057…058 0x02
0x058…059 0x9a
0x059…073 »#QRYFLDR,F1,REMOVE,,FOLDER«
0x073…074 0x18
0x074…075 0xa2
0x075…097 »// RESTFLDR #QRYFLDR,,,I1,?1?,AUTO«
0x097…098 0x2e
0x098…099 0x97
0x099…0b0 »// IFF ?CD?/0000 RETURN«
0x0b0…0b1 0x39
0x0b1…0b2 0xb4
0x0b2…0e6 »LOGPLD LOAD,QRY36ONL,NONE,,'0017,##MSGPL2',,#QRYFLDR«
0x0e6…0e7 0x1c
0x0e7…0e8 0xaf
0x0e8…117 »// LOCAL AREA-SYSTEM,OFFSET-1,DATA-'QRYOILOD16'«
0x117…118 0x21
0x118…119 0x8d
0x119…126 »// LOAD $CNAD«
0x126…127 0x43
0x127…128 0x86
0x128…12e »// RUN«
0x12e…12f 0x4a
0x12f…130 0xaf
0x130…15f »// LOCAL AREA-SYSTEM,OFFSET-1,DATA-'QRYOMRI 16'«
0x15f…160 0x21
0x160…161 0x8d
0x161…16e »// LOAD $CNAD«
0x16e…16f 0x43
0x16f…170 0x86
0x170…176 »// RUN«
0x176…177 0x4a
0x177…178 0x89
0x178…181 »// RETURN«
0x181…182 0x47
0x182…183 0x00
0x183…1a0 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            ┆                             ┆
0x1a0…1c0 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…]

Reduced view