Ich verlasse das Programm mit *INLR, daher sollte alles geschlossen sein.
Die Error DS scheint zu stimmen, das habe ich getestet.
Ich habe die Prozedur durch einen normalen CALL ersetzt, auch hier kommt der Fehler, dass das Objekt nicht mehr gefunden wird.

Man findet auch im Netz kein Beispielprogramm.

Eventuell liegt es auch daran:
Any call to this API will also refresh cached commitment control settings for the current job. The following settings are cached:

  • The COMMITMENT_CONTROL_LOCK_LIMIT setting in the QAQQINI query options file to control maximum number of record locks.
  • The QIBM_TN_COMMIT_DURABLE environment variable setting to control soft commit.
  • The QTN_JRNSAVPT_* environment variable settings to control whether journal entries are sent for savepoint operations.


Wenn ich das Programm neu umwandle, dann funktioniert es nach dem Fehler wieder 1x, also muss irgendetwas auch mit dem Aufruf Stack passieren.