| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

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

KIR ©   (2002-09-09 01:36:00) 

Есть динамически формируемый 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"
???

---

Reindeer Moss Eater   (2002-09-09 12:41:00) [1]

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

---

KIR   (2002-09-09 12:26:00) [2]

Что-то теперь

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


---

KIR   (2002-09-09 11:48:00) [3]

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

---

ЮЮ   (2002-09-09 03:31:00) [4]

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

---

Наверх