Как записать выборку во временный массив Oracle?

DECLARE
    TYPE tbl IS TABLE OF NUMBER
        INDEX BY VARCHAR2(40);
    myTbl tbl;
BEGIN
    myTbl('7685') := 7685;
    IF myTbl.exists(7685) THEN
        DBMS_OUTPUT.PUT_LINE('ok');
    END IF;
END;

DECLARE
    TYPE tbl IS TABLE OF NUMBER
        INDEX BY VARCHAR2(40);
    myTbl tbl;
BEGIN
    SELECT 7685 BULK COLLECT INTO myTbl FROM dual;
    
    IF myTbl.exists(7685) THEN
        DBMS_OUTPUT.PUT_LINE('ok');
    END IF;
END;

--drop table orders;
--drop table clients;
create table clients(ClientNum number primary key,
                     Status    varchar2(40));
create table orders(OrderNum    number primary key,
                    OrderSum    number not null,
                    OrderClient number references clients(ClientNum),
                    Status      varchar2(40));

insert into clients
  select level,
         'ok'
    from dual
  connect by level < 1001;

insert into orders
  select level OrderNum,
         trunc(dbms_random.value * 10000) orderSum,
         trunc(dbms_random.value*1000) + 1 OrderClient,
         case when dbms_random.value < 0.1 then 'otkaz' else 'ok' end Status
    from dual
  connect by level < 100001;

commit;

/

declare
  achtungs dbms_sql.Number_Table;
  procedure setClientStatus(clientNum in number, status in varchar2) is
  begin
    dbms_output.put_line(clientNum||' is '||status);
  end;
begin
  for r in (select * from orders where status = 'otkaz' and rownum < 1000) loop
    if not achtungs.exists(r.orderclient) then
      case
        when r.ordersum < 1000 then
          setClientStatus(r.orderclient, 'ok');
        when r.ordersum >= 1000 and r.ordersum < 5000 then
          setClientStatus(r.orderclient, 'not really ok');
        when r.ordersum >= 5000 then
          achtungs(r.orderclient) := 1;
          setClientStatus(r.orderclient, 'achtung');
      end case;
    else
      dbms_output.put_line('order of achtung '||r.orderclient||' detected');
    end if;
  end loop;
end;