Batchverarbeitung

Die COBOL Schnittstelle TAAIM kennt auch einige Funktionen die für die Batchverarbeitung bei der Alte Leipziger benötigt werden. Der Großteil dieser Funktionen werden nicht von der TAA Infrastruktur direkt implementiert werden, sondern werden an dem Batchsteuerungsprozess (TLOCDRV1.exe) weitergeleitet.

Für eine ausführliche Beschreibung der Batchverarbeitung verweisen wir auf die Dokumentation¹⁾ der Alte Leipziger.

Checkpoint/Restart

Die Infrastruktur unterstützt die Verwaltung von Restartinformationen, indem sie Funktionen zur Neuanlage, Beschaffung, Aktualisierung und Löschung von Restartinformationen zur Verfügung. Die Daten werden in der Tabelle TMWJWA abgelegt. Die so verwalteten Restartdaten werden gemeinsam mit den Anwendungsdaten transaktioniert.

Für den Wiederanlauf kann eine beliebige COBOL Datenstruktur gesichert werden.

Ablauf

Der Ablauf eines Wiederanlaufverfahrens unter Verwendung der Infrastruktur sieht in etwa wie folgt aus:

Beginn der Transaktionierung über Op-Code TRX/BEGIN, e.g. EXEC TAA TRX BEGIN END-EXEC.
Beschaffung der Restartinformationen mit Op-Code GRI.
Falls keine Restartinformationen vorhanden sind: Neuanlage mit Op-Code CRI. Andernfalls: Positionierung in den Eingabedaten gemäß der gelesenen Restartinformationen
Verarbeiten der Sätze - ggf. Blockweise.
Aktualisieren der Restartinformationen mit Op-Code URI.
Commit über Op-Code TRX/COMMIT, e.g. EXEC TAA TRX COMMIT ED-EXEC.
Ist das Ende erreicht: Löschen der Restartinformationen mit Op-Code DRI.
Commit über Op-Code TRX/COMMIT, e.g. EXEC TAA TRX COMMIT ED-EXEC.

TMWJWA

Die übergebenen Daten werden in einer Datenbanktabelle gespeichert. Als Schlüssel dienen:

der Jobname
der Stepname
der Username

D. h. Wiederanlaufinformationen können je Job/Step/Username Kombination nur einmal angelegt werden.

Feldname	Inhalt
JOB_NAM	Jobname für welchen dieser Eintrag gilt.
JOB_STEP_ID	Stepname für welchen dieser Eintrag gilt.
BEN_ID	Usernamen für welchen dieser Eintrag gilt.
GEVO_EING_TS	GevoEingabTimestamp für die Batchsteuerung.
JOB_ST_TS	Timestamp der letzten Änderung.
JOB_WIEA_DATN	Daten für den Wiederanlauf.
WIEA_DATN_LAE	Länge der Daten.
JOB_BEG_TS	Timestamp des erstmaligen Jobstarts.
JOB_BEM	Feld für Bemerkungen.
JOB_VARB_ZAE	Anzahl Verarbeitungsfälle.

CRI

In der umgebungsspezifischen Restarttabelle wird ein Eintrag mit den angegebenen Daten erzeugt.

Eingabeparameter

Parametername	Inhalt
TX-CODE	„CRI“
TX-SRC-POINTER	Zeiger auf den Bereich welcher in den Restartinformationen gesichert werden soll.
TX-SRC-LENGTH	Länge des zu speichernden Wertes in Bytes.
TX-BUF	Optional: Inhalt des Bemerkungsfeldes für JOB_BEM (44 BYTE char). In Verbindung mit dem Batchrahmen ist hier MWPRSTR-BIN-GEVO-EING-TS einzugeben

Ausgabeparameter

Parametername	Inhalt
TX_RC	OM_RC_OK	Restartinformationen wurden angelegt.
TX_RC	OM_RC_NOT_OK	Restartinformationen konnten nicht angelegt werden.

Bemerkungen

Die Restartinformationen werden in einer DB2 Tabelle mitgeführt. Die Änderungen in der Restarttabelle laufen in der gleichen LUW ab, in der auch die Anwendung läuft. D. h. in einem Batchlauf unter RRS werden die Restartinformationen erst bei einem Commit über die Infrastruktur wirksam.
Zur Zeit ist die Länge der zu sichernden Restartinformationen auf 3700 Byte beschränkt.

Beispiel

MOVE 'CRI' TO TX-CODE
[MOVE MWPRSTR-BIN-GEVO-EING-TS TO TX-BUF]
MOVE LENGTH OF <TSTST-REC> TO TX-SRC-LENGTH
SET TX-SRC-POINTER TO ADDRESS OF <TSTST-REC>
CALL TAAIM USING TX-TAA

GRI

In der umgebungsspezifischen Restarttabelle wird der aktuelle Eintrag für diesen Job gelesen.

Eingabeparameter

Parametername	Inhalt
TX-CODE	„GRI“
TX-SRC-POINTER	Zeiger auf den Bereich welcher mit den Restartinformationen gefüllt werden soll.
TX-SRC-LENGTH	Länge des zu lesenden Wertes in Bytes.

Ausgabeparameter

Parametername	Inhalt
TX-SRC-POINTER	Gelesene Restartinformationen.
TX_RC	OM_RC_OK	Restartinformationen wurden angelegt.
	RC_OM_RC_EOL	Keine Restartinformationen vorhanden.
	OM_RC_NOT_OK	Restartinformationen konnten nicht angelegt werden.
TX_BUF	FELD 1: Enthält den Inhalt des Bemerkungsfeldes JOB_BEM (44 BYTE char).
	FELD 2: Enthält die Anzahl der Verarbeitungsfälle JOB_VARB_ZAE(4 BYTE binär).
	FELD 3: Enthält das beginn Datum des Jobs JOB_BEG_TS (26 BYTE timestamp).

Bemerkungen

Stimmen die Längen der gesicherten Restartinformation nicht mit der aktuell übergebenen Länge überein, wird OM_RC_NOT_OK zurückgegeben und keine Daten geliefert.
Zur Zeit ist die Länge der zu sichernden Restartinformationen auf 29000 Byte beschränkt.

Beispiel

MOVE 'GRI' TO TX-CODE
MOVE LENGTH OF <TSTST-REC> TO TX-SRC-LENGTH
SET TX-SRC-POINTER TO ADDRESS OF <TSTST-REC>
CALL TAAIM USING TX-TAA

¹⁾

Dieser Link funktioniert nur im Intranet der Alte Leipziger