333: BEGIN
334:
335: x_progress := 'PO_REQAPPROVAL_ACTION.State_Check_approve: 01';
336: IF (g_po_wf_debug = 'Y') THEN
337: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
338: END IF;
339:
340:
341: -- Do nothing in cancel or timeout mode
393: x_resultout := 'Y';
394: end if;
395: x_progress := 'PO_REQAPPROVAL_ACTION.State_Check_approve: MOD flow. RESULT= ' || x_resultout;
396: IF (g_po_wf_debug = 'Y') THEN
397: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
398: END IF;
399: return;
400: end if;
401: end if;
434:
435:
436: x_progress := 'PO_REQAPPROVAL_ACTION.State_Check_approve: 02. RESULT= ' || x_resultout;
437: IF (g_po_wf_debug = 'Y') THEN
438: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
439: END IF;
440:
441:
442: EXCEPTION
474: BEGIN
475:
476: x_progress := 'PO_REQAPPROVAL_ACTION.State_Check_reject: 01';
477: IF (g_po_wf_debug = 'Y') THEN
478: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
479: END IF;
480:
481:
482: -- Do nothing in cancel or timeout mode
514:
515:
516: x_progress := 'PO_REQAPPROVAL_ACTION.State_Check_reject: 02. RESULT= ' || x_resultout;
517: IF (g_po_wf_debug = 'Y') THEN
518: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
519: END IF;
520:
521:
522: EXCEPTION
559: BEGIN
560:
561: x_progress := 'PO_REQAPPROVAL_ACTION.Doc_complete_check: 01';
562: IF (g_po_wf_debug = 'Y') THEN
563: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
564: END IF;
565:
566:
567: -- Do nothing in cancel or timeout mode
631: --
632:
633: x_progress := 'PO_REQAPPROVAL_ACTION.Doc_complete_check: 02. RESULT= ' || x_resultout;
634: IF (g_po_wf_debug = 'Y') THEN
635: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
636: END IF;
637:
638:
639: EXCEPTION
688: BEGIN
689:
690: x_progress := 'PO_REQAPPROVAL_ACTION.Approve_doc: 01';
691: IF (g_po_wf_debug = 'Y') THEN
692: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
693: END IF;
694:
695:
696: -- Do nothing in cancel or timeout mode
782: END IF;
783:
784: x_progress := 'PO_REQAPPROVAL_ACTION.Approve_doc: 02. RESULT= ' || x_resultout;
785: IF (g_po_wf_debug = 'Y') THEN
786: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
787: END IF;
788:
789:
790: EXCEPTION
827: BEGIN
828:
829: x_progress := 'PO_REQAPPROVAL_ACTION.Approve_and_forward_doc: 01';
830: IF (g_po_wf_debug = 'Y') THEN
831: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
832: END IF;
833:
834:
835: -- Do nothing in cancel or timeout mode
898: END IF;
899:
900: x_progress := 'PO_REQAPPROVAL_ACTION.Approve_and_forward_doc: 02. RESULT= ' || x_resultout;
901: IF (g_po_wf_debug = 'Y') THEN
902: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
903: END IF;
904:
905: EXCEPTION
906:
945: BEGIN
946:
947: x_progress := 'PO_REQAPPROVAL_ACTION.Forward_doc_inprocess: 01';
948: IF (g_po_wf_debug = 'Y') THEN
949: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
950: END IF;
951:
952:
953: -- Do nothing in cancel or timeout mode
1018: END IF;
1019:
1020: x_progress := 'PO_REQAPPROVAL_ACTION.Forward_doc_inprocess: 02. RESULT= ' || x_resultout;
1021: IF (g_po_wf_debug = 'Y') THEN
1022: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
1023: END IF;
1024:
1025: EXCEPTION
1026: WHEN doc_manager_exception THEN
1062: BEGIN
1063:
1064: x_progress := 'PO_REQAPPROVAL_ACTION.Forward_doc_preapproved: 01';
1065: IF (g_po_wf_debug = 'Y') THEN
1066: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
1067: END IF;
1068:
1069:
1070: -- Do nothing in cancel or timeout mode
1131: END IF;
1132:
1133: x_progress := 'PO_REQAPPROVAL_ACTION.Forward_doc_preapproved: 02. RESULT= ' || x_resultout;
1134: IF (g_po_wf_debug = 'Y') THEN
1135: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
1136: END IF;
1137:
1138: EXCEPTION
1139: WHEN doc_manager_exception THEN
1173: BEGIN
1174:
1175: x_progress := 'PO_REQAPPROVAL_ACTION.Reject_Doc: 01';
1176: IF (g_po_wf_debug = 'Y') THEN
1177: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
1178: END IF;
1179:
1180:
1181: -- Do nothing in cancel or timeout mode
1220: resultout := wf_engine.eng_completed || ':' || l_doc_mgr_return_val;
1221:
1222: x_progress := 'PO_REQAPPROVAL_ACTION.Reject_Doc: 02. RESULT= ' || l_doc_mgr_return_val;
1223: IF (g_po_wf_debug = 'Y') THEN
1224: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
1225: END IF;
1226:
1227: EXCEPTION
1228:
1260: BEGIN
1261:
1262: x_progress := 'PO_REQAPPROVAL_ACTION.Verify_authority: 01';
1263: IF (g_po_wf_debug = 'Y') THEN
1264: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
1265: END IF;
1266:
1267:
1268: -- Do nothing in cancel or timeout mode
1292:
1293:
1294: x_progress := 'PO_REQAPPROVAL_ACTION.Verify_authority: 02. RESULT= ' || x_resultout;
1295: IF (g_po_wf_debug = 'Y') THEN
1296: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
1297: END IF;
1298:
1299: EXCEPTION
1300: WHEN doc_manager_exception THEN
1331: BEGIN
1332:
1333: x_progress := 'PO_REQAPPROVAL_ACTION.Open_Doc_State: 01';
1334: IF (g_po_wf_debug = 'Y') THEN
1335: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
1336: END IF;
1337:
1338:
1339: -- Do nothing in cancel or timeout mode
1364: END IF;
1365:
1366: x_progress := 'PO_REQAPPROVAL_ACTION.Open_Doc_State 02. RESULT= ' || x_resultout;
1367: IF (g_po_wf_debug = 'Y') THEN
1368: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
1369: END IF;
1370:
1371: EXCEPTION
1372:
1407: BEGIN
1408:
1409: x_progress := 'PO_REQAPPROVAL_ACTION.Reserve_Doc: 01';
1410: IF (g_po_wf_debug = 'Y') THEN
1411: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
1412: END IF;
1413:
1414:
1415: -- Do nothing in cancel or timeout mode
1489: x_resultout := l_doc_mgr_return_val;
1490:
1491: x_progress := 'PO_REQAPPROVAL_ACTION.Reserve_Doc 02. RESULT= ' || x_resultout;
1492: IF (g_po_wf_debug = 'Y') THEN
1493: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
1494: END IF;
1495:
1496: EXCEPTION
1497: -- WHEN doc_manager_exception THEN
1551: l_document_type || ' Subtype= ' || l_document_subtype ||
1552: ' Doc_id= ' || to_char(l_document_id);
1553:
1554: IF (g_po_wf_debug = 'Y') THEN
1555: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
1556: END IF;
1557:
1558: PO_DOCUMENT_ACTION_PVT.check_doc_status_approve(
1559: p_document_id => l_document_id
1578: ELSE
1579:
1580: x_progress := 'PO_REQAPPROVAL_ACTION.StateCheckApprove: Returned_code= ' || l_ret_code;
1581: IF (g_po_wf_debug = 'Y') THEN
1582: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
1583: END IF;
1584:
1585: return('N');
1586:
1589: ELSE
1590:
1591: x_progress := 'PO_REQAPPROVAL_ACTION.StateCheckApprove: action call returned with: ' || l_ret_sts;
1592: IF (g_po_wf_debug = 'Y') THEN
1593: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
1594: END IF;
1595:
1596: doc_mgr_err_num := 3;
1597: sysadmin_err_msg := l_exc_msg;
1648: l_document_type || ' Subtype= ' || l_document_subtype ||
1649: ' Doc_id= ' || to_char(l_document_id);
1650:
1651: IF (g_po_wf_debug = 'Y') THEN
1652: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
1653: END IF;
1654:
1655: PO_DOCUMENT_ACTION_PVT.check_doc_status_reject(
1656: p_document_id => l_document_id
1675: ELSE
1676:
1677: x_progress := 'PO_REQAPPROVAL_ACTION.StateCheckReject: Returned_code= ' || l_ret_code;
1678: IF (g_po_wf_debug = 'Y') THEN
1679: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
1680: END IF;
1681:
1682: return('N');
1683:
1686: ELSE
1687:
1688: x_progress := 'PO_REQAPPROVAL_ACTION.StateCheckReject: action call returned with: ' || l_ret_sts;
1689: IF (g_po_wf_debug = 'Y') THEN
1690: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
1691: END IF;
1692:
1693: doc_mgr_err_num := 3;
1694: sysadmin_err_msg := l_exc_msg;
1795: 'responsibility_id = '||to_char(responsibility_id)||
1796: 'user_id = '||to_char(user_id);
1797:
1798: IF (g_po_wf_debug = 'Y') THEN
1799: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
1800: END IF;
1801:
1802: -- <2757450 START>: If user chose to Create Sourcing Rule at the time
1803: -- of Approval, do not run the ASL Submission Checks.
1851:
1852:
1853:
1854: IF (g_po_wf_debug = 'Y') THEN
1855: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
1856: END IF;
1857:
1858: --
1859: l_conterms_yn:= PO_wf_Util_Pkg.GetItemAttrText(
1880: IF (l_error = 'W') then
1881: x_progress := 'PO_REQAPPROVAL_ACTION.DocCompleteCheck: Only Warnings found. Return success';
1882:
1883: IF (g_po_wf_debug = 'Y') THEN
1884: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
1885: END IF;
1886: return (FND_API.G_RET_STS_SUCCESS);
1887: END IF; --l_error=W
1888: END IF;-- l_conterms_yn
1909: x_progress := 'PO_REQAPPROVAL_ACTION.DocCompleteCheck: po_submission_check returned with: ' ||
1910: x_return_status ;
1911:
1912: IF (g_po_wf_debug = 'Y') THEN
1913: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
1914: END IF;
1915:
1916: sysadmin_err_msg := x_msg_data;
1917:
1918: x_progress := 'PO_REQAPPROVAL_ACTION.DocCompleteCheck: po_submission_check error msg is: ' ||
1919: x_msg_data;
1920:
1921: IF (g_po_wf_debug = 'Y') THEN
1922: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
1923: END IF;
1924:
1925: return(x_return_status);
1926:
1958:
1959: x_progress := 'PO_REQAPPROVAL_ACTION.InsertHistForOwnerApprove begin';
1960:
1961: IF (g_po_wf_debug = 'Y') THEN
1962: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
1963: END IF;
1964:
1965: -- get data from last entry in po_action_history
1966: SELECT sequence_num,
1983:
1984: x_progress := 'PO_REQAPPROVAL_ACTION.InsertHistForOwnerApprove action_code: ' || l_action_code;
1985:
1986: IF (g_po_wf_debug = 'Y') THEN
1987: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey, x_progress);
1988: END IF;
1989:
1990: -- if last entry into po_action_history is submit or reserve, then
1991: -- req is self-approved. Insert approval entry.
2052:
2053: x_progress := ' PO_REQAPPROVAL_ACTION.InsertHistForOwnerApprove employee_id: ' || l_employee_id;
2054:
2055: IF (g_po_wf_debug = 'Y') THEN
2056: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey, x_progress);
2057: End If;
2058:
2059: INSERT into PO_ACTION_HISTORY
2060: (object_id,
2107:
2108: x_progress := 'PO_REQAPPROVAL_ACTION.InsertHistForOwnerApprove end';
2109:
2110: IF (g_po_wf_debug = 'Y') THEN
2111: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
2112: END IF;
2113:
2114: EXCEPTION
2115:
2171: || ' Subtype= ' || l_document_subtype
2172: || ' Doc_id= ' || to_char(l_document_id);
2173:
2174: IF (g_po_wf_debug = 'Y') THEN
2175: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
2176: END IF;
2177:
2178: ApproveAutonomous(
2179: p_document_id => l_document_id
2216: x_progress := 'PO_REQAPPROVAL_ACTION.ApproveDoc: ApproveAutonomous returned with: '
2217: || l_ret_sts;
2218:
2219: IF (g_po_wf_debug = 'Y') THEN
2220: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
2221: END IF;
2222:
2223: doc_mgr_err_num := 3;
2224: sysadmin_err_msg := l_exc_msg;
2293: l_document_type || ' Subtype= ' || l_document_subtype ||
2294: ' Doc_id= ' || to_char(l_document_id);
2295:
2296: IF (g_po_wf_debug = 'Y') THEN
2297: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
2298: END IF;
2299:
2300: ForwardAutonomous(
2301: p_document_id => l_document_id
2326: -- fatal exception, l_ret_sts = 'U'
2327:
2328: x_progress := 'PO_REQAPPROVAL_ACTION.ApproveAndForward: ForwardAutonomous returned with: ' || l_ret_sts;
2329: IF (g_po_wf_debug = 'Y') THEN
2330: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
2331: END IF;
2332:
2333: doc_mgr_err_num := 3;
2334: sysadmin_err_msg := l_exc_msg;
2404: l_document_type || ' Subtype= ' || l_document_subtype ||
2405: ' Doc_id= ' || to_char(l_document_id);
2406:
2407: IF (g_po_wf_debug = 'Y') THEN
2408: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
2409: END IF;
2410:
2411: ForwardAutonomous(
2412: p_document_id => l_document_id
2436: -- fatal exception, l_ret_sts = 'U'
2437:
2438: x_progress := 'PO_REQAPPROVAL_ACTION.ForwardDocInProcess: ForwardAutonomous returned with: ' || l_ret_sts;
2439: IF (g_po_wf_debug = 'Y') THEN
2440: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
2441: END IF;
2442:
2443: doc_mgr_err_num := 3;
2444: sysadmin_err_msg := l_exc_msg;
2515: l_document_type || ' Subtype= ' || l_document_subtype ||
2516: ' Doc_id= ' || to_char(l_document_id);
2517:
2518: IF (g_po_wf_debug = 'Y') THEN
2519: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
2520: END IF;
2521:
2522: ForwardAutonomous(
2523: p_document_id => l_document_id
2547: -- fatal exception, l_ret_sts = 'U'
2548:
2549: x_progress := 'PO_REQAPPROVAL_ACTION.ForwardDocPreApproved: ForwardAutonomous returned with: ' || l_ret_sts;
2550: IF (g_po_wf_debug = 'Y') THEN
2551: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
2552: END IF;
2553:
2554: doc_mgr_err_num := 3;
2555: sysadmin_err_msg := l_exc_msg;
2651: l_document_type || ' Subtype= ' || l_document_subtype ||
2652: ' Doc_id= ' || to_char(l_document_id);
2653:
2654: IF (g_po_wf_debug = 'Y') THEN
2655: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
2656: END IF;
2657:
2658:
2659: RejectAutonomous(
2694:
2695: x_progress := 'PO_REQAPPROVAL_ACTION.RejectDoc: Returned_code= ' ||
2696: l_ret_code ;
2697: IF (g_po_wf_debug = 'Y') THEN
2698: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
2699: END IF;
2700:
2701: return('N');
2702:
2708:
2709: x_progress := 'PO_REQAPPROVAL_ACTION.RejectDoc: RejectAutonomous returned with: ' || l_ret_sts;
2710:
2711: IF (g_po_wf_debug = 'Y') THEN
2712: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
2713: END IF;
2714:
2715:
2716: doc_mgr_err_num := 3;
2772: l_document_type || ' Subtype= ' || l_document_subtype ||
2773: ' Doc_id= ' || to_char(l_document_id);
2774:
2775: IF (g_po_wf_debug = 'Y') THEN
2776: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
2777: END IF;
2778:
2779:
2780: PO_DOCUMENT_ACTION_PVT.verify_authority(
2807: -- fatal exceptionl; l_ret_sts := 'U';
2808:
2809: x_progress := 'PO_REQAPPROVAL_ACTION.VerifyAuthority: action call returned with: ' || l_ret_sts;
2810: IF (g_po_wf_debug = 'Y') THEN
2811: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
2812: END IF;
2813:
2814: doc_mgr_err_num := 3;
2815: sysadmin_err_msg := l_exc_msg;
2864: l_document_type || ' Subtype= ' || l_document_subtype ||
2865: ' Doc_id= ' || to_char(l_document_id);
2866:
2867: IF (g_po_wf_debug = 'Y') THEN
2868: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
2869: END IF;
2870:
2871: AutoUpdateCloseAutonomous(
2872: p_document_id => l_document_id
2889:
2890: x_progress := 'PO_REQAPPROVAL_ACTION.OpenDocumentState: Returned_code= ' ||
2891: l_ret_code ;
2892: IF (g_po_wf_debug = 'Y') THEN
2893: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
2894: END IF;
2895:
2896: return('N');
2897:
2906:
2907: x_progress := 'PO_REQAPPROVAL_ACTION.OpenDocumentState: auto_close_update_autonomous returned with: ' ||
2908: l_ret_sts;
2909: IF (g_po_wf_debug = 'Y') THEN
2910: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
2911: END IF;
2912:
2913: doc_mgr_err_num := 3;
2914: sysadmin_err_msg := l_exc_msg;
2956: BEGIN
2957:
2958: x_progress := 'ReserveDoc 001';
2959: IF (g_po_wf_debug = 'Y') THEN
2960: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
2961: END IF;
2962:
2963: l_doc_type := wf_engine.GetItemAttrText(
2964: itemtype => itemtype,
2972:
2973: x_progress := 'ReserveDoc 010: '|| 'Doc Type = '|| l_doc_type ||
2974: ' Doc Subtype = '|| l_doc_subtype;
2975: IF (g_po_wf_debug = 'Y') THEN
2976: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
2977: END IF;
2978:
2979: -- If the Document type is Contract Agreement, then don't reserve
2980:
2990: aname => 'DOCUMENT_ID');
2991:
2992: x_progress := 'ReserveDoc 020: ' || 'Doc Header Id = ' || to_char(l_doc_id);
2993: IF (g_po_wf_debug = 'Y') THEN
2994: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
2995: END IF;
2996:
2997: IF (l_doc_type = 'REQUISITION') THEN
2998:
3029: END IF;
3030:
3031: x_progress := 'ReserveDoc 025: ' || 'l_is_ame_used = ' ||l_is_ame_used || ' l_employee_id ='|| to_char(l_employee_id);
3032: IF (g_po_wf_debug = 'Y') THEN
3033: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
3034: END IF;
3035: -- Call the ReserveAutonomous
3036: ReserveAutonomous(
3037: p_doc_type => l_doc_type
3045:
3046: x_progress := 'ReserveDoc 030: ReserveAutonomous return code = ' ||
3047: l_po_return_code;
3048: IF (g_po_wf_debug = 'Y') THEN
3049: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
3050: END IF;
3051:
3052: IF (l_po_return_code = PO_DOCUMENT_FUNDS_PVT.g_return_SUCCESS) THEN
3053:
3079: -- Read note below about why the setting of this attribute was moved here from below.
3080:
3081: x_progress := 'ReserveDoc 100 Advisory Message: '||l_warning_mesg;
3082: IF (g_po_wf_debug = 'Y') THEN
3083: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
3084: END IF;
3085:
3086: get_advisory_warning( itemtype => itemType
3087: , itemkey => itemkey
3118: -- no warning.
3119:
3120: x_progress := 'ReserveDoc 999';
3121: IF (g_po_wf_debug = 'Y') THEN
3122: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
3123: END IF;
3124:
3125: return(l_return);
3126:
3336: x_progress := 'PO_REQAPPROVAL_ACTION.set_report_attr_text.030.ON_LINE_REPORT_ID= '
3337: || to_char(p_online_report_id);
3338:
3339: IF (g_po_wf_debug = 'Y') THEN
3340: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
3341: END IF;
3342:
3343: EXCEPTION
3344: WHEN OTHERS THEN
3369: x_progress := 'PO_REQAPPROVAL_ACTION.set_doc_mgr_context. USER_ID= ' || to_char(l_user_id)
3370: || ' APPLICATION_ID= ' || to_char(l_application_id) ||
3371: 'RESPONSIBILITY_ID= ' || to_char(l_responsibility_id);
3372: IF (g_po_wf_debug = 'Y') THEN
3373: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
3374: END IF;
3375:
3376: EXCEPTION
3377:
3458: x_progress := 'PO_REQAPPROVAL_ACTION.set_responder_doc_mgr_context. USER_ID= ' || to_char(l_user_id)
3459: || ' APPLICATION_ID= ' || to_char(l_application_id) ||
3460: 'RESPONSIBILITY_ID= ' || to_char(l_responsibility_id);
3461: IF (g_po_wf_debug = 'Y') THEN
3462: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
3463: END IF;
3464:
3465: EXCEPTION
3466:
3497: BEGIN
3498:
3499: x_progress := 'PO_REQAPPROVAL_ACTION.Reserve_doc_Override: 01';
3500: IF (g_po_wf_debug = 'Y') THEN
3501: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
3502: END IF;
3503:
3504: -- Do nothing in cancel or timeout mode
3505: --
3539: l_doc_mgr_return_val := ReserveDoc(itemtype, itemkey, 'Y');
3540:
3541: x_progress := 'PO_REQAPPROVAL_ACTION.Reserve_doc_Override 10. RESULT= ' || x_resultout;
3542: IF (g_po_wf_debug = 'Y') THEN
3543: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
3544: END IF;
3545:
3546: --
3547: -- Commenting the Doc manager Handling
3556: x_resultout := l_doc_mgr_return_val;
3557:
3558: x_progress := 'PO_REQAPPROVAL_ACTION.Reserve_doc_Override 99';
3559: IF (g_po_wf_debug = 'Y') THEN
3560: /* DEBUG */ PO_WF_DEBUG_PKG.insert_debug(itemtype,itemkey,x_progress);
3561: END IF;
3562:
3563: EXCEPTION
3564: -- WHEN doc_manager_exception THEN