프로시져 예제

DAUM 검색 :   '  [ORACLE] ORACLE에서 프로시져 사용하기   '

CREATE OR REPLACE PROCEDURE PROC_TEST
IS
    cnt BINARY_INTEGER := 11;
BEGIN
   
    /*******************************************************
    /* FOR문 예제
    /*******************************************************/
    /*
    FOR cnt IN 1..10 LOOP
        insert into iberorht values(iberorht_seq.nextval,
                                    '메세지'||cnt,
                                    '00'||cnt,
                                    '설명'||cnt,
                                    sysdate);
    END LOOP;
    COMMIT;
    */
   
    /*******************************************************
    /* LOOP문 예제
    /*******************************************************/
    /*
    LOOP
        insert into iberorht values(iberorht_seq.nextval,
                                    '메세지'||cnt,
                                    '00'||cnt,
                                    '설명'||cnt,
                                    sysdate);

        cnt := cnt+1;
        EXIT WHEN cnt > 20;

   END LOOP;
   COMMIT;
   */
  
   /*******************************************************
    /* IF문 예제
    /*******************************************************/
    /*
    IF cnt > 20 THEN
        STATEMENT1;
    ELSIF cnt < 20 THEN
        STATEMENT2;
    ELSE
        STATEMENT3;
    END IF;
    */
END PROC_TEST;