create or replace package projeto_final as type ret_voo is record (num_voo voo.numero%type, cia voo.companhiaaerea%type, origem aeroporto.nome%type, destino aeroporto.nome%type, cidade_vem aeroporto.cidade%type, cidade_vai aeroporto.cidade%type, hora_chegada instanciatrecho.horachegada%type, hora_saida instanciatrecho.horasaida%type); type array_voo is varray(1) of ret_voo; procedure consulta_voo (origem aeroporto.cidade%type, destino aeroporto.cidade%type, data_saida instanciatrecho.data%type, hora_li instanciatrecho.horasaida%type, -- limite inferior para a hora de partida hora_ls instanciatrecho.horasaida%type, -- limite superior para a hora de partida retorno_voo OUT NOCOPY array_voo);end projeto_final;CREATE OR REPLACE package body projeto_final as procedure consulta_voo (origem aeroporto.cidade%type, destino aeroporto.cidade%type, data_saida instanciatrecho.data%type, hora_li instanciatrecho.horasaida%type, -- limite inferior para a hora de partida hora_ls instanciatrecho.horasaida%type, -- limite superior para a hora de partida retorno_voo OUT NOCOPY array_voo) is cursor c_voo (cidade_org aeroporto.cidade%type, cidade_dst aeroporto.cidade%type, data_saida instanciatrecho.data%type, hora_li instanciatrecho.horasaida%type, hora_ls instanciatrecho.horasaida%type) is select voo.numero, voo.companhiaaerea, sai.nome, chega.nome, sai.cidade, chega.cidade, instanciatrecho.horachegada, instanciatrecho.horasaida from aeroporto sai, voo, aeroporto chega, instanciatrecho where instanciatrecho.data = data_saida and instanciatrecho.aeroportcodsai = sai.aeroportcod and instanciatrecho.aeroportcodchega = sai.aeroportcod and instanciatrecho.horasaida >= hora_li and instanciatrecho.horachegada <= hora_ls and instanciatrecho.numerovoo = voo.numero and sai.cidade = cidade_org and chega.cidade = cidade_dst; begin for instancia in c_voo(origem, destino, data_saida, hora_li, hora_ls) loop retorno_voo(retorno_voo.last) := instancia; retorno_voo.extend; -- append a null element end loop; retorno_voo.trim; -- remove the last null element end consulta_voo;end projeto_final;