Advanced Queuing - Oracle

tkaqdoca.sql: Script to Create Users, Objects, Queue Tables, Queues & Subscribers
/
state varchar2(2),
zip number,
country varchar2(100));
create or replace type book_typ as object (
title varchar2(100),
authors varchar2(100),
ISBN number,
price number);
/
create or replace type orderitem_typ as object (
quantity number,
item book_typ,
subtotal number);
/
create or replace type orderitemlist_vartyp as varray (20) of orderitem_typ;
/
create or replace type order_typ as object (
orderno number,
status varchar2(30),
ordertype varchar2(30),
orderregion varchar2(30),
customer customer_typ,
paymentmethod varchar2(30),
items orderitemlist_vartyp,
total number);
/
grant execute on order_typ to OE;
grant execute on orderitemlist_vartyp to OE;
grant execute on orderitem_typ to OE;
grant execute on book_typ to OE;
grant execute on customer_typ to OE;
execute dbms_aqadm.grant_system_privilege('ENQUEUE_ANY','OE',FALSE);
grant execute on order_typ to WS;
grant execute on orderitemlist_vartyp to WS;
grant execute on orderitem_typ to WS;
grant execute on book_typ to WS;
grant execute on customer_typ to WS;
execute dbms_aqadm.grant_system_privilege('ENQUEUE_ANY','WS',FALSE);
C-4 Oracle9i Application Developer’s Guide - Advanced Queuing