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

⟦adb0a6378⟧ 

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

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

Text Member

******************************************************************************  
*                                                                            *  
*   THIS PROCEDURE EXECUTES SDA WSU PROGRAM GENERATION ROUTINES              *  
*                                                                            *  
*      INCLUDING SDA50 FOR END OF FUNCTION PROCESSING                        *  
*                                                                            *  
******************************************************************************  
// TAG SDA5BEG                                                                  
// LOAD #SASW                                                                   
// RUN                                                                          
// LOCAL OFFSET-11,DATA-'5',AREA-SYSTEM                                         
// IF ?L'57,1'?/Y  INCLUDE SDA50                                                
// LOCAL OFFSET-57,DATA-'N',AREA-SYSTEM                                         
// IFF ?L'09,1'?/5  RETURN                                                      
// GOTO SDA5BEG

OctetView - MemberText

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 0xbb
0x05a…095 »THIS PROCEDURE EXECUTES SDA WSU PROGRAM GENERATION ROUTINES«
0x095…096 0x0e
0x096…097 0x81
0x097…098 »*«
0x098…099 0x02
0x099…09a 0x81
0x09a…09b »*«
0x09b…09c 0x4c
0x09c…09d 0x81
0x09d…09e »*«
0x09e…09f 0x02
0x09f…0a0 0x81
0x0a0…0a1 »*«
0x0a1…0a2 0x06
0x0a2…0a3 0xae
0x0a3…0d1 »INCLUDING SDA50 FOR END OF FUNCTION PROCESSING«
0x0d1…0d2 0x18
0x0d2…0d3 0x81
0x0d3…0d4 »*«
0x0d4…0d5 0x02
0x0d5…0d6 0x81
0x0d6…0d7 »*«
0x0d7…0d8 0x4c
0x0d8…0d9 0x81
0x0d9…0da »*«
0x0da…0db 0x02
0x0db…0dc 0xce
0x0dc…12a »******************************************************************************«
0x12a…12b 0x02
0x12b…12c 0x8e
0x12c…13a »// TAG SDA5BEG«
0x13a…13b 0x42
0x13b…13c 0x8d
0x13c…149 »// LOAD #SASW«
0x149…14a 0x43
0x14a…14b 0x86
0x14b…151 »// RUN«
0x151…152 0x4a
0x152…153 0xa7
0x153…17a »// LOCAL OFFSET-11,DATA-'5',AREA-SYSTEM«
0x17a…17b 0x29
0x17b…17c 0x91
0x17c…18d »// IF ?L'57,1'?/Y«
0x18d…18e 0x02
0x18e…18f 0x8d
0x18f…19c »INCLUDE SDA50«
0x19c…19d 0x30
0x19d…19e 0xa7
0x19e…1c5 »// LOCAL OFFSET-57,DATA-'N',AREA-SYSTEM«
0x1c5…1c6 0x29
0x1c6…1c7 0x92
0x1c7…1d9 »// IFF ?L'09,1'?/5«
0x1d9…1da 0x02
0x1da…1db 0x86
0x1db…1e1 »RETURN«
0x1e1…1e2 0x36
0x1e2…1e3 0x8f
0x1e3…1f2 »// GOTO SDA5BEG«
0x1f2…1f3 0x41
0x1f3…1f4 0x00
0x1f4…200 00 00 00 00 00 00 00 00 00 00 00 ff                                                               ┆␣␣␣␣␣␣␣␣␣␣␣ ┆

Reduced view