Questo perché stai ricreando l'oggetto. Devi passare una versione istanziata dell'oggetto nella procedura come parametro:
create or replace procedure add_n_rows(
Pn_rows in number
, P_tab in out t_tf_tab ) is
begin
for i in P_tab.count .. P_tab.count + Pn_rows
loop
P_tab.extend;
P_tab(l_tab.last) := t_tf_row(i, 'Description for '|| i);
end loop;
end;
Ho dichiarato P_tab
come parametro OUT, significa che puoi modificarlo. Se non vuoi farlo, rimuovi "out" e dichiara una variabile locale del tipo t_tf_tab
, che puoi quindi modificare.
Puoi quindi chiamarlo separatamente, ad esempio:
declare
l_tab t_tf_tab := t_tf_tab();
begin
l_tab.extend;
l_tab(l_tab.last) := t_tf_row(1. 'Hello');
add_n_rows(3, l_tab);
end;