Subscriber not working

Question

Hi,
I have two databases on Windows XP. One db is 9.2 and aother is 10.2.
I want to propogate messages from 9.2 database to 10.2 database. So, I create a link from 9.2 to 10.2.
I have run following commands on the source database
create or replace type customer_type as object
    name    varchar2(100),
    dob     date,
    address varchar2(100)
BEGIN
DBMS_AQADM.CREATE_QUEUE_TABLE
  ( queue_table        => 'AQ_ADMIN.CUST_Q_T',
    queue_payload_type => 'AQ_ADMIN.CUSTOMER_TYPE',
    sort_list          => 'enq_time',
    multiple_consumers => TRUE );
END;
BEGIN
   SYS.DBMS_AQADM.CREATE_QUEUE
     QUEUE_NAME          =>   'AQ_ADMIN.CUST_Q'
    ,QUEUE_TABLE         =>   'AQ_ADMIN.CUST_Q_T'
    ,QUEUE_TYPE          =>   SYS.DBMS_AQADM.NORMAL_QUEUE
    ,MAX_RETRIES         =>   60
    ,RETRY_DELAY         =>   10
    ,RETENTION_TIME      =>   600
    ,COMMENT             =>   'Queue for enqueuing customer record'
END;
DECLARE
   aSubscriber sys.aq$_agent;
BEGIN
   aSubscriber := sys.aq$_agent('PROPAGATOR',
                               'AQ1.A1_Q@ORACLE1',
                               0);
   dbms_aqadm.add_subscriber
        queue_name     => 'CUST_Q'
       ,subscriber     => aSubscriber
END;
BEGIN
   SYS.DBMS_AQADM.START_QUEUE
     QUEUE_NAME => 'AQ_ADMIN.CUST_Q'
    ,ENQUEUE => TRUE
    ,DEQUEUE => TRUE
END;
DECLARE
    enqueue_options     dbms_aq.enqueue_options_t;
    message_properties  dbms_aq.message_properties_t;
    message_handle      RAW(16);
    message             customer_type;
BEGIN
    message := customer_type('SIXTH', '01-FEB-73','LONDON');
    dbms_aq.enqueue(queue_name => 'AQ_ADMIN.CUST_Q',
          enqueue_options      => enqueue_options,
          message_properties   => message_properties,
          payload              => message,
          msgid                => message_handle);
    COMMIT;
END ;
select count(*) from cust_q_t ; -- records in the queue table
COUNT(*)
     1So, my enqueue was successfull. Does that mean that, this message will automatically reach the destination database over the link. Queue A1_Q and schema AQ1 exist in the destination database (with same payload type). But, I cannot see any message reaching there.
Why the message is not reaching over db link? what else is required? where can I see the error, if any?
My enqueue was successfull.
Please help.
Thanks

Answer 1

Hi All,
I would like to give a better spool output of exact steps which I did for the above problem, just in case it helps.
In the database where messages will be enqueued
SQL> BEGIN
  2   DBMS_AQADM.CREATE_QUEUE_TABLE
  3    ( queue_table        => 'AQ_ADMIN.OUT_Q_TAB',
  4      queue_payload_type => 'AQ_ADMIN.CUSTOMER_TYPE',
  5      sort_list          => 'enq_time',
  6      multiple_consumers => TRUE );
  7  END;
  8  /
PL/SQL procedure successfully completed.
SQL>
SQL>
SQL> BEGIN
  2     SYS.DBMS_AQADM.CREATE_QUEUE
  3     (
  4       QUEUE_NAME          =>   'AQ_ADMIN.OUT_Q'
  5      ,QUEUE_TABLE         =>   'AQ_ADMIN.OUT_Q_TAB'
  6      ,QUEUE_TYPE          =>   SYS.DBMS_AQADM.NORMAL_QUEUE
  7      ,MAX_RETRIES         =>   60
  8      ,RETRY_DELAY         =>   10
  9      ,RETENTION_TIME      =>   600
10      ,COMMENT             =>   'Queue for enqueuing customer record'
11      );
12  END;
13  /
PL/SQL procedure successfully completed.
SQL>
SQL> DECLARE
  2     aSubscriber sys.aq$_agent;
  3   BEGIN
  4     aSubscriber := sys.aq$_agent('PROPAGATOR',
  5                                 'AQ1.IN_Q@AQ1',
  6                                 0);
  7     dbms_aqadm.add_subscriber
  8        (
  9          queue_name     => 'OUT_Q'
10         ,subscriber     => aSubscriber
11        );
12  END;
13  /
PL/SQL procedure successfully completed.
SQL>
SQL> begin
  2  DBMS_AQADM.Schedule_Propagation(queue_name  => 'AQ_ADMIN.OUT_Q',
  3                                  destination => 'AQ1',
  4                                  -- Destination_queue => 'AQ1.A1_Q',
  5                                  next_time   => 'SYSDATE + ( 10/86400 )',
  6                                  Latency     => 0);
  7  end;
  8  /
PL/SQL procedure successfully completed.
SQL>
SQL>
SQL> BEGIN
  2     SYS.DBMS_AQADM.START_QUEUE
  3     (
  4       QUEUE_NAME => 'AQ_ADMIN.OUT_Q'
  5      ,ENQUEUE => TRUE
  6      ,DEQUEUE => TRUE
  7      );
  8  END;
  9  /
PL/SQL procedure successfully completed.
SQL>And in the database where messages will be dequeued
SQL> BEGIN
  2  DBMS_AQADM.CREATE_QUEUE_TABLE
  3    ( queue_table        => 'IN_Q_TAB',
  4      queue_payload_type => 'AQ1.CUSTOMER_TYPE',
  5      sort_list          => 'enq_time' ,
  6      multiple_consumers => TRUE );
  7  END;
  8  /
PL/SQL procedure successfully completed.
SQL>
SQL> BEGIN
  2  SYS.DBMS_AQADM.CREATE_QUEUE
  3  (
  4     QUEUE_NAME     => 'IN_Q'
  5    ,QUEUE_TABLE    => 'AQ1.IN_Q_TAB'
  6    ,QUEUE_TYPE     => SYS.DBMS_AQADM.NORMAL_QUEUE
  7    ,MAX_RETRIES    => 60
  8    ,RETRY_DELAY    => 10
  9    ,RETENTION_TIME => 600
10    ,COMMENT        => 'Queue used to receive new customers'
11  );
12  END;
13  /
PL/SQL procedure successfully completed.
SQL>
SQL> BEGIN
  2  SYS.DBMS_AQADM.START_QUEUE
  3  (
  4    QUEUE_NAME => 'IN_Q'
  5   ,ENQUEUE    => TRUE
  6   ,DEQUEUE    => TRUE
  7  );
  8  END;
  9  /
PL/SQL procedure successfully completed.
SQL>Now, assuming that, the database link works, what can be the issue?
Why the message enqueued in the 'from' database is not showing up in the 'to' database ?
Please help.
Regards