помогите с запросом

← →
K_Lock © (2006-08-17 19:00) [0]

Создаю хранимую процедуру, и никак не молучается сформировать правильно запрос. Пытаюсь сделать что-то вроде этого:
if (SELECT stoporder FROM table1 WHERE num = :num) > 0 THEN UPDATE table1 SET stoporder = stoporder - 1 WHERE num = :num; ELSE UPDATE table1 SET state = 0 WHERE num = :num;
После выполнения нужно снова проверить stoporder, и если новое значение stoporder = 0, то также:
UPDATE table1 SET state = 0 WHERE num = :num;
----------
Скоро голова лопнет, помогите пожалуйста.
(firebird, D7)

← →
Anatoly Podgoretsky © (2006-08-17 19:07) [1]

Это к Дельфи не относится

← →
Desdechado © (2006-08-17 19:09) [2]

n = 0;
SELECT stoporder FROM table1 WHERE num = :num
INTO :n;
IF( n > 0 ) THEN

← →
K_Lock © (2006-08-17 19:17) [3]

> [2] Desdechado © (17.08.06 19:09)
> n = 0;
> SELECT stoporder FROM table1 WHERE num = :num
> INTO :n;
> IF( n > 0 ) THEN

---------------
Супер. Огромное спасибо!

← →
K_Lock © (2006-08-17 19:19) [4]

> [1] Anatoly Podgoretsky © (17.08.06 19:07)
> Это к Дельфи не относится

Это относится к Базам данных :Р

← →
Anatoly Podgoretsky © (2006-08-17 22:02) [5]

К базам относится, но не к Дельфи, за исключением форума Прочие, все остальные конференции - это программирование в Дельфи + раздел программирования.
Так понятно?

> [5] Anatoly Podgoretsky © (17.08.06 22:02)

В базах данных половина вопросов про проблемы на уровне самих баз. Но там я не наблюдал чтобы Вы кому-то писали что это к Дельфи не относится... :-)

> [5] Anatoly Podgoretsky © (17.08.06 22:02)
> К базам относится, но не к Дельфи, за исключением форума
> Прочие, все остальные конференции - это программирование
> в Дельфи + раздел программирования.
> Так понятно?

:( Блин.
А если бы я спросил:

Помогите с запросом:

FIBQuery1.sql.clear;
FIBQuery1.sql.text :=
"select STOPORDER FROM DRIVERSHIFT WHERE NUM = :NUM INTO :NUM_STOPORDER; if (num_stoporder > 0) then begin num_stoporder = num_stoporder - 1; UPDATE drivershift SET STOPORDER = STOPORDER - 1 WHERE NUM = :num; end if (num_stoporder = 0) then begin update DRIVERSHIFT SET DRVSTATE = 0, LOCATION = null WHERE NUM = :num; end
FIBQuery1.ExecQuery;

-
Это тоже не относилось бы к Дельфи???
Не понимаю я Вас. :(

помогите с запросом Найти похожие ветки