Hallo Gemeinde!

Ich hätte da mal wieder eine Frage zu einem SQLRPGLE-Programm.

Im Programm habe ich im Moment mehrmals ein SQL, welches bis auf die letzte WHERE-Bedingung identisch ist.

Exec SQL
Select Wert1, Wert2, Wert3,.... into :XDatenSQL
from Myfile where Feld1 = :XDAT and Feld2 = :WASauchIMMER
and hier dann der abweichende Teil

Diese Anweisung kommt dann öfters.
Jetzt Wollte ich für die Lesbarkeit des Programms das SQL als String definieren
Anweisung_Alle = 'Select ...'
und dann
Anweisung_SQL = %Trim(Anweisung_ALLE) + abweichender Teil
Danach dann ein
Exec SQL
Execute Immediate :Anweisung_SQL;

Nur so funktioniert es wohl nicht, wie ich es mir gedacht habe.
Wie müsste es richtig aussehen ??

Viele Grüße
Ronald