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

⟦c72f488d1⟧

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

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

******************************************************************************  
*                                                                            *  
*   THIS PROCEDURE EXECUTES SDA MENU PROCESSING ROUTINES                     *  
*                                                                            *  
*     INCLUDING SDA15 FOR END OF FUNCTION REQUESTS                           *  
*                                                                            *  
******************************************************************************  
// TAG SDA1BEG                                                                  
// LOAD #SASM                                                                   
// RUN                                                                          
// LOCAL OFFSET-11,DATA-'1',AREA-SYSTEM                                         
// IF ?L'57,1'?/Y  INCLUDE SDA15                                                
// LOCAL OFFSET-57,DATA-'N',AREA-SYSTEM                                         
// IFF ?L'09,1'?/1   RETURN                                                     
// GOTO SDA1BEG                                                                 

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 0xb4
0x05a…08e »THIS PROCEDURE EXECUTES SDA MENU PROCESSING ROUTINES«
0x08e…08f 0x15
0x08f…090 0x81
0x090…091 »*«
0x091…092 0x02
0x092…093 0x81
0x093…094 »*«
0x094…095 0x4c
0x095…096 0x81
0x096…097 »*«
0x097…098 0x02
0x098…099 0x81
0x099…09a »*«
0x09a…09b 0x05
0x09b…09c 0xac
0x09c…0c8 »INCLUDING SDA15 FOR END OF FUNCTION REQUESTS«
0x0c8…0c9 0x1b
0x0c9…0ca 0x81
0x0ca…0cb »*«
0x0cb…0cc 0x02
0x0cc…0cd 0x81
0x0cd…0ce »*«
0x0ce…0cf 0x4c
0x0cf…0d0 0x81
0x0d0…0d1 »*«
0x0d1…0d2 0x02
0x0d2…0d3 0xce
0x0d3…121 »******************************************************************************«
0x121…122 0x02
0x122…123 0x8e
0x123…131 »// TAG SDA1BEG«
0x131…132 0x42
0x132…133 0x8d
0x133…140 »// LOAD #SASM«
0x140…141 0x43
0x141…142 0x86
0x142…148 »// RUN«
0x148…149 0x4a
0x149…14a 0xa7
0x14a…171 »// LOCAL OFFSET-11,DATA-'1',AREA-SYSTEM«
0x171…172 0x29
0x172…173 0x91
0x173…184 »// IF ?L'57,1'?/Y«
0x184…185 0x02
0x185…186 0x8d
0x186…193 »INCLUDE SDA15«
0x193…194 0x30
0x194…195 0xa7
0x195…1bc »// LOCAL OFFSET-57,DATA-'N',AREA-SYSTEM«
0x1bc…1bd 0x29
0x1bd…1be 0x92
0x1be…1d0 »// IFF ?L'09,1'?/1«
0x1d0…1d1 0x03
0x1d1…1d2 0x86
0x1d2…1d8 »RETURN«
0x1d8…1d9 0x35
0x1d9…1da 0x8f
0x1da…1e9 »// GOTO SDA1BEG«
0x1e9…1ea 0x41
0x1ea…1eb 0x00
0x1eb…200 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ff                                    ┆␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣ ┆

Reduced view