1: PACKAGE BODY PO_CHORD_WF6 AS
2: /* $Header: POXWCO6B.pls 120.22 2008/02/21 22:06:17 jburugul 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');
186: po_chord_wf1.get_wf_header_control(itemtype, itemkey, x_header_control);
187: po_chord_wf2.get_wf_lines_control(itemtype, itemkey, x_lines_control);
188: po_chord_wf3.get_wf_shipments_control(itemtype, itemkey, x_shipments_control);
189: po_chord_wf4.get_wf_dist_control(itemtype, itemkey, x_dist_control);
190: po_chord_wf6.get_default_tolerance(itemtype, itemkey, x_tolerance_control, 'STANDARD_PO'); --
192: /***************************************************************
193: * Check if the modifications to the document header requires
194: * full reapproval.
392:
393: EXCEPTION
394:
395: WHEN OTHERS THEN
396: wf_core.context('POAPPRV', 'po_chord_wf6.stanard_po_reapproval', 'others');
397: RAISE;
398:
399: END;
400:
431: po_chord_wf1.get_wf_header_control(itemtype, itemkey, x_header_control);
432: po_chord_wf2.get_wf_lines_control(itemtype, itemkey, x_lines_control);
433: po_chord_wf3.get_wf_shipments_control(itemtype, itemkey, x_shipments_control);
434: po_chord_wf4.get_wf_dist_control(itemtype, itemkey, x_dist_control);
435: po_chord_wf6.get_default_tolerance(itemtype, itemkey, x_tolerance_control, 'PLANNED_PO'); --
437: -- 'Y' means modified
438: -- Numbers are in Percentage
439:
589:
590: EXCEPTION
591:
592: WHEN OTHERS THEN
593: wf_core.context('POAPPRV', 'po_chord_wf6.planned_po_reapproval', 'others');
594: RAISE;
595:
596: END;
597:
632:
633: /* Get all relevant shipments attribute values */
634: po_chord_wf3.get_wf_shipments_control(itemtype, itemkey, x_shipments_control); /*
635:
636: po_chord_wf6.get_default_tolerance(itemtype, itemkey, x_tolerance_control, 'BLANKET_PO'); --
638: -- 'Y' means modified
639: -- Numbers are in Percentage
640:
824: return;
825: END IF;
826:
827: po_chord_wf1.get_wf_header_control(itemtype, itemkey, x_header_control);
828: po_chord_wf6.get_default_tolerance(itemtype, itemkey, x_tolerance_control, 'CONTRACT_PO'); --
830: -- 'Y' means modified
831: -- Numbers are in Percentage
832:
896:
897: EXCEPTION
898:
899: WHEN OTHERS THEN
900: wf_core.context('POAPPRV', 'po_chord_wf6.contract_po_reapproval', 'others');
901: RAISE;
902:
903: END;
904:
979:
980: po_chord_wf5.get_wf_release_control(itemtype, itemkey, x_release_control);
981: po_chord_wf3.get_wf_shipments_control(itemtype, itemkey, x_shipments_control);
982: po_chord_wf4.get_wf_dist_control(itemtype, itemkey, x_dist_control);
983: po_chord_wf6.get_default_tolerance(itemtype, itemkey, x_tolerance_control, 'BLANKET_RELEASE'); --
985: -- 'Y' means modified
986: -- Numbers are in Percentage
987: IF x_release_control.agent_id ='Y'
1094:
1095: EXCEPTION
1096:
1097: WHEN OTHERS THEN
1098: wf_core.context('POAPPRV', 'po_chord_wf6.release_reapproval', 'others');
1099: RAISE;
1100:
1101: END;
1102:
1131:
1132: po_chord_wf5.get_wf_release_control(itemtype, itemkey, x_release_control);
1133: po_chord_wf3.get_wf_shipments_control(itemtype, itemkey, x_shipments_control);
1134: po_chord_wf4.get_wf_dist_control(itemtype, itemkey, x_dist_control);
1135: po_chord_wf6.get_default_tolerance(itemtype, itemkey, x_tolerance_control, 'SCHEDULED_RELEASE'); --
1137: -- 'Y' means modified
1138: -- Numbers are in Percentage
1139: IF x_release_control.agent_id ='Y'
1239:
1240: EXCEPTION
1241:
1242: WHEN OTHERS THEN
1243: wf_core.context('POAPPRV', 'po_chord_wf6.scheduled_release_reapproval', 'others');
1244: RAISE;
1245:
1246: END;
1247:
1300: END IF;
1301:
1302: EXCEPTION
1303: WHEN FND_API.g_exc_unexpected_error THEN
1304: wf_core.context('POAPPRV', 'po_chord_wf6.get_default_tolerance', 'Error in get_tolerances');
1305: RAISE;
1306:
1307: WHEN OTHERS THEN
1308: wf_core.context('POAPPRV', 'po_chord_wf6.get_default_tolerance', 'others');
1304: wf_core.context('POAPPRV', 'po_chord_wf6.get_default_tolerance', 'Error in get_tolerances');
1305: RAISE;
1306:
1307: WHEN OTHERS THEN
1308: wf_core.context('POAPPRV', 'po_chord_wf6.get_default_tolerance', 'others');
1309: RAISE;
1310:
1311: END;
1312:
1456:
1457: EXCEPTION
1458:
1459: WHEN OTHERS THEN
1460: wf_core.context('POAPPRV', 'po_chord_wf6.get_tolerances_from_wf', 'others');
1461: RAISE;
1462:
1463: END;
1464:
1687: END IF;
1688: --
1689: EXCEPTION
1690: WHEN FND_API.g_exc_unexpected_error THEN
1691: wf_core.context('POAPPRV', 'po_chord_wf6.set_wf_Order_Tol', 'Error in set_wf_Order_Tol');
1692: RAISE;
1693:
1694: WHEN OTHERS THEN
1695: wf_core.context('POAPPRV', 'po_chord_wf6.Set_Wf_Order_Tol', 'others');
1691: wf_core.context('POAPPRV', 'po_chord_wf6.set_wf_Order_Tol', 'Error in set_wf_Order_Tol');
1692: RAISE;
1693:
1694: WHEN OTHERS THEN
1695: wf_core.context('POAPPRV', 'po_chord_wf6.Set_Wf_Order_Tol', 'others');
1696: RAISE;
1697: END Set_Wf_Order_Tol;
1698:
1699: ------------------------------------------------------------------------------
1858: END IF;
1859: --
1860: EXCEPTION
1861: WHEN FND_API.g_exc_unexpected_error THEN
1862: wf_core.context('POAPPRV', 'po_chord_wf6.get_Default_Agreement_Tol', 'Error in get_Default_Agreement_Tol');
1863: RAISE;
1864:
1865: WHEN OTHERS THEN
1866: wf_core.context('POAPPRV', 'po_chord_wf6.Set_Wf_Agreement_Tol', 'others');
1862: wf_core.context('POAPPRV', 'po_chord_wf6.get_Default_Agreement_Tol', 'Error in get_Default_Agreement_Tol');
1863: RAISE;
1864:
1865: WHEN OTHERS THEN
1866: wf_core.context('POAPPRV', 'po_chord_wf6.Set_Wf_Agreement_Tol', 'others');
1867: RAISE;
1868: END Set_Wf_Agreement_Tol;
1869:
1870: ------------------------------------------------------------------------------
2007: END IF;
2008: --
2009: EXCEPTION
2010: WHEN FND_API.g_exc_unexpected_error THEN
2011: wf_core.context('POAPPRV', 'po_chord_wf6.get_Default_Release_Tol', 'Error in get_Default_Release_Tol');
2012: RAISE;
2013:
2014: WHEN OTHERS THEN
2015: wf_core.context('POAPPRV', 'po_chord_wf6.set_wf_release_tol', 'others');
2011: wf_core.context('POAPPRV', 'po_chord_wf6.get_Default_Release_Tol', 'Error in get_Default_Release_Tol');
2012: RAISE;
2013:
2014: WHEN OTHERS THEN
2015: wf_core.context('POAPPRV', 'po_chord_wf6.set_wf_release_tol', 'others');
2016: RAISE;
2017: END Set_Wf_Release_Tol;
2018:
2019: PROCEDURE debug_default_tolerance(
2119:
2120: EXCEPTION
2121:
2122: WHEN OTHERS THEN
2123: wf_core.context('POAPPRV', 'po_chord_wf6.debug_default_tolerance', 'others');
2124: RAISE;
2125:
2126: END;
2127:
2124: RAISE;
2125:
2126: END;
2127:
2128: END PO_CHORD_WF6;