Prima, das funktioniert super! Also ist der DISTINCT gar nicht nötig, sollte ich vielleicht mal meine SQL-Kenntnisse auffrischen / erweitern.
Falls es noch mehr Anfänger wie mich gibt, so habe ich es gelöst:
Code:
...
EXEC SQL
DECLARE C1 CURSOR FOR
SELECT SUAUSBKZ, COUNT(*)
FROM SUSTAM
GROUP BY SUAUSBKZ
END-EXEC.
*
EXEC SQL
OPEN C1
END-EXEC.
*
PERFORM FETCH-ROW UNTIL SQLCODE NOT = 0.
*
EXEC SQL
CLOSE C1
END-EXEC.
...
EXEC SQL
FETCH C1 INTO :AUSBKZ, :ANZAHL
END-EXEC.
Ein kosmetisches Problem bleibt aber noch: Die letzte Zeile wird 2 x ausgegeben?
Bookmarks