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

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

Синтаксис цикла в хранимой процедуре, либо рекурсии [D5, IB5.x]


Олег ©   (2003-01-20 08:21:00) 

Приведите в пример фрагмент хранимой процедуры с использованием цикла по счетчику. Либо рекурсии.
Заранее благодарен.


Олег   (2003-01-20 10:36:00) [1]

2 Digitman
Спасибо! Совсем заработался, ошибка крылась в банальных скобках. :)


BorisUK   (2003-01-20 09:34:00) [2]

RTFM - for LOOP


Digitman   (2003-01-20 09:33:00) [3]

create procedure MyProc(...)
as
declare variable i integer;
begin
i = 0;
while (i < 5) do /* цикл от 0 до 4 */
begin
...
i = i + 1;
end
end

create procedure MyRecursiveProc(i integer)
as
begin
exit;
end

alter procedure MyRecursiveProc(i integer)
as
begin
....
if (i < 5) then
begin
....
i = i + 1;
MyRecursiveProc(i);
end
end

....
execute procedure MyRecursiveProc(0);


Наверх

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