Форум: "Начинающим";
Текущий архив: 2006.09.10;
Скачать: [xml.tar.bz2];
Внизпомогите с запросом Найти похожие ветки
← →
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]К базам относится, но не к Дельфи, за исключением форума Прочие, все остальные конференции - это программирование в Дельфи + раздел программирования.
Так понятно?
← →
SergP © (2006-08-18 00:37) [6]> [5] Anatoly Podgoretsky © (17.08.06 22:02)
В базах данных половина вопросов про проблемы на уровне самих баз. Но там я не наблюдал чтобы Вы кому-то писали что это к Дельфи не относится... :-)
← →
K_Lock © (2006-08-18 01:36) [7]> [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;
-
Это тоже не относилось бы к Дельфи???
Не понимаю я Вас. :(
← →
K_Lock © (2006-08-18 01:38) [8]> [6] SergP © (18.08.06 00:37)
Хоть кто-то понимает.
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2006.09.10;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.042 c