|
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: 1536 (0x600)
Notes: MEMBER_P, Member_Text
Names: »#DSX «
└─⟦c8ae05145⟧ Bits:30009820 AS/ENTRY - S/36 SYST SUPP PROG IDENT. S/36 PTFDK3900 FC 1991/9074/9084 Refer to Memo 36714 Product Number 5727SS6 Rel 05 5 Created 19950301 Level 01 Seq 001 of 011
└─⟦ac51fb3f2⟧
└─⟦this⟧ ».#DSX «
// LIBRARY NAME-0 00000200 // MEMBER PROGRAM1-#DX#M1,USER1-#DX#M1 00000300 // IF JOBQ-YES GOTO MIC1095 00000400 // IF EVOKED-NO GOTO MIC1095 00000500 // NOHALT 4,JOB 00000700 // IFF LOAD-'#ND@FMT,#LIBRARY' GOTO DSNX // IFF LOAD-'#NDET,#LIBRARY' GOTO DSNX // IFF LOAD-'#NDFB,#LIBRARY' GOTO DSNX // IFF LOAD-'#NDFD,#LIBRARY' GOTO DSNX // IFF LOAD-'#NDHD,#LIBRARY' GOTO DSNX // IFF LOAD-'#NDII,#LIBRARY' GOTO DSNX // IFF LOAD-'#NDIN,#LIBRARY' GOTO DSNX // IFF LOAD-'#NDML,#LIBRARY' GOTO DSNX // IFF LOAD-'#NDMU,#LIBRARY' GOTO DSNX // IFF LOAD-'#NDON,#LIBRARY' GOTO DSNX // IFF LOAD-'#NDOP,#LIBRARY' GOTO DSNX // IFF LOAD-'#NDPR,#LIBRARY' GOTO DSNX // IFF LOAD-'#NDRC,#LIBRARY' GOTO DSNX // IFF LOAD-'#NDRD,#LIBRARY' GOTO DSNX // IFF LOAD-'#NDRP,#LIBRARY' GOTO DSNX // IFF LOAD-'#NDRS,#LIBRARY' GOTO DSNX // IFF LOAD-'#NDSD,#LIBRARY' GOTO DSNX // IFF LOAD-'#NDTML,#LIBRARY' GOTO DSNX // IFF LOAD-'#NDTP,#LIBRARY' GOTO DSNX * * IF ALL CHECKS PASS THEN DSNX/ND IS INSTALLED ON THE SYSTEM * // LOAD #NDIN 00000800 // RUN 00000900 // RETURN 00001000 * * IF ANY CHECKS FAIL THEN DSNX/ND IS NOT INSTALLED ON THE SYSTEM * // TAG DSNX 00001100 // LOAD #DXIN // RUN 00000900 // RETURN 00001000 // TAG MIC1095 00001100 // * 1095 00001200 // IF JOBQ-NO IF EVOKED-NO PAUSE 00001300 // CANCEL 00001400 // CEND 00001800