Das läßt sich wohl nur richtig mit dem Debugger überprüfen.
Die Frage ist, was macht das Unter-CBL ?
Zu bedenken ist ja, dass das Unter-CBL je nach Return-Modus (GOBACK bzw. EXIT PROGRAMM) nicht neu initialisiert wird, SQL-Cursor somit offen bleiben usw.
Der MCH3601 deutet ja auf fehlende Initialisierung hin.
Stochern im Nebel mag ich am liebsten .