REF Cursor

Jeg har defineret følgende weak ref cursor:

create or Replace package Test_pkg is

  Type TCursor is ref cursor;
   
  procedure CallMe(ACursor out TCursor);

end;

create or replace package body Test_pkg is

procedure AllEmployee(ACursor out TCursor) is
begin
  open ACursor for
  select *
  from  ATabel
end;

end;

Når jeg nu forsøger at eksekvere denne procedure i TOAD så får jeg bl.a. at vide at identifikatoren CURSOR skal erklæres? Såvidt jeg kan konstatere så er ovenstående korrekt, men et eller andet må jo være forkert