embedded-SQL fetch über mehrere Dateien

[B.Hauser]

Ein Recompile ist allerdings nur dann nicht erforderlich, wenn einzelne Felder ausgewählt und in einer Datenstruktur zusammengefasst wurden.

Wird eine externe Datenstruktur und SELECT * verwendet, ist ein Recompile wie bei anderen Datei-Änderungen erforderlich.

@Zannaleer
Du kannst auch folgendes versuchen:
Die einzelnen Dateien als Externe Mehrfach Datenstrukturen definieren und beim Fetch diese Datenstrukturen aufzählen.

d Ds_AAP        e ds                  extname(AAP) occurs(7)        
d Ds_AAI        e ds                  extname(AAI) occurs(7)
d Ds_AAK        e ds                  extname(AAK) occurs(7)

c/EXEC SQL  FETCH Next from MyCursor for 7 Rows
C+          into :DS_AAP, :DS_AAI, :DS_AAK
C/END-EXEC 

Diese Lösung funktionniert zumindest beim Single Row Fetch, beim Multiple Row Fetch habe ich es noch nicht probiert.

Die bessere Lösung ist allerdings eine SQL-View zu benutzen.
Dies vereinfacht nicht nur den Code, sondern ist zudem auch noch performanter als ein direkter JOIN im Programm.

Birgitta