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

⟦7947f35d4⟧

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

Derivation

└─⟦ce1fc3cee⟧ Bits:30009814 REF.NO PWD33 PGM 5727-RG6 FEAT9074 RPG II US Z250-0040-2 REV/LEV 05.01 SEQ. 1/1 DISKET 2S 96TPI INTERNAL 88.05.24 31
    └─⟦8c0250367⟧ 
        └─⟦this⟧ ».RPGMRI  « 

*  THIS PROCEDURE ADDS THE MACHINE READABLE INFORMATION (MRI)                   
*  TO #RPGLIB FROM DISKETTE. PARAMETER 1 IS DISKETTE LOCATION.                  
// LOAD $MAINT                                                                  
// FILE NAME-RPGMRI,UNIT-I1,PACK-PPRPG,LOCATION-?1?,AUTO-NO                     
// RUN                                                                          
// COPY FROM-DISK,TO-#RPGLIB,FILE-RPGMRI                                        
// END                                                                          
// IFF ?CD?/0000 RETURN                                                         
// LOCAL AREA-SYSTEM,OFFSET-1,DATA-'XRPGMRI 50'                                 
// LOAD $CNAD                                                                   
// RUN                                                                          

0x000…001 0x81
0x001…002 »*«
0x002…003 0x02
0x003…004 0xba
0x004…03e »THIS PROCEDURE ADDS THE MACHINE READABLE INFORMATION (MRI)«
0x03e…03f 0x13
0x03f…040 0x81
0x040…041 »*«
0x041…042 0x02
0x042…043 0xbb
0x043…07e »TO #RPGLIB FROM DISKETTE. PARAMETER 1 IS DISKETTE LOCATION.«
0x07e…07f 0x12
0x07f…080 0x8e
0x080…08e »// LOAD $MAINT«
0x08e…08f 0x42
0x08f…090 0xbb
0x090…0cb »// FILE NAME-RPGMRI,UNIT-I1,PACK-PPRPG,LOCATION-?1?,AUTO-NO«
0x0cb…0cc 0x15
0x0cc…0cd 0x86
0x0cd…0d3 »// RUN«
0x0d3…0d4 0x4a
0x0d4…0d5 0xa8
0x0d5…0fd »// COPY FROM-DISK,TO-#RPGLIB,FILE-RPGMRI«
0x0fd…0fe 0x28
0x0fe…0ff 0x86
0x0ff…105 »// END«
0x105…106 0x4a
0x106…107 0x97
0x107…11e »// IFF ?CD?/0000 RETURN«
0x11e…11f 0x39
0x11f…120 0xaf
0x120…14f »// LOCAL AREA-SYSTEM,OFFSET-1,DATA-'XRPGMRI 50'«
0x14f…150 0x21
0x150…151 0x8d
0x151…15e »// LOAD $CNAD«
0x15e…15f 0x43
0x15f…160 0x86
0x160…166 »// RUN«
0x166…167 0x4a
0x167…168 0x00
0x168…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                           ┆                        ┆
0x180…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 ff ff ff   ┆                                ┆
          […0x3…]

Reduced view