|
|
DataMuseum.dkPresents historical artifacts from the history of: IBM System/36 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about IBM System/36 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 1024 (0x400)
Notes: MEMBER_P, Member_Text
Names: »SEUDROP «
└─⟦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
└─⟦10fd7efe5⟧
└─⟦this⟧ ».SEUDROP «
// MEMBER USER1-##MSG2 // IF JOBQ-NO IF EVOKED-NO * ' SEUDROP?M5500?' // IF DATAF1-#SEULIB DELETE #SEULIB,F1,REMOVE,,LIBR // LOAD $MAINT // RUN // DELETE LIBRARY-P,LIBRNAME-#LIBRARY,RETAIN-S,NAME-SEU // DELETE LIBRARY-P,LIBRNAME-#LIBRARY,RETAIN-S,NAME-SEUFMRI // DELETE LIBRARY-P,LIBRNAME-#LIBRARY,RETAIN-S,NAME-SEUILOD // DELETE LIBRARY-P,LIBRNAME-#LIBRARY,RETAIN-S,NAME-SEULOAD // DELETE LIBRARY-P,LIBRNAME-#LIBRARY,RETAIN-S,NAME-SEUMRI // DELETE LIBRARY-P,LIBRNAME-#LIBRARY,RETAIN-S,NAME-SEUSAVE // DELETE NAME-#SE.ALL,LIBRARY-O,LIBRNAME-#LIBRARY,RETAIN-S // DELETE LIBRARY-P,LIBRNAME-#LIBRARY,RETAIN-S,NAME-SEUFDROP // DELETE LIBRARY-P,LIBRNAME-#LIBRARY,RETAIN-S,NAME-SEUDROP // IF LOAD-'#SESPD01,#LIBRARY' DELETE LIBRARY-O,NAME-#SESPD.ALL,RETAIN-S // END // IFF ?CD?/0000 RETURN LOGPLD DROP,SEU // LOCAL AREA-SYSTEM,OFFSET-1,DATA-'SEUDROP 43' // LOAD $CNDRP // RUN
0x000…001 0x96 0x001…017 »// MEMBER USER1-##MSG2« 0x017…018 0x3a 0x018…019 0xae 0x019…047 »// IF JOBQ-NO IF EVOKED-NO * ' SEUDROP?M5500?'« 0x047…048 0x22 0x048…049 0xb3 0x049…07c »// IF DATAF1-#SEULIB DELETE #SEULIB,F1,REMOVE,,LIBR« 0x07c…07d 0x1d 0x07d…07e 0x8e 0x07e…08c »// LOAD $MAINT« 0x08c…08d 0x42 0x08d…08e 0x86 0x08e…094 »// RUN« 0x094…095 0x4a 0x095…096 0xb7 0x096…0cd »// DELETE LIBRARY-P,LIBRNAME-#LIBRARY,RETAIN-S,NAME-SEU« 0x0cd…0ce 0x19 0x0ce…0cf 0xbb 0x0cf…10a »// DELETE LIBRARY-P,LIBRNAME-#LIBRARY,RETAIN-S,NAME-SEUFMRI« 0x10a…10b 0x15 0x10b…10c 0xbb 0x10c…147 »// DELETE LIBRARY-P,LIBRNAME-#LIBRARY,RETAIN-S,NAME-SEUILOD« 0x147…148 0x15 0x148…149 0xbb 0x149…184 »// DELETE LIBRARY-P,LIBRNAME-#LIBRARY,RETAIN-S,NAME-SEULOAD« 0x184…185 0x15 0x185…186 0xba 0x186…1c0 »// DELETE LIBRARY-P,LIBRNAME-#LIBRARY,RETAIN-S,NAME-SEUMRI« 0x1c0…1c1 0x16 0x1c1…1c2 0xbb 0x1c2…1fd »// DELETE LIBRARY-P,LIBRNAME-#LIBRARY,RETAIN-S,NAME-SEUSAVE« 0x1fd…1fe 0x15 0x1fe…1ff 0xbb 0x1ff…23a »// DELETE NAME-#SE.ALL,LIBRARY-O,LIBRNAME-#LIBRARY,RETAIN-S« 0x23a…23b 0x15 0x23b…23c 0xbc 0x23c…278 »// DELETE LIBRARY-P,LIBRNAME-#LIBRARY,RETAIN-S,NAME-SEUFDROP« 0x278…279 0x14 0x279…27a 0xbb 0x27a…2b5 »// DELETE LIBRARY-P,LIBRNAME-#LIBRARY,RETAIN-S,NAME-SEUDROP« 0x2b5…2b6 0x15 0x2b6…2b7 0xc8 0x2b7…2ff »// IF LOAD-'#SESPD01,#LIBRARY' DELETE LIBRARY-O,NAME-#SESPD.ALL,RETAIN-S« 0x2ff…300 0x08 0x300…301 0x86 0x301…307 »// END« 0x307…308 0x4a 0x308…309 0x97 0x309…320 »// IFF ?CD?/0000 RETURN« 0x320…321 0x39 0x321…322 0x8f 0x322…331 »LOGPLD DROP,SEU« 0x331…332 0x41 0x332…333 0xaf 0x333…362 »// LOCAL AREA-SYSTEM,OFFSET-1,DATA-'SEUDROP 43'« 0x362…363 0x21 0x363…364 0x8e 0x364…372 »// LOAD $CNDRP« 0x372…373 0x42 0x373…374 0x86 0x374…37a »// RUN« 0x37a…37b 0x4a 0x37b…37c 0x00 0x37c…380 00 03 00 02 ┆␣ ␣ ┆ 0x380…3a0 30 00 00 00 00 00 00 00 00 00 00 00 00 00 80 3f 33 00 00 00 00 00 00 00 00 d7 e2 c4 c1 f8 40 40 ┆ ␣␣␣␣␣␣␣␣␣␣␣␣␣Ø ␣␣␣␣␣␣␣␣PSDA8 ┆ 0x3a0…3c0 40 40 00 0f 06 50 00 0e 00 00 00 00 40 00 02 00 02 00 02 30 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ␣ &␣ ␣␣␣␣ ␣ ␣ ␣ ␣␣␣␣␣␣␣␣␣␣␣␣┆ 0x3c0…3e0 00 80 3d 99 00 00 00 00 00 00 00 00 d7 e2 c4 c1 f9 40 40 40 40 00 0f 08 50 00 0f 00 00 00 00 40 ┆␣Ø r␣␣␣␣␣␣␣␣PSDA9 ␣ &␣ ␣␣␣␣ ┆ 0x3e0…400 00 02 00 02 00 02 30 00 00 00 00 00 00 00 00 00 00 00 00 00 80 3d cc 00 00 00 00 00 00 00 00 ff ┆␣ ␣ ␣ ␣␣␣␣␣␣␣␣␣␣␣␣␣Ø ö␣␣␣␣␣␣␣␣ ┆