Как такое возможно??? (запрос перестал работать)

← →
KIR © (2002-09-09 01:36) [0]

Есть динамически формируемый SQL запрос:
With SQLString do begin Add("SELECT"); Add(" pat.Iniz, docs.Iniz,"); Add(" prihod_sprav.Name,"); Add(" income."Sum","); Add(" income.ID, income.Dat, income.Del,"); Add(" income.Nal"); Add("FROM"); Add(" pat, docs, prihod_sprav, income"); Add("WHERE"); Add(" Income.PatID = pat.ID"); Add("AND"); Add(" Income.DocID = docs.ID"); Add("AND"); Add(" income.PrihodID = prihod_sprav.ID"); Add("AND"); Add(" Income.Dat = :Param1"); Add("ORDER BY"); Add(Format("%s",[S])); end; With OplQuery do begin SQL.Clear; SQL := SQLString; ParamByName("Param1").AsDate := Date_hb; Open; end;
Все вроде нормально работало и вдруг...
"Invalid use of keyword
Token: SELECT"
???

← →
ЮЮ © (2002-09-09 03:31) [1]

Может SQLString перед блоком
With SQLString do
begin
...
не очищен? Тогда SELECT может оказаться не в том месте полученного SQL предложения, отсюда и ощибка?

← →
KIR © (2002-09-09 11:48) [2]

>> ЮЮ
Точно.
Спас.

← →
KIR © (2002-09-09 12:26) [3]

Что-то теперь
SQLString.Clear работать не хочет...

← →
Reindeer Moss Eater (2002-09-09 12:41) [4]

With SQLString do
begin
Text:="SELECT";
Add(" pat.Iniz, docs.Iniz,");
...
...

Как такое возможно??? (запрос перестал работать) Найти похожие ветки