DBA Data[Home] [Help]

APPS.PO_DRAFT_MERGE_PKG dependencies on PO_DRAFT_MERGE_PKG

Line 1: PACKAGE BODY PO_DRAFT_MERGE_PKG AS

1: PACKAGE BODY PO_DRAFT_MERGE_PKG AS
2: /* $Header: PO_DRAFT_MERGE_PKG.plb 120.33.12020000.10 2013/04/18 11:43:19 inagdeo ship $ */
3:
4: -- Read the profile option that enables/disables the debug log
5: g_po_wf_debug VARCHAR2(1) := NVL(FND_PROFILE.VALUE('PO_SET_DEBUG_WORKFLOW_ON'),'N');

Line 2: /* $Header: PO_DRAFT_MERGE_PKG.plb 120.33.12020000.10 2013/04/18 11:43:19 inagdeo ship $ */

1: PACKAGE BODY PO_DRAFT_MERGE_PKG AS
2: /* $Header: PO_DRAFT_MERGE_PKG.plb 120.33.12020000.10 2013/04/18 11:43:19 inagdeo ship $ */
3:
4: -- Read the profile option that enables/disables the debug log
5: g_po_wf_debug VARCHAR2(1) := NVL(FND_PROFILE.VALUE('PO_SET_DEBUG_WORKFLOW_ON'),'N');
6: g_debug_stmt CONSTANT BOOLEAN := PO_DEBUG.is_debug_stmt_on;

Line 8: g_pkg_name CONSTANT VARCHAR2(30) := 'PO_DRAFT_MERGE_PKG';

4: -- Read the profile option that enables/disables the debug log
5: g_po_wf_debug VARCHAR2(1) := NVL(FND_PROFILE.VALUE('PO_SET_DEBUG_WORKFLOW_ON'),'N');
6: g_debug_stmt CONSTANT BOOLEAN := PO_DEBUG.is_debug_stmt_on;
7:
8: g_pkg_name CONSTANT VARCHAR2(30) := 'PO_DRAFT_MERGE_PKG';
9: g_module_prefix CONSTANT VARCHAR2(40) := 'po.plsql.' || g_pkg_name || '.';
10:
11:
12: /* Bug 14046925 : Declaration of global varaibles for tracking error code in UPDATE_AWARD_WITH_MOD_VALUES and MergeReserve_Autonomous */

Line 212: x_progress := 'PO_DRAFT_MERGE_PKG.merge_upgraded_attachments: Exception';

208:
209: Exception
210: When Others Then
211: d_position := 30;
212: x_progress := 'PO_DRAFT_MERGE_PKG.merge_upgraded_attachments: Exception';
213: IF (PO_LOG.d_stmt) THEN
214: PO_LOG.stmt(d_module, d_position, x_progress);
215: END IF;
216: raise;

Line 242: x_progress := 'PO_DRAFT_MERGE_PKG.MANAGE_ATTACHMENTS_MERGE: Start: 01';

238: l_draft_id Number := -1;
239: l_document_id Number := -1;
240: l_attach_count Number := 0;
241: Begin
242: x_progress := 'PO_DRAFT_MERGE_PKG.MANAGE_ATTACHMENTS_MERGE: Start: 01';
243: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
244: --Check if the modification has any attachments
245:
246: BEGIN

Line 319: x_progress := 'PO_DRAFT_MERGE_PKG.MANAGE_ATTACHMENTS_MERGE: Exception';

315: END IF;
316:
317: Exception
318: When Others Then
319: x_progress := 'PO_DRAFT_MERGE_PKG.MANAGE_ATTACHMENTS_MERGE: Exception';
320: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
321: raise;
322: End;
323:

Line 352: x_progress := 'PO_DRAFT_MERGE_PKG.INSERT_ACT_HIST_MERGE: Start: 01';

348: x_progress varchar2(1000);
349: l_draft_id Number := -1;
350: Begin
351:
352: x_progress := 'PO_DRAFT_MERGE_PKG.INSERT_ACT_HIST_MERGE: Start: 01';
353: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
354: -- CLM Aprvl
355: l_draft_id := po_wf_util_pkg.GetItemAttrNumber (itemtype => itemtype,
356: itemkey => itemkey,

Line 370: x_progress := 'PO_DRAFT_MERGE_PKG.INSERT_ACT_HIST_MERGE: End';

366: actid,
367: funcmode,
368: resultout);
369:
370: x_progress := 'PO_DRAFT_MERGE_PKG.INSERT_ACT_HIST_MERGE: End';
371: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
372:
373: resultout := wf_engine.eng_completed || ':' || 'Y';
374: Exception

Line 376: x_progress := 'PO_DRAFT_MERGE_PKG.INSERT_ACT_HIST_MERGE: Exception';

372:
373: resultout := wf_engine.eng_completed || ':' || 'Y';
374: Exception
375: When Others Then
376: x_progress := 'PO_DRAFT_MERGE_PKG.INSERT_ACT_HIST_MERGE: Exception';
377: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
378: resultout := wf_engine.eng_completed || ':' || 'N';
379: raise;
380: End;

Line 393: x_progress := 'PO_DRAFT_MERGE_PKG.IS_PDF_COMM_ENABLED: Start: 01';

389: x_progress varchar2(1000);
390: l_draft_id Number := -1;
391: Begin
392:
393: x_progress := 'PO_DRAFT_MERGE_PKG.IS_PDF_COMM_ENABLED: Start: 01';
394: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
395: -- CLM Aprvl
396: l_draft_id := po_wf_util_pkg.GetItemAttrNumber (itemtype => itemtype,
397: itemkey => itemkey,

Line 404: x_progress := 'PO_DRAFT_MERGE_PKG.IS_PDF_COMM_ENABLED: End';

400: If l_draft_id is Null Then
401: l_draft_id := -1;
402: End If;
403: -- CLM Aprvl
404: x_progress := 'PO_DRAFT_MERGE_PKG.IS_PDF_COMM_ENABLED: End';
405: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
406:
407: resultout := wf_engine.eng_completed || ':' || 'Y';
408: Exception

Line 410: x_progress := 'PO_DRAFT_MERGE_PKG.IS_PDF_COMM_ENABLED: Exception';

406:
407: resultout := wf_engine.eng_completed || ':' || 'Y';
408: Exception
409: When Others Then
410: x_progress := 'PO_DRAFT_MERGE_PKG.IS_PDF_COMM_ENABLED: Exception';
411: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
412: resultout := wf_engine.eng_completed || ':' || 'N';
413: raise;
414: End;

Line 427: x_progress := 'PO_DRAFT_MERGE_PKG.DELETE_PDF_ATTACHMENTS: Start: 01';

423: x_progress varchar2(1000);
424: l_draft_id Number := -1;
425: Begin
426:
427: x_progress := 'PO_DRAFT_MERGE_PKG.DELETE_PDF_ATTACHMENTS: Start: 01';
428: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
429: -- CLM Aprvl
430: l_draft_id := po_wf_util_pkg.GetItemAttrNumber (itemtype => itemtype,
431: itemkey => itemkey,

Line 438: x_progress := 'PO_DRAFT_MERGE_PKG.DELETE_PDF_ATTACHMENTS: End';

434: If l_draft_id is Null Then
435: l_draft_id := -1;
436: End If;
437: -- CLM Aprvl
438: x_progress := 'PO_DRAFT_MERGE_PKG.DELETE_PDF_ATTACHMENTS: End';
439: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
440:
441: resultout := wf_engine.eng_completed || ':' || 'Y';
442: Exception

Line 444: x_progress := 'PO_DRAFT_MERGE_PKG.DELETE_PDF_ATTACHMENTS: Exception';

440:
441: resultout := wf_engine.eng_completed || ':' || 'Y';
442: Exception
443: When Others Then
444: x_progress := 'PO_DRAFT_MERGE_PKG.DELETE_PDF_ATTACHMENTS: Exception';
445: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
446: resultout := wf_engine.eng_completed || ':' || 'N';
447: raise;
448: End;

Line 461: x_progress := 'PO_DRAFT_MERGE_PKG.INSERT_ACT_HIST_REJECT: Start: 01';

457: x_progress varchar2(1000);
458: l_draft_id Number := -1;
459: Begin
460:
461: x_progress := 'PO_DRAFT_MERGE_PKG.INSERT_ACT_HIST_REJECT: Start: 01';
462: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
463: -- CLM Aprvl
464: l_draft_id := po_wf_util_pkg.GetItemAttrNumber (itemtype => itemtype,
465: itemkey => itemkey,

Line 473: x_progress := 'PO_DRAFT_MERGE_PKG.INSERT_ACT_HIST_REJECT: calling POR_AME_REQ_WF_PVT.update_action_history_reject ';

469: l_draft_id := -1;
470: End If;
471: -- CLM Aprvl
472:
473: x_progress := 'PO_DRAFT_MERGE_PKG.INSERT_ACT_HIST_REJECT: calling POR_AME_REQ_WF_PVT.update_action_history_reject ';
474: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
475:
476: x_progress := 'PO_DRAFT_MERGE_PKG.INSERT_ACT_HIST_REJECT: calling PO_REQAPPROVAL_ACTION.reject_doc';
477: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);

Line 476: x_progress := 'PO_DRAFT_MERGE_PKG.INSERT_ACT_HIST_REJECT: calling PO_REQAPPROVAL_ACTION.reject_doc';

472:
473: x_progress := 'PO_DRAFT_MERGE_PKG.INSERT_ACT_HIST_REJECT: calling POR_AME_REQ_WF_PVT.update_action_history_reject ';
474: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
475:
476: x_progress := 'PO_DRAFT_MERGE_PKG.INSERT_ACT_HIST_REJECT: calling PO_REQAPPROVAL_ACTION.reject_doc';
477: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
478: POR_AME_REQ_WF_PVT.update_action_history_reject(
479: itemtype,
480: itemkey,

Line 492: x_progress := 'PO_DRAFT_MERGE_PKG.INSERT_ACT_HIST_MERGE: End';

488: actid,
489: funcmode,
490: resultout);
491:
492: x_progress := 'PO_DRAFT_MERGE_PKG.INSERT_ACT_HIST_MERGE: End';
493: x_progress := 'PO_DRAFT_MERGE_PKG.INSERT_ACT_HIST_REJECT: End';
494: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
495:
496: resultout := wf_engine.eng_completed || ':' || 'Y';

Line 493: x_progress := 'PO_DRAFT_MERGE_PKG.INSERT_ACT_HIST_REJECT: End';

489: funcmode,
490: resultout);
491:
492: x_progress := 'PO_DRAFT_MERGE_PKG.INSERT_ACT_HIST_MERGE: End';
493: x_progress := 'PO_DRAFT_MERGE_PKG.INSERT_ACT_HIST_REJECT: End';
494: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
495:
496: resultout := wf_engine.eng_completed || ':' || 'Y';
497: Exception

Line 499: x_progress := 'PO_DRAFT_MERGE_PKG.INSERT_ACT_HIST_REJECT: Exception';

495:
496: resultout := wf_engine.eng_completed || ':' || 'Y';
497: Exception
498: When Others Then
499: x_progress := 'PO_DRAFT_MERGE_PKG.INSERT_ACT_HIST_REJECT: Exception';
500: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
501: resultout := wf_engine.eng_completed || ':' || 'N';
502: raise;
503: End;

Line 551: x_progress := 'PO_DRAFT_MERGE_PKG.UPDATE_AWARD_WITH_MOD_VALUES: Start: 01';

547: Begin
548:
549: savepoint UPDATE_AWARD_MOD_VALUES_SP; -- Bug 14046925 : Adding savepoint
550:
551: x_progress := 'PO_DRAFT_MERGE_PKG.UPDATE_AWARD_WITH_MOD_VALUES: Start: 01';
552: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
553:
554: l_draft_id := po_wf_util_pkg.GetItemAttrNumber (itemtype => itemtype,itemkey => itemkey,aname => 'DRAFT_ID');
555: l_document_id := po_wf_util_pkg.GetItemAttrNumber (itemtype => itemtype,itemkey => itemkey,aname => 'DOCUMENT_ID');

Line 634: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous - Return Status: '|| l_return_status ;

630: x_po_return_code => l_po_return_code,
631: x_online_report_id => l_online_report_id,
632: x_return_status=> l_return_status);
633:
634: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous - Return Status: '|| l_return_status ;
635: po_wf_debug_pkg.Insert_debug(itemtype,itemkey,x_progress );
636:
637: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR OR l_return_status IS NULL) THEN
638: -- copying message from po_online_report_text_gt

Line 639: g_action:= 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : ';

635: po_wf_debug_pkg.Insert_debug(itemtype,itemkey,x_progress );
636:
637: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR OR l_return_status IS NULL) THEN
638: -- copying message from po_online_report_text_gt
639: g_action:= 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : ';
640: SELECT TEXT_LINE into g_error_message FROM po_online_report_text_gt WHERE online_report_id = l_online_report_id
641: and rownum =1;
642: po_wf_debug_pkg.Insert_debug(itemtype,itemkey, g_action || g_error_message );
643: g_result := l_return_status;

Line 667: x_progress := 'PO_DRAFT_MERGE_PKG.UPDATE_AWARD_WITH_MOD_VALUES: ' || g_error_message;

663: ICX_CAT_INTERMEDIA_INDEX_PVT.rebuild_index;
664: EXCEPTION
665: WHEN OTHERS THEN
666: g_error_message := 'Exception for ICX_CAT_INTERMEDIA_INDEX_PVT.rebuild_index and erorr encountered is ' ||SQLCODE||' -ERROR- '||SQLERRM ;
667: x_progress := 'PO_DRAFT_MERGE_PKG.UPDATE_AWARD_WITH_MOD_VALUES: ' || g_error_message;
668: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
669: END;
670: END IF;
671:

Line 684: x_progress := 'PO_DRAFT_MERGE_PKG.UPDATE_AWARD_WITH_MOD_VALUES: Exception';

680:
681: Exception
682: When Others Then
683: ROLLBACK to UPDATE_AWARD_MOD_VALUES_SP; -- Rolling back to savepoint in case of any errors
684: x_progress := 'PO_DRAFT_MERGE_PKG.UPDATE_AWARD_WITH_MOD_VALUES: Exception';
685: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
686: -- Bug14046925 : Setting workflow attributes with values
687: po_wf_util_pkg.SetItemAttrText ( itemtype => itemtype,
688: itemkey => itemkey,

Line 759: x_progress := 'PO_DRAFT_MERGE_PKG.PROCESS_CONTROL_ACTIONS: Start: 01';

755: x_progress varchar2(1000);
756:
757: BEGIN
758:
759: x_progress := 'PO_DRAFT_MERGE_PKG.PROCESS_CONTROL_ACTIONS: Start: 01';
760: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
761:
762: l_draft_id := po_wf_util_pkg.GetItemAttrNumber (itemtype => itemtype,itemkey => itemkey,aname => 'DRAFT_ID');
763: IF l_draft_id IS NOT NULL ANd l_draft_id <> -1 THEN

Line 931: x_progress := 'PO_DRAFT_MERGE_PKG.Process_control_actions: Exception';

927: END IF;
928: resultout := wf_engine.eng_completed || ':' || 'Y';
929: EXCEPTION
930: WHEN OTHERS THEN
931: x_progress := 'PO_DRAFT_MERGE_PKG.Process_control_actions: Exception';
932: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
933: resultout := wf_engine.eng_completed || ':' || 'N';
934: raise;
935: END PROCESS_CONTROL_ACTIONS;

Line 952: x_progress := 'PO_DRAFT_MERGE_PKG.IS_CLM_DOCUMENT: Start: 01';

948: l_document_id Number;
949: l_is_clm_document varchar2(1);
950: Begin
951:
952: x_progress := 'PO_DRAFT_MERGE_PKG.IS_CLM_DOCUMENT: Start: 01';
953: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
954:
955: l_document_id := po_wf_util_pkg.GetItemAttrNumber (itemtype => itemtype,
956: itemkey => itemkey,

Line 968: x_progress := 'PO_DRAFT_MERGE_PKG.IS_CLM_DOCUMENT: in no data found exception';

964: WHERE psh.style_id = poh.style_id
965: AND poh.po_header_id = l_document_id;
966: EXCEPTION
967: WHEN no_data_found THEN
968: x_progress := 'PO_DRAFT_MERGE_PKG.IS_CLM_DOCUMENT: in no data found exception';
969: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
970: resultout := wf_engine.eng_completed || ':' || 'N';
971: END;
972:

Line 973: x_progress := 'PO_DRAFT_MERGE_PKG.IS_CLM_DOCUMENT: l_is_clm_document: '||l_is_clm_document;

969: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
970: resultout := wf_engine.eng_completed || ':' || 'N';
971: END;
972:
973: x_progress := 'PO_DRAFT_MERGE_PKG.IS_CLM_DOCUMENT: l_is_clm_document: '||l_is_clm_document;
974: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
975: resultout := wf_engine.eng_completed || ':' || l_is_clm_document;
976:
977:

Line 980: x_progress := 'PO_DRAFT_MERGE_PKG.IS_CLM_DOCUMENT: Exception';

976:
977:
978: Exception
979: When Others Then
980: x_progress := 'PO_DRAFT_MERGE_PKG.IS_CLM_DOCUMENT: Exception';
981: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
982: raise;
983: End;
984:

Line 1020: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous: Savepoint MergeReserve_Autonomous_SP';

1016: BEGIN
1017:
1018: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,'MergeReserve_Autonomous : Start');
1019: SAVEPOINT MergeReserve_Autonomous_SP;
1020: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous: Savepoint MergeReserve_Autonomous_SP';
1021: /*fed fields : update IDV total_amt_ordered for header and line and total qty ordered for line*/
1022: g_action := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : PO_DOCUMENT_ACTION_UTIL.upd_idv_qty_amt_hdr';
1023: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,g_action);
1024: PO_DOCUMENT_ACTION_UTIL.upd_idv_qty_amt_hdr(p_po_header_id => P_Document_Id

Line 1022: g_action := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : PO_DOCUMENT_ACTION_UTIL.upd_idv_qty_amt_hdr';

1018: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,'MergeReserve_Autonomous : Start');
1019: SAVEPOINT MergeReserve_Autonomous_SP;
1020: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous: Savepoint MergeReserve_Autonomous_SP';
1021: /*fed fields : update IDV total_amt_ordered for header and line and total qty ordered for line*/
1022: g_action := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : PO_DOCUMENT_ACTION_UTIL.upd_idv_qty_amt_hdr';
1023: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,g_action);
1024: PO_DOCUMENT_ACTION_UTIL.upd_idv_qty_amt_hdr(p_po_header_id => P_Document_Id
1025: , p_draft_id => p_draft_id
1026: , p_po_mode => PO_DOCUMENT_ACTION_PVT.g_doc_action_APPROVE

Line 1030: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous: Draft Id: '||p_draft_id ||'. Merge with Award Id: '||P_Document_Id;

1026: , p_po_mode => PO_DOCUMENT_ACTION_PVT.g_doc_action_APPROVE
1027: , x_return_status => x_return_status
1028: );
1029: IF p_draft_id <> -1 THEN
1030: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous: Draft Id: '||p_draft_id ||'. Merge with Award Id: '||P_Document_Id;
1031: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
1032:
1033: -- Copying contract details to base document
1034: g_action := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : PO_CONTERMS_UTL_GRP.copy_conterms_mod';

Line 1034: g_action := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : PO_CONTERMS_UTL_GRP.copy_conterms_mod';

1030: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous: Draft Id: '||p_draft_id ||'. Merge with Award Id: '||P_Document_Id;
1031: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
1032:
1033: -- Copying contract details to base document
1034: g_action := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : PO_CONTERMS_UTL_GRP.copy_conterms_mod';
1035: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,g_action);
1036: PO_CONTERMS_UTL_GRP.copy_conterms_mod(
1037: p_document_id => p_document_id,
1038: p_draft_id => p_draft_id,

Line 1054: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous: Merge Return Status: '||l_return_status;

1050: p_acceptance_action => NULL,
1051: x_return_status => l_return_status,
1052: p_caller => 'MERGE');
1053:
1054: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous: Merge Return Status: '||l_return_status;
1055: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
1056:
1057: IF (l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
1058: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous: Merge Successful';

Line 1058: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous: Merge Successful';

1054: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous: Merge Return Status: '||l_return_status;
1055: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
1056:
1057: IF (l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
1058: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous: Merge Successful';
1059: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey, x_progress);
1060: ELSE
1061: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1062: END IF;

Line 1066: g_action := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : update_mod_approved_date';

1062: END IF;
1063:
1064: -- Update the approved_date of the header draft
1065: -- which is used as the signed date of the modification
1066: g_action := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : update_mod_approved_date';
1067: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,g_action);
1068: update_mod_approved_date(p_draft_id => p_draft_id,
1069: p_document_id => p_document_id);
1070:

Line 1078: g_action := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : PO_CLM_CLO_UTIL.Check_Uda_Enabled';

1074: INTO l_functional_area_code, l_document_type_code, l_document_style_id
1075: FROM po_headers_all
1076: WHERE PO_HEADER_ID = p_document_id;
1077:
1078: g_action := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : PO_CLM_CLO_UTIL.Check_Uda_Enabled';
1079: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,g_action);
1080: PO_CLM_CLO_UTIL.Check_Uda_Enabled
1081: (
1082: p_functional_area_code => l_functional_area_code

Line 1108: g_action := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : PO_DOC_UDA_UTIL.merge_mod_uda';

1104: END IF;
1105:
1106: IF l_enabled_flag = 'Y' THEN
1107:
1108: g_action := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : PO_DOC_UDA_UTIL.merge_mod_uda';
1109: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,g_action);
1110: PO_DOC_UDA_UTIL.merge_mod_uda(
1111: p_po_header_id => P_Document_Id,
1112: p_draft_id => p_draft_id,

Line 1115: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous: Uda Merge Return Status: '||l_return_status;

1111: p_po_header_id => P_Document_Id,
1112: p_draft_id => p_draft_id,
1113: x_return_status => l_return_status );
1114:
1115: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous: Uda Merge Return Status: '||l_return_status;
1116: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
1117:
1118: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1119: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1124: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous: Merge Successful';

1120: END IF;
1121:
1122: -- TODO : THIS CHECK IS IRRELAVENT AS TRANSFER TO DRAFT DOESN'T RETURN TRUE/FALSE
1123: If l_return_status <> FND_API.G_FALSE THEN
1124: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous: Merge Successful';
1125: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey, x_progress);
1126: End If;
1127:
1128: g_action := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : PO_DRAFTS_PVT.update_revnum_headers_ext';

Line 1128: g_action := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : PO_DRAFTS_PVT.update_revnum_headers_ext';

1124: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous: Merge Successful';
1125: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey, x_progress);
1126: End If;
1127:
1128: g_action := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : PO_DRAFTS_PVT.update_revnum_headers_ext';
1129: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,g_action);
1130: PO_DRAFTS_PVT.update_revnum_headers_ext(p_draft_id =>p_draft_id,
1131: p_po_header_id =>P_Document_Id);
1132:

Line 1136: g_action := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : delete_entity_locks';

1132:
1133: END IF;
1134: --End Mod Commercialization
1135: --
1136: g_action := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : delete_entity_locks';
1137: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,g_action);
1138: delete_entity_locks(p_draft_id => p_draft_id
1139: ,x_return_status => l_return_status);
1140:

Line 1142: x_progress := 'PO_DRAFT_MERGE_PKG.UPDATE_AWARD_WITH_MOD_VALUES: Deleting entity locks failed';

1138: delete_entity_locks(p_draft_id => p_draft_id
1139: ,x_return_status => l_return_status);
1140:
1141: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1142: x_progress := 'PO_DRAFT_MERGE_PKG.UPDATE_AWARD_WITH_MOD_VALUES: Deleting entity locks failed';
1143: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
1144: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1145: END IF;
1146:

Line 1147: x_progress := 'PO_DRAFT_MERGE_PKG.UPDATE_AWARD_WITH_MOD_VALUES: deleting entity locks successful';

1143: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
1144: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1145: END IF;
1146:
1147: x_progress := 'PO_DRAFT_MERGE_PKG.UPDATE_AWARD_WITH_MOD_VALUES: deleting entity locks successful';
1148: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
1149: --end of concurrent
1150:
1151: g_action := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : PO_DOCUMENT_ACTION_PVT.do_approve for Mod';

Line 1151: g_action := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : PO_DOCUMENT_ACTION_PVT.do_approve for Mod';

1147: x_progress := 'PO_DRAFT_MERGE_PKG.UPDATE_AWARD_WITH_MOD_VALUES: deleting entity locks successful';
1148: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
1149: --end of concurrent
1150:
1151: g_action := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : PO_DOCUMENT_ACTION_PVT.do_approve for Mod';
1152: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,g_action);
1153: PO_DOCUMENT_ACTION_PVT.do_approve(
1154: p_document_id => P_Document_Id
1155: , p_document_type => p_doc_type

Line 1170: g_action := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : MANAGE_ATTACHMENTS_MERGE';

1166: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,g_error_message);
1167: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1168: END IF;
1169:
1170: g_action := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : MANAGE_ATTACHMENTS_MERGE';
1171: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,g_action);
1172: -- Copying the attachments
1173: MANAGE_ATTACHMENTS_MERGE(itemtype ,
1174: itemkey ,

Line 1198: g_action := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : po_document_funds_pvt.Do_reserve';

1194: po_wf_debug_pkg.Insert_debug(itemtype,itemkey,' Skip Reserve Call, as Encumbrance is Not supported for CLM Agreements');
1195:
1196: ELSE
1197: po_wf_debug_pkg.Insert_debug(itemtype,itemkey,'Calling do Reserve with doctype: '||p_doc_type||' - sub: '||p_doc_subtype||'- document id: '||p_document_id||' - Ovrride: '||p_override_funds||'- Emp: '||p_employee_id||'.');
1198: g_action := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : po_document_funds_pvt.Do_reserve';
1199: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,g_action);
1200:
1201: G_RESERVE_FROM_MOD_MERGE := 'Y'; -- for bypassing co_validate_warrant chec
1202: po_document_funds_pvt.Do_reserve(x_return_status => x_return_status,p_doc_type => p_doc_type,

Line 1212: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous: Do Reserve Return Status: '||x_return_status;

1208: p_override_funds => p_override_funds,p_employee_id => p_employee_id,
1209: x_po_return_code => x_po_return_code,x_online_report_id => x_online_report_id);
1210: G_RESERVE_FROM_MOD_MERGE := 'N';
1211:
1212: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous: Do Reserve Return Status: '||x_return_status;
1213: po_wf_debug_pkg.Insert_debug(itemtype,itemkey,x_progress);
1214: -- bug 13709183 Autonomous transaction must rollback in case of any error (expected, unexpected)
1215: -- IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1216: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

Line 1226: g_action := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : PO_DOCUMENT_ACTION_PVT.do_approve for base doc';

1222: END IF;
1223: END IF;-- PA Check
1224: END IF; --Enc On Check
1225:
1226: g_action := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous : PO_DOCUMENT_ACTION_PVT.do_approve for base doc';
1227: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,g_action);
1228: PO_DOCUMENT_ACTION_PVT.do_approve(
1229: p_document_id => P_Document_Id
1230: , p_document_type => p_doc_type

Line 1276: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous: Approve Action Successful.';

1272: p_draft_id => p_draft_id);
1273: END IF;
1274: END IF;
1275:
1276: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous: Approve Action Successful.';
1277: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
1278: x_return_status := FND_API.G_RET_STS_SUCCESS;
1279: COMMIT;
1280: EXCEPTION

Line 1284: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous: in exception block with error ' || g_error_message;

1280: EXCEPTION
1281:
1282: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1283: g_error_message := g_error_message || ' erorr encountered is ' ||SQLCODE||' -ERROR- '||SQLERRM ;
1284: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous: in exception block with error ' || g_error_message;
1285: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
1286: ROLLBACK TO MergeReserve_Autonomous_SP;
1287: wf_core.context('PO_REQAPPROVAL_ACTION','MergeReserve_Autonomous', x_progress);
1288: RAISE;

Line 1290: wf_core.Context('PO_DRAFT_MERGE_PKG','MergeReserve_Autonomous', x_progress);

1286: ROLLBACK TO MergeReserve_Autonomous_SP;
1287: wf_core.context('PO_REQAPPROVAL_ACTION','MergeReserve_Autonomous', x_progress);
1288: RAISE;
1289: WHEN OTHERS THEN
1290: wf_core.Context('PO_DRAFT_MERGE_PKG','MergeReserve_Autonomous', x_progress);
1291: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous: in exception block (when others) with error ' || g_error_message;
1292: g_error_message := g_error_message || ' erorr encountered is ' ||SQLCODE||' -ERROR- '||SQLERRM ;
1293: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
1294: ROLLBACK TO MergeReserve_Autonomous_SP;

Line 1291: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous: in exception block (when others) with error ' || g_error_message;

1287: wf_core.context('PO_REQAPPROVAL_ACTION','MergeReserve_Autonomous', x_progress);
1288: RAISE;
1289: WHEN OTHERS THEN
1290: wf_core.Context('PO_DRAFT_MERGE_PKG','MergeReserve_Autonomous', x_progress);
1291: x_progress := 'PO_DRAFT_MERGE_PKG.MergeReserve_Autonomous: in exception block (when others) with error ' || g_error_message;
1292: g_error_message := g_error_message || ' erorr encountered is ' ||SQLCODE||' -ERROR- '||SQLERRM ;
1293: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
1294: ROLLBACK TO MergeReserve_Autonomous_SP;
1295: RAISE;

Line 1313: x_progress := 'PO_DRAFT_MERGE_PKG.call_docnum_post_approval: Start: 01';

1309: l_po_hdr_id NUMBER;
1310: l_uda_template_id NUMBER;
1311: Begin
1312:
1313: x_progress := 'PO_DRAFT_MERGE_PKG.call_docnum_post_approval: Start: 01';
1314: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
1315:
1316: l_draft_id := po_wf_util_pkg.GetItemAttrNumber (itemtype => itemtype,
1317: itemkey => itemkey,

Line 1348: x_progress := 'PO_DRAFT_MERGE_PKG.call_docnum_post_approval: Exception ' || SQLERRM;

1344: END IF;
1345:
1346: Exception
1347: When Others Then
1348: x_progress := 'PO_DRAFT_MERGE_PKG.call_docnum_post_approval: Exception ' || SQLERRM;
1349: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
1350: wf_core.context('PO_DRAFT_MERGE_PKG','call_docnum_post_approval', x_progress);
1351: raise;
1352: END call_docnum_post_approval;

Line 1350: wf_core.context('PO_DRAFT_MERGE_PKG','call_docnum_post_approval', x_progress);

1346: Exception
1347: When Others Then
1348: x_progress := 'PO_DRAFT_MERGE_PKG.call_docnum_post_approval: Exception ' || SQLERRM;
1349: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
1350: wf_core.context('PO_DRAFT_MERGE_PKG','call_docnum_post_approval', x_progress);
1351: raise;
1352: END call_docnum_post_approval;
1353:
1354: procedure COPY_ATTACHMENTS(

Line 1401: x_progress := 'PO_DRAFT_MERGE_PKG.IS_MOD_DOCUMENT: Draft_id: '

1397: l_draft_id := po_wf_util_pkg.Getitemattrnumber (itemtype => itemtype,
1398: itemkey => itemkey,
1399: aname => 'DRAFT_ID');
1400:
1401: x_progress := 'PO_DRAFT_MERGE_PKG.IS_MOD_DOCUMENT: Draft_id: '
1402: || l_draft_id;
1403: po_wf_debug_pkg.Insert_debug(itemtype, itemkey, x_progress);
1404:
1405: BEGIN

Line 1413: x_progress := 'PO_DRAFT_MERGE_PKG.IS_MOD_DOCUMENT: in no data found exception';

1409: WHERE draft_id = l_draft_id
1410: AND draft_type = 'MOD';
1411: EXCEPTION
1412: WHEN No_Data_Found THEN
1413: x_progress := 'PO_DRAFT_MERGE_PKG.IS_MOD_DOCUMENT: in no data found exception';
1414: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
1415: END;
1416:
1417: resultout := wf_engine.eng_completed || ':' || l_is_mod_document;

Line 1421: x_progress := 'PO_DRAFT_MERGE_PKG.IS_MOD_DOCUMENT: Exception';

1417: resultout := wf_engine.eng_completed || ':' || l_is_mod_document;
1418:
1419: EXCEPTION
1420: WHEN OTHERS THEN
1421: x_progress := 'PO_DRAFT_MERGE_PKG.IS_MOD_DOCUMENT: Exception';
1422: po_wf_debug_pkg.Insert_debug(itemtype, itemkey, x_progress);
1423: RAISE;
1424: END;
1425:

Line 1569: x_progress := 'PO_DRAFT_MERGE_PKG.merge_header_attachments: Exception';

1565:
1566: Exception
1567: When Others Then
1568: d_position := 40;
1569: x_progress := 'PO_DRAFT_MERGE_PKG.merge_header_attachments: Exception';
1570: IF (PO_LOG.d_stmt) THEN
1571: PO_LOG.stmt(d_module, d_position, x_progress);
1572: END IF;
1573: raise;

Line 1683: x_progress := 'PO_DRAFT_MERGE_PKG.merge_line_attachments: Exception';

1679:
1680: Exception
1681: When Others Then
1682: d_position :=40;
1683: x_progress := 'PO_DRAFT_MERGE_PKG.merge_line_attachments: Exception';
1684: IF (PO_LOG.d_stmt) THEN
1685: PO_LOG.stmt(d_module, d_position, x_progress);
1686: END IF;
1687: raise;

Line 1795: x_progress := 'PO_DRAFT_MERGE_PKG.merge_line_location_attachment: Exception';

1791:
1792: Exception
1793: When Others Then
1794: d_position := 40;
1795: x_progress := 'PO_DRAFT_MERGE_PKG.merge_line_location_attachment: Exception';
1796: IF (PO_LOG.d_stmt) THEN
1797: PO_LOG.stmt(d_module, d_position, x_progress);
1798: END IF;
1799: raise;

Line 1915: l_progress := 'PO_DRAFT_MERGE_PKG.PAR_DOC_APPROVE: Start: 01';

1911: l_document_id NUMBER;
1912: l_employee_id NUMBER;
1913: l_progress VARCHAR2(1000);
1914: BEGIN
1915: l_progress := 'PO_DRAFT_MERGE_PKG.PAR_DOC_APPROVE: Start: 01';
1916:
1917: l_draft_id := po_wf_util_pkg.GetItemAttrNumber (itemtype => itemtype,itemkey => itemkey,aname => 'DRAFT_ID');
1918: l_document_id := po_wf_util_pkg.GetItemAttrNumber (itemtype => itemtype,itemkey => itemkey,aname => 'DOCUMENT_ID');
1919: l_document_type := po_wf_util_pkg.GetItemAttrText (itemtype => itemtype,itemkey => itemkey,aname => 'DOCUMENT_TYPE');

Line 1932: l_progress := 'PO_DRAFT_MERGE_PKG.PAR_DOC_APPROVE: End: 02';

1928: p_draft_id => l_draft_id,
1929: p_employee_id => l_employee_id,
1930: p_document_type => l_document_type);
1931:
1932: l_progress := 'PO_DRAFT_MERGE_PKG.PAR_DOC_APPROVE: End: 02';
1933:
1934: IF (g_po_wf_debug = 'Y') THEN
1935: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,l_progress);
1936: END IF;

Line 2401: x_progress := 'PO_DRAFT_MERGE_PKG.docnum_post_apprvl_autonomous: Savepoint docnum_post_apprvl_autonomous_SP';

2397: BEGIN
2398:
2399: SAVEPOINT docnum_post_apprvl_auto_SP;
2400:
2401: x_progress := 'PO_DRAFT_MERGE_PKG.docnum_post_apprvl_autonomous: Savepoint docnum_post_apprvl_autonomous_SP';
2402: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
2403:
2404: po_doc_numbering_pkg.process_dod_awd_mod_doc_num
2405: (

Line 2412: x_progress := 'PO_DRAFT_MERGE_PKG.docnum_post_apprvl_autonomous: Completed process_dod_awd_mod_doc_num';

2408: p_uda_template_id => p_uda_template_id,
2409: p_ag_type => 'PO_HEADER_EXT_ATTRS'
2410: );
2411:
2412: x_progress := 'PO_DRAFT_MERGE_PKG.docnum_post_apprvl_autonomous: Completed process_dod_awd_mod_doc_num';
2413: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
2414:
2415: COMMIT;
2416:

Line 2421: x_progress := 'PO_DRAFT_MERGE_PKG.docnum_post_apprvl_autonomous: Exception ' || SQLERRM;

2417: EXCEPTION
2418:
2419: When Others Then
2420:
2421: x_progress := 'PO_DRAFT_MERGE_PKG.docnum_post_apprvl_autonomous: Exception ' || SQLERRM;
2422: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
2423:
2424: ROLLBACK TO docnum_post_apprvl_auto_SP;
2425:

Line 2426: wf_core.context('PO_DRAFT_MERGE_PKG','docnum_post_apprvl_autonomous', x_progress);

2422: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,x_progress);
2423:
2424: ROLLBACK TO docnum_post_apprvl_auto_SP;
2425:
2426: wf_core.context('PO_DRAFT_MERGE_PKG','docnum_post_apprvl_autonomous', x_progress);
2427: raise;
2428:
2429: END docnum_post_apprvl_autonomous;
2430:

Line 2431: End PO_DRAFT_MERGE_PKG;

2427: raise;
2428:
2429: END docnum_post_apprvl_autonomous;
2430:
2431: End PO_DRAFT_MERGE_PKG;