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

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

Multiple rows in singleton select. [D6, XP]


Drowsy ©   (2009-10-23 10:18:00) 

подскажите, как побороть эту проблему в процедуре

SET TERM ^ ;

CREATE PROCEDURE GETS (
   prid integer,
   sec_name char(30))
returns (
   code integer,
   pr_id integer,
   sec_code integer,
   type_elem integer,
   equip integer,
   num_in_equip integer,
   x float,
   y float,
   z float,
   angle integer,
   in_rzr char(1),
   sec_num integer)
as
declare variable s_code integer;
begin
for
 Select Code, sec_num from sections
   where (pr_id = :prid) and (sec_name = :sec_name) order By Sec_Num
 Into
 :s_code,
 :sec_num
do
begin
 select
   c.CODE,
   c.PR_ID ,
   c.SEC_CODE,
   c.TYPE_ELEM,
   c.EQUIP,
   c.NUM_IN_EQUIP,
   c.X ,
   c.Y,
   c.Z,
   c.angle,
   c.IN_RZR
from compon c
 where (c.SEC_CODE = :s_code) and (in_rzr = 'Y')
into
   :CODE,
   :PR_ID ,
   :SEC_CODE,
   :TYPE_ELEM,
   :EQUIP,
   :NUM_IN_EQUIP,
   :X ,
   :Y,
   :Z,
   :angle,
   :IN_RZR
   ;
 suspend;

end
end^

SET TERM ; ^

GRANT SELECT ON SECTIONS TO PROCEDURE GETS;

GRANT SELECT ON COMPON TO PROCEDURE GETS;

GRANT EXECUTE ON PROCEDURE GETS TO SYSDBA;


Drowsy   (2009-10-23 11:17:00) [1]

Ага, хотел грид многострочный в эксперте увидеть.
suspend то в цикле помещён, а каждый проход цикла одну запись выковыривает из таблицы.


Сергей М.   (2009-10-23 11:12:00) [2]


> и на исполнение кликаю


И чего хотел увидеть в результате ?
Грид с выборкой что ли ?
Неоткуда ему взяться)

Надо было просто запустить на выполнение запрос
select * from GETS(параметры)


Drowsy   (2009-10-23 10:59:00) [3]

В IBExpert-e задаю входные параметры процедуры :

prid integer,
sec_name char(30)

и на исполнение кликаю.


Сергей М.   (2009-10-23 10:51:00) [4]

Мусолишь-то как ? Покажи ..


Drowsy   (2009-10-23 10:46:00) [5]

Пока никак.
Я эту процедуру в IBExpert-e мусолю и не могу получть выходной набор.
Multiple rows in singleton select.  выдаёт


Drowsy   (2009-10-23 10:33:00) [6]

А как хранимую процедуру выбора  можно это исполнить?

>  как к селективной

как это?


Сергей М.   (2009-10-23 10:33:00) [7]

А как ты обращаешься ? Показывай в коде ..


Сергей М.   (2009-10-23 10:22:00) [8]

Обращаться к этой процедуре на стороне клиента следует как к селективной.


Наверх

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