![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Создание хранимой процедуры программно [D6, IB6.x]
Брат © (2004-11-04 10:36:00)Доброе утро!
Не получается создать хранимую процедуру. Запихиваю вот такой текст в IBQuery:
CREATE PROCEDURE MAKETABLE_4
(OBL CHAR(2),DT TIMESTAMP,BUDGET CHAR(1))
RETURNS (TW_RN CHAR(2),s1 NUMERIC(15,2)) AS BEGIN
FOR
SELECT TW_RN,sum(dif(code-13020100+gr-1,dif(code-13020300+gr-1,dif(code-13020400+gr-1,dif(code-13020500+gr-1,dif(code-13020100+ gr-7,dif(code-13020300+gr-7,dif(code-13020400+gr-7,dif(code-13020500+gr-7,0,-1*suma_vsogo*1.00),-1*suma_vsogo*1.00),-1*s uma_vsogo*1.00),-1*suma_vsogo*1.00),suma_vsogo*1.00),suma_vsogo*1.00),suma_vsogo*1.00),suma_vsogo*1.00)) as s1
FROM forms412,tera
WHERE (obl=:obl and dt=:dt and budget=:budget) and
((tera.sr_pg="00" or tera.tip="2") and tera.id_key=forms412.roshirenie) and
((code=13020100 and gr=1) or (code=13020300 and gr=1) or (code=13020400 and gr=1) or (code=13020500 and gr=1) or (code=13020100 and gr=7) or (code=13020300 and gr=7) or (code=13020400 and gr=7) or (code=13020500 and gr=7))
GROUP BY TW_RN
INTO :TW_RN,:s1
DO SUSPEND;
END
и выполняю ExecSQL. Выскакивает ошибка:
"SQL Error code = -104
Token unknown - line 11, char 4"
Хотя когда беру текст и выполняю на сервере - процедура создается без проблем(очевидно что проблема не в синтаксесе, ведь на сервере такая процедура создается и выполняется без проблем. Скорее всего проблема в IBQuery, но конкретно незнаю). Подскажите пожулайста в чем проблема и что делать и как с этим бороться.
Спасибо заранее
Брат (2004-11-04 11:17:00) [21]
> Sergey_Masloff (04.11.04 11:16) [5]
> Брат (04.11.04 11:15) [3]
> >а где его взять?
> Ровно там же где IBQuery
нету такого компонента на вкладке Interbase :(
у меня шестая версия делфи, может это в седьмой?
Брат (2004-11-04 11:16:00) [22]
> Sergey_Masloff (04.11.04 11:15) [4]
> Johnmen © (04.11.04 10:57) [2]
> >Кавычки одинарные.
> Это ж в стринге который в SQL.Text пихается. Какие одинарные?
ненужны там кавычки
Sergey_Masloff (2004-11-04 11:16:00) [23]Брат (04.11.04 11:15) [3]
>а где его взять?
Ровно там же где IBQuery
Sergey_Masloff (2004-11-04 11:15:00) [24]Johnmen © (04.11.04 10:57) [2]
>Кавычки одинарные.
Это ж в стринге который в SQL.Text пихается. Какие одинарные?
Брат (2004-11-04 11:15:00) [25]
> Fay © (04.11.04 10:52) [1]
> А IBScript у тебя есть?
нету :(
а где его взять?
Johnmen (2004-11-04 10:57:00) [26]Кавычки одинарные.
Fay (2004-11-04 10:52:00) [27]А IBScript у тебя есть?