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

⟦6b221503f⟧

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

Derivation

└─⟦5475bb115⟧ Bits:30009795 AS/ENTRY - S/36 SYST SUPP PROG S/36 VALUE ADDED SOFTWARE PACKAGE Refer to Memo 051445 Product Number 5727SS6 Rel 05 Created 19950301 Level 01 Seq 001 of 002
    └─⟦9ca9049e8⟧ 
        └─⟦this⟧ ».LISTALL « 

// LIBRARY NAME-#MYLIB                                                          
// MEMBER USER1-#MY#1MSG,PROGRAM1-#MY#1MSG,PROGRAM2-#MY#2MSG,LIBRARY-#MYLIB     
// IF DSPLY-IGC PROMPT MEMBER-#MY$FMT1,FORMAT-MYS210                            
// ELSE PROMPT MEMBER-#MY@FMT1,FORMAT-MYS210                                    
// LOCAL AREA-SYSTEM,OFFSET-1,DATA-'MIGRATE',BLANK-256                          
// LOCAL AREA-SYSTEM,OFFSET-327,DATA-'?USER?',BLANK-8                           
// LOCAL AREA-SYSTEM,OFFSET-117,DATA-'$MYAUD',BLANK-8                           
// IF ?CD?=0000 INCLUDE MYREPLST,#MYLIB                                         
// IF ?CD?=2003 RETURN                                                          
// IF ?CD?=2004 JOBQ 3,#MYLIB,MYREPLST,'?USER?'                                 
// IF ?CD?=2004 RETURN                                                          
// IF ?CD?=2007 RETURN                                                          
// RETURN                                                                       

0x000…001 0x96
0x001…017 »// LIBRARY NAME-#MYLIB«
0x017…018 0x3a
0x018…019 0xcb
0x019…064 »// MEMBER USER1-#MY#1MSG,PROGRAM1-#MY#1MSG,PROGRAM2-#MY#2MSG,LIBRARY-#MYLIB«
0x064…065 0x05
0x065…066 0xb4
0x066…09a »// IF DSPLY-IGC PROMPT MEMBER-#MY$FMT1,FORMAT-MYS210«
0x09a…09b 0x1c
0x09b…09c 0xac
0x09c…0c8 »// ELSE PROMPT MEMBER-#MY@FMT1,FORMAT-MYS210«
0x0c8…0c9 0x24
0x0c9…0ca 0xb6
0x0ca…100 »// LOCAL AREA-SYSTEM,OFFSET-1,DATA-'MIGRATE',BLANK-256«
0x100…101 0x1a
0x101…102 0xb5
0x102…137 »// LOCAL AREA-SYSTEM,OFFSET-327,DATA-'?USER?',BLANK-8«
0x137…138 0x1b
0x138…139 0xb5
0x139…16e »// LOCAL AREA-SYSTEM,OFFSET-117,DATA-'$MYAUD',BLANK-8«
0x16e…16f 0x1b
0x16f…170 0xa7
0x170…197 »// IF ?CD?=0000 INCLUDE MYREPLST,#MYLIB«
0x197…198 0x29
0x198…199 0x96
0x199…1af »// IF ?CD?=2003 RETURN«
0x1af…1b0 0x3a
0x1b0…1b1 0xaf
0x1b1…1e0 »// IF ?CD?=2004 JOBQ 3,#MYLIB,MYREPLST,'?USER?'«
0x1e0…1e1 0x21
0x1e1…1e2 0x96
0x1e2…1f8 »// IF ?CD?=2004 RETURN«
0x1f8…1f9 0x3a
0x1f9…1fa 0x96
0x1fa…210 »// IF ?CD?=2007 RETURN«
0x210…211 0x3a
0x211…212 0x89
0x212…21b »// RETURN«
0x21b…21c 0x47
0x21c…21d 0x00
0x21d…220 00 00 00                                                                                          ┆␣␣␣┆
0x220…240 00 00 00 00 00 00 00 00 80 3f 00 00 00 00 00 00 00 00 00 d7 c4 e2 d7 d3 d6 c3 d2 e2 00 23 9f 50   ┆␣␣␣␣␣␣␣␣Ø ␣␣␣␣␣␣␣␣␣PDSPLOCKS␣ ¤&┆
0x240…260 00 01 00 00 00 00 40 00 02 00 51 00 01 30 00 00 00 00 00 00 00 00 00 00 00 00 00 80 3f 33 00 00   ┆␣ ␣␣␣␣ ␣ ␣é␣  ␣␣␣␣␣␣␣␣␣␣␣␣␣Ø  ␣␣┆
0x260…280 00 00 00 00 00 00 d7 c4 e2 d7 d4 c1 d3 e2 d6 00 23 86 50 00 13 00 00 00 00 40 00 02 00 51 00 03   ┆␣␣␣␣␣␣PDSPMALSO␣ f&␣ ␣␣␣␣ ␣ ␣é␣ ┆
0x280…2a0 30 00 00 00 00 00 00 00 00 00 00 00 00 00 80 3f 66 00 00 00 00 00 00 00 00 d7 c4 e2 d7 d4 d5 e4   ┆ ␣␣␣␣␣␣␣␣␣␣␣␣␣Ø Ã␣␣␣␣␣␣␣␣PDSPMNU┆
0x2a0…2c0 40 40 00 23 85 50 00 01 00 00 00 00 40 00 02 00 51 00 01 30 00 00 00 00 00 00 00 00 00 00 00 00   ┆  ␣ e&␣ ␣␣␣␣ ␣ ␣é␣  ␣␣␣␣␣␣␣␣␣␣␣␣┆
0x2c0…2e0 00 80 3f 99 00 00 00 00 00 00 00 00 d7 c4 e2 d7 d6 c1 d3 e2 d6 00 23 a0 50 00 05 00 00 00 00 40   ┆␣Ø r␣␣␣␣␣␣␣␣PDSPOALSO␣ µ&␣ ␣␣␣␣ ┆
0x2e0…300 00 02 00 51 00 01 30 00 00 00 00 00 00 00 00 00 00 00 00 00 80 3f cc 00 00 00 00 00 00 00 00 ff   ┆␣ ␣é␣  ␣␣␣␣␣␣␣␣␣␣␣␣␣Ø ö␣␣␣␣␣␣␣␣ ┆

Reduced view