/////////////헤더/////////////////

CREATE OR REPLACE PACKAGE New_korea_test
AS
TYPE korace is TABLE of VARCHAR2(8) INDEX BY binary_integer;
PROCEDURE korearace(v_racedate OUT korace);
END New_korea_test;

/////////////////////바디/////////////

CREATE OR REPLACE PACKAGE BODY New_korea_test
AS
PROCEDURE korearace
(v_racedate OUT korace)
IS

CURSOR korea_cur IS
SELECT race_date
FROM (select distinct(racedate) as race_date from racingjoy.s_expect order by racedate desc)
WHERE rownum <=4;

percount NUMBER DEFAULT 1;

BEGIN
FOR onerace_date IN korea_cur
LOOP
v_racedate(percount):=onerace_date.race_date;
percount:=percount+1;
END LOOP;
END korearace;
END New_korea_test;

간단하게 패키지안에 프로시저를 생성했는데요..컴파일은 다됐는데 실행이 안됍니다. 아시는분 답변좀 부탁드립니다.