[ Oracle - Procedure Package_DBMS_SQL_사용법2 ]

 

▣ DBMS_SQL package를 이용한 프로 시져 생성의 예

 

SQL>CREATE OR REPLACE PROCEDURE test(txt varchar2)  AS

                c integer;

                rows integer;

 

        BEGIN

  

                c := DBMS_SQL.OPEN_CURSOR;

                DBMS_SQL.PARSE(c,'create or replace '|| txt ,DBMS_SQL.NATIVE);

                rows := DBMS_SQL.EXECUTE(c);

                DBMS_SQL.CLOSE_CURSOR(c);

        END;

 

SQL>exec test('procedure ttum(aa  number) AS  kk number; BEGIN kk:= 0 ; kk := kk + aa ; END ; ');

SQL> exec test ('procedure ttt1(aa number) as kk varchar2(10); begin select 1 into kk from dual; end;');

 

Posted by 농부지기
,