23: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
24: k NUMBER;
25: l_last_rundate DATE;
26: l_variance okc_condition_headers_b.cnh_variance%TYPE;
27: --l_corrid_rec okc_aq_pub.corrid_rec_typ;
28: l_msg_tbl okc_aq_pub.msg_tab_typ;
29: l_element_name okc_action_attributes_b.element_name%TYPE;
30: l_element_value VARCHAR2(100);
31: l_acn_id NUMBER;
24: k NUMBER;
25: l_last_rundate DATE;
26: l_variance okc_condition_headers_b.cnh_variance%TYPE;
27: --l_corrid_rec okc_aq_pub.corrid_rec_typ;
28: l_msg_tbl okc_aq_pub.msg_tab_typ;
29: l_element_name okc_action_attributes_b.element_name%TYPE;
30: l_element_value VARCHAR2(100);
31: l_acn_id NUMBER;
32:
199: END IF;
200: END LOOP;
201: -- call OKC_AQ_PVT.send_messages to generate the XML string and put it
202: -- on the queue
203: /* OKC_AQ_PUB.send_message(p_api_version =>1.0
204: ,p_init_msg_list => 'F'
205: ,x_msg_count => x_msg_count
206: ,x_msg_data => x_msg_data
207: ,x_return_status => l_return_status
303: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
304: k NUMBER;
305: l_last_rundate DATE;
306: l_variance okc_condition_headers_b.cnh_variance%TYPE;
307: --l_corrid_rec okc_aq_pub.corrid_rec_typ;
308: l_msg_tbl okc_aq_pub.msg_tab_typ;
309: l_element_name okc_action_attributes_b.element_name%TYPE;
310: l_element_value VARCHAR2(100);
311: l_acn_id NUMBER;
304: k NUMBER;
305: l_last_rundate DATE;
306: l_variance okc_condition_headers_b.cnh_variance%TYPE;
307: --l_corrid_rec okc_aq_pub.corrid_rec_typ;
308: l_msg_tbl okc_aq_pub.msg_tab_typ;
309: l_element_name okc_action_attributes_b.element_name%TYPE;
310: l_element_value VARCHAR2(100);
311: l_acn_id NUMBER;
312:
482: END IF;
483: END LOOP; -- built the element table for K
484:
485: IF (l_debug = 'Y') THEN
486: okc_debug.Log('140: Calling OKC_AQ_PUB.send_message ',2);
487: END IF;
488:
489: -- call OKC_AQ_PVT.send_messages to generate the XML string and put it
490: -- on the queue
487: END IF;
488:
489: -- call OKC_AQ_PVT.send_messages to generate the XML string and put it
490: -- on the queue
491: /* OKC_AQ_PUB.send_message(p_api_version =>'1.0'
492: ,p_init_msg_list => 'F'
493: ,x_msg_count => x_msg_count
494: ,x_msg_data => x_msg_data
495: ,x_return_status => l_return_status
515: p_msg_tab =>l_msg_tbl
516: );
517:
518: IF (l_debug = 'Y') THEN
519: okc_debug.Log('150: Called OKC_AQ_PUB.send_message ',2);
520: okc_debug.Log('160: l_return_status : '||l_return_status,2);
521: END IF;
522:
523: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN