Mega Code Archive

 

Categories / Oracle PLSQL Tutorial / Object Oriented

 

Use table function to convert table collection to a table

SQL> SQL> create table ord(   2           order_no               integer          primary key   3          ,empl_no                integer   4          ,order_date             date not null   5          ,total_order_price      number(7,2)   6          ,deliver_date           date   7          ,deliver_time           varchar2(7)   8          ,payment_method         varchar2(2)   9          ,emp_no                 number(3,0)  10          ,deliver_name           varchar2(35)  11          ,gift_message           varchar2(100)  12  ); Table created. SQL> SQL> insert into ord(order_no,empl_no,order_date,total_order_price,deliver_date,deliver_time,payment_method,emp_no,deliver_name,gift_message)   2           values(1,1,'14-Feb-2002', 23.00, '14-Feb-2002', '12 noon', 'CA',1, null, 'Gift for wife'); 1 row created. SQL> insert into ord(order_no  ,empl_no ,order_date ,total_order_price ,deliver_date ,deliver_time ,payment_method ,emp_no,deliver_name ,gift_message )   2           values(2,1,'14-Feb-2003', 510.98, '14-feb-2003', '5 pm', 'NY',7, 'Rose Ted', 'Happy Valentines Day to Mother'); 1 row created. SQL> insert into ord(order_no  ,empl_no ,order_date ,total_order_price ,deliver_date ,deliver_time,payment_method ,emp_no,deliver_name ,gift_message )   2           values(3, 2,'14-Feb-2004', 315.99, '14-feb-2004', '3 pm', 'VS',2, 'Ani Forest', 'Happy Valentines Day to Father'); 1 row created. SQL> insert into ord(order_no  ,empl_no ,order_date ,total_order_price ,deliver_date ,deliver_time,payment_method ,emp_no,deliver_name ,gift_message )   2           values(4, 2,'14-Feb-1999', 191.95, '14-feb-1999', '2 pm', 'NJ',2, 'O. John', 'Happy Valentines Day'); 1 row created. SQL> insert into ord(order_no  ,empl_no ,order_date ,total_order_price ,deliver_date ,deliver_time,payment_method ,emp_no,deliver_name ,gift_message    )   2           values(5, 6,'4-mar-2002', 101.95, '5-mar-2002', '2:30 pm', 'MO'    , 2, 'Cora', 'Happy Birthday from John'); 1 row created. SQL> insert into ord(order_no  ,empl_no ,order_date ,total_order_price ,deliver_date ,deliver_time,payment_method ,emp_no,deliver_name ,gift_message )   2           values(6, 9,'7-apr-2003', 221.95, '7-apr-2003', '3 pm', 'MA', 2, 'Sake Keith', 'Happy Birthday from Joe' ); 1 row created. SQL> insert into ord(order_no  ,empl_no ,order_date ,total_order_price ,deliver_date ,deliver_time,payment_method ,emp_no,deliver_name ,gift_message )   2           values(7, 9,'20-jun-2004', 315.95, '21-jun-2004', '12 noon', 'BC', 2, 'Jessica Li', 'Happy Birthday from Jessica'); 1 row created. SQL> insert into ord(order_no  ,empl_no ,order_date ,total_order_price ,deliver_date ,deliver_time,payment_method ,emp_no,deliver_name ,gift_message )   2           values (8, 12, '31-dec-1999', 135.95, '1-jan-2000', '12 noon', 'DI',   3, 'Larry', 'Happy New Year from Lawrence'); 1 row created. SQL> insert into ord(order_no  ,empl_no ,order_date ,total_order_price ,deliver_date ,deliver_time,payment_method ,emp_no,deliver_name ,gift_message )   2           values (9, 12, '26-dec-2003', 715.95, '2-jan-2004', '12 noon', 'SK',7, 'Did', 'Happy Birthday from Nancy' ); 1 row created. SQL> insert into ord(order_no  ,empl_no ,order_date ,total_order_price ,deliver_date ,deliver_time,payment_method ,emp_no,deliver_name ,gift_message )   2           values(10, 4, sysdate-1, 119.95, sysdate+2, '6:30 pm', 'VG',2, 'P. Jing', 'Happy Valentines Day to Jason'); 1 row created. SQL> insert into ord(order_no  ,empl_no ,order_date ,total_order_price ,deliver_date ,deliver_time,payment_method ,emp_no,deliver_name ,gift_message )   2           values(11, 2, sysdate, 310.00, sysdate+2, '3:30 pm', 'DC',2, 'C. Late', 'Happy Birthday Day to Jack'); 1 row created. SQL> insert into ord(order_no  ,empl_no ,order_date ,total_order_price ,deliver_date ,deliver_time,payment_method ,emp_no,deliver_name ,gift_message)   2           values(12, 7, sysdate-3, 121.95, sysdate-2, '1:30 pm', 'AC',2, 'W. Last', 'Happy Birthday Day to You'); 1 row created. SQL> insert into ord(order_no  ,empl_no ,order_date ,total_order_price ,deliver_date ,deliver_time,payment_method ,emp_no,deliver_name ,gift_message)   2           values(13, 7, sysdate, 211.95, sysdate-4, '4:30 pm', 'CA',2, 'J. Bond', 'Thanks for hard working'); 1 row created. SQL> SQL> create or replace type sqlMONTH_TABLEtype as table of date;   2  / Type created. SQL> SQL> create or replace function month_generator   2     (p_num_months in number)   3     RETURN sqlMONTH_TABLEtype   4  AS   5      month_table     sqlMONTH_TABLEtype := sqlMONTH_TABLEtype();   6  BEGIN   7   8      for i in 1..p_num_months loop   9          month_table.extend(1);  10          month_table(i) := add_months(sysdate, -i);  11      end loop;  12      return(month_table);  13  14  END;  15  / Function created. SQL> SQL> select to_Char(x.column_value, 'mm/yyyy') , nvl(avg(total_order_price),0) as avg_Sales   2  from TABLE( month_generator(12) ) x, ord   3  where to_Char(x.column_value, 'mm/yyyy') = to_Char(order_date(+), 'mm/yyyy')   4  group by to_Char(x.column_value, 'mm/yyyy') ; TO_CHAR  AVG_SALES ------- ---------- 04/2008          0 03/2008          0 02/2008          0 10/2007          0 01/2008          0 05/2008          0 06/2008          0 12/2007          0 11/2007          0 07/2007          0 09/2007          0 TO_CHAR  AVG_SALES ------- ---------- 08/2007          0 12 rows selected. SQL> SQL> drop table ord; Table dropped. SQL>