Execute Oracle Procedure Test

sample 1)

VARIABLE csr REFCURSOR;

EXEC Proc_Test('2011-11-09', :csr);

PRINT csr;
 
sample 2)

DECLARE

  A varchar(10);

  B varchar(10);

  C number(4);

   

  -- sys_refcursor is weakly typed

  refcsr  SYS_REFCURSOR;

  

BEGIN

  -- call procedure

  PROC_TEST('2011-11-09', refcsr);

   -- loop through the results  

   LOOP

      -- gets one row at a time

      FETCH refcsr INTO A, B, C;

      -- if the fetch doesn't find any more rows exit the loop

      EXIT WHEN refcsr%NOTFOUND;

      

      DBMS_OUTPUT.PUT_LINE(A || '   ' || B || '  ' || C);

      

    END LOOP;

END;