Creating variable of type of a PLSQL table type

Question

I have an object defined as
create or replace type emp_rec as object (col1 date, col2 date);
then I defined
create or replace type data_emp_rec is table of emp_rec;
Now I need to define a variable temp_rec which will host data returned of emp_rec structure.
please advise how to define a variable to have data structure similar to that of emp_rec
declare
temp_rec emp_rec(null, null);
or
temp_rec data_emp_rec;
Thx

Answer 1

Hello
It's all about casting data types and supplying the right data type to the bulk collect clause:
SQL> SELECT
  2     usr.nm,
  3     perm.id,
  4     perm.descr
  5  FROM
  6     dt_test_user usr,
  7     dt_test_permission perm,
  8     dt_test_user_permission usr_perm
  9  WHERE
10     usr.id = usr_perm.user_id
11  AND
12     perm.id = usr_perm.permission_id
13  ORDER BY
14     usr.nm
15  /
NM                                     ID DESCR
Barry Bethel                            4 Be very enthusiastic about everything
Barry Bethel                            2 Advertise slimming products
Dr. Evil                                1 Take over the world
Rolf Harris                             4 Be very enthusiastic about everything
Rolf Harris                             3 Sing very strange songs
SQL> select
  2     usr.id,
  3     usr.nm,
  4     CURSOR(select
  5                             p.user_id
  6                     from
  7                             dt_test_user_permission p
  8                     where
  9                             p.user_id = usr.id
10                     ) pos_cursor
11  from
12     dt_test_user usr
13  /
        ID NM                             POS_CURSOR
         1 Rolf Harris                    CURSOR STATEMENT : 3
CURSOR STATEMENT : 3
   USER_ID
         1
         1
         2 Barry Bethel                   CURSOR STATEMENT : 3
CURSOR STATEMENT : 3
   USER_ID
         2
         2
         3 Dr. Evil                       CURSOR STATEMENT : 3
CURSOR STATEMENT : 3
   USER_ID
         3
SQL> select
  2     usr.id,
  3     usr.nm,
  4     CAST(MULTISET(  select
  5                                                             p.user_id
  6                                                     from
  7                                                             dt_test_user_permission p
  8                                                     where
  9                                                             p.user_id = usr.id
10                                             ) AS permissionList
11                             ) pos_ntt
12  from
13     dt_test_user usr
14  /
        ID NM                             POS_NTT(ID)
         1 Rolf Harris                    PERMISSIONLIST(PERMISSION_TYPE(1), PERMISSION_TYPE
                                          (1))
         2 Barry Bethel                   PERMISSIONLIST(PERMISSION_TYPE(2), PERMISSION_TYPE
                                          (2))
         3 Dr. Evil                       PERMISSIONLIST(PERMISSION_TYPE(3))
SQL> declare
  2     ul userList;
  3  begin
  4     select
  5             usr.id,
  6             usr.nm,
  7             CAST(MULTISET(  select
  8                                                     p.user_id
  9                                             from
10                                                     dt_test_user_permission p
11                                             where
12                                                     p.user_id = usr.id
13                                     ) AS permissionList
14                     ) pos_ntt
15     bulk collect into
16             ul
17     from dt_test_user
18             usr;
19  end;
20  /
        from dt_test_user
ERROR at line 17:
ORA-06550: line 17, column 2:
PL/SQL: ORA-00947: not enough values
ORA-06550: line 4, column 2:
PL/SQL: SQL Statement ignored
SQL> declare
  2     ul userList;
  3  begin
  4     select
  5             user_type(      usr.id,
  6                                     usr.nm,
  7                                     CAST(MULTISET(  select
  8                                                                             p.user_id
  9                                                                     from
10                                                                             dt_test_user_permission p
11                                                                     where
12                                                                             p.user_id = usr.id
13                                                             ) AS permissionList
14                                             )
15                             )
16     bulk collect into
17             ul
18     from dt_test_user
19             usr;
20
21  end;
22  /
PL/SQL procedure successfully completed.
SQL> declare
  2     ul userList;
  3  begin
  4     select
  5             user_type(      usr.id,
  6                                     usr.nm,
  7                                     CAST(MULTISET(  select
  8                                                                             p.user_id
  9                                                                     from
10                                                                             dt_test_user_permission p
11                                                                     where
12                                                                             p.user_id = usr.id
13                                                             ) AS permissionList
14                                             )
15                             )
16     bulk collect into
17             ul
18     from dt_test_user
19             usr;
20
21     FOR li_Idx IN ul.FIRST..ul.LAST LOOP
22
23             dbms_output.put_line(ul(li_Idx).name);
24
25             FOR li_NttIdx IN ul(li_Idx).permissions.FIRST..ul(li_Idx).permissions.LAST LOOP
26
27                     dbms_output.put_line(ul(li_Idx).permissions(li_NttIdx).id);
28
29             END LOOP;
30
31     END LOOP;
32
33  end;
34  /
Rolf Harris
1
1
Barry Bethel
2
2
Dr. Evil
3
PL/SQL procedure successfully completed.HTH
David