[Home] [Help]
1: PACKAGE BODY PO_ReqChangeRequestWF_PVT AS
2: /* $Header: POXVRCWB.pls 120.91.12020000.5 2013/04/12 09:16:29 mzhussai ship $ */
3:
4:
5: -- Read the profile option that enables/disables the debug log
22: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
23: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
24: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
25: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
26: G_MODULE_NAME CONSTANT VARCHAR2(100) := 'po.plsql.PO_REQCHANGEREQUESTWF_PVT';
27:
28: /*************************************************************************
29: * Private Procedure: StartPOChangeWF
30: *
272: x_new_amount OUT NOCOPY VARCHAR2 );
273:
274: /*********************************************************************************************
275: * Private Procedure: UpdatePODocHeaderTables
276: * Effects: This procedure gets invoked from PO_ReqChangeRequestWF_PVT.New_PO_Change_Exists
277: *
278: * When there is a change request,updating of the table po_header_all/po_release_all
279: * based on the status of the change requests can also be done by an autonomous block
280: * which there by can create a deadlock.Hence included the updating of tables in
573: i number;
574: l_save_failure exception;
575: l_error_message varchar2(240);
576: l_error_message1 varchar2(2000);
577: x_progress varchar2(100):='PO_ReqChangeRequestWF_PVT.ValidateAndSaveRequest:000';
578: begin
579:
580:
581: -- get the status of the doc, validation api will be called
591: from po_releases_all
592: where po_release_id=p_po_release_id;
593: end if;
594:
595: x_progress :='PO_ReqChangeRequestWF_PVT.ValidateAndSaveRequest:001';
596:
597: -- if the doc is in approved status, call validation
598: -- api. if the validation check fails, we won't save
599: -- the po change requests, and also reject the parent
610: p_po_change_requests => p_po_change_requests,
611: x_online_report_id => l_online_report_id,
612: x_pos_errors => l_pos_errors,
613: x_doc_check_error_msg => l_doc_check_rec_type);
614: x_progress :='PO_ReqChangeRequestWF_PVT.ValidateAndSaveRequest:002'
615: ||l_return_status;
616:
617: if(l_return_status <> 'S' ) then
618: -- error, so reject the change request
628: end loop;
629: end if;
630: l_error_message:=substr(l_error_message||l_msg_data||':', 1, 240);
631:
632: x_progress :='PO_ReqChangeRequestWF_PVT.ValidateAndSaveRequest:003';
633: l_record_count:=p_po_change_requests.count();
634: FOR i in 1..l_record_count LOOP
635: update po_change_requests
636: set request_status='REJECTED',
642: validation_error=l_error_message
643: where change_request_id=
644: p_po_change_requests(i).parent_change_request_id;
645: end loop;
646: x_progress :='PO_ReqChangeRequestWF_PVT.ValidateAndSaveRequest:004';
647: else
648: -- save the request, check for auto approval
649: x_progress :='PO_ReqChangeRequestWF_PVT.ValidateAndSaveRequest:005';
650:
645: end loop;
646: x_progress :='PO_ReqChangeRequestWF_PVT.ValidateAndSaveRequest:004';
647: else
648: -- save the request, check for auto approval
649: x_progress :='PO_ReqChangeRequestWF_PVT.ValidateAndSaveRequest:005';
650:
651: PO_CHG_REQUEST_PVT.save_request(
652: p_api_version =>1.0,
653: p_Init_Msg_List =>FND_API.G_FALSE,
662: raise l_save_failure;
663: end if;
664:
665: CheckPOAutoApproval(l_change_request_group_id);
666: x_progress :='PO_ReqChangeRequestWF_PVT.ValidateAndSaveRequest:006';
667: end if;
668: elsif(l_doc_status='REJECTED') then
669: -- reject the change immediately
670: x_progress :='PO_ReqChangeRequestWF_PVT.ValidateAndSaveRequest:007';
666: x_progress :='PO_ReqChangeRequestWF_PVT.ValidateAndSaveRequest:006';
667: end if;
668: elsif(l_doc_status='REJECTED') then
669: -- reject the change immediately
670: x_progress :='PO_ReqChangeRequestWF_PVT.ValidateAndSaveRequest:007';
671: l_record_count:=p_po_change_requests.count();
672: FOR i in 1..l_record_count LOOP
673: update po_change_requests
674: set request_status='REJECTED',
677: response_reason=fnd_message.get_string('PO', 'PO_RCO_PO_REJECTED')
678: where change_request_id=
679: p_po_change_requests(i).parent_change_request_id;
680: end loop;
681: x_progress :='PO_ReqChangeRequestWF_PVT.ValidateAndSaveRequest:008';
682: else
683: -- save the request. no auto approval at this time
684: -- it will be done when the PO is back to approved status
685: x_progress :='PO_ReqChangeRequestWF_PVT.ValidateAndSaveRequest:009';
681: x_progress :='PO_ReqChangeRequestWF_PVT.ValidateAndSaveRequest:008';
682: else
683: -- save the request. no auto approval at this time
684: -- it will be done when the PO is back to approved status
685: x_progress :='PO_ReqChangeRequestWF_PVT.ValidateAndSaveRequest:009';
686: PO_CHG_REQUEST_PVT.save_request(
687: p_api_version =>1.0,
688: p_Init_Msg_List =>FND_API.G_FALSE,
689: x_return_status =>l_return_status,
694: x_request_group_id =>l_change_request_group_id);
695: if(l_return_status <>'S') then
696: raise l_save_failure;
697: end if;
698: x_progress :='PO_ReqChangeRequestWF_PVT.ValidateAndSaveRequest:010';
699: end if;
700: exception
701: when l_save_failure then
702: l_record_count:=p_po_change_requests.count();
709: where change_request_id=
710: p_po_change_requests(i).parent_change_request_id;
711: end loop;
712: when others then
713: wf_core.context('PO_ReqChangeRequestWF_PVT',
714: 'ValidateAndSaveRequest',x_progress||sqlerrm);
715: raise;
716: end ValidateAndSaveRequest;
717:
773: where requisition_line_id=p_req_line_id;
774: x_progress :='002';
775: exception
776: when others then
777: wf_core.context('PO_ReqChangeRequestWF_PVT',
778: 'UpdateReqDistribution',x_progress||sqlerrm);
779: raise;
780: end UpdateReqDistribution;
781:
846: where requisition_line_id=p_req_line_id;
847: x_progress :='005-';
848: EXCEPTION
849: WHEN OTHERS THEN
850: wf_core.context('PO_ReqChangeRequestWF_PVT','UpdateReqLine',x_progress||sqlerrm);
851: raise;
852:
853: end UpdateReqLine;
854:
1581: -- commit;
1582:
1583: exception
1584: when others then
1585: wf_core.context('PO_ReqChangeRequestWF_PVT','ValidateChgAgainstNewPO',x_progress||sqlerrm);
1586: raise;
1587: end ValidateChgAgainstNewPO;
1588:
1589:
2185: x_progress:='ACCEPTANCE:001';
2186: --Set savepoint for rolling back in case the movechangetopo ends with
2187: --error
2188:
2189: SAVEPOINT PO_REQCHANGEREQUESTWF_PVT_SP;
2190:
2191: begin
2192: if (p_supplier_change = 'Y') then
2193: open sco_change_request;
2518: close update_allocation_csr ;
2519: exception
2520: --In case of error, continue workflow
2521: when FND_API.g_exc_error then
2522: rollback to PO_REQCHANGEREQUESTWF_PVT_SP;
2523:
2524: update PO_CHANGE_REQUESTS
2525: set request_status='REJECTED',
2526: change_active_flag='N',
2546: and action_type='MODIFICATION';
2547: --comment raise and continue workflow
2548: --raise;
2549: when others then
2550: rollback to PO_REQCHANGEREQUESTWF_PVT_SP ;
2551: raise;
2552: end;
2553:
2554: end if;
2556: commit;
2557:
2558: EXCEPTION
2559: WHEN OTHERS THEN
2560: wf_core.context('PO_ReqChangeRequestWF_PVT','ProcessBuyerAction',x_progress||sqlerrm);
2561: raise;
2562:
2563: END ProcessBuyerAction;
2564:
2660:
2661: --Set savepoint for rolling back in case the movechangetopo ends with
2662: --error
2663:
2664: SAVEPOINT PO_REQCHANGEREQUESTWF_PVT_SP;
2665:
2666: begin
2667: open sco_change_request;
2668: loop
2893: exception
2894: --In case of error, rollback
2895:
2896: when FND_API.g_exc_error then
2897: rollback to PO_REQCHANGEREQUESTWF_PVT_SP;
2898:
2899: update PO_CHANGE_REQUESTS
2900: set request_status='REJECTED',
2901: change_active_flag='N',
2917: and action_type='MODIFICATION';
2918: raise;
2919:
2920: when others then
2921: rollback to PO_REQCHANGEREQUESTWF_PVT_SP ;
2922: raise;
2923:
2924: end;
2925:
2926: commit;
2927:
2928: EXCEPTION
2929: WHEN OTHERS THEN
2930: wf_core.context('PO_ReqChangeRequestWF_PVT','ProcessSCOAcceptance',x_progress||sqlerrm);
2931: raise;
2932:
2933: END ProcessSCOAcceptance;
2934: /*************************************************************************
2967: commit;
2968:
2969: EXCEPTION
2970: WHEN OTHERS THEN
2971: wf_core.context('PO_ReqChangeRequestWF_PVT','SetPoRequestStatus',sqlerrm);
2972: raise;
2973:
2974: END SetPoRequestStatus;
2975:
3119: pcr.request_reason request_reason,
3120: nvl(pcr.old_need_by_date, pll.need_by_date) old_need_by_date,
3121: pcr.new_need_by_date new_need_by_date,
3122: -- Bug 9738629
3123: (pcr.old_price)/PO_ReqChangeRequestWF_PVT.get_rate(poh.currency_code, prl.currency_code, poh.rate, prl.rate) old_price, -- If Order is in trn currency divide price by rate, else leave it as it is
3124: (pcr.new_price)/PO_ReqChangeRequestWF_PVT.get_rate(poh.currency_code, prl.currency_code, poh.rate, prl.rate) new_price,
3125: to_number(null) old_quantity,
3126: to_number(null) new_quantity,
3127: pcr.change_request_id parent_change_request_id,
3120: nvl(pcr.old_need_by_date, pll.need_by_date) old_need_by_date,
3121: pcr.new_need_by_date new_need_by_date,
3122: -- Bug 9738629
3123: (pcr.old_price)/PO_ReqChangeRequestWF_PVT.get_rate(poh.currency_code, prl.currency_code, poh.rate, prl.rate) old_price, -- If Order is in trn currency divide price by rate, else leave it as it is
3124: (pcr.new_price)/PO_ReqChangeRequestWF_PVT.get_rate(poh.currency_code, prl.currency_code, poh.rate, prl.rate) new_price,
3125: to_number(null) old_quantity,
3126: to_number(null) new_quantity,
3127: pcr.change_request_id parent_change_request_id,
3128: pll.quantity ship_quantity,
3176: nvl(pcr.old_need_by_date, pll.need_by_date) old_need_by_date,
3177: pcr.new_need_by_date new_need_by_date,
3178: -- Bug 9738629
3179: decode(prl.ORDER_TYPE_LOOKUP_CODE,'AMOUNT',pcr.old_price,
3180: (pcr.old_price)/PO_ReqChangeRequestWF_PVT.get_rate(poh.currency_code, prl.currency_code, pod.rate, prl.rate)) old_price,
3181: /* If Order is in trn currency divide price by rate if order_type is not AMOUNT. Beacuse we are dividing qty by rate in that case. */
3182: decode(prl.ORDER_TYPE_LOOKUP_CODE,'AMOUNT',pcr.new_price,
3183: (pcr.new_price)/PO_ReqChangeRequestWF_PVT.get_rate(poh.currency_code, prl.currency_code, pod.rate, prl.rate)) new_price,
3184: decode(prl.ORDER_TYPE_LOOKUP_CODE,'AMOUNT',
3179: decode(prl.ORDER_TYPE_LOOKUP_CODE,'AMOUNT',pcr.old_price,
3180: (pcr.old_price)/PO_ReqChangeRequestWF_PVT.get_rate(poh.currency_code, prl.currency_code, pod.rate, prl.rate)) old_price,
3181: /* If Order is in trn currency divide price by rate if order_type is not AMOUNT. Beacuse we are dividing qty by rate in that case. */
3182: decode(prl.ORDER_TYPE_LOOKUP_CODE,'AMOUNT',pcr.new_price,
3183: (pcr.new_price)/PO_ReqChangeRequestWF_PVT.get_rate(poh.currency_code, prl.currency_code, pod.rate, prl.rate)) new_price,
3184: decode(prl.ORDER_TYPE_LOOKUP_CODE,'AMOUNT',
3185: (pcr.old_quantity/PO_ReqChangeRequestWF_PVT.get_rate(poh.currency_code, prl.currency_code, pod.rate, prl.rate)), pcr.old_quantity) old_quantity,
3186: --Divide qty by rate for amt based reqs only
3187: decode(prl.ORDER_TYPE_LOOKUP_CODE,'AMOUNT',
3181: /* If Order is in trn currency divide price by rate if order_type is not AMOUNT. Beacuse we are dividing qty by rate in that case. */
3182: decode(prl.ORDER_TYPE_LOOKUP_CODE,'AMOUNT',pcr.new_price,
3183: (pcr.new_price)/PO_ReqChangeRequestWF_PVT.get_rate(poh.currency_code, prl.currency_code, pod.rate, prl.rate)) new_price,
3184: decode(prl.ORDER_TYPE_LOOKUP_CODE,'AMOUNT',
3185: (pcr.old_quantity/PO_ReqChangeRequestWF_PVT.get_rate(poh.currency_code, prl.currency_code, pod.rate, prl.rate)), pcr.old_quantity) old_quantity,
3186: --Divide qty by rate for amt based reqs only
3187: decode(prl.ORDER_TYPE_LOOKUP_CODE,'AMOUNT',
3188: (pcr.new_quantity/PO_ReqChangeRequestWF_PVT.get_rate(poh.currency_code, prl.currency_code, pod.rate, prl.rate)), pcr.new_quantity) new_quantity,
3189: pcr.change_request_id parent_change_request_id,
3184: decode(prl.ORDER_TYPE_LOOKUP_CODE,'AMOUNT',
3185: (pcr.old_quantity/PO_ReqChangeRequestWF_PVT.get_rate(poh.currency_code, prl.currency_code, pod.rate, prl.rate)), pcr.old_quantity) old_quantity,
3186: --Divide qty by rate for amt based reqs only
3187: decode(prl.ORDER_TYPE_LOOKUP_CODE,'AMOUNT',
3188: (pcr.new_quantity/PO_ReqChangeRequestWF_PVT.get_rate(poh.currency_code, prl.currency_code, pod.rate, prl.rate)), pcr.new_quantity) new_quantity,
3189: pcr.change_request_id parent_change_request_id,
3190: pll.quantity ship_quantity,
3191: pod.quantity_ordered dist_quantity,
3192: pll.SHIP_TO_ORGANIZATION_ID,
3198: to_date(null) new_start_date,
3199: to_date(null) old_expiration_date,
3200: to_date(null) new_expiration_date,
3201: -- Bug 9738629
3202: (pcr.old_amount)/PO_ReqChangeRequestWF_PVT.get_rate(poh.currency_code, prl.currency_code, pod.rate, prl.rate) old_amount,
3203: (pcr.new_amount)/PO_ReqChangeRequestWF_PVT.get_rate(poh.currency_code, prl.currency_code, pod.rate, prl.rate) new_amount,
3204: pll.amount ship_amount,
3205: pod.amount_ordered dist_amount,
3206: prl.matching_basis,
3199: to_date(null) old_expiration_date,
3200: to_date(null) new_expiration_date,
3201: -- Bug 9738629
3202: (pcr.old_amount)/PO_ReqChangeRequestWF_PVT.get_rate(poh.currency_code, prl.currency_code, pod.rate, prl.rate) old_amount,
3203: (pcr.new_amount)/PO_ReqChangeRequestWF_PVT.get_rate(poh.currency_code, prl.currency_code, pod.rate, prl.rate) new_amount,
3204: pll.amount ship_amount,
3205: pod.amount_ordered dist_amount,
3206: prl.matching_basis,
3207: pcr.requester_id requester_id -- Bug # 3862383
3606: commit;
3607:
3608: EXCEPTION
3609: WHEN OTHERS THEN
3610: wf_core.context('PO_ReqChangeRequestWF_PVT','ConvertIntoPOChange',x_progress);
3611: raise;
3612:
3613: END ConvertIntoPOChange;
3614:
3709: commit;
3710:
3711: EXCEPTION
3712: WHEN OTHERS THEN
3713: wf_core.context('PO_ReqChangeRequestWF_PVT','SetReqRequestStatus',x_progress);
3714: raise;
3715:
3716: END SetReqRequestStatus;
3717:
3771: commit;
3772:
3773: EXCEPTION
3774: WHEN OTHERS THEN
3775: wf_core.context('PO_ReqChangeRequestWF_PVT','SetReqChangeFlag',x_progress);
3776: raise;
3777:
3778: END SetReqChangeFlag;
3779:
4025:
4026: commit;
4027: EXCEPTION
4028: WHEN OTHERS THEN
4029: wf_core.context('PO_ReqChangeRequestWF_PVT',
4030: 'InsertActionHist'||sqlerrm,x_progress);
4031: raise;
4032:
4033: END InsertActionHist;
4214: StartPOChangeWF(p_change_request_group_id, item_key, 'INFORM_BUYER_PO_CHANGE', l_forward_from_username, l_user_id, l_responsibility_id, l_application_id);
4215: x_progress :='StartInformBuyerWF:002';
4216: EXCEPTION
4217: WHEN OTHERS THEN
4218: wf_core.context('PO_ReqChangeRequestWF_PVT','StartInformBuyerWF',x_progress);
4219:
4220: raise;
4221:
4222: end StartInformBuyerWF;
4380: x_progress :='StartConvertProcess:008';
4381: commit;
4382: EXCEPTION
4383: WHEN OTHERS THEN
4384: wf_core.context('PO_ReqChangeRequestWF_PVT','StartConvertProcess',x_progress);
4385:
4386: raise;
4387: end StartConvertProcess;
4388:
4872: message => l_procedure_name||'-'|| x_progress|| ' ' || sqlerrm);
4873: END IF;
4874: END IF;
4875:
4876: wf_core.context('PO_ReqChangeRequestWF_PVT','StartPOChangeWF',x_progress||sqlerrm);
4877: raise;
4878: end StartPOChangeWF;
4879:
4880:
4883: pragma AUTONOMOUS_TRANSACTION;
4884: x_progress varchar2(100);
4885:
4886: BEGIN
4887: x_progress := 'PO_ReqChangeRequestWF_PVT.UpdatePODocHeaderTables';
4888:
4889: if(p_document_type = 'PO') then
4890: update po_headers_all
4891: set change_requested_by = null,
4904: commit;
4905:
4906: EXCEPTION
4907: WHEN OTHERS THEN
4908: wf_core.context('PO_ReqChangeRequestWF_PVT','UpdatePODocHeaderTables',x_progress|| sqlerrm);
4909: raise;
4910: END UpdatePODocHeaderTables;
4911:
4912:
4939: and initiator='REQUESTER'
4940: and request_status='NEW';
4941: BEGIN
4942:
4943: x_progress := 'PO_ReqChangeRequestWF_PVT.Get_Req_Chg_Attributes';
4944:
4945:
4946: -- Do nothing in cancel or timeout mode
4947: if (funcmode <> wf_engine.eng_run) then
4996: avalue =>
4997: 'plsql:PO_ReqChangeRequestNotif_PVT.get_new_req_amount/'||itemtype||':'||itemkey);
4998:
4999: */
5000: x_progress := 'PO_ReqChangeRequestWF_PVT.Get_Req_Chg_Attributes: 02';
5001: resultout := wf_engine.eng_completed || ':' || 'ACTIVITY_PERFORMED';
5002:
5003: EXCEPTION
5004: WHEN OTHERS THEN
5003: EXCEPTION
5004: WHEN OTHERS THEN
5005: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
5006: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
5007: wf_core.context('PO_ReqChangeRequestWF_PVT','Get_Req_Chg_Attributes',x_progress);
5008: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Get_Req_Chg_Attributes');
5009: raise;
5010:
5011:
5004: WHEN OTHERS THEN
5005: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
5006: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
5007: wf_core.context('PO_ReqChangeRequestWF_PVT','Get_Req_Chg_Attributes',x_progress);
5008: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Get_Req_Chg_Attributes');
5009: raise;
5010:
5011:
5012: end Get_Req_Chg_Attributes;
5037: l_preparer_user_name wf_roles.name%type;
5038:
5039: BEGIN
5040:
5041: x_progress := 'PO_ReqChangeRequestWF_PVT.Update_Req_Change_Flag: 01';
5042:
5043: -- Do nothing in cancel or timeout mode
5044: --
5045: if (funcmode <> wf_engine.eng_run) then
5084: WHEN OTHERS THEN
5085: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
5086: l_preparer_user_name := PO_REQAPPROVAL_INIT1.
5087: get_preparer_user_name(itemType, itemkey);
5088: wf_core.context('PO_ReqChangeRequestWF_PVT',
5089: 'Update_Req_Change_Flag',x_progress);
5090: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey,
5091: l_preparer_user_name, l_doc_string,
5092: sqlerrm, 'PO_ReqChangeRequestWF_PVT.Update_Req_Change_Flag');
5088: wf_core.context('PO_ReqChangeRequestWF_PVT',
5089: 'Update_Req_Change_Flag',x_progress);
5090: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey,
5091: l_preparer_user_name, l_doc_string,
5092: sqlerrm, 'PO_ReqChangeRequestWF_PVT.Update_Req_Change_Flag');
5093: raise;
5094:
5095: END Update_Req_Change_Flag;
5096:
5130:
5131:
5132: BEGIN
5133:
5134: x_progress := 'PO_ReqChangeRequestWF_PVT.Insert_into_History_CHGsubmit: 01';
5135:
5136: -- Do nothing in cancel or timeout mode
5137: if (funcmode <> wf_engine.eng_run) then
5138: resultout := wf_engine.eng_null;
5143: itemtype => itemtype,
5144: itemkey => itemkey,
5145: aname => 'CHANGE_REQUEST_GROUP_ID');
5146:
5147: x_progress := 'PO_ReqChangeRequestWF_PVT.Insert_into_History_CHGsubmit: 02';
5148: open change_request;
5149: fetch change_request into l_employee_id;
5150: close change_request;
5151:
5148: open change_request;
5149: fetch change_request into l_employee_id;
5150: close change_request;
5151:
5152: x_progress := 'PO_ReqChangeRequestWF_PVT.Insert_into_History_CHGsubmit: 03';
5153: l_doc_id := PO_WF_UTIL_PKG.GetItemAttrNumber (itemtype => itemtype,
5154: itemkey => itemkey,
5155: aname => 'DOCUMENT_ID');
5156:
5161: l_doc_subtype := PO_WF_UTIL_PKG.GetItemAttrText (itemtype => itemtype,
5162: itemkey => itemkey,
5163: aname => 'DOCUMENT_SUBTYPE');
5164:
5165: x_progress := 'PO_ReqChangeRequestWF_PVT.Insert_into_History_CHGsubmit: 04';
5166: -- Set the multi-org context
5167: l_orgid := PO_WF_UTIL_PKG.GetItemAttrNumber (itemtype => itemtype,
5168: itemkey => itemkey,
5169: aname => 'ORG_ID');
5176: itemkey => itemkey,
5177: aname => 'NOTE');
5178:
5179:
5180: x_progress := 'PO_ReqChangeRequestWF_PVT.Insert_into_History_CHGsubmit: 05';
5181: if(l_employee_id is null) then
5182: if(l_doc_type='PO') then
5183: select agent_id
5184: into l_employee_id
5196: where po_release_id=l_doc_id;
5197: end if;
5198: end if;
5199:
5200: x_progress := 'PO_ReqChangeRequestWF_PVT.Insert_into_History_CHGsubmit: 06';
5201: InsertActionHist(itemtype,itemkey,l_doc_id, l_doc_type,
5202: l_doc_subtype, l_employee_id,
5203: 'SUBMIT CHANGE', l_note, null);
5204:
5203: 'SUBMIT CHANGE', l_note, null);
5204:
5205: resultout := wf_engine.eng_completed || ':' || 'ACTIVITY_PERFORMED' ;
5206:
5207: x_progress := 'PO_ReqChangeRequestWF_PVT.Insert_into_History_CHGsubmit: 07';
5208:
5209: EXCEPTION
5210: WHEN OTHERS THEN
5211: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
5210: WHEN OTHERS THEN
5211: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
5212: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(
5213: itemType, itemkey);
5214: wf_core.context('PO_ReqChangeRequestWF_PVT',
5215: 'Insert_into_History_CHGsubmit',x_progress||sqlerrm);
5216: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey,
5217: l_preparer_user_name, l_doc_string, sqlerrm,
5218: 'PO_ReqChangeRequestWF_PVT.Insert_into_History_CHGsubmit');
5214: wf_core.context('PO_ReqChangeRequestWF_PVT',
5215: 'Insert_into_History_CHGsubmit',x_progress||sqlerrm);
5216: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey,
5217: l_preparer_user_name, l_doc_string, sqlerrm,
5218: 'PO_ReqChangeRequestWF_PVT.Insert_into_History_CHGsubmit');
5219: raise;
5220:
5221: END Insert_into_History_CHGsubmit;
5222:
5254: and request_status = 'NEW';
5255:
5256: BEGIN
5257:
5258: x_progress := 'PO_ReqChangeRequestWF_PVT.Req_Change_Needs_Approval: 01';
5259:
5260: -- Do nothing in cancel or timeout mode
5261: if (funcmode <> wf_engine.eng_run) then
5262: resultout := wf_engine.eng_null;
5279: || nvl(l_approval_flag, 'Y');
5280: end if;
5281: close approval_flag;
5282:
5283: x_progress := 'PO_ReqChangeRequestWF_PVT.Req_Change_Needs_Approval: 02';
5284:
5285:
5286: EXCEPTION
5287: WHEN OTHERS THEN
5320: l_preparer_user_name varchar2(100);
5321:
5322: BEGIN
5323:
5324: x_progress := 'PO_ReqChangeRequestWF_PVT.Set_Change_Mgr_Pre_App: 01';
5325:
5326:
5327: -- Do nothing in cancel or timeout mode
5328: if (funcmode <> wf_engine.eng_run) then
5341: --
5342: resultout := wf_engine.eng_completed || ':' || 'ACTIVITY_PERFORMED';
5343: --
5344:
5345: x_progress := 'PO_ReqChangeRequestWF_PVT.Set_Change_Mgr_Pre_App: 02';
5346:
5347:
5348: EXCEPTION
5349: WHEN OTHERS THEN
5383: l_preparer_user_name varchar2(100);
5384:
5385: BEGIN
5386:
5387: x_progress := 'PO_ReqChangeRequestWF_PVT.Set_Change_Mgr_App: 01';
5388:
5389:
5390: -- Do nothing in cancel or timeout mode
5391: if (funcmode <> wf_engine.eng_run) then
5401: SetReqRequestStatus(l_change_request_group_id, 'N', 'MGR_APP', null, null);
5402:
5403: resultout := wf_engine.eng_completed || ':' || 'ACTIVITY_PERFORMED';
5404:
5405: x_progress := 'PO_ReqChangeRequestWF_PVT.Set_Change_Mgr_App: 02';
5406:
5407: EXCEPTION
5408: WHEN OTHERS THEN
5409: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
5441: l_preparer_user_name varchar2(100);
5442:
5443: BEGIN
5444:
5445: x_progress := 'PO_ReqChangeRequestWF_PVT.Set_Change_Rejected: 01';
5446:
5447:
5448: -- Do nothing in cancel or timeout mode
5449: --
5464: --
5465: resultout := wf_engine.eng_completed || ':' || 'ACTIVITY_PERFORMED';
5466: --
5467:
5468: x_progress := 'PO_ReqChangeRequestWF_PVT.Set_Change_Rejected: 02';
5469:
5470:
5471: EXCEPTION
5472: WHEN OTHERS THEN
5509: and request_status='MGR_PRE_APP';
5510:
5511: BEGIN
5512:
5513: x_progress := 'PO_ReqChangeRequestWF_PVT.Is_Chg_Mgr_Pre_App';
5514:
5515:
5516: -- Do nothing in cancel or timeout mode
5517: if (funcmode <> wf_engine.eng_run) then
5546: resultout := wf_engine.eng_completed || ':' || 'N' ;
5547: else
5548: resultout := wf_engine.eng_completed || ':' || 'Y' ;
5549: end if;
5550: x_progress := 'PO_ReqChangeRequestWF_PVT.Is_Chg_Mgr_Pre_App: 02';
5551:
5552: EXCEPTION
5553: WHEN OTHERS THEN
5554: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
5552: EXCEPTION
5553: WHEN OTHERS THEN
5554: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
5555: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
5556: wf_core.context('PO_ReqChangeRequestWF_PVT','Is_Chg_Mgr_Pre_App',x_progress);
5557: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Is_Chg_Mgr_Pre_App');
5558: raise;
5559:
5560:
5553: WHEN OTHERS THEN
5554: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
5555: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
5556: wf_core.context('PO_ReqChangeRequestWF_PVT','Is_Chg_Mgr_Pre_App',x_progress);
5557: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Is_Chg_Mgr_Pre_App');
5558: raise;
5559:
5560:
5561: end Is_Chg_Mgr_Pre_App;
5585: avalue => 0);
5586: resultout := wf_engine.eng_completed || ':' || 'ACTIVITY_PERFORMED';
5587:
5588: exception when others then
5589: wf_core.context('PO_ReqChangeRequestWF_PVT','Reset_Reminder_Counter',x_progress);
5590: raise;
5591: END Reset_Reminder_Counter;
5592:
5593:
5648: end if;
5649: end if;
5650:
5651: exception when others then
5652: wf_core.context('PO_ReqChangeRequestWF_PVT','Reminder_Need_To_Be_Sent',x_progress);
5653: raise;
5654: END Reminder_Need_To_Be_Sent;
5655:
5656:
5682: l_preparer_user_name varchar2(100);
5683:
5684: BEGIN
5685:
5686: x_progress := 'PO_ReqChangeRequestWF_PVT.Start_From_PO_Cancel';
5687:
5688: -- Do nothing in cancel or timeout mode
5689: if (funcmode <> wf_engine.eng_run) then
5690:
5701: resultout := wf_engine.eng_completed || ':' || 'Y';
5702: else
5703: resultout := wf_engine.eng_completed || ':' || 'N';
5704: end if;
5705: x_progress := 'PO_ReqChangeRequestWF_PVT.Start_From_PO_Cancel: 02';
5706:
5707: EXCEPTION
5708: WHEN OTHERS THEN
5709: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
5707: EXCEPTION
5708: WHEN OTHERS THEN
5709: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
5710: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
5711: wf_core.context('PO_ReqChangeRequestWF_PVT','Start_From_PO_Cancel',x_progress);
5712: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Start_From_PO_Cancel');
5713: raise;
5714:
5715:
5708: WHEN OTHERS THEN
5709: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
5710: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
5711: wf_core.context('PO_ReqChangeRequestWF_PVT','Start_From_PO_Cancel',x_progress);
5712: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Start_From_PO_Cancel');
5713: raise;
5714:
5715:
5716: end Start_From_PO_Cancel;
5746: where change_request_group_id=l_change_request_group_id
5747: and request_status='MGR_APP';
5748: BEGIN
5749:
5750: x_progress := 'PO_ReqChangeRequestWF_PVT.Change_Request_Mgr_Approved';
5751:
5752:
5753: -- Do nothing in cancel or timeout mode
5754: if (funcmode <> wf_engine.eng_run) then
5781: resultout := wf_engine.eng_completed || ':' || 'Y';
5782: else
5783: resultout := wf_engine.eng_completed || ':' || 'N';
5784: end if;
5785: x_progress := 'PO_ReqChangeRequestWF_PVT.Change_Request_Mgr_Approved: 02';
5786:
5787: EXCEPTION
5788: WHEN OTHERS THEN
5789: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
5787: EXCEPTION
5788: WHEN OTHERS THEN
5789: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
5790: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
5791: wf_core.context('PO_ReqChangeRequestWF_PVT','Change_Request_Mgr_Approved',x_progress);
5792: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Change_Request_Mgr_Approved');
5793: raise;
5794:
5795:
5788: WHEN OTHERS THEN
5789: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
5790: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
5791: wf_core.context('PO_ReqChangeRequestWF_PVT','Change_Request_Mgr_Approved',x_progress);
5792: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Change_Request_Mgr_Approved');
5793: raise;
5794:
5795:
5796: end Change_Request_Mgr_Approved;
6051: EXCEPTION
6052: WHEN OTHERS THEN
6053: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
6054: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
6055: wf_core.context('PO_ReqChangeRequestWF_PVT','Update_Action_History_App_Rej',l_progress,sqlerrm);
6056: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Update_Action_History_App_Rej');
6057: RAISE;
6058:
6059: END Update_Action_History_App_Rej;
6052: WHEN OTHERS THEN
6053: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
6054: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
6055: wf_core.context('PO_ReqChangeRequestWF_PVT','Update_Action_History_App_Rej',l_progress,sqlerrm);
6056: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Update_Action_History_App_Rej');
6057: RAISE;
6058:
6059: END Update_Action_History_App_Rej;
6060:
6147: EXCEPTION
6148: WHEN OTHERS THEN
6149: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
6150: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
6151: wf_core.context('PO_ReqChangeRequestWF_PVT','Update_Action_History_Return',l_progress,sqlerrm);
6152: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Update_Action_History_Return');
6153: RAISE;
6154:
6155: END Update_Action_History_Return;
6148: WHEN OTHERS THEN
6149: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
6150: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
6151: wf_core.context('PO_ReqChangeRequestWF_PVT','Update_Action_History_Return',l_progress,sqlerrm);
6152: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Update_Action_History_Return');
6153: RAISE;
6154:
6155: END Update_Action_History_Return;
6156:
6229:
6230:
6231: BEGIN
6232:
6233: x_progress := 'PO_ReqChangeRequestWF_PVT.Kickoff_POChange_WF: 01';
6234:
6235:
6236: -- Do nothing in cancel or timeout mode
6237: --
6270: --
6271: resultout := wf_engine.eng_completed || ':' || 'ACTIVITY_PERFORMED';
6272: --
6273:
6274: x_progress := 'PO_ReqChangeRequestWF_PVT.Kickoff_POChange_WF: 02';
6275:
6276:
6277: EXCEPTION
6278: WHEN OTHERS THEN
6277: EXCEPTION
6278: WHEN OTHERS THEN
6279: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
6280: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
6281: wf_core.context('PO_ReqChangeRequestWF_PVT','Kickoff_POChange_WF',x_progress);
6282: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Kickoff_POChange_WF');
6283: raise;
6284:
6285: END Kickoff_POChange_WF;
6278: WHEN OTHERS THEN
6279: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
6280: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
6281: wf_core.context('PO_ReqChangeRequestWF_PVT','Kickoff_POChange_WF',x_progress);
6282: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Kickoff_POChange_WF');
6283: raise;
6284:
6285: END Kickoff_POChange_WF;
6286:
6309:
6310:
6311: BEGIN
6312:
6313: x_progress := 'PO_ReqChangeRequestWF_PVT.Reset_Change_Flag: 01';
6314:
6315:
6316: -- Do nothing in cancel or timeout mode
6317: --
6353: EXCEPTION
6354: WHEN OTHERS THEN
6355: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
6356: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
6357: wf_core.context('PO_ReqChangeRequestWF_PVT','Reset_Change_Flag',x_progress);
6358: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Reset_Change_Flag');
6359: raise;
6360:
6361: END Reset_Change_Flag;
6354: WHEN OTHERS THEN
6355: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
6356: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
6357: wf_core.context('PO_ReqChangeRequestWF_PVT','Reset_Change_Flag',x_progress);
6358: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Reset_Change_Flag');
6359: raise;
6360:
6361: END Reset_Change_Flag;
6362:
6408:
6409: resultout := wf_engine.eng_completed || ':' || 'ACTIVITY_PERFORMED' ;
6410:
6411: exception when others then
6412: wf_core.context('PO_ReqChangeRequestWF_PVT','Get_Change_Total_Attr',x_progress);
6413: raise;
6414: END Get_Change_Total_Attr;
6415:
6416: procedure setNewTotal(itemtype in varchar2, itemkey in varchar2) is
6602: avalue => l_amount_for_subject);
6603: x_progress :='004';
6604: exception
6605: when others then
6606: wf_core.context('PO_ReqChangeRequestWF_PVT','setNewTotal',x_progress||sqlerrm);
6607: raise;
6608:
6609: end setNewTotal;
6610:
6636: l_preparer_user_name varchar2(100);
6637:
6638: BEGIN
6639:
6640: x_progress := 'PO_ReqChangeRequestWF_PVT.Is_Doc_Approved: 01';
6641:
6642: -- Do nothing in cancel or timeout mode
6643: if (funcmode <> wf_engine.eng_run) then
6644: resultout := wf_engine.eng_null;
6691: else
6692: resultout := wf_engine.eng_completed || ':' || 'N' ;
6693: end if;
6694:
6695: x_progress := 'PO_ReqChangeRequestWF_PVT.Is_Doc_Approved: 02';
6696:
6697: EXCEPTION
6698: WHEN OTHERS THEN
6699: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
6698: WHEN OTHERS THEN
6699: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
6700: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(
6701: itemType, itemkey);
6702: wf_core.context('PO_ReqChangeRequestWF_PVT','Is_Doc_Approved',
6703: x_progress);
6704: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey,
6705: l_preparer_user_name, l_doc_string, sqlerrm,
6706: 'PO_ReqChangeRequestWF_PVT.Is_Doc_Approved');
6702: wf_core.context('PO_ReqChangeRequestWF_PVT','Is_Doc_Approved',
6703: x_progress);
6704: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey,
6705: l_preparer_user_name, l_doc_string, sqlerrm,
6706: 'PO_ReqChangeRequestWF_PVT.Is_Doc_Approved');
6707: raise;
6708:
6709:
6710: end Is_Doc_Approved;
6735: l_preparer_user_name varchar2(100);
6736:
6737: BEGIN
6738:
6739: x_progress := 'PO_ReqChangeRequestWF_PVT.Set_Doc_In_Process01';
6740:
6741: if (funcmode <> wf_engine.eng_run) then
6742: resultout := wf_engine.eng_null;
6743: return;
6768: SetRelAuthStat(l_doc_id);
6769: end if;
6770: --
6771:
6772: x_progress := 'PO_ReqChangeRequestWF_PVT.Set_Doc_In_Process: 02';
6773:
6774: EXCEPTION
6775: WHEN OTHERS THEN
6776: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
6775: WHEN OTHERS THEN
6776: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
6777: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(
6778: itemType, itemkey);
6779: wf_core.context('PO_ReqChangeRequestWF_PVT',
6780: 'Set_Doc_In_Process',x_progress);
6781: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey,
6782: l_preparer_user_name, l_doc_string, sqlerrm,
6783: 'PO_ReqChangeRequestWF_PVT.Set_Doc_In_Process');
6779: wf_core.context('PO_ReqChangeRequestWF_PVT',
6780: 'Set_Doc_In_Process',x_progress);
6781: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey,
6782: l_preparer_user_name, l_doc_string, sqlerrm,
6783: 'PO_ReqChangeRequestWF_PVT.Set_Doc_In_Process');
6784: raise;
6785:
6786: end Set_Doc_In_Process;
6787:
6815: l_preparer_user_name varchar2(100);
6816:
6817: BEGIN
6818:
6819: x_progress := 'PO_ReqChangeRequestWF_PVT.Compare_Revision';
6820:
6821: -- Do nothing in cancel or timeout mode
6822: if (funcmode <> wf_engine.eng_run) then
6823:
6863: resultout := wf_engine.eng_completed || ':' || 'N' ;
6864: else
6865: resultout := wf_engine.eng_completed || ':' || 'Y' ;
6866: end if;
6867: x_progress := 'PO_ReqChangeRequestWF_PVT.Compare_Revision: 02';
6868:
6869: EXCEPTION
6870: WHEN OTHERS THEN
6871: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
6870: WHEN OTHERS THEN
6871: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
6872: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(
6873: itemType, itemkey);
6874: wf_core.context('PO_ReqChangeRequestWF_PVT',
6875: 'Compare_Revision',x_progress||sqlerrm);
6876: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey,
6877: l_preparer_user_name, l_doc_string, sqlerrm,
6878: 'PO_ReqChangeRequestWF_PVT.Compare_Revision');
6874: wf_core.context('PO_ReqChangeRequestWF_PVT',
6875: 'Compare_Revision',x_progress||sqlerrm);
6876: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey,
6877: l_preparer_user_name, l_doc_string, sqlerrm,
6878: 'PO_ReqChangeRequestWF_PVT.Compare_Revision');
6879: raise;
6880: end Compare_Revision;
6881:
6882:
6912:
6913:
6914: BEGIN
6915:
6916: x_progress := 'PO_ReqChangeRequestWF_PVT.Record_Buyer_Rejection';
6917:
6918: -- Do nothing in cancel or timeout mode
6919: if (funcmode <> wf_engine.eng_run) then
6920: resultout := wf_engine.eng_null;
6937: PO_MOAC_UTILS_PVT.set_org_context(l_orgid) ; --
6938: END IF;
6939: SetPoRequestStatus(l_change_request_group_id, 'REJECTED', l_response_reason);
6940:
6941: x_progress := 'PO_ReqChangeRequestWF_PVT.Record_Buyer_Rejection: 02';
6942:
6943: EXCEPTION
6944: WHEN OTHERS THEN
6945: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
6944: WHEN OTHERS THEN
6945: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
6946: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(
6947: itemType, itemkey);
6948: wf_core.context('PO_ReqChangeRequestWF_PVT',
6949: 'Record_Buyer_Rejection',x_progress);
6950: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey,
6951: l_preparer_user_name, l_doc_string, sqlerrm,
6952: 'PO_ReqChangeRequestWF_PVT.Record_Buyer_Rejection');
6948: wf_core.context('PO_ReqChangeRequestWF_PVT',
6949: 'Record_Buyer_Rejection',x_progress);
6950: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey,
6951: l_preparer_user_name, l_doc_string, sqlerrm,
6952: 'PO_ReqChangeRequestWF_PVT.Record_Buyer_Rejection');
6953: raise;
6954:
6955: end Record_Buyer_Rejection;
6956:
6985: l_response_reason varchar2(2000);
6986:
6987: BEGIN
6988:
6989: x_progress := 'PO_ReqChangeRequestWF_PVT.Record_Buyer_Acceptance';
6990:
6991: -- Do nothing in cancel or timeout mode
6992: if (funcmode <> wf_engine.eng_run) then
6993: resultout := wf_engine.eng_null;
7011: PO_MOAC_UTILS_PVT.set_org_context(l_orgid) ; --
7012: END IF;
7013: SetPoRequestStatus(l_change_request_group_id, 'BUYER_APP', l_response_reason);
7014:
7015: x_progress := 'PO_ReqChangeRequestWF_PVT.Record_Buyer_Acceptance: 02';
7016:
7017: EXCEPTION
7018: WHEN OTHERS THEN
7019: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
7018: WHEN OTHERS THEN
7019: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
7020: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(
7021: itemType, itemkey);
7022: wf_core.context('PO_ReqChangeRequestWF_PVT',
7023: 'Record_Buyer_Acceptance',x_progress);
7024: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey,
7025: l_preparer_user_name, l_doc_string, sqlerrm,
7026: 'PO_ReqChangeRequestWF_PVT.Record_Buyer_Acceptance');
7022: wf_core.context('PO_ReqChangeRequestWF_PVT',
7023: 'Record_Buyer_Acceptance',x_progress);
7024: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey,
7025: l_preparer_user_name, l_doc_string, sqlerrm,
7026: 'PO_ReqChangeRequestWF_PVT.Record_Buyer_Acceptance');
7027: raise;
7028:
7029: end Record_Buyer_Acceptance;
7030:
7058: l_preparer_user_name varchar2(100);
7059:
7060: BEGIN
7061:
7062: x_progress := 'PO_ReqChangeRequestWF_PVT.Start_Process_Buy_Response_WF';
7063:
7064: if (funcmode <> wf_engine.eng_run) then
7065: resultout := wf_engine.eng_null;
7066: return;
7080: PO_MOAC_UTILS_PVT.set_org_context(l_orgid) ; --
7081: END IF;
7082: Start_ProcessBuyerResponseWF(l_change_request_group_id);
7083:
7084: x_progress := 'PO_ReqChangeRequestWF_PVT.Start_Process_Buy_Response_WF: 02';
7085:
7086: EXCEPTION
7087: WHEN OTHERS THEN
7088: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
7087: WHEN OTHERS THEN
7088: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
7089: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(
7090: itemType, itemkey);
7091: wf_core.context('PO_ReqChangeRequestWF_PVT',
7092: 'Start_Process_Buy_Response_WF',x_progress);
7093: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey,
7094: l_preparer_user_name, l_doc_string, sqlerrm,
7095: 'PO_ReqChangeRequestWF_PVT.Inssert_into_History_CHGsubmit');
7091: wf_core.context('PO_ReqChangeRequestWF_PVT',
7092: 'Start_Process_Buy_Response_WF',x_progress);
7093: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey,
7094: l_preparer_user_name, l_doc_string, sqlerrm,
7095: 'PO_ReqChangeRequestWF_PVT.Inssert_into_History_CHGsubmit');
7096: raise;
7097:
7098: end Start_Process_Buy_Response_WF;
7099:
7138:
7139:
7140: BEGIN
7141:
7142: x_progress := 'PO_ReqChangeRequestWF_PVT.Insert_Buyer_Action_History: 01';
7143:
7144: -- Do nothing in cancel or timeout mode
7145: --
7146: if (funcmode <> wf_engine.eng_run) then
7219: l_doc_subtype, l_employee_id, l_action, l_note, null);
7220:
7221: resultout := wf_engine.eng_completed || ':' || 'ACTIVITY_PERFORMED' ;
7222:
7223: x_progress := 'PO_ReqChangeRequestWF_PVT.Insert_Buyer_Action_History: 02';
7224:
7225: EXCEPTION
7226: WHEN OTHERS THEN
7227: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
7226: WHEN OTHERS THEN
7227: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
7228: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(
7229: itemType, itemkey);
7230: wf_core.context('PO_ReqChangeRequestWF_PVT',
7231: 'Insert_Buyer_Action_History',x_progress);
7232: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey,
7233: l_preparer_user_name, l_doc_string, sqlerrm,
7234: 'PO_ReqChangeRequestWF_PVT.Insert_Buyer_Action_History');
7230: wf_core.context('PO_ReqChangeRequestWF_PVT',
7231: 'Insert_Buyer_Action_History',x_progress);
7232: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey,
7233: l_preparer_user_name, l_doc_string, sqlerrm,
7234: 'PO_ReqChangeRequestWF_PVT.Insert_Buyer_Action_History');
7235: raise;
7236:
7237: END Insert_Buyer_Action_History;
7238:
7268: l_preparer_user_name varchar2(100);
7269:
7270: BEGIN
7271:
7272: x_progress := 'PO_ReqChangeRequestWF_PVT.Process_Buyer_Rejection';
7273:
7274: -- Do nothing in cancel or timeout mode
7275: if (funcmode <> wf_engine.eng_run) then
7276: resultout := wf_engine.eng_null;
7294:
7295: END IF;
7296: ProcessBuyerAction(l_change_request_group_id, 'REJECTION');
7297:
7298: x_progress := 'PO_ReqChangeRequestWF_PVT.Process_Buyer_Rejection: 02';
7299:
7300: EXCEPTION
7301: WHEN OTHERS THEN
7302: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
7301: WHEN OTHERS THEN
7302: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
7303: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(
7304: itemType, itemkey);
7305: wf_core.context('PO_ReqChangeRequestWF_PVT',
7306: 'Process_Buyer_Rejection',x_progress);
7307: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey,
7308: l_preparer_user_name, l_doc_string, sqlerrm,
7309: 'PO_ReqChangeRequestWF_PVT.Process_Buyer_Rejection');
7305: wf_core.context('PO_ReqChangeRequestWF_PVT',
7306: 'Process_Buyer_Rejection',x_progress);
7307: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey,
7308: l_preparer_user_name, l_doc_string, sqlerrm,
7309: 'PO_ReqChangeRequestWF_PVT.Process_Buyer_Rejection');
7310: raise;
7311:
7312:
7313: end Process_Buyer_Rejection;
7345: l_preparer_user_name varchar2(100);
7346:
7347: BEGIN
7348:
7349: x_progress := 'PO_ReqChangeRequestWF_PVT.Process_Cancel_Acceptance';
7350:
7351: -- Do nothing in cancel or timeout mode
7352: if (funcmode <> wf_engine.eng_run) then
7353: resultout := wf_engine.eng_null;
7386: END IF;
7387:
7388: ProcessBuyerAction(l_change_request_group_id, 'CANCELLATION');
7389:
7390: x_progress := 'PO_ReqChangeRequestWF_PVT.Process_Cancel_Acceptance: 02';
7391:
7392: EXCEPTION
7393: WHEN OTHERS THEN
7394: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
7392: EXCEPTION
7393: WHEN OTHERS THEN
7394: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
7395: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
7396: wf_core.context('PO_ReqChangeRequestWF_PVT','Process_Cancel_Acceptance',x_progress);
7397: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Process_Cancel_Acceptance');
7398: raise;
7399:
7400:
7393: WHEN OTHERS THEN
7394: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
7395: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
7396: wf_core.context('PO_ReqChangeRequestWF_PVT','Process_Cancel_Acceptance',x_progress);
7397: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Process_Cancel_Acceptance');
7398: raise;
7399:
7400:
7401: end Process_Cancel_Acceptance;
7433: and request_status='BUYER_APP';
7434:
7435: BEGIN
7436:
7437: x_progress := 'PO_ReqChangeRequestWF_PVT.Change_Acceptance_Exists';
7438:
7439: -- Do nothing in cancel or timeout mode
7440: if (funcmode <> wf_engine.eng_run) then
7441: resultout := wf_engine.eng_null;
7464: resultout := wf_engine.eng_completed || ':' || 'N' ;
7465: else
7466: resultout := wf_engine.eng_completed || ':' || 'Y' ;
7467: end if;
7468: x_progress := 'PO_ReqChangeRequestWF_PVT.Change_Acceptance_Exists: 02';
7469:
7470: EXCEPTION
7471: WHEN OTHERS THEN
7472: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
7470: EXCEPTION
7471: WHEN OTHERS THEN
7472: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
7473: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
7474: wf_core.context('PO_ReqChangeRequestWF_PVT','Change_Acceptance_Exists',x_progress);
7475: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Change_Acceptance_Exists');
7476: raise;
7477:
7478:
7471: WHEN OTHERS THEN
7472: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
7473: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
7474: wf_core.context('PO_ReqChangeRequestWF_PVT','Change_Acceptance_Exists',x_progress);
7475: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Change_Acceptance_Exists');
7476: raise;
7477:
7478:
7479: end Change_Acceptance_Exists;
7509: l_preparer_user_name varchar2(100);
7510:
7511: BEGIN
7512:
7513: x_progress := 'PO_ReqChangeRequestWF_PVT.Process_Change_Acceptance';
7514:
7515:
7516: -- Do nothing in cancel or timeout mode
7517: if (funcmode <> wf_engine.eng_run) then
7537:
7538: END IF;
7539: ProcessBuyerAction(l_change_request_group_id, 'ACCEPTANCE');
7540:
7541: x_progress := 'PO_ReqChangeRequestWF_PVT.Process_Change_Acceptance: 02';
7542:
7543: EXCEPTION
7544: WHEN OTHERS THEN
7545: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
7543: EXCEPTION
7544: WHEN OTHERS THEN
7545: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
7546: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
7547: wf_core.context('PO_ReqChangeRequestWF_PVT','Process_Change_Acceptance',x_progress);
7548: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Process_Change_Acceptance');
7549: raise;
7550:
7551:
7544: WHEN OTHERS THEN
7545: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
7546: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
7547: wf_core.context('PO_ReqChangeRequestWF_PVT','Process_Change_Acceptance',x_progress);
7548: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Process_Change_Acceptance');
7549: raise;
7550:
7551:
7552: end Process_Change_Acceptance;
7576: commit;
7577: end if;
7578: exception
7579: when others then
7580: wf_core.context('PO_ReqChangeRequestWF_PVT','KickOffPOApproval',sqlerrm);
7581: raise;
7582: end;
7583:
7584:
7629: where change_request_group_id=l_change_request_group_id
7630: and request_status='REJECTED';
7631:
7632: BEGIN
7633: x_progress := 'PO_ReqChangeRequestWF_PVT.Start_Poapprv_WF';
7634:
7635:
7636: -- Do nothing in cancel or timeout mode
7637: if (funcmode <> wf_engine.eng_run) then
7656: PO_MOAC_UTILS_PVT.set_org_context(l_orgid) ; --
7657:
7658: END IF;
7659:
7660: x_progress := 'PO_ReqChangeRequestWF_PVT.Start_Poapprv_WF:01';
7661: open document_id;
7662: fetch document_id into l_header_id, l_release_id;
7663: close document_id;
7664: x_progress := 'PO_ReqChangeRequestWF_PVT.Start_Poapprv_WF:02';
7660: x_progress := 'PO_ReqChangeRequestWF_PVT.Start_Poapprv_WF:01';
7661: open document_id;
7662: fetch document_id into l_header_id, l_release_id;
7663: close document_id;
7664: x_progress := 'PO_ReqChangeRequestWF_PVT.Start_Poapprv_WF:02';
7665:
7666: --In case the change request is automatically
7667: --rejected, there will be no change reqeust in BUY_APP. So,
7668: --the document_id cursor will not fetch records. So, call
7676: --po_sup_chg_request_wf_grp.KickOffPOApproval(1, l_return_status, l_header_id, l_release_id, l_return_msg);
7677: --PO_ChangeOrderWF_GRP.KickOffPOApproval(1, l_return_status, l_header_id, l_release_id, l_return_msg);
7678:
7679: if(l_return_status<>FND_API.G_RET_STS_SUCCESS) then
7680: x_progress := 'PO_ReqChangeRequestWF_PVT.Start_Poapprv_WF:-'||l_return_status||'-'||to_char(l_header_id)||'-'||to_char(l_release_id)||'-'||l_return_msg;
7681: raise l_exception;
7682: else
7683: x_progress := 'PO_ReqChangeRequestWF_PVT.Start_Poapprv_WF: 03';
7684: end if;
7679: if(l_return_status<>FND_API.G_RET_STS_SUCCESS) then
7680: x_progress := 'PO_ReqChangeRequestWF_PVT.Start_Poapprv_WF:-'||l_return_status||'-'||to_char(l_header_id)||'-'||to_char(l_release_id)||'-'||l_return_msg;
7681: raise l_exception;
7682: else
7683: x_progress := 'PO_ReqChangeRequestWF_PVT.Start_Poapprv_WF: 03';
7684: end if;
7685:
7686: l_header_id := null;
7687: l_release_id := null;
7687: l_release_id := null;
7688:
7689: --Now set the authorization status of PO corresponding
7690: --to automatically rejected change request as 'APPROVED'
7691: x_progress := 'PO_ReqChangeRequestWF_PVT.Start_Poapprv_WF:04';
7692: open document_id_rejected;
7693: fetch document_id_rejected into l_header_id, l_release_id;
7694: close document_id_rejected;
7695: x_progress := 'PO_ReqChangeRequestWF_PVT.Start_Poapprv_WF:05';
7691: x_progress := 'PO_ReqChangeRequestWF_PVT.Start_Poapprv_WF:04';
7692: open document_id_rejected;
7693: fetch document_id_rejected into l_header_id, l_release_id;
7694: close document_id_rejected;
7695: x_progress := 'PO_ReqChangeRequestWF_PVT.Start_Poapprv_WF:05';
7696:
7697: IF(l_release_id is not null) THEN
7698: UPDATE po_releases_all
7699: SET authorization_status='APPROVED'
7703: SET authorization_status='APPROVED'
7704: WHERE po_header_id = l_header_id;
7705: END IF;
7706:
7707: x_progress := 'PO_ReqChangeRequestWF_PVT.Start_Poapprv_WF:06';
7708:
7709: EXCEPTION
7710: WHEN OTHERS THEN
7711: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
7709: EXCEPTION
7710: WHEN OTHERS THEN
7711: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
7712: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
7713: wf_core.context('PO_ReqChangeRequestWF_PVT','Start_Poapprv_WF',x_progress||sqlerrm);
7714: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Start_Poapprv_WF');
7715: raise;
7716:
7717:
7710: WHEN OTHERS THEN
7711: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
7712: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
7713: wf_core.context('PO_ReqChangeRequestWF_PVT','Start_Poapprv_WF',x_progress||sqlerrm);
7714: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Start_Poapprv_WF');
7715: raise;
7716:
7717:
7718: end Start_Poapprv_WF;
7758: and pcr3.request_status not in ('ACCEPTED', 'REJECTED');
7759:
7760: BEGIN
7761:
7762: x_progress := 'PO_ReqChangeRequestWF_PVT.Req_Change_Responded';
7763:
7764: -- Do nothing in cancel or timeout mode
7765: if (funcmode <> wf_engine.eng_run) then
7766: resultout := wf_engine.eng_null;
7791: else
7792: resultout := wf_engine.eng_completed || ':' || 'N' ;
7793: end if;
7794:
7795: x_progress := 'PO_ReqChangeRequestWF_PVT.Req_Change_Responded: 02';
7796:
7797: EXCEPTION
7798: WHEN OTHERS THEN
7799: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
7797: EXCEPTION
7798: WHEN OTHERS THEN
7799: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
7800: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
7801: wf_core.context('PO_ReqChangeRequestWF_PVT','Req_Change_Responded',x_progress);
7802: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Req_Change_Responded');
7803: raise;
7804:
7805:
7798: WHEN OTHERS THEN
7799: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
7800: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
7801: wf_core.context('PO_ReqChangeRequestWF_PVT','Req_Change_Responded',x_progress);
7802: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Req_Change_Responded');
7803: raise;
7804:
7805:
7806: end Req_Change_Responded;
7830: l_preparer_user_name varchar2(100);
7831:
7832: BEGIN
7833:
7834: x_progress := 'PO_ReqChangeRequestWF_PVT.Reset_Req_Change_Flag: 01';
7835:
7836:
7837: -- Do nothing in cancel or timeout mode
7838: --
7878: EXCEPTION
7879: WHEN OTHERS THEN
7880: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
7881: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
7882: wf_core.context('PO_ReqChangeRequestWF_PVT','Reset_Req_Change_Flag',x_progress);
7883: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Reset_Req_Change_Flag');
7884: raise;
7885:
7886: END Reset_Req_Change_Flag;
7879: WHEN OTHERS THEN
7880: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
7881: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
7882: wf_core.context('PO_ReqChangeRequestWF_PVT','Reset_Req_Change_Flag',x_progress);
7883: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Reset_Req_Change_Flag');
7884: raise;
7885:
7886: END Reset_Req_Change_Flag;
7887:
7941: ---------------------------------------------------------------------------
7942: -- Added by Xiao and Eric for IL PO Notification on Feb-17,2009 ,End
7943: BEGIN
7944:
7945: x_progress := 'PO_ReqChangeRequestWF_PVT.Get_Total_Amount_Currency: 01';
7946:
7947: -- Do nothing in cancel or timeout mode
7948: if (funcmode <> wf_engine.eng_run) then
7949: resultout := wf_engine.eng_null;
7958: IF l_orgid is NOT NULL THEN
7959: PO_MOAC_UTILS_PVT.set_org_context(l_orgid) ; --
7960: END IF;
7961:
7962: x_progress := 'PO_ReqChangeRequestWF_PVT.Get_Total_Amount_Currency: 02';
7963:
7964: l_req_change_group_id := PO_WF_UTIL_PKG.GetItemAttrNumber
7965: (itemtype => itemtype,
7966: itemkey => itemkey,
7965: (itemtype => itemtype,
7966: itemkey => itemkey,
7967: aname => 'REQ_CHANGE_GROUP_ID');
7968:
7969: x_progress := 'PO_ReqChangeRequestWF_PVT.Get_Total_Amount_Currency: 03';
7970:
7971: SELECT wf_item_type, wf_item_key
7972: INTO l_req_item_type, l_req_item_key
7973: FROM po_change_requests
7988: when others then
7989: l_rco_wf_available:= 'N';
7990: END;
7991:
7992: x_progress := 'PO_ReqChangeRequestWF_PVT.Get_Total_Amount_Currency: 02';
7993: -- Added by Xiao and Eric for IL PO Notification on Feb-11,2009 , Begin
7994: -------------------------------------------------------------------------------------
7995: lv_tax_region := JAI_PO_WF_UTIL_PUB.Get_Tax_Region (pn_org_id => l_orgid);
7996: -------------------------------------------------------------------------------------
7998:
7999: -- If POREQCHA wf is available, we can get attributes from that wf.
8000: if ( l_rco_wf_available = 'Y') then
8001:
8002: x_progress := 'PO_ReqChangeRequestWF_PVT.Get_Total_Amount_Currency: 04:' || l_req_item_type || '-' || l_req_item_key;
8003:
8004: l_total_amount_dsp:= PO_WF_UTIL_PKG.GetItemAttrText(itemtype=>l_req_item_type,
8005: itemkey=>l_req_item_key,
8006: aname =>'TOTAL_AMOUNT_DSP');
8004: l_total_amount_dsp:= PO_WF_UTIL_PKG.GetItemAttrText(itemtype=>l_req_item_type,
8005: itemkey=>l_req_item_key,
8006: aname =>'TOTAL_AMOUNT_DSP');
8007:
8008: x_progress := 'PO_ReqChangeRequestWF_PVT.Get_Total_Amount_Currency: 05:';
8009:
8010: l_functional_currency:= PO_WF_UTIL_PKG.GetItemAttrText(itemtype=>l_req_item_type,
8011: itemkey=>l_req_item_key,
8012: aname =>'FUNCTIONAL_CURRENCY');
8010: l_functional_currency:= PO_WF_UTIL_PKG.GetItemAttrText(itemtype=>l_req_item_type,
8011: itemkey=>l_req_item_key,
8012: aname =>'FUNCTIONAL_CURRENCY');
8013:
8014: x_progress := 'PO_ReqChangeRequestWF_PVT.Get_Total_Amount_Currency: 06:';
8015:
8016: l_document_id := PO_WF_UTIL_PKG.GetItemAttrNumber
8017: (itemtype => l_req_item_type,
8018: itemkey => l_req_item_key,
8063:
8064: -- Modified by Xiao and Eric for IL PO Notification on Feb-11,2009 , Begin
8065: -------------------------------------------------------------------------------------
8066:
8067: x_progress := 'PO_ReqChangeRequestWF_PVT.Get_Total_Amount_Currency: 04.1';
8068:
8069: IF (g_po_wf_debug = 'Y') THEN
8070: PO_WF_DEBUG_PKG.insert_debug(l_req_item_type, l_req_item_key, x_progress );
8071: END IF;
8191: itemkey => itemkey,
8192: aname => 'REQ_HEADER_ID',
8193: avalue => l_document_id);
8194:
8195: x_progress := 'PO_ReqChangeRequestWF_PVT.Get_Total_Amount_Currency: 05';
8196:
8197: select NVL(CONTRACTOR_REQUISITION_FLAG, 'N'), NOTE_TO_AUTHORIZER
8198: into l_contractor_req_flag,l_note
8199: from po_requisition_headers_all
8204:
8205: t_varname(2) := 'JUSTIFICATION';
8206: t_varval(2) := l_note ;
8207:
8208: x_progress := 'PO_ReqChangeRequestWF_PVT.Get_Total_Amount_Currency: 06';
8209:
8210: SELECT gsb.currency_code
8211: INTO l_functional_currency
8212: FROM financials_system_params_all fsp,
8216:
8217: t_varname(3) := 'FUNCTIONAL_CURRENCY' ;
8218: t_varval(3) := l_functional_currency ;
8219:
8220: x_progress := 'PO_ReqChangeRequestWF_PVT.Get_Total_Amount_Currency: 07';
8221:
8222: -- get new req amount and req amount disp (at this moment, req has already been updated)
8223: SELECT nvl(SUM(nvl(decode(matching_basis, 'AMOUNT', amount, quantity * unit_price), 0)), 0)
8224: into l_req_amount
8298: t_varval(6) := l_functional_currency ;
8299:
8300: Wf_Engine.SetItemAttrTextArray(itemtype, itemkey,t_varname,t_varval);
8301:
8302: x_progress := 'PO_ReqChangeRequestWF_PVT.Get_Total_Amount_Currency: 08';
8303:
8304: end if;
8305: --
8306: resultout := wf_engine.eng_completed || ':' || 'ACTIVITY_PERFORMED';
8312: EXCEPTION
8313: WHEN OTHERS THEN
8314: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
8315: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
8316: wf_core.context('PO_ReqChangeRequestWF_PVT','Get_Total_Amount_Currency',x_progress);
8317: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Get_Total_Amount_Currency');
8318: raise;
8319:
8320: END Get_Total_Amount_Currency;
8313: WHEN OTHERS THEN
8314: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
8315: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
8316: wf_core.context('PO_ReqChangeRequestWF_PVT','Get_Total_Amount_Currency',x_progress);
8317: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Get_Total_Amount_Currency');
8318: raise;
8319:
8320: END Get_Total_Amount_Currency;
8321:
8356: and pcr1.request_status not in ('ACCEPTED', 'REJECTED');
8357:
8358: BEGIN
8359:
8360: x_progress := 'PO_ReqChangeRequestWF_PVT.Req_Change_Responded';
8361:
8362:
8363: -- Do nothing in cancel or timeout mode
8364: if (funcmode <> wf_engine.eng_run) then
8407: else
8408: resultout := wf_engine.eng_completed || ':' || 'N' ;
8409: end if;
8410:
8411: x_progress := 'PO_ReqChangeRequestWF_PVT.REQ_PO_CHANGE_RESPONDED: 02';
8412:
8413: EXCEPTION
8414: WHEN OTHERS THEN
8415: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
8413: EXCEPTION
8414: WHEN OTHERS THEN
8415: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
8416: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
8417: wf_core.context('PO_ReqChangeRequestWF_PVT','REQ_PO_CHANGE_RESPONDED',x_progress);
8418: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.REQ_PO_CHANGE_RESPONDED');
8419: raise;
8420:
8421:
8414: WHEN OTHERS THEN
8415: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
8416: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
8417: wf_core.context('PO_ReqChangeRequestWF_PVT','REQ_PO_CHANGE_RESPONDED',x_progress);
8418: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.REQ_PO_CHANGE_RESPONDED');
8419: raise;
8420:
8421:
8422: end REQ_PO_CHANGE_RESPONDED;
8608: 'plsqlclob:PO_ReqChangeRequestNotif_PVT.get_req_chg_response_notif/'||
8609: to_char(l_parent_group_id));
8610:
8611: exception when others then
8612: wf_core.context('PO_ReqChangeRequestWF_PVT','Get_Change_Attribute',x_progress);
8613: raise;
8614: END Get_Change_Attribute;
8615:
8616:
8649: and request_status='PENDING';
8650:
8651: BEGIN
8652:
8653: x_progress := 'PO_ReqChangeRequestWF_PVT.New_PO_Change_Exists';
8654:
8655: -- Do nothing in cancel or timeout mode
8656: if (funcmode <> wf_engine.eng_run) then
8657: resultout := wf_engine.eng_null;
8693: else
8694: resultout := wf_engine.eng_completed || ':' || 'Y' ;
8695: end if;
8696:
8697: x_progress := 'PO_ReqChangeRequestWF_PVT.New_PO_Change_Exists: 02';
8698:
8699: EXCEPTION
8700: WHEN OTHERS THEN
8701: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
8699: EXCEPTION
8700: WHEN OTHERS THEN
8701: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
8702: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
8703: wf_core.context('PO_ReqChangeRequestWF_PVT','New_PO_Change_Exists',x_progress);
8704: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.New_PO_Change_Exists');
8705: raise;
8706:
8707:
8700: WHEN OTHERS THEN
8701: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
8702: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
8703: wf_core.context('PO_ReqChangeRequestWF_PVT','New_PO_Change_Exists',x_progress);
8704: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.New_PO_Change_Exists');
8705: raise;
8706:
8707:
8708: end New_PO_Change_Exists;
8731: l_preparer_user_name varchar2(100);
8732:
8733: BEGIN
8734:
8735: x_progress := 'PO_ReqChangeRequestWF_PVT.Record_PO_Approval';
8736:
8737:
8738: -- Do nothing in cancel or timeout mode
8739: if (funcmode <> wf_engine.eng_run) then
8759:
8760: END IF;
8761: SetPoRequestStatus(l_change_request_group_id, 'ACCEPTED');
8762:
8763: x_progress := 'PO_ReqChangeRequestWF_PVT.Record_PO_Approval: 02';
8764:
8765: EXCEPTION
8766: WHEN OTHERS THEN
8767: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
8765: EXCEPTION
8766: WHEN OTHERS THEN
8767: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
8768: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
8769: wf_core.context('PO_ReqChangeRequestWF_PVT','Record_PO_Approval',x_progress);
8770: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Record_PO_Approval');
8771: raise;
8772:
8773:
8766: WHEN OTHERS THEN
8767: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
8768: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
8769: wf_core.context('PO_ReqChangeRequestWF_PVT','Record_PO_Approval',x_progress);
8770: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Record_PO_Approval');
8771: raise;
8772:
8773:
8774: end Record_PO_Approval;
8797: l_preparer_user_name varchar2(100);
8798:
8799: BEGIN
8800:
8801: x_progress := 'PO_ReqChangeRequestWF_PVT.Record_PO_Rejection';
8802:
8803:
8804: -- Do nothing in cancel or timeout mode
8805: if (funcmode <> wf_engine.eng_run) then
8825:
8826: END IF;
8827: SetPoRequestStatus(l_change_request_group_id, 'REJECTED');
8828:
8829: x_progress := 'PO_ReqChangeRequestWF_PVT.Record_PO_Rejection: 02';
8830:
8831: EXCEPTION
8832: WHEN OTHERS THEN
8833: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
8831: EXCEPTION
8832: WHEN OTHERS THEN
8833: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
8834: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
8835: wf_core.context('PO_ReqChangeRequestWF_PVT','Record_PO_Rejection',x_progress);
8836: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Record_PO_Rejection');
8837: raise;
8838:
8839:
8832: WHEN OTHERS THEN
8833: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
8834: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
8835: wf_core.context('PO_ReqChangeRequestWF_PVT','Record_PO_Rejection',x_progress);
8836: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Record_PO_Rejection');
8837: raise;
8838:
8839:
8840: end Record_PO_Rejection;
8866: l_preparer_user_name varchar2(100);
8867:
8868: BEGIN
8869:
8870: x_progress := 'PO_ReqChangeRequestWF_PVT.Validate_Chg_Against_New_PO';
8871:
8872:
8873: -- Do nothing in cancel or timeout mode
8874: if (funcmode <> wf_engine.eng_run) then
8894:
8895: END IF;
8896: ValidateChgAgainstNewPO(l_change_request_group_id);
8897:
8898: x_progress := 'PO_ReqChangeRequestWF_PVT.Validate_Chg_Against_New_PO: 02';
8899:
8900: EXCEPTION
8901: WHEN OTHERS THEN
8902: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
8900: EXCEPTION
8901: WHEN OTHERS THEN
8902: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
8903: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
8904: wf_core.context('PO_ReqChangeRequestWF_PVT','Validate_Chg_Against_New_PO',x_progress);
8905: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Validate_Chg_Against_New_PO'); raise;
8906:
8907:
8908: end Validate_Chg_Against_New_PO;
8901: WHEN OTHERS THEN
8902: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
8903: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
8904: wf_core.context('PO_ReqChangeRequestWF_PVT','Validate_Chg_Against_New_PO',x_progress);
8905: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Validate_Chg_Against_New_PO'); raise;
8906:
8907:
8908: end Validate_Chg_Against_New_PO;
8909:
8967: resultout := 'N';
8968: end if;
8969:
8970: exception when no_data_found then
8971: wf_core.context('PO_ReqChangeRequestWF_PVT','Any_Requester_Change','010');
8972: raise;
8973: when others then
8974: wf_core.context('PO_ReqChangeRequestWF_PVT','Any_Requester_Change',x_progress);
8975: raise;
8970: exception when no_data_found then
8971: wf_core.context('PO_ReqChangeRequestWF_PVT','Any_Requester_Change','010');
8972: raise;
8973: when others then
8974: wf_core.context('PO_ReqChangeRequestWF_PVT','Any_Requester_Change',x_progress);
8975: raise;
8976: END Any_Requester_Change;
8977:
8978: /*************************************************************************
9016: avalue => l_item_key );
9017:
9018:
9019: exception when others then
9020: wf_core.context('PO_ReqChangeRequestWF_PVT','set_data_sup_chn_evt',x_progress);
9021: raise;
9022: END Set_Data_Req_Chn_Evt;
9023:
9024:
9674: WHEN no_data_found THEN
9675: resultout := 'N';
9676:
9677: WHEN others THEN
9678: wf_core.context('PO_ReqChangeRequestWF_PVT','Any_Cancellation_Change',x_progress);
9679: raise;
9680: END Any_Cancellation_Change;
9681:
9682: /*************************************************************************
9926: x_new_total := l_new_total;
9927:
9928: EXCEPTION
9929: WHEN OTHERS THEN
9930: wf_core.context('PO_ReqChangeRequestWF_PVT','CalculateRcoTotal',x_progress||sqlerrm);
9931: raise;
9932:
9933:
9934: END CalculateRcoTotal;
9962: l_doc_string varchar2(200);
9963: l_preparer_user_name varchar2(100);
9964:
9965: BEGIN
9966: x_progress := 'PO_ReqChangeRequestWF_PVT.Set_Buyer_Approval_Notfn_Attr: 01';
9967:
9968: -- Do nothing in cancel or timeout mode
9969: if (funcmode <> wf_engine.eng_run) then
9970: resultout := wf_engine.eng_null;
9994: PO_MOAC_UTILS_PVT.set_org_context(l_orgid) ; --
9995:
9996: END IF;
9997:
9998: x_progress := 'PO_ReqChangeRequestWF_PVT.Set_Buyer_Approval_Notfn_Attr: 02';
9999:
10000: IF l_doc_type IN ('PO','PA') THEN
10001:
10002: select creation_date, currency_code
10013: and pr.po_header_id = ph.po_header_id;
10014:
10015: END IF;
10016:
10017: x_progress := 'PO_ReqChangeRequestWF_PVT.Set_Buyer_Approval_Notfn_Attr: 03';
10018:
10019: -- get the order total (old/new)
10020: -- used by the approval notification
10021: CalculateRcoTotal( p_change_request_group_id => l_change_request_group_id,
10023: p_po_currency => l_po_currency,
10024: x_old_total =>l_old_total ,
10025: x_new_total =>l_new_total);
10026:
10027: x_progress := 'PO_ReqChangeRequestWF_PVT.Set_Buyer_Approval_Notfn_Attr: 04';
10028:
10029: -- set the order totals and the order date.
10030: -- These are used by approval notification
10031: PO_WF_UTIL_PKG.SetItemAttrDate ( itemtype => itemtype,
10047: FND_CURRENCY.GET_FORMAT_MASK(l_po_currency,
10048: g_currency_format_mask))
10049: || ' ' ||l_po_currency );
10050:
10051: x_progress := 'PO_ReqChangeRequestWF_PVT.Set_Buyer_Approval_Notfn_Attr: 05';
10052:
10053: EXCEPTION
10054: WHEN OTHERS THEN
10055: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
10054: WHEN OTHERS THEN
10055: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
10056: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(
10057: itemType, itemkey);
10058: wf_core.context('PO_ReqChangeRequestWF_PVT','Set_Buyer_Approval_Notfn_Attr',
10059: x_progress);
10060: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey,
10061: l_preparer_user_name, l_doc_string, sqlerrm,
10062: 'PO_ReqChangeRequestWF_PVT.Set_Buyer_Approval_Notfn_Attr');
10058: wf_core.context('PO_ReqChangeRequestWF_PVT','Set_Buyer_Approval_Notfn_Attr',
10059: x_progress);
10060: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey,
10061: l_preparer_user_name, l_doc_string, sqlerrm,
10062: 'PO_ReqChangeRequestWF_PVT.Set_Buyer_Approval_Notfn_Attr');
10063: raise;
10064:
10065: END Set_Buyer_Approval_Notfn_Attr;
10066:
10134:
10135: SetReqChangeFlag(l_change_request_group_id, l_req_document_id, itemtype, itemkey, 'N');
10136:
10137: EXCEPTION when others THEN
10138: wf_core.context('PO_ReqChangeRequestWF_PVT','Reject_Supplier_Change',x_progress);
10139: raise;
10140: END Reject_Supplier_Change;
10141:
10142: /*************************************************************************
10192:
10193: SetReqChangeFlag(l_change_request_group_id, l_document_id, itemtype, itemkey, 'N');
10194:
10195: EXCEPTION when others THEN
10196: wf_core.context('PO_ReqChangeRequestWF_PVT','Accept_Supplier_Change',x_progress);
10197: raise;
10198: END Accept_Supplier_Change;
10199:
10200: /*************************************************************************
10220: l_doc_string VARCHAR2(200);
10221: l_preparer_user_name varchar2(100);
10222: BEGIN
10223:
10224: x_progress := 'PO_ReqChangeRequestWF_PVT.Start_POChange_WF: 01';
10225:
10226:
10227: -- Do nothing in cancel or timeout mode
10228: --
10232: return;
10233:
10234: end if;
10235:
10236: x_progress := 'PO_ReqChangeRequestWF_PVT.Start_POChange_WF: 02';
10237:
10238: -- Set the multi-org context
10239: l_orgid := PO_WF_UTIL_PKG.GetItemAttrNumber (itemtype => itemtype,
10240: itemkey => itemkey,
10239: l_orgid := PO_WF_UTIL_PKG.GetItemAttrNumber (itemtype => itemtype,
10240: itemkey => itemkey,
10241: aname => 'ORG_ID');
10242:
10243: x_progress := 'PO_ReqChangeRequestWF_PVT.Start_POChange_WF: 03';
10244:
10245: IF l_orgid is NOT NULL THEN
10246:
10247: PO_MOAC_UTILS_PVT.set_org_context(l_orgid) ; --
10247: PO_MOAC_UTILS_PVT.set_org_context(l_orgid) ; --
10248:
10249: END IF;
10250:
10251: x_progress := 'PO_ReqChangeRequestWF_PVT.Start_POChange_WF: 04';
10252:
10253: l_po_chg_request_group_id := PO_WF_UTIL_PKG.GetItemAttrNumber (
10254: itemtype => itemtype,
10255: itemkey => itemkey,
10254: itemtype => itemtype,
10255: itemkey => itemkey,
10256: aname => 'PO_CHANGE_REQUEST_GROUP_ID');
10257:
10258: x_progress := 'PO_ReqChangeRequestWF_PVT.Start_POChange_WF: 05';
10259:
10260: StartInformBuyerWF(l_po_chg_request_group_id);
10261:
10262: x_progress := 'PO_ReqChangeRequestWF_PVT.Start_POChange_WF: 06';
10258: x_progress := 'PO_ReqChangeRequestWF_PVT.Start_POChange_WF: 05';
10259:
10260: StartInformBuyerWF(l_po_chg_request_group_id);
10261:
10262: x_progress := 'PO_ReqChangeRequestWF_PVT.Start_POChange_WF: 06';
10263:
10264: resultout := wf_engine.eng_completed || ':' || 'ACTIVITY_PERFORMED';
10265:
10266: EXCEPTION
10266: EXCEPTION
10267: WHEN OTHERS THEN
10268: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
10269: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
10270: wf_core.context('PO_ReqChangeRequestWF_PVT','Start_POChange_WF',x_progress);
10271: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Start_POChange_WF');
10272: raise;
10273:
10274: END Start_POChange_WF;
10267: WHEN OTHERS THEN
10268: l_doc_string := PO_REQAPPROVAL_INIT1.get_error_doc(itemType, itemkey);
10269: l_preparer_user_name := PO_REQAPPROVAL_INIT1.get_preparer_user_name(itemType, itemkey);
10270: wf_core.context('PO_ReqChangeRequestWF_PVT','Start_POChange_WF',x_progress);
10271: PO_REQAPPROVAL_INIT1.send_error_notif(itemType, itemkey, l_preparer_user_name, l_doc_string, sqlerrm, 'PO_ReqChangeRequestWF_PVT.Start_POChange_WF');
10272: raise;
10273:
10274: END Start_POChange_WF;
10275:
10393:
10394: resultout := wf_engine.eng_completed || ':' || l_result;
10395:
10396: EXCEPTION when others THEN
10397: wf_core.context('PO_ReqChangeRequestWF_PVT','Is_Tolerance_Check_Needed',l_progress);
10398: raise;
10399: END Is_Tolerance_Check_Needed;
10400:
10401: /*************************************************************************
10427: return;
10428:
10429: end if;
10430:
10431: l_progress := 'PO_ReqChangeRequestWF_PVT.More_Po_To_Process: 01';
10432:
10433: l_po_chg_request_group_id := PO_WF_UTIL_PKG.GetItemAttrNumber (
10434: itemtype => itemtype,
10435: itemkey => itemkey,
10434: itemtype => itemtype,
10435: itemkey => itemkey,
10436: aname => 'PO_CHANGE_REQUEST_GROUP_ID');
10437:
10438: l_progress := 'PO_ReqChangeRequestWF_PVT.More_Po_To_Process: 02';
10439:
10440: l_change_request_grp_id := PO_WF_UTIL_PKG.GetItemAttrNumber (
10441: itemtype => itemtype,
10442: itemkey => itemkey,
10441: itemtype => itemtype,
10442: itemkey => itemkey,
10443: aname => 'CHANGE_REQUEST_GROUP_ID');
10444:
10445: l_progress := 'PO_ReqChangeRequestWF_PVT.More_Po_To_Process: 03';
10446:
10447: SELECT MIN(po_change.change_request_group_id)
10448: INTO l_next_po_grp_id
10449: FROM
10454: req_change.change_request_group_id = l_change_request_grp_id AND
10455: po_change.change_request_group_id > l_po_chg_request_group_id
10456: ORDER BY po_change.change_request_group_id;
10457:
10458: l_progress := 'PO_ReqChangeRequestWF_PVT.More_Po_To_Process: 04';
10459:
10460: -- when next po change request group id is found
10461: IF (l_next_po_grp_id IS NOT NULL) THEN
10462:
10490:
10491: resultout := wf_engine.eng_completed || ':' || l_result;
10492:
10493: EXCEPTION when others THEN
10494: wf_core.context('PO_ReqChangeRequestWF_PVT','More_Po_To_Process',l_progress);
10495: raise;
10496: END More_Po_To_Process;
10497:
10498: /*************************************************************************
10534: return;
10535:
10536: end if;
10537:
10538: l_progress := 'PO_ReqChangeRequestWF_PVT.Accept_Po_Changes: 01';
10539:
10540: l_po_change_request_group_id := PO_WF_UTIL_PKG.GetItemAttrNumber(
10541: itemtype => itemtype,
10542: itemkey => itemkey,
10541: itemtype => itemtype,
10542: itemkey => itemkey,
10543: aname => 'PO_CHANGE_REQUEST_GROUP_ID');
10544:
10545: l_progress := 'PO_ReqChangeRequestWF_PVT.Accept_Po_Changes: 02';
10546:
10547: SELECT document_type, decode(document_type, 'RELEASE', po_release_id, document_header_id), document_num
10548: INTO l_document_type, l_document_id, l_document_number
10549: FROM po_change_requests
10555: ELSE
10556: l_document_subtype:='STANDARD';
10557: END IF;
10558:
10559: l_progress := 'PO_ReqChangeRequestWF_PVT.Accept_Po_Changes: 03';
10560:
10561: IF l_document_type = 'PO' THEN
10562:
10563: SELECT agent_id, creation_date
10573: WHERE PO_RELEASE_ID = l_document_id;
10574:
10575: END IF;
10576:
10577: l_progress := 'PO_ReqChangeRequestWF_PVT.Accept_Po_Changes: 04';
10578:
10579: -- get Buyer's name
10580: PO_REQAPPROVAL_INIT1.get_user_name(l_buyer_id, l_buyer_name, l_buyer_display_name);
10581:
10596: itemkey => itemkey,
10597: aname => 'PO_DOCUMENT_NUMBER',
10598: avalue => l_document_number );
10599:
10600: l_progress := 'PO_ReqChangeRequestWF_PVT.Accept_Po_Changes: 05';
10601:
10602: -- update PO action history as accepted by buyer
10603: InsertActionHist(itemtype, itemkey, l_document_id, l_document_type,
10604: l_document_subtype, l_buyer_id, 'ACCEPT', '', null);
10602: -- update PO action history as accepted by buyer
10603: InsertActionHist(itemtype, itemkey, l_document_id, l_document_type,
10604: l_document_subtype, l_buyer_id, 'ACCEPT', '', null);
10605:
10606: l_progress := 'PO_ReqChangeRequestWF_PVT.Accept_Po_Changes: 06';
10607:
10608: -- set PO records status to 'BUYER_APP' with no reason
10609: SetPoRequestStatus(l_po_change_request_group_id, 'BUYER_APP', '');
10610:
10607:
10608: -- set PO records status to 'BUYER_APP' with no reason
10609: SetPoRequestStatus(l_po_change_request_group_id, 'BUYER_APP', '');
10610:
10611: l_progress := 'PO_ReqChangeRequestWF_PVT.Accept_Po_Changes: 07';
10612:
10613: -- handle cancellations
10614: ProcessBuyerAction(l_po_change_request_group_id, 'CANCELLATION');
10615:
10612:
10613: -- handle cancellations
10614: ProcessBuyerAction(l_po_change_request_group_id, 'CANCELLATION');
10615:
10616: l_progress := 'PO_ReqChangeRequestWF_PVT.Accept_Po_Changes: 08';
10617:
10618: -- check if there is any modifications. Request_Status column will
10619: -- be ACCEPTED here for cancellations. Since ProcessBuyerAction
10620: -- call in the previous line set cancellation rows to 'ACCEPTED'
10630: WHEN NO_DATA_FOUND THEN
10631: l_change_exists := FALSE;
10632: END;
10633:
10634: l_progress := 'PO_ReqChangeRequestWF_PVT.Accept_Po_Changes: 09';
10635:
10636: IF (l_change_exists) THEN
10637:
10638: -- update requisition, PO and kick PO approval wf
10640: p_action=> 'ACCEPTANCE',
10641: p_req_chg_initiator=> 'REQUESTER'--Bug 14549341 Bypass price within tolerance validation for RCO flow
10642: );
10643:
10644: l_progress := 'PO_ReqChangeRequestWF_PVT.Accept_Po_Changes: 10';
10645:
10646: -- kick off PO approval
10647: KickOffPOApproval(l_po_header_id, l_po_release_id, l_return_status, l_return_msg);
10648:
10646: -- kick off PO approval
10647: KickOffPOApproval(l_po_header_id, l_po_release_id, l_return_status, l_return_msg);
10648:
10649: IF (l_return_status<>FND_API.G_RET_STS_SUCCESS) THEN
10650: l_progress := 'PO_ReqChangeRequestWF_PVT.Accept_Po_Changes: 11-'||l_return_status||'-'||to_char(l_po_header_id)||'-'||to_char(l_po_release_id)||'-'||l_return_msg;
10651: raise l_exception;
10652: else
10653: l_progress := 'PO_ReqChangeRequestWF_PVT.Accept_Po_Changes: 11';
10654: end if;
10649: IF (l_return_status<>FND_API.G_RET_STS_SUCCESS) THEN
10650: l_progress := 'PO_ReqChangeRequestWF_PVT.Accept_Po_Changes: 11-'||l_return_status||'-'||to_char(l_po_header_id)||'-'||to_char(l_po_release_id)||'-'||l_return_msg;
10651: raise l_exception;
10652: else
10653: l_progress := 'PO_ReqChangeRequestWF_PVT.Accept_Po_Changes: 11';
10654: end if;
10655: END IF;
10656:
10657: EXCEPTION when others THEN
10654: end if;
10655: END IF;
10656:
10657: EXCEPTION when others THEN
10658: wf_core.context('PO_ReqChangeRequestWF_PVT','Accept_Po_Changes',l_progress);
10659: raise;
10660: END Accept_Po_Changes;
10661:
10662: /*************************************************************************
10682: l_orgid number;
10683:
10684: BEGIN
10685:
10686: l_progress := 'PO_ReqChangeRequestWF_PVT.Set_Buyer_FYI_Notif_Attributes: 01';
10687:
10688: -- Do nothing in cancel or timeout mode
10689: if (funcmode <> wf_engine.eng_run) then
10690: resultout := wf_engine.eng_null;
10690: resultout := wf_engine.eng_null;
10691: return;
10692: end if;
10693:
10694: l_progress := 'PO_ReqChangeRequestWF_PVT.Set_Buyer_FYI_Notif_Attributes: 02';
10695:
10696: l_po_doc_id := PO_WF_UTIL_PKG.GetItemAttrNumber (itemtype => itemtype,
10697: itemkey => itemkey,
10698: aname => 'CURRENT_PO_HEADER_ID');
10700: l_po_doc_type := PO_WF_UTIL_PKG.GetItemAttrText (itemtype => itemtype,
10701: itemkey => itemkey,
10702: aname => 'PO_DOCUMENT_TYPE');
10703:
10704: l_progress := 'PO_ReqChangeRequestWF_PVT.Set_Buyer_FYI_Notif_Attributes: 03';
10705:
10706: -- get po/release currency
10707: IF l_po_doc_type IN ('PO','PA') THEN
10708:
10720: and pr.po_header_id = ph.po_header_id;
10721:
10722: END IF;
10723:
10724: l_progress := 'PO_ReqChangeRequestWF_PVT.Set_Buyer_FYI_Notif_Attributes: 04';
10725:
10726: l_po_chg_request_group_id := PO_WF_UTIL_PKG.GetItemAttrNumber (
10727: itemtype => itemtype,
10728: itemkey => itemkey,
10727: itemtype => itemtype,
10728: itemkey => itemkey,
10729: aname => 'PO_CHANGE_REQUEST_GROUP_ID');
10730:
10731: l_progress := 'PO_ReqChangeRequestWF_PVT.Set_Buyer_FYI_Notif_Attributes: 05';
10732:
10733: l_orgid := PO_WF_UTIL_PKG.GetItemAttrNumber (itemtype => itemtype,
10734: itemkey => itemkey,
10735: aname => 'ORG_ID');
10741: p_po_currency => l_po_currency,
10742: x_old_total =>l_old_total ,
10743: x_new_total =>l_new_total);
10744:
10745: l_progress := 'PO_ReqChangeRequestWF_PVT.Set_Buyer_FYI_Notif_Attributes: 06';
10746:
10747: PO_WF_UTIL_PKG.SetItemAttrText ( itemtype => itemtype,
10748: itemkey => itemkey,
10749: aname => 'OLD_PO_TOTAL',
10756: avalue =>
10757: to_char(l_new_total, FND_CURRENCY.GET_FORMAT_MASK(l_po_currency, 30)) || ' ' || l_po_currency);
10758:
10759: EXCEPTION when others THEN
10760: wf_core.context('PO_ReqChangeRequestWF_PVT','Set_Buyer_FYI_Notif_Attributes',l_progress);
10761: raise;
10762: END Set_Buyer_FYI_Notif_Attributes;
10763:
10764: /*************************************************************************
11310: return;
11311:
11312: END IF;
11313:
11314: l_progress := 'PO_ReqChangeRequestWF_PVT.More_Req_To_Process: 01';
11315:
11316: l_req_request_group_id := PO_WF_UTIL_PKG.GetItemAttrNumber (
11317: itemtype => itemtype,
11318: itemkey => itemkey,
11317: itemtype => itemtype,
11318: itemkey => itemkey,
11319: aname => 'REQ_CHANGE_GROUP_ID');
11320:
11321: l_progress := 'PO_ReqChangeRequestWF_PVT.More_Req_To_Process: 02';
11322:
11323: l_po_request_group_id := PO_WF_UTIL_PKG.GetItemAttrNumber (
11324: itemtype => itemtype,
11325: itemkey => itemkey,
11324: itemtype => itemtype,
11325: itemkey => itemkey,
11326: aname => 'CHANGE_REQUEST_GROUP_ID');
11327:
11328: l_progress := 'PO_ReqChangeRequestWF_PVT.More_Req_To_Process: 03';
11329:
11330: SELECT MIN(req_change.change_request_group_id)
11331: INTO l_next_req_grp_id
11332: FROM
11336: po_change.change_request_group_id = l_po_request_group_id AND
11337: po_change.parent_change_request_id = req_change.change_request_id AND
11338: req_change.change_request_group_id > l_req_request_group_id;
11339:
11340: l_progress := 'PO_ReqChangeRequestWF_PVT.More_Req_To_Process: 04';
11341:
11342: -- when next po change request group id is found
11343: IF (l_next_req_grp_id IS NOT NULL) THEN
11344:
11366:
11367: resultout := wf_engine.eng_completed || ':' || l_result;
11368:
11369: EXCEPTION when others THEN
11370: wf_core.context('PO_ReqChangeRequestWF_PVT','More_Req_To_Process',l_progress);
11371: raise;
11372: END More_Req_To_Process;
11373:
11374: /*************************************************************************
11393: l_application_id NUMBER;
11394:
11395: BEGIN
11396:
11397: l_progress := 'PO_ReqChangeRequestWF_PVT.Start_Notify_Requester_Process : 01';
11398:
11399: IF (funcmode <> wf_engine.eng_run) THEN
11400: resultout := wf_engine.eng_null;
11401: return;
11405: l_orgid := PO_WF_UTIL_PKG.GetItemAttrNumber (itemtype => itemtype,
11406: itemkey => itemkey,
11407: aname => 'ORG_ID');
11408:
11409: l_progress := 'PO_ReqChangeRequestWF_PVT.Start_Notify_Requester_Process: 02';
11410:
11411: IF l_orgid is NOT NULL THEN
11412: PO_MOAC_UTILS_PVT.set_org_context(l_orgid) ; --
11413: END IF;
11411: IF l_orgid is NOT NULL THEN
11412: PO_MOAC_UTILS_PVT.set_org_context(l_orgid) ; --
11413: END IF;
11414:
11415: l_progress := 'PO_ReqChangeRequestWF_PVT.Start_Notify_Requester_Process: 03';
11416:
11417: l_po_change_request_group_id := PO_WF_UTIL_PKG.GetItemAttrNumber (
11418: itemtype => itemtype,
11419: itemkey => itemkey,
11425: fnd_profile.get('RESP_APPL_ID', l_application_id);
11426:
11427: Start_NotifyRequesterProcess(l_po_change_request_group_id, itemtype, itemkey);
11428:
11429: l_progress := 'PO_ReqChangeRequestWF_PVT.Start_Notify_Requester_Process: 04';
11430:
11431: --Bug: 14642268 After call from above api which could have changed the session context, reset the session context to original value
11432: fnd_global.apps_initialize (l_user_id, l_responsibility_id, l_application_id);
11433:
11430:
11431: --Bug: 14642268 After call from above api which could have changed the session context, reset the session context to original value
11432: fnd_global.apps_initialize (l_user_id, l_responsibility_id, l_application_id);
11433:
11434: l_progress := 'PO_ReqChangeRequestWF_PVT.Start_Notify_Requester_Process: 05';
11435:
11436: EXCEPTION when others THEN
11437: wf_core.context('PO_ReqChangeRequestWF_PVT','Start_Notify_Requester_Process',l_progress || 'SQL ERROR:' || sqlerrm);
11438: RAISE;
11433:
11434: l_progress := 'PO_ReqChangeRequestWF_PVT.Start_Notify_Requester_Process: 05';
11435:
11436: EXCEPTION when others THEN
11437: wf_core.context('PO_ReqChangeRequestWF_PVT','Start_Notify_Requester_Process',l_progress || 'SQL ERROR:' || sqlerrm);
11438: RAISE;
11439: END Start_Notify_Requester_Process;
11440:
11441: /*************************************************************************
11461: l_responsibility_id NUMBER;
11462:
11463: BEGIN
11464:
11465: l_progress := 'PO_ReqChangeRequestWF_PVT.Start_NotifyRequesterProcess: 01' || ' P_PO_CHANGE_REQUEST_GROUP_ID:' || p_po_change_request_group_id;
11466:
11467: SELECT po_requester_change_wf_s.nextval INTO l_count FROM dual;
11468:
11469: l_item_key:='NOTIFREQ_'||to_char(p_po_change_request_group_id)||'_'||to_char(l_count);
11467: SELECT po_requester_change_wf_s.nextval INTO l_count FROM dual;
11468:
11469: l_item_key:='NOTIFREQ_'||to_char(p_po_change_request_group_id)||'_'||to_char(l_count);
11470:
11471: l_progress := 'PO_ReqChangeRequestWF_PVT.Start_NotifyRequesterProcess: 02' || ' ITEM KEY:' || l_item_key;
11472:
11473: l_forward_from_username:= PO_WF_UTIL_PKG.GetItemAttrText(
11474: itemtype=>p_req_item_type,
11475: itemkey=>p_req_item_key,
11491:
11492: StartPOChangeWF(p_po_change_request_group_id, l_item_key, 'NOTIFY_REQUESTER_PROCESS', l_forward_from_username, l_user_id, l_responsibility_id, l_application_id);
11493:
11494: EXCEPTION when others THEN
11495: wf_core.context('PO_ReqChangeRequestWF_PVT','Start_NotifyRequesterProcess',l_progress || 'SQL ERROR:' || sqlerrm);
11496: RAISE;
11497: END Start_NotifyRequesterProcess;
11498:
11499:
11770:
11771: EXCEPTION
11772: WHEN OTHERS THEN
11773:
11774: wf_core.context('PO_ReqChangeRequestWF_PVT',
11775: 'get_po_line_amount',l_progress||'-'||sqlerrm);
11776:
11777: raise;
11778:
12131: EXCEPTION
12132: WHEN OTHERS THEN
12133: l_doc_string := po_reqapproval_init1.get_error_doc(itemtype, itemkey);
12134: l_preparer_user_name := po_reqapproval_init1.get_preparer_user_name(itemtype, itemkey);
12135: wf_core.context('PO_ReqChangeRequestWF_PVT', 'Convert_Into_sO_Change', x_progress);
12136: po_reqapproval_init1.send_error_notif(itemtype, itemkey, l_preparer_user_name, l_doc_string, SQLERRM, 'PO_ReqChangeRequestWF_PVT.Convert_Into_sO_Change'||l_return_status||l_return_msg);
12137: RAISE;
12138:
12139: END convert_into_so_change;
12132: WHEN OTHERS THEN
12133: l_doc_string := po_reqapproval_init1.get_error_doc(itemtype, itemkey);
12134: l_preparer_user_name := po_reqapproval_init1.get_preparer_user_name(itemtype, itemkey);
12135: wf_core.context('PO_ReqChangeRequestWF_PVT', 'Convert_Into_sO_Change', x_progress);
12136: po_reqapproval_init1.send_error_notif(itemtype, itemkey, l_preparer_user_name, l_doc_string, SQLERRM, 'PO_ReqChangeRequestWF_PVT.Convert_Into_sO_Change'||l_return_status||l_return_msg);
12137: RAISE;
12138:
12139: END convert_into_so_change;
12140:
12202: --calling the OM API for hold if called from reqschedule program
12203:
12204: IF (p_mode = 'REQ_RESCHEDULE' ) THEN
12205: /* -- This proc gets called as
12206: PO_ReqChangeRequestWF_PVT.ConvertIntoSOChange(
12207: p_chn_request_group_id => null,
12208: p_document_header_id => null,
12209: p_document_line_id => l_document_line_id,
12210: p_document_num => null,
12441: IF l_orgid is NOT NULL THEN
12442: PO_MOAC_UTILS_PVT.set_org_context(l_orgid) ; --
12443: END IF;
12444:
12445: wf_core.context('PO_ReqChangeRequestWF_PVT', 'ConvertIntoSOChange '||l_return_status, l_progress);
12446: ROLLBACK TO convertintosochange_SP;
12447: RAISE;
12448: END ConvertIntoSOChange;
12449:
13081:
13082:
13083: BEGIN
13084: --INTERNAL_CHANGE_REQUEST_ID
13085: x_progress := 'PO_ReqChangeRequestWF_PVT.SEND_INTERNAL_NOTIF: 01';
13086:
13087: -- Do nothing in cancel or timeout mode
13088: IF (funcmode <> wf_engine.eng_run) THEN
13089: resultout := wf_engine.eng_null;
13224: l_doc_string VARCHAR2(200);
13225: l_preparer_user_name VARCHAR2(100);
13226: BEGIN
13227: --INTERNAL_CHANGE_REQUEST_ID
13228: x_progress := 'PO_ReqChangeRequestWF_PVT.NEXT_INTERNAL_NOTIF: 01';
13229:
13230: -- Do nothing in cancel or timeout mode
13231: IF (funcmode <> wf_engine.eng_run) THEN
13232: resultout := wf_engine.eng_null;
13701:
13702: END get_req_line_num_chng_grp;
13703: -- 15875594 changes ends
13704:
13705: end PO_ReqChangeRequestWF_PVT;