Dieses Kapitel beschreibt die verschiedenen Möglichkeiten, wie Natural aus Benutzerprogrammen aufgerufen werden kann.
Folgende Themen werden behandelt:
Eine Natural-Sitzung kann von Benutzer-Frontend-Programmen mit einem der folgenden Kommandos aktiviert werden:
oder die entsprechenden Anforderungen aus der CICS-Makroebene.
Die Kommandos zum Aktivieren einer Natural-Sitzung werden in den folgenden Abschnitten beschrieben:
Bei Verwendung von EXEC CICS XCTL/LINK
können die von Natural verwendeten Parameter in einer CICS COMMAREA oder in der
TWA übergeben werden.
Natural bestimmt, an welcher Stelle sich die Startparameter befinden, indem es die Länge der COMMAREA prüft, die ihm während der Sitzungsinitialisierung zur Verfügung übergeben wird.
Wenn die Länge 22 beträgt, versucht Natural, die Parameter in der COMMAREA zu finden, andernfalls wird angenommen, dass sie in der TWA übergeben wurden.
Um ein Frontend-Programm korrekt zu identifizieren, müssen die ersten 4 Bytes der Frontend-Parameterliste die aktuelle Transaktionskennung enthalten.
Die mit dem Frontend-Programm verknüpfte Transaktionskennung muss
eine TWA-Größe haben, die gleich oder größer als die Natural-TWA-Größe ist.
Siehe auch ncitransact in
Installing
Natural CICS Interface on z/OS in der Natural
Installation-Dokumentation.
Bei Verwendung von EXEC CICS RETURN
IMMEDIATE können die von Natural verwendeten Frontend-Parameter
in einer CICS COMMAREA und die von Natural verwendeten dynamischen Parameter
mit INPUTMSG (...) und INPUTMSGLEN (...) des
Kommandos EXEC CICS RETURN IMMEDIATE übergeben
werden.
Bei Verwendung von EXEC CICS START
können die von Natural verwendeten Frontend- und dynamischen Parameter mit
FROM (...) und LENGTH (...) des Kommandos
EXEC CICS START übergeben werden. Die Parameter
werden weiter unten beschrieben.
Wenn Sie EXEC CICS LINK mit dem Parameter
SYSID verwenden, der auf eine entfernte Region zeigt,
müssen die von Natural verwendeten Frontend- und dynamischen Parameter in einer
CICS COMMAREA übergeben werden. Außerdem muss ein
TRANSID-Parameter angegeben werden, der den
Transaktionscode einer Spiegeltransaktion mit einer TWA-Größe angibt, die den
Erfordernissen von Natural entspricht.
Es ist zu beachten, dass für Natural-Sitzungen, die über DPL aufgerufen werden, dieselben Einschränkungen wie für asynchrone Natural-Sitzungen gelten, d.h. es sind keine Eingaben möglich (daher werden dieselben dynamischen Parametereinstellungen empfohlen) und der Aufrufer erhält nach Beendigung der Natural-Sitzung lediglich die Kontrolle zurück.
Eine Reihe von Beispielprogrammen für die verschiedenen Programmiertechniken ist in der Natural CICS Source Library enthalten. Siehe auch Natural CICS-Beispielprogramme
Sie können eine Natural-Sitzung aus einem Natural-Programm heraus
starten, indem Sie die externe Subroutine CMTASK aufrufen. Siehe
dazu das Natural-Beispielprogramm ASYNCICS in der Library
SYSEXTP.
Die folgende Liste mit Parametern muss übergeben werden, um Natural von einem Benutzer-Frontend-Programm aus aufzurufen:
| Pos. | Inhalt |
|---|---|
1 - 4 |
Aufrufende Transaktionskennung
Dieser Wert muss mit der aktuellen Transaktionskennung übereinstimmen. Über die aufrufende Transaktionskennung erkennt Natural, dass es von einem Benutzer-Frontend-Programm aufgerufen wurde. Beim Aufruf mit |
5 - 8 |
Adresse/Offset des dynamischen
Parameterstrings
Wenn dynamische Parameterüberschreibungen ausgewertet werden sollen, sollte dieser Wert auf die Adresse gesetzt werden, die 12 Bytes vor dem dynamischen Parameterzuweisungsstring liegt. Beim Aufruf mit |
9 - 10
|
Länge des dynamischen
Parameterstring
Null bedeutet, dass keine Parameter übergeben werden
sollen. |
11 - 14
|
Natural-Transaktionskennung
Der angegebene Wert ist die Transaktionskennung, die zur
Steuerung einer pseudokonversationellen Natural-Sitzung verwendet wird, wenn
diese mit Wird die Natural-Transaktionskennung nicht angegeben, startet Natural erneut mit der Transaktionskennung, mit der die aktuelle CICS-Task gestartet wurde, und das Frontend-Programm erhält nach jeder pseudokonversationellen Ein-/Ausgabe wieder die Kontrolle zurück. |
15 - 22
|
Name des Backend-Programms
Dieser 8-Byte-Wert ist der Name des Programms, an das die
Kontrolle am Ende der Natural-Sitzung mit einem CICS
Wenn das erste Byte dieses Feldes numerisch ist, führt
Natural einfach Die Konventionen für den Aufruf von Nicht-Natural-Backend-Programmen finden Sie unter Konventionen für den Aufruf von Backend-Programmen in der Natural Operations-Dokumentation. |
Bei der Rückkehr zum Frontend gibt Natural in der TWA an, ob die
Sitzung beendet wurde oder nicht: Wenn die Sitzung beendet wurde, enthält die
TWA reguläre Backend-Informationen (siehe
Konventionen für
den Aufruf von Backend-Programmen in der
Operations-Dokumentation), andernfalls setzt Natural die
NEXTTRANSID in die ersten vier Bytes der TWA.
Wenn Natural im pseudokonversationellen Modus läuft (Profilparameter
PSEUDO
auf ON gesetzt) und durch EXEC CICS
LINK (oder die entsprechende Anforderung auf CICS-Makroebene)
aufgerufen wurde, wird die ursprüngliche aufrufende Transaktion jedes Mal
aufgerufen, wenn Natural auf ein Terminal schreibt und auf eine Eingabe wartet,
was bedeutet, dass Natural eine "logische" CICS RETURN
TRANSID (..) ausgibt, nachdem es seine Neustartinformationen in den
CICS-Zwischenspeicher geschrieben hat.
Die aufrufende Transaktion muß diese Situation erkennen (z.B. durch
Überprüfung, ob ein NEXTTRANSID gesendet wurde oder
durch das Vorhandensein von NCOMxxxx TS-Sätzen - wobei
NCOM die Natural CICS-Parametergenerierungsoption und
xxxx die Terminalkennung ist -) und die
Kontrolle an Natural zurückgeben.
Der Vorteil dieser Vorgehensweise ist, dass das Frontend-Programm während der Sitzung beschließen kann, die Kontrolle an eine andere Anwendung (z.B. COBOL) zu übergeben und die Natural-Sitzung später wieder aufzunehmen.
Weitere Einzelheiten finden Sie in der Beschreibung des Parameters
PSEUDO in
der Parameter-Referenz-Dokumentation.
Natural behandelt ein LINK-Frontend-Programm beim Beenden der Sitzung wie ein Backend-Programm, d.h. es gelten die Konventionen für den Aufruf von Backend-Programmen.
Stellen Sie sicher, dass alle beteiligten CICS-AORs auf die
NCOMxxxx TS-Sätze zugreifen können
(z.B. über entsprechende CICS-TST-Definitionen).
Alternativ kann das LINK-Frontend-Programm die NCI-Sitzungsneustart-Informationen bei Task-Ende auch im CICS-Zwischenspeicher abholen und selbst in einer CICS-COMMAREA übergeben. Eine solche COMMAREA muss dann vor dem Aufruf von Natural zur Sitzungswiederaufnahme wieder im CICS-Zwischenspeicher abgelegt werden.
Frontend-Aufruftechnik funktioniert nur bei
Natural-Terminalsitzungen. Natural sucht nach Startparametern, die mit dem
COMMAREA übergeben werden. Beachten Sie, dass bei dieser Technik potenzielle
dynamische Parameter nicht verkettet an die Frontend-Parameter übergeben werden
können, d.h. die Adressfelder der dynamischen Parameter müssen Null sein.
Stattdessen können potenzielle dynamische Parameter über Terminaleingabedaten
übergeben werden, die Natural durch ein EXEC CICS
RECEIVE-Kommando erhält.
Wenn es sich bei der Natural-Sitzung um eine gestartete Task handelt
(d.h. durch ein EXEC CICS START- oder
EXEC CICS LINK/XCTL-Kommando von einem gestarteten
Frontend-Benutzerprogramm aufgerufen), sucht Natural zunächst nach mit der
COMMAREA gelieferten Startparametern, dann nach Parametern in der TWA und
schließlich versucht es, die erforderlichen Parameter durch ein
EXEC CICS RETRIEVE-Kommando zu erhalten.
Wenn die Natural-Sitzung von einem Frontend-Programm mit
XCTL initiiert wird und kein Rückkehrprogramm
angegeben ist (d.h. weder ein fünfter Parameter in den Sitzungsstartparametern
noch eine PROGRAM-Angabe in den dynamischen
Natural-Parametern oder dem NTPRM-Makro), startet Natural die
Benutzer-Frontend-Transaktion bei Sitzungsende über
RETURN mit TRANSID neu, indem es intern
eine Angabe PROGRAM='RET=xxx'
simuliert, wobei xxx der Code der
Frontend-Transaktion ist.
Um eine Schleifenbildung zu vermeiden, muss in die Benutzer-Frontend-Routine eine Logik aufgenommen werden, die entscheidet, ob eine neue Sitzung gestartet oder eine alte Sitzung fortgesetzt werden soll.
Wenn die Natural-Sitzung über DPL aufgerufen wird, stellt Natural
zunächst fest, ob sie direkt in der Server-Region oder indirekt über
EXEC CICS LINK/XCTL durch ein lokales
Frontend-Programm aufgerufen wird. Bei einem direkten Aufruf holt Natural die
Startparameter aus der CICS COMMAREA. Beim indirekten Aufruf sucht Natural nach
Startparametern, die mit der COMMAREA geliefert werden, und dann nach
Parametern in der TWA. Bei der Rückkehr übergibt Natural normale Backend-Daten
in der TWA, wenn ein lokales LINK-Frontend-Programm verfügbar ist, andernfalls
gibt es die Abbruchmeldung und potenzielle Backend-Daten in der COMMAREA des
Remote-Client zurück.
Wenn die Natural-Sitzung von einem Frontend-Programm initiiert wird und dieses Programm auch als Rückkehrprogramm angegeben ist, sollte das Benutzer-Frontend auch die initiierende Transaktionskennung überprüfen.
Dies gilt insbesondere dann, wenn sich das Frontend-Programm nicht im pseudokonversationellen Modus befindet, Natural aber im konversationellen Modus ist.
In diesem Fall wird Natural erneut aufgerufen, anstatt beendet zu werden, aber dieses Mal ohne zu erkennen, dass es von einem Frontend-Programm aufgerufen wird, da der erste Parameter in den Startparametern die Natural-Transaktionskennung ist.
