PGP - Eigenschaften für externe Programme

Dieser Natural-Profilparameter kann zum Vordefinieren der Eigenschaften externer Programme benutzt werden. Er entspricht dem Makro NTPGP im Natural-Parametermodul.

Mögliche Werte Siehe PGP-Parameter-Syntax.
Standard-Einstellung OFF Es werden keine Eigenschaften für externe Programme definiert.
Dynamische Angabe ja Der Profilparameter PGP kann nur dynamisch angegeben werden. Im Natural-Parametermodul muss das Makro NTPGP verwendet werden.
Angabe innerhalb der Session ja Temporäres Statement SET CONTROL 'P=value' für jeden Aufruf des externen Programms.

Anmerkungen:

  1. Beim Aufrufen eines externen Programms mit dem Natural-CALL-Statement stehen bereits mehrere Optionen zur Verfügung, die mit einem vorangehenden SET CONTROL-Statement angegeben werden können (z.B. SET CONTROL 'P=S'), um bestimmte Programmierschnittstelleneigenschaften für den anschließenden Aufruf anzufordern. Mit dem Natural-Profilparameter PGP bzw. dem Makro NTPGP besteht die Möglichkeit, diese Programmeigenschaften im Natural-Parametermodul oder dynamisch vorzudefinieren, anstatt sie im Natural-Anwendungsprogramm anzugeben, was Anlass zu Fehlern geben könnte.
  2. Das Terminalkommando %P= gilt nur für den nächsten Aufruf eines externen Programms, und die CALL-Optionen werden nach Rückkehr von dem Aufruf ohne Bedingung zurückgesetzt, wohingegen der Profilparameter PGP die CALL-Option für ein externes Programm dauerhaft setzt.
  3. Wenn für dasselbe Programm unterschiedliche Eigenschaften mit dem Profilparameter PGP oder mit einem Statement SET CONTROL 'P=value' definiert sind, werden diese Eigenschaften für das betreffende Programm zusammengeführt.

PGP-Parameter-Syntax

Mit dem dynamischen Parameter PGP geben Sie zuerst den Programmnamen und danach eine oder mehrere Eigenschaften für dieses Programm an.

PGP=(program-name,property-1,property-2,...)

Oder:

PGP=OFF

Anmerkungen:

  1. Der Wert OFF setzt alle zuvor definierten Eigenschaften für das Programm zurück.
  2. Um PGP-Definitionen für verschiedene Programme anzulegen, muss PGP mehrfach (getrennt durch Komma oder Leerzeichen) angegeben werden.
Syntax Element Bedeutung
program-name Der Name des externen Programms, das die nachfolgend angegebenen Eigenschaften haben soll. Generische Namen werden durch Angabe eines Sterns (*) am Ende unterstützt.

Beispiel: 'TESTP*'

Anmerkung
Die Hochkommas müssen bei der dynamischen Angabe gesetzt werden.

property-1
property-2
...

Die Werte für die verschiedenen Eigenschaften sind in der folgenden Tabelle beschrieben. Zu jeder Eigenschaft gibt es eine Lang- und eine Kurzform.

Anmerkung
Bei dynamischer Parameterangabe kann eine Eigenschaft durch ein vorangestelltes NO zurückgesetzt werden, z.B. NOS, um die Eigenschaft S zurückzusetzen.

OFF PGP=OFF setzt alle zuvor definierten Eigenschaften für das Programm zurück.

Erklärung der Eigenschaftswerte

Eigenschaft Kurzform Erklärung SET CONTROL
STDL S Standard Linkage unter CICS P=S
STDLC SC Standard Linkage simuliert EXEC CICS LINK. P=SC
STDLQ SQ Diese Eigenschaft gilt nur, wenn das Natural CICS Interface benutzt wird.

Standard-Linkage auf QR TCB unter CICS.

Diese Eigenschaft gilt nicht, wenn in Natural ein externes Subprogramm mit dem Profilparameter CSTATIC oder RCA definiert ist.

Diese Eigenschaft gilt auch für LE-Subprogramme. Informationen bezüglich der Unterstützung von IBM Language Environment (LE)-Subprogrammen durch Natural siehe Abschnitt LE-Subprogramme in der Operations-Dokumentation.

P=SQ
ROLL V Rollout für Aufruf in Thread-Umgebungen. P=V
COMA C Übergabe von Werten in CICS Commarea. P=C
CONT CC Übergabe von Parameterwerten in CICS Container. P=CC
LEMAIN L Aufgerufenes Programm ist ein IBM LE-Hauptprogramm.

Informationen bezüglich der Unterstützung von IBM Language Environment (LE)-Subprogrammen durch Natural siehe Abschnitt LE-Subprogramme in der Operations-Dokumentation.

P=L
LESUB LS Aufgerufenes Programm ist ein IBM LE-Subprogram (nur IBM).

Informationen bezüglich der Unterstützung von IBM Language Environment (LE)-Subprogrammen durch Natural siehe Abschnitt LE-Subprogramme in der Operations-Dokumentation.

P=LS
IMSPCB I Übergabe der IBM IMS TM PCB-Adresse. P=I
DIGR D Aufgerufenes Programm ist ein DIGNUS-Remote-Subprogramm. P=D
DIGL DL Aufgerufenes Programm ist ein DIGNUS-Local-Subprogramm. P=DL
SUOW U SUOW, separate CICS Unit of Work. P=U
SUOWB UT Separate CICS Unit of Work mit Backout-Tolerierung. P=UT
OFF   Löschung aller zuvor definierten Eigenschaften (nur bei dynamischer Parameterangabe).  

NTPGP-Makro-Syntax

Mit dem Makro NTPGP geben Sie im Natural-Parametermodul zuerst den Programmnamen und danach eine oder mehrere Eigenschaften für dieses Programm an.

NTPGP program-name,property-1,property-2,...

Anmerkungen:

  1. Die Syntax-Elemente des Makros NTPGP entsprechen denen des Profilparameters PGP, siehe Syntax-Elemente und Erklärung der Eigenschaftswerte.
  2. Der Wert OFF kann beim Makro NTPGP nicht gesetzt werden.
  3. Um PGP-Definitionen für verschiedene Programme anzulegen, muss das MakroNTPGP mehrfach angegeben werden.

Beispiele für PGP-Parameter

PGP=(TESTPGM1,S)
PGP=(’ABX*’,L,NOS)
PGP=(MYPROG7,OFF,L,STDL)

Beispiele für NTPGP-Makros

         NTPGP TESTPGM1,S
         NTPGP ABX*,L
         NTPGP MYPROG,L,STDL

On this page