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

⟦a3f48d1d9⟧

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

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

**************************************************************************      
*                                                                        *      
*   THIS PROCEDURE IS EVOKED TO COMPILE WSU PROGRAMS                     *      
*                                                                        *      
* INPUT:                                                                 *      
*   PARAM 1 - WORKSTATION ID OF SDA REQUESTOR                            *      
*   PARAM 2 - NAME OF SOURCE LIBRARY IN WHICH MEMBER TO COMPILE RESIDES  *      
*   PARAM 3 - NAME OF SOURCE MEMBER CONTAINING PROGRAM TO COMPILE        *      
*   PARAM 4 - LEVEL OF COMPILATION LISTING SELECTED                      *      
*                                                                        *      
**************************************************************************      
// LOCAL AREA-SYSTEM                                                            
// WSU ?3?,?2?,50,NOSTOP,NOLISTS,PROC,N,?4?,Y                                   
// MEMBER PROGRAM1-#SA#M1,USER1-#SA#M1                                          
// IF ?CD?/1008  GOTO FAILURE                                                   
// MSG ?1?,'?3? ?M0850?'                                                        
// GOTO DONE                                                                    
// TAG FAILURE                                                                  
// MSG ?1?,'?3? ?M0851?'                                                        
// TAG DONE                                                                     

0x000…001 0xca
0x001…04b »**************************************************************************«
0x04b…04c 0x06
0x04c…04d 0x81
0x04d…04e »*«
0x04e…04f 0x48
0x04f…050 0x81
0x050…051 »*«
0x051…052 0x06
0x052…053 0x81
0x053…054 »*«
0x054…055 0x03
0x055…056 0xb0
0x056…086 »THIS PROCEDURE IS EVOKED TO COMPILE WSU PROGRAMS«
0x086…087 0x15
0x087…088 0x81
0x088…089 »*«
0x089…08a 0x06
0x08a…08b 0x81
0x08b…08c »*«
0x08c…08d 0x48
0x08d…08e 0x81
0x08e…08f »*«
0x08f…090 0x06
0x090…091 0x88
0x091…099 »* INPUT:«
0x099…09a 0x41
0x09a…09b 0x81
0x09b…09c »*«
0x09c…09d 0x06
0x09d…09e 0x81
0x09e…09f »*«
0x09f…0a0 0x03
0x0a0…0a1 0xa9
0x0a1…0ca »PARAM 1 - WORKSTATION ID OF SDA REQUESTOR«
0x0ca…0cb 0x1c
0x0cb…0cc 0x81
0x0cc…0cd »*«
0x0cd…0ce 0x06
0x0ce…0cf 0x81
0x0cf…0d0 »*«
0x0d0…0d1 0x03
0x0d1…0d2 0xc3
0x0d2…115 »PARAM 2 - NAME OF SOURCE LIBRARY IN WHICH MEMBER TO COMPILE RESIDES«
0x115…116 0x02
0x116…117 0x81
0x117…118 »*«
0x118…119 0x06
0x119…11a 0x81
0x11a…11b »*«
0x11b…11c 0x03
0x11c…11d 0xbd
0x11d…15a »PARAM 3 - NAME OF SOURCE MEMBER CONTAINING PROGRAM TO COMPILE«
0x15a…15b 0x08
0x15b…15c 0x81
0x15c…15d »*«
0x15d…15e 0x06
0x15e…15f 0x81
0x15f…160 »*«
0x160…161 0x03
0x161…162 0xaf
0x162…191 »PARAM 4 - LEVEL OF COMPILATION LISTING SELECTED«
0x191…192 0x16
0x192…193 0x81
0x193…194 »*«
0x194…195 0x06
0x195…196 0x81
0x196…197 »*«
0x197…198 0x48
0x198…199 0x81
0x199…19a »*«
0x19a…19b 0x06
0x19b…19c 0xca
0x19c…1e6 »**************************************************************************«
0x1e6…1e7 0x06
0x1e7…1e8 0x94
0x1e8…1fc »// LOCAL AREA-SYSTEM«
0x1fc…1fd 0x3c
0x1fd…1fe 0xad
0x1fe…22b »// WSU ?3?,?2?,50,NOSTOP,NOLISTS,PROC,N,?4?,Y«
0x22b…22c 0x23
0x22c…22d 0xa6
0x22d…253 »// MEMBER PROGRAM1-#SA#M1,USER1-#SA#M1«
0x253…254 0x2a
0x254…255 0x8f
0x255…264 »// IF ?CD?/1008«
0x264…265 0x02
0x265…266 0x8c
0x266…272 »GOTO FAILURE«
0x272…273 0x33
0x273…274 0x98
0x274…28c »// MSG ?1?,'?3? ?M0850?'«
0x28c…28d 0x38
0x28d…28e 0x8c
0x28e…29a »// GOTO DONE«
0x29a…29b 0x44
0x29b…29c 0x8e
0x29c…2aa »// TAG FAILURE«
0x2aa…2ab 0x42
0x2ab…2ac 0x98
0x2ac…2c4 »// MSG ?1?,'?3? ?M0851?'«
0x2c4…2c5 0x38
0x2c5…2c6 0x8b
0x2c6…2d1 »// TAG DONE«
0x2d1…2d2 0x45
0x2d2…2d3 0x00
0x2d3…2e0 c4 40 00 07 ac 50 00 1a 00 00 00 00 40                                                            ┆D ␣ Ð&␣ ␣␣␣␣ ┆
0x2e0…300 00 00 00 01 00 04 30 00 00 00 00 00 00 00 00 00 00 00 00 00 80 3b cc 00 00 00 00 00 00 00 00 ff   ┆␣␣␣ ␣  ␣␣␣␣␣␣␣␣␣␣␣␣␣Ø ö␣␣␣␣␣␣␣␣ ┆

Reduced view