Your Browser is not longer supported

Please use Google Chrome, Mozilla Firefox or Microsoft Edge to view the page correctly
Loading...

{{viewport.spaceProperty.prod}}

MCSINFO Information über die aktuelle MSCF-Konfiguration ausgeben

&pagelevel(3)&pagelevel

Makrobeschreibung

Der MCSINFO-Makroaufruf informiert über die aktuelle MSCF-Konfiguration, der der Rechner angehört. Sind Informationen privilegierten Aufrufern vorbehalten, erhält der nichtprivilegierte Aufrufer die Information „UNDEFINED“.

Die gewünschte Information wird in einem Ausgabebereich hinterlegt. Der Anwender muss mit dem Operanden OUTAREA dafür sorgen, dass der Ausgabebereich groß genug ist und die erforderlichen Zugriffsrechte vergeben sind. Wenn die Größe nicht ausreicht, wird ein entsprechender Returncode geliefert und die tatsächlich benötigte Länge wird in der Parameterliste hinterlegt, sodass ein passender Ausgabebereich angefordert werden kann.

Bei Angabe von INFO=*ALLHOSTS und INFO=*XCSHOSTS ist der für die Ausgabe erforderliche Speicherplatz von der Anzahl der am Verbund beteiligten Rechner abhängig.


Format und Operandenbeschreibung

Operation

Operanden

MCSINFO

 MF=D / C / L / M / E

 ,XPAND=PARAM / OUTPUT

 ,VERSION=4 / <integer 1..3>

 ,INFO=*NOHOST / *ONEHOST / *XCSHOSTS / *ALLHOSTS

 ,KEY=*NONE / *HOST / *PROC / *SYSID

 ,HOST=<var: char:8> / (<reg: pointer>)

 ,PROC=<var: char:8>/ (<reg: pointer>)

 ,SYSID=<var: char:3>/ (<reg: pointer>)

 ,OUTAREA=(adresse, länge)
            adresse: <var:pointer> / (<reg: pointer>)
            länge: <integer 1..32767> /
            <var:int:4> / (<reg:int:4>)

 [,PREFIX=M / p]

 [,MACID=CSI / macid]

 [,PARAM=<name 1..27>]

MF

Mit dem Operanden MF wird die Art der Makrogenerierung bestimmt.
In Abhängigkeit von den Operandenwerten für MF unterscheidet man fünf Formendes Makroaufrufs:

Operanden

 MF=L [,operand1 ,...,operandn ]

 MF=M ,operand1 ,...,operandn [,PREFIX=M / p] [,MACID=CSI / macid]
 MF=D ,XPAND=PARAM/OUTPUT[,PREFIX=M / p]

 MF=C ,XPAND=PARAM/OUTPUT[,PREFIX=M / p] [,MACID=CSI / macid]

 MF=E [,PARAM=<name 1..27>]


Zu den MF-Operandenwerten siehe Handbuch „Makroaufrufe an den Ablaufteil“ [12].

XPAND = PARAM / OUTPUT
Bestimmt, ob eine DSECT erzeugt werden soll. Angabe nur in Verbindung mit MF=D/C.

PARAM
Die Strukturbeschreibung der Parameterliste wird erzeugt.

OUTPUT
Die Strukturbeschreibung des Ausgabebereichs wird erzeugt.

VERSION = 4 / <integer 1..3>
Legt die gewünschte Schnittstellen-Version fest. Die Schnittstellen-Version 1 wird ab
MSCF V12.0, die Version 2 ab MSCF V13.0, die Version 3 ab MSCF V14.0, die Version 4 ab MSCF V17.0 unterstützt.

4
Voreinstellung. Die Schnittstellen-Version 4 wird generiert.

<integer 1..3>
Direktangabe der gewünschten Schnittstellen-Version.

INFO = *NOHOST / *ONEHOST / *XCSHOSTS / *ALLHOSTS
Legt fest, ob zusätzliche Information über Rechner angefordert wird.

*NOHOST
Voreinstellung. Es werden nur die Parameter des lokalen Rechners in der Parameterliste hinterlegt. Diese Information wird auch bei allen anderen Operandenwerten von INFO geliefert.

*ONEHOST
Über den per KEY-Operand festgelegten Rechner wird Information im Ausgabebereich hinterlegt.

*XCSHOSTS
Über alle XCS-Teilnehmer wird Information im Ausgabebereich hinterlegt.

*ALLHOSTS
Über sämtliche Rechner wird Information im Ausgabebereich hinterlegt.

KEY = *NONE / *HOST / *PROC / *SYSID
Wird nur bei INFO=*ONEHOST ausgewertet.
Legt fest, ob der Rechner, über den Information angefordert wird, über seinen Host- oder Processor-Namen oder über seine SYSID angegeben wird.

*NONE
Vorbelegung für den Fall, dass INFO ungleich *ONEHOST ist.
Es erfolgt keine Rechnerauswahl.

*HOST
Der Rechner, über den Information angefordert wird, wird über den Operanden HOST festgelegt.

*PROC
Der Rechner, über den Information angefordert wird, wird über den Operanden PROC festgelegt.

*SYSID
Der Rechner, über den Information angefordert wird, wird über den Operanden SYSID festgelegt.

HOST = <var: char:8> / (<reg: pointer>)
Name des Rechners, über den Information angefordert wird. Der Name darf maximal 8 Zeichen lang sein. Angabe nur in Verbindung mit KEY=*HOST.

<var: char:8>
Name eines Feldes, das den Host-Namen des Rechners enthält, über den Information angefordert wird.

<reg: pointer>
Register mit der Adresse eines Feldes, das den Host-Namen des Rechners enthält, über den Information angefordert wird. Angabe nur in Verbindung mit MF=M.

PROC = <var: char:8> / (<reg: pointer>)
BCAM-Name des Rechners, über den Information angefordert wird. Der Name darf maximal 8 Zeichen lang sein. Angabe nur in Verbindung mit KEY=*PROC.

<var: char:8>
Name eines Feldes, das den Namen der Verbindung zu dem Rechner enthält, über den Information angefordert wird.

(<reg: pointer>)
Register mit der Adresse eines Feldes, das den Processor-Namen des Rechners enthält, über den Information angefordert wird. Angabe nur in Verbindung mit MF=M.

SYSID = <var: char:3> / (<reg: char:3>)

SYSID des Rechners, über den Information angefordert wird. Der Name darf maximal 3 Zeichen lang sein. Angabe nur in Verbindung mit KEY=*SYSID.

<var: char:3>
Name eines Feldes, das die SYSID des Rechners enthält, über den Information angefordert wird.

(<reg: pointer>)
Register mit der Adresse eines Feldes, das die SYSID des Rechners enthält, über den Information angefordert wird. Angabe nur in Verbindung mit MF=M.

OUTAREA = (adresse, länge)
Legt den Ausgabebereich fest, in den die Rechnerinformation ausgegeben wird.

adresse: <var: pointer> / (<reg: pointer>)

<var: pointer>
Der Ausgabebereich muss auf Wortgrenze ausgerichtet sein.
Alternativ sind folgende 2 Angaben möglich:

  • Adresse des Ausgabebereichs als direkte Adressangabe in der Form A(bereich).

  • Name eines Feldes mit der Adresse des Ausgabebereichs. Angabe nur in Verbindung mit MF=M.

(<reg: pointer>)
Register mit der Adresse des Ausgabebereichs. Angabe nur in Verbindung mit MF=M.

länge: <integer 1..32767> / <var: int:4> / (<reg: int:4>)
Legt die Länge des Ausgabebereichs fest. Wird ein zu kleiner Ausgabebereich angegeben, so wird die erforderliche Größe im Feld Input_Param.Area_Length der Parameterliste hinterlegt.

<integer 1..32767>
Länge des Ausgabebereichs in Bytes als Direktangabe.
In Assembler muss eine symbolische Angabe in eckige Klammern eingeschlossen werden.

<var: int:4>
Name eines Feldes mit der Längenangabe als Integer-Zahl; Feldlänge = 4 Byte. Angabe nur in Verbindung mit MF=M.

<reg: int:4>
Register, das die Längenangabe für den Ausgabebereich enthält. Angabe nur in Verbindung mit MF=M.



Returncodes

Über den Erfolg der Ausführung des Makros DPHSHP wird im Standardheader folgender Returncode übergeben (cc = SUBCODE2, bb = SUBCODE1, aaaa = MAINCODE):

Standardheader: 




ccbbaaaa
X'cc'X'bb'X'aaaa'Erläuterung

X'00'

X'0000'

Kein Fehler


X'01'

X'0001'

Ungültiger Operand angegeben

X'01'

X'01'

X'0001'

INFO-Operand ungültig

X'02'

X'01'

X'0001'

KEY-Operand ungültig

X'03'

X'01'

X'0001'

HOST-Operand ungültig

X'04'

X'01'

X'0001'

PROC-Operand ungültig

X'05'

X'01'

X'0001'

SYSID-Operand ungültig

X'06'

X'01'

X'0001'

CALLER-Parameter ungültig

X'07'

X'01'

X'0001'

OUTAREA-Operand ungültig


X'20'

X'0004'

Interner Fehler

X'01'

X'20'

X'0004'

Interner Fehler beim Anfordern von Speicherplatz

X'02'

X'20'

X'0004'

Interner Fehler beim Aufruf der Konfigurationsverwaltung


X'40'

X'0006'

Ausgabe-Adresse ungültig


X'40'

X'0007'

Ausgabe-Adresse nicht auf Worte ausgerichtet


X'40'

X'0009'

Speicherplatz reicht für angeforderte Information nicht aus


X'40'

X'000A'

Adresse der Parameterliste ungültig


X'40'

X'0040'

Angegebener Host-Name unbekannt


X'40'

X'0041'

Angegebener Processor-Name unbekannt


X'40'

X'0042'

Angegebene SYSID unbekannt


X'01'

X'FFFF'

Schnittstellen-Fehler, falsche Einheit oder Funktions-Nummer


X'03'

X'FFFF'

Version nicht unterstützt

Tabelle 9: MCSINFO-Makro: Returncodes

Layout des Parameterbereichs

  PARAM    MCSINFO MF=D,XPAND=PARAM,VERSION=4
1 PARAM    MFTST MF=D,PREFIX=M,MACID=CSI,ALIGN=F,                        C
1                DMACID=CSI,SUPPORT=(E,D,C,M,L),DNAME=CSI_PL_MDL
2 PARAM    DSECT ,
2                *,##### PREFIX=M, MACID=CSI #####
1 *   values for sub return codes 2
1 MCSIINFO_PARAM               EQU   1     INFO-Parameter
1 MCSIKEY_PARAM                EQU   2     KEY-Parameter
1 MCSIHOST_PARAM               EQU   3     HOST-Parameter
1 MCSIPROC_PARAM               EQU   4     PROC-Parameter
1 MCSISYSID_PARAM              EQU   5     SYSID-Parameter
1 MCSICALLER_PARAM             EQU   6     CALLER-Parameter
1 MCSIOUTAREA_PARAM            EQU   7     OUTAREA-Parameter
1 MCSIGETMEM                   EQU   1     at $GETMEMI interface
1 MCSIXCS_SHOW                 EQU   2     at $MCXSHCI interface
1 *
1 *   MSCINFO parameter area
1 MCSIFHDR FHDR  MF=(C,MCSI),EQUATES=NO                    Standardheader 
2 MCSIFHDR DS    0A
2 MCSIFHE  DS    0XL8            0   GENERAL PARAMETER AREA HEADER
2 *
2 MCSIIFID DS    0A              0   INTERFACE IDENTIFIER
2 MCSIFCTU DS    AL2             0   FUNCTION UNIT NUMBER
2 *                                  BIT 15    HEADER FLAG BIT,
2 *                                  MUST BE RESET UNTIL FURTHER NOTICE
2 *                                  BIT 14-12 UNUSED, MUST BE RESET
2 *                                  BIT 11-0  REAL FUNCTION UNIT NUMBER
2 MCSIFCT  DS    AL1             2   FUNCTION NUMBER
2 MCSIFCTV DS    AL1             3   FUNCTION INTERFACE VERSION NUMBER
2 *
2 MCSIRET  DS    0A              4   GENERAL RETURN CODE
2 MCSISRET DS    0AL2            4   SUB RETURN CODE
2 MCSISR2  DS    AL1             4   SUB RETURN CODE 2
2 MCSISR1  DS    AL1             5   SUB RETURN CODE 1
2 MCSIMRET DS    0AL2            6   MAIN RETURN CODE
2 MCSIMR2  DS    AL1             6   MAIN RETURN CODE 2
2 MCSIMR1  DS    AL1             7   MAIN RETURN CODE 1
2 MCSIFHL  EQU   8               8   GENERAL OPERAND LIST HEADER LENGTH
2 *
1 *   main return codes
1 MCSISUCCESSFUL               EQU   0     successfully processed
1 MCSIPARAM_ERROR              EQU   1     invalid parameter specified
1 MCSIINTERFACE_ERROR          EQU   65535
1 *                                        Interface error, wrong unit
1 *                                        or function number specified
1 MCSIVERSION_ERROR            EQU   65535
1 *                                        Version not supported
1 MCSIINTERNAL_ERROR           EQU   4     Internal error
1 MCSIINV_OUTPUT_ADDR          EQU   6     invalid output address
1 *                                        specified
1 MCSIINV_OUTPUT_ALIGN         EQU   7     output address not word
1 *                                        aligned
1 MCSIAREA_TO_SHORT            EQU   9     not enough space for all
1 *                                        requested information
1 MCSIINV_PARAM_ADDR           EQU   10    invalid address of
1 *                                        parameterlist
1 MCSIHOST_UNKNOWN             EQU   64    specified host is unknown
1 MCSIPROCESSOR_UNKNOWN        EQU   65    specified processor is
1 *                                        unknown
1 MCSISYSID_UNKNOWN            EQU   66    specified sysid is unknown
1 *
1 *
1 MCSIINPUT_PARAM              DS    0XL32
1 *                                        INPUT PARAMETER
1 MCSIINFO                     DS    FL1   parameter INFO
1 *   values for operand INFO
1 MCSINO_HOST                  EQU   1     no host information requested
1 MCSIONE_HOST                 EQU   2     information requested for
1 *                                        host is specified by operand
1 *                                        *KEY
1 MCSIXCS_HOSTS                EQU   3     information requested for all
1 *                                        hosts in current XCS
1 MCSIALL_HOSTS                EQU   4     information requested for all
1 *                                        connected hosts
1 *
1 MCSIKEY                      DS    FL1   parameter KEY
1 *   values for operand KEY
1 MCSIHOST_GIVEN               EQU   1     host specified by operand
1 *                                        HOST
1 MCSIPROCESSOR_GIVEN          EQU   2     host specified by operand
1 *                                        PROC
1 MCSISYSID_GIVEN              EQU   3     host specified by operand
1 *                                        SYSID
1 MCSINO_KEY_GIVEN             EQU   4     no host specified
1 *
1 MCSISYSID_IN                 DS    CL3   parameter SYSID
1 MCSIRESERVED04               DS    XL3   reserved
1 MCSIHOST_NAME_IN             DS    CL8   parameter HOST
1 MCSIPROCESSOR_NAME_IN        DS    CL8   parameter PROCESSOR
1 MCSIAREA_ADDRESS             DS    A     address of output area
1 MCSIAREA_LENGTH              DS    F     length of output area
1 *
1 *
1 MCSIOUTPUT_PARAM             DS    0XL120
1 *                                        OUTPUT PARAMETER
1 *
1 MCSILOCAL_ATTRIBUTES         DS    0XL112
1 *                                        LOCAL ATTRIBUTES, see command
1 *                                        SHOW-MSCF-ENVIRONMENT for
1 *                                        meaning of fields
1 MCSIENV_HN                   DS    CL8   HOST NAME
1 MCSIENV_PN                   DS    CL8   PROCESSOR NAME
1 *
1 MCSI1ENV_HT                  DS    0XL14
1 *                                        HOST START DATE/TIME
1 MCSI1YEAR                    DS    CL4   yyyy
1 MCSI1MONTH                   DS    CL2   mm
1 MCSI1DAY                     DS    CL2   dd
1 MCSI1HOUR                    DS    CL2   hh
1 MCSI1MINUTE                  DS    CL2   mm
1 MCSI1SECOND                  DS    CL2   ss
1 *
1 MCSIXCS_NAME                 DS    CL8   XCS NAME
1 *
1 MCSI2ENV_XT                  DS    0XL14
1 *                                        XCS CREATION DATE/TIME
1 MCSI2YEAR                    DS    CL4   yyyy
1 MCSI2MONTH                   DS    CL2   mm
1 MCSI2DAY                     DS    CL2   dd
1 MCSI2HOUR                    DS    CL2   hh
1 MCSI2MINUTE                  DS    CL2   mm
1 MCSI2SECOND                  DS    CL2   ss
1 *
1 MCSISERVER_TASK_LIMIT        DS    F     SERVER TASK LIMIT
1 MCSICURRENT_NUM_SERVERS      DS    F     NUMBER OF SERVERS
1 MCSICURRENT_NUM_FREE_SERVERS DS    F     NUMBER OF FREE SERVERS
1 MCSIXCS_RECONF_NUMBER        DS    F     XCS RECONFIGURATION NUMBER
1 MCSIENV_SID                  DS    CL3   SYSID
1 MCSIRESERVED01               DS    XL1   reserved
1 MCSIENV_SVERS                DS    CL4   SYSTEM VERSION
1 MCSIENV_MVERS                DS    CL4   MSCF VERSION
1 MCSIFAILURE_DETECTION_LIMIT  DS    H     FAILURE DETECTION LIMIT
1 MCSIUSER_TERMINATION_LIMIT   DS    H     USER TERMINATION LIMIT, value
1 *                                        32767 means *UNLIMITED
1 MCSIENV_PWR                  DS    FL1   processor password required
1 *                                        for confidential
1 *                                        communication
1 *   values for field password_required
1 MCSIENV_N                    EQU   0     no password required
1 MCSIENV_Y                    EQU   1     password required
1 MCSIENV_NDEF                 EQU   255   protected or no information
1 *
1 MCSIRECOVERY_START           DS    FL1   RECOVERY START (general
1 *                                        setting)
1 *   specifies, whether fail-reconfiguration for partners may be
1 *   started automatically by host and partners may start
1 *   fail-reconfiguration for host automatically (general setting)
1 MCSIRECOV_NDEF               EQU   0     no information
1 MCSIRECOV_BY_SYS             EQU   1     reconfigurations for partners
1 *                                        may be started
1 *                                        automatically, as long as
1 *                                        allowed by partnerspecific
1 *                                        setting of host and settings
1 *                                        of partner.
1 MCSIRECOV_BY_OP              EQU   2     reconfigurations for partners
1 *                                        are started by operator only
1 MCSIRECOV_CBY_SYS            EQU   3     as by_operator, additionally
1 *                                        reconfiguration for HOST
1 *                                        must not be started
1 *                                        automatically by any partner
1 *                                        :* 418
1 MCSIRECOV_SECURE             EQU   8     reconfiguration of host or 
1 *                                        partner is started 
1 *                                        automatically only when LIVE 
1 *                                        MONITOR detects crash :* 502 
1 MCSIRECOV_LOCKED             EQU   9     automatic reconfiguration of 
1 *                                        host or partner is locked by 
1 *                                        system component :* 520 
1 MCSIRECOV_INVALID            EQU   255   invalid :* 408
1 *
1 MCSIREQ_RECOVERY_START       DS    FL1   RECOVERY START ( requested
1 *                                        value of general setting) :*
1 *                                        408
1 *   specifies, whether fail-reconfiguration for partners should be
1 *   started automatically by host and partners may start
1 *   fail-reconfiguration for host automatically (requested value of
1 *   general setting) :* 408
1 MCSIRRECOV_NDEF              EQU   0     no information
1 MCSIRRECOV_BY_SYS            EQU   1     reconfigurations for partners
1 *                                        may be started
1 *                                        automatically, as long as
1 *                                        allowed by partnerspecific
1 *                                        setting of host and settings
1 *                                        of partner.
1 MCSIRRECOV_BY_OP             EQU   2     reconfigurations for partners
1 *                                        are started by operator only
1 MCSIRRECOV_CBY_SYS           EQU   3     as by_operator, additionally
1 *                                        reconfiguration for HOST
1 *                                        must not be started
1 *                                        automatically by any partner
1 *                                        :* 418
1 MCSIRRECOV_SECURE            EQU   8     reconfiguration of host or
1 *                                        partner is started
1 *                                        automatically only when LIVE
1 *                                        MONITOR detects crash :* 502
1 MCSIRRECOV_LOCKED            EQU   9     automatic reconfiguration of
1 *                                        host or partner is locked by
1 *                                        system component :* 520
1 MCSIRRECOV_INVALID           EQU   255   invalid :* 408
1 *
1 MCSIXCS_STATE                DS    FL1   XCS STATE
1 *   values for XCS STATE
1 MCSIXCS_UNDEFINED            EQU   0     XCS not allowed in this
1 *                                        session, because of
1 *                                        MCXSPXCS=N or XCS-NAME=*NONE
1 *                                        in last MSCF session: XCS
1 *                                        ressources may be allocated
1 *                                        locally :* 420
1 MCSIXCS_INACTIVE             EQU   1     XCS inactive
1 MCSIXCS_ACTIVE               EQU   2     XCS active, xcs ressources
1 *                                        are allocated globally
1 MCSIXCS_RECONF_JOIN          EQU   3     XCS in join reconfiguration
1 MCSIXCS_RECONF_LEAVE         EQU   4     XCS in leave reconfiguration
1 MCSIXCS_RECONF_FAIL          EQU   5     XCS in fail reconfiguration
1 MCSIXCS_INTERRUPTED          EQU   6     XCS interrupted due to an
1 *                                        error
1 MCSIXCS_SUSPENDED            EQU   7     last MSCF session is or was
1 *                                        CCS, but XCS allowed because
1 *                                        of MCXSPXCS=V or
1 *                                        XCS-NAME=*SUSPEND :* 420
1 *
1 MCSIENV_HP                   DS    X     HOST PRIORITY
1 MCSIRESERVED02               DS    XL3   reserved
1 MCSILEAVE_LIMIT              DS    H     LEAVE LIMIT
1 MCSIABORT_LIMIT              DS    H     ABORT LIMIT
1 MCSIFADING_INTERVAL          DS    H     FADING INTERVAL :* 502
1 MCSIRESERVED03               DS    XL14  reserved
1 *
1 MCSIGLOBAL_STATI_NUM_ENTRIES DS    F     number of host entries
1 MCSIGLOBAL_STATI_AREA_ADDRESS DS    A     address of host area
1 *
1 MCSIRESERVED05               DS    XL4   reserved
1 MCSI#                        EQU   *-MCSIFHDR





Layout des Ausgabebereichs

  OUTPUT   MCSINFO MF=D,XPAND=OUTPUT,VERSION=4
1 OUTPUT   MFTST MF=D,PREFIX=M,MACID=CSI,ALIGN=F,                        C
1                DMACID=CSI,SUPPORT=(E,D,C,M,L),                         C
1                DNAME=CSI_GLOBAL_STATUS_MDL
2 OUTPUT   DSECT ,
2                *,##### PREFIX=M, MACID=CSI #####
1 *
1 *
1 MCSIHOST_IDENTIFICATION      DS    0XL48
1 *                                        host identification,
1 *                                        information derived from XCM
1 *                                        HCTE or MSCF-HOSTTAB
1 MCSIOUT_HN                   DS    CL8   HOST NAME
1 *
1 MCSI3OUT_HT                  DS    0XL14
1 *                                        HOST START DATE/TIME
1 MCSI3YEAR                    DS    CL4   yyyy
1 MCSI3MONTH                   DS    CL2   mm
1 MCSI3DAY                     DS    CL2   dd
1 MCSI3HOUR                    DS    CL2   hh
1 MCSI3MINUTE                  DS    CL2   mm
1 MCSI3SECOND                  DS    CL2   ss
1 *
1 MCSISYSID                    DS    CL3   SYSID
1 MCSIRESERVED06               DS    XL1   reserved
1 MCSISYSTEM_VERSION           DS    CL4   SYSTEM VERSION
1 MCSIMSCF_VERSION             DS    CL4   MSCF VERSION
1 MCSIHOST_SITE                DS    FL1   HOST SITE
1 *   locality of the host
1 MCSIIS_REMOTE                EQU   0     remote host
1 MCSIIS_LOCAL                 EQU   1     local host
1 *
1 MCSIRESERVED07               DS    XL13  reserved
1 *
1 *
1 MCSIHOST_STATUS              DS    0XL48
1 *                                        host states, information
1 *                                        derived from XCM HCTE
1 MCSIHOST_RECONF_NUMBER       DS    F     joining order
1 MCSIHOST_STATE               DS    FL1   HOST STATE
1 *   values for HOST STATE
1 MCSIHOST_NOT_ACTIVE          EQU   0     Host/partner not part of
1 *                                        XCS/CCS
1 MCSIHOST_JOIN                EQU   1     Host/partner joins to XCS
1 MCSIHOST_ACTIVE              EQU   2     Host/partner is active in
1 *                                        XCS/CCS
1 MCSIHOST_LEAVE               EQU   3     Host/partner leaves XCS/CCS
1 MCSIHOST_FAIL                EQU   4     Partner has terminated
1 *                                        XCS/CCS abnormally or
1 *                                        crashed
1 MCSIHOST_ABORT               EQU   5     Host/partner performs
1 *                                        abnormal XCS/CCS termination
1 MCSIHOST_CRASH               EQU   6     Partner has crashed :*330
1 MCSIHSTATE_NDEF              EQU   255   no information
1 *
1 MCSIPARTNER_TYPE             DS    FL1   PARTNER TYPE
1 *   values for PARTNER TYPE
1 MCSILCS_PARTNER              EQU   0     LCS
1 MCSICCS_PARTNER              EQU   1     CCS
1 MCSIXCS_PARTNER              EQU   2     XCS
1 MCSIPTYPE_NDEF               EQU   255   no information
1 *
1 MCSIRECONFIGURATION_STATE    DS    FL1   RECONFIGURATION STATE
1 *   current reconfiguration state of host or partner
1 MCSIRCF_INACTIVE             EQU   0     no reconfiguration active
1 MCSIRCF_JOIN_REQUEST         EQU   3     host or partner waits for
1 *                                        join
1 MCSIRCF_JOIN_START           EQU   4     host or partner is joining
1 MCSIRCF_JOIN_END             EQU   5     host or partner has joined
1 MCSIRCF_LEAVE_REQUEST        EQU   6     host or partner waits for
1 *                                        leave
1 MCSIRCF_LEAVE_START          EQU   7     host or partner is leaving
1 MCSIRCF_LEAVE_END            EQU   8     host or partner has left
1 MCSIRCF_FAIL_REQUEST         EQU   10    abnormal termination of
1 *                                        partner assumed
1 MCSIRCF_FAIL_START           EQU   11    recovery for abnormally
1 *                                        terminated partner
1 MCSIRCF_FAIL_END             EQU   12    recovery for abnormally
1 *                                        terminated partner finished
1 MCSIRCF_ABORT_REQ            EQU   20    abort of host or partner
1 *                                        requested
1 MCSIRCF_ABORT_START          EQU   13    host or partner is in
1 *                                        abnormal termination
1 MCSIRCF_ABORT_END            EQU   14    host or partner has
1 *                                        abnormally terminated
1 MCSIRCF_CONN_ACT             EQU   15    mscf connection to partner
1 *                                        established
1 MCSIRCF_CONN_LOST            EQU   16    mscf connection to partner
1 *                                        lost
1 MCSIRCF_CONTROL_FAIL         EQU   17    control of partner lost
1 MCSIRCF_CONTROL_CRASH        EQU   18    partner possibly crashed
1 MCSIRCF_NDEF                 EQU   255   no information
1 *
1 MCSIHOST_CONTROL             DS    FL1   control state
1 *   values for HOST CONTROL
1 MCSIALL_INACTIVE             EQU   0     partner is not monitored
1 MCSICOMMUNICATION_ACTIVE     EQU   1     partner is monitored by
1 *                                        communication only
1 MCSIDISK_ACTIVE              EQU   2     partner is monitored by by
1 *                                        disk only
1 MCSIALL_ACTIVE               EQU   3     partner is monitored by
1 *                                        communication and disk
1 MCSILOST                     EQU   4     both monitoring paths of
1 *                                        partner are lost
1 MCSICRITICAL                 EQU   5     disk protokoll for partner
1 *                                        not possible
1 MCSICRASHED                  EQU   6     partner has crashed
1 MCSIMSCF_TERMINATED          EQU   7     mscf terminated on partner :*
1 *                                        410
1 MCSIHCTRL_NDEF               EQU   255   no information
1 *
1 MCSIFLAGS                    DS    AL1   flags :* 404
1 MCSICRASHED_QUEST            EQU   X'80'
1 *                                        Is set together with
1 *                                        host_control lost (MCS1100
1 *                                        open) :* 408
1 MCSICONNECT_REQ              EQU   X'40'
1 *                                        Is set together with
1 *                                        host_control disk_active or
1 *                                        lost (MCS1101 open) :* 408
1 MCSIRESERVED08               EQU   X'3F'
1 *                                        filler for alignment
1 MCSIHOST_PRIORITY            DS    X     HOST PRIORITY
1 MCSICONN_RECOVERY_START      DS    FL1   RECOVERY START
1 *                                        (partnerspecific setting) :*
1 *                                        402
1 *   specifies, whether fail-reconfiguration for this partner may be
1 *   started automatically by host and this partner may start
1 *   fail-reconfiguration for host automatically (partnerspecific
1 *   setting) :* 402
1 MCSICRECOV_NDEF              EQU   0     no information
1 MCSICRECOV_BY_SYS            EQU   1     host may start
1 *                                        reconfiguration for partner
1 *                                        automatically as longas
1 *                                        allowed by partner
1 MCSICRECOV_BY_OP             EQU   2     host starts reconfiguration
1 *                                        for partner initiated by
1 *                                        operator only
1 MCSICRECOV_CBY_SYS           EQU   3     as by_operator, additionally
1 *                                        reconfiguration for HOST
1 *                                        must not be started
1 *                                        automatically by this
1 *                                        partner. :* 418
1 MCSICRECOV_STD               EQU   5     This partner is controlled
1 *                                        only after it has shared a
1 *                                        pubset with host. When it is
1 *                                        controlled, general
1 *                                        recovery-start setting comes
1 *                                        into effect. :* 402
1 *
1 MCSIPARTN_RECOVERY_START     DS    FL1   RECOVERY START (combined
1 *                                        general and partnerspecific
1 *                                        setting of partner) :* 402
1 *   specifies the combined general and partnerspecific recovery-start
1 *   settings of this partner as they are effective for host. :* 402
1 MCSIPRECOV_NDEF              EQU   0     no information
1 MCSIPRECOV_BY_SYS            EQU   1     partner may start
1 *                                        reconfiguration for host
1 *                                        automatically, as long as
1 *                                        allowed by host
1 MCSIPRECOV_BY_OP             EQU   2     partner starts
1 *                                        reconfiguration for host
1 *                                        initiated by operator only
1 MCSIPRECOV_CBY_SYS           EQU   3     as by_operator, additionally
1 *                                        host must not start
1 *                                        reconfiguration for this
1 *                                        partner automatically). :*
1 *                                        418
1 MCSIPRECOV_NO_CTRL           EQU   6     partner does not control
1 *                                        host. :* 418
1 MCSIPRECOV_UNKNOWN           EQU   7     setting of partner with
1 *                                        mscf_version < V14 not
1 *                                        known. :* 426
1 *
1 MCSICONTROL_GROUP            DS    CL1   multiple fail
1 *                                        reconfigurations for
1 *                                        partners in same control
1 *                                        group are started
1 *                                        simultaniously :* 402
1 MCSIRESERVED09               DS    XL3   filler for structure
1 *                                        alignment
1 MCSIHOST_XCS_NAME            DS    CL8   XCS NAME :* 402
1 *
1 MCSI4XCS_START_TIME          DS    0XL14
1 *                                        XCS CREATION DATE/TIME :* 402
1 MCSI4YEAR                    DS    CL4   yyyy
1 MCSI4MONTH                   DS    CL2   mm
1 MCSI4DAY                     DS    CL2   dd
1 MCSI4HOUR                    DS    CL2   hh
1 MCSI4MINUTE                  DS    CL2   mm
1 MCSI4SECOND                  DS    CL2   ss
1 *
1 MCSIRESERVED10               DS    XL10  reserved
1 *
1 *
1 MCSICONNECTION_STATUS        DS    0XL32
1 *                                        connection states,
1 *                                        information derived from
1 *                                        MSCF-HOSTTAB
1 MCSIPROCESSOR_NAME           DS    CL8   PROCESSOR NAME
1 MCSICONNECTION_TYPE          DS    FL1   CONNECTION TYPE
1 *   values for CONNECTION TYPE
1 MCSINOT_CONFIDENTIAL         EQU   0     loosely coupled
1 MCSICONFIDENTIAL             EQU   1     closely coupled
1 MCSICTYPE_NDEF               EQU   255   undefined
1 *
1 MCSIOUT_PWR                  DS    FL1   states whether processor
1 *                                        password is required for
1 *                                        confidential communication
1 *   values for field password_required
1 MCSIOUT_N                    EQU   0     no password required
1 MCSIOUT_Y                    EQU   1     password required
1 MCSIOUT_NDEF                 EQU   255   protected or no information
1 *
1 MCSICONNECTION_STATE         DS    FL1   CONNECTION STATE
1 *   values for CONNECTION STATE
1 MCSICONNECTION_LOCAL         EQU   0     host is local
1 MCSICONNECTION_CONNECTED     EQU   1     host is connected
1 MCSICONNECTION_NOT_CONNECTED EQU   2     host is not connected
1 MCSICSTAT_NDEF               EQU   255   no information
1 *
1 *
1 MCSIOVERLOAD                 DS    0XL2  OVERLOADED (REQUEST,REPLY)
1 MCSIREQUEST                  DS    CL1   information for request
1 *                                        messages
1 MCSIREPLY                    DS    CL1   information for reply
1 *                                        messages
1 *
1 MCSIREQ_N_CTRL_CONN          DS    FL1   requested number of control
1 *                                        connections :* 420
1 *   values of N_Cntrl_Conn Parameters
1 MCSINO_CNTRL                 EQU   0     no control connection
1 MCSIONE_CNTRL                EQU   1     one control connections
1 MCSITWO_CNTRL                EQU   2     two control connections
1 MCSIUNDEF_CNTRL              EQU   127   control connections not
1 *                                        possible to partners with
1 *                                        MSCF < V14
1 *
1 MCSIUSED_N_CTRL_CONN         DS    FL1   number of control connections
1 *                                        currently in use :* 420
1 MCSIREQ_CONN_RECOVERY_START  DS    FL1   RECOVERY START ( requested
1 *                                        value of partnerspecific
1 *                                        setting) :* 404
1 MCSIREQ_CONTROL_GROUP        DS    CL1   multiple fail
1 *                                        reconfigurations for
1 *                                        partners in same control
1 *                                        group are started
1 *                                        simultaniously :* 404
1 MCSIRESERVED11               DS    XL15  reserved
1 *
1 MCSIRESERVED12               DS    XL16  reserved
1 MCSIOUTPUT#                  EQU   *-MCSIOUT_HN