How to declare cursor in procedure based on if condition?

Question

Hi Experts,
In sql server I have eprocedure in which I declare cursor like this:
IF (@int_cntCondition = 1 )
BEGIN
DECLARE Date_Cursor CURSOR FOR select HolidayCcy,HolidayDate from Definition..HolidayCalendar WITH (NOLOCK) where
HolidayCcy in (@Deposit_Currency,@Alternate_Currency)
AND CONVERT(SMALLDATETIME,CONVERT(VARCHAR(25),HolidayDate,106)) >=
CONVERT(SMALLDATETIME,CONVERT(VARCHAR (25),@T_Date,106))
END
ELSE
BEGIN
DECLARE Date_Cursor CURSOR FOR select HolidayCcy,HolidayDate from Definition..HolidayCalendar WITH (NOLOCK) where
HolidayCcy in (@Deposit_Currency,@Alternate_Currency,@Bank_Base_Currency)
AND CONVERT(SMALLDATETIME,CONVERT(VARCHAR(25),HolidayDate,106)) >=
CONVERT(SMALLDATETIME,CONVERT(VARCHAR(25),@T_Date,106))
END
I have to declare same cursor in oracle based on 'if' condition.
But in oracle stored procedur cursor has to declare outside of Begin statment of procedure, so how can I declare This cursor in Orracle?
if anyone know about it, Plese help or send any link to refer.
Thanks.

Answer 1

Digambar wrote:
I have to declare same cursor in oracle based on 'if' condition.The simple answer is to use a reference cursor data type. E.g.
SQL> create or replace procedure GetObjects( cur in out sys_refcursor, objType varchar2 ) is
  2  begin
  3          case
  4                  when upper(objType) = 'EMP' then
  5                          open cur for select * from emp;
  6 
  7                  when upper(objType) = 'DEPT' then
  8                          open cur for select * from dept;
  9 
10          end case;
11  end;
12  /
Procedure created.
SQL>
SQL>
SQL> --// define a host refcursor variable in client
SQL> --// (e.g. VB, .Net, Java, etc)
SQL> var c refcursor
SQL>
SQL> --// make the stored proc call
SQL> begin GetObjects( :c, 'EMP' ); end;
  2  /
PL/SQL procedure successfully completed.
SQL>
SQL> --// process cur reference in client
SQL> print c
     EMPNO ENAME      JOB              MGR HIREDATE                   SAL       COMM     DEPTNO
      7369 SMITH      CLERK           7902 1980/12/17 00:00:00        800                    20
      7499 ALLEN      SALESMAN        7698 1981/02/20 00:00:00       1600        300         30
      7521 WARD       SALESMAN        7698 1981/02/22 00:00:00       1250        500         30
      7566 JONES      MANAGER         7839 1981/04/02 00:00:00       2975                    20
      7654 MARTIN     SALESMAN        7698 1981/09/28 00:00:00       1250       1400         30
      7698 BLAKE      MANAGER         7839 1981/05/01 00:00:00       2850                    30
      7782 CLARK      MANAGER         7839 1981/06/09 00:00:00       2450                    10
      7788 SCOTT      ANALYST         7566 1987/04/19 00:00:00       3000                    20
      7839 KING       PRESIDENT            1981/11/17 00:00:00       5000                    10
      7844 TURNER     SALESMAN        7698 1981/09/08 00:00:00       1500          0         30
      7876 ADAMS      CLERK           7788 1987/05/23 00:00:00       1100                    20
      7900 JAMES      CLERK           7698 1981/12/03 00:00:00        950                    30
      7902 FORD       ANALYST         7566 1981/12/03 00:00:00       3000                    20
      7934 MILLER     CLERK           7782 1982/01/23 00:00:00       1300                    10
14 rows selected.
SQL>
SQL>
SQL> --// make the stored proc call
SQL> begin GetObjects( :c, 'DEPT' ); end;
  2  /
PL/SQL procedure successfully completed.
SQL>
SQL> --// process cur reference in client
SQL> print c
    DEPTNO DNAME          LOC
        10 ACCOUNTING     NEW YORK
        20 RESEARCH       DALLAS
        30 SALES          CHICAGO
        40 OPERATIONS     BOSTON
SQL>