How to join two arrays together?

Question

I have the following type
    type TVarcharArr is table of varchar(4000) index by binary_integer;I have a procedure that passes in two separate arrays as:
    p_account_number                 in TVarcharArr,
    p_product_system_code          in TVarcharArrThese arrays are related (they will have the same number of elements), the contents would be as follows:
    Account Number    Product System Code
    123                      ABC
    456                      DEF
    789                      GHII can use TABLE(CAST to turn each of these arrays into a table, but how do I join these two arrays together so that they become a single table with two columns? Or if I CAST them as TABLEs, how can I join these two tables together - is there some way of using the index to facilitate the join?
Cheers
Richard

Answer 1

You are right, I do need to convert the arrays first to use TABLE(CAST, and I do have my concerns about the use of rownum.
Here's the test case I built to test what I'm doing, incorporating the rownum solution:
declare
    type TVarcharArr is table of varchar(4000) index by binary_integer;
    v_arr   TVarcharArr;
    v_tab  tchartab := tchartab();
    v_arr2   TVarcharArr;
    v_tab2  tchartab := tchartab();   
begin
    v_arr(1) := 'ABC';
    v_arr(2) := 'DEF';
    v_arr(3) := 'GHI';
    v_arr2(1) := '123';
    v_arr2(2) := '456';
    v_arr2(3) := '789';   
    v_tab.extend(v_arr.Count);   
    for i in v_arr.first .. v_arr.last
    loop
        v_tab(i) := v_arr(i);
    end loop;   
    v_tab2.extend(v_arr2.Count);   
    for i in v_arr2.first .. v_arr2.last
    loop
        v_tab2(i) := v_arr2(i);
    end loop;   
    for rec in (with w_acct as
                (select rownum rn, a.column_value acol
                from table(cast(v_tab as tchartab)) a
                     w_prod as
                (select rownum rn, b.column_value bcol
                from table(cast(v_tab2 as tchartab)) b
                select acol,bcol
                from w_acct a,
                     w_prod b
                where a.rn = b.rn) loop
        DBMS_OUTPUT.PUT_LINE ( 'rec = ' || rec.acol || '|'|| rec.bcol );
        null;
    end loop;
end;It does return the correct result - but can it be trusted to be consistent - does the rownum in an array suffer the same problems as the rownum from a regular select? I'm guessing it's too risky to find out.
In essence, I'm getting two arrays and I'm trying to join them together so that I can CAST them as a table. (And I know the real question is why isn't it just one array of records with two elements - but sometimes you have to work with what you're given)