Как вывести в ibexpert (firebird) строки из таблицы при помощи for #410300

Дали в институте задание написать хранимую процедуру и в ней с помощью оператора цикла for вывести строки из таблицы book. Таблица book выглядит так Aid Nazvanie Проблема в том что написанная хранимая процедура выводит только последнюю строку. 1) Как написать чтобы при обращении к процедуре она выводила все строки, а не только последнюю ? 2) Как задать условие чтобы выводила только строки где aid > 5 (лучше с помощью if) ? Написал скрипт: CREATE PROCEDURE GGG returns (    v varchar,    vv integer) as declare variable vvv integer; declare variable vg varchar; begin  /* Procedure Text */  for select aid, nazvanie   from book   into : vvv, vg do v=vg; vv=vvv;  suspend; end

Тебя забанили на sql.ru в разделе Firebird, Interbase? Или послали в RTFM ?

Woldemar177 спасибо напишу туда. Помочь можеш сегодня зачет сдавать?

Люди добрые help me. Сегодня зачет препод поимеет.

в институте так же дают знания, ну а тебе ссылочку www.ibase.ru

begin if ( AID > 5 ) THEN BEGIN /*ДАЛЕЕ ПО ТЕКСТУ*/ кончай прикалываться.

Woldemar177 правильно я понял? do begin if ( AID > 5 ) THEN BEGIN // Здесь присваиваю значения выходным параметрам функции v=vg;           vv=vvv; suspend; end

У тебя ibexpet есть ? Так попробуй - там даже генератор тестовых значений есть. Я же не знаю содержимое твоей таблицы.

where у тебя должно условие стоять aid > 5 почему с помощью if?

Потому что цель задания научиться использовать for и if.

Ты бы уж давал полностью задание. select * from book where aid > 5

Woldemar177 спасибо за помощь на sql.ru помогли. Тебе все равно спасибо.

понял я тебя ты просто студент и не хочешь учить sql. CREATE PROCEDURE SET_IDENTITY (    value_identity integer) as declare variable conn_id integer; declare variable ok_conn integer; begin select current_connection from rdb$database into :conn_id; select count(*) from app_identity  where id=0 and conn_id=:conn_id    into :ok_conn;     if(atoi(ok_conn)<>0) then  update app_identity set value_identity=:value_identity   where id=0 and conn_id=:conn_id; else  insert into app_identity(id,value_identity,conn_id)   values (0,:value_identity,:conn_id)  ; end

дети гор... CREATE PROCEDURE GGG returns (   v varchar,   vv integer) as begin /* Procedure Text */ for select aid, nazvanie  from book  into : v, vv do suspend; end

"Мы дети галактики " (С) Лещенко вроде.