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

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

Как в процедуре Oracle вернуть один из нескольких курсоров?


Erik1 ©   (2005-01-18 17:35:00) 

Делаю так:
CREATE OR REPLACE PROCEDURE SPL_LEP_KOIK
( sTunnus VARCHAR2
, nKl_ID NUMBER
, nAdr_ID NUMBER
, vCur OUT Stp_Const.tRefCursor)
IS
-- 2005.01.01 erik

  vTunnus teenus.tunnus%TYPE;

  CURSOR cTeenus IS
    SELECT ID, Nimetus, Osakond, 1 Cur
    FROM teenus
 WHERE (tunnus = vTunnus) and tunnus not in ('DEKRENT','LT');
  Teenus_rec cTeenus%ROWTYPE;  
........
 OPEN cTeenus;
 FETCH cTeenus INTO Teenus_rec;
 IF cTeenus%FOUND THEN
   vCur := cTeenus; -- говорит здесь ошибка, а как правильно?
RETURN;  
 END IF;
 
 OPEN cSeade;
 FETCH cSeade INTO Seade_rec;
 IF cSeade%FOUND then
   vCur := cSeade;
RETURN;  
 END IF;


Reindeer Moss Eater   (2005-01-25 12:17:00) [1]

А проверить?


Erik1   (2005-01-25 12:14:00) [2]

Проблему решил открывая два раза курсор. А что быстрее UNION или мой метод?


Reindeer Moss Eater   (2005-01-25 10:16:00) [3]

Ты пытаешься связать ref курсор с явно объявленным курсором.
И нифига у тебя не выйдет.


Mutniy   (2005-01-25 10:12:00) [4]

ну в MSSQL есть такое

if exists(select * from myTable)
 begin
   ...
 end


forrest   (2005-01-25 10:09:00) [5]

Сначала делаются два запроса на наличие записей в cTeenus и cSeade.  Потом проверяется если в cTeenus есть записи то
open VCur for {select из cTeenus}. Если нет записей, то
open VCur for {select из cSeade}.


Erik1   (2005-01-19 10:49:00) [6]

И на каждое условие по 2 запроса?


Erik1   (2005-01-19 10:48:00) [7]

Up


forrest   (2005-01-19 10:15:00) [8]

Я так понимаю, что курсор - это обыкновенный select. Можно воспользоваться функцией Count(*) и проанализировать её значение.
И именно её значение использовать как {условие } для if.


Erik1   (2005-01-18 19:41:00) [9]

Вобщето мне надо проверить непуста ли выборка. Каже тогда сделать сравнение IF vCur%FOUND THEN ? Но будет ли это работать без FETH?


forrest   (2005-01-18 18:38:00) [10]

может такой вариант:

if {условие} then
open vCur for
select ... from...
elsif {условие} then
 open vCur for
select ... from...
end if;


Наверх

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