Delphi-Quellcode:
var sql :
String;
begin
with Datamodul.DataModule1
do
begin
if SQLDSWHis.active= True
then SQLDSWHis.active:=False;
if CDSWHis.active=True
then CDSWHis.active:=False;
msql:=SQLDSWHis.CommandText;
//Aktive Abfrage merken
sql:='
SELECT WERKZG_NR, ART_NUM, sum(INTERVALL) FROM WZG_HIST WHERE (WERKZG_NR > 0) AND (INTERVALL > 0) ORDER BY ART_NUM group by art_num, werkzg_nr;';
SQLDSWHis.CommandText:=
sql;
CDSWHis.active:=True;
SQLDSWHis.active:=True;
showmessage(intToStr(CDSWHis.RecordCount));
end;
Vielen Dank, Deine Abfrage funktionierte im IBExpert.
Im Programmcode bringt er aber jetzt :
SQL-Server Fehler Token unknown line1, char 117 group
Wieso kennt er group nicht?
Oder geht das nicht...