Für die globalen User Exits gilt Folgendes:
Ein globaler User Exit darf nur einmal für die gesamte Entire Operations-Installation existieren.
Alle globalen User Exits sind optional.
Die globalen User Exits müssen als Natural-Objekte in der Bibliothek
SYSEORU existieren.
Die Existenz der in dieser Funktion angegebenen globalen User Exits wird während des Starts des Entire Operations-Monitors abgeprüft. Wenn mindestens einer dieser globalen User Exits nicht gefunden werden kann, wird der Entire Operations-Monitor sofort beendet.
Dieses Dokument behandelt folgende Themen:
Siehe auch User Exits im Benutzerhandbuch.
Um den Bildschirm zur Definition eines globalen User Exit
aufzurufen:
Wählen Sie im Menü die Option .
Oder:
Geben Sie im Hauptmenü
den Optionscode 7.7 ein.
Drücken Sie Enter.
Der Bildschirm Globale User Exits (optional) wird angezeigt (Beispiel):
21.01.19 ***** Entire Operations ***** 14:17:48
Eigentuemer XYZ Globale User-Exits (optional)
-------------------------------------------------------------------------------
Exit-Name
Versionsnamen ________
JCL-Aktivierung ________
Symbol-Aenderung ________
Symbol nicht gefunden ________
Jobstart ________ Typ _ A Assembler N Natural
Nachricht senden ________ Verwendung _
Bitte beachten Sie den moeglichen Overhead, der durch die Verwendung von
User-Exits hervorgerufen wird.
Kommando => ____________________________________________________________
Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12---
Help End Save Menu |
Durch Angabe eines Namens im entsprechenden Feld in der Spalte Exit-Name und ggf. weitere Angaben können Sie verschiedene Arten von globalen User Exits definieren.
Weitere Informationen siehe Felder: Globale User Exits.
Anmerkung:
Der Jobstart-Exit ist veraltet und sollte nicht mehr benutzt
werden. Dieser Exit wird noch zur Sicherstellung der Abwärtskompatibilität mit
früheren Versionen gepflegt und war nur für den Jobstart auf
Großrechner-Betriebssystemen (z/OS, z/VSE, BS2000) vorgesehen.
Drücken Sie PF5 (Save), um die Eingaben zu speichern.
Drücken Sie PF3 (End), um zum Menü zurückzukehren.
| Feld | Beschreibung | |
|---|---|---|
| Versionsnamen | Name des Exits, der als globaler Exit für Versionsnamen benutzt werden soll. | |
| JCL-Aktivierung | Name des Exits, der als globaler JCL-Aktivierungs-Exit benutzt werden soll. | |
| Symbol-Änderung | Name des Exits, der als globaler Symbol-Änderungs-Exit benutzt werden soll. | |
| Symbol nicht gefunden | Name des Exits, der als globaler "Symbol nicht gefunden"-Exit benutzt werden soll. | |
| Jobstart | Dieser globale Exit ist obsolet
und sollte nicht mehr benutzt werden.
Der Exit wird nur noch aus Gründen der Abwärtskompatibilität zu früheren Version von Entire Operations unterstützt. Dieser Exit wurde für den Jobstart unter Großrechner-Betriebssystemen (z/OS, z/VSE, BS2000) verwendet. |
|
| Nachricht senden | Name des Exits, der als globaler Exit für Nachrichtenübermittlung benutzt werden soll. | |
| Verwendung | Betrifft nur Nachricht
senden.
Option, die beim globalen User-Exit Nachricht senden zu benutzen ist. Mögliche Werte: |
|
N |
Diesen Exit niemals benutzen. | |
S |
Nur für explizites Senden über den Exit
(=EXIT) benutzen.
|
|
D |
Zusätzlich für alle definierten Nachrichten-Sendeaktionen. | |
A |
Für alle Ereignisse. | |
Wenn dieser globale User Exit im Bildschirm Globale User Exits angegeben wird, dann prüft er die Namen der neu angelegten Netzwerk-Versionen bzw. Symboltabellen-Versionen.
Der Exit muss als Natural-Subprogramm kodiert sein.
Der Name der Parameter-Liste ist
NOPXPL-A.
Sie befindet sich in der System-Bibliothek SYSEOR.
Fügen Sie sie mit folgendem Statement in das Subprogramm ein:
DEFINE DATA PARAMETER USING NOPXPL-A
Der Parameter
P-CALL-PLACE
enthält:
| Parameter | Bedeutung | |
|---|---|---|
P-CALL-PLACE |
NVN |
Für die Prüfung von Netzwerk-Versionsnamen. |
SVN |
Für die Prüfung von Symboltabellen-Versionsnamen. | |
| P-RC | Bedeutung |
|---|---|
| 0 | Der Versionsname ist in Ordnung. |
| 1 | Der Versionsname wird vom Exit zurückgewiesen.
Wenn der Versionsname vom Exit zurückgewiesen wurde, dann wird
der Inhalt von |
Wenn dieser Exit im Bildschirm Globale User Exits angegeben ist, dann wird er von Entire Operations für jede Job-Aktivierung benutzt.
Der Exit muss als Natural-Subprogramm kodiert sein. Es besteht die Möglichkeit, fast alle Felder zu ändern, die die JCL-Speicherart beschreiben.
Anmerkung:
Um die Änderungen gültig zu machen, müssen Sie P-RC :=
1 setzen.
Die Änderungen sind nur für den aktuellen Lauf, aber nicht für die Master-Definition des Jobs wirksam.
Der Name der Parameter-Liste ist AJCLX1-A. Sie befindet
sich in der System-Bibliothek SYSEOR.
Fügen Sie sie mit folgendem Statement in das Subprogramm ein:
DEFINE DATA PARAMETER USING AJCLX1-A
| P-RC | Bedeutung |
|---|---|
| 0 | OK, keine Änderung der JCL-Speicherart. |
| 1 | OK, JCL-Speicherart wurde durch den Exit geändert. |
| sonstige | Zugriff auf die JCL-Datei abgelehnt oder anderes Problem. In diesem Fall wird das Laden des gegebenen Jobs unterbrochen. |
Während einer Job-Netzwerk-Aktivierung können benutzerdefinierte Symbole geändert und Gültigkeitsprüfungen durchführt werden. Wenn dieser Exit im Bildschirm Globale User Exits definiert wird, dann wird er während der Aktivierung aller Job-Netzwerke aufgerufen, für die keine spezifische Symbolabfrage oder kein spezifischer Änderungs-Exit definiert wurde.
Im Falle von benutzerdefinierten Masken (Maps) und
Gültigkeitsprüfungen während der Symbolabfrage für eine Netzwerk-Aktivierung
müssen die Symbole von der Entire Operations API-Routine
NOPUSY7N
gelesen und aktualisiert werden. Diese API-Routine gestattet außerdem das
sequenzielle Lesen in der aktiven Symboltabelle.
Siehe auch Symbole ändern ohne Eingabe im Benutzerhandbuch.
Der User Exit muss als Natural-Subprogramm kodiert sein und muss die
mitgelieferte Parameter-Liste NOPSYP3-A benutzen. Diese
Parameter-Liste enthält alle benötigten Umgebungsparameter.
Es wird eine Liste mit den für diese Netzwerk-Aktivierung verwendeten Symboltabellen übergeben.
| P-RC | Bedeutung |
|---|---|
| 0 | OK, Änderungen sind erledigt. |
| 1 | OK, keine Symbole abgefragt oder geändert. |
| 2 | Aktivierung abgebrochen. |
| 3 | Bei Eingabe: Geänderte Symbole in die Master-Symboltabelle zurückschreiben. |
Wenn dieser Exit im Bildschirm Globale User Exits angegeben wird, dann wird er während der Aktivierung aller Job-Netzwerke aufgerufen, für die kein spezifischer Symbolabfrage- oder Änderungs-Exit definiert wurde und bei denen die Symbolsuche in der vorhandenen Hierarchie fehlgeschlagen ist.
Alle Aktionen dieses Exit werden protokolliert.
Für diesen Exit wird die allgemeine Exit-Parameter-Liste
NOPXPL-A
benutzt. Das Feld P-CALL-PLACE
enthält SNF.
| P-RC | Bedeutung |
|---|---|
| 0 | Exit hat einen anderen Symbolwert zurückgeliefert. |
| 1 | Akzeptieren, dass Symbol fehlt; Ersetzung überspringen. |
| 2 | Stattdessen ein anderes Symbol verwenden. Vor dem zurückgelieferten Symbol steht das aktuelle Fluchtzeichen und dann ein Punkt, der als Platzhalterzeichen benutzt wird. Dies bewirkt eine neue Symbolersetzung mit dem zurückgelieferten Symbol. |
| 3 | Der Exit liefert folgende Meldung
zurück: symbol not foundDie Symbolersetzung ist nicht erfolgreich. |
Wenn dieser Exit im Bildschirm Globale User Exits angegeben wird, kann er von Entire Operations zum Versenden von Nachrichten benutzt werden. Der Exit muss als Natural-Objekt des Typs "Subprogram" kodiert sein.
Mögliche Einstellungen siehe Feld Verwendung im Abschnitt Felder: Globale User-Exits.
Anmerkung:
Bitte beachten Sie den möglichen Overhead bei extensiver Nutzung
dieses Exits.
Der Name der Parameter-Liste lautet NOPMSG-A. Sie
befindet sich in der System-Bibliothek SYSEOR.
Fügen Sie NOPMSG-A mit folgendem Statement in das
Subprogramm ein:
DEFINE DATA PARAMETER USING NOPMSG-A
| P-RC | Bedeutung |
|---|---|
| 0 | Die Exit-Ausführung war OK. |
| 1 | Temporärer Fehler.
Der Entire Operations-Monitor sollte versuchen, die Nachricht zu einem späteren Zeitpunkt durch den Exit zu versenden. |
| 2 | Permanenter Fehler.
Der Entire Operations-Monitor sollte nicht versuchen, die Nachricht zu einem späteren Zeitpunkt durch den Exit zu versenden. |