Вниз
Скачать: CL | DM;

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

← →
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,");
...
...



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.011 c
3-97950
Bishop
2002-09-07 14:36
2002.09.30
FibDataSet


4-98407
EternalWonderer
2002-08-15 12:01
2002.09.30
Передача в CreateThread функции с параметрами


1-98078
nikolo
2002-09-19 15:15
2002.09.30
TStringList в динамическом массиве


3-97975
vlad40
2002-09-09 12:25
2002.09.30
Ошибка


3-98006
Леван
2002-09-07 10:07
2002.09.30
Kак сделать Continue после Locate?




   Наверх