레이블이 CURSOR인 게시물을 표시합니다. 모든 게시물 표시
레이블이 CURSOR인 게시물을 표시합니다. 모든 게시물 표시

2015년 4월 19일 일요일

ORACLE : CURSOR Sample Script

DECLARE
    CURSOR CUR IS
        SELECT PRJT_CODE, OPER_CMPN
        FROM JATU100
        WHERE BANK_CMPN = '1018516025';
       
    JATU_REC CUR%ROWTYPE; 
   
BEGIN
    OPEN CUR;
    LOOP 
        FETCH CUR INTO JATU_REC;
        EXIT WHEN CUR%NOTFOUND;
       
        -- 하고자 하는 일을 하자... ;
        -- DO_SOMETHING();
        UPDATE JATU100
        SET PRJT_CODE = NULL
        WHERE 1=2;

        DBMS_OUTPUT.PUT_LINE(TO_CHAR(CUR%ROWCOUNT));
       
    END LOOP;
   
    CLOSE CUR;
END;