728x90
반응형

CREATE OR REPLACE PROCEDURE "SP_TEST"(
            P_YD_GP      In VARCHAR2
)
IS 
   PRAGMA AUTONOMOUS_TRANSACTION;
   CURSOR c1 IS
        SELECT AA,BB,MAX_ROW FROM TB_TEST

        ;
        rec_c1 c1%ROWTYPE;  

        I_MAX_LAY          NUMBER(2);
BEGIN 
   
    OPEN c1;
    LOOP
        FETCH c1 INTO rec_c1;
        EXIT WHEN c1%NOTFOUND;
       
        I_MAX_LAY := rec_c1.MAX_ROW ;
       
        FOR II IN 1..I_MAX_LAY LOOP
            INSERT INTO TEST_DB

            (AA,BB)
            VALUES
            (
                rec_c1.AA, rec_c1.BB

            );
        END LOOP;
    END LOOP;

    CLOSE c1;


     COMMIT;
 
Exception 
 
        WHEN OTHERS THEN
        BEGIN
                ROLLBACK ;
        END;
     
END SP_TEST;

728x90
반응형
블로그 이미지

nineDeveloper

안녕하세요 현직 개발자 입니다 ~ 빠르게 변화하는 세상에 뒤쳐지지 않도록 우리모두 열심히 공부합시다 ~! 개발공부는 넘나 재미있는 것~!

,