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

⟦8ebefcd02⟧

    Length: 768 (0x300)
    Notes: MEMBER_P, Member_Text
    Names: »SDASAVE «

Derivation

└─⟦14ba21fd6⟧ Bits:30009812 REF.NO PWD34 PGM 5727-UT6 FEAT9074 UTILITIES US Z250-0041-2 REV/LEV 05.01 SEQ. 1/2 DISKET 2S 96TPI INTERNAL 88.03.04 31
    └─⟦059c4c04f⟧ 
        └─⟦this⟧ ».SDASAVE « 

// MEMBER USER1-##MSG2                                                          
// IF JOBQ-NO IF EVOKED-NO * ' SDASAVE?M5500?'                                  
// IF JOBQ-NO IF EVOKED-NO PAUSE ' ?M2196?'                                     
// IF DATAI1-SDA DELETE SDA,I1                                                  
// IF DATAI1-SDALIB DELETE SDALIB,I1                                            
// LOAD $MAINT                                                                  
// FILE UNIT-I1,RETAIN-999,NAME-SDA,PACK-PPUTIL                                 
// FILE UNIT-I1,RETAIN-999,NAME-SDALIB,PACK-PPUTIL                              
// RUN                                                                          
// COPY FROM-#LIBRARY,TO-DISK,FILE-SDA,NAME-SDA.ALL,LIBRARY-P                   
// IF LOAD-'#SAPPD01,#LIBRARY' COPY FROM-#LIBRARY,TO-DISK,LIBRARY-O,+           
NAME-#SAPPD.ALL,FILE-SDA,ADD-YES                                                
// COPY FROM-#SDALIB,TO-DISK,FILE-SDALIB,NAME-ALL,LIBRARY-ALL                   
// END                                                                          

0x000…001 0x96
0x001…017 »// MEMBER USER1-##MSG2«
0x017…018 0x3a
0x018…019 0xae
0x019…047 »// IF JOBQ-NO IF EVOKED-NO * ' SDASAVE?M5500?'«
0x047…048 0x22
0x048…049 0xab
0x049…074 »// IF JOBQ-NO IF EVOKED-NO PAUSE ' ?M2196?'«
0x074…075 0x25
0x075…076 0x9e
0x076…094 »// IF DATAI1-SDA DELETE SDA,I1«
0x094…095 0x32
0x095…096 0xa4
0x096…0ba »// IF DATAI1-SDALIB DELETE SDALIB,I1«
0x0ba…0bb 0x2c
0x0bb…0bc 0x8e
0x0bc…0ca »// LOAD $MAINT«
0x0ca…0cb 0x42
0x0cb…0cc 0xaf
0x0cc…0fb »// FILE UNIT-I1,RETAIN-999,NAME-SDA,PACK-PPUTIL«
0x0fb…0fc 0x21
0x0fc…0fd 0xb2
0x0fd…12f »// FILE UNIT-I1,RETAIN-999,NAME-SDALIB,PACK-PPUTIL«
0x12f…130 0x1e
0x130…131 0x86
0x131…137 »// RUN«
0x137…138 0x4a
0x138…139 0xbd
0x139…176 »// COPY FROM-#LIBRARY,TO-DISK,FILE-SDA,NAME-SDA.ALL,LIBRARY-P«
0x176…177 0x13
0x177…178 0xc5
0x178…1bd »// IF LOAD-'#SAPPD01,#LIBRARY' COPY FROM-#LIBRARY,TO-DISK,LIBRARY-O,+«
0x1bd…1be 0x0b
0x1be…1bf 0xa0
0x1bf…1df »NAME-#SAPPD.ALL,FILE-SDA,ADD-YES«
0x1df…1e0 0x30
0x1e0…1e1 0xbd
0x1e1…21e »// COPY FROM-#SDALIB,TO-DISK,FILE-SDALIB,NAME-ALL,LIBRARY-ALL«
0x21e…21f 0x13
0x21f…220 0x86
0x220…226 »// END«
0x226…227 0x4a
0x227…228 0x00
0x228…240 00 00 00 00 00 00 00 00 00 00 00 e2 7b e2 c5 7b d4 f2 40 40 00 20 90 50                           ┆␣␣␣␣␣␣␣␣␣␣␣S#SE#M2  ␣ °&┆
0x240…260 01 13 00 00 00 00 40 00 02 00 05 00 40 30 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆  ␣␣␣␣ ␣ ␣ ␣  ␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣┆
0x260…280 00 00 00 00 00 00 e2 7b e2 c5 7c c6 d6 d9 d4 00 0d 72 50 06 61 00 00 00 00 40 00 02 00 05 00 e2   ┆␣␣␣␣␣␣S#SE@FORM␣ Ê& /␣␣␣␣ ␣ ␣ ␣S┆
0x280…2a0 30 00 00 00 00 00 00 00 00 00 00 00 00 00 80 3f 00 00 00 00 00 00 00 00 00 e2 7b e2 c5 7c e7 e3   ┆ ␣␣␣␣␣␣␣␣␣␣␣␣␣Ø ␣␣␣␣␣␣␣␣␣S#SE@XT┆
0x2a0…2c0 d9 c1 00 0e 54 50 03 1e 00 00 00 00 40 00 00 00 05 00 6e 20 00 00 00 00 00 00 00 00 00 00 00 00   ┆RA␣ è&  ␣␣␣␣ ␣␣␣ ␣> ␣␣␣␣␣␣␣␣␣␣␣␣┆
0x2c0…2e0 00 80 3f 33 00 00 00 00 00 00 00 00 e2 c1 d9 d4 c5 d4 e4 e3 d3 00 20 d0 50 00 c2 00 00 00 00 c0   ┆␣Ø  ␣␣␣␣␣␣␣␣SARMEMUTL␣ }&␣B␣␣␣␣{┆
0x2e0…300 00 02 00 05 00 08 30 00 00 00 00 00 00 00 00 00 00 00 00 00 80 3f 66 00 00 00 00 00 00 00 00 ff   ┆␣ ␣ ␣  ␣␣␣␣␣␣␣␣␣␣␣␣␣Ø Ã␣␣␣␣␣␣␣␣ ┆

Reduced view