Sql-Abfrage

**Fuerchau** · 21-10-13, 16:37

Was enthält dann deine KUNDENP?
Ich dachte, das Feld KDNNR aus der KUNDENP sind die zu ermittelnden Kunden?
Die KUNDENP sollte über das Feld KDNNR einen Index erhalten!!!

Dann baust du dir deine SQL's zusammen.

SQLFill = 'INSERT INTO FILE2P ' +
'SELECT char(' + FELDNAME + '), min(''' + TEILDATEI + '''), min(''' + FELDNAME + '''), count(*) from ' + TEILDATEI + ' A ';

IF %SCAN('A':FELDLAENGE) = *ZEROS;
SQLFill +=
' WHERE exists (select * from KUNDENP P where dec(A.' + FELDNAME + ', 7, 0) = P.KDNNR + ')';
ELSE;
SQLFill +=
' WHERE exists (select * from KUNDENP P where A.' + FELDNAME + ' = P.KDNNR + ')';
ENDIF;

SQLFill += ' group by char(' + FELDNAME + ')';

exec sql execute :SQLFill;

Einen eigenen Fetch/Write brauchst du da nicht.

**tarkusch** · 22-10-13, 08:08

Morgen,

das Statement ist so was von genial, das einzige war wir unklar ist warum wurde im 1. Select ein Min('TEILDATEI') angegeben?

Danke noch mal

**Fuerchau** · 22-10-13, 08:38

Der Grund ist der "group by".
Ein Feld ohne Aggregat-Funktion muss in der Liste der Group-By aufgeführt werden.
Hierbei ist auch ein Ausdruck möglich:

group by ..., 'TEILDATEI', ...

Da du aber eine Konstante verwendest, liefert ja MIN immer den richtigen Wert so dass man sich Group By eben sparen kann.

PS:
Für meine Genialität werde ich an sonsten bezahlt

.