The following lines contain the word 'select', 'insert', 'update' or 'delete':
** the operation (insert, update ,delete)
*/
PROCEDURE AddfailMsg
( p_object IN VARCHAR2,
p_operation IN VARCHAR2 ) IS
BEGIN
fnd_message.set_name('OKL', 'OKL_FAILED_OPERATION');
SELECT application_id
FROM fnd_application_vl
WHERE application_short_name = x_short_name;
SELECT msg.message_number
FROM fnd_new_messages msg, fnd_languages_vl lng
WHERE msg.message_name = x_msg
and msg.application_id = x_id
and lng.LANGUAGE_CODE = msg.language_code
and lng.language_id = x_lang_id;
SELECT okl_wf_item_s.nextval
FROM dual;
is select crt.report_number
,pov.vendor_name
from okl_cure_reports crt,
po_vendors pov
where crt.vendor_id =pov.vendor_id
and crt.cure_report_id =p_cure_report_id;
select wfr.name
from fnd_user fuser,wf_roles wfr
where orig_system = 'PER'
and wfr.orig_system_id =fuser.employee_id
and fuser.user_id =p_user_id;
l_parameter_list.DELETE;
select object_version_number
from okl_cure_reports
where cure_report_id =p_report_id;
p_operation => 'UPDATE' );
OKL_cure_reports_pub.update_cure_reports(
p_api_version => 1.0
,p_init_msg_list => 'F'
,x_return_status => l_return_status
,x_msg_count => l_msg_count
,x_msg_data => l_msg_data
,p_crtv_rec => lp_crtv_rec
,x_crtv_rec => lx_crtv_rec);
okl_debug_pub.logmessage('OKL_CURE_WF: invoke_report_wf : OKL_cure_reports_pub.update_cure_reports : '||l_return_status);
OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Success -updated cure refund header' );
called from the workflow to update cure reports based on
the approval
**/
PROCEDURE set_approval_status (itemtype in varchar2,
itemkey in varchar2,
actid in number,
funcmode in varchar2,
result out nocopy varchar2) IS
l_api_version NUMBER := 1;
select object_version_number
from okl_cure_reports
where cure_report_id =p_report_id;
OKL_cure_reports_pub.update_cure_reports(
p_api_version => 1.0
,p_init_msg_list => 'F'
,x_return_status => l_return_status
,x_msg_count => l_msg_count
,x_msg_data => l_msg_data
,p_crtv_rec => lp_crtv_rec
,x_crtv_rec => lx_crtv_rec);
okl_debug_pub.logmessage('OKL_CURE_WF: set_approval_status : OKL_cure_reports_pub.update_cure_reports : '||l_return_status);
called from the workflow to update cure reports based on
the approval
**/
PROCEDURE set_reject_status (itemtype in varchar2,
itemkey in varchar2,
actid in number,
funcmode in varchar2,
result out nocopy varchar2) IS
l_api_version NUMBER := 1;
select object_version_number
from okl_cure_reports
where cure_report_id =p_report_id;
OKL_cure_reports_pub.update_cure_reports(
p_api_version => 1.0
,p_init_msg_list => 'F'
,x_return_status => l_return_status
,x_msg_count => l_msg_count
,x_msg_data => l_msg_data
,p_crtv_rec => lp_crtv_rec
,x_crtv_rec => lx_crtv_rec);
okl_debug_pub.logmessage('OKL_CURE_WF: set_reject_status : OKL_cure_reports_pub.update_cure_reports : '||l_return_status);