Mega Code Archive

 

Categories / Oracle PLSQL Tutorial / System Packages

 

DBMS_PIPE RESET_BUFFER

SQL> SQL> CREATE OR REPLACE PROCEDURE forward(from_in IN VARCHAR2,to_in IN VARCHAR2,timeout_secs_IN IN INTEGER := 10) IS   2     stat INTEGER;   3  BEGIN   4     DBMS_PIPE.RESET_BUFFER;   5     DBMS_PIPE.PACK_MESSAGE('message');   6   7     stat := DBMS_PIPE.RECEIVE_MESSAGE (from_in, timeout=>timeout_secs_IN);   8     IF stat = 0   9     THEN  10        stat := DBMS_PIPE.SEND_MESSAGE (to_in, timeout=>timeout_secs_IN);  11     END IF;  12  END forward;  13  /