DECLARE ARR DBMS_OUTPUT.CHARARR;
  ...
  SET ARR[I] = ...; -- FETCH ... INTO ARR[I];
  ...
  RETURN SELECT STR FROM UNNEST(ARR) T(STR);

create type myrow as row (
  f1 data_type1
...
, fN data_typeN
)@

create type myrow_arr as myrow_arr ARRAY[]@

begin
  declare l_arr myrow_arr;
  ...
  set l_arr[i].f1 = ...;
  ...
  set l_arr[i].fN = ...;
  ...
  RETURN SELECT f1, ..., fN FROM UNNEST(l_arr) T(f1, ..., fN);
end@

create type row_IV300 as row (f1 INTEGER, f2 VARCHAR(300))@
create type arr_IV300 as nftg.row_IV300 ARRAY[]@

create or replace function test_row()
returns arr_IV300
begin
  declare i integer default 0;
  declare mytab nftg.arr_IV300;
  for curr as select id, name from agent
  do
    set i = i + 1;
    set mytab[i].f1 = curr.id;
    set mytab[i].f2 = curr.name;
  end for;
  return select f1, f2 from UNNEST(mytab) T(f1, f2);
end@

create or replace function test()
returns table(f1 integer, f2 varchar(300))
return select f1, f2 from unnest(test_row())@