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

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

Как вставит в SQL длинный запрос?


umr ©   (2003-04-29 08:25:00) 

Сабж.
Мой запрос оказалься слишким длинным. Записат его ни как немогу. Длина запроса состовляет не менее 300 символов.
Как добавит запрос в TQuery.SQL.Text ?
За ранее блогадарен.


umr   (2003-04-29 09:25:00) [1]


> Наталия © (29.04.03 09:07)
> И можно использовать краткие синонимы таблиц, например
> select a.cod,b.name from table1 a,table2 b where...

Это тоже попробую.
Спасибо всем за советы. ПОМОГЛО


KoluChi   (2003-04-29 09:08:00) [2]

Перед выполнением запроса выведите текст сформированного запроса на экран. Выполните его в базе данных, отладьте и все встанет на свои места. Проблема с синтаксисом запроса (кавычки или др.).


Наталия   (2003-04-29 09:07:00) [3]

И можно использовать краткие синонимы таблиц, например
select a.cod,b.name from table1 a,table2 b where...


Наталия   (2003-04-29 09:00:00) [4]

А где главное слово : SELECT?


umr   (2003-04-29 08:57:00) [5]

Вес это стоит на самом TQuery.sql в режиме проектирования. При онлайне я дожен сделат так чтобы выходило с несколько запросов, тоесть
where (":TMSBases:Aregister.db".MECode = ":TMSBases:LControl.DB".Code) and code = "XXXXXXXXX"


umr   (2003-04-29 08:53:00) [6]


> Наталия © (29.04.03 08:33)
> with Query do begin
> SQL.clear;
> SQL.add("first string of myquery");
> SQL.add("second string of myquery");
> end;

Сделал как Вы сказали:
with dm.dmMain.qryLCPlanReport do begin
sql.Clear;
sql.Add("":TMSBases:LControl.DB".Code,":TMSBases:LControl.DB"."Component Name",":TMSBases:LControl.DB"."Lubrication Point",");
sql.Add("":TMSBases:LControl.DB"."Kind of Lubricant",":TMSBases:LControl.DB".Capacity,":TMSBases:LControl.DB".Kind,");
sql.Add("":TMSBases:LControl.DB".Worker_ID,":TMSBases:LControl.DB".Date_Planned,":TMSBases:Aregister.db".MEName ");
sql.Add("FROM ":TMSBases:LControl.DB",":TMSBases:Aregister.db" ");
sql.Add("WHERE (":TMSBases:Aregister.db".MECode = ":TMSBases:LControl.DB".Code)");
end;

Дает ощибку :
Token Not found.
Token: ":TMSBases:LControl.DB".Code,":TMSBases:LControl.DB"."Component
как исправит помогите пожалуйста


KoluChi   (2003-04-29 08:48:00) [7]

Код в студию!


Yuraz   (2003-04-29 08:44:00) [8]

Синтаксис проверь, обычно с символами ("), если они входят в запрос, много мороки, т.е. писать в делфаке надо их """ или """"


umr   (2003-04-29 08:39:00) [9]


> KoluChi ©


> в чем проблема?

При трассировке дает ошибку Invalid keyword


KoluChi   (2003-04-29 08:34:00) [10]

Query.SQL.Text := текст запроса;
или
Query.SQL.Clear();
Query.SQL.Add(текст запроса);

в чем проблема?


Наталия   (2003-04-29 08:33:00) [11]

with Query do begin
SQL.clear;
SQL.add("first string of myquery");
SQL.add("second string of myquery");
end;


Наверх

Титульная страница Поиск, карта сайта Написать письмо