42: BEGIN
43: l_event_name := 'oracle.apps.cln.ch.collaboration.addmessage';
44:
45: IF (g_debug_Level <= 2) THEN
46: cln_debug_pub.Add('===============================================', 2);
47: cln_debug_pub.Add('Entering m4u_resp_process.add_error_to_cln_hist', 2);
48: END IF;
49:
50: IF (g_debug_Level <= 1) THEN
43: l_event_name := 'oracle.apps.cln.ch.collaboration.addmessage';
44:
45: IF (g_debug_Level <= 2) THEN
46: cln_debug_pub.Add('===============================================', 2);
47: cln_debug_pub.Add('Entering m4u_resp_process.add_error_to_cln_hist', 2);
48: END IF;
49:
50: IF (g_debug_Level <= 1) THEN
51: cln_debug_pub.Add('-- Received parameters -- ', 1);
47: cln_debug_pub.Add('Entering m4u_resp_process.add_error_to_cln_hist', 2);
48: END IF;
49:
50: IF (g_debug_Level <= 1) THEN
51: cln_debug_pub.Add('-- Received parameters -- ', 1);
52: cln_debug_pub.Add('p_error_code --' || p_error_code , 1);
53: cln_debug_pub.Add('p_error_type --' || p_error_type , 1);
54: cln_debug_pub.Add('p_error_message --' || p_error_message, 1);
55: cln_debug_pub.Add('p_collab_detail_id --' || p_collab_detail_id, 1);
48: END IF;
49:
50: IF (g_debug_Level <= 1) THEN
51: cln_debug_pub.Add('-- Received parameters -- ', 1);
52: cln_debug_pub.Add('p_error_code --' || p_error_code , 1);
53: cln_debug_pub.Add('p_error_type --' || p_error_type , 1);
54: cln_debug_pub.Add('p_error_message --' || p_error_message, 1);
55: cln_debug_pub.Add('p_collab_detail_id --' || p_collab_detail_id, 1);
56: cln_debug_pub.Add('p_ucc_doc_unique_id --' || p_ucc_doc_unique_id, 1);
49:
50: IF (g_debug_Level <= 1) THEN
51: cln_debug_pub.Add('-- Received parameters -- ', 1);
52: cln_debug_pub.Add('p_error_code --' || p_error_code , 1);
53: cln_debug_pub.Add('p_error_type --' || p_error_type , 1);
54: cln_debug_pub.Add('p_error_message --' || p_error_message, 1);
55: cln_debug_pub.Add('p_collab_detail_id --' || p_collab_detail_id, 1);
56: cln_debug_pub.Add('p_ucc_doc_unique_id --' || p_ucc_doc_unique_id, 1);
57: cln_debug_pub.Add('p_xmlg_internal_control_no --' || p_xmlg_internal_control_no, 1);
50: IF (g_debug_Level <= 1) THEN
51: cln_debug_pub.Add('-- Received parameters -- ', 1);
52: cln_debug_pub.Add('p_error_code --' || p_error_code , 1);
53: cln_debug_pub.Add('p_error_type --' || p_error_type , 1);
54: cln_debug_pub.Add('p_error_message --' || p_error_message, 1);
55: cln_debug_pub.Add('p_collab_detail_id --' || p_collab_detail_id, 1);
56: cln_debug_pub.Add('p_ucc_doc_unique_id --' || p_ucc_doc_unique_id, 1);
57: cln_debug_pub.Add('p_xmlg_internal_control_no --' || p_xmlg_internal_control_no, 1);
58: END IF;
51: cln_debug_pub.Add('-- Received parameters -- ', 1);
52: cln_debug_pub.Add('p_error_code --' || p_error_code , 1);
53: cln_debug_pub.Add('p_error_type --' || p_error_type , 1);
54: cln_debug_pub.Add('p_error_message --' || p_error_message, 1);
55: cln_debug_pub.Add('p_collab_detail_id --' || p_collab_detail_id, 1);
56: cln_debug_pub.Add('p_ucc_doc_unique_id --' || p_ucc_doc_unique_id, 1);
57: cln_debug_pub.Add('p_xmlg_internal_control_no --' || p_xmlg_internal_control_no, 1);
58: END IF;
59:
52: cln_debug_pub.Add('p_error_code --' || p_error_code , 1);
53: cln_debug_pub.Add('p_error_type --' || p_error_type , 1);
54: cln_debug_pub.Add('p_error_message --' || p_error_message, 1);
55: cln_debug_pub.Add('p_collab_detail_id --' || p_collab_detail_id, 1);
56: cln_debug_pub.Add('p_ucc_doc_unique_id --' || p_ucc_doc_unique_id, 1);
57: cln_debug_pub.Add('p_xmlg_internal_control_no --' || p_xmlg_internal_control_no, 1);
58: END IF;
59:
60: l_event_parameters := wf_parameter_list_t();
53: cln_debug_pub.Add('p_error_type --' || p_error_type , 1);
54: cln_debug_pub.Add('p_error_message --' || p_error_message, 1);
55: cln_debug_pub.Add('p_collab_detail_id --' || p_collab_detail_id, 1);
56: cln_debug_pub.Add('p_ucc_doc_unique_id --' || p_ucc_doc_unique_id, 1);
57: cln_debug_pub.Add('p_xmlg_internal_control_no --' || p_xmlg_internal_control_no, 1);
58: END IF;
59:
60: l_event_parameters := wf_parameter_list_t();
61:
64: --create unique key for each event using CLN sequence
65: SELECT cln_collaboration_msg_id_s.nextval INTO l_event_key FROM dual ;
66:
67: IF (g_debug_Level <= 1) THEN
68: cln_debug_pub.Add('Raising Add Message Event ', 1);
69: cln_debug_pub.Add('p_event_key -- ' || l_event_key, 1);
70: cln_debug_pub.Add('COLLABORATION_DETAIL_ID -- ' || p_collab_detail_id, 1);
71: cln_debug_pub.Add('DETAIL_MESSAGE -- ' || l_error_description, 1);
72: cln_debug_pub.Add('p_event_name -- ' || l_event_name, 1);
65: SELECT cln_collaboration_msg_id_s.nextval INTO l_event_key FROM dual ;
66:
67: IF (g_debug_Level <= 1) THEN
68: cln_debug_pub.Add('Raising Add Message Event ', 1);
69: cln_debug_pub.Add('p_event_key -- ' || l_event_key, 1);
70: cln_debug_pub.Add('COLLABORATION_DETAIL_ID -- ' || p_collab_detail_id, 1);
71: cln_debug_pub.Add('DETAIL_MESSAGE -- ' || l_error_description, 1);
72: cln_debug_pub.Add('p_event_name -- ' || l_event_name, 1);
73: END IF;
66:
67: IF (g_debug_Level <= 1) THEN
68: cln_debug_pub.Add('Raising Add Message Event ', 1);
69: cln_debug_pub.Add('p_event_key -- ' || l_event_key, 1);
70: cln_debug_pub.Add('COLLABORATION_DETAIL_ID -- ' || p_collab_detail_id, 1);
71: cln_debug_pub.Add('DETAIL_MESSAGE -- ' || l_error_description, 1);
72: cln_debug_pub.Add('p_event_name -- ' || l_event_name, 1);
73: END IF;
74:
67: IF (g_debug_Level <= 1) THEN
68: cln_debug_pub.Add('Raising Add Message Event ', 1);
69: cln_debug_pub.Add('p_event_key -- ' || l_event_key, 1);
70: cln_debug_pub.Add('COLLABORATION_DETAIL_ID -- ' || p_collab_detail_id, 1);
71: cln_debug_pub.Add('DETAIL_MESSAGE -- ' || l_error_description, 1);
72: cln_debug_pub.Add('p_event_name -- ' || l_event_name, 1);
73: END IF;
74:
75: -- set event parameters for CLN Add Message Event
68: cln_debug_pub.Add('Raising Add Message Event ', 1);
69: cln_debug_pub.Add('p_event_key -- ' || l_event_key, 1);
70: cln_debug_pub.Add('COLLABORATION_DETAIL_ID -- ' || p_collab_detail_id, 1);
71: cln_debug_pub.Add('DETAIL_MESSAGE -- ' || l_error_description, 1);
72: cln_debug_pub.Add('p_event_name -- ' || l_event_name, 1);
73: END IF;
74:
75: -- set event parameters for CLN Add Message Event
76: wf_event.AddParameterToList(
96: x_msg_data := l_event_name || ' raised';
97:
98:
99: IF (g_debug_Level <= 2) THEN
100: cln_debug_pub.Add('Exiting m4u_resp_process.add_error_to_cln_hist - normal',2);
101: cln_debug_pub.Add('=======================================================',2);
102: END IF;
103:
104: EXCEPTION
97:
98:
99: IF (g_debug_Level <= 2) THEN
100: cln_debug_pub.Add('Exiting m4u_resp_process.add_error_to_cln_hist - normal',2);
101: cln_debug_pub.Add('=======================================================',2);
102: END IF;
103:
104: EXCEPTION
105: WHEN OTHERS THEN
110: x_return_status := 'F';
111: x_msg_data := ' - Unexpected error in m4u_resp_process.add_error_to_cln_hist - ' || l_error_code || ':' || l_error_msg;
112:
113: IF (g_debug_Level <= 5) THEN
114: cln_debug_pub.Add(l_error_code || ':' || l_error_msg, 4);
115: END IF;
116:
117: IF (g_debug_Level <= 2) THEN
118: cln_debug_pub.Add('Exiting m4u_resp_process.add_error_to_cln_hist - exception',2);
114: cln_debug_pub.Add(l_error_code || ':' || l_error_msg, 4);
115: END IF;
116:
117: IF (g_debug_Level <= 2) THEN
118: cln_debug_pub.Add('Exiting m4u_resp_process.add_error_to_cln_hist - exception',2);
119: cln_debug_pub.Add('==========================================================',2);
120: END IF;
121:
122: END add_error_to_cln_hist;
115: END IF;
116:
117: IF (g_debug_Level <= 2) THEN
118: cln_debug_pub.Add('Exiting m4u_resp_process.add_error_to_cln_hist - exception',2);
119: cln_debug_pub.Add('==========================================================',2);
120: END IF;
121:
122: END add_error_to_cln_hist;
123:
178: l_event_params wf_parameter_list_t;
179: BEGIN
180: l_event_name := 'oracle.apps.cln.np.processnotification';
181: IF (g_debug_Level <= 2) THEN
182: cln_debug_pub.Add('-- Entering m4u_resp_process.process_cic_notification -- ', 2);
183: END IF;
184:
185: IF (g_debug_Level <= 1) THEN
186: cln_debug_pub.Add('-- with paramters -- ', 1);
182: cln_debug_pub.Add('-- Entering m4u_resp_process.process_cic_notification -- ', 2);
183: END IF;
184:
185: IF (g_debug_Level <= 1) THEN
186: cln_debug_pub.Add('-- with paramters -- ', 1);
187: cln_debug_pub.Add('p_gtin -- ' || p_gtin, 1);
188: cln_debug_pub.Add('p_supp_gln -- ' || p_supp_gln, 1);
189: cln_debug_pub.Add('p_target_market -- ' || p_target_market, 1);
190: cln_debug_pub.Add('p_retialer_gln -- ' || p_retailer_gln, 1);
183: END IF;
184:
185: IF (g_debug_Level <= 1) THEN
186: cln_debug_pub.Add('-- with paramters -- ', 1);
187: cln_debug_pub.Add('p_gtin -- ' || p_gtin, 1);
188: cln_debug_pub.Add('p_supp_gln -- ' || p_supp_gln, 1);
189: cln_debug_pub.Add('p_target_market -- ' || p_target_market, 1);
190: cln_debug_pub.Add('p_retialer_gln -- ' || p_retailer_gln, 1);
191: cln_debug_pub.Add('p_cic_unique_id -- ' || p_cic_unique_id, 1);
184:
185: IF (g_debug_Level <= 1) THEN
186: cln_debug_pub.Add('-- with paramters -- ', 1);
187: cln_debug_pub.Add('p_gtin -- ' || p_gtin, 1);
188: cln_debug_pub.Add('p_supp_gln -- ' || p_supp_gln, 1);
189: cln_debug_pub.Add('p_target_market -- ' || p_target_market, 1);
190: cln_debug_pub.Add('p_retialer_gln -- ' || p_retailer_gln, 1);
191: cln_debug_pub.Add('p_cic_unique_id -- ' || p_cic_unique_id, 1);
192: cln_debug_pub.Add('p_cic_state -- ' || p_cic_state, 1);
185: IF (g_debug_Level <= 1) THEN
186: cln_debug_pub.Add('-- with paramters -- ', 1);
187: cln_debug_pub.Add('p_gtin -- ' || p_gtin, 1);
188: cln_debug_pub.Add('p_supp_gln -- ' || p_supp_gln, 1);
189: cln_debug_pub.Add('p_target_market -- ' || p_target_market, 1);
190: cln_debug_pub.Add('p_retialer_gln -- ' || p_retailer_gln, 1);
191: cln_debug_pub.Add('p_cic_unique_id -- ' || p_cic_unique_id, 1);
192: cln_debug_pub.Add('p_cic_state -- ' || p_cic_state, 1);
193: cln_debug_pub.Add('p_cin_unique_id -- ' || p_cin_unique_id, 1);
186: cln_debug_pub.Add('-- with paramters -- ', 1);
187: cln_debug_pub.Add('p_gtin -- ' || p_gtin, 1);
188: cln_debug_pub.Add('p_supp_gln -- ' || p_supp_gln, 1);
189: cln_debug_pub.Add('p_target_market -- ' || p_target_market, 1);
190: cln_debug_pub.Add('p_retialer_gln -- ' || p_retailer_gln, 1);
191: cln_debug_pub.Add('p_cic_unique_id -- ' || p_cic_unique_id, 1);
192: cln_debug_pub.Add('p_cic_state -- ' || p_cic_state, 1);
193: cln_debug_pub.Add('p_cin_unique_id -- ' || p_cin_unique_id, 1);
194: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
187: cln_debug_pub.Add('p_gtin -- ' || p_gtin, 1);
188: cln_debug_pub.Add('p_supp_gln -- ' || p_supp_gln, 1);
189: cln_debug_pub.Add('p_target_market -- ' || p_target_market, 1);
190: cln_debug_pub.Add('p_retialer_gln -- ' || p_retailer_gln, 1);
191: cln_debug_pub.Add('p_cic_unique_id -- ' || p_cic_unique_id, 1);
192: cln_debug_pub.Add('p_cic_state -- ' || p_cic_state, 1);
193: cln_debug_pub.Add('p_cin_unique_id -- ' || p_cin_unique_id, 1);
194: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
195: cln_debug_pub.Add('p_xmlg_internal_control_no -- ' || p_xmlg_internal_control_no, 1);
188: cln_debug_pub.Add('p_supp_gln -- ' || p_supp_gln, 1);
189: cln_debug_pub.Add('p_target_market -- ' || p_target_market, 1);
190: cln_debug_pub.Add('p_retialer_gln -- ' || p_retailer_gln, 1);
191: cln_debug_pub.Add('p_cic_unique_id -- ' || p_cic_unique_id, 1);
192: cln_debug_pub.Add('p_cic_state -- ' || p_cic_state, 1);
193: cln_debug_pub.Add('p_cin_unique_id -- ' || p_cin_unique_id, 1);
194: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
195: cln_debug_pub.Add('p_xmlg_internal_control_no -- ' || p_xmlg_internal_control_no, 1);
196: END IF;
189: cln_debug_pub.Add('p_target_market -- ' || p_target_market, 1);
190: cln_debug_pub.Add('p_retialer_gln -- ' || p_retailer_gln, 1);
191: cln_debug_pub.Add('p_cic_unique_id -- ' || p_cic_unique_id, 1);
192: cln_debug_pub.Add('p_cic_state -- ' || p_cic_state, 1);
193: cln_debug_pub.Add('p_cin_unique_id -- ' || p_cin_unique_id, 1);
194: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
195: cln_debug_pub.Add('p_xmlg_internal_control_no -- ' || p_xmlg_internal_control_no, 1);
196: END IF;
197:
190: cln_debug_pub.Add('p_retialer_gln -- ' || p_retailer_gln, 1);
191: cln_debug_pub.Add('p_cic_unique_id -- ' || p_cic_unique_id, 1);
192: cln_debug_pub.Add('p_cic_state -- ' || p_cic_state, 1);
193: cln_debug_pub.Add('p_cin_unique_id -- ' || p_cin_unique_id, 1);
194: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
195: cln_debug_pub.Add('p_xmlg_internal_control_no -- ' || p_xmlg_internal_control_no, 1);
196: END IF;
197:
198:
191: cln_debug_pub.Add('p_cic_unique_id -- ' || p_cic_unique_id, 1);
192: cln_debug_pub.Add('p_cic_state -- ' || p_cic_state, 1);
193: cln_debug_pub.Add('p_cin_unique_id -- ' || p_cin_unique_id, 1);
194: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
195: cln_debug_pub.Add('p_xmlg_internal_control_no -- ' || p_xmlg_internal_control_no, 1);
196: END IF;
197:
198:
199:
224:
225:
226: -- Make API call to update APC event disposition
227: IF (g_debug_Level <= 1) THEN
228: cln_debug_pub.Add('-- Calling API EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION --',1);
229: cln_debug_pub.Add(' disposition_code -- '|| l_apc_disposition,1);
230: cln_debug_pub.Add(' disposition_date -- '|| sysdate,1);
231: cln_debug_pub.Add(' p_cln_id -- '|| p_cin_unique_id,1);
232: END IF;
225:
226: -- Make API call to update APC event disposition
227: IF (g_debug_Level <= 1) THEN
228: cln_debug_pub.Add('-- Calling API EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION --',1);
229: cln_debug_pub.Add(' disposition_code -- '|| l_apc_disposition,1);
230: cln_debug_pub.Add(' disposition_date -- '|| sysdate,1);
231: cln_debug_pub.Add(' p_cln_id -- '|| p_cin_unique_id,1);
232: END IF;
233:
226: -- Make API call to update APC event disposition
227: IF (g_debug_Level <= 1) THEN
228: cln_debug_pub.Add('-- Calling API EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION --',1);
229: cln_debug_pub.Add(' disposition_code -- '|| l_apc_disposition,1);
230: cln_debug_pub.Add(' disposition_date -- '|| sysdate,1);
231: cln_debug_pub.Add(' p_cln_id -- '|| p_cin_unique_id,1);
232: END IF;
233:
234:
227: IF (g_debug_Level <= 1) THEN
228: cln_debug_pub.Add('-- Calling API EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION --',1);
229: cln_debug_pub.Add(' disposition_code -- '|| l_apc_disposition,1);
230: cln_debug_pub.Add(' disposition_date -- '|| sysdate,1);
231: cln_debug_pub.Add(' p_cln_id -- '|| p_cin_unique_id,1);
232: END IF;
233:
234:
235: EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION
245: x_msg_data => l_msg_data
246: );
247:
248: IF (g_debug_Level <= 1) THEN
249: cln_debug_pub.Add('-- UPDATE_EVENT_DISPOSITION returned --',1);
250: cln_debug_pub.Add(' x_return_status -- '|| l_return_status,1);
251: cln_debug_pub.Add(' x_msg_count -- '|| l_msg_count,1);
252: cln_debug_pub.Add(' x_msg_data -- '|| l_msg_data,1);
253: END IF;
246: );
247:
248: IF (g_debug_Level <= 1) THEN
249: cln_debug_pub.Add('-- UPDATE_EVENT_DISPOSITION returned --',1);
250: cln_debug_pub.Add(' x_return_status -- '|| l_return_status,1);
251: cln_debug_pub.Add(' x_msg_count -- '|| l_msg_count,1);
252: cln_debug_pub.Add(' x_msg_data -- '|| l_msg_data,1);
253: END IF;
254:
247:
248: IF (g_debug_Level <= 1) THEN
249: cln_debug_pub.Add('-- UPDATE_EVENT_DISPOSITION returned --',1);
250: cln_debug_pub.Add(' x_return_status -- '|| l_return_status,1);
251: cln_debug_pub.Add(' x_msg_count -- '|| l_msg_count,1);
252: cln_debug_pub.Add(' x_msg_data -- '|| l_msg_data,1);
253: END IF;
254:
255: -- Direct call needed, since CLN Detail Id, is required for further processing
248: IF (g_debug_Level <= 1) THEN
249: cln_debug_pub.Add('-- UPDATE_EVENT_DISPOSITION returned --',1);
250: cln_debug_pub.Add(' x_return_status -- '|| l_return_status,1);
251: cln_debug_pub.Add(' x_msg_count -- '|| l_msg_count,1);
252: cln_debug_pub.Add(' x_msg_data -- '|| l_msg_data,1);
253: END IF;
254:
255: -- Direct call needed, since CLN Detail Id, is required for further processing
256: -- of map., CLN will defualt the rest of the parameters.
254:
255: -- Direct call needed, since CLN Detail Id, is required for further processing
256: -- of map., CLN will defualt the rest of the parameters.
257: IF (g_debug_Level <= 1) THEN
258: cln_debug_pub.add('updating collaboration history for cln_id - ' || p_cin_unique_id,1);
259: END IF;
260:
261: cln_ch_collaboration_pkg.update_collaboration(
262: x_return_status => x_return_status,
289: p_rosettanet_check_required => false,
290: x_dtl_coll_id => x_collab_detail_id );
291:
292: IF (g_debug_Level <= 1) THEN
293: cln_debug_pub.add('collaboration history updated for cln_id - ' || p_cin_unique_id,1);
294: cln_debug_pub.add('Collab_detail_id - ' || x_collab_detail_id,1);
295: cln_debug_pub.add('x_return_status - ' || x_return_status,1);
296: cln_debug_pub.add('x_msg_data - ' || x_msg_data,1);
297: END IF;
290: x_dtl_coll_id => x_collab_detail_id );
291:
292: IF (g_debug_Level <= 1) THEN
293: cln_debug_pub.add('collaboration history updated for cln_id - ' || p_cin_unique_id,1);
294: cln_debug_pub.add('Collab_detail_id - ' || x_collab_detail_id,1);
295: cln_debug_pub.add('x_return_status - ' || x_return_status,1);
296: cln_debug_pub.add('x_msg_data - ' || x_msg_data,1);
297: END IF;
298: x_msg_data := x_msg_data || ' ; EGO API update - ' || l_msg_data ;
291:
292: IF (g_debug_Level <= 1) THEN
293: cln_debug_pub.add('collaboration history updated for cln_id - ' || p_cin_unique_id,1);
294: cln_debug_pub.add('Collab_detail_id - ' || x_collab_detail_id,1);
295: cln_debug_pub.add('x_return_status - ' || x_return_status,1);
296: cln_debug_pub.add('x_msg_data - ' || x_msg_data,1);
297: END IF;
298: x_msg_data := x_msg_data || ' ; EGO API update - ' || l_msg_data ;
299:
292: IF (g_debug_Level <= 1) THEN
293: cln_debug_pub.add('collaboration history updated for cln_id - ' || p_cin_unique_id,1);
294: cln_debug_pub.add('Collab_detail_id - ' || x_collab_detail_id,1);
295: cln_debug_pub.add('x_return_status - ' || x_return_status,1);
296: cln_debug_pub.add('x_msg_data - ' || x_msg_data,1);
297: END IF;
298: x_msg_data := x_msg_data || ' ; EGO API update - ' || l_msg_data ;
299:
300: IF x_return_status <> 'S' THEN
338:
339: l_event_key := 'RESP_CIC_' || p_cic_unique_id;
340:
341: IF (g_debug_Level <= 2) THEN
342: cln_debug_pub.add('--- raising Business Event ---',1);
343: cln_debug_pub.add('Event-name - ' || l_event_name,1);
344: cln_debug_pub.add('event-value -' || l_event_key ,1);
345: END IF;
346:
339: l_event_key := 'RESP_CIC_' || p_cic_unique_id;
340:
341: IF (g_debug_Level <= 2) THEN
342: cln_debug_pub.add('--- raising Business Event ---',1);
343: cln_debug_pub.add('Event-name - ' || l_event_name,1);
344: cln_debug_pub.add('event-value -' || l_event_key ,1);
345: END IF;
346:
347: -- raise event to trigger CLN Notifcations
340:
341: IF (g_debug_Level <= 2) THEN
342: cln_debug_pub.add('--- raising Business Event ---',1);
343: cln_debug_pub.add('Event-name - ' || l_event_name,1);
344: cln_debug_pub.add('event-value -' || l_event_key ,1);
345: END IF;
346:
347: -- raise event to trigger CLN Notifcations
348: wf_event.raise(
351: p_parameters => l_event_params
352: );
353:
354: IF (g_debug_Level <= 2) THEN
355: cln_debug_pub.add('Exiting m4u_resp_process.process_cic_notification - normal',2);
356: cln_debug_pub.add('==========================================================',2);
357: END IF;
358: EXCEPTION
359: WHEN OTHERS THEN
352: );
353:
354: IF (g_debug_Level <= 2) THEN
355: cln_debug_pub.add('Exiting m4u_resp_process.process_cic_notification - normal',2);
356: cln_debug_pub.add('==========================================================',2);
357: END IF;
358: EXCEPTION
359: WHEN OTHERS THEN
360: -- log exception and exit.
364: x_msg_data := ' - Unexpected error occred while processing CIC message from Query Worklist response - ' || l_error_code || ':' || l_error_msg;
365:
366:
367: IF (g_debug_Level <= 5) THEN
368: cln_debug_pub.add(l_error_code || ':' || l_error_msg, 5);
369: END IF;
370:
371: IF (g_debug_Level <= 2) THEN
372: cln_debug_pub.add('Exiting m4u_resp_process.process_cic_notification - exception',2);
368: cln_debug_pub.add(l_error_code || ':' || l_error_msg, 5);
369: END IF;
370:
371: IF (g_debug_Level <= 2) THEN
372: cln_debug_pub.add('Exiting m4u_resp_process.process_cic_notification - exception',2);
373: cln_debug_pub.add('=============================================================',2);
374: END IF;
375:
376: END process_cic_notification;
369: END IF;
370:
371: IF (g_debug_Level <= 2) THEN
372: cln_debug_pub.add('Exiting m4u_resp_process.process_cic_notification - exception',2);
373: cln_debug_pub.add('=============================================================',2);
374: END IF;
375:
376: END process_cic_notification;
377:
403: --l_add_cic_info EGO_UCCNET_EVENTS_PVT.ADD_CIC_INFO_TYPE;
404:
405: BEGIN
406: IF (g_debug_Level <= 2) THEN
407: cln_debug_pub.Add('-- Entering m4u_resp_process.process_cic_additional_info -- ', 2);
408: END IF;
409:
410: IF (g_debug_Level <= 1) THEN
411: cln_debug_pub.Add('-- with paramters -- ', 1);
407: cln_debug_pub.Add('-- Entering m4u_resp_process.process_cic_additional_info -- ', 2);
408: END IF;
409:
410: IF (g_debug_Level <= 1) THEN
411: cln_debug_pub.Add('-- with paramters -- ', 1);
412: cln_debug_pub.Add('p_cln_id -- ' || p_cln_id, 1);
413: cln_debug_pub.Add('p_cic_code -- ' || p_cic_code, 1);
414: cln_debug_pub.Add('p_cic_description -- ' || p_cic_description, 1);
415: cln_debug_pub.Add('p_cic_action_needed -- ' || p_cic_action_needed, 1);
408: END IF;
409:
410: IF (g_debug_Level <= 1) THEN
411: cln_debug_pub.Add('-- with paramters -- ', 1);
412: cln_debug_pub.Add('p_cln_id -- ' || p_cln_id, 1);
413: cln_debug_pub.Add('p_cic_code -- ' || p_cic_code, 1);
414: cln_debug_pub.Add('p_cic_description -- ' || p_cic_description, 1);
415: cln_debug_pub.Add('p_cic_action_needed -- ' || p_cic_action_needed, 1);
416: cln_debug_pub.Add('p_collab_detail_id -- ' || p_collab_detail_id, 1);
409:
410: IF (g_debug_Level <= 1) THEN
411: cln_debug_pub.Add('-- with paramters -- ', 1);
412: cln_debug_pub.Add('p_cln_id -- ' || p_cln_id, 1);
413: cln_debug_pub.Add('p_cic_code -- ' || p_cic_code, 1);
414: cln_debug_pub.Add('p_cic_description -- ' || p_cic_description, 1);
415: cln_debug_pub.Add('p_cic_action_needed -- ' || p_cic_action_needed, 1);
416: cln_debug_pub.Add('p_collab_detail_id -- ' || p_collab_detail_id, 1);
417: END IF;
410: IF (g_debug_Level <= 1) THEN
411: cln_debug_pub.Add('-- with paramters -- ', 1);
412: cln_debug_pub.Add('p_cln_id -- ' || p_cln_id, 1);
413: cln_debug_pub.Add('p_cic_code -- ' || p_cic_code, 1);
414: cln_debug_pub.Add('p_cic_description -- ' || p_cic_description, 1);
415: cln_debug_pub.Add('p_cic_action_needed -- ' || p_cic_action_needed, 1);
416: cln_debug_pub.Add('p_collab_detail_id -- ' || p_collab_detail_id, 1);
417: END IF;
418:
411: cln_debug_pub.Add('-- with paramters -- ', 1);
412: cln_debug_pub.Add('p_cln_id -- ' || p_cln_id, 1);
413: cln_debug_pub.Add('p_cic_code -- ' || p_cic_code, 1);
414: cln_debug_pub.Add('p_cic_description -- ' || p_cic_description, 1);
415: cln_debug_pub.Add('p_cic_action_needed -- ' || p_cic_action_needed, 1);
416: cln_debug_pub.Add('p_collab_detail_id -- ' || p_collab_detail_id, 1);
417: END IF;
418:
419: -- adding the values for the ADD_CIC_INFO_TBL_TYPE type
412: cln_debug_pub.Add('p_cln_id -- ' || p_cln_id, 1);
413: cln_debug_pub.Add('p_cic_code -- ' || p_cic_code, 1);
414: cln_debug_pub.Add('p_cic_description -- ' || p_cic_description, 1);
415: cln_debug_pub.Add('p_cic_action_needed -- ' || p_cic_action_needed, 1);
416: cln_debug_pub.Add('p_collab_detail_id -- ' || p_collab_detail_id, 1);
417: END IF;
418:
419: -- adding the values for the ADD_CIC_INFO_TBL_TYPE type
420: IF (g_debug_Level <= 1) THEN
417: END IF;
418:
419: -- adding the values for the ADD_CIC_INFO_TBL_TYPE type
420: IF (g_debug_Level <= 1) THEN
421: cln_debug_pub.Add('Adding the values for the ADD_CIC_INFO_TBL_TYPE type', 1);
422: END IF;
423:
424:
425: IF (g_debug_Level <= 1) THEN
422: END IF;
423:
424:
425: IF (g_debug_Level <= 1) THEN
426: cln_debug_pub.Add('-- Calling EGO_UCCNET_EVENTS_PUB.ADD_ADDITIONAL_CIC_INFO-- ', 1);
427: END IF;
428:
429: ego_uccnet_events_pub.ADD_ADDITIONAL_CIC_INFO (
430: p_api_version => 1.0
439: ,x_msg_data => l_msg_data
440: );
441:
442: IF (g_debug_Level <= 1) THEN
443: cln_debug_pub.Add('-- ADD_ADDITIONAL_CIC_INFO returned --',1);
444: cln_debug_pub.Add(' x_return_status -- '|| l_return_status,1);
445: cln_debug_pub.Add(' x_msg_count -- '|| l_msg_count,1);
446: cln_debug_pub.Add(' x_msg_data -- '|| l_msg_data,1);
447: END IF;
440: );
441:
442: IF (g_debug_Level <= 1) THEN
443: cln_debug_pub.Add('-- ADD_ADDITIONAL_CIC_INFO returned --',1);
444: cln_debug_pub.Add(' x_return_status -- '|| l_return_status,1);
445: cln_debug_pub.Add(' x_msg_count -- '|| l_msg_count,1);
446: cln_debug_pub.Add(' x_msg_data -- '|| l_msg_data,1);
447: END IF;
448:
441:
442: IF (g_debug_Level <= 1) THEN
443: cln_debug_pub.Add('-- ADD_ADDITIONAL_CIC_INFO returned --',1);
444: cln_debug_pub.Add(' x_return_status -- '|| l_return_status,1);
445: cln_debug_pub.Add(' x_msg_count -- '|| l_msg_count,1);
446: cln_debug_pub.Add(' x_msg_data -- '|| l_msg_data,1);
447: END IF;
448:
449: -- defaulting the message for the add collaboration msg API
442: IF (g_debug_Level <= 1) THEN
443: cln_debug_pub.Add('-- ADD_ADDITIONAL_CIC_INFO returned --',1);
444: cln_debug_pub.Add(' x_return_status -- '|| l_return_status,1);
445: cln_debug_pub.Add(' x_msg_count -- '|| l_msg_count,1);
446: cln_debug_pub.Add(' x_msg_data -- '|| l_msg_data,1);
447: END IF;
448:
449: -- defaulting the message for the add collaboration msg API
450: IF (g_debug_Level <= 1) THEN
447: END IF;
448:
449: -- defaulting the message for the add collaboration msg API
450: IF (g_debug_Level <= 1) THEN
451: cln_debug_pub.Add('-- Defaulting the value for add collaboration msg ', 1);
452: END IF;
453:
454: l_coll_dtl_msg := 'Desc - '||p_cic_description||
455: ' '||
455: ' '||
456: 'Action - '||p_cic_action_needed;
457:
458: IF (g_debug_Level <= 1) THEN
459: cln_debug_pub.Add('-- l_coll_dtl_msg '||l_coll_dtl_msg, 1);
460: END IF;
461:
462:
463: -- Direct call needed, since CLN Detail Id, is required for further processing
462:
463: -- Direct call needed, since CLN Detail Id, is required for further processing
464: -- of map., CLN will defualt the rest of the parameters.
465: IF (g_debug_Level <= 1) THEN
466: cln_debug_pub.add('updating collaboration history messages for cln_dtl_id - ' || p_collab_detail_id,1);
467: END IF;
468:
469:
470: cln_ch_collaboration_pkg.ADD_COLLABORATION_MESSAGES(
474: p_ref1 => p_cic_code,
475: p_dtl_msg => l_coll_dtl_msg);
476:
477: IF (g_debug_Level <= 1) THEN
478: cln_debug_pub.add('collaboration history messages updated for cln_dtl_id - ' || p_collab_detail_id,1);
479: cln_debug_pub.add('x_return_status - ' || x_return_status,1);
480: cln_debug_pub.add('x_msg_data - ' || x_msg_data,1);
481: END IF;
482:
475: p_dtl_msg => l_coll_dtl_msg);
476:
477: IF (g_debug_Level <= 1) THEN
478: cln_debug_pub.add('collaboration history messages updated for cln_dtl_id - ' || p_collab_detail_id,1);
479: cln_debug_pub.add('x_return_status - ' || x_return_status,1);
480: cln_debug_pub.add('x_msg_data - ' || x_msg_data,1);
481: END IF;
482:
483: x_msg_data := x_msg_data || ' Collaboration Add Messages update - ' || l_msg_data ;
476:
477: IF (g_debug_Level <= 1) THEN
478: cln_debug_pub.add('collaboration history messages updated for cln_dtl_id - ' || p_collab_detail_id,1);
479: cln_debug_pub.add('x_return_status - ' || x_return_status,1);
480: cln_debug_pub.add('x_msg_data - ' || x_msg_data,1);
481: END IF;
482:
483: x_msg_data := x_msg_data || ' Collaboration Add Messages update - ' || l_msg_data ;
484:
486: x_msg_data := 'Failure occured while processing CIC message in Query Worklist response - ' || x_msg_data;
487: END IF;
488:
489: IF (g_debug_Level <= 2) THEN
490: cln_debug_pub.add('Exiting m4u_resp_process.process_cic_additional_info - normal',2);
491: cln_debug_pub.add('==========================================================',2);
492: END IF;
493: EXCEPTION
494: WHEN OTHERS THEN
487: END IF;
488:
489: IF (g_debug_Level <= 2) THEN
490: cln_debug_pub.add('Exiting m4u_resp_process.process_cic_additional_info - normal',2);
491: cln_debug_pub.add('==========================================================',2);
492: END IF;
493: EXCEPTION
494: WHEN OTHERS THEN
495: -- log exception and exit.
499: x_msg_data := ' - Unexpected error occred while processing CIC message from Query Worklist response - ' || l_error_code || ':' || l_error_msg;
500:
501:
502: IF (g_debug_Level <= 5) THEN
503: cln_debug_pub.add(l_error_code || ':' || l_error_msg, 5);
504: END IF;
505:
506: IF (g_debug_Level <= 2) THEN
507: cln_debug_pub.add('Exiting m4u_resp_process.process_cic_additional_info - exception',2);
503: cln_debug_pub.add(l_error_code || ':' || l_error_msg, 5);
504: END IF;
505:
506: IF (g_debug_Level <= 2) THEN
507: cln_debug_pub.add('Exiting m4u_resp_process.process_cic_additional_info - exception',2);
508: cln_debug_pub.add('=============================================================',2);
509: END IF;
510:
511: END process_cic_additional_info;
504: END IF;
505:
506: IF (g_debug_Level <= 2) THEN
507: cln_debug_pub.add('Exiting m4u_resp_process.process_cic_additional_info - exception',2);
508: cln_debug_pub.add('=============================================================',2);
509: END IF;
510:
511: END process_cic_additional_info;
512:
552: BEGIN
553:
554:
555: IF (g_debug_Level <= 2) THEN
556: cln_debug_pub.Add('==================================================', 2);
557: cln_debug_pub.Add('Entering - m4u_resp_process.process_cic_trade_item', 2);
558: END IF;
559:
560:
553:
554:
555: IF (g_debug_Level <= 2) THEN
556: cln_debug_pub.Add('==================================================', 2);
557: cln_debug_pub.Add('Entering - m4u_resp_process.process_cic_trade_item', 2);
558: END IF;
559:
560:
561:
559:
560:
561:
562: IF (g_debug_Level <= 1) THEN
563: cln_debug_pub.Add('-- Received parameters -- ', 1);
564: cln_debug_pub.Add('p_gtin --' || p_gtin, 1);
565: cln_debug_pub.Add('p_supp_gln --' || p_supp_gln, 1);
566: cln_debug_pub.Add('p_target_market --' || p_target_market, 1);
567: cln_debug_pub.Add('p_retailer_gln --' || p_retailer_gln, 1);
560:
561:
562: IF (g_debug_Level <= 1) THEN
563: cln_debug_pub.Add('-- Received parameters -- ', 1);
564: cln_debug_pub.Add('p_gtin --' || p_gtin, 1);
565: cln_debug_pub.Add('p_supp_gln --' || p_supp_gln, 1);
566: cln_debug_pub.Add('p_target_market --' || p_target_market, 1);
567: cln_debug_pub.Add('p_retailer_gln --' || p_retailer_gln, 1);
568: cln_debug_pub.Add('p_cic_unique_id --' || p_cic_unique_id, 1);
561:
562: IF (g_debug_Level <= 1) THEN
563: cln_debug_pub.Add('-- Received parameters -- ', 1);
564: cln_debug_pub.Add('p_gtin --' || p_gtin, 1);
565: cln_debug_pub.Add('p_supp_gln --' || p_supp_gln, 1);
566: cln_debug_pub.Add('p_target_market --' || p_target_market, 1);
567: cln_debug_pub.Add('p_retailer_gln --' || p_retailer_gln, 1);
568: cln_debug_pub.Add('p_cic_unique_id --' || p_cic_unique_id, 1);
569: cln_debug_pub.Add('p_cic_state --' || p_cic_state, 1);
562: IF (g_debug_Level <= 1) THEN
563: cln_debug_pub.Add('-- Received parameters -- ', 1);
564: cln_debug_pub.Add('p_gtin --' || p_gtin, 1);
565: cln_debug_pub.Add('p_supp_gln --' || p_supp_gln, 1);
566: cln_debug_pub.Add('p_target_market --' || p_target_market, 1);
567: cln_debug_pub.Add('p_retailer_gln --' || p_retailer_gln, 1);
568: cln_debug_pub.Add('p_cic_unique_id --' || p_cic_unique_id, 1);
569: cln_debug_pub.Add('p_cic_state --' || p_cic_state, 1);
570: cln_debug_pub.Add('p_cin_unique_id --' || p_cin_unique_id, 1);
563: cln_debug_pub.Add('-- Received parameters -- ', 1);
564: cln_debug_pub.Add('p_gtin --' || p_gtin, 1);
565: cln_debug_pub.Add('p_supp_gln --' || p_supp_gln, 1);
566: cln_debug_pub.Add('p_target_market --' || p_target_market, 1);
567: cln_debug_pub.Add('p_retailer_gln --' || p_retailer_gln, 1);
568: cln_debug_pub.Add('p_cic_unique_id --' || p_cic_unique_id, 1);
569: cln_debug_pub.Add('p_cic_state --' || p_cic_state, 1);
570: cln_debug_pub.Add('p_cin_unique_id --' || p_cin_unique_id, 1);
571: cln_debug_pub.Add('p_ucc_doc_unique_id --' || p_ucc_doc_unique_id, 1);
564: cln_debug_pub.Add('p_gtin --' || p_gtin, 1);
565: cln_debug_pub.Add('p_supp_gln --' || p_supp_gln, 1);
566: cln_debug_pub.Add('p_target_market --' || p_target_market, 1);
567: cln_debug_pub.Add('p_retailer_gln --' || p_retailer_gln, 1);
568: cln_debug_pub.Add('p_cic_unique_id --' || p_cic_unique_id, 1);
569: cln_debug_pub.Add('p_cic_state --' || p_cic_state, 1);
570: cln_debug_pub.Add('p_cin_unique_id --' || p_cin_unique_id, 1);
571: cln_debug_pub.Add('p_ucc_doc_unique_id --' || p_ucc_doc_unique_id, 1);
572: cln_debug_pub.Add('p_xmlg_internal_control_no --' || p_xmlg_internal_control_no, 1);
565: cln_debug_pub.Add('p_supp_gln --' || p_supp_gln, 1);
566: cln_debug_pub.Add('p_target_market --' || p_target_market, 1);
567: cln_debug_pub.Add('p_retailer_gln --' || p_retailer_gln, 1);
568: cln_debug_pub.Add('p_cic_unique_id --' || p_cic_unique_id, 1);
569: cln_debug_pub.Add('p_cic_state --' || p_cic_state, 1);
570: cln_debug_pub.Add('p_cin_unique_id --' || p_cin_unique_id, 1);
571: cln_debug_pub.Add('p_ucc_doc_unique_id --' || p_ucc_doc_unique_id, 1);
572: cln_debug_pub.Add('p_xmlg_internal_control_no --' || p_xmlg_internal_control_no, 1);
573: END IF;
566: cln_debug_pub.Add('p_target_market --' || p_target_market, 1);
567: cln_debug_pub.Add('p_retailer_gln --' || p_retailer_gln, 1);
568: cln_debug_pub.Add('p_cic_unique_id --' || p_cic_unique_id, 1);
569: cln_debug_pub.Add('p_cic_state --' || p_cic_state, 1);
570: cln_debug_pub.Add('p_cin_unique_id --' || p_cin_unique_id, 1);
571: cln_debug_pub.Add('p_ucc_doc_unique_id --' || p_ucc_doc_unique_id, 1);
572: cln_debug_pub.Add('p_xmlg_internal_control_no --' || p_xmlg_internal_control_no, 1);
573: END IF;
574:
567: cln_debug_pub.Add('p_retailer_gln --' || p_retailer_gln, 1);
568: cln_debug_pub.Add('p_cic_unique_id --' || p_cic_unique_id, 1);
569: cln_debug_pub.Add('p_cic_state --' || p_cic_state, 1);
570: cln_debug_pub.Add('p_cin_unique_id --' || p_cin_unique_id, 1);
571: cln_debug_pub.Add('p_ucc_doc_unique_id --' || p_ucc_doc_unique_id, 1);
572: cln_debug_pub.Add('p_xmlg_internal_control_no --' || p_xmlg_internal_control_no, 1);
573: END IF;
574:
575: x_return_status := 'S';
568: cln_debug_pub.Add('p_cic_unique_id --' || p_cic_unique_id, 1);
569: cln_debug_pub.Add('p_cic_state --' || p_cic_state, 1);
570: cln_debug_pub.Add('p_cin_unique_id --' || p_cin_unique_id, 1);
571: cln_debug_pub.Add('p_ucc_doc_unique_id --' || p_ucc_doc_unique_id, 1);
572: cln_debug_pub.Add('p_xmlg_internal_control_no --' || p_xmlg_internal_control_no, 1);
573: END IF;
574:
575: x_return_status := 'S';
576: x_msg_data := 'CIC trade_item succesfully processed';
575: x_return_status := 'S';
576: x_msg_data := 'CIC trade_item succesfully processed';
577:
578: IF (g_debug_Level <= 2) THEN
579: cln_debug_pub.add('Exiting process_cic_trade_item - normal',2);
580: cln_debug_pub.add('=======================================',2);
581: END IF;
582:
583: EXCEPTION
576: x_msg_data := 'CIC trade_item succesfully processed';
577:
578: IF (g_debug_Level <= 2) THEN
579: cln_debug_pub.add('Exiting process_cic_trade_item - normal',2);
580: cln_debug_pub.add('=======================================',2);
581: END IF;
582:
583: EXCEPTION
584: WHEN OTHERS THEN
589: x_return_status := 'F';
590: x_msg_data := ' - Unexpected error while Processing CIC trade-item information, in Query Worklist Response - ' || l_error_code || ':' || l_error_msg;
591:
592: IF (g_debug_Level <= 5) THEN
593: cln_debug_pub.add(l_error_code || ':' || l_error_msg, 4);
594: END IF;
595:
596: IF (g_debug_Level <= 2) THEN
597: cln_debug_pub.add('Exiting m4u_resp_process.process_cic_trade_item - exception',2);
593: cln_debug_pub.add(l_error_code || ':' || l_error_msg, 4);
594: END IF;
595:
596: IF (g_debug_Level <= 2) THEN
597: cln_debug_pub.add('Exiting m4u_resp_process.process_cic_trade_item - exception',2);
598: cln_debug_pub.add('===========================================================',2);
599: END IF;
600:
601: END process_cic_trade_item;
594: END IF;
595:
596: IF (g_debug_Level <= 2) THEN
597: cln_debug_pub.add('Exiting m4u_resp_process.process_cic_trade_item - exception',2);
598: cln_debug_pub.add('===========================================================',2);
599: END IF;
600:
601: END process_cic_trade_item;
602:
650: l_apc_disposition VARCHAR2(50);
651: BEGIN
652:
653: IF (g_debug_Level <= 2) THEN
654: cln_debug_pub.Add('=====================================', 2);
655: cln_debug_pub.Add('Entering -- process_rcir_notification', 2);
656: END IF;
657:
658: IF (g_debug_Level <= 1) THEN
651: BEGIN
652:
653: IF (g_debug_Level <= 2) THEN
654: cln_debug_pub.Add('=====================================', 2);
655: cln_debug_pub.Add('Entering -- process_rcir_notification', 2);
656: END IF;
657:
658: IF (g_debug_Level <= 1) THEN
659: cln_debug_pub.Add('-- Received parameters -- ', 1);
655: cln_debug_pub.Add('Entering -- process_rcir_notification', 2);
656: END IF;
657:
658: IF (g_debug_Level <= 1) THEN
659: cln_debug_pub.Add('-- Received parameters -- ', 1);
660: cln_debug_pub.Add('p_gtin --' || p_gtin, 1);
661: cln_debug_pub.Add('p_supp_gln --' || p_supp_gln, 1);
662: cln_debug_pub.Add('p_target_market --' || p_target_market, 1);
663: cln_debug_pub.Add('p_rcir_batch_id --' || p_rcir_batch_id, 1);
656: END IF;
657:
658: IF (g_debug_Level <= 1) THEN
659: cln_debug_pub.Add('-- Received parameters -- ', 1);
660: cln_debug_pub.Add('p_gtin --' || p_gtin, 1);
661: cln_debug_pub.Add('p_supp_gln --' || p_supp_gln, 1);
662: cln_debug_pub.Add('p_target_market --' || p_target_market, 1);
663: cln_debug_pub.Add('p_rcir_batch_id --' || p_rcir_batch_id, 1);
664: cln_debug_pub.Add('p_rcir_command_unique_id --' || p_rcir_command_unique_id, 1);
657:
658: IF (g_debug_Level <= 1) THEN
659: cln_debug_pub.Add('-- Received parameters -- ', 1);
660: cln_debug_pub.Add('p_gtin --' || p_gtin, 1);
661: cln_debug_pub.Add('p_supp_gln --' || p_supp_gln, 1);
662: cln_debug_pub.Add('p_target_market --' || p_target_market, 1);
663: cln_debug_pub.Add('p_rcir_batch_id --' || p_rcir_batch_id, 1);
664: cln_debug_pub.Add('p_rcir_command_unique_id --' || p_rcir_command_unique_id, 1);
665: cln_debug_pub.Add('p_rcir_command_success --' || p_rcir_command_success, 1);
658: IF (g_debug_Level <= 1) THEN
659: cln_debug_pub.Add('-- Received parameters -- ', 1);
660: cln_debug_pub.Add('p_gtin --' || p_gtin, 1);
661: cln_debug_pub.Add('p_supp_gln --' || p_supp_gln, 1);
662: cln_debug_pub.Add('p_target_market --' || p_target_market, 1);
663: cln_debug_pub.Add('p_rcir_batch_id --' || p_rcir_batch_id, 1);
664: cln_debug_pub.Add('p_rcir_command_unique_id --' || p_rcir_command_unique_id, 1);
665: cln_debug_pub.Add('p_rcir_command_success --' || p_rcir_command_success, 1);
666: cln_debug_pub.Add('p_rcir_command_validation_key --' || p_rcir_command_validation_key, 1);
659: cln_debug_pub.Add('-- Received parameters -- ', 1);
660: cln_debug_pub.Add('p_gtin --' || p_gtin, 1);
661: cln_debug_pub.Add('p_supp_gln --' || p_supp_gln, 1);
662: cln_debug_pub.Add('p_target_market --' || p_target_market, 1);
663: cln_debug_pub.Add('p_rcir_batch_id --' || p_rcir_batch_id, 1);
664: cln_debug_pub.Add('p_rcir_command_unique_id --' || p_rcir_command_unique_id, 1);
665: cln_debug_pub.Add('p_rcir_command_success --' || p_rcir_command_success, 1);
666: cln_debug_pub.Add('p_rcir_command_validation_key --' || p_rcir_command_validation_key, 1);
667: cln_debug_pub.Add('p_ucc_doc_unique_id --' || p_ucc_doc_unique_id, 1);
660: cln_debug_pub.Add('p_gtin --' || p_gtin, 1);
661: cln_debug_pub.Add('p_supp_gln --' || p_supp_gln, 1);
662: cln_debug_pub.Add('p_target_market --' || p_target_market, 1);
663: cln_debug_pub.Add('p_rcir_batch_id --' || p_rcir_batch_id, 1);
664: cln_debug_pub.Add('p_rcir_command_unique_id --' || p_rcir_command_unique_id, 1);
665: cln_debug_pub.Add('p_rcir_command_success --' || p_rcir_command_success, 1);
666: cln_debug_pub.Add('p_rcir_command_validation_key --' || p_rcir_command_validation_key, 1);
667: cln_debug_pub.Add('p_ucc_doc_unique_id --' || p_ucc_doc_unique_id, 1);
668: cln_debug_pub.Add('p_xmlg_internal_control_no --' || p_xmlg_internal_control_no, 1);
661: cln_debug_pub.Add('p_supp_gln --' || p_supp_gln, 1);
662: cln_debug_pub.Add('p_target_market --' || p_target_market, 1);
663: cln_debug_pub.Add('p_rcir_batch_id --' || p_rcir_batch_id, 1);
664: cln_debug_pub.Add('p_rcir_command_unique_id --' || p_rcir_command_unique_id, 1);
665: cln_debug_pub.Add('p_rcir_command_success --' || p_rcir_command_success, 1);
666: cln_debug_pub.Add('p_rcir_command_validation_key --' || p_rcir_command_validation_key, 1);
667: cln_debug_pub.Add('p_ucc_doc_unique_id --' || p_ucc_doc_unique_id, 1);
668: cln_debug_pub.Add('p_xmlg_internal_control_no --' || p_xmlg_internal_control_no, 1);
669: END IF;
662: cln_debug_pub.Add('p_target_market --' || p_target_market, 1);
663: cln_debug_pub.Add('p_rcir_batch_id --' || p_rcir_batch_id, 1);
664: cln_debug_pub.Add('p_rcir_command_unique_id --' || p_rcir_command_unique_id, 1);
665: cln_debug_pub.Add('p_rcir_command_success --' || p_rcir_command_success, 1);
666: cln_debug_pub.Add('p_rcir_command_validation_key --' || p_rcir_command_validation_key, 1);
667: cln_debug_pub.Add('p_ucc_doc_unique_id --' || p_ucc_doc_unique_id, 1);
668: cln_debug_pub.Add('p_xmlg_internal_control_no --' || p_xmlg_internal_control_no, 1);
669: END IF;
670:
663: cln_debug_pub.Add('p_rcir_batch_id --' || p_rcir_batch_id, 1);
664: cln_debug_pub.Add('p_rcir_command_unique_id --' || p_rcir_command_unique_id, 1);
665: cln_debug_pub.Add('p_rcir_command_success --' || p_rcir_command_success, 1);
666: cln_debug_pub.Add('p_rcir_command_validation_key --' || p_rcir_command_validation_key, 1);
667: cln_debug_pub.Add('p_ucc_doc_unique_id --' || p_ucc_doc_unique_id, 1);
668: cln_debug_pub.Add('p_xmlg_internal_control_no --' || p_xmlg_internal_control_no, 1);
669: END IF;
670:
671:
664: cln_debug_pub.Add('p_rcir_command_unique_id --' || p_rcir_command_unique_id, 1);
665: cln_debug_pub.Add('p_rcir_command_success --' || p_rcir_command_success, 1);
666: cln_debug_pub.Add('p_rcir_command_validation_key --' || p_rcir_command_validation_key, 1);
667: cln_debug_pub.Add('p_ucc_doc_unique_id --' || p_ucc_doc_unique_id, 1);
668: cln_debug_pub.Add('p_xmlg_internal_control_no --' || p_xmlg_internal_control_no, 1);
669: END IF;
670:
671:
672: -- set CLN Disposition, CLN Coll Status, CLN Doc status, CLN Message Text
688:
689:
690:
691: IF (g_debug_Level <= 1) THEN
692: cln_debug_pub.Add('--- updating following columns of ego_uccnet_events --',1);
693: cln_debug_pub.Add(' disposition_code -- '|| l_apc_disposition,1);
694: cln_debug_pub.Add(' disposition_date -- '|| sysdate,1);
695: cln_debug_pub.Add(' last_updated_by -- '|| 1,1);
696: cln_debug_pub.Add(' last_updated_date -- '|| sysdate ,1);
689:
690:
691: IF (g_debug_Level <= 1) THEN
692: cln_debug_pub.Add('--- updating following columns of ego_uccnet_events --',1);
693: cln_debug_pub.Add(' disposition_code -- '|| l_apc_disposition,1);
694: cln_debug_pub.Add(' disposition_date -- '|| sysdate,1);
695: cln_debug_pub.Add(' last_updated_by -- '|| 1,1);
696: cln_debug_pub.Add(' last_updated_date -- '|| sysdate ,1);
697: cln_debug_pub.Add('-- where - CLN Id -- '|| p_rcir_command_unique_id,1);
690:
691: IF (g_debug_Level <= 1) THEN
692: cln_debug_pub.Add('--- updating following columns of ego_uccnet_events --',1);
693: cln_debug_pub.Add(' disposition_code -- '|| l_apc_disposition,1);
694: cln_debug_pub.Add(' disposition_date -- '|| sysdate,1);
695: cln_debug_pub.Add(' last_updated_by -- '|| 1,1);
696: cln_debug_pub.Add(' last_updated_date -- '|| sysdate ,1);
697: cln_debug_pub.Add('-- where - CLN Id -- '|| p_rcir_command_unique_id,1);
698: END IF;
691: IF (g_debug_Level <= 1) THEN
692: cln_debug_pub.Add('--- updating following columns of ego_uccnet_events --',1);
693: cln_debug_pub.Add(' disposition_code -- '|| l_apc_disposition,1);
694: cln_debug_pub.Add(' disposition_date -- '|| sysdate,1);
695: cln_debug_pub.Add(' last_updated_by -- '|| 1,1);
696: cln_debug_pub.Add(' last_updated_date -- '|| sysdate ,1);
697: cln_debug_pub.Add('-- where - CLN Id -- '|| p_rcir_command_unique_id,1);
698: END IF;
699:
692: cln_debug_pub.Add('--- updating following columns of ego_uccnet_events --',1);
693: cln_debug_pub.Add(' disposition_code -- '|| l_apc_disposition,1);
694: cln_debug_pub.Add(' disposition_date -- '|| sysdate,1);
695: cln_debug_pub.Add(' last_updated_by -- '|| 1,1);
696: cln_debug_pub.Add(' last_updated_date -- '|| sysdate ,1);
697: cln_debug_pub.Add('-- where - CLN Id -- '|| p_rcir_command_unique_id,1);
698: END IF;
699:
700: -- Make API call to update APC event disposition
693: cln_debug_pub.Add(' disposition_code -- '|| l_apc_disposition,1);
694: cln_debug_pub.Add(' disposition_date -- '|| sysdate,1);
695: cln_debug_pub.Add(' last_updated_by -- '|| 1,1);
696: cln_debug_pub.Add(' last_updated_date -- '|| sysdate ,1);
697: cln_debug_pub.Add('-- where - CLN Id -- '|| p_rcir_command_unique_id,1);
698: END IF;
699:
700: -- Make API call to update APC event disposition
701: IF (g_debug_Level <= 1) THEN
698: END IF;
699:
700: -- Make API call to update APC event disposition
701: IF (g_debug_Level <= 1) THEN
702: cln_debug_pub.Add('-- Calling API EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION --',1);
703: cln_debug_pub.Add(' disposition_code -- '|| l_disposition,1);
704: cln_debug_pub.Add(' disposition_date -- '|| sysdate,1);
705: cln_debug_pub.Add(' p_cln_id -- '|| p_rcir_command_unique_id,1);
706: END IF;
699:
700: -- Make API call to update APC event disposition
701: IF (g_debug_Level <= 1) THEN
702: cln_debug_pub.Add('-- Calling API EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION --',1);
703: cln_debug_pub.Add(' disposition_code -- '|| l_disposition,1);
704: cln_debug_pub.Add(' disposition_date -- '|| sysdate,1);
705: cln_debug_pub.Add(' p_cln_id -- '|| p_rcir_command_unique_id,1);
706: END IF;
707:
700: -- Make API call to update APC event disposition
701: IF (g_debug_Level <= 1) THEN
702: cln_debug_pub.Add('-- Calling API EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION --',1);
703: cln_debug_pub.Add(' disposition_code -- '|| l_disposition,1);
704: cln_debug_pub.Add(' disposition_date -- '|| sysdate,1);
705: cln_debug_pub.Add(' p_cln_id -- '|| p_rcir_command_unique_id,1);
706: END IF;
707:
708: EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION
701: IF (g_debug_Level <= 1) THEN
702: cln_debug_pub.Add('-- Calling API EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION --',1);
703: cln_debug_pub.Add(' disposition_code -- '|| l_disposition,1);
704: cln_debug_pub.Add(' disposition_date -- '|| sysdate,1);
705: cln_debug_pub.Add(' p_cln_id -- '|| p_rcir_command_unique_id,1);
706: END IF;
707:
708: EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION
709: (
719: );
720:
721:
722: IF (g_debug_Level <= 1) THEN
723: cln_debug_pub.Add('-- UPDATE_EVENT_DISPOSITION returned --',1);
724: cln_debug_pub.Add(' x_return_status-- '|| x_return_status,1);
725: cln_debug_pub.Add(' x_msg_count -- '|| l_msg_count,1);
726: cln_debug_pub.Add(' x_msg_data -- '|| l_msg_data,1);
727: END IF;
720:
721:
722: IF (g_debug_Level <= 1) THEN
723: cln_debug_pub.Add('-- UPDATE_EVENT_DISPOSITION returned --',1);
724: cln_debug_pub.Add(' x_return_status-- '|| x_return_status,1);
725: cln_debug_pub.Add(' x_msg_count -- '|| l_msg_count,1);
726: cln_debug_pub.Add(' x_msg_data -- '|| l_msg_data,1);
727: END IF;
728:
721:
722: IF (g_debug_Level <= 1) THEN
723: cln_debug_pub.Add('-- UPDATE_EVENT_DISPOSITION returned --',1);
724: cln_debug_pub.Add(' x_return_status-- '|| x_return_status,1);
725: cln_debug_pub.Add(' x_msg_count -- '|| l_msg_count,1);
726: cln_debug_pub.Add(' x_msg_data -- '|| l_msg_data,1);
727: END IF;
728:
729: -- Direct call needed, since CLN Detail Id, is required for further processing
722: IF (g_debug_Level <= 1) THEN
723: cln_debug_pub.Add('-- UPDATE_EVENT_DISPOSITION returned --',1);
724: cln_debug_pub.Add(' x_return_status-- '|| x_return_status,1);
725: cln_debug_pub.Add(' x_msg_count -- '|| l_msg_count,1);
726: cln_debug_pub.Add(' x_msg_data -- '|| l_msg_data,1);
727: END IF;
728:
729: -- Direct call needed, since CLN Detail Id, is required for further processing
730: -- of map., CLN will defualt the rest of the parameters.
728:
729: -- Direct call needed, since CLN Detail Id, is required for further processing
730: -- of map., CLN will defualt the rest of the parameters.
731: IF (g_debug_Level <= 1) THEN
732: cln_debug_pub.add('updating collaboration history for cln_id - ' || p_rcir_command_unique_id,1);
733: END IF;
734:
735: cln_ch_collaboration_pkg.update_collaboration(
736: x_return_status => x_return_status,
764:
765:
766:
767: IF (g_debug_Level <= 1) THEN
768: cln_debug_pub.Add('Update collaboration returned');
769: cln_debug_pub.Add('Collaboration detail id - ' || x_collab_detail_id , 1);
770: cln_debug_pub.Add('Return status - ' || x_return_status, 1);
771: cln_debug_pub.Add('Message data - ' || x_msg_data, 1);
772: END IF;
765:
766:
767: IF (g_debug_Level <= 1) THEN
768: cln_debug_pub.Add('Update collaboration returned');
769: cln_debug_pub.Add('Collaboration detail id - ' || x_collab_detail_id , 1);
770: cln_debug_pub.Add('Return status - ' || x_return_status, 1);
771: cln_debug_pub.Add('Message data - ' || x_msg_data, 1);
772: END IF;
773:
766:
767: IF (g_debug_Level <= 1) THEN
768: cln_debug_pub.Add('Update collaboration returned');
769: cln_debug_pub.Add('Collaboration detail id - ' || x_collab_detail_id , 1);
770: cln_debug_pub.Add('Return status - ' || x_return_status, 1);
771: cln_debug_pub.Add('Message data - ' || x_msg_data, 1);
772: END IF;
773:
774: x_msg_data := x_msg_data || ' ; EGO API update - ' || l_msg_data ;
767: IF (g_debug_Level <= 1) THEN
768: cln_debug_pub.Add('Update collaboration returned');
769: cln_debug_pub.Add('Collaboration detail id - ' || x_collab_detail_id , 1);
770: cln_debug_pub.Add('Return status - ' || x_return_status, 1);
771: cln_debug_pub.Add('Message data - ' || x_msg_data, 1);
772: END IF;
773:
774: x_msg_data := x_msg_data || ' ; EGO API update - ' || l_msg_data ;
775:
777: x_msg_data := 'Failure occured while processing RCIR Batch Notification in Query Worklist Response - ' || x_msg_data;
778: END IF;
779:
780: IF (g_debug_Level <= 2) THEN
781: cln_debug_pub.Add('Exiting m4u_resp_process.process_rcir_notification - normal',2);
782: cln_debug_pub.Add('===========================================================',2);
783: END IF;
784:
785: EXCEPTION
778: END IF;
779:
780: IF (g_debug_Level <= 2) THEN
781: cln_debug_pub.Add('Exiting m4u_resp_process.process_rcir_notification - normal',2);
782: cln_debug_pub.Add('===========================================================',2);
783: END IF;
784:
785: EXCEPTION
786: WHEN OTHERS THEN
791: x_msg_data := ' - Unexpected error in Processing RCIR notification in Query Worklist Response - ' || l_error_code || ':' || l_error_msg;
792:
793:
794: IF (g_debug_Level <= 5) THEN
795: cln_debug_pub.Add(l_error_code || ':' || l_error_msg, 4);
796: END IF;
797:
798: IF (g_debug_Level <= 2) THEN
799: cln_debug_pub.Add('Exiting m4u_resp_process.process_rcir_notification - exception',2);
795: cln_debug_pub.Add(l_error_code || ':' || l_error_msg, 4);
796: END IF;
797:
798: IF (g_debug_Level <= 2) THEN
799: cln_debug_pub.Add('Exiting m4u_resp_process.process_rcir_notification - exception',2);
800: cln_debug_pub.Add('==============================================================',2);
801: END IF;
802:
803: END process_rcir_notification;
796: END IF;
797:
798: IF (g_debug_Level <= 2) THEN
799: cln_debug_pub.Add('Exiting m4u_resp_process.process_rcir_notification - exception',2);
800: cln_debug_pub.Add('==============================================================',2);
801: END IF;
802:
803: END process_rcir_notification;
804:
843: BEGIN
844: l_event_name := 'oracle.apps.cln.np.processnotification';
845:
846: IF (g_debug_Level <= 2) THEN
847: cln_debug_pub.Add('=================================================', 2);
848: cln_debug_pub.Add('Entering m4u_resp_process.process_rcir_batch_list', 2);
849: END IF;
850:
851: IF (g_debug_Level <= 1) THEN
844: l_event_name := 'oracle.apps.cln.np.processnotification';
845:
846: IF (g_debug_Level <= 2) THEN
847: cln_debug_pub.Add('=================================================', 2);
848: cln_debug_pub.Add('Entering m4u_resp_process.process_rcir_batch_list', 2);
849: END IF;
850:
851: IF (g_debug_Level <= 1) THEN
852: cln_debug_pub.Add('-- with paramerters --', 1);
848: cln_debug_pub.Add('Entering m4u_resp_process.process_rcir_batch_list', 2);
849: END IF;
850:
851: IF (g_debug_Level <= 1) THEN
852: cln_debug_pub.Add('-- with paramerters --', 1);
853: cln_debug_pub.Add('p_rcir_batch_id_list -- ' || p_rcir_batch_id_list, 1);
854: cln_debug_pub.Add('p_rcir_batch_count -- ' || p_rcir_batch_count, 1);
855: cln_debug_pub.Add('p_rcir_batch_count -- ' || p_ucc_doc_unique_id, 1);
856: cln_debug_pub.Add('p_rcir_batch_count -- ' || p_xmlg_internal_control_no, 1);
849: END IF;
850:
851: IF (g_debug_Level <= 1) THEN
852: cln_debug_pub.Add('-- with paramerters --', 1);
853: cln_debug_pub.Add('p_rcir_batch_id_list -- ' || p_rcir_batch_id_list, 1);
854: cln_debug_pub.Add('p_rcir_batch_count -- ' || p_rcir_batch_count, 1);
855: cln_debug_pub.Add('p_rcir_batch_count -- ' || p_ucc_doc_unique_id, 1);
856: cln_debug_pub.Add('p_rcir_batch_count -- ' || p_xmlg_internal_control_no, 1);
857: END IF;
850:
851: IF (g_debug_Level <= 1) THEN
852: cln_debug_pub.Add('-- with paramerters --', 1);
853: cln_debug_pub.Add('p_rcir_batch_id_list -- ' || p_rcir_batch_id_list, 1);
854: cln_debug_pub.Add('p_rcir_batch_count -- ' || p_rcir_batch_count, 1);
855: cln_debug_pub.Add('p_rcir_batch_count -- ' || p_ucc_doc_unique_id, 1);
856: cln_debug_pub.Add('p_rcir_batch_count -- ' || p_xmlg_internal_control_no, 1);
857: END IF;
858:
851: IF (g_debug_Level <= 1) THEN
852: cln_debug_pub.Add('-- with paramerters --', 1);
853: cln_debug_pub.Add('p_rcir_batch_id_list -- ' || p_rcir_batch_id_list, 1);
854: cln_debug_pub.Add('p_rcir_batch_count -- ' || p_rcir_batch_count, 1);
855: cln_debug_pub.Add('p_rcir_batch_count -- ' || p_ucc_doc_unique_id, 1);
856: cln_debug_pub.Add('p_rcir_batch_count -- ' || p_xmlg_internal_control_no, 1);
857: END IF;
858:
859: l_event_params := wf_parameter_list_t();
852: cln_debug_pub.Add('-- with paramerters --', 1);
853: cln_debug_pub.Add('p_rcir_batch_id_list -- ' || p_rcir_batch_id_list, 1);
854: cln_debug_pub.Add('p_rcir_batch_count -- ' || p_rcir_batch_count, 1);
855: cln_debug_pub.Add('p_rcir_batch_count -- ' || p_ucc_doc_unique_id, 1);
856: cln_debug_pub.Add('p_rcir_batch_count -- ' || p_xmlg_internal_control_no, 1);
857: END IF;
858:
859: l_event_params := wf_parameter_list_t();
860: l_prev_pos := 1;
868: -- parsing logic ends,
869:
870: -- now variable l_batch_id, contains the next RCIR batch_id to process
871: IF (g_debug_Level <= 1) THEN
872: cln_debug_pub.add('processing batch_id - ' || l_batch_id, 1);
873: END IF;
874:
875: BEGIN
876: SELECT owner_role
883: l_owner_role := fnd_profile.value('CLN_ADMINISTRATOR');
884: END;
885:
886: IF (g_debug_Level <= 1) THEN
887: cln_debug_pub.add('Batch owner role obtained as -- '|| l_owner_role, 1);
888: END IF;
889:
890: l_notif_mesg := 'RCIR Batch status received';
891:
945: l_event_key := 'RESP_BATCH_' || l_batch_id;
946:
947:
948: IF (g_debug_Level <= 2) THEN
949: cln_debug_pub.add('--- raising Business Event ---',1);
950: cln_debug_pub.add('Event-name - ' || l_event_name,1);
951: cln_debug_pub.add('event-value -' || l_event_key ,1);
952: END IF;
953:
946:
947:
948: IF (g_debug_Level <= 2) THEN
949: cln_debug_pub.add('--- raising Business Event ---',1);
950: cln_debug_pub.add('Event-name - ' || l_event_name,1);
951: cln_debug_pub.add('event-value -' || l_event_key ,1);
952: END IF;
953:
954: -- raise event to trigger CLN Notifcations
947:
948: IF (g_debug_Level <= 2) THEN
949: cln_debug_pub.add('--- raising Business Event ---',1);
950: cln_debug_pub.add('Event-name - ' || l_event_name,1);
951: cln_debug_pub.add('event-value -' || l_event_key ,1);
952: END IF;
953:
954: -- raise event to trigger CLN Notifcations
955: wf_event.raise(
961:
962:
963:
964: IF (g_debug_Level <= 1) THEN
965: cln_debug_pub.Add('Raising event name - ' || l_event_name, 1);
966: cln_debug_pub.Add(' event key -- ' || l_batch_id, 1);
967: END IF;
968: END LOOP;
969:
962:
963:
964: IF (g_debug_Level <= 1) THEN
965: cln_debug_pub.Add('Raising event name - ' || l_event_name, 1);
966: cln_debug_pub.Add(' event key -- ' || l_batch_id, 1);
967: END IF;
968: END LOOP;
969:
970:
972: x_return_status := 'S';
973: x_msg_data := 'RCIR Batch-list succesfully processed';
974:
975: IF (g_debug_Level <= 2) THEN
976: cln_debug_pub.Add('Exiting m4u_resp_process.process_rcir_batch_list - normal',2);
977: cln_debug_pub.Add('=========================================================',2);
978: END IF;
979:
980: EXCEPTION
973: x_msg_data := 'RCIR Batch-list succesfully processed';
974:
975: IF (g_debug_Level <= 2) THEN
976: cln_debug_pub.Add('Exiting m4u_resp_process.process_rcir_batch_list - normal',2);
977: cln_debug_pub.Add('=========================================================',2);
978: END IF;
979:
980: EXCEPTION
981: WHEN OTHERS THEN
987: x_msg_data := ' - Unexpected error while raising notification for RCIR batches - ' || l_error_code || ':' || l_error_msg;
988:
989:
990: IF (g_debug_Level <= 5) THEN
991: cln_debug_pub.Add(l_error_code || ':' || l_error_msg, 4);
992: END IF;
993:
994: IF (g_debug_Level <= 2) THEN
995: cln_debug_pub.Add('Exiting m4u_resp_process.process_rcir_batch_list - exception',2);
991: cln_debug_pub.Add(l_error_code || ':' || l_error_msg, 4);
992: END IF;
993:
994: IF (g_debug_Level <= 2) THEN
995: cln_debug_pub.Add('Exiting m4u_resp_process.process_rcir_batch_list - exception',2);
996: cln_debug_pub.Add('============================================================',2);
997: END IF;
998:
999: END process_rcir_batch_list;
992: END IF;
993:
994: IF (g_debug_Level <= 2) THEN
995: cln_debug_pub.Add('Exiting m4u_resp_process.process_rcir_batch_list - exception',2);
996: cln_debug_pub.Add('============================================================',2);
997: END IF;
998:
999: END process_rcir_batch_list;
1000:
1038: l_coll_type VARCHAR2(50);
1039: l_doc_type VARCHAR2(50);
1040: BEGIN
1041: IF (g_debug_Level <= 2) THEN
1042: cln_debug_pub.Add('=====================================================', 2);
1043: cln_debug_pub.Add('-- Entering m4u_resp_process.process_wlq_response -- ', 2);
1044: END IF;
1045:
1046: IF (g_debug_Level <= 1) THEN
1039: l_doc_type VARCHAR2(50);
1040: BEGIN
1041: IF (g_debug_Level <= 2) THEN
1042: cln_debug_pub.Add('=====================================================', 2);
1043: cln_debug_pub.Add('-- Entering m4u_resp_process.process_wlq_response -- ', 2);
1044: END IF;
1045:
1046: IF (g_debug_Level <= 1) THEN
1047: cln_debug_pub.Add('-- with paramters -- ', 1);
1043: cln_debug_pub.Add('-- Entering m4u_resp_process.process_wlq_response -- ', 2);
1044: END IF;
1045:
1046: IF (g_debug_Level <= 1) THEN
1047: cln_debug_pub.Add('-- with paramters -- ', 1);
1048: cln_debug_pub.Add('p_wlq_message_id -- ' || p_wlq_message_id , 1);
1049: cln_debug_pub.Add('p_wlq_success_flag -- ' || p_wlq_success_flag, 1);
1050: cln_debug_pub.Add('p_wlq_response_type -- ' || p_wlq_response_type, 1);
1051: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
1044: END IF;
1045:
1046: IF (g_debug_Level <= 1) THEN
1047: cln_debug_pub.Add('-- with paramters -- ', 1);
1048: cln_debug_pub.Add('p_wlq_message_id -- ' || p_wlq_message_id , 1);
1049: cln_debug_pub.Add('p_wlq_success_flag -- ' || p_wlq_success_flag, 1);
1050: cln_debug_pub.Add('p_wlq_response_type -- ' || p_wlq_response_type, 1);
1051: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
1052: cln_debug_pub.Add('p_xmlg_internal_control_no -- ' || p_xmlg_internal_control_no, 1);
1045:
1046: IF (g_debug_Level <= 1) THEN
1047: cln_debug_pub.Add('-- with paramters -- ', 1);
1048: cln_debug_pub.Add('p_wlq_message_id -- ' || p_wlq_message_id , 1);
1049: cln_debug_pub.Add('p_wlq_success_flag -- ' || p_wlq_success_flag, 1);
1050: cln_debug_pub.Add('p_wlq_response_type -- ' || p_wlq_response_type, 1);
1051: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
1052: cln_debug_pub.Add('p_xmlg_internal_control_no -- ' || p_xmlg_internal_control_no, 1);
1053: END IF;
1046: IF (g_debug_Level <= 1) THEN
1047: cln_debug_pub.Add('-- with paramters -- ', 1);
1048: cln_debug_pub.Add('p_wlq_message_id -- ' || p_wlq_message_id , 1);
1049: cln_debug_pub.Add('p_wlq_success_flag -- ' || p_wlq_success_flag, 1);
1050: cln_debug_pub.Add('p_wlq_response_type -- ' || p_wlq_response_type, 1);
1051: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
1052: cln_debug_pub.Add('p_xmlg_internal_control_no -- ' || p_xmlg_internal_control_no, 1);
1053: END IF;
1054:
1047: cln_debug_pub.Add('-- with paramters -- ', 1);
1048: cln_debug_pub.Add('p_wlq_message_id -- ' || p_wlq_message_id , 1);
1049: cln_debug_pub.Add('p_wlq_success_flag -- ' || p_wlq_success_flag, 1);
1050: cln_debug_pub.Add('p_wlq_response_type -- ' || p_wlq_response_type, 1);
1051: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
1052: cln_debug_pub.Add('p_xmlg_internal_control_no -- ' || p_xmlg_internal_control_no, 1);
1053: END IF;
1054:
1055:
1048: cln_debug_pub.Add('p_wlq_message_id -- ' || p_wlq_message_id , 1);
1049: cln_debug_pub.Add('p_wlq_success_flag -- ' || p_wlq_success_flag, 1);
1050: cln_debug_pub.Add('p_wlq_response_type -- ' || p_wlq_response_type, 1);
1051: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
1052: cln_debug_pub.Add('p_xmlg_internal_control_no -- ' || p_xmlg_internal_control_no, 1);
1053: END IF;
1054:
1055:
1056: l_doc_type := 'M4U_' || p_wlq_response_type;
1083:
1084: -- Direct call needed, since CLN Detail Id, is required for further processing
1085: -- of map., CLN will defualt the rest of the parameters.
1086: IF (g_debug_Level <= 1) THEN
1087: cln_debug_pub.add('updating collaboration history for cln_id - ' || p_wlq_message_id,1);
1088: END IF;
1089:
1090: cln_ch_collaboration_pkg.update_collaboration(
1091: x_return_status => x_return_status,
1115:
1116:
1117:
1118: IF (g_debug_Level <= 1) THEN
1119: cln_debug_pub.add('collaboration history updated for CLN_uniqueid - ' || p_wlq_message_id,1);
1120: cln_debug_pub.add('Collab_detail_id - ' || x_collab_detail_id,1);
1121: cln_debug_pub.add('x_return_status - ' || x_return_status,1);
1122: cln_debug_pub.add('x_msg_data - ' || x_msg_data,1);
1123: END IF;
1116:
1117:
1118: IF (g_debug_Level <= 1) THEN
1119: cln_debug_pub.add('collaboration history updated for CLN_uniqueid - ' || p_wlq_message_id,1);
1120: cln_debug_pub.add('Collab_detail_id - ' || x_collab_detail_id,1);
1121: cln_debug_pub.add('x_return_status - ' || x_return_status,1);
1122: cln_debug_pub.add('x_msg_data - ' || x_msg_data,1);
1123: END IF;
1124:
1117:
1118: IF (g_debug_Level <= 1) THEN
1119: cln_debug_pub.add('collaboration history updated for CLN_uniqueid - ' || p_wlq_message_id,1);
1120: cln_debug_pub.add('Collab_detail_id - ' || x_collab_detail_id,1);
1121: cln_debug_pub.add('x_return_status - ' || x_return_status,1);
1122: cln_debug_pub.add('x_msg_data - ' || x_msg_data,1);
1123: END IF;
1124:
1125: IF x_return_status <> 'S' THEN
1118: IF (g_debug_Level <= 1) THEN
1119: cln_debug_pub.add('collaboration history updated for CLN_uniqueid - ' || p_wlq_message_id,1);
1120: cln_debug_pub.add('Collab_detail_id - ' || x_collab_detail_id,1);
1121: cln_debug_pub.add('x_return_status - ' || x_return_status,1);
1122: cln_debug_pub.add('x_msg_data - ' || x_msg_data,1);
1123: END IF;
1124:
1125: IF x_return_status <> 'S' THEN
1126: x_msg_data := 'Failure occured while processing collaboration history on Query Response - ' || x_msg_data;
1126: x_msg_data := 'Failure occured while processing collaboration history on Query Response - ' || x_msg_data;
1127: END IF;
1128:
1129: IF (g_debug_Level <= 2) THEN
1130: cln_debug_pub.add('Exiting m4u_resp_process.process_wlq_response - normal',2);
1131: cln_debug_pub.add('======================================================',2);
1132: END IF;
1133: EXCEPTION
1134: WHEN OTHERS THEN
1127: END IF;
1128:
1129: IF (g_debug_Level <= 2) THEN
1130: cln_debug_pub.add('Exiting m4u_resp_process.process_wlq_response - normal',2);
1131: cln_debug_pub.add('======================================================',2);
1132: END IF;
1133: EXCEPTION
1134: WHEN OTHERS THEN
1135:
1140: x_msg_data := ' - Unexpected error occured while processing Query-Worklist Response - ' || l_error_code || ':' || l_error_msg;
1141:
1142:
1143: IF (g_debug_Level <= 5) THEN
1144: cln_debug_pub.add(l_error_code || ':' || l_error_msg, 4);
1145: END IF;
1146:
1147: IF (g_debug_Level <= 2) THEN
1148: cln_debug_pub.add('Exiting m4u_resp_process.process_wlq_response - exception',2);
1144: cln_debug_pub.add(l_error_code || ':' || l_error_msg, 4);
1145: END IF;
1146:
1147: IF (g_debug_Level <= 2) THEN
1148: cln_debug_pub.add('Exiting m4u_resp_process.process_wlq_response - exception',2);
1149: cln_debug_pub.add('=========================================================',2);
1150: END IF;
1151:
1152: END process_wlq_response;
1145: END IF;
1146:
1147: IF (g_debug_Level <= 2) THEN
1148: cln_debug_pub.add('Exiting m4u_resp_process.process_wlq_response - exception',2);
1149: cln_debug_pub.add('=========================================================',2);
1150: END IF;
1151:
1152: END process_wlq_response;
1153:
1201: BEGIN
1202: l_event_name := 'oracle.apps.cln.np.processnotification';
1203:
1204: IF (g_debug_Level <= 2) THEN
1205: cln_debug_pub.Add('==================================================', 2);
1206: cln_debug_pub.Add('-- Entering m4u_resp_process.process_rcir_ack -- ', 2);
1207: END IF;
1208:
1209: IF (g_debug_Level <= 1) THEN
1202: l_event_name := 'oracle.apps.cln.np.processnotification';
1203:
1204: IF (g_debug_Level <= 2) THEN
1205: cln_debug_pub.Add('==================================================', 2);
1206: cln_debug_pub.Add('-- Entering m4u_resp_process.process_rcir_ack -- ', 2);
1207: END IF;
1208:
1209: IF (g_debug_Level <= 1) THEN
1210: cln_debug_pub.Add('-- with paramters -- ', 1);
1206: cln_debug_pub.Add('-- Entering m4u_resp_process.process_rcir_ack -- ', 2);
1207: END IF;
1208:
1209: IF (g_debug_Level <= 1) THEN
1210: cln_debug_pub.Add('-- with paramters -- ', 1);
1211: cln_debug_pub.Add('p_gtin -- ' || p_gtin, 1);
1212: cln_debug_pub.Add('p_supp_gln -- ' || p_supp_gln, 1);
1213: cln_debug_pub.Add('p_target_market -- ' || p_target_market, 1);
1214: cln_debug_pub.Add('p_command_unique_id -- ' || p_command_unique_id, 1);
1207: END IF;
1208:
1209: IF (g_debug_Level <= 1) THEN
1210: cln_debug_pub.Add('-- with paramters -- ', 1);
1211: cln_debug_pub.Add('p_gtin -- ' || p_gtin, 1);
1212: cln_debug_pub.Add('p_supp_gln -- ' || p_supp_gln, 1);
1213: cln_debug_pub.Add('p_target_market -- ' || p_target_market, 1);
1214: cln_debug_pub.Add('p_command_unique_id -- ' || p_command_unique_id, 1);
1215: cln_debug_pub.Add('p_command_success -- ' || p_command_success, 1);
1208:
1209: IF (g_debug_Level <= 1) THEN
1210: cln_debug_pub.Add('-- with paramters -- ', 1);
1211: cln_debug_pub.Add('p_gtin -- ' || p_gtin, 1);
1212: cln_debug_pub.Add('p_supp_gln -- ' || p_supp_gln, 1);
1213: cln_debug_pub.Add('p_target_market -- ' || p_target_market, 1);
1214: cln_debug_pub.Add('p_command_unique_id -- ' || p_command_unique_id, 1);
1215: cln_debug_pub.Add('p_command_success -- ' || p_command_success, 1);
1216: cln_debug_pub.Add('p_command_validation_key -- ' || p_command_validation_key, 1);
1209: IF (g_debug_Level <= 1) THEN
1210: cln_debug_pub.Add('-- with paramters -- ', 1);
1211: cln_debug_pub.Add('p_gtin -- ' || p_gtin, 1);
1212: cln_debug_pub.Add('p_supp_gln -- ' || p_supp_gln, 1);
1213: cln_debug_pub.Add('p_target_market -- ' || p_target_market, 1);
1214: cln_debug_pub.Add('p_command_unique_id -- ' || p_command_unique_id, 1);
1215: cln_debug_pub.Add('p_command_success -- ' || p_command_success, 1);
1216: cln_debug_pub.Add('p_command_validation_key -- ' || p_command_validation_key, 1);
1217: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
1210: cln_debug_pub.Add('-- with paramters -- ', 1);
1211: cln_debug_pub.Add('p_gtin -- ' || p_gtin, 1);
1212: cln_debug_pub.Add('p_supp_gln -- ' || p_supp_gln, 1);
1213: cln_debug_pub.Add('p_target_market -- ' || p_target_market, 1);
1214: cln_debug_pub.Add('p_command_unique_id -- ' || p_command_unique_id, 1);
1215: cln_debug_pub.Add('p_command_success -- ' || p_command_success, 1);
1216: cln_debug_pub.Add('p_command_validation_key -- ' || p_command_validation_key, 1);
1217: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
1218: cln_debug_pub.Add('p_xmlg_internal_contrlo_no -- ' || p_xmlg_internal_control_no, 1);
1211: cln_debug_pub.Add('p_gtin -- ' || p_gtin, 1);
1212: cln_debug_pub.Add('p_supp_gln -- ' || p_supp_gln, 1);
1213: cln_debug_pub.Add('p_target_market -- ' || p_target_market, 1);
1214: cln_debug_pub.Add('p_command_unique_id -- ' || p_command_unique_id, 1);
1215: cln_debug_pub.Add('p_command_success -- ' || p_command_success, 1);
1216: cln_debug_pub.Add('p_command_validation_key -- ' || p_command_validation_key, 1);
1217: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
1218: cln_debug_pub.Add('p_xmlg_internal_contrlo_no -- ' || p_xmlg_internal_control_no, 1);
1219: END IF;
1212: cln_debug_pub.Add('p_supp_gln -- ' || p_supp_gln, 1);
1213: cln_debug_pub.Add('p_target_market -- ' || p_target_market, 1);
1214: cln_debug_pub.Add('p_command_unique_id -- ' || p_command_unique_id, 1);
1215: cln_debug_pub.Add('p_command_success -- ' || p_command_success, 1);
1216: cln_debug_pub.Add('p_command_validation_key -- ' || p_command_validation_key, 1);
1217: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
1218: cln_debug_pub.Add('p_xmlg_internal_contrlo_no -- ' || p_xmlg_internal_control_no, 1);
1219: END IF;
1220:
1213: cln_debug_pub.Add('p_target_market -- ' || p_target_market, 1);
1214: cln_debug_pub.Add('p_command_unique_id -- ' || p_command_unique_id, 1);
1215: cln_debug_pub.Add('p_command_success -- ' || p_command_success, 1);
1216: cln_debug_pub.Add('p_command_validation_key -- ' || p_command_validation_key, 1);
1217: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
1218: cln_debug_pub.Add('p_xmlg_internal_contrlo_no -- ' || p_xmlg_internal_control_no, 1);
1219: END IF;
1220:
1221: -- since same procedure is being used to process RCIR Ack, GTIN Query Ack
1214: cln_debug_pub.Add('p_command_unique_id -- ' || p_command_unique_id, 1);
1215: cln_debug_pub.Add('p_command_success -- ' || p_command_success, 1);
1216: cln_debug_pub.Add('p_command_validation_key -- ' || p_command_validation_key, 1);
1217: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
1218: cln_debug_pub.Add('p_xmlg_internal_contrlo_no -- ' || p_xmlg_internal_control_no, 1);
1219: END IF;
1220:
1221: -- since same procedure is being used to process RCIR Ack, GTIN Query Ack
1222: -- and diff processing requirement for each of these messages
1225: FROM cln_coll_hist_hdr
1226: WHERE collaboration_id = p_command_unique_id;
1227:
1228: IF (g_debug_Level <= 1) THEN
1229: cln_debug_pub.Add('CLN Collaboration Type retrieved as - ' || l_coll_type, 1);
1230: END IF;
1231:
1232:
1233: -- set CLN Message Text, CLN Disposition, CLN Doc status, CLN coll status
1253: -- Make API call to update APC event disposition only if it is a M4U_RCIR response
1254: IF l_coll_type <> 'M4U_REGISTRY_QUERY' THEN
1255:
1256: IF (g_debug_Level <= 1) THEN
1257: cln_debug_pub.Add('-- Calling API EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION --',1);
1258: cln_debug_pub.Add(' disposition_code -- '|| l_apc_disposition,1);
1259: cln_debug_pub.Add(' disposition_date -- '|| sysdate,1);
1260: cln_debug_pub.Add(' p_cln_id -- '|| p_command_unique_id,1);
1261: END IF;
1254: IF l_coll_type <> 'M4U_REGISTRY_QUERY' THEN
1255:
1256: IF (g_debug_Level <= 1) THEN
1257: cln_debug_pub.Add('-- Calling API EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION --',1);
1258: cln_debug_pub.Add(' disposition_code -- '|| l_apc_disposition,1);
1259: cln_debug_pub.Add(' disposition_date -- '|| sysdate,1);
1260: cln_debug_pub.Add(' p_cln_id -- '|| p_command_unique_id,1);
1261: END IF;
1262:
1255:
1256: IF (g_debug_Level <= 1) THEN
1257: cln_debug_pub.Add('-- Calling API EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION --',1);
1258: cln_debug_pub.Add(' disposition_code -- '|| l_apc_disposition,1);
1259: cln_debug_pub.Add(' disposition_date -- '|| sysdate,1);
1260: cln_debug_pub.Add(' p_cln_id -- '|| p_command_unique_id,1);
1261: END IF;
1262:
1263:
1256: IF (g_debug_Level <= 1) THEN
1257: cln_debug_pub.Add('-- Calling API EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION --',1);
1258: cln_debug_pub.Add(' disposition_code -- '|| l_apc_disposition,1);
1259: cln_debug_pub.Add(' disposition_date -- '|| sysdate,1);
1260: cln_debug_pub.Add(' p_cln_id -- '|| p_command_unique_id,1);
1261: END IF;
1262:
1263:
1264: EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION
1275: );
1276:
1277:
1278: IF (g_debug_Level <= 1) THEN
1279: cln_debug_pub.add('ego_uccnet_events disposition updated');
1280: cln_debug_pub.add('p_cln_id - ' || p_command_unique_id,1);
1281: cln_debug_pub.add('p_disposition_code - ' || l_apc_disposition,1);
1282: cln_debug_pub.add('p_disposition_date - ' || sysdate,1);
1283: cln_debug_pub.add('-- return values --',1);
1276:
1277:
1278: IF (g_debug_Level <= 1) THEN
1279: cln_debug_pub.add('ego_uccnet_events disposition updated');
1280: cln_debug_pub.add('p_cln_id - ' || p_command_unique_id,1);
1281: cln_debug_pub.add('p_disposition_code - ' || l_apc_disposition,1);
1282: cln_debug_pub.add('p_disposition_date - ' || sysdate,1);
1283: cln_debug_pub.add('-- return values --',1);
1284: cln_debug_pub.add('x_return_status - ' || l_return_status,1);
1277:
1278: IF (g_debug_Level <= 1) THEN
1279: cln_debug_pub.add('ego_uccnet_events disposition updated');
1280: cln_debug_pub.add('p_cln_id - ' || p_command_unique_id,1);
1281: cln_debug_pub.add('p_disposition_code - ' || l_apc_disposition,1);
1282: cln_debug_pub.add('p_disposition_date - ' || sysdate,1);
1283: cln_debug_pub.add('-- return values --',1);
1284: cln_debug_pub.add('x_return_status - ' || l_return_status,1);
1285: cln_debug_pub.add('x_msg_count - ' || l_msg_count,1);
1278: IF (g_debug_Level <= 1) THEN
1279: cln_debug_pub.add('ego_uccnet_events disposition updated');
1280: cln_debug_pub.add('p_cln_id - ' || p_command_unique_id,1);
1281: cln_debug_pub.add('p_disposition_code - ' || l_apc_disposition,1);
1282: cln_debug_pub.add('p_disposition_date - ' || sysdate,1);
1283: cln_debug_pub.add('-- return values --',1);
1284: cln_debug_pub.add('x_return_status - ' || l_return_status,1);
1285: cln_debug_pub.add('x_msg_count - ' || l_msg_count,1);
1286: cln_debug_pub.add('x_msg_data - ' || l_msg_data,1);
1279: cln_debug_pub.add('ego_uccnet_events disposition updated');
1280: cln_debug_pub.add('p_cln_id - ' || p_command_unique_id,1);
1281: cln_debug_pub.add('p_disposition_code - ' || l_apc_disposition,1);
1282: cln_debug_pub.add('p_disposition_date - ' || sysdate,1);
1283: cln_debug_pub.add('-- return values --',1);
1284: cln_debug_pub.add('x_return_status - ' || l_return_status,1);
1285: cln_debug_pub.add('x_msg_count - ' || l_msg_count,1);
1286: cln_debug_pub.add('x_msg_data - ' || l_msg_data,1);
1287: END IF;
1280: cln_debug_pub.add('p_cln_id - ' || p_command_unique_id,1);
1281: cln_debug_pub.add('p_disposition_code - ' || l_apc_disposition,1);
1282: cln_debug_pub.add('p_disposition_date - ' || sysdate,1);
1283: cln_debug_pub.add('-- return values --',1);
1284: cln_debug_pub.add('x_return_status - ' || l_return_status,1);
1285: cln_debug_pub.add('x_msg_count - ' || l_msg_count,1);
1286: cln_debug_pub.add('x_msg_data - ' || l_msg_data,1);
1287: END IF;
1288: END IF;
1281: cln_debug_pub.add('p_disposition_code - ' || l_apc_disposition,1);
1282: cln_debug_pub.add('p_disposition_date - ' || sysdate,1);
1283: cln_debug_pub.add('-- return values --',1);
1284: cln_debug_pub.add('x_return_status - ' || l_return_status,1);
1285: cln_debug_pub.add('x_msg_count - ' || l_msg_count,1);
1286: cln_debug_pub.add('x_msg_data - ' || l_msg_data,1);
1287: END IF;
1288: END IF;
1289:
1282: cln_debug_pub.add('p_disposition_date - ' || sysdate,1);
1283: cln_debug_pub.add('-- return values --',1);
1284: cln_debug_pub.add('x_return_status - ' || l_return_status,1);
1285: cln_debug_pub.add('x_msg_count - ' || l_msg_count,1);
1286: cln_debug_pub.add('x_msg_data - ' || l_msg_data,1);
1287: END IF;
1288: END IF;
1289:
1290:
1290:
1291: -- Direct call needed, since CLN Detail Id, is required for further processing
1292: -- of map., CLN will defualt the rest of the parameters.
1293: IF (g_debug_Level <= 1) THEN
1294: cln_debug_pub.add('updating collaboration history for cln_id - ' || p_command_unique_id,1);
1295: END IF;
1296:
1297: CLN_CH_COLLABORATION_PKG.UPDATE_COLLABORATION
1298: (
1328: );
1329:
1330: x_msg_data := x_msg_data || ' - ' || l_msg_data;
1331: IF (g_debug_Level <= 1) THEN
1332: cln_debug_pub.add('collaboration history updated for cln_id - ' || p_command_unique_id,1);
1333: cln_debug_pub.add('Collab_detail_id - ' || x_collab_detail_id,1);
1334: cln_debug_pub.add('x_return_status - ' || x_return_status,1);
1335: cln_debug_pub.add('x_msg_data - ' || x_msg_data,1);
1336: END IF;
1329:
1330: x_msg_data := x_msg_data || ' - ' || l_msg_data;
1331: IF (g_debug_Level <= 1) THEN
1332: cln_debug_pub.add('collaboration history updated for cln_id - ' || p_command_unique_id,1);
1333: cln_debug_pub.add('Collab_detail_id - ' || x_collab_detail_id,1);
1334: cln_debug_pub.add('x_return_status - ' || x_return_status,1);
1335: cln_debug_pub.add('x_msg_data - ' || x_msg_data,1);
1336: END IF;
1337:
1330: x_msg_data := x_msg_data || ' - ' || l_msg_data;
1331: IF (g_debug_Level <= 1) THEN
1332: cln_debug_pub.add('collaboration history updated for cln_id - ' || p_command_unique_id,1);
1333: cln_debug_pub.add('Collab_detail_id - ' || x_collab_detail_id,1);
1334: cln_debug_pub.add('x_return_status - ' || x_return_status,1);
1335: cln_debug_pub.add('x_msg_data - ' || x_msg_data,1);
1336: END IF;
1337:
1338: -- Raise CLN notification event only for a M4U_RCIR response
1331: IF (g_debug_Level <= 1) THEN
1332: cln_debug_pub.add('collaboration history updated for cln_id - ' || p_command_unique_id,1);
1333: cln_debug_pub.add('Collab_detail_id - ' || x_collab_detail_id,1);
1334: cln_debug_pub.add('x_return_status - ' || x_return_status,1);
1335: cln_debug_pub.add('x_msg_data - ' || x_msg_data,1);
1336: END IF;
1337:
1338: -- Raise CLN notification event only for a M4U_RCIR response
1339: IF l_coll_type <> 'M4U_REGISTRY_QUERY' THEN
1375: l_event_key := 'RESP_ACK_RCIR_' || p_command_unique_id;
1376:
1377:
1378: IF (g_debug_Level <= 1) THEN
1379: cln_debug_pub.add('--- raising Business Event ---',1);
1380: cln_debug_pub.add('Event-name - ' || l_event_name,1);
1381: cln_debug_pub.add('event-value -' || l_event_key ,1);
1382: END IF;
1383:
1376:
1377:
1378: IF (g_debug_Level <= 1) THEN
1379: cln_debug_pub.add('--- raising Business Event ---',1);
1380: cln_debug_pub.add('Event-name - ' || l_event_name,1);
1381: cln_debug_pub.add('event-value -' || l_event_key ,1);
1382: END IF;
1383:
1384: -- raise event for notification
1377:
1378: IF (g_debug_Level <= 1) THEN
1379: cln_debug_pub.add('--- raising Business Event ---',1);
1380: cln_debug_pub.add('Event-name - ' || l_event_name,1);
1381: cln_debug_pub.add('event-value -' || l_event_key ,1);
1382: END IF;
1383:
1384: -- raise event for notification
1385: wf_event.raise(
1397: END IF;
1398:
1399:
1400: IF (g_debug_Level <= 2) THEN
1401: cln_debug_pub.add('Exiting m4u_resp_process.process_rcir_ack - normal',2);
1402: cln_debug_pub.add('==================================================',2);
1403: END IF;
1404: EXCEPTION
1405: WHEN OTHERS THEN
1398:
1399:
1400: IF (g_debug_Level <= 2) THEN
1401: cln_debug_pub.add('Exiting m4u_resp_process.process_rcir_ack - normal',2);
1402: cln_debug_pub.add('==================================================',2);
1403: END IF;
1404: EXCEPTION
1405: WHEN OTHERS THEN
1406:
1411: x_msg_data := ' - Unexpected error in while processing RCIR acknowledgement - ' || l_error_code || ':' || l_error_msg;
1412:
1413:
1414: IF (g_debug_Level <= 5) THEN
1415: cln_debug_pub.add(l_error_code || ':' || l_error_msg, 4);
1416: END IF;
1417:
1418: IF (g_debug_Level <= 2) THEN
1419: cln_debug_pub.add('Exiting m4u_resp_process.process_rcir_ack - exception',2);
1415: cln_debug_pub.add(l_error_code || ':' || l_error_msg, 4);
1416: END IF;
1417:
1418: IF (g_debug_Level <= 2) THEN
1419: cln_debug_pub.add('Exiting m4u_resp_process.process_rcir_ack - exception',2);
1420: cln_debug_pub.add('=====================================================',2);
1421: END IF;
1422:
1423: END process_rcir_ack;
1416: END IF;
1417:
1418: IF (g_debug_Level <= 2) THEN
1419: cln_debug_pub.add('Exiting m4u_resp_process.process_rcir_ack - exception',2);
1420: cln_debug_pub.add('=====================================================',2);
1421: END IF;
1422:
1423: END process_rcir_ack;
1424:
1480: BEGIN
1481: l_event_name := 'oracle.apps.cln.np.processnotification';
1482:
1483: IF (g_debug_Level <= 2) THEN
1484: cln_debug_pub.Add('=======================================================', 2);
1485: cln_debug_pub.Add('-- Entering m4u_resp_process.process_rcir_batch_ack -- ', 2);
1486: END IF;
1487:
1488: IF (g_debug_Level <= 1) THEN
1481: l_event_name := 'oracle.apps.cln.np.processnotification';
1482:
1483: IF (g_debug_Level <= 2) THEN
1484: cln_debug_pub.Add('=======================================================', 2);
1485: cln_debug_pub.Add('-- Entering m4u_resp_process.process_rcir_batch_ack -- ', 2);
1486: END IF;
1487:
1488: IF (g_debug_Level <= 1) THEN
1489: cln_debug_pub.Add('-- with parameters -- ', 1);
1485: cln_debug_pub.Add('-- Entering m4u_resp_process.process_rcir_batch_ack -- ', 2);
1486: END IF;
1487:
1488: IF (g_debug_Level <= 1) THEN
1489: cln_debug_pub.Add('-- with parameters -- ', 1);
1490: cln_debug_pub.Add('p_command_unique_id -- ' || p_command_unique_id, 1);
1491: cln_debug_pub.Add('p_supp_gln -- ' || p_supp_gln, 1);
1492: cln_debug_pub.Add('p_command_success -- ' || p_command_success, 1);
1493: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
1486: END IF;
1487:
1488: IF (g_debug_Level <= 1) THEN
1489: cln_debug_pub.Add('-- with parameters -- ', 1);
1490: cln_debug_pub.Add('p_command_unique_id -- ' || p_command_unique_id, 1);
1491: cln_debug_pub.Add('p_supp_gln -- ' || p_supp_gln, 1);
1492: cln_debug_pub.Add('p_command_success -- ' || p_command_success, 1);
1493: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
1494: cln_debug_pub.Add('p_xmlg_internal_control_no -- ' || p_xmlg_internal_control_no, 1);
1487:
1488: IF (g_debug_Level <= 1) THEN
1489: cln_debug_pub.Add('-- with parameters -- ', 1);
1490: cln_debug_pub.Add('p_command_unique_id -- ' || p_command_unique_id, 1);
1491: cln_debug_pub.Add('p_supp_gln -- ' || p_supp_gln, 1);
1492: cln_debug_pub.Add('p_command_success -- ' || p_command_success, 1);
1493: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
1494: cln_debug_pub.Add('p_xmlg_internal_control_no -- ' || p_xmlg_internal_control_no, 1);
1495: END IF;
1488: IF (g_debug_Level <= 1) THEN
1489: cln_debug_pub.Add('-- with parameters -- ', 1);
1490: cln_debug_pub.Add('p_command_unique_id -- ' || p_command_unique_id, 1);
1491: cln_debug_pub.Add('p_supp_gln -- ' || p_supp_gln, 1);
1492: cln_debug_pub.Add('p_command_success -- ' || p_command_success, 1);
1493: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
1494: cln_debug_pub.Add('p_xmlg_internal_control_no -- ' || p_xmlg_internal_control_no, 1);
1495: END IF;
1496:
1489: cln_debug_pub.Add('-- with parameters -- ', 1);
1490: cln_debug_pub.Add('p_command_unique_id -- ' || p_command_unique_id, 1);
1491: cln_debug_pub.Add('p_supp_gln -- ' || p_supp_gln, 1);
1492: cln_debug_pub.Add('p_command_success -- ' || p_command_success, 1);
1493: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
1494: cln_debug_pub.Add('p_xmlg_internal_control_no -- ' || p_xmlg_internal_control_no, 1);
1495: END IF;
1496:
1497: -- set CLN message, CLN Doc status, CLN disposition, CLN Coll Status
1490: cln_debug_pub.Add('p_command_unique_id -- ' || p_command_unique_id, 1);
1491: cln_debug_pub.Add('p_supp_gln -- ' || p_supp_gln, 1);
1492: cln_debug_pub.Add('p_command_success -- ' || p_command_success, 1);
1493: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
1494: cln_debug_pub.Add('p_xmlg_internal_control_no -- ' || p_xmlg_internal_control_no, 1);
1495: END IF;
1496:
1497: -- set CLN message, CLN Doc status, CLN disposition, CLN Coll Status
1498: IF (UPPER(p_command_success) = 'TRUE') THEN
1517:
1518: IF (UPPER(p_command_success) <> 'TRUE') THEN
1519: -- Make API call to update APC event disposition
1520: IF (g_debug_Level <= 1) THEN
1521: cln_debug_pub.Add('-- Calling API EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION --',1);
1522: cln_debug_pub.Add(' disposition_code -- '|| l_apc_disposition,1);
1523: cln_debug_pub.Add(' disposition_date -- '|| sysdate,1);
1524: cln_debug_pub.Add(' p_cln_id -- '|| rec_cln_id.collaboration_id,1);
1525: END IF;
1518: IF (UPPER(p_command_success) <> 'TRUE') THEN
1519: -- Make API call to update APC event disposition
1520: IF (g_debug_Level <= 1) THEN
1521: cln_debug_pub.Add('-- Calling API EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION --',1);
1522: cln_debug_pub.Add(' disposition_code -- '|| l_apc_disposition,1);
1523: cln_debug_pub.Add(' disposition_date -- '|| sysdate,1);
1524: cln_debug_pub.Add(' p_cln_id -- '|| rec_cln_id.collaboration_id,1);
1525: END IF;
1526:
1519: -- Make API call to update APC event disposition
1520: IF (g_debug_Level <= 1) THEN
1521: cln_debug_pub.Add('-- Calling API EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION --',1);
1522: cln_debug_pub.Add(' disposition_code -- '|| l_apc_disposition,1);
1523: cln_debug_pub.Add(' disposition_date -- '|| sysdate,1);
1524: cln_debug_pub.Add(' p_cln_id -- '|| rec_cln_id.collaboration_id,1);
1525: END IF;
1526:
1527: EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION
1520: IF (g_debug_Level <= 1) THEN
1521: cln_debug_pub.Add('-- Calling API EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION --',1);
1522: cln_debug_pub.Add(' disposition_code -- '|| l_apc_disposition,1);
1523: cln_debug_pub.Add(' disposition_date -- '|| sysdate,1);
1524: cln_debug_pub.Add(' p_cln_id -- '|| rec_cln_id.collaboration_id,1);
1525: END IF;
1526:
1527: EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION
1528: (
1537: x_msg_data => l_msg_data
1538: );
1539:
1540: IF (g_debug_Level <= 1) THEN
1541: cln_debug_pub.Add('-- UPDATE_EVENT_DISPOSITION returned --',1);
1542: cln_debug_pub.Add(' x_return_status -- ' || l_return_status,1);
1543: cln_debug_pub.Add(' x_msg_count -- ' || l_msg_count,1);
1544: cln_debug_pub.Add(' x_msg_data -- ' || l_msg_data,1);
1545: END IF;
1538: );
1539:
1540: IF (g_debug_Level <= 1) THEN
1541: cln_debug_pub.Add('-- UPDATE_EVENT_DISPOSITION returned --',1);
1542: cln_debug_pub.Add(' x_return_status -- ' || l_return_status,1);
1543: cln_debug_pub.Add(' x_msg_count -- ' || l_msg_count,1);
1544: cln_debug_pub.Add(' x_msg_data -- ' || l_msg_data,1);
1545: END IF;
1546:
1539:
1540: IF (g_debug_Level <= 1) THEN
1541: cln_debug_pub.Add('-- UPDATE_EVENT_DISPOSITION returned --',1);
1542: cln_debug_pub.Add(' x_return_status -- ' || l_return_status,1);
1543: cln_debug_pub.Add(' x_msg_count -- ' || l_msg_count,1);
1544: cln_debug_pub.Add(' x_msg_data -- ' || l_msg_data,1);
1545: END IF;
1546:
1547: END IF;
1540: IF (g_debug_Level <= 1) THEN
1541: cln_debug_pub.Add('-- UPDATE_EVENT_DISPOSITION returned --',1);
1542: cln_debug_pub.Add(' x_return_status -- ' || l_return_status,1);
1543: cln_debug_pub.Add(' x_msg_count -- ' || l_msg_count,1);
1544: cln_debug_pub.Add(' x_msg_data -- ' || l_msg_data,1);
1545: END IF;
1546:
1547: END IF;
1548:
1548:
1549: -- Direct call needed, since CLN Detail Id, is required for further processing
1550: -- of map., CLN will defualt the rest of the parameters.
1551: IF (g_debug_Level <= 1) THEN
1552: cln_debug_pub.add('updating collaboration history for cln_id - ' || rec_cln_id.collaboration_id,1);
1553: END IF;
1554:
1555: CLN_CH_COLLABORATION_PKG.UPDATE_COLLABORATION
1556: (
1581: );
1582:
1583:
1584: IF (g_debug_Level <= 1) THEN
1585: cln_debug_pub.add('collaboration history updated for cln_id - ' || rec_cln_id.collaboration_id,1);
1586: cln_debug_pub.add('Collab_detail_id - ' || x_collab_detail_id,1);
1587: cln_debug_pub.add('x_return_status - ' || x_return_status,1);
1588: cln_debug_pub.add('x_msg_data - ' || x_msg_data,1);
1589: END IF;
1582:
1583:
1584: IF (g_debug_Level <= 1) THEN
1585: cln_debug_pub.add('collaboration history updated for cln_id - ' || rec_cln_id.collaboration_id,1);
1586: cln_debug_pub.add('Collab_detail_id - ' || x_collab_detail_id,1);
1587: cln_debug_pub.add('x_return_status - ' || x_return_status,1);
1588: cln_debug_pub.add('x_msg_data - ' || x_msg_data,1);
1589: END IF;
1590:
1583:
1584: IF (g_debug_Level <= 1) THEN
1585: cln_debug_pub.add('collaboration history updated for cln_id - ' || rec_cln_id.collaboration_id,1);
1586: cln_debug_pub.add('Collab_detail_id - ' || x_collab_detail_id,1);
1587: cln_debug_pub.add('x_return_status - ' || x_return_status,1);
1588: cln_debug_pub.add('x_msg_data - ' || x_msg_data,1);
1589: END IF;
1590:
1591:
1584: IF (g_debug_Level <= 1) THEN
1585: cln_debug_pub.add('collaboration history updated for cln_id - ' || rec_cln_id.collaboration_id,1);
1586: cln_debug_pub.add('Collab_detail_id - ' || x_collab_detail_id,1);
1587: cln_debug_pub.add('x_return_status - ' || x_return_status,1);
1588: cln_debug_pub.add('x_msg_data - ' || x_msg_data,1);
1589: END IF;
1590:
1591:
1592: IF x_return_status <> 'S' THEN
1672:
1673: l_event_key := 'M4U_RCIR_BATCH_AK_' || p_command_unique_id;
1674:
1675: IF (g_debug_Level <= 1) THEN
1676: cln_debug_pub.add('--- raising Business Event ---',1);
1677: cln_debug_pub.add('Event-name - ' || l_event_name,1);
1678: cln_debug_pub.add('event-value -' || l_event_key ,1);
1679: END IF;
1680:
1673: l_event_key := 'M4U_RCIR_BATCH_AK_' || p_command_unique_id;
1674:
1675: IF (g_debug_Level <= 1) THEN
1676: cln_debug_pub.add('--- raising Business Event ---',1);
1677: cln_debug_pub.add('Event-name - ' || l_event_name,1);
1678: cln_debug_pub.add('event-value -' || l_event_key ,1);
1679: END IF;
1680:
1681: -- raise event to trigger outbound wlq generation WF
1674:
1675: IF (g_debug_Level <= 1) THEN
1676: cln_debug_pub.add('--- raising Business Event ---',1);
1677: cln_debug_pub.add('Event-name - ' || l_event_name,1);
1678: cln_debug_pub.add('event-value -' || l_event_key ,1);
1679: END IF;
1680:
1681: -- raise event to trigger outbound wlq generation WF
1682: wf_event.raise(
1695: x_msg_data := 'Successfully updated all RCIR-Batch collaborations on RCIR Batch response';
1696: END IF;
1697:
1698: IF (g_debug_Level <= 2) THEN
1699: cln_debug_pub.add('Exiting m4u_resp_process.process_rcir_batch_ack - normal',2);
1700: cln_debug_pub.add('========================================================',2);
1701: END IF;
1702: EXCEPTION
1703: WHEN OTHERS THEN
1696: END IF;
1697:
1698: IF (g_debug_Level <= 2) THEN
1699: cln_debug_pub.add('Exiting m4u_resp_process.process_rcir_batch_ack - normal',2);
1700: cln_debug_pub.add('========================================================',2);
1701: END IF;
1702: EXCEPTION
1703: WHEN OTHERS THEN
1704: -- log exception and exit.
1708: x_msg_data := ' - Unexpected error while processing RCIR Batch response - ' || l_error_code || ':' || l_error_msg;
1709:
1710:
1711: IF (g_debug_Level <= 5) THEN
1712: cln_debug_pub.add(l_error_code || ':' || l_error_msg, 4);
1713: END IF;
1714:
1715: IF (g_debug_Level <= 2) THEN
1716: cln_debug_pub.add('Exiting m4u_resp_process.process_rcir_batch_ack - exception',2);
1712: cln_debug_pub.add(l_error_code || ':' || l_error_msg, 4);
1713: END IF;
1714:
1715: IF (g_debug_Level <= 2) THEN
1716: cln_debug_pub.add('Exiting m4u_resp_process.process_rcir_batch_ack - exception',2);
1717: cln_debug_pub.add('===========================================================',2);
1718: END IF;
1719:
1720: END process_rcir_batch_ack;
1713: END IF;
1714:
1715: IF (g_debug_Level <= 2) THEN
1716: cln_debug_pub.add('Exiting m4u_resp_process.process_rcir_batch_ack - exception',2);
1717: cln_debug_pub.add('===========================================================',2);
1718: END IF;
1719:
1720: END process_rcir_batch_ack;
1721:
1766: BEGIN
1767: l_event_name := 'oracle.apps.cln.np.processnotification';
1768:
1769: IF (g_debug_Level <= 2) THEN
1770: cln_debug_pub.Add('================================================', 2);
1771: cln_debug_pub.Add('-- Entering m4u_resp_process.process_cin_ack -- ', 2);
1772: END IF;
1773:
1774: IF (g_debug_Level <= 1) THEN
1767: l_event_name := 'oracle.apps.cln.np.processnotification';
1768:
1769: IF (g_debug_Level <= 2) THEN
1770: cln_debug_pub.Add('================================================', 2);
1771: cln_debug_pub.Add('-- Entering m4u_resp_process.process_cin_ack -- ', 2);
1772: END IF;
1773:
1774: IF (g_debug_Level <= 1) THEN
1775: cln_debug_pub.Add('-- with paramters -- ', 1);
1771: cln_debug_pub.Add('-- Entering m4u_resp_process.process_cin_ack -- ', 2);
1772: END IF;
1773:
1774: IF (g_debug_Level <= 1) THEN
1775: cln_debug_pub.Add('-- with paramters -- ', 1);
1776: cln_debug_pub.Add('p_command_unique_id -- ' || p_command_unique_id, 1);
1777: cln_debug_pub.Add('p_supp_gln -- ' || p_command_unique_id, 1);
1778: cln_debug_pub.Add('p_command_success -- ' || p_command_success, 1);
1779: cln_debug_pub.Add('p_command_validation_key -- ' || p_command_validation_key, 1);
1772: END IF;
1773:
1774: IF (g_debug_Level <= 1) THEN
1775: cln_debug_pub.Add('-- with paramters -- ', 1);
1776: cln_debug_pub.Add('p_command_unique_id -- ' || p_command_unique_id, 1);
1777: cln_debug_pub.Add('p_supp_gln -- ' || p_command_unique_id, 1);
1778: cln_debug_pub.Add('p_command_success -- ' || p_command_success, 1);
1779: cln_debug_pub.Add('p_command_validation_key -- ' || p_command_validation_key, 1);
1780: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
1773:
1774: IF (g_debug_Level <= 1) THEN
1775: cln_debug_pub.Add('-- with paramters -- ', 1);
1776: cln_debug_pub.Add('p_command_unique_id -- ' || p_command_unique_id, 1);
1777: cln_debug_pub.Add('p_supp_gln -- ' || p_command_unique_id, 1);
1778: cln_debug_pub.Add('p_command_success -- ' || p_command_success, 1);
1779: cln_debug_pub.Add('p_command_validation_key -- ' || p_command_validation_key, 1);
1780: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
1781: cln_debug_pub.Add('p_xmlg_internal_contrlo_no -- ' || p_xmlg_internal_control_no, 1);
1774: IF (g_debug_Level <= 1) THEN
1775: cln_debug_pub.Add('-- with paramters -- ', 1);
1776: cln_debug_pub.Add('p_command_unique_id -- ' || p_command_unique_id, 1);
1777: cln_debug_pub.Add('p_supp_gln -- ' || p_command_unique_id, 1);
1778: cln_debug_pub.Add('p_command_success -- ' || p_command_success, 1);
1779: cln_debug_pub.Add('p_command_validation_key -- ' || p_command_validation_key, 1);
1780: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
1781: cln_debug_pub.Add('p_xmlg_internal_contrlo_no -- ' || p_xmlg_internal_control_no, 1);
1782: END IF;
1775: cln_debug_pub.Add('-- with paramters -- ', 1);
1776: cln_debug_pub.Add('p_command_unique_id -- ' || p_command_unique_id, 1);
1777: cln_debug_pub.Add('p_supp_gln -- ' || p_command_unique_id, 1);
1778: cln_debug_pub.Add('p_command_success -- ' || p_command_success, 1);
1779: cln_debug_pub.Add('p_command_validation_key -- ' || p_command_validation_key, 1);
1780: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
1781: cln_debug_pub.Add('p_xmlg_internal_contrlo_no -- ' || p_xmlg_internal_control_no, 1);
1782: END IF;
1783:
1776: cln_debug_pub.Add('p_command_unique_id -- ' || p_command_unique_id, 1);
1777: cln_debug_pub.Add('p_supp_gln -- ' || p_command_unique_id, 1);
1778: cln_debug_pub.Add('p_command_success -- ' || p_command_success, 1);
1779: cln_debug_pub.Add('p_command_validation_key -- ' || p_command_validation_key, 1);
1780: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
1781: cln_debug_pub.Add('p_xmlg_internal_contrlo_no -- ' || p_xmlg_internal_control_no, 1);
1782: END IF;
1783:
1784: -- set CLN Disposition, CLN Document status, CLN status
1777: cln_debug_pub.Add('p_supp_gln -- ' || p_command_unique_id, 1);
1778: cln_debug_pub.Add('p_command_success -- ' || p_command_success, 1);
1779: cln_debug_pub.Add('p_command_validation_key -- ' || p_command_validation_key, 1);
1780: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
1781: cln_debug_pub.Add('p_xmlg_internal_contrlo_no -- ' || p_xmlg_internal_control_no, 1);
1782: END IF;
1783:
1784: -- set CLN Disposition, CLN Document status, CLN status
1785:
1799: END IF;
1800:
1801: -- Make API call to update APC event disposition
1802: IF (g_debug_Level <= 1) THEN
1803: cln_debug_pub.Add('-- Calling API EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION --',1);
1804: cln_debug_pub.Add(' disposition_code -- '|| l_apc_disposition,1);
1805: cln_debug_pub.Add(' disposition_date -- '|| sysdate,1);
1806: cln_debug_pub.Add(' p_cln_id -- '|| p_command_unique_id,1);
1807: END IF;
1800:
1801: -- Make API call to update APC event disposition
1802: IF (g_debug_Level <= 1) THEN
1803: cln_debug_pub.Add('-- Calling API EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION --',1);
1804: cln_debug_pub.Add(' disposition_code -- '|| l_apc_disposition,1);
1805: cln_debug_pub.Add(' disposition_date -- '|| sysdate,1);
1806: cln_debug_pub.Add(' p_cln_id -- '|| p_command_unique_id,1);
1807: END IF;
1808:
1801: -- Make API call to update APC event disposition
1802: IF (g_debug_Level <= 1) THEN
1803: cln_debug_pub.Add('-- Calling API EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION --',1);
1804: cln_debug_pub.Add(' disposition_code -- '|| l_apc_disposition,1);
1805: cln_debug_pub.Add(' disposition_date -- '|| sysdate,1);
1806: cln_debug_pub.Add(' p_cln_id -- '|| p_command_unique_id,1);
1807: END IF;
1808:
1809: EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION
1802: IF (g_debug_Level <= 1) THEN
1803: cln_debug_pub.Add('-- Calling API EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION --',1);
1804: cln_debug_pub.Add(' disposition_code -- '|| l_apc_disposition,1);
1805: cln_debug_pub.Add(' disposition_date -- '|| sysdate,1);
1806: cln_debug_pub.Add(' p_cln_id -- '|| p_command_unique_id,1);
1807: END IF;
1808:
1809: EGO_UCCNET_EVENTS_PUB.UPDATE_EVENT_DISPOSITION
1810: (
1819: x_msg_data => l_msg_data
1820: );
1821:
1822: IF (g_debug_Level <= 1) THEN
1823: cln_debug_pub.Add('-- UPDATE_EVENT_DISPOSITION returned --',1);
1824: cln_debug_pub.Add(' x_return_status -- '|| l_return_status,1);
1825: cln_debug_pub.Add(' x_msg_count -- '|| l_msg_count,1);
1826: cln_debug_pub.Add(' x_msg_data -- '|| l_msg_data,1);
1827: END IF;
1820: );
1821:
1822: IF (g_debug_Level <= 1) THEN
1823: cln_debug_pub.Add('-- UPDATE_EVENT_DISPOSITION returned --',1);
1824: cln_debug_pub.Add(' x_return_status -- '|| l_return_status,1);
1825: cln_debug_pub.Add(' x_msg_count -- '|| l_msg_count,1);
1826: cln_debug_pub.Add(' x_msg_data -- '|| l_msg_data,1);
1827: END IF;
1828:
1821:
1822: IF (g_debug_Level <= 1) THEN
1823: cln_debug_pub.Add('-- UPDATE_EVENT_DISPOSITION returned --',1);
1824: cln_debug_pub.Add(' x_return_status -- '|| l_return_status,1);
1825: cln_debug_pub.Add(' x_msg_count -- '|| l_msg_count,1);
1826: cln_debug_pub.Add(' x_msg_data -- '|| l_msg_data,1);
1827: END IF;
1828:
1829:
1822: IF (g_debug_Level <= 1) THEN
1823: cln_debug_pub.Add('-- UPDATE_EVENT_DISPOSITION returned --',1);
1824: cln_debug_pub.Add(' x_return_status -- '|| l_return_status,1);
1825: cln_debug_pub.Add(' x_msg_count -- '|| l_msg_count,1);
1826: cln_debug_pub.Add(' x_msg_data -- '|| l_msg_data,1);
1827: END IF;
1828:
1829:
1830: -- Direct call needed, since CLN Detail Id, is required for further processing
1829:
1830: -- Direct call needed, since CLN Detail Id, is required for further processing
1831: -- of map., CLN will defualt the rest of the parameters.
1832: IF (g_debug_Level <= 1) THEN
1833: cln_debug_pub.add('updating collaboration history for cln_id - ' || p_command_unique_id,1);
1834: END IF;
1835:
1836: CLN_CH_COLLABORATION_PKG.UPDATE_COLLABORATION
1837: (
1862: );
1863:
1864:
1865: IF (g_debug_Level <= 1) THEN
1866: cln_debug_pub.add('collaboration history updated for cln_id - ' || p_command_unique_id,1);
1867: cln_debug_pub.add('Collab_detail_id - ' || x_collab_detail_id,1);
1868: cln_debug_pub.add('x_return_status - ' || x_return_status,1);
1869: cln_debug_pub.add('x_msg_data - ' || x_msg_data,1);
1870: END IF;
1863:
1864:
1865: IF (g_debug_Level <= 1) THEN
1866: cln_debug_pub.add('collaboration history updated for cln_id - ' || p_command_unique_id,1);
1867: cln_debug_pub.add('Collab_detail_id - ' || x_collab_detail_id,1);
1868: cln_debug_pub.add('x_return_status - ' || x_return_status,1);
1869: cln_debug_pub.add('x_msg_data - ' || x_msg_data,1);
1870: END IF;
1871:
1864:
1865: IF (g_debug_Level <= 1) THEN
1866: cln_debug_pub.add('collaboration history updated for cln_id - ' || p_command_unique_id,1);
1867: cln_debug_pub.add('Collab_detail_id - ' || x_collab_detail_id,1);
1868: cln_debug_pub.add('x_return_status - ' || x_return_status,1);
1869: cln_debug_pub.add('x_msg_data - ' || x_msg_data,1);
1870: END IF;
1871:
1872: IF x_return_status <> 'S' THEN
1865: IF (g_debug_Level <= 1) THEN
1866: cln_debug_pub.add('collaboration history updated for cln_id - ' || p_command_unique_id,1);
1867: cln_debug_pub.add('Collab_detail_id - ' || x_collab_detail_id,1);
1868: cln_debug_pub.add('x_return_status - ' || x_return_status,1);
1869: cln_debug_pub.add('x_msg_data - ' || x_msg_data,1);
1870: END IF;
1871:
1872: IF x_return_status <> 'S' THEN
1873: x_msg_data := 'Error occured while processing response from UCCnet for CIN message - ' || x_msg_data;
1908:
1909: l_event_key := 'M4U_CINAK_' || p_command_unique_id;
1910:
1911: IF (g_debug_Level <= 1) THEN
1912: cln_debug_pub.add('--- raising Business Event ---',1);
1913: cln_debug_pub.add('Event-name - ' || l_event_name,1);
1914: cln_debug_pub.add('event-value -' || l_event_key ,1);
1915: END IF;
1916:
1909: l_event_key := 'M4U_CINAK_' || p_command_unique_id;
1910:
1911: IF (g_debug_Level <= 1) THEN
1912: cln_debug_pub.add('--- raising Business Event ---',1);
1913: cln_debug_pub.add('Event-name - ' || l_event_name,1);
1914: cln_debug_pub.add('event-value -' || l_event_key ,1);
1915: END IF;
1916:
1917: -- raise event to trigger outbound wlq generation WF
1910:
1911: IF (g_debug_Level <= 1) THEN
1912: cln_debug_pub.add('--- raising Business Event ---',1);
1913: cln_debug_pub.add('Event-name - ' || l_event_name,1);
1914: cln_debug_pub.add('event-value -' || l_event_key ,1);
1915: END IF;
1916:
1917: -- raise event to trigger outbound wlq generation WF
1918: wf_event.raise(
1921: p_parameters => l_event_params
1922: );
1923:
1924: IF (g_debug_Level <= 2) THEN
1925: cln_debug_pub.add('Exiting m4u_resp_process.process_cin_ack - normal',2);
1926: cln_debug_pub.add('=================================================',2);
1927: END IF;
1928: EXCEPTION
1929: WHEN OTHERS THEN
1922: );
1923:
1924: IF (g_debug_Level <= 2) THEN
1925: cln_debug_pub.add('Exiting m4u_resp_process.process_cin_ack - normal',2);
1926: cln_debug_pub.add('=================================================',2);
1927: END IF;
1928: EXCEPTION
1929: WHEN OTHERS THEN
1930: -- log exception and exit.
1934: x_msg_data := ' - Unexpected error while processing CIN response - ' || l_error_code || ':' || l_error_msg;
1935:
1936:
1937: IF (g_debug_Level <= 5) THEN
1938: cln_debug_pub.add(l_error_code || ':' || l_error_msg, 4);
1939: END IF;
1940:
1941: IF (g_debug_Level <= 2) THEN
1942: cln_debug_pub.add('Exiting m4u_resp_process.process_cin_ack - exception',2);
1938: cln_debug_pub.add(l_error_code || ':' || l_error_msg, 4);
1939: END IF;
1940:
1941: IF (g_debug_Level <= 2) THEN
1942: cln_debug_pub.add('Exiting m4u_resp_process.process_cin_ack - exception',2);
1943: cln_debug_pub.add('====================================================',2);
1944: END IF;
1945: END process_cin_ack;
1946:
1939: END IF;
1940:
1941: IF (g_debug_Level <= 2) THEN
1942: cln_debug_pub.add('Exiting m4u_resp_process.process_cin_ack - exception',2);
1943: cln_debug_pub.add('====================================================',2);
1944: END IF;
1945: END process_cin_ack;
1946:
1947:
2004:
2005: l_event_name := 'oracle.apps.cln.np.processnotification';
2006:
2007: IF (g_debug_Level <= 2) THEN
2008: cln_debug_pub.Add('-- Entering m4u_resp_process.process_rfcin_notification -- ', 2);
2009: END IF;
2010:
2011: IF (g_debug_Level <= 1) THEN
2012: cln_debug_pub.Add('-- with paramters -- ', 1);
2008: cln_debug_pub.Add('-- Entering m4u_resp_process.process_rfcin_notification -- ', 2);
2009: END IF;
2010:
2011: IF (g_debug_Level <= 1) THEN
2012: cln_debug_pub.Add('-- with paramters -- ', 1);
2013: cln_debug_pub.Add('p_wlq_message_id -- ' || p_wlq_message_id, 1);
2014: cln_debug_pub.Add('p_target_market_country -- ' || p_target_market_country, 1);
2015: cln_debug_pub.Add('p_target_market_subdivision -- ' || p_target_market_subdivision, 1);
2016: cln_debug_pub.Add('p_gtin -- ' || p_gtin, 1);
2009: END IF;
2010:
2011: IF (g_debug_Level <= 1) THEN
2012: cln_debug_pub.Add('-- with paramters -- ', 1);
2013: cln_debug_pub.Add('p_wlq_message_id -- ' || p_wlq_message_id, 1);
2014: cln_debug_pub.Add('p_target_market_country -- ' || p_target_market_country, 1);
2015: cln_debug_pub.Add('p_target_market_subdivision -- ' || p_target_market_subdivision, 1);
2016: cln_debug_pub.Add('p_gtin -- ' || p_gtin, 1);
2017: cln_debug_pub.Add('p_data_recipient -- ' || p_data_recipient, 1);
2010:
2011: IF (g_debug_Level <= 1) THEN
2012: cln_debug_pub.Add('-- with paramters -- ', 1);
2013: cln_debug_pub.Add('p_wlq_message_id -- ' || p_wlq_message_id, 1);
2014: cln_debug_pub.Add('p_target_market_country -- ' || p_target_market_country, 1);
2015: cln_debug_pub.Add('p_target_market_subdivision -- ' || p_target_market_subdivision, 1);
2016: cln_debug_pub.Add('p_gtin -- ' || p_gtin, 1);
2017: cln_debug_pub.Add('p_data_recipient -- ' || p_data_recipient, 1);
2018: cln_debug_pub.Add('p_data_source -- ' || p_data_source, 1);
2011: IF (g_debug_Level <= 1) THEN
2012: cln_debug_pub.Add('-- with paramters -- ', 1);
2013: cln_debug_pub.Add('p_wlq_message_id -- ' || p_wlq_message_id, 1);
2014: cln_debug_pub.Add('p_target_market_country -- ' || p_target_market_country, 1);
2015: cln_debug_pub.Add('p_target_market_subdivision -- ' || p_target_market_subdivision, 1);
2016: cln_debug_pub.Add('p_gtin -- ' || p_gtin, 1);
2017: cln_debug_pub.Add('p_data_recipient -- ' || p_data_recipient, 1);
2018: cln_debug_pub.Add('p_data_source -- ' || p_data_source, 1);
2019: cln_debug_pub.Add('p_recipient_data_pool -- ' || p_recipient_data_pool, 1);
2012: cln_debug_pub.Add('-- with paramters -- ', 1);
2013: cln_debug_pub.Add('p_wlq_message_id -- ' || p_wlq_message_id, 1);
2014: cln_debug_pub.Add('p_target_market_country -- ' || p_target_market_country, 1);
2015: cln_debug_pub.Add('p_target_market_subdivision -- ' || p_target_market_subdivision, 1);
2016: cln_debug_pub.Add('p_gtin -- ' || p_gtin, 1);
2017: cln_debug_pub.Add('p_data_recipient -- ' || p_data_recipient, 1);
2018: cln_debug_pub.Add('p_data_source -- ' || p_data_source, 1);
2019: cln_debug_pub.Add('p_recipient_data_pool -- ' || p_recipient_data_pool, 1);
2020: cln_debug_pub.Add('p_classification_category -- ' || p_classification_category, 1);
2013: cln_debug_pub.Add('p_wlq_message_id -- ' || p_wlq_message_id, 1);
2014: cln_debug_pub.Add('p_target_market_country -- ' || p_target_market_country, 1);
2015: cln_debug_pub.Add('p_target_market_subdivision -- ' || p_target_market_subdivision, 1);
2016: cln_debug_pub.Add('p_gtin -- ' || p_gtin, 1);
2017: cln_debug_pub.Add('p_data_recipient -- ' || p_data_recipient, 1);
2018: cln_debug_pub.Add('p_data_source -- ' || p_data_source, 1);
2019: cln_debug_pub.Add('p_recipient_data_pool -- ' || p_recipient_data_pool, 1);
2020: cln_debug_pub.Add('p_classification_category -- ' || p_classification_category, 1);
2021: cln_debug_pub.Add('p_rfcin_unique_id -- ' || p_rfcin_unique_id, 1);
2014: cln_debug_pub.Add('p_target_market_country -- ' || p_target_market_country, 1);
2015: cln_debug_pub.Add('p_target_market_subdivision -- ' || p_target_market_subdivision, 1);
2016: cln_debug_pub.Add('p_gtin -- ' || p_gtin, 1);
2017: cln_debug_pub.Add('p_data_recipient -- ' || p_data_recipient, 1);
2018: cln_debug_pub.Add('p_data_source -- ' || p_data_source, 1);
2019: cln_debug_pub.Add('p_recipient_data_pool -- ' || p_recipient_data_pool, 1);
2020: cln_debug_pub.Add('p_classification_category -- ' || p_classification_category, 1);
2021: cln_debug_pub.Add('p_rfcin_unique_id -- ' || p_rfcin_unique_id, 1);
2022: cln_debug_pub.Add('p_rfcin_owner_gln -- ' || p_rfcin_owner_gln, 1);
2015: cln_debug_pub.Add('p_target_market_subdivision -- ' || p_target_market_subdivision, 1);
2016: cln_debug_pub.Add('p_gtin -- ' || p_gtin, 1);
2017: cln_debug_pub.Add('p_data_recipient -- ' || p_data_recipient, 1);
2018: cln_debug_pub.Add('p_data_source -- ' || p_data_source, 1);
2019: cln_debug_pub.Add('p_recipient_data_pool -- ' || p_recipient_data_pool, 1);
2020: cln_debug_pub.Add('p_classification_category -- ' || p_classification_category, 1);
2021: cln_debug_pub.Add('p_rfcin_unique_id -- ' || p_rfcin_unique_id, 1);
2022: cln_debug_pub.Add('p_rfcin_owner_gln -- ' || p_rfcin_owner_gln, 1);
2023: cln_debug_pub.Add('p_reload_flag -- ' || p_reload_flag, 1);
2016: cln_debug_pub.Add('p_gtin -- ' || p_gtin, 1);
2017: cln_debug_pub.Add('p_data_recipient -- ' || p_data_recipient, 1);
2018: cln_debug_pub.Add('p_data_source -- ' || p_data_source, 1);
2019: cln_debug_pub.Add('p_recipient_data_pool -- ' || p_recipient_data_pool, 1);
2020: cln_debug_pub.Add('p_classification_category -- ' || p_classification_category, 1);
2021: cln_debug_pub.Add('p_rfcin_unique_id -- ' || p_rfcin_unique_id, 1);
2022: cln_debug_pub.Add('p_rfcin_owner_gln -- ' || p_rfcin_owner_gln, 1);
2023: cln_debug_pub.Add('p_reload_flag -- ' || p_reload_flag, 1);
2024: cln_debug_pub.Add('p_rfcin_creation_date -- ' || p_rfcin_creation_date, 1);
2017: cln_debug_pub.Add('p_data_recipient -- ' || p_data_recipient, 1);
2018: cln_debug_pub.Add('p_data_source -- ' || p_data_source, 1);
2019: cln_debug_pub.Add('p_recipient_data_pool -- ' || p_recipient_data_pool, 1);
2020: cln_debug_pub.Add('p_classification_category -- ' || p_classification_category, 1);
2021: cln_debug_pub.Add('p_rfcin_unique_id -- ' || p_rfcin_unique_id, 1);
2022: cln_debug_pub.Add('p_rfcin_owner_gln -- ' || p_rfcin_owner_gln, 1);
2023: cln_debug_pub.Add('p_reload_flag -- ' || p_reload_flag, 1);
2024: cln_debug_pub.Add('p_rfcin_creation_date -- ' || p_rfcin_creation_date, 1);
2025: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
2018: cln_debug_pub.Add('p_data_source -- ' || p_data_source, 1);
2019: cln_debug_pub.Add('p_recipient_data_pool -- ' || p_recipient_data_pool, 1);
2020: cln_debug_pub.Add('p_classification_category -- ' || p_classification_category, 1);
2021: cln_debug_pub.Add('p_rfcin_unique_id -- ' || p_rfcin_unique_id, 1);
2022: cln_debug_pub.Add('p_rfcin_owner_gln -- ' || p_rfcin_owner_gln, 1);
2023: cln_debug_pub.Add('p_reload_flag -- ' || p_reload_flag, 1);
2024: cln_debug_pub.Add('p_rfcin_creation_date -- ' || p_rfcin_creation_date, 1);
2025: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
2026: cln_debug_pub.Add('p_xmlg_internal_control_no -- ' || p_xmlg_internal_control_no, 1);
2019: cln_debug_pub.Add('p_recipient_data_pool -- ' || p_recipient_data_pool, 1);
2020: cln_debug_pub.Add('p_classification_category -- ' || p_classification_category, 1);
2021: cln_debug_pub.Add('p_rfcin_unique_id -- ' || p_rfcin_unique_id, 1);
2022: cln_debug_pub.Add('p_rfcin_owner_gln -- ' || p_rfcin_owner_gln, 1);
2023: cln_debug_pub.Add('p_reload_flag -- ' || p_reload_flag, 1);
2024: cln_debug_pub.Add('p_rfcin_creation_date -- ' || p_rfcin_creation_date, 1);
2025: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
2026: cln_debug_pub.Add('p_xmlg_internal_control_no -- ' || p_xmlg_internal_control_no, 1);
2027: END IF;
2020: cln_debug_pub.Add('p_classification_category -- ' || p_classification_category, 1);
2021: cln_debug_pub.Add('p_rfcin_unique_id -- ' || p_rfcin_unique_id, 1);
2022: cln_debug_pub.Add('p_rfcin_owner_gln -- ' || p_rfcin_owner_gln, 1);
2023: cln_debug_pub.Add('p_reload_flag -- ' || p_reload_flag, 1);
2024: cln_debug_pub.Add('p_rfcin_creation_date -- ' || p_rfcin_creation_date, 1);
2025: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
2026: cln_debug_pub.Add('p_xmlg_internal_control_no -- ' || p_xmlg_internal_control_no, 1);
2027: END IF;
2028:
2021: cln_debug_pub.Add('p_rfcin_unique_id -- ' || p_rfcin_unique_id, 1);
2022: cln_debug_pub.Add('p_rfcin_owner_gln -- ' || p_rfcin_owner_gln, 1);
2023: cln_debug_pub.Add('p_reload_flag -- ' || p_reload_flag, 1);
2024: cln_debug_pub.Add('p_rfcin_creation_date -- ' || p_rfcin_creation_date, 1);
2025: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
2026: cln_debug_pub.Add('p_xmlg_internal_control_no -- ' || p_xmlg_internal_control_no, 1);
2027: END IF;
2028:
2029: IF (g_debug_Level <= 1) THEN
2022: cln_debug_pub.Add('p_rfcin_owner_gln -- ' || p_rfcin_owner_gln, 1);
2023: cln_debug_pub.Add('p_reload_flag -- ' || p_reload_flag, 1);
2024: cln_debug_pub.Add('p_rfcin_creation_date -- ' || p_rfcin_creation_date, 1);
2025: cln_debug_pub.Add('p_ucc_doc_unique_id -- ' || p_ucc_doc_unique_id, 1);
2026: cln_debug_pub.Add('p_xmlg_internal_control_no -- ' || p_xmlg_internal_control_no, 1);
2027: END IF;
2028:
2029: IF (g_debug_Level <= 1) THEN
2030: cln_debug_pub.add('Calling Create Collaboration API',1);
2026: cln_debug_pub.Add('p_xmlg_internal_control_no -- ' || p_xmlg_internal_control_no, 1);
2027: END IF;
2028:
2029: IF (g_debug_Level <= 1) THEN
2030: cln_debug_pub.add('Calling Create Collaboration API',1);
2031: END IF;
2032:
2033: cln_ch_collaboration_pkg.create_collaboration (
2034: x_return_status => l_return_status,
2074: p_collaboration_standard => 'UCCNET'
2075: );
2076:
2077: IF (g_debug_Level <= 1) THEN
2078: cln_debug_pub.add('create Collaboration returned ---',1);
2079: cln_debug_pub.add('Collab_detail_id - ' || l_coll_id,1);
2080: cln_debug_pub.add('x_return_status - ' || l_return_status,1);
2081: cln_debug_pub.add('x_msg_data - ' || l_msg_data,1);
2082: END IF;
2075: );
2076:
2077: IF (g_debug_Level <= 1) THEN
2078: cln_debug_pub.add('create Collaboration returned ---',1);
2079: cln_debug_pub.add('Collab_detail_id - ' || l_coll_id,1);
2080: cln_debug_pub.add('x_return_status - ' || l_return_status,1);
2081: cln_debug_pub.add('x_msg_data - ' || l_msg_data,1);
2082: END IF;
2083:
2076:
2077: IF (g_debug_Level <= 1) THEN
2078: cln_debug_pub.add('create Collaboration returned ---',1);
2079: cln_debug_pub.add('Collab_detail_id - ' || l_coll_id,1);
2080: cln_debug_pub.add('x_return_status - ' || l_return_status,1);
2081: cln_debug_pub.add('x_msg_data - ' || l_msg_data,1);
2082: END IF;
2083:
2084: x_return_status := l_return_status;
2077: IF (g_debug_Level <= 1) THEN
2078: cln_debug_pub.add('create Collaboration returned ---',1);
2079: cln_debug_pub.add('Collab_detail_id - ' || l_coll_id,1);
2080: cln_debug_pub.add('x_return_status - ' || l_return_status,1);
2081: cln_debug_pub.add('x_msg_data - ' || l_msg_data,1);
2082: END IF;
2083:
2084: x_return_status := l_return_status;
2085: x_msg_data := l_msg_data;
2086:
2087: IF(l_return_status <> 'S') THEN
2088: RETURN;
2089: IF (g_debug_Level <= 2) THEN
2090: cln_debug_pub.add('Exiting process_rfcin_notification - ' || l_return_status,2);
2091: cln_debug_pub.add('===========================================',2);
2092: END IF;
2093: END IF;
2094:
2087: IF(l_return_status <> 'S') THEN
2088: RETURN;
2089: IF (g_debug_Level <= 2) THEN
2090: cln_debug_pub.add('Exiting process_rfcin_notification - ' || l_return_status,2);
2091: cln_debug_pub.add('===========================================',2);
2092: END IF;
2093: END IF;
2094:
2095: l_notif_mesg := 'Request For CIN, received on with following details';
2128:
2129: l_event_key := 'RESP_RFCIN_' || l_coll_id;
2130:
2131: IF (g_debug_Level <= 1) THEN
2132: cln_debug_pub.Add('-- CLN notification raised -- event_key ' || l_event_key, 1);
2133: END IF;
2134:
2135: -- raise event to trigger outbound wlq generation WF
2136: wf_event.raise(
2139: p_parameters => l_event_params
2140: );
2141:
2142: IF (g_debug_Level <= 2) THEN
2143: cln_debug_pub.Add('-- Exiting m4u_resp_process.process_rfcin_notification success-- ', 2);
2144: END IF;
2145:
2146:
2147:
2156: x_msg_data := ' - Unexpected error in m4u_resp_process.process_rfcin_notification' || l_error_code || ':' || l_error_msg;
2157:
2158:
2159: IF (g_debug_Level <= 5) THEN
2160: cln_debug_pub.add(l_error_code || ':' || l_error_msg, 4);
2161: END IF;
2162:
2163: IF (g_debug_Level <= 2) THEN
2164: cln_debug_pub.add('Exiting process_rfcin_notification - exception',2);
2160: cln_debug_pub.add(l_error_code || ':' || l_error_msg, 4);
2161: END IF;
2162:
2163: IF (g_debug_Level <= 2) THEN
2164: cln_debug_pub.add('Exiting process_rfcin_notification - exception',2);
2165: cln_debug_pub.add('==============================================',2);
2166: END IF;
2167: END;
2168:
2161: END IF;
2162:
2163: IF (g_debug_Level <= 2) THEN
2164: cln_debug_pub.add('Exiting process_rfcin_notification - exception',2);
2165: cln_debug_pub.add('==============================================',2);
2166: END IF;
2167: END;
2168:
2169: