next up previous index
Next: Z035 Abnormal Termination Up: CERNLIB Previous: Z020 Usage Monitor

Z034 Computer Mainframe Identification

Routine ID: Z034
Author(s): SW groupLibrary: KERNLIB
Submitter: F. JamesSubmitted: 04.02.1986
Language: Fortran and AssemblerRevised:

OBSOLETE

Please note that this routine has been obsoleted in CNL 219. Users are advised not to use it any longer. No maintenance for it will take place and it will eventually disappear.
Suggested replacement: None

Subroutine subprogram WHICH can be used to determine on which computer a job is executing.

Structure:

SUBROUTINE subprograms
User Entry Names: WHICH

Usage:

    CALL WHICH(ISIT,VAL)
ISIT
On exit, ISIT contains an integer, and
VAL
a Hollerith string corresponding to the computer/system on which the job is executing, according to the following table:
2-31c|ISIT1c|VAL
Unknown 04H
VAX 8600 (VMS4) 14H8600
CDC 7600 (SCOPE 2.1) 24H7600
CDC frontends 34H6400
IBM 370/168 (MVS) 44H/168
IBM 3032 (MVS) 54H3032
IBM 3081 (MVS) 64H3081
SIEMENS 7890 (MVS) 74H7890
IBM 3090 (MVS) 84H3090
Apollo 94HAPO
Siemens 7890 (VM/CMS) 104H7890
IBM 3090 (VM/CMS) 114H3090

Z035


Janne Saarela
Mon Apr 3 15:06:23 METDST 1995