46 of 62
Associative Arrays - Example 2a
uPrepare memory structure
u
udeclare
u  type list_aa is table of VARCHAR2(2000)
u        index by VARCHAR2(256);
u  v_list_aa list_aa;       
u  cursor c_emp is
u  select ename, deptno,to_char(hiredate,'q') q_nr
u  from emp;   
u  v_key_tx VARCHAR2(256);
ubegin     
u  for r_d in (select deptno from dept order by 1) loop
u   v_list_aa(r_d.deptno||'|1'):=
u 'Q1 Dept#' ||r_d.deptno||':';
u   v_list_aa(r_d.deptno||'|2'):=
u 'Q2 Dept#' ||r_d.deptno||':';       
u   ...
uend loop;