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

⟦6bc7907f9⟧

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

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
    └─⟦93ec53657⟧ 
        └─⟦this⟧ ».SDA90   « 

******************************************************************************  
*                                                                            *  
*   THIS PROCEDURE INCLUDES SDA15 TO PROCESS COMPILE AND DELETES             *  
*       PRIMARY WORKFILE                                                     *  
*                                                                            *  
******************************************************************************  
// INCLUDE SDA15                                                                
// IFF DATAF1-#SD.?WS?  GOTO ENDSDA90                                           
// LOAD $DELET                                                                  
// RUN                                                                          
// SCRATCH UNIT-F1,LABEL-#SD.?WS?                                               
// END                                                                          
// TAG ENDSDA90                                                                 

0x000…001 0xce
0x001…04f »******************************************************************************«
0x04f…050 0x02
0x050…051 0x81
0x051…052 »*«
0x052…053 0x4c
0x053…054 0x81
0x054…055 »*«
0x055…056 0x02
0x056…057 0x81
0x057…058 »*«
0x058…059 0x03
0x059…05a 0xbc
0x05a…096 »THIS PROCEDURE INCLUDES SDA15 TO PROCESS COMPILE AND DELETES«
0x096…097 0x0d
0x097…098 0x81
0x098…099 »*«
0x099…09a 0x02
0x09a…09b 0x81
0x09b…09c »*«
0x09c…09d 0x07
0x09d…09e 0x90
0x09e…0ae »PRIMARY WORKFILE«
0x0ae…0af 0x35
0x0af…0b0 0x81
0x0b0…0b1 »*«
0x0b1…0b2 0x02
0x0b2…0b3 0x81
0x0b3…0b4 »*«
0x0b4…0b5 0x4c
0x0b5…0b6 0x81
0x0b6…0b7 »*«
0x0b7…0b8 0x02
0x0b8…0b9 0xce
0x0b9…107 »******************************************************************************«
0x107…108 0x02
0x108…109 0x90
0x109…119 »// INCLUDE SDA15«
0x119…11a 0x40
0x11a…11b 0x96
0x11b…131 »// IFF DATAF1-#SD.?WS?«
0x131…132 0x02
0x132…133 0x8d
0x133…140 »GOTO ENDSDA90«
0x140…141 0x2b
0x141…142 0x8e
0x142…150 »// LOAD $DELET«
0x150…151 0x42
0x151…152 0x86
0x152…158 »// RUN«
0x158…159 0x4a
0x159…15a 0xa1
0x15a…17b »// SCRATCH UNIT-F1,LABEL-#SD.?WS?«
0x17b…17c 0x2f
0x17c…17d 0x86
0x17d…183 »// END«
0x183…184 0x4a
0x184…185 0x8f
0x185…194 »// TAG ENDSDA90«
0x194…195 0x41
0x195…196 0x00
0x196…1a0 00 00 00 d7 e2 c5 e4 c9 d3 d6                                                                     ┆␣␣␣PSEUILO┆
0x1a0…1c0 c4 40 00 08 01 50 00 23 00 00 00 00 40 00 02 00 02 00 06 30 00 00 00 00 00 00 00 00 00 00 00 00   ┆D ␣  &␣ ␣␣␣␣ ␣ ␣ ␣  ␣␣␣␣␣␣␣␣␣␣␣␣┆
0x1c0…1e0 00 80 3d 99 00 00 00 00 00 00 00 00 d7 e2 c5 e4 d3 d6 c1 c4 40 00 08 07 50 00 23 00 00 00 00 40   ┆␣Ø r␣␣␣␣␣␣␣␣PSEULOAD ␣  &␣ ␣␣␣␣ ┆
0x1e0…200 00 00 00 01 00 05 30 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ff   ┆␣␣␣ ␣  ␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣ ┆

Reduced view