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

⟦b91536f02⟧

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

Derivation

└─⟦27db88c4d⟧ Bits:30009807 AS/ENTRY - S/36 SYST SUPP PROG SYST SUPP PGM 5363 DA Z250-0323-0 Refer to Memo 033109 Product Number 5727SS6 Rel 05 Created 19950301 Level 01 Seq 011 of 011
    └─⟦5f03407d3⟧ 
        └─⟦this⟧ ».OLRS    « 

* CHECK FOR RWS CONFIGURED ON SELECTED LINE                                                                             
// LOAD PSPEXT                                                                                                          
// RUN                                                                                                                  
// IF ?L'221,1'?=1 IF ?L'227,1'?=1 LOCAL OFFSET-116,DATA-'1'                                                            
// ELSE IF ?L'221,1'?=2 IF ?L'228,1'?=1 LOCAL OFFSET-116,DATA-'4'                                                       
// ELSE IFF ?L'226,1'?=1 LOCAL OFFSET-116,DATA-'2'                                                                      
// ELSE IF ?L'226,1'?=1 LOCAL OFFSET-116,DATA-'3'                                                                       
// RESET PSP                                                                                                            

0x000…001 0xab
0x001…02c »* CHECK FOR RWS CONFIGURED ON SELECTED LINE«
0x02c…02d 0x4d
0x02d…02e 0x8e
0x02e…03c »// LOAD PSPEXT«
0x03c…03d 0x6a
0x03d…03e 0x86
0x03e…044 »// RUN«
0x044…045 0x72
0x045…046 0xbc
0x046…082 »// IF ?L'221,1'?=1 IF ?L'227,1'?=1 LOCAL OFFSET-116,DATA-'1'«
0x082…083 0x3c
0x083…084 0xc1
0x084…0c5 »// ELSE IF ?L'221,1'?=2 IF ?L'228,1'?=1 LOCAL OFFSET-116,DATA-'4'«
0x0c5…0c6 0x37
0x0c6…0c7 0xb2
0x0c7…0f9 »// ELSE IFF ?L'226,1'?=1 LOCAL OFFSET-116,DATA-'2'«
0x0f9…0fa 0x46
0x0fa…0fb 0xb1
0x0fb…12c »// ELSE IF ?L'226,1'?=1 LOCAL OFFSET-116,DATA-'3'«
0x12c…12d 0x47
0x12d…12e 0x8c
0x12e…13a »// RESET PSP«
0x13a…13b 0x6c
0x13b…13c 0x00
0x13c…140 00 00 00 00                                                                                       ┆␣␣␣␣┆
0x140…160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣┆
          […0x5…]

Reduced view