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

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

Как записать в таблицу ЭТО? [D7]

Страницы:   < 1 2 >

ViktorZ ©   (2006-03-01 16:19:00) 

T41.SQL.Text:='SELECT C.Card, SUM(AR.Qnt*AR.RealPrice)
FROM CARDS C, ARcheck AR, Menu M, ACheck A, ADCheck AD
WHERE
(A.Sys_Num=AD.Sys_Num)
AND (M.Categ=:P1)
AND (AD.SIFR=:P2)
AND (AD.Sys_Num=AR.Sys_Num)
AND (AR.Sifr=M.Sifr)
AND (C.CARD=AD.CardCod)
AND (A.LogicDAte Between :P3 AND :P4)
GROUP BY C.Card';
T41.Params[0].AsInteger :=strToInt(Edit3.text);
T41.Params[1].AsInteger :=strToInt(Edit4.text);
T41.Params[2].AsDate:= strtodate(Edit1.text);
T41.Params[3] .AsDAte :=strtodate(Edit2.text);
T41.Open;

База PARADOX.

---

ViktorZ   (2006-03-01 17:05:00) [21]

INSERT INTO TOTAL(CARD,SUMMA) здесь ведь должно быть столько же параметров сколько и в селекте? я и так пробовал.Все равно не пашет. Мож как то прям из грида можно запихать в таблицу.

---

ViktorZ   (2006-03-01 17:00:00) [22]

T41.SQL.Text:='INSERT INTO TOTAL SELECT C.Card, SUM(AR.Qnt*AR.RealPrice) FROM CARDS C, ARcheck AR, '+
' Menu M, ACheck A, ADCheck AD WHERE (A.Sys_Num=AD.Sys_Num) '+
' AND (M.Categ=:P1) AND (AD.SIFR=:P2) AND (AD.Sys_Num=AR.Sys_Num) AND '+
' (AR.Sifr=M.Sifr) AND (C.CARD=AD.CardCod) AND (A.LogicDAte BETWEEN :P3 AND :P4) '+
' GROUP BY C.Card';
T41.Params[0].AsInteger :=strToInt(Edit3.text);
T41.Params[1].AsInteger :=strToInt(Edit4.text);
T41.Params[2].AsDate:= strtodate(Edit1.text);
T41.Params[3] .AsDAte :=strtodate(Edit2.text);
T41.ExecSQL;

ТАк? Не работает. Пишет Invalid Parameter. Хотя что неверного то? Просто с Селектом работает.

---

Sergey13   (2006-03-01 16:36:00) [23]

2[2] ViktorZ ©   (01.03.06 16:30)
Перепиши его (запрос) с конструкцией INSERT INTO NEW_TABLE_NAME впереди и выполни (не открывай).

---

ViktorZ   (2006-03-01 16:30:00) [24]

Результат запроса.

---

Sergey13   (2006-03-01 16:27:00) [25]

>Как записать в таблицу ЭТО?
Что ЭТО? Текст программы? Результат запроса? Что?

---

Страницы:   < 1 2 >

Наверх