커서로 반복 작업을 할때에

-- 디버깅용

SET SERVEROUTPUT ON ;

DECLARE

CURSOR CUR1 IS

SELECT * 

  FROM ORGNL;

BEGIN

  FOR CUR IN CUR1 LOOP

-- 프로시저 호출

    UP_AVERAGE(TRIM(CUR.CODE), SUBSTR(TRIM(CUR.DT),5,4));

  END LOOP;

END ;