|
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: 768 (0x300)
Notes: MEMBER_P, Member_Text
Names: »LIST «
└─⟦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
└─⟦41ed29fcc⟧
└─⟦this⟧ ».LIST «
**************************************************** CHANGED 10/12/83 * * LIST FILENAME, PROGRAM NAME, FILE DEFINITION, SORT/NOSORT, * * FILL CHARACTER, SOURCE PROCESSING, DFU SOURCE NAME, * * MASTER FILE NAME, USER LIB, , LABEL ON DISK * * * * REQUIRED PARAMETERS * * * * 1 - FILE NAME * * 2 - PROGRAM NAME * * 3 - FILE DEFINITION SOURCE MEMBER * * * *********************************************************************** // IFF LIST/?64? IFF JOBQ-YES IFF EVOKED-YES IF ?1?/ GOTO CALLHELP // ELSE IFF LIST/?64? IFF JOBQ-YES IFF EVOKED-YES IF ?2?/ GOTO CALLHELP // IFF ?9'?CLIB?'?/ LIBRARY NAME-#DFULIB // EVALUATE P13=?11? #LIST *ALL // RETURN // TAG CALLHELP HELP LIST,?1?,?2?,?3?,?4?,,?6?,?7?,?8?,?9'?CLIB?'?,,?11?
0x000…001 0xc7 0x001…048 »**************************************************** CHANGED 10/12/83 *« 0x048…049 0x09 0x049…04a 0x86 0x04a…050 »* LIST« 0x050…051 0x04 0x051…052 0xb5 0x052…087 »FILENAME, PROGRAM NAME, FILE DEFINITION, SORT/NOSORT,« 0x087…088 0x07 0x088…089 0x81 0x089…08a »*« 0x08a…08b 0x09 0x08b…08c 0x81 0x08c…08d »*« 0x08d…08e 0x09 0x08e…08f 0xb3 0x08f…0c2 »FILL CHARACTER, SOURCE PROCESSING, DFU SOURCE NAME,« 0x0c2…0c3 0x09 0x0c3…0c4 0x81 0x0c4…0c5 »*« 0x0c5…0c6 0x09 0x0c6…0c7 0x81 0x0c7…0c8 »*« 0x0c8…0c9 0x09 0x0c9…0ca 0xab 0x0ca…0f5 »MASTER FILE NAME, USER LIB, , LABEL ON DISK« 0x0f5…0f6 0x11 0x0f6…0f7 0x81 0x0f7…0f8 »*« 0x0f8…0f9 0x09 0x0f9…0fa 0x81 0x0fa…0fb »*« 0x0fb…0fc 0x45 0x0fc…0fd 0x81 0x0fd…0fe »*« 0x0fe…0ff 0x09 0x0ff…100 0x95 0x100…115 »* REQUIRED PARAMETERS« 0x115…116 0x31 0x116…117 0x81 0x117…118 »*« 0x118…119 0x09 0x119…11a 0x81 0x11a…11b »*« 0x11b…11c 0x45 0x11c…11d 0x81 0x11d…11e »*« 0x11e…11f 0x09 0x11f…120 0x81 0x120…121 »*« 0x121…122 0x03 0x122…123 0x8d 0x123…130 »1 - FILE NAME« 0x130…131 0x35 0x131…132 0x81 0x132…133 »*« 0x133…134 0x09 0x134…135 0x81 0x135…136 »*« 0x136…137 0x03 0x137…138 0x90 0x138…148 »2 - PROGRAM NAME« 0x148…149 0x32 0x149…14a 0x81 0x14a…14b »*« 0x14b…14c 0x09 0x14c…14d 0x81 0x14d…14e »*« 0x14e…14f 0x03 0x14f…150 0xa1 0x150…171 »3 - FILE DEFINITION SOURCE MEMBER« 0x171…172 0x21 0x172…173 0x81 0x173…174 »*« 0x174…175 0x09 0x175…176 0x81 0x176…177 »*« 0x177…178 0x45 0x178…179 0x81 0x179…17a »*« 0x17a…17b 0x09 0x17b…17c 0xc7 0x17c…1c3 »***********************************************************************« 0x1c3…1c4 0x09 0x1c4…1c5 0xc2 0x1c5…207 »// IFF LIST/?64? IFF JOBQ-YES IFF EVOKED-YES IF ?1?/ GOTO CALLHELP« 0x207…208 0x0e 0x208…209 0xc7 0x209…250 »// ELSE IFF LIST/?64? IFF JOBQ-YES IFF EVOKED-YES IF ?2?/ GOTO CALLHELP« 0x250…251 0x09 0x251…252 0xa8 0x252…27a »// IFF ?9'?CLIB?'?/ LIBRARY NAME-#DFULIB« 0x27a…27b 0x28 0x27b…27c 0x94 0x27c…290 »// EVALUATE P13=?11?« 0x290…291 0x3c 0x291…292 0x8a 0x292…29c »#LIST *ALL« 0x29c…29d 0x46 0x29d…29e 0x89 0x29e…2a7 »// RETURN« 0x2a7…2a8 0x47 0x2a8…2a9 0x8f 0x2a9…2b8 »// TAG CALLHELP« 0x2b8…2b9 0x41 0x2b9…2ba 0xb8 0x2ba…2f2 »HELP LIST,?1?,?2?,?3?,?4?,,?6?,?7?,?8?,?9'?CLIB?'?,,?11?« 0x2f2…2f3 0x18 0x2f3…2f4 0x00 0x2f4…300 00 00 00 00 00 00 00 00 00 00 00 ff ┆␣␣␣␣␣␣␣␣␣␣␣ ┆