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

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

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


K_Lock ©   (2006-08-17 19:00:00) 

Создаю хранимую процедуру, и никак не молучается сформировать правильно запрос. Пытаюсь сделать что-то вроде этого:

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)


K_Lock   (2006-08-18 01:38:00) [1]

> [6] SergP ©   (18.08.06 00:37)

Хоть кто-то понимает.


K_Lock   (2006-08-18 01:36:00) [2]

> [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;

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


SergP   (2006-08-18 00:37:00) [3]

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


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


Anatoly Podgoretsky   (2006-08-17 22:02:00) [4]

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


K_Lock   (2006-08-17 19:19:00) [5]

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


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


K_Lock   (2006-08-17 19:17:00) [6]

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

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


Desdechado   (2006-08-17 19:09:00) [7]

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


Anatoly Podgoretsky   (2006-08-17 19:07:00) [8]

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


Наверх

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