sql >> Database teknologi >  >> RDS >> Oracle

Udfyld et associativt array i en indlejret tabel

I svaret på dit tidligere spørgsmål nævnte jeg, at det ville være sværere at udfylde samlingen med %rowtype Mark. Så vidt jeg ved, kan du ikke bruge bulk collect, medmindre du erklærer en objekttype på SQL-niveau i stedet for en posttype. for dette (selvom det er værd at tjekke, om det måske har ændret sig i 12c).

Jeg tror, ​​du sidder fast ved at bruge en enklere markørløkke, der bygger de to felter i din type (dvs. %rowtype underfeltet og rowid felt) separat, og bygger derefter samlingen op en linje ad gangen:

create or replace package body dat_pkg is

    procedure transform_dat (p_batch_name data_test.batch_name%type)
    is

        cursor cur_dat is
        select rowid, a.*
        from   data_test a
        where  batch_name = p_batch_name;

        l_dat_tst typ_dat_tst;
        l_rec data_test%rowtype;

    begin

        for rec_dat in cur_dat loop
            l_rec.data_id := rec_dat.data_id;
            l_rec.data_value := rec_dat.data_value;
            l_rec.batch_name := rec_dat.batch_name;
            -- or use a counter you increment for this...
            l_dat_tst(l_dat_tst.count + 1).data_rec := l_rec;
            l_dat_tst(l_dat_tst.count).data_rowid := rec_dat.rowid;
        end loop;

        -- Do the Transformation here. Example --            

        for i in 1..l_dat_tst.count loop
            if l_dat_tst(i).data_rec.data_value = 'hello' then
                l_dat_tst(i).data_rec.data_value := 'was hello';
            else            
                l_dat_tst(i).data_rec.data_value := 'was not hello';
            end if;
        end loop;

        -- update the table            
        proc_test (p_dat => l_dat_tst);

    end transform_dat;

    procedure proc_test (p_dat  typ_dat_tst)
    is
    begin

        for i in 1..p_dat.count loop

            update  data_test        
            set     data_value  = p_dat(i).data_rec.data_value  
            where   data_id     = p_dat(i).data_rec.data_id
            and     rowid       = p_dat(i).data_rowid;

        end loop;

    end proc_test;

end dat_pkg;
/    

Som også diskuteret før, skal referencerne til underfeltpostens felter kvalificeres korrekt, så jeg har indsat .data_rec i referencerne i begge procedurer. Jeg har ændret dummy-transformationen for at ændre værdien i stedet for ID'et, da det betyder, at der aldrig ville ske nogen opdateringer.

Demo med nogle dummy-data:

insert into data_test values (1, 'hello', 'test');
insert into data_test values (2, 'hello', 'test');
insert into data_test values (3, 'hello', 'exclude');
insert into data_test values (4, 'goodbye', 'test');


exec dat_pkg.transform_dat('test');

select * from data_test;

   DATA_ID DATA_VALUE           BATCH_NAME          
---------- -------------------- --------------------
         1 was hello            test                
         2 was hello            test                
         3 hello                exclude             
         4 was not hello        test                



  1. Alternativt outputformat til psql

  2. SQL Server, kan du ikke indsætte null i primærnøglefeltet?

  3. Efter at have åbnet csv-fil i wordpad, vil jeg ikke have dobbelte anførselstegn for feltnavnet

  4. Introduktion til PL/SQL-samlinger i Oracle-databasen