NOPUMI1N - Text-Meilensteine in Job-Definitionen und aktiven Jobs setzen/zurücksetzen

Sie können Meilenstein-Definitionen in Job-Definitionen und aktiven Jobs abfragen oder ändern (siehe auch Meilenstein-Typen im Abschnitt Job-Verwaltung), indem Sie folgendes Statement in Ihrer Natural-Anwendung benutzen:

CALLNAT 'NOPUMI1N'
    P-FUNCTION P-MILESTONE-TYPE P-DBENV P-OWNER P-NETWORK P-NETWORK-VERSION 
    P-RUN P-JOB P-RC

Bedeutung der Parameter:

Parameter Format Verwendung
P-FUNCTION  A1 in Funktions-Code.
S  Meilenstein setzen.
R  Meilenstein zurücksetzen (löschen).
T  Meilenstein testen.
P-MILESTONE-TYPE   A1 in Meilenstein-Typ:
B Meilenstein am Netzwerk-Beginn gesetzt.
E Meilenstein am Netzwerk-Ende gesetzt.
I Meilenstein für anderen Job gesetzt (beliebige Position außer Beginn und Ende).
A Alle Meilenstein-Typen (nicht bei Funktionscode S).
P-DBENV A10 in Datenbank-Umgebung (für zukünftige Verwendung):

OPTIONAL(*) Parameter.

P-OWNER A10 in Eigentümer des Netzwerks.
P-NETWORK A10 in Name des Job-Netzwerks.
P-NETWORK-VERSION A10 in Version des Job-Netzwerks.

OPTIONAL(*) Parameter.

P-RUN I4

BY VALUE RESULT

in Laufnummer des Job-Netzwerks.

OPTIONAL(*) Parameter.

P-JOB A10 in Name des Jobs.
P-RC I4

BY VALUE RESULT

out Rückgabe-Code.
0

Funktion ok.
Oder:
Meilenstein wurde gesetzt.

1 Eigentümer, Netzwerk, Version, Laufnummer und/oder Job nicht gefunden.
2 Meilenstein wurde nicht gesetzt.
9 Aktuelle Version kann nicht bestimmt werden.
101 Ungültiger Funktionscode.
102 Parameter fehlt.
103 Ungültiger Meilenstein-Typ.
121 Eigentümer existiert nicht.
122 Netzwerk-Version ist erforderlich.