Advanced Queuing - Oracle

Set OraOrder = OraDatabase.CreateOraObject("BOLADM.order_typ")
Private Sub defer_billing
OraMsg = OraOrder
OraMsg.delay = 15*60*60*24
OraMsg = OraOrder 'OraOrder contains the order details
Msgid = OraAq.enqueue
End Sub
Enqueue Features
Java (JDBC): Example Code
public static void defer_billing(Connection db_conn, Order deferred_order)
{
AQSession aq_sess;
AQQueue def_bill_q;
AQEnqueueOption enq_option;
AQMessageProperty m_property;
AQMessage message;
AQObjectPayload obj_payload;
byte[] enq_msg_id;
try
{
/* Create an AQ Session: */
aq_sess = AQDriverManager.createAQSession(db_conn);
def_bill_q = aq_sess.getQueue("CBADM", "deferbilling_que");
message = def_bill_q.createMessage();
/* Enqueue the order into the deferred billing queue with a delay
of 15 days */
m_property = message.getMessageProperty();
m_property.setDelay(15*60*60*24);
obj_payload = message.getObjectPayload();
obj_payload.setPayloadData(deferred_order);
enq_option = new AQEnqueueOption();
/* Enqueue the message */
enq_msg_id = def_bill_q.enqueue(enq_option, message);
A Sample Application Using AQ 8-47