Folgendes Problem:
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13:
| ibtransactionuni.Active := true; ibsql1.SQL.clear; text := 'Insert into EXPORT (KONTO_NR,NAME_1,NAME_2,STRASSE,PLZ,ORT) ' + 'Select Distinct KUNDENMAIL.KONTO_NR, KUNDEN.NAME_1, KUNDEN.NAME_2,' + 'KUNDEN.STRASSE,KUNDEN.PLZ, KUNDEN.ORT from KUNDEN' + ' where KUNDEN.STATISTIKFELD_1 <> ' + quotedstr('M') + ' INNER JOIN KUNDENMAIL on KUNDENMAIL.konto_nr = KUNDEN.KONTO_NR' + ' order by KUNDEN.PLZ' ; showmessage ('string =' +text); ibsql1.SQL.Text:= text; ibsql1.ExecQuery; ibsql1.transaction.commit; |
Die Zeile:
Delphi-Quelltext
1:
| ' where KUNDEN.STATISTIKFELD_1 <> ' + quotedstr('M') + |
habe ich nachträglich eingefügt. Ohne die where-Klause funktioniert alles, aber mit bekomme ich die Fehlermeldung 'token unknown ''Inner''.
Was habe ich denn da falsch gemacht, steht die where Klausel da an falscher Stelle?