Db/Oracle

Oracle Package Procedure Sample

seongsland 2010. 4. 6. 23:54
CREATE OR REPLACE PACKAGE DD_PKG AS  
PROCEDURE DD_MAIN (
    vi_seq IN VARCHAR2,
    out_msg OUT VARCHAR2
);
 
END DD_PKG;
/

CREATE OR REPLACE PACKAGE BODY DD_PKG AS
PROCEDURE DD_MAIN (
    vi_seq IN VARCHAR2,
    out_msg OUT VARCHAR2
)
AS

BEGIN
    out_msg := '0';

    IF 1=1 THEN

        DD_MAIN2(vi_seq, out_msg);
        DD2.DD_MAIN(vi_seq, out_msg);
   
    ELSIF 2=2 THEN
        out_msg := '1';
       BEGIN
             UPDATE DD SET CC = '' WHERE CC = '1'
        END;
    END IF;
END DD_MAIN;
END DD_PKG;
/