Moin Moin,

heute scheint einfach nicht mein Tag zu sein...
Ich habe hier ein 0815 Programm das nichts weiter machen soll als in einer Subfile Daten aufzuzeigen. Solche PGMs habe ich schon öfter geschrieben aber heute lässt mich das Programm auflaufen und ich weiß nicht wieso...

Folgendes SQL klappt nicht, SQLCODE/SQLSTT kann ich nicht abfragen weil soweit kommt er garnicht!

Code:
dcl-s x int(10);
exec sql
    select  count(*) 
      into :x
      from apkopfp kopf
      join apanschp ansch on ansch.apanaufnr = kopf.apkfaufnr
      where kopf.apkfaufnr = :auftragsnummer;
Wenn ich das ganze interaktiv über DBeaver mache klappt die SQL Abfrage ohne Probleme nur in RPG bekomme ich diese blöde Fehlermeldung.

Die Fehlermeldung sagt was von korrupten Storage durch einen möglich. vorherigen Call oder wenn ich ein Write auf alte Daten machen will, aber beides trifft nicht zu, es gibt keinen Call im Programm und ich mache kein Write auf irgendwelche Daten....auch ein Signoff + erneutes Anmelden bringt keine Abhilfe.