sexta-feira, 19 de março de 2010

PL/SQL - Criação e iteração de um array associativo



declare
    TYPE assoc_areaGeoTotal IS TABLE OF number INDEX BY varchar2(10);

    totaisGeograficos assoc_areaGeoTotal;
    pkArea number;
begin

    for r_area in (select * from t_fii_area_geografica_s order by nome)
    loop
    
        IF NOT totaisGeograficos.EXISTS(to_char(r_area.pk)) THEN
            totaisGeograficos(to_char(r_area.pk)) := 0;
        END IF;

        totaisGeograficos(to_char(r_area.pk)) := 88;
    end loop;

 pkArea := totaisGeograficos.first;
 while pkArea is not null loop
 
        dbms_output.put_line(pkArea ||':'||totaisGeograficos(pkArea));
  pkArea := totaisGeograficos.next(pkArea);
 end loop;
end;

Sem comentários:

Enviar um comentário

Seguidores

Contribuidores