Hallo,
ich muss einen free RPG Code umschreiben bin aber sehr unerfahren was free angeht. Bin über jeden Tipp dankbar. Also ich möchte in dem folgenden Code nur die Sätze in die Tabelle VorST laden in denen der Inhalt des Feldes BVNR aus der RUNDEN2 und des Feldes Vorsch (Intern definiert) gleich sind. Die Inhalte sind Alphanumerisch (5A). Ich hab schon soviel hin und her Probiert ich glaub ich mache da irgendwas grundlegendes falsch.

D Vorsch S 5A
/Free
Vorsch ='TESTT';

VorST = 'Select ' +
'KY, ARTN, VARTV, TLG, usw...

'FROM ' + %TRIM(LibName) + '.' + %TRIM(Tablename) + ' ' +

'Join BES.RUNDEN2 ON(ABARTV=ARTNRV AND ' +
'ABARTN=ARTNR) ' +
(((***und hier auch wenn BVNR = Vorsch ****))))
'WHERE ' +
'ABL <= ' + Min + ' AND TMP <>0 AND ' +
'TMPB<>0 AND TMPL<>0 ) ' +
'ORDER BY ARTN,VARTV';
/EndFree