The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT to_char(reqLineId) || '-' || to_char(POR_CANCEL_NOTIF_ITEMKEY_S.nextval)
INTO l_itemkey
FROM dual;
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,g_module_prefix || l_api_name || l_progress);
SELECT count(*)
INTO l_wf_created
FROM wf_items
WHERE
item_type=l_itemtype AND
item_key = l_itemkey;
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(l_itemtype,l_itemkey,g_module_prefix || l_api_name || l_progress);
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,g_module_prefix || l_api_name || l_progress);
select nvl(prh.supplier_notified_flag, 'N'), prl.contractor_status
into l_supplier_notified_flag, l_contractor_status
from
po_requisition_headers_all prh,
po_requisition_lines_all prl
where
prh.requisition_header_id = prl.requisition_header_id and
requisition_line_id = l_req_line_id;
select user_name
into l_user_name
from fnd_user
where user_id = to_number(l_user_id);
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,g_module_prefix || l_api_name || l_progress);
SELECT pja.job_description, prl.contact_information,
prl.assignment_start_date, prh.segment1 || ' / ' || to_char(prl.line_num)
INTO l_job_name, l_contact_info, l_start_date, l_req_info
FROM
po_requisition_headers_all prh,
po_requisition_lines_all prl,
po_job_associations pja
WHERE prl.requisition_line_id = l_req_line_id AND
prl.job_id = pja.job_id AND
prh.requisition_header_id = prl.requisition_header_id;
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,g_module_prefix || l_api_name || l_progress);
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,g_module_prefix || l_api_name || l_progress || l_cont_status);
update po_requisition_suppliers
set SUPPLIER_NOTIFIED_FLAG = 'N'
where requisition_line_id = l_req_line_id;
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,g_module_prefix || l_api_name || l_progress);
SELECT max(requisition_supplier_id)
INTO l_requisition_supplier_id
FROM po_requisition_suppliers
WHERE
requisition_line_id = l_req_line_id AND
nvl(supplier_notified_flag, 'N') = 'N';
PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,
g_module_prefix || l_api_name || 'PERFORMER: ' || l_performer);
PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,
g_module_prefix || l_api_name || 'PERFORMER: ' || l_performer);
SELECT max(vendor_id)
INTO l_requisition_supplier_id
FROM po_requisition_lines
WHERE
requisition_line_id = l_req_line_id AND
nvl(supplier_notified_for_cancel, 'N')='N';
PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,
g_module_prefix || l_api_name || 'PERFORMER: ' || l_performer);
PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,
g_module_prefix || l_api_name || 'PERFORMER: ' || l_performer);
* Updates SUPPLIER_NOTIFIED_FOR_CANCEL flag in po_requisition_lines *
*==========================================================================*/
PROCEDURE post_notification_process(itemtype in varchar2,
itemkey in varchar2,
actid in number,
funcmode in varchar2,
resultout out NOCOPY varchar2)
IS
l_progress varchar2(200);
/* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,g_module_prefix || l_api_name || l_progress);
UPDATE po_requisition_lines_all
SET supplier_notified_for_cancel ='Y'
WHERE requisition_line_id = l_req_line_id;
UPDATE po_requisition_suppliers
SET supplier_notified_flag='Y'
WHERE requisition_supplier_id = l_supplier_id;