APPS.XNP_XDP_ORDER_DONE_U dependencies on XNP_MESSAGE

Line 2: PROCEDURE CREATE_MSG ( x_msg_header OUT XNP_MESSAGE.MSG_HEADER_REC_TYPE,

1: PACKAGE BODY XNP_XDP_ORDER_DONE_U AS
2: PROCEDURE CREATE_MSG ( x_msg_header OUT XNP_MESSAGE.MSG_HEADER_REC_TYPE,
3: x_msg_text OUT VARCHAR2,
4: x_error_code OUT NUMBER,
5: x_error_message OUT VARCHAR2,
6: p_sender_name IN VARCHAR2 DEFAULT NULL,

Line 21: l_msg_header XNP_MESSAGE.MSG_HEADER_REC_TYPE ;

17: e_NO_DESTINATION EXCEPTION ;
18: l_xml_body VARCHAR2(32767) ;
19: l_xml_doc VARCHAR2(32767) ;
20: l_xml_header VARCHAR2(32767) ;
21: l_msg_header XNP_MESSAGE.MSG_HEADER_REC_TYPE ;
22: l_loop_index_1 NUMBER ;
23: BEGIN
24: x_error_code := 0 ;
25: x_error_message := NULL ;

Line 29: XNP_MESSAGE.get_sequence ( l_msg_header.message_id ) ;

25: x_error_message := NULL ;
26: XNP_XML_UTILS.initialize_doc ( ) ;
27: /*construct the XML header */
28: /* retreive the next message ID */
29: XNP_MESSAGE.get_sequence ( l_msg_header.message_id ) ;
30: IF (p_reference_id IS NULL) THEN
31: l_msg_header.reference_id := l_msg_header.message_id ;
32: ELSE
33: l_msg_header.reference_id := p_reference_id ;

Line 116: l_msg_header XNP_MESSAGE.MSG_HEADER_REC_TYPE ;

112: e_NO_DESTINATION EXCEPTION ;
113: l_recipient_list VARCHAR2 (2000) ;
114: l_consumer_list VARCHAR2 (4000) ;
115: l_queue_name VARCHAR2 (2000) ;
116: l_msg_header XNP_MESSAGE.MSG_HEADER_REC_TYPE ;
117: l_msg_text VARCHAR2(32767) ;
118: BEGIN
119: x_error_code := 0 ;
120: x_error_message := NULL ;

Line 124: XNP_MESSAGE.GET_SUBSCRIBER_LIST( 'XDP_ORDER_DONE', l_consumer_list );

120: x_error_message := NULL ;
121: /* check if the consumer list is NULL */
122: l_consumer_list := p_consumer_list ;
123: IF (l_consumer_list IS NULL) THEN
124: XNP_MESSAGE.GET_SUBSCRIBER_LIST( 'XDP_ORDER_DONE', l_consumer_list );
125: END IF;
126: l_recipient_list := p_recipient_list ;
127: l_queue_name := 'XNP_IN_EVT_Q';
128: /* create the XML message */

Line 145: XNP_MESSAGE.push (

141: p_fa_instance_id=>p_fa_instance_id ) ;
142: x_message_id := l_msg_header.message_id ;
143: /* enqueue the XML message for delivery */
144: IF (x_error_code = 0) THEN
145: XNP_MESSAGE.push (
146: p_msg_header => l_msg_header,
147: p_body_text => l_msg_text,
148: p_queue_name => xnp_event.c_internal_evt_q,
149: p_correlation_id => l_msg_header.message_code,

Line 151: p_commit_mode => XNP_MESSAGE.C_ON_COMMIT );

147: p_body_text => l_msg_text,
148: p_queue_name => xnp_event.c_internal_evt_q,
149: p_correlation_id => l_msg_header.message_code,
150: p_priority=>'3',
151: p_commit_mode => XNP_MESSAGE.C_ON_COMMIT );
152: IF (l_consumer_list IS NOT NULL) THEN
153: XNP_MESSAGE.GET_SEQUENCE(l_msg_header.message_id) ;
154: l_msg_header.direction_indr := 'O';
155: XNP_MESSAGE.push (

Line 153: XNP_MESSAGE.GET_SEQUENCE(l_msg_header.message_id) ;

149: p_correlation_id => l_msg_header.message_code,
150: p_priority=>'3',
151: p_commit_mode => XNP_MESSAGE.C_ON_COMMIT );
152: IF (l_consumer_list IS NOT NULL) THEN
153: XNP_MESSAGE.GET_SEQUENCE(l_msg_header.message_id) ;
154: l_msg_header.direction_indr := 'O';
155: XNP_MESSAGE.push (
156: p_msg_header => l_msg_header,
157: p_body_text => l_msg_text,

Line 155: XNP_MESSAGE.push (

151: p_commit_mode => XNP_MESSAGE.C_ON_COMMIT );
152: IF (l_consumer_list IS NOT NULL) THEN
153: XNP_MESSAGE.GET_SEQUENCE(l_msg_header.message_id) ;
154: l_msg_header.direction_indr := 'O';
155: XNP_MESSAGE.push (
156: p_msg_header => l_msg_header,
157: p_body_text => l_msg_text,
158: p_queue_name => xnp_event.c_outbound_msg_q,
159: p_recipient_list => l_consumer_list,

Line 206: PROCEDURE PROCESS ( p_msg_header IN XNP_MESSAGE.MSG_HEADER_REC_TYPE,

202: p_order_id=>p_order_id,
203: p_wi_instance_id=>p_wi_instance_id,
204: p_fa_instance_id=>p_fa_instance_id ) ;
205: END ;
206: PROCEDURE PROCESS ( p_msg_header IN XNP_MESSAGE.MSG_HEADER_REC_TYPE,
207: p_msg_text IN VARCHAR2,
208: x_error_code OUT NUMBER,
209: x_error_message OUT VARCHAR2,
210: p_process_reference IN VARCHAR2 DEFAULT NULL ) IS

Line 214: PROCEDURE DEFAULT_PROCESS ( p_msg_header IN XNP_MESSAGE.MSG_HEADER_REC_TYPE,

210: p_process_reference IN VARCHAR2 DEFAULT NULL ) IS
211: BEGIN
212: NULL ;
213: END ;
214: PROCEDURE DEFAULT_PROCESS ( p_msg_header IN XNP_MESSAGE.MSG_HEADER_REC_TYPE,
215: p_msg_text IN VARCHAR2,
216: x_error_code OUT NUMBER,
217: x_error_message OUT VARCHAR2 ) IS
218: BEGIN

Line 221: PROCEDURE VALIDATE ( p_msg_header IN OUT XNP_MESSAGE.MSG_HEADER_REC_TYPE,

217: x_error_message OUT VARCHAR2 ) IS
218: BEGIN
219: NULL ;
220: END ;
221: PROCEDURE VALIDATE ( p_msg_header IN OUT XNP_MESSAGE.MSG_HEADER_REC_TYPE,
222: p_msg_text IN VARCHAR2,
223: x_error_code OUT NUMBER,
224: x_error_message OUT VARCHAR2 ) IS
225: BEGIN