IUD 패키지 샘플

CREATE OR REPLACE  PACKAGE PKG_B2BMEMBER_MODIFY
 AS
  PROCEDURE FN_MEMBER_INSERT (
 pv_userid IN varchar2, lv_message OUT varchar2, lv_cnt out NUMBER) ;
  FUNCTION FN_MEMBER_UPDATE (
 pv_userid IN varchar2, lv_cnt out NUMBER) RETURN VARCHAR2;
  FUNCTION FN_MEMBER_DELETE (
 pv_userid IN varchar2, lv_cnt out NUMBER) RETURN VARCHAR2;

/
 
CREATE OR REPLACE PACKAGE BODY PKG_B2BMEMBER_MODIFY
 AS
 PROCEDURE FN_MEMBER_INSERT (
  pv_userid IN varchar2, lv_message OUT VARCHAR2, lv_affect_cnt OUT NUMBER)
 IS
 -- 로컬 변수 선언 영역
 
        -- Local Variable Declaration Region End
  BEGIN
 INSERT INTO
  TABLE_NAME
  ( COLUMN_NAME )
  VALUES
  (pv_user_id);
 
  IF SQL%ROWCOUNT < 1 THEN
    
     lv_message := 'Error Occured';
    
     RAISE NO_DATA_INSERT;
  END IF;
 
 
  EXCEPTION
   WHEN OTHERS THEN
     ROLLBACK;
         WHEN NO_DATA_INSERT;
           ROLLBACK;

   COMMIT;
   
  END FN_MEMBER_INSERT;
 
  FUNCTION FN_MEMBER_UPDATE (
  pv_userid IN varchar2, lv_cnt out NUMBER) RETURN VARCHAR2
  IS
 
  BEGIN

  UPDATE table_name
   SET point=v_tot_point
   , warning=v_tot_warning
   WHERE id=P_ID;

  END FN_MEMBER_UPDATE;

  FUNCTION FN_MEMBER_DELETE (
  pv_userid IN varchar2, lv_cnt out NUMBER) RETURN VARCHAR2
  IS
 
  BEGIN
 
  DELETE FROM table_name WHERE field_name = pv_field_name;

  END FN_MEMBER_DELETE;

 END PKG_B2BMEMBER_MODIFY;
/