[Home] [Help]
73: p_msg_index_out => l_msg_index ) ;
74: l_final_data := l_final_data ||l_msg_index||': '||l_msg_data||fnd_global.local_chr(10) ;
75: l_cnt := l_cnt + 1 ;
76: END LOOP ;
77: WF_ENGINE.SetItemAttrText(itemtype => p_itemtype,
78: itemkey => p_itemkey ,
79: aname => p_attr_name,
80: avalue => l_final_data );
81:
843: AMS_Utility_PVT.debug_message('Start :Item Type : '||itemtype||' Item key : '||itemkey);
844: END IF;
845: -- dbms_output.put_line('Start :Item Type : '||itemtype||' Item key : '||itemkey);
846:
847: WF_ENGINE.CreateProcess (itemtype => itemtype, --itemtype,
848: itemkey => itemkey ,
849: process => p_workflowprocess);
850:
851: WF_ENGINE.SetItemUserkey(itemtype => itemtype,
847: WF_ENGINE.CreateProcess (itemtype => itemtype, --itemtype,
848: itemkey => itemkey ,
849: process => p_workflowprocess);
850:
851: WF_ENGINE.SetItemUserkey(itemtype => itemtype,
852: itemkey => itemkey ,
853: userkey => itemuserkey);
854:
855: -- Initialize Workflow Item Attributes
853: userkey => itemuserkey);
854:
855: -- Initialize Workflow Item Attributes
856:
857: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
858: itemkey => itemkey,
859: aname => 'AMS_APPROVAL_FOR_OBJECT',
860: avalue => p_approval_for );
861:
858: itemkey => itemkey,
859: aname => 'AMS_APPROVAL_FOR_OBJECT',
860: avalue => p_approval_for );
861:
862: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
863: itemkey => itemkey,
864: aname => 'AMS_ACT_ID',
865: avalue => p_approval_for_id );
866:
863: itemkey => itemkey,
864: aname => 'AMS_ACT_ID',
865: avalue => p_approval_for_id );
866:
867: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
868: itemkey => itemkey,
869: aname => 'AMS_ORIG_STAT_ID',
870: avalue => p_orig_stat_id );
871:
868: itemkey => itemkey,
869: aname => 'AMS_ORIG_STAT_ID',
870: avalue => p_orig_stat_id );
871:
872: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
873: itemkey => itemkey,
874: aname => 'AMS_NEW_STAT_ID',
875: avalue => p_new_stat_id );
876:
873: itemkey => itemkey,
874: aname => 'AMS_NEW_STAT_ID',
875: avalue => p_new_stat_id );
876:
877: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
878: itemkey => itemkey,
879: aname => 'AMS_OBJECT_VERSION_NUMBER',
880: avalue => p_object_version_number );
881:
878: itemkey => itemkey,
879: aname => 'AMS_OBJECT_VERSION_NUMBER',
880: avalue => p_object_version_number );
881:
882: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
883: itemkey => itemkey,
884: aname => 'AMS_NOTES_FROM_REQUESTER',
885: avalue => nvl(p_notes_from_requester,'') );
886:
887: OPEN c_resource ;
888: FETCH c_resource INTO l_requester_id ,l_person_id ;
889: CLOSE c_resource ;
890:
891: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
892: itemkey => itemkey,
893: aname => 'AMS_REQUESTER_ID',
894: avalue => l_requester_id );
895:
894: avalue => l_requester_id );
895:
896: l_appr_for := Get_Lookup_Meaning('AMS_SYS_ARC_QUALIFIER',p_approval_for);
897:
898: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
899: itemkey => itemkey,
900: aname => 'AMS_APPR_FOR',
901: avalue => l_appr_for );
902:
910: -- Activity Details
911: -- Find_Manager
912: -- (p_user_id => p_requester_userid,
913: -- x_manager_role => l_manager_role );
914: -- WF_ENGINE.SetItemAttrText(itemtype => itemtype,
915: -- itemkey => itemkey,
916: -- aname => 'AMS_MANAGER',
917: -- avalue => l_manager_role );
918: --
924: AMS_Utility_PVT.debug_message('requester : '||l_requester_role);
925: END IF;
926: -- dbms_output.put_line('requester : '||l_requester_role);
927:
928: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
929: itemkey => itemkey,
930: aname => 'AMS_REQUESTER',
931: avalue => l_requester_role );
932:
930: aname => 'AMS_REQUESTER',
931: avalue => l_requester_role );
932:
933:
934: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
935: itemkey => itemkey,
936: aname => 'MONITOR_URL',
937: avalue => wf_monitor.geturl
938: (wf_core.TRANSLATE('WF_WEB_AGENT'), itemtype, itemkey, 'NO')
938: (wf_core.TRANSLATE('WF_WEB_AGENT'), itemtype, itemkey, 'NO')
939: );
940:
941:
942: WF_ENGINE.SetItemOwner (itemtype => itemtype,
943: itemkey => itemkey,
944: owner => l_requester_role);
945:
946:
943: itemkey => itemkey,
944: owner => l_requester_role);
945:
946:
947: WF_ENGINE.StartProcess (itemtype => itemtype,
948: itemkey => itemkey);
949:
950:
951: EXCEPTION
1795:
1796: -- RUN mode - Normal Process Execution
1797: IF (funcmode = 'RUN')
1798: THEN
1799: l_approval_for_object := WF_ENGINE.GetItemAttrText(
1800: itemtype => itemtype,
1801: itemkey => itemkey ,
1802: aname => 'AMS_APPROVAL_FOR_OBJECT');
1803:
1800: itemtype => itemtype,
1801: itemkey => itemkey ,
1802: aname => 'AMS_APPROVAL_FOR_OBJECT');
1803:
1804: l_approval_for_objectid := WF_ENGINE.GetItemAttrText(
1805: itemtype => itemtype,
1806: itemkey => itemkey ,
1807: aname => 'AMS_ACT_ID');
1808:
1805: itemtype => itemtype,
1806: itemkey => itemkey ,
1807: aname => 'AMS_ACT_ID');
1808:
1809: l_orig_stat_id := WF_ENGINE.GetItemAttrText(
1810: itemtype => itemtype,
1811: itemkey => itemkey ,
1812: aname => 'AMS_ORIG_STAT_ID');
1813:
1810: itemtype => itemtype,
1811: itemkey => itemkey ,
1812: aname => 'AMS_ORIG_STAT_ID');
1813:
1814: l_new_stat_id := WF_ENGINE.GetItemAttrText(
1815: itemtype => itemtype,
1816: itemkey => itemkey ,
1817: aname => 'AMS_NEW_STAT_ID');
1818:
1845: -- dbms_output.put_line('Approval Type : '||l_appr_type);
1846: -- dbms_output.put_line('Approval Required : '||l_appr_req_flag);
1847: IF l_return_status <> FND_API.G_ret_sts_success THEN
1848: -- Approval process is errored out
1849: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
1850: itemkey => itemkey,
1851: aname => 'AMS_ERROR_MSG',
1852: avalue => l_err_msg);
1853:
1854: result := 'COMPLETE:ERROR' ;
1855: ELSE
1856: IF l_appr_req_flag = 'N' THEN
1857: -- No Need of approval
1858: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
1859: itemkey => itemkey,
1860: aname => 'AMS_APPR_REQ_CHECK',
1861: avalue => 'N' );
1862:
1862:
1863: result := 'COMPLETE:SUCCESS' ;
1864: ELSE
1865:
1866: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
1867: itemkey => itemkey,
1868: aname => 'AMS_APPR_TYPE_LOOKUP',
1869: avalue => l_appr_type );
1870:
1867: itemkey => itemkey,
1868: aname => 'AMS_APPR_TYPE_LOOKUP',
1869: avalue => l_appr_type );
1870:
1871: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
1872: itemkey => itemkey,
1873: aname => 'AMS_APPR_REQ_CHECK',
1874: avalue => 'Y' );
1875:
1873: aname => 'AMS_APPR_REQ_CHECK',
1874: avalue => 'Y' );
1875:
1876:
1877: l_requester := WF_ENGINE.GetItemAttrText(
1878: itemtype => itemtype,
1879: itemkey => itemkey ,
1880: aname => 'AMS_REQUESTER');
1881:
1878: itemtype => itemtype,
1879: itemkey => itemkey ,
1880: aname => 'AMS_REQUESTER');
1881:
1882: l_requester_id := WF_ENGINE.GetItemAttrText(
1883: itemtype => itemtype,
1884: itemkey => itemkey ,
1885: aname => 'AMS_REQUESTER_ID');
1886:
1888: Find_Manager
1889: (p_user_id => l_requester_id,
1890: x_manager_role => l_manager );
1891:
1892: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
1893: itemkey => itemkey,
1894: aname => 'AMS_MANAGER',
1895: avalue => l_manager );
1896: IF (AMS_DEBUG_HIGH_ON) THEN
1913: AMS_Utility_PVT.debug_message('Owner : '||l_owner);
1914:
1915: END IF;
1916: -- dbms_output.put_line('Owner : '||l_owner);
1917: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
1918: itemkey => itemkey,
1919: aname => 'AMS_OWNER',
1920: avalue => l_owner );
1921: --
1927: x_manager_role => l_fund_manager
1928: ) ;
1929:
1930:
1931: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
1932: itemkey => itemkey,
1933: aname => 'AMS_BUD_MANAGER',
1934: avalue => l_fund_manager );
1935: -- dbms_output.put_line('Fund Manager : '||l_owner);
1953: FND_MESSAGE.Set_Token('OBJECT_TYPE',l_approval_for_object, FALSE);
1954: l_err_msg := FND_MESSAGE.Get;
1955: END IF ;
1956:
1957: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
1958: itemkey => itemkey,
1959: aname => 'AMS_ERROR_MSG',
1960: avalue => l_err_msg);
1961:
1979: IF l_requester = l_manager AND
1980: l_requester = l_owner AND
1981: l_requester = l_fund_manager
1982: THEN
1983: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
1984: itemkey => itemkey,
1985: aname => 'AMS_APPR_REQ_CHECK',
1986: avalue => 'N' );
1987:
1986: avalue => 'N' );
1987:
1988: result := 'COMPLETE:SUCCESS' ;
1989: ELSE
1990: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
1991: itemkey => itemkey,
1992: aname => 'AMS_APPR_USERNAME',
1993: avalue => l_manager);
1994:
1999: IF (l_requester = l_owner AND
2000: l_requester = l_fund_manager)
2001: THEN --(req = Own = Fun_Man) <> Man
2002: -- Theme Approval Require Budget Approval Not Require
2003: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2004: itemkey => itemkey,
2005: aname => 'AMS_BUDGET_APPR_FLAG',
2006: avalue => 'N');
2007: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2003: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2004: itemkey => itemkey,
2005: aname => 'AMS_BUDGET_APPR_FLAG',
2006: avalue => 'N');
2007: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2008: itemkey => itemkey,
2009: aname => 'AMS_TAOWNER_APPR_FLAG',
2010: avalue => 'N');
2011: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2007: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2008: itemkey => itemkey,
2009: aname => 'AMS_TAOWNER_APPR_FLAG',
2010: avalue => 'N');
2011: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2012: itemkey => itemkey,
2013: aname => 'AMS_BAOWNER_APPR_FLAG',
2014: avalue => 'N');
2015: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2011: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2012: itemkey => itemkey,
2013: aname => 'AMS_BAOWNER_APPR_FLAG',
2014: avalue => 'N');
2015: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2016: itemkey => itemkey,
2017: aname => 'AMS_THEME_APPR_FLAG',
2018: avalue => 'Y');
2019: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2015: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2016: itemkey => itemkey,
2017: aname => 'AMS_THEME_APPR_FLAG',
2018: avalue => 'Y');
2019: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2020: itemkey => itemkey,
2021: aname => 'AMS_APPR_DOC_TYPE',
2022: avalue => 'BOTH');
2023:
2025: l_requester <> l_fund_manager)
2026: THEN --(req = Own <> Fun_Man) <> Man
2027: IF l_fund_manager = l_manager THEN --(Condi: 3)
2028: -- Theme Approval Require Budget Approval Not Require
2029: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2030: itemkey => itemkey,
2031: aname => 'AMS_BUDGET_APPR_FLAG',
2032: avalue => 'N');
2033: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2029: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2030: itemkey => itemkey,
2031: aname => 'AMS_BUDGET_APPR_FLAG',
2032: avalue => 'N');
2033: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2034: itemkey => itemkey,
2035: aname => 'AMS_TAOWNER_APPR_FLAG',
2036: avalue => 'N');
2037: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2033: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2034: itemkey => itemkey,
2035: aname => 'AMS_TAOWNER_APPR_FLAG',
2036: avalue => 'N');
2037: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2038: itemkey => itemkey,
2039: aname => 'AMS_BAOWNER_APPR_FLAG',
2040: avalue => 'N');
2041: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2037: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2038: itemkey => itemkey,
2039: aname => 'AMS_BAOWNER_APPR_FLAG',
2040: avalue => 'N');
2041: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2042: itemkey => itemkey,
2043: aname => 'AMS_THEME_APPR_FLAG',
2044: avalue => 'Y');
2045: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2041: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2042: itemkey => itemkey,
2043: aname => 'AMS_THEME_APPR_FLAG',
2044: avalue => 'Y');
2045: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2046: itemkey => itemkey,
2047: aname => 'AMS_APPR_DOC_TYPE',
2048: avalue => 'BOTH');
2049: ELSE --(Condi: 4)
2046: itemkey => itemkey,
2047: aname => 'AMS_APPR_DOC_TYPE',
2048: avalue => 'BOTH');
2049: ELSE --(Condi: 4)
2050: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2051: itemkey => itemkey,
2052: aname => 'AMS_BUDGET_APPR_FLAG',
2053: avalue => 'Y');
2054: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2050: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2051: itemkey => itemkey,
2052: aname => 'AMS_BUDGET_APPR_FLAG',
2053: avalue => 'Y');
2054: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2055: itemkey => itemkey,
2056: aname => 'AMS_TAOWNER_APPR_FLAG',
2057: avalue => 'N');
2058: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2054: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2055: itemkey => itemkey,
2056: aname => 'AMS_TAOWNER_APPR_FLAG',
2057: avalue => 'N');
2058: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2059: itemkey => itemkey,
2060: aname => 'AMS_BAOWNER_APPR_FLAG',
2061: avalue => 'N');
2062: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2058: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2059: itemkey => itemkey,
2060: aname => 'AMS_BAOWNER_APPR_FLAG',
2061: avalue => 'N');
2062: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2063: itemkey => itemkey,
2064: aname => 'AMS_THEME_APPR_FLAG',
2065: avalue => 'Y');
2066: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2062: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2063: itemkey => itemkey,
2064: aname => 'AMS_THEME_APPR_FLAG',
2065: avalue => 'Y');
2066: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2067: itemkey => itemkey,
2068: aname => 'AMS_APPR_DOC_TYPE',
2069: avalue => 'BOTH');-- Changed on
2070: -- 29Jan from THEME by PTENDULK as Manager will receive Notification for Both Approvals
2071: END IF;
2072: ELSE
2073: --(l_requester <> l_owner AND l_requester = l_fund_manager)
2074: IF l_owner = l_manager THEN --(Condi: 5)
2075: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2076: itemkey => itemkey,
2077: aname => 'AMS_BUDGET_APPR_FLAG',
2078: avalue => 'N');
2079: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2075: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2076: itemkey => itemkey,
2077: aname => 'AMS_BUDGET_APPR_FLAG',
2078: avalue => 'N');
2079: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2080: itemkey => itemkey,
2081: aname => 'AMS_TAOWNER_APPR_FLAG',
2082: avalue => 'N');
2083: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2079: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2080: itemkey => itemkey,
2081: aname => 'AMS_TAOWNER_APPR_FLAG',
2082: avalue => 'N');
2083: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2084: itemkey => itemkey,
2085: aname => 'AMS_BAOWNER_APPR_FLAG',
2086: avalue => 'N');
2087: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2083: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2084: itemkey => itemkey,
2085: aname => 'AMS_BAOWNER_APPR_FLAG',
2086: avalue => 'N');
2087: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2088: itemkey => itemkey,
2089: aname => 'AMS_THEME_APPR_FLAG',
2090: avalue => 'Y');
2091: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2087: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2088: itemkey => itemkey,
2089: aname => 'AMS_THEME_APPR_FLAG',
2090: avalue => 'Y');
2091: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2092: itemkey => itemkey,
2093: aname => 'AMS_APPR_DOC_TYPE',
2094: avalue => 'BOTH');-- Changed on
2095: -- 29Jan from THEME by PTENDULK as Manager will receive Notification for Both Approvals
2093: aname => 'AMS_APPR_DOC_TYPE',
2094: avalue => 'BOTH');-- Changed on
2095: -- 29Jan from THEME by PTENDULK as Manager will receive Notification for Both Approvals
2096: ELSE --(Condi: 6)
2097: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2098: itemkey => itemkey,
2099: aname => 'AMS_BUDGET_APPR_FLAG',
2100: avalue => 'N');
2101: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2097: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2098: itemkey => itemkey,
2099: aname => 'AMS_BUDGET_APPR_FLAG',
2100: avalue => 'N');
2101: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2102: itemkey => itemkey,
2103: aname => 'AMS_TAOWNER_APPR_FLAG',
2104: avalue => 'Y');
2105: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2101: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2102: itemkey => itemkey,
2103: aname => 'AMS_TAOWNER_APPR_FLAG',
2104: avalue => 'Y');
2105: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2106: itemkey => itemkey,
2107: aname => 'AMS_BAOWNER_APPR_FLAG',
2108: avalue => 'N');
2109: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2105: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2106: itemkey => itemkey,
2107: aname => 'AMS_BAOWNER_APPR_FLAG',
2108: avalue => 'N');
2109: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2110: itemkey => itemkey,
2111: aname => 'AMS_THEME_APPR_FLAG',
2112: avalue => 'Y');
2113: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2109: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2110: itemkey => itemkey,
2111: aname => 'AMS_THEME_APPR_FLAG',
2112: avalue => 'Y');
2113: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2114: itemkey => itemkey,
2115: aname => 'AMS_APPR_DOC_TYPE',
2116: avalue => 'BOTH'); -- Changed on
2117: -- 29Jan from THEME by PTENDULK as Manager will receive Notification for Both Approvals
2124: THEN
2125: IF (l_owner = l_manager AND
2126: l_manager = l_fund_manager)
2127: THEN --(Condi: 7)
2128: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2129: itemkey => itemkey,
2130: aname => 'AMS_BUDGET_APPR_FLAG',
2131: avalue => 'N');
2132: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2128: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2129: itemkey => itemkey,
2130: aname => 'AMS_BUDGET_APPR_FLAG',
2131: avalue => 'N');
2132: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2133: itemkey => itemkey,
2134: aname => 'AMS_TAOWNER_APPR_FLAG',
2135: avalue => 'N');
2136: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2132: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2133: itemkey => itemkey,
2134: aname => 'AMS_TAOWNER_APPR_FLAG',
2135: avalue => 'N');
2136: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2137: itemkey => itemkey,
2138: aname => 'AMS_BAOWNER_APPR_FLAG',
2139: avalue => 'N');
2140: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2136: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2137: itemkey => itemkey,
2138: aname => 'AMS_BAOWNER_APPR_FLAG',
2139: avalue => 'N');
2140: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2141: itemkey => itemkey,
2142: aname => 'AMS_THEME_APPR_FLAG',
2143: avalue => 'Y');
2144: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2140: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2141: itemkey => itemkey,
2142: aname => 'AMS_THEME_APPR_FLAG',
2143: avalue => 'Y');
2144: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2145: itemkey => itemkey,
2146: aname => 'AMS_APPR_DOC_TYPE',
2147: avalue => 'BOTH');
2148:
2148:
2149: ELSIF (l_owner = l_manager AND
2150: l_owner <> l_fund_manager)
2151: THEN --(Condi: 8)
2152: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2153: itemkey => itemkey,
2154: aname => 'AMS_BUDGET_APPR_FLAG',
2155: avalue => 'Y');
2156: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2152: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2153: itemkey => itemkey,
2154: aname => 'AMS_BUDGET_APPR_FLAG',
2155: avalue => 'Y');
2156: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2157: itemkey => itemkey,
2158: aname => 'AMS_TAOWNER_APPR_FLAG',
2159: avalue => 'N');
2160: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2156: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2157: itemkey => itemkey,
2158: aname => 'AMS_TAOWNER_APPR_FLAG',
2159: avalue => 'N');
2160: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2161: itemkey => itemkey,
2162: aname => 'AMS_BAOWNER_APPR_FLAG',
2163: avalue => 'N');
2164: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2160: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2161: itemkey => itemkey,
2162: aname => 'AMS_BAOWNER_APPR_FLAG',
2163: avalue => 'N');
2164: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2165: itemkey => itemkey,
2166: aname => 'AMS_THEME_APPR_FLAG',
2167: avalue => 'Y');
2168: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2164: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2165: itemkey => itemkey,
2166: aname => 'AMS_THEME_APPR_FLAG',
2167: avalue => 'Y');
2168: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2169: itemkey => itemkey,
2170: aname => 'AMS_APPR_DOC_TYPE',
2171: avalue => 'BOTH');
2172:
2171: avalue => 'BOTH');
2172:
2173: ELSE --(Condi: 9)
2174: -- (l_owner <> l_manager AND l_owner = l_fund_manager)
2175: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2176: itemkey => itemkey,
2177: aname => 'AMS_BUDGET_APPR_FLAG',
2178: avalue => 'N');
2179: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2175: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2176: itemkey => itemkey,
2177: aname => 'AMS_BUDGET_APPR_FLAG',
2178: avalue => 'N');
2179: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2180: itemkey => itemkey,
2181: aname => 'AMS_TAOWNER_APPR_FLAG',
2182: avalue => 'Y');
2183: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2179: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2180: itemkey => itemkey,
2181: aname => 'AMS_TAOWNER_APPR_FLAG',
2182: avalue => 'Y');
2183: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2184: itemkey => itemkey,
2185: aname => 'AMS_BAOWNER_APPR_FLAG',
2186: avalue => 'N');
2187: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2183: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2184: itemkey => itemkey,
2185: aname => 'AMS_BAOWNER_APPR_FLAG',
2186: avalue => 'N');
2187: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2188: itemkey => itemkey,
2189: aname => 'AMS_THEME_APPR_FLAG',
2190: avalue => 'Y');
2191: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2187: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2188: itemkey => itemkey,
2189: aname => 'AMS_THEME_APPR_FLAG',
2190: avalue => 'Y');
2191: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2192: itemkey => itemkey,
2193: aname => 'AMS_APPR_DOC_TYPE',
2194: avalue => 'BOTH');
2195: END IF;
2195: END IF;
2196: ELSE
2197: IF l_manager = l_fund_manager
2198: THEN --(Condi: 10)
2199: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2200: itemkey => itemkey,
2201: aname => 'AMS_BUDGET_APPR_FLAG',
2202: avalue => 'N');
2203: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2199: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2200: itemkey => itemkey,
2201: aname => 'AMS_BUDGET_APPR_FLAG',
2202: avalue => 'N');
2203: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2204: itemkey => itemkey,
2205: aname => 'AMS_TAOWNER_APPR_FLAG',
2206: avalue => 'Y');
2207: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2203: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2204: itemkey => itemkey,
2205: aname => 'AMS_TAOWNER_APPR_FLAG',
2206: avalue => 'Y');
2207: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2208: itemkey => itemkey,
2209: aname => 'AMS_BAOWNER_APPR_FLAG',
2210: avalue => 'N');
2211: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2207: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2208: itemkey => itemkey,
2209: aname => 'AMS_BAOWNER_APPR_FLAG',
2210: avalue => 'N');
2211: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2212: itemkey => itemkey,
2213: aname => 'AMS_THEME_APPR_FLAG',
2214: avalue => 'Y');
2215: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2211: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2212: itemkey => itemkey,
2213: aname => 'AMS_THEME_APPR_FLAG',
2214: avalue => 'Y');
2215: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2216: itemkey => itemkey,
2217: aname => 'AMS_APPR_DOC_TYPE',
2218: avalue => 'BOTH');
2219: ELSE -- (requester<> owner<> manager<> fund_manager) (Condi 11)
2216: itemkey => itemkey,
2217: aname => 'AMS_APPR_DOC_TYPE',
2218: avalue => 'BOTH');
2219: ELSE -- (requester<> owner<> manager<> fund_manager) (Condi 11)
2220: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2221: itemkey => itemkey,
2222: aname => 'AMS_BUDGET_APPR_FLAG',
2223: avalue => 'Y');
2224: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2220: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2221: itemkey => itemkey,
2222: aname => 'AMS_BUDGET_APPR_FLAG',
2223: avalue => 'Y');
2224: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2225: itemkey => itemkey,
2226: aname => 'AMS_TAOWNER_APPR_FLAG',
2227: avalue => 'Y');
2228: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2224: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2225: itemkey => itemkey,
2226: aname => 'AMS_TAOWNER_APPR_FLAG',
2227: avalue => 'Y');
2228: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2229: itemkey => itemkey,
2230: aname => 'AMS_BAOWNER_APPR_FLAG',
2231: avalue => 'N');
2232: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2228: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2229: itemkey => itemkey,
2230: aname => 'AMS_BAOWNER_APPR_FLAG',
2231: avalue => 'N');
2232: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2233: itemkey => itemkey,
2234: aname => 'AMS_THEME_APPR_FLAG',
2235: avalue => 'Y');
2236: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2232: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2233: itemkey => itemkey,
2234: aname => 'AMS_THEME_APPR_FLAG',
2235: avalue => 'Y');
2236: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2237: itemkey => itemkey,
2238: aname => 'AMS_APPR_DOC_TYPE',
2239: avalue => 'BOTH');
2240: END IF ;
2265: FND_MESSAGE.Set_Token('OBJECT_TYPE',l_approval_for_object, FALSE);
2266: END IF;
2267: l_err_msg := FND_MESSAGE.Get;
2268:
2269: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2270: itemkey => itemkey,
2271: aname => 'AMS_ERROR_MSG',
2272: avalue => l_err_msg);
2273:
2276: -- Check if all the Approvers are same
2277: IF l_requester = l_owner AND
2278: l_requester = l_fund_manager
2279: THEN -- Condi : 12
2280: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2281: itemkey => itemkey,
2282: aname => 'AMS_APPR_REQ_CHECK',
2283: avalue => 'N' );
2284: -- dbms_output.put_line('All Appr Same : '||l_fund_manager);
2299: END IF;
2300:
2301: IF (l_requester = l_owner ) AND (l_requester <> l_fund_manager )
2302: THEN -- Condi : 13
2303: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2304: itemkey => itemkey,
2305: aname => 'AMS_APPR_USERNAME',
2306: avalue => l_fund_manager);
2307:
2304: itemkey => itemkey,
2305: aname => 'AMS_APPR_USERNAME',
2306: avalue => l_fund_manager);
2307:
2308: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2309: itemkey => itemkey,
2310: aname => 'AMS_BUDGET_APPR_FLAG',
2311: avalue => 'Y');
2312: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2308: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2309: itemkey => itemkey,
2310: aname => 'AMS_BUDGET_APPR_FLAG',
2311: avalue => 'Y');
2312: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2313: itemkey => itemkey,
2314: aname => 'AMS_TAOWNER_APPR_FLAG',
2315: avalue => 'N');
2316: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2312: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2313: itemkey => itemkey,
2314: aname => 'AMS_TAOWNER_APPR_FLAG',
2315: avalue => 'N');
2316: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2317: itemkey => itemkey,
2318: aname => 'AMS_BAOWNER_APPR_FLAG',
2319: avalue => 'N');
2320: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2316: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2317: itemkey => itemkey,
2318: aname => 'AMS_BAOWNER_APPR_FLAG',
2319: avalue => 'N');
2320: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2321: itemkey => itemkey,
2322: aname => 'AMS_THEME_APPR_FLAG',
2323: avalue => 'N');
2324: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2320: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2321: itemkey => itemkey,
2322: aname => 'AMS_THEME_APPR_FLAG',
2323: avalue => 'N');
2324: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2325: itemkey => itemkey,
2326: aname => 'AMS_APPR_DOC_TYPE',
2327: avalue => 'BUDGET');
2328: ELSIF (l_requester = l_fund_manager) AND (l_requester <> l_owner )
2326: aname => 'AMS_APPR_DOC_TYPE',
2327: avalue => 'BUDGET');
2328: ELSIF (l_requester = l_fund_manager) AND (l_requester <> l_owner )
2329: THEN -- Condi : 14
2330: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2331: itemkey => itemkey,
2332: aname => 'AMS_APPR_USERNAME',
2333: avalue => l_owner);
2334:
2331: itemkey => itemkey,
2332: aname => 'AMS_APPR_USERNAME',
2333: avalue => l_owner);
2334:
2335: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2336: itemkey => itemkey,
2337: aname => 'AMS_BUDGET_APPR_FLAG',
2338: avalue => 'Y');
2339: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2335: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2336: itemkey => itemkey,
2337: aname => 'AMS_BUDGET_APPR_FLAG',
2338: avalue => 'Y');
2339: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2340: itemkey => itemkey,
2341: aname => 'AMS_TAOWNER_APPR_FLAG',
2342: avalue => 'N');
2343: -- Here Budget Approval is not required from Owner as it is already taken (Requester = Fund Manager)
2340: itemkey => itemkey,
2341: aname => 'AMS_TAOWNER_APPR_FLAG',
2342: avalue => 'N');
2343: -- Here Budget Approval is not required from Owner as it is already taken (Requester = Fund Manager)
2344: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2345: itemkey => itemkey,
2346: aname => 'AMS_BAOWNER_APPR_FLAG',
2347: avalue => 'N');
2348: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2344: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2345: itemkey => itemkey,
2346: aname => 'AMS_BAOWNER_APPR_FLAG',
2347: avalue => 'N');
2348: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2349: itemkey => itemkey,
2350: aname => 'AMS_THEME_APPR_FLAG',
2351: avalue => 'N');
2352: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2348: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2349: itemkey => itemkey,
2350: aname => 'AMS_THEME_APPR_FLAG',
2351: avalue => 'N');
2352: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2353: itemkey => itemkey,
2354: aname => 'AMS_APPR_DOC_TYPE',
2355: avalue => 'BUDGET');
2356: ELSE
2356: ELSE
2357: -- dbms_output.put_line('All Appr No Same : '||l_fund_manager);
2358: --(l_requester <> l_fund_manager) AND (l_requester <> l_owner)
2359: IF l_owner = l_fund_manager THEN -- Condi : 15
2360: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2361: itemkey => itemkey,
2362: aname => 'AMS_APPR_USERNAME',
2363: avalue => l_owner);
2364:
2361: itemkey => itemkey,
2362: aname => 'AMS_APPR_USERNAME',
2363: avalue => l_owner);
2364:
2365: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2366: itemkey => itemkey,
2367: aname => 'AMS_BUDGET_APPR_FLAG',
2368: avalue => 'Y');
2369: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2365: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2366: itemkey => itemkey,
2367: aname => 'AMS_BUDGET_APPR_FLAG',
2368: avalue => 'Y');
2369: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2370: itemkey => itemkey,
2371: aname => 'AMS_TAOWNER_APPR_FLAG',
2372: avalue => 'N');
2373: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2369: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2370: itemkey => itemkey,
2371: aname => 'AMS_TAOWNER_APPR_FLAG',
2372: avalue => 'N');
2373: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2374: itemkey => itemkey,
2375: aname => 'AMS_BAOWNER_APPR_FLAG',
2376: avalue => 'N');
2377: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2373: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2374: itemkey => itemkey,
2375: aname => 'AMS_BAOWNER_APPR_FLAG',
2376: avalue => 'N');
2377: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2378: itemkey => itemkey,
2379: aname => 'AMS_THEME_APPR_FLAG',
2380: avalue => 'N');
2381: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2377: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2378: itemkey => itemkey,
2379: aname => 'AMS_THEME_APPR_FLAG',
2380: avalue => 'N');
2381: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2382: itemkey => itemkey,
2383: aname => 'AMS_APPR_DOC_TYPE',
2384: avalue => 'BUDGET');
2385: ELSE -- Condi : 16
2382: itemkey => itemkey,
2383: aname => 'AMS_APPR_DOC_TYPE',
2384: avalue => 'BUDGET');
2385: ELSE -- Condi : 16
2386: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2387: itemkey => itemkey,
2388: aname => 'AMS_APPR_USERNAME',
2389: avalue => l_fund_manager);
2390:
2387: itemkey => itemkey,
2388: aname => 'AMS_APPR_USERNAME',
2389: avalue => l_fund_manager);
2390:
2391: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2392: itemkey => itemkey,
2393: aname => 'AMS_BUDGET_APPR_FLAG',
2394: avalue => 'Y');
2395: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2391: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2392: itemkey => itemkey,
2393: aname => 'AMS_BUDGET_APPR_FLAG',
2394: avalue => 'Y');
2395: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2396: itemkey => itemkey,
2397: aname => 'AMS_TAOWNER_APPR_FLAG',
2398: avalue => 'N');
2399: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2395: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2396: itemkey => itemkey,
2397: aname => 'AMS_TAOWNER_APPR_FLAG',
2398: avalue => 'N');
2399: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2400: itemkey => itemkey,
2401: aname => 'AMS_BAOWNER_APPR_FLAG',
2402: avalue => 'Y');
2403: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2399: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2400: itemkey => itemkey,
2401: aname => 'AMS_BAOWNER_APPR_FLAG',
2402: avalue => 'Y');
2403: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2404: itemkey => itemkey,
2405: aname => 'AMS_THEME_APPR_FLAG',
2406: avalue => 'N');
2407: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2403: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2404: itemkey => itemkey,
2405: aname => 'AMS_THEME_APPR_FLAG',
2406: avalue => 'N');
2407: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2408: itemkey => itemkey,
2409: aname => 'AMS_APPR_DOC_TYPE',
2410: avalue => 'BUDGET');
2411: END IF;
2427: FND_MESSAGE.Set_Token('OBJECT_TYPE',l_approval_for_object, FALSE);
2428: END IF;
2429: l_err_msg := FND_MESSAGE.Get;
2430:
2431: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2432: itemkey => itemkey,
2433: aname => 'AMS_ERROR_MSG',
2434: avalue => l_err_msg);
2435:
2451: -- Check if all the Approvers are same
2452: IF l_requester = l_owner AND
2453: l_requester = l_manager
2454: THEN -- Condi : 17
2455: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2456: itemkey => itemkey,
2457: aname => 'AMS_APPR_REQ_CHECK',
2458: avalue => 'N' );
2459:
2462: -- dbms_output.put_line('Theme All Approvals same');
2463: ELSE
2464: IF (l_requester = l_owner )
2465: THEN -- Condi : 18
2466: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2467: itemkey => itemkey,
2468: aname => 'AMS_APPR_USERNAME',
2469: avalue => l_manager);
2470:
2467: itemkey => itemkey,
2468: aname => 'AMS_APPR_USERNAME',
2469: avalue => l_manager);
2470:
2471: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2472: itemkey => itemkey,
2473: aname => 'AMS_BUDGET_APPR_FLAG',
2474: avalue => 'N');
2475: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2471: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2472: itemkey => itemkey,
2473: aname => 'AMS_BUDGET_APPR_FLAG',
2474: avalue => 'N');
2475: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2476: itemkey => itemkey,
2477: aname => 'AMS_TAOWNER_APPR_FLAG',
2478: avalue => 'N');
2479: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2475: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2476: itemkey => itemkey,
2477: aname => 'AMS_TAOWNER_APPR_FLAG',
2478: avalue => 'N');
2479: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2480: itemkey => itemkey,
2481: aname => 'AMS_BAOWNER_APPR_FLAG',
2482: avalue => 'N');
2483: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2479: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2480: itemkey => itemkey,
2481: aname => 'AMS_BAOWNER_APPR_FLAG',
2482: avalue => 'N');
2483: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2484: itemkey => itemkey,
2485: aname => 'AMS_THEME_APPR_FLAG',
2486: avalue => 'Y');
2487: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2483: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2484: itemkey => itemkey,
2485: aname => 'AMS_THEME_APPR_FLAG',
2486: avalue => 'Y');
2487: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2488: itemkey => itemkey,
2489: aname => 'AMS_APPR_DOC_TYPE',
2490: avalue => 'THEME');
2491: ELSE --(l_requester <> l_owner)
2489: aname => 'AMS_APPR_DOC_TYPE',
2490: avalue => 'THEME');
2491: ELSE --(l_requester <> l_owner)
2492: IF l_owner = l_fund_manager THEN -- Condi : 19
2493: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2494: itemkey => itemkey,
2495: aname => 'AMS_APPR_USERNAME',
2496: avalue => l_owner);
2497:
2494: itemkey => itemkey,
2495: aname => 'AMS_APPR_USERNAME',
2496: avalue => l_owner);
2497:
2498: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2499: itemkey => itemkey,
2500: aname => 'AMS_BUDGET_APPR_FLAG',
2501: avalue => 'N');
2502: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2498: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2499: itemkey => itemkey,
2500: aname => 'AMS_BUDGET_APPR_FLAG',
2501: avalue => 'N');
2502: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2503: itemkey => itemkey,
2504: aname => 'AMS_TAOWNER_APPR_FLAG',
2505: avalue => 'N');
2506: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2502: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2503: itemkey => itemkey,
2504: aname => 'AMS_TAOWNER_APPR_FLAG',
2505: avalue => 'N');
2506: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2507: itemkey => itemkey,
2508: aname => 'AMS_BAOWNER_APPR_FLAG',
2509: avalue => 'N');
2510: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2506: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2507: itemkey => itemkey,
2508: aname => 'AMS_BAOWNER_APPR_FLAG',
2509: avalue => 'N');
2510: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2511: itemkey => itemkey,
2512: aname => 'AMS_THEME_APPR_FLAG',
2513: avalue => 'Y');
2514: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2510: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2511: itemkey => itemkey,
2512: aname => 'AMS_THEME_APPR_FLAG',
2513: avalue => 'Y');
2514: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2515: itemkey => itemkey,
2516: aname => 'AMS_APPR_DOC_TYPE',
2517: avalue => 'THEME');
2518: ELSE -- (Condi 20)
2515: itemkey => itemkey,
2516: aname => 'AMS_APPR_DOC_TYPE',
2517: avalue => 'THEME');
2518: ELSE -- (Condi 20)
2519: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2520: itemkey => itemkey,
2521: aname => 'AMS_APPR_USERNAME',
2522: avalue => l_manager);
2523:
2520: itemkey => itemkey,
2521: aname => 'AMS_APPR_USERNAME',
2522: avalue => l_manager);
2523:
2524: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2525: itemkey => itemkey,
2526: aname => 'AMS_BUDGET_APPR_FLAG',
2527: avalue => 'N');
2528: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2524: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2525: itemkey => itemkey,
2526: aname => 'AMS_BUDGET_APPR_FLAG',
2527: avalue => 'N');
2528: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2529: itemkey => itemkey,
2530: aname => 'AMS_TAOWNER_APPR_FLAG',
2531: avalue => 'Y');
2532: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2528: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2529: itemkey => itemkey,
2530: aname => 'AMS_TAOWNER_APPR_FLAG',
2531: avalue => 'Y');
2532: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2533: itemkey => itemkey,
2534: aname => 'AMS_BAOWNER_APPR_FLAG',
2535: avalue => 'N');
2536: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2532: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2533: itemkey => itemkey,
2534: aname => 'AMS_BAOWNER_APPR_FLAG',
2535: avalue => 'N');
2536: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2537: itemkey => itemkey,
2538: aname => 'AMS_THEME_APPR_FLAG',
2539: avalue => 'Y');
2540: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2536: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2537: itemkey => itemkey,
2538: aname => 'AMS_THEME_APPR_FLAG',
2539: avalue => 'Y');
2540: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
2541: itemkey => itemkey,
2542: aname => 'AMS_APPR_DOC_TYPE',
2543: avalue => 'THEME');
2544: END IF;
2618: -- dbms_output.put_line('Process Appr_Required_Check');
2619: -- RUN mode - Normal Process Execution
2620: IF (funcmode = 'RUN')
2621: THEN
2622: l_appr_flag := WF_ENGINE.GetItemAttrText(
2623: itemtype => itemtype,
2624: itemkey => itemkey ,
2625: aname => 'AMS_APPR_REQ_CHECK');
2626: IF l_appr_flag = 'Y' THEN
2714: -- RUN mode - Normal Process Execution
2715: IF (funcmode = 'RUN')
2716: THEN
2717:
2718: l_obj_type := wf_engine.GetItemAttrText(
2719: itemtype => ItemType,
2720: itemkey => ItemKey,
2721: aname => 'AMS_APPROVAL_FOR_OBJECT');
2722:
2719: itemtype => ItemType,
2720: itemkey => ItemKey,
2721: aname => 'AMS_APPROVAL_FOR_OBJECT');
2722:
2723: l_obj_id := wf_engine.GetItemAttrText(
2724: itemtype => ItemType,
2725: itemkey => ItemKey,
2726: aname => 'AMS_ACT_ID');
2727: l_obj_version_number := wf_engine.GetItemAttrText(
2723: l_obj_id := wf_engine.GetItemAttrText(
2724: itemtype => ItemType,
2725: itemkey => ItemKey,
2726: aname => 'AMS_ACT_ID');
2727: l_obj_version_number := wf_engine.GetItemAttrText(
2728: itemtype => ItemType,
2729: itemkey => ItemKey,
2730: aname => 'AMS_OBJECT_VERSION_NUMBER');
2731: l_next_stat_id := wf_engine.GetItemAttrText(
2727: l_obj_version_number := wf_engine.GetItemAttrText(
2728: itemtype => ItemType,
2729: itemkey => ItemKey,
2730: aname => 'AMS_OBJECT_VERSION_NUMBER');
2731: l_next_stat_id := wf_engine.GetItemAttrText(
2732: itemtype => ItemType,
2733: itemkey => ItemKey,
2734: aname => 'AMS_NEW_STAT_ID');
2735:
2732: itemtype => ItemType,
2733: itemkey => ItemKey,
2734: aname => 'AMS_NEW_STAT_ID');
2735:
2736: l_requester_id := wf_engine.GetItemAttrText(
2737: itemtype => ItemType,
2738: itemkey => ItemKey,
2739: aname => 'AMS_REQUESTER_ID');
2740:
2832: -- dbms_output.put_line('Process Fund_Appr_Req_Check');
2833: -- RUN mode - Normal Process Execution
2834: IF (funcmode = 'RUN')
2835: THEN
2836: l_theme_appr_flag := WF_ENGINE.GetItemAttrText(
2837: itemtype => itemtype,
2838: itemkey => itemkey ,
2839: aname => 'AMS_THEME_APPR_FLAG');
2840: IF l_theme_appr_flag = 'Y' THEN
3065: ItemType := nvl(substr(document_id, 1, instr(document_id,':')-1),'AMSAPPR');
3066: ItemKey := substr(document_id
3067: , instr(document_id,':')+1);
3068:
3069: l_approval_for := wf_engine.GetItemAttrText(
3070: itemtype => ItemType,
3071: itemkey => ItemKey,
3072: aname => 'AMS_APPROVAL_FOR_OBJECT');
3073:
3070: itemtype => ItemType,
3071: itemkey => ItemKey,
3072: aname => 'AMS_APPROVAL_FOR_OBJECT');
3073:
3074: l_approval_for_id := wf_engine.GetItemAttrText(
3075: itemtype => ItemType,
3076: itemkey => ItemKey,
3077: aname => 'AMS_ACT_ID');
3078:
3075: itemtype => ItemType,
3076: itemkey => ItemKey,
3077: aname => 'AMS_ACT_ID');
3078:
3079: l_requester := wf_engine.GetItemAttrText(
3080: itemtype => ItemType,
3081: itemkey => ItemKey,
3082: aname => 'AMS_REQUESTER');
3083:
3080: itemtype => ItemType,
3081: itemkey => ItemKey,
3082: aname => 'AMS_REQUESTER');
3083:
3084: l_requester_note := wf_engine.GetItemAttrText(
3085: itemtype => ItemType,
3086: itemkey => ItemKey,
3087: aname => 'AMS_NOTES_FROM_REQUESTER');
3088:
3086: itemkey => ItemKey,
3087: aname => 'AMS_NOTES_FROM_REQUESTER');
3088:
3089: -- dbms_output.Put_line('Requester Note : '||l_requester_note );
3090: l_doc_type := wf_engine.GetItemAttrText(
3091: itemtype => ItemType,
3092: itemkey => ItemKey,
3093: aname => 'AMS_APPR_DOC_TYPE');
3094:
3091: itemtype => ItemType,
3092: itemkey => ItemKey,
3093: aname => 'AMS_APPR_DOC_TYPE');
3094:
3095: l_approval_type := wf_engine.GetItemAttrText(
3096: itemtype => ItemType,
3097: itemkey => ItemKey,
3098: aname => 'AMS_APPROVAL_TYPE');
3099:
3096: itemtype => ItemType,
3097: itemkey => ItemKey,
3098: aname => 'AMS_APPROVAL_TYPE');
3099:
3100: l_activity_name := WF_ENGINE.GetItemAttrText
3101: (itemtype => itemtype ,
3102: itemkey => itemkey,
3103: aname => 'AMS_ACT_NAME' );
3104:
3101: (itemtype => itemtype ,
3102: itemkey => itemkey,
3103: aname => 'AMS_ACT_NAME' );
3104:
3105: l_start_dt := WF_ENGINE.GetItemAttrText
3106: (itemtype => itemtype,
3107: itemkey => itemkey ,
3108: aname => 'AMS_ACT_START_DATE');
3109:
3106: (itemtype => itemtype,
3107: itemkey => itemkey ,
3108: aname => 'AMS_ACT_START_DATE');
3109:
3110: l_end_dt := WF_ENGINE.GetItemAttrText
3111: (itemtype => itemtype,
3112: itemkey => itemkey ,
3113: aname => 'AMS_ACT_END_DATE' );
3114:
3111: (itemtype => itemtype,
3112: itemkey => itemkey ,
3113: aname => 'AMS_ACT_END_DATE' );
3114:
3115: l_budget_amount := WF_ENGINE.GetItemAttrText
3116: (itemtype => itemtype ,
3117: itemkey => itemkey,
3118: aname => 'AMS_BUDGET_AMOUNT');
3119: l_desc := WF_ENGINE.GetItemAttrText
3115: l_budget_amount := WF_ENGINE.GetItemAttrText
3116: (itemtype => itemtype ,
3117: itemkey => itemkey,
3118: aname => 'AMS_BUDGET_AMOUNT');
3119: l_desc := WF_ENGINE.GetItemAttrText
3120: (itemtype => itemtype,
3121: itemkey => itemkey ,
3122: aname => 'AMS_ACT_DESC');
3123: l_currency := WF_ENGINE.GetItemAttrText
3119: l_desc := WF_ENGINE.GetItemAttrText
3120: (itemtype => itemtype,
3121: itemkey => itemkey ,
3122: aname => 'AMS_ACT_DESC');
3123: l_currency := WF_ENGINE.GetItemAttrText
3124: (itemtype => itemtype ,
3125: itemkey => itemkey,
3126: aname => 'AMS_CURRENCY');
3127:
3140: FETCH c_camp_owner INTO l_owner ;
3141: CLOSE c_camp_owner ;
3142:
3143:
3144: l_camp_theme := WF_ENGINE.GetItemAttrText
3145: (itemtype => itemtype ,
3146: itemkey => itemkey,
3147: aname => 'AMS_CAMP_THEME');
3148: l_camp_mkt := WF_ENGINE.GetItemAttrText
3144: l_camp_theme := WF_ENGINE.GetItemAttrText
3145: (itemtype => itemtype ,
3146: itemkey => itemkey,
3147: aname => 'AMS_CAMP_THEME');
3148: l_camp_mkt := WF_ENGINE.GetItemAttrText
3149: (itemtype => itemtype,
3150: itemkey => itemkey ,
3151: aname => 'AMS_CAMP_MARKET');
3152: l_camp_geo := WF_ENGINE.GetItemAttrText
3148: l_camp_mkt := WF_ENGINE.GetItemAttrText
3149: (itemtype => itemtype,
3150: itemkey => itemkey ,
3151: aname => 'AMS_CAMP_MARKET');
3152: l_camp_geo := WF_ENGINE.GetItemAttrText
3153: (itemtype => itemtype ,
3154: itemkey => itemkey,
3155: aname => 'AMS_CAMP_GEO');
3156:
3206: l_message := FND_MESSAGE.Get;
3207:
3208: END IF;
3209: ELSIF l_approval_for = 'DELV' THEN
3210: l_deli_mkt_msg := WF_ENGINE.GetItemAttrText
3211: (itemtype => itemtype,
3212: itemkey => itemkey ,
3213: aname => 'AMS_DELI_MKT_MESSAGE');
3214:
3211: (itemtype => itemtype,
3212: itemkey => itemkey ,
3213: aname => 'AMS_DELI_MKT_MESSAGE');
3214:
3215: l_deli_language := WF_ENGINE.GetItemAttrText
3216: (itemtype => itemtype,
3217: itemkey => itemkey ,
3218: aname => 'AMS_DELI_LANGUAGE' );
3219:
3257: l_message := FND_MESSAGE.Get;
3258:
3259: END IF;
3260: ELSIF l_approval_for = 'EVEH' THEN
3261: l_eve_mkt_msg := WF_ENGINE.GetItemAttrText
3262: (itemtype => itemtype,
3263: itemkey => itemkey ,
3264: aname => 'AMS_EVE_MKT_MESSAGE');
3265: OPEN c_eveh_owner(l_approval_for_id) ;
3308:
3309: END IF;
3310: ELSIF l_approval_for = 'EVEO' THEN
3311:
3312: l_eve_mkt_msg := WF_ENGINE.GetItemAttrText
3313: (itemtype => itemtype,
3314: itemkey => itemkey ,
3315: aname => 'AMS_EVE_MKT_MESSAGE');
3316: OPEN c_eveo_owner(l_approval_for_id) ;
3547: IF (funcmode = 'RUN')
3548: THEN
3549: -- Create the Notification Document
3550:
3551: l_approval_for := wf_engine.GetItemAttrText(
3552: itemtype => ItemType,
3553: itemkey => ItemKey,
3554: aname => 'AMS_APPROVAL_FOR_OBJECT');
3555:
3552: itemtype => ItemType,
3553: itemkey => ItemKey,
3554: aname => 'AMS_APPROVAL_FOR_OBJECT');
3555:
3556: l_approval_for_id := wf_engine.GetItemAttrText(
3557: itemtype => ItemType,
3558: itemkey => ItemKey,
3559: aname => 'AMS_ACT_ID');
3560:
3557: itemtype => ItemType,
3558: itemkey => ItemKey,
3559: aname => 'AMS_ACT_ID');
3560:
3561: l_requester := wf_engine.GetItemAttrText(
3562: itemtype => ItemType,
3563: itemkey => ItemKey,
3564: aname => 'AMS_REQUESTER');
3565:
3562: itemtype => ItemType,
3563: itemkey => ItemKey,
3564: aname => 'AMS_REQUESTER');
3565:
3566: l_doc_type := wf_engine.GetItemAttrText(
3567: itemtype => ItemType,
3568: itemkey => ItemKey,
3569: aname => 'AMS_APPR_DOC_TYPE');
3570:
3569: aname => 'AMS_APPR_DOC_TYPE');
3570:
3571: l_approval_type := Get_Lookup_Meaning('AMS_APPROVAL_TYPE',l_doc_type);
3572:
3573: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3574: itemkey => itemkey,
3575: aname => 'AMS_APPROVAL_TYPE',
3576: avalue => l_approval_type );
3577:
3581: x_timeout_days => l_timeout,
3582: x_priority => l_priority) ;
3583:
3584:
3585: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3586: itemkey => itemkey,
3587: aname => 'AMS_TIMEOUT',
3588: avalue => l_timeout );
3589:
3586: itemkey => itemkey,
3587: aname => 'AMS_TIMEOUT',
3588: avalue => l_timeout );
3589:
3590: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3591: itemkey => itemkey,
3592: aname => 'AMS_PRIORITY',
3593: avalue => l_priority );
3594:
3632: FETCH c_currency INTO l_currency ;
3633: CLOSE c_currency ;
3634:
3635:
3636: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3637: itemkey => itemkey,
3638: aname => 'AMS_ACT_NAME',
3639: avalue => l_activity_name );
3640: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3636: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3637: itemkey => itemkey,
3638: aname => 'AMS_ACT_NAME',
3639: avalue => l_activity_name );
3640: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3641: itemkey => itemkey ,
3642: aname => 'AMS_ACT_START_DATE',
3643: avalue => l_start_dt );
3644: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3640: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3641: itemkey => itemkey ,
3642: aname => 'AMS_ACT_START_DATE',
3643: avalue => l_start_dt );
3644: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3645: itemkey => itemkey ,
3646: aname => 'AMS_ACT_END_DATE',
3647: avalue => l_end_dt );
3648: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3644: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3645: itemkey => itemkey ,
3646: aname => 'AMS_ACT_END_DATE',
3647: avalue => l_end_dt );
3648: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3649: itemkey => itemkey,
3650: aname => 'AMS_CAMP_THEME',
3651: avalue => l_camp_theme );
3652:
3649: itemkey => itemkey,
3650: aname => 'AMS_CAMP_THEME',
3651: avalue => l_camp_theme );
3652:
3653: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3654: itemkey => itemkey ,
3655: aname => 'AMS_CAMP_MARKET',
3656: avalue => l_camp_mkt );
3657: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3653: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3654: itemkey => itemkey ,
3655: aname => 'AMS_CAMP_MARKET',
3656: avalue => l_camp_mkt );
3657: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3658: itemkey => itemkey,
3659: aname => 'AMS_CAMP_GEO',
3660: avalue => l_camp_geo );
3661: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3657: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3658: itemkey => itemkey,
3659: aname => 'AMS_CAMP_GEO',
3660: avalue => l_camp_geo );
3661: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3662: itemkey => itemkey,
3663: aname => 'AMS_BUDGET_AMOUNT',
3664: avalue => l_budget_amount );
3665: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3661: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3662: itemkey => itemkey,
3663: aname => 'AMS_BUDGET_AMOUNT',
3664: avalue => l_budget_amount );
3665: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3666: itemkey => itemkey ,
3667: aname => 'AMS_ACT_DESC',
3668: avalue => l_desc );
3669:
3666: itemkey => itemkey ,
3667: aname => 'AMS_ACT_DESC',
3668: avalue => l_desc );
3669:
3670: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3671: itemkey => itemkey,
3672: aname => 'AMS_CURRENCY',
3673: avalue => l_currency );
3674:
3682: OPEN c_currency(l_currency_code);
3683: FETCH c_currency INTO l_currency ;
3684: CLOSE c_currency ;
3685:
3686: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3687: itemkey => itemkey,
3688: aname => 'AMS_ACT_NAME',
3689: avalue => l_activity_name );
3690: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3686: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3687: itemkey => itemkey,
3688: aname => 'AMS_ACT_NAME',
3689: avalue => l_activity_name );
3690: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3691: itemkey => itemkey ,
3692: aname => 'AMS_ACT_START_DATE',
3693: avalue => l_start_dt );
3694: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3690: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3691: itemkey => itemkey ,
3692: aname => 'AMS_ACT_START_DATE',
3693: avalue => l_start_dt );
3694: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3695: itemkey => itemkey ,
3696: aname => 'AMS_ACT_END_DATE',
3697: avalue => l_end_dt );
3698: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3694: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3695: itemkey => itemkey ,
3696: aname => 'AMS_ACT_END_DATE',
3697: avalue => l_end_dt );
3698: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3699: itemkey => itemkey ,
3700: aname => 'AMS_DELI_LANGUAGE',
3701: avalue => l_deli_language );
3702: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3698: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3699: itemkey => itemkey ,
3700: aname => 'AMS_DELI_LANGUAGE',
3701: avalue => l_deli_language );
3702: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3703: itemkey => itemkey ,
3704: aname => 'AMS_ACT_DESC',
3705: avalue => l_desc );
3706: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3702: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3703: itemkey => itemkey ,
3704: aname => 'AMS_ACT_DESC',
3705: avalue => l_desc );
3706: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3707: itemkey => itemkey,
3708: aname => 'AMS_BUDGET_AMOUNT',
3709: avalue => l_budget_amount );
3710:
3707: itemkey => itemkey,
3708: aname => 'AMS_BUDGET_AMOUNT',
3709: avalue => l_budget_amount );
3710:
3711: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3712: itemkey => itemkey,
3713: aname => 'AMS_CURRENCY',
3714: avalue => l_currency );
3715: ELSIF l_approval_for = 'EVEH' THEN
3731: l_eve_mkt_msg := l_eve_mkt_msg ||', '||l_tmp_str ;
3732: END LOOP;
3733: CLOSE C_theme ;
3734:
3735: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3736: itemkey => itemkey,
3737: aname => 'AMS_ACT_NAME',
3738: avalue => l_activity_name );
3739: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3735: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3736: itemkey => itemkey,
3737: aname => 'AMS_ACT_NAME',
3738: avalue => l_activity_name );
3739: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3740: itemkey => itemkey ,
3741: aname => 'AMS_ACT_START_DATE',
3742: avalue => l_start_dt );
3743: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3739: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3740: itemkey => itemkey ,
3741: aname => 'AMS_ACT_START_DATE',
3742: avalue => l_start_dt );
3743: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3744: itemkey => itemkey ,
3745: aname => 'AMS_ACT_END_DATE',
3746: avalue => l_end_dt );
3747: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3743: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3744: itemkey => itemkey ,
3745: aname => 'AMS_ACT_END_DATE',
3746: avalue => l_end_dt );
3747: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3748: itemkey => itemkey ,
3749: aname => 'AMS_EVE_MKT_MESSAGE',
3750: avalue => l_eve_mkt_msg );
3751: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3747: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3748: itemkey => itemkey ,
3749: aname => 'AMS_EVE_MKT_MESSAGE',
3750: avalue => l_eve_mkt_msg );
3751: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3752: itemkey => itemkey,
3753: aname => 'AMS_BUDGET_AMOUNT',
3754: avalue => l_budget_amount );
3755: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3751: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3752: itemkey => itemkey,
3753: aname => 'AMS_BUDGET_AMOUNT',
3754: avalue => l_budget_amount );
3755: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3756: itemkey => itemkey ,
3757: aname => 'AMS_ACT_DESC',
3758: avalue => l_desc );
3759: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3755: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3756: itemkey => itemkey ,
3757: aname => 'AMS_ACT_DESC',
3758: avalue => l_desc );
3759: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3760: itemkey => itemkey,
3761: aname => 'AMS_CURRENCY',
3762: avalue => l_currency );
3763: ELSIF l_approval_for = 'EVEO' THEN
3780: l_eve_mkt_msg := l_eve_mkt_msg ||', '||l_tmp_str ;
3781: END LOOP;
3782: CLOSE C_theme ;
3783:
3784: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3785: itemkey => itemkey,
3786: aname => 'AMS_ACT_NAME',
3787: avalue => l_activity_name );
3788: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3784: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3785: itemkey => itemkey,
3786: aname => 'AMS_ACT_NAME',
3787: avalue => l_activity_name );
3788: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3789: itemkey => itemkey ,
3790: aname => 'AMS_ACT_START_DATE',
3791: avalue => l_start_dt );
3792: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3788: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3789: itemkey => itemkey ,
3790: aname => 'AMS_ACT_START_DATE',
3791: avalue => l_start_dt );
3792: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3793: itemkey => itemkey ,
3794: aname => 'AMS_ACT_END_DATE',
3795: avalue => l_end_dt );
3796: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3792: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3793: itemkey => itemkey ,
3794: aname => 'AMS_ACT_END_DATE',
3795: avalue => l_end_dt );
3796: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3797: itemkey => itemkey ,
3798: aname => 'AMS_EVE_MKT_MESSAGE',
3799: avalue => l_eve_mkt_msg );
3800: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3796: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3797: itemkey => itemkey ,
3798: aname => 'AMS_EVE_MKT_MESSAGE',
3799: avalue => l_eve_mkt_msg );
3800: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3801: itemkey => itemkey,
3802: aname => 'AMS_BUDGET_AMOUNT',
3803: avalue => l_budget_amount );
3804: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3800: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3801: itemkey => itemkey,
3802: aname => 'AMS_BUDGET_AMOUNT',
3803: avalue => l_budget_amount );
3804: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3805: itemkey => itemkey ,
3806: aname => 'AMS_ACT_DESC',
3807: avalue => l_desc );
3808: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3804: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
3805: itemkey => itemkey ,
3806: aname => 'AMS_ACT_DESC',
3807: avalue => l_desc );
3808: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3809: itemkey => itemkey,
3810: aname => 'AMS_CURRENCY',
3811: avalue => l_currency );
3812:
3813:
3814: END IF;
3815:
3816:
3817: wf_engine.SetItemAttrText( itemtype => itemtype,
3818: itemkey => itemkey,
3819: aname => 'AMS_NOTIF_DOCUMENT',
3820: avalue =>
3821: 'PLSQL:AMS_WFCMPAPR_PVT.Create_Notif_Document/'||
3821: 'PLSQL:AMS_WFCMPAPR_PVT.Create_Notif_Document/'||
3822: ItemType||':'||
3823: ItemKey);
3824:
3825: l_doc_type := wf_engine.GetItemAttrText(
3826: itemtype => ItemType,
3827: itemkey => ItemKey,
3828: aname => 'AMS_APPR_DOC_TYPE');
3829:
3827: itemkey => ItemKey,
3828: aname => 'AMS_APPR_DOC_TYPE');
3829:
3830:
3831: l_obj_type := wf_engine.GetItemAttrText(
3832: itemtype => ItemType,
3833: itemkey => ItemKey,
3834: aname => 'AMS_APPROVAL_FOR_OBJECT');
3835:
3832: itemtype => ItemType,
3833: itemkey => ItemKey,
3834: aname => 'AMS_APPROVAL_FOR_OBJECT');
3835:
3836: l_obj_id := wf_engine.GetItemAttrText(
3837: itemtype => ItemType,
3838: itemkey => ItemKey,
3839: aname => 'AMS_ACT_ID');
3840: l_obj_version_number := wf_engine.GetItemAttrText(
3836: l_obj_id := wf_engine.GetItemAttrText(
3837: itemtype => ItemType,
3838: itemkey => ItemKey,
3839: aname => 'AMS_ACT_ID');
3840: l_obj_version_number := wf_engine.GetItemAttrText(
3841: itemtype => ItemType,
3842: itemkey => ItemKey,
3843: aname => 'AMS_OBJECT_VERSION_NUMBER');
3844: l_requester_id := wf_engine.GetItemAttrText(
3840: l_obj_version_number := wf_engine.GetItemAttrText(
3841: itemtype => ItemType,
3842: itemkey => ItemKey,
3843: aname => 'AMS_OBJECT_VERSION_NUMBER');
3844: l_requester_id := wf_engine.GetItemAttrText(
3845: itemtype => ItemType,
3846: itemkey => ItemKey,
3847: aname => 'AMS_REQUESTER_ID');
3848:
3958: -- dbms_output.put_line('Process Owner_appr_check');
3959: -- RUN mode - Normal Process Execution
3960: IF (funcmode = 'RUN')
3961: THEN
3962: l_ta_appr_flag := WF_ENGINE.GetItemAttrText(
3963: itemtype => itemtype,
3964: itemkey => itemkey ,
3965: aname => 'AMS_TAOWNER_APPR_FLAG');
3966: l_owner := WF_ENGINE.GetItemAttrText(
3962: l_ta_appr_flag := WF_ENGINE.GetItemAttrText(
3963: itemtype => itemtype,
3964: itemkey => itemkey ,
3965: aname => 'AMS_TAOWNER_APPR_FLAG');
3966: l_owner := WF_ENGINE.GetItemAttrText(
3967: itemtype => itemtype,
3968: itemkey => itemkey ,
3969: aname => 'AMS_OWNER');
3970: l_bud_appr_flag := WF_ENGINE.GetItemAttrText(
3966: l_owner := WF_ENGINE.GetItemAttrText(
3967: itemtype => itemtype,
3968: itemkey => itemkey ,
3969: aname => 'AMS_OWNER');
3970: l_bud_appr_flag := WF_ENGINE.GetItemAttrText(
3971: itemtype => itemtype,
3972: itemkey => itemkey ,
3973: aname => 'AMS_BUDGET_APPR_FLAG');
3974:
3971: itemtype => itemtype,
3972: itemkey => itemkey ,
3973: aname => 'AMS_BUDGET_APPR_FLAG');
3974:
3975: l_fund_manager := WF_ENGINE.GetItemAttrText(
3976: itemtype => itemtype,
3977: itemkey => itemkey ,
3978: aname => 'AMS_BUD_MANAGER');
3979:
3976: itemtype => itemtype,
3977: itemkey => itemkey ,
3978: aname => 'AMS_BUD_MANAGER');
3979:
3980: l_manager := WF_ENGINE.GetItemAttrText(
3981: itemtype => itemtype,
3982: itemkey => itemkey ,
3983: aname => 'AMS_MANAGER');
3984:
3981: itemtype => itemtype,
3982: itemkey => itemkey ,
3983: aname => 'AMS_MANAGER');
3984:
3985: l_appr_type := WF_ENGINE.GetItemAttrText(
3986: itemtype => itemtype,
3987: itemkey => itemkey ,
3988: aname => 'AMS_APPR_TYPE_LOOKUP');
3989:
3988: aname => 'AMS_APPR_TYPE_LOOKUP');
3989:
3990: IF l_ta_appr_flag = 'Y' THEN
3991: IF l_appr_type = 'THEME' THEN
3992: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3993: itemkey => itemkey,
3994: aname => 'AMS_APPR_USERNAME',
3995: avalue => l_owner);
3996: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3992: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3993: itemkey => itemkey,
3994: aname => 'AMS_APPR_USERNAME',
3995: avalue => l_owner);
3996: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3997: itemkey => itemkey,
3998: aname => 'AMS_TAOWNER_APPR_FLAG',
3999: avalue => 'N');
4000: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3996: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
3997: itemkey => itemkey,
3998: aname => 'AMS_TAOWNER_APPR_FLAG',
3999: avalue => 'N');
4000: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4001: itemkey => itemkey,
4002: aname => 'AMS_APPR_DOC_TYPE',
4003: avalue => 'THEME');
4004:
4003: avalue => 'THEME');
4004:
4005: ELSE -- l_appr_type = 'BOTH' THEN
4006: IF l_fund_manager = l_manager THEN
4007: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4008: itemkey => itemkey,
4009: aname => 'AMS_APPR_USERNAME',
4010: avalue => l_owner);
4011: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4007: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4008: itemkey => itemkey,
4009: aname => 'AMS_APPR_USERNAME',
4010: avalue => l_owner);
4011: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4012: itemkey => itemkey,
4013: aname => 'AMS_TAOWNER_APPR_FLAG',
4014: avalue => 'N');
4015: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4011: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4012: itemkey => itemkey,
4013: aname => 'AMS_TAOWNER_APPR_FLAG',
4014: avalue => 'N');
4015: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4016: itemkey => itemkey,
4017: aname => 'AMS_APPR_DOC_TYPE',
4018: avalue => 'THEME');
4019: ELSIF l_owner = l_fund_manager THEN
4016: itemkey => itemkey,
4017: aname => 'AMS_APPR_DOC_TYPE',
4018: avalue => 'THEME');
4019: ELSIF l_owner = l_fund_manager THEN
4020: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4021: itemkey => itemkey,
4022: aname => 'AMS_APPR_USERNAME',
4023: avalue => l_owner);
4024:
4021: itemkey => itemkey,
4022: aname => 'AMS_APPR_USERNAME',
4023: avalue => l_owner);
4024:
4025: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4026: itemkey => itemkey,
4027: aname => 'AMS_TAOWNER_APPR_FLAG',
4028: avalue => 'N');
4029: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4025: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4026: itemkey => itemkey,
4027: aname => 'AMS_TAOWNER_APPR_FLAG',
4028: avalue => 'N');
4029: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4030: itemkey => itemkey,
4031: aname => 'AMS_APPR_DOC_TYPE',
4032: avalue => 'BOTH');
4033: ELSE
4030: itemkey => itemkey,
4031: aname => 'AMS_APPR_DOC_TYPE',
4032: avalue => 'BOTH');
4033: ELSE
4034: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4035: itemkey => itemkey,
4036: aname => 'AMS_APPR_USERNAME',
4037: avalue => l_owner);
4038:
4035: itemkey => itemkey,
4036: aname => 'AMS_APPR_USERNAME',
4037: avalue => l_owner);
4038:
4039: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4040: itemkey => itemkey,
4041: aname => 'AMS_BUDGET_APPR_FLAG',
4042: avalue => 'Y');
4043: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4039: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4040: itemkey => itemkey,
4041: aname => 'AMS_BUDGET_APPR_FLAG',
4042: avalue => 'Y');
4043: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4044: itemkey => itemkey,
4045: aname => 'AMS_TAOWNER_APPR_FLAG',
4046: avalue => 'N');
4047: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4043: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4044: itemkey => itemkey,
4045: aname => 'AMS_TAOWNER_APPR_FLAG',
4046: avalue => 'N');
4047: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4048: itemkey => itemkey,
4049: aname => 'AMS_APPR_DOC_TYPE',
4050: avalue => 'THEME');
4051: END IF ;
4052: END IF;
4053: result := 'COMPLETE:Y' ;
4054: ELSE -- IF l_ba_appr_flag = 'N' THEN
4055: IF l_bud_appr_flag = 'Y' THEN
4056: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4057: itemkey => itemkey,
4058: aname => 'AMS_APPR_USERNAME',
4059: avalue => l_fund_manager);
4060: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4056: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4057: itemkey => itemkey,
4058: aname => 'AMS_APPR_USERNAME',
4059: avalue => l_fund_manager);
4060: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4061: itemkey => itemkey,
4062: aname => 'AMS_APPR_DOC_TYPE',
4063: avalue => 'BUDGET');
4064: END IF;
4152: -- dbms_output.put_line('Process Updt_Stat_apprTA');
4153: -- RUN mode - Normal Process Execution
4154: IF (funcmode = 'RUN')
4155: THEN
4156: l_bud_appr_flg := wf_engine.GetItemAttrText(
4157: itemtype => ItemType,
4158: itemkey => ItemKey,
4159: aname => 'AMS_BUDGET_APPR_FLAG');
4160:
4157: itemtype => ItemType,
4158: itemkey => ItemKey,
4159: aname => 'AMS_BUDGET_APPR_FLAG');
4160:
4161: l_obj_type := wf_engine.GetItemAttrText(
4162: itemtype => ItemType,
4163: itemkey => ItemKey,
4164: aname => 'AMS_APPROVAL_FOR_OBJECT');
4165:
4162: itemtype => ItemType,
4163: itemkey => ItemKey,
4164: aname => 'AMS_APPROVAL_FOR_OBJECT');
4165:
4166: l_obj_id := wf_engine.GetItemAttrText(
4167: itemtype => ItemType,
4168: itemkey => ItemKey,
4169: aname => 'AMS_ACT_ID');
4170: l_obj_version_number := wf_engine.GetItemAttrText(
4166: l_obj_id := wf_engine.GetItemAttrText(
4167: itemtype => ItemType,
4168: itemkey => ItemKey,
4169: aname => 'AMS_ACT_ID');
4170: l_obj_version_number := wf_engine.GetItemAttrText(
4171: itemtype => ItemType,
4172: itemkey => ItemKey,
4173: aname => 'AMS_OBJECT_VERSION_NUMBER');
4174: l_next_stat_id := wf_engine.GetItemAttrText(
4170: l_obj_version_number := wf_engine.GetItemAttrText(
4171: itemtype => ItemType,
4172: itemkey => ItemKey,
4173: aname => 'AMS_OBJECT_VERSION_NUMBER');
4174: l_next_stat_id := wf_engine.GetItemAttrText(
4175: itemtype => ItemType,
4176: itemkey => ItemKey,
4177: aname => 'AMS_NEW_STAT_ID');
4178: l_requester_id := wf_engine.GetItemAttrText(
4174: l_next_stat_id := wf_engine.GetItemAttrText(
4175: itemtype => ItemType,
4176: itemkey => ItemKey,
4177: aname => 'AMS_NEW_STAT_ID');
4178: l_requester_id := wf_engine.GetItemAttrText(
4179: itemtype => ItemType,
4180: itemkey => ItemKey,
4181: aname => 'AMS_REQUESTER_ID');
4182: l_doc_type := wf_engine.GetItemAttrText(
4178: l_requester_id := wf_engine.GetItemAttrText(
4179: itemtype => ItemType,
4180: itemkey => ItemKey,
4181: aname => 'AMS_REQUESTER_ID');
4182: l_doc_type := wf_engine.GetItemAttrText(
4183: itemtype => ItemType,
4184: itemkey => ItemKey,
4185: aname => 'AMS_APPR_DOC_TYPE');
4186:
4183: itemtype => ItemType,
4184: itemkey => ItemKey,
4185: aname => 'AMS_APPR_DOC_TYPE');
4186:
4187: l_appr_type_lookup := wf_engine.GetItemAttrText(
4188: itemtype => ItemType,
4189: itemkey => ItemKey,
4190: aname => 'AMS_APPR_TYPE_LOOKUP');
4191:
4188: itemtype => ItemType,
4189: itemkey => ItemKey,
4190: aname => 'AMS_APPR_TYPE_LOOKUP');
4191:
4192: l_approver := wf_engine.GetItemAttrText(
4193: itemtype => ItemType,
4194: itemkey => ItemKey,
4195: aname => 'AMS_APPR_USERNAME');
4196:
4193: itemtype => ItemType,
4194: itemkey => ItemKey,
4195: aname => 'AMS_APPR_USERNAME');
4196:
4197: l_note := wf_engine.GetItemAttrText(
4198: itemtype => ItemType,
4199: itemkey => ItemKey,
4200: aname => 'AMS_NOTE');
4201:
4393: -- dbms_output.put_line('Process Update Status_rej');
4394: -- RUN mode - Normal Process Execution
4395: IF (funcmode = 'RUN')
4396: THEN
4397: l_doc_type := wf_engine.GetItemAttrText(
4398: itemtype => ItemType,
4399: itemkey => ItemKey,
4400: aname => 'AMS_APPR_DOC_TYPE');
4401:
4398: itemtype => ItemType,
4399: itemkey => ItemKey,
4400: aname => 'AMS_APPR_DOC_TYPE');
4401:
4402: l_obj_type := wf_engine.GetItemAttrText(
4403: itemtype => ItemType,
4404: itemkey => ItemKey,
4405: aname => 'AMS_APPROVAL_FOR_OBJECT');
4406:
4403: itemtype => ItemType,
4404: itemkey => ItemKey,
4405: aname => 'AMS_APPROVAL_FOR_OBJECT');
4406:
4407: l_obj_id := wf_engine.GetItemAttrText(
4408: itemtype => ItemType,
4409: itemkey => ItemKey,
4410: aname => 'AMS_ACT_ID');
4411: l_obj_version_number := wf_engine.GetItemAttrText(
4407: l_obj_id := wf_engine.GetItemAttrText(
4408: itemtype => ItemType,
4409: itemkey => ItemKey,
4410: aname => 'AMS_ACT_ID');
4411: l_obj_version_number := wf_engine.GetItemAttrText(
4412: itemtype => ItemType,
4413: itemkey => ItemKey,
4414: aname => 'AMS_OBJECT_VERSION_NUMBER');
4415: l_requester_id := wf_engine.GetItemAttrText(
4411: l_obj_version_number := wf_engine.GetItemAttrText(
4412: itemtype => ItemType,
4413: itemkey => ItemKey,
4414: aname => 'AMS_OBJECT_VERSION_NUMBER');
4415: l_requester_id := wf_engine.GetItemAttrText(
4416: itemtype => ItemType,
4417: itemkey => ItemKey,
4418: aname => 'AMS_REQUESTER_ID');
4419:
4416: itemtype => ItemType,
4417: itemkey => ItemKey,
4418: aname => 'AMS_REQUESTER_ID');
4419:
4420: l_approver := wf_engine.GetItemAttrText(
4421: itemtype => ItemType,
4422: itemkey => ItemKey,
4423: aname => 'AMS_APPR_USERNAME');
4424:
4421: itemtype => ItemType,
4422: itemkey => ItemKey,
4423: aname => 'AMS_APPR_USERNAME');
4424:
4425: l_note := wf_engine.GetItemAttrText(
4426: itemtype => ItemType,
4427: itemkey => ItemKey,
4428: aname => 'AMS_NOTE');
4429:
4573: -- RUN mode - Normal Process Execution
4574: IF (funcmode = 'RUN')
4575: THEN
4576:
4577: l_obj_type := wf_engine.GetItemAttrText(
4578: itemtype => ItemType,
4579: itemkey => ItemKey,
4580: aname => 'AMS_APPROVAL_FOR_OBJECT');
4581:
4578: itemtype => ItemType,
4579: itemkey => ItemKey,
4580: aname => 'AMS_APPROVAL_FOR_OBJECT');
4581:
4582: l_obj_id := wf_engine.GetItemAttrText(
4583: itemtype => ItemType,
4584: itemkey => ItemKey,
4585: aname => 'AMS_ACT_ID');
4586: l_obj_version_number := wf_engine.GetItemAttrText(
4582: l_obj_id := wf_engine.GetItemAttrText(
4583: itemtype => ItemType,
4584: itemkey => ItemKey,
4585: aname => 'AMS_ACT_ID');
4586: l_obj_version_number := wf_engine.GetItemAttrText(
4587: itemtype => ItemType,
4588: itemkey => ItemKey,
4589: aname => 'AMS_OBJECT_VERSION_NUMBER');
4590:
4587: itemtype => ItemType,
4588: itemkey => ItemKey,
4589: aname => 'AMS_OBJECT_VERSION_NUMBER');
4590:
4591: l_orig_stat_id := wf_engine.GetItemAttrText(
4592: itemtype => ItemType,
4593: itemkey => ItemKey,
4594: aname => 'AMS_ORIG_STAT_ID');
4595: l_requester_id := wf_engine.GetItemAttrText(
4591: l_orig_stat_id := wf_engine.GetItemAttrText(
4592: itemtype => ItemType,
4593: itemkey => ItemKey,
4594: aname => 'AMS_ORIG_STAT_ID');
4595: l_requester_id := wf_engine.GetItemAttrText(
4596: itemtype => ItemType,
4597: itemkey => ItemKey,
4598: aname => 'AMS_REQUESTER_ID');
4599: l_doc_type := wf_engine.GetItemAttrText(
4595: l_requester_id := wf_engine.GetItemAttrText(
4596: itemtype => ItemType,
4597: itemkey => ItemKey,
4598: aname => 'AMS_REQUESTER_ID');
4599: l_doc_type := wf_engine.GetItemAttrText(
4600: itemtype => ItemType,
4601: itemkey => ItemKey,
4602: aname => 'AMS_APPR_DOC_TYPE');
4603:
4600: itemtype => ItemType,
4601: itemkey => ItemKey,
4602: aname => 'AMS_APPR_DOC_TYPE');
4603:
4604: l_approver := wf_engine.GetItemAttrText(
4605: itemtype => ItemType,
4606: itemkey => ItemKey,
4607: aname => 'AMS_APPR_USERNAME');
4608:
4605: itemtype => ItemType,
4606: itemkey => ItemKey,
4607: aname => 'AMS_APPR_USERNAME');
4608:
4609: l_note := wf_engine.GetItemAttrText(
4610: itemtype => ItemType,
4611: itemkey => ItemKey,
4612: aname => 'AMS_NOTE');
4613:
4730: -- dbms_output.put_line('Process Fund Appr Req_Check');
4731: -- RUN mode - Normal Process Execution
4732: IF (funcmode = 'RUN')
4733: THEN
4734: l_budget_appr_flag := WF_ENGINE.GetItemAttrText(
4735: itemtype => itemtype,
4736: itemkey => itemkey ,
4737: aname => 'AMS_BUDGET_APPR_FLAG');
4738: IF l_budget_appr_flag = 'Y' THEN
4812: -- dbms_output.put_line('Process BA_OWNER_APPR_CHECK');
4813: -- RUN mode - Normal Process Execution
4814: IF (funcmode = 'RUN')
4815: THEN
4816: l_ba_appr_flag := WF_ENGINE.GetItemAttrText(
4817: itemtype => itemtype,
4818: itemkey => itemkey ,
4819: aname => 'AMS_TAOWNER_APPR_FLAG');
4820: l_owner := WF_ENGINE.GetItemAttrText(
4816: l_ba_appr_flag := WF_ENGINE.GetItemAttrText(
4817: itemtype => itemtype,
4818: itemkey => itemkey ,
4819: aname => 'AMS_TAOWNER_APPR_FLAG');
4820: l_owner := WF_ENGINE.GetItemAttrText(
4821: itemtype => itemtype,
4822: itemkey => itemkey ,
4823: aname => 'AMS_OWNER');
4824:
4823: aname => 'AMS_OWNER');
4824:
4825: IF l_ba_appr_flag = 'Y' THEN
4826:
4827: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4828: itemkey => itemkey,
4829: aname => 'AMS_APPR_USERNAME',
4830: avalue => l_owner);
4831:
4828: itemkey => itemkey,
4829: aname => 'AMS_APPR_USERNAME',
4830: avalue => l_owner);
4831:
4832: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4833: itemkey => itemkey,
4834: aname => 'AMS_BUDGET_APPR_FLAG',
4835: avalue => 'N');
4836: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4832: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4833: itemkey => itemkey,
4834: aname => 'AMS_BUDGET_APPR_FLAG',
4835: avalue => 'N');
4836: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4837: itemkey => itemkey,
4838: aname => 'AMS_TAOWNER_APPR_FLAG',
4839: avalue => 'N');
4840: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4836: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4837: itemkey => itemkey,
4838: aname => 'AMS_TAOWNER_APPR_FLAG',
4839: avalue => 'N');
4840: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4841: itemkey => itemkey,
4842: aname => 'AMS_BAOWNER_APPR_FLAG',
4843: avalue => 'N');
4844: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4840: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4841: itemkey => itemkey,
4842: aname => 'AMS_BAOWNER_APPR_FLAG',
4843: avalue => 'N');
4844: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4845: itemkey => itemkey,
4846: aname => 'AMS_THEME_APPR_FLAG',
4847: avalue => 'Y');
4848: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4844: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4845: itemkey => itemkey,
4846: aname => 'AMS_THEME_APPR_FLAG',
4847: avalue => 'Y');
4848: WF_ENGINE.SetItemAttrText(itemtype => itemtype ,
4849: itemkey => itemkey,
4850: aname => 'AMS_APPR_DOC_TYPE',
4851: avalue => 'BUDGET');
4852:
4941: -- RUN mode - Normal Process Execution
4942: IF (funcmode = 'RUN')
4943: THEN
4944:
4945: l_obj_type := wf_engine.GetItemAttrText(
4946: itemtype => ItemType,
4947: itemkey => ItemKey,
4948: aname => 'AMS_APPROVAL_FOR_OBJECT');
4949:
4946: itemtype => ItemType,
4947: itemkey => ItemKey,
4948: aname => 'AMS_APPROVAL_FOR_OBJECT');
4949:
4950: l_obj_id := wf_engine.GetItemAttrText(
4951: itemtype => ItemType,
4952: itemkey => ItemKey,
4953: aname => 'AMS_ACT_ID');
4954: l_obj_version_number := wf_engine.GetItemAttrText(
4950: l_obj_id := wf_engine.GetItemAttrText(
4951: itemtype => ItemType,
4952: itemkey => ItemKey,
4953: aname => 'AMS_ACT_ID');
4954: l_obj_version_number := wf_engine.GetItemAttrText(
4955: itemtype => ItemType,
4956: itemkey => ItemKey,
4957: aname => 'AMS_OBJECT_VERSION_NUMBER');
4958: l_next_stat_id := wf_engine.GetItemAttrText(
4954: l_obj_version_number := wf_engine.GetItemAttrText(
4955: itemtype => ItemType,
4956: itemkey => ItemKey,
4957: aname => 'AMS_OBJECT_VERSION_NUMBER');
4958: l_next_stat_id := wf_engine.GetItemAttrText(
4959: itemtype => ItemType,
4960: itemkey => ItemKey,
4961: aname => 'AMS_NEW_STAT_ID');
4962: l_requester_id := wf_engine.GetItemAttrText(
4958: l_next_stat_id := wf_engine.GetItemAttrText(
4959: itemtype => ItemType,
4960: itemkey => ItemKey,
4961: aname => 'AMS_NEW_STAT_ID');
4962: l_requester_id := wf_engine.GetItemAttrText(
4963: itemtype => ItemType,
4964: itemkey => ItemKey,
4965: aname => 'AMS_REQUESTER_ID');
4966: l_doc_type := wf_engine.GetItemAttrText(
4962: l_requester_id := wf_engine.GetItemAttrText(
4963: itemtype => ItemType,
4964: itemkey => ItemKey,
4965: aname => 'AMS_REQUESTER_ID');
4966: l_doc_type := wf_engine.GetItemAttrText(
4967: itemtype => ItemType,
4968: itemkey => ItemKey,
4969: aname => 'AMS_APPR_DOC_TYPE');
4970:
4972: FETCH c_sys_stat INTO l_sys_stat_code ;
4973: CLOSE c_sys_stat ;
4974:
4975:
4976: l_approver := wf_engine.GetItemAttrText(
4977: itemtype => ItemType,
4978: itemkey => ItemKey,
4979: aname => 'AMS_APPR_USERNAME');
4980:
4977: itemtype => ItemType,
4978: itemkey => ItemKey,
4979: aname => 'AMS_APPR_USERNAME');
4980:
4981: l_note := wf_engine.GetItemAttrText(
4982: itemtype => ItemType,
4983: itemkey => ItemKey,
4984: aname => 'AMS_NOTE');
4985:
5107: AMS_Utility_PVT.debug_message('Process Abort Process');
5108: END IF;
5109: -- dbms_output.put_line('Process Abort Process');
5110:
5111: WF_ENGINE.AbortProcess (itemtype => itemtype,
5112: itemkey => itemkey ,
5113: process => p_workflowprocess);
5114:
5115: -- dbms_output.put_line('After Aborting Process ');