The following lines contain the word 'select', 'insert', 'update' or 'delete':
select nvl(acceptance_required_flag,'N')
into l_acc_req_flag
from po_headers_all
where po_header_id = p_header_id;
select count(1) into
l_pending_count
from po_change_requests
where initiator = 'SUPPLIER'
and document_header_id = p_header_id
and request_status = 'PENDING'
and change_active_flag = 'Y';
select nvl(acceptance_required_flag,'N')
into l_acc_req_flag
from po_releases_all
where po_release_id = p_release_id;
select count(1) into
l_pending_count
from po_change_requests
where initiator = 'SUPPLIER'
and document_header_id = p_header_id
and po_release_id = p_release_id
and request_status = 'PENDING'
and change_active_flag = 'Y';
*PO_REQAPPROVAL_INIT1.Register_rejection will be updated to support older version of poxwfpoa.wft
*In other words, initial version of poxwfpoa.wft only calls PO_REQ_APPROVAL_INIT1.Register_rejection.
*New version will call po_sup_chg_request_wf_grp.IS_PO_HDR_REJECTED followed by po_sup_chg_request_wf_grp.Register_rejection.
*In order for older version of workflow to have the new functionality, PO_REQ_APPROVAL_INIT1.Register_rejection will
*need to include the logic of po_sup_chg_request_wf_grp.IS_PO_HDR_REJECTED within.
*/
procedure Register_rejection ( itemtype in varchar2,
itemkey in varchar2,
actid in number,
funcmode in varchar2,
result out NOCOPY varchar2 )
is
begin
PO_ChangeOrderWF_PVT.Register_rejection( itemtype,
itemkey,
actid,
funcmode,
result);
*update authorization_status of PO to "APPROVED".
*/
procedure CHG_STATUS_TO_APPROVED(itemtype in varchar2,
itemkey in varchar2,
actid in number,
funcmode in varchar2,
resultout out NOCOPY varchar2)
IS
BEGIN
PO_ChangeOrderWF_PVT.CHG_STATUS_TO_APPROVED(itemtype, itemkey, actid,
funcmode, resultout);
p_mass_update_releases IN VARCHAR2 DEFAULT NULL -- Bug 3373453
)
IS
BEGIN
PO_ChangeOrderWF_PVT.ProcessResponse( p_api_version,
x_return_status,
p_header_id,
p_release_id,
p_revision_num,
p_chg_req_grp_id,
p_user_id,
x_err_msg,
x_return_code,
x_doc_check_rec_type,
p_flag,
p_launch_approvals_flag,
p_mass_update_releases
);
select to_char(PO_WF_ITEMKEY_S.NEXTVAL)
into l_seq_for_item_key
from sys.dual;
select min(request_origin) into src
from po_change_requests
where change_request_group_id = l_change_request_group_id and
request_origin is not null;
select user_id
into l_supplier_user_id
from fnd_user
where user_name=l_supplier_username
and rownum=1;