DBA Data[Home] [Help]

APPS.AMS_ACTMETRICS_ENGINE_PVT dependencies on FND_API

Line 353: l_msg := fnd_msg_pub.get(p_encoded => FND_API.G_FALSE);

349: l_msg varchar2(4000);
350: BEGIN
351: -- fnd_msg_pub.reset;
352: LOOP
353: l_msg := fnd_msg_pub.get(p_encoded => FND_API.G_FALSE);
354: EXIT WHEN l_msg IS NULL;
355: write_msg(p_procedure, 'ERROR: '||l_msg);
356: END LOOP;
357: --fnd_msg_pub.initialize;

Line 361: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,

357: --fnd_msg_pub.initialize;
358: END;
359:
360: PROCEDURE Check_Create_Rollup_Parents (
361: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
362: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
363: x_return_status OUT NOCOPY VARCHAR2,
364: p_object_list IN object_currency_table := Empty_object_currency_table
365: );

Line 362: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,

358: END;
359:
360: PROCEDURE Check_Create_Rollup_Parents (
361: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
362: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
363: x_return_status OUT NOCOPY VARCHAR2,
364: p_object_list IN object_currency_table := Empty_object_currency_table
365: );
366:

Line 368: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

364: p_object_list IN object_currency_table := Empty_object_currency_table
365: );
366:
367: PROCEDURE Check_Cr_Roll_Par_Helper (
368: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
369: p_metric_parent_id IN NUMBER,
370: p_act_metric_id IN NUMBER,
371: p_obj_id IN NUMBER,
372: p_obj_type IN VARCHAR2,

Line 380: p_commit IN VARCHAR2 := FND_API.G_FALSE

376: x_creates IN OUT NOCOPY NUMBER,
377:
378: x_act_metric_id OUT NOCOPY NUMBER, -- Id of the activity metric created
379: x_return_status OUT NOCOPY VARCHAR2,
380: p_commit IN VARCHAR2 := FND_API.G_FALSE
381: );
382:
383:
384: --FUNCTION Exec_Function (

Line 432: p_commit IN VARCHAR2 := Fnd_Api.G_TRUE,

428:
429: PROCEDURE Run_Functions
430: (x_errbuf OUT NOCOPY VARCHAR2,
431: x_retcode OUT NOCOPY NUMBER,
432: p_commit IN VARCHAR2 := Fnd_Api.G_TRUE,
433: p_object_list IN object_currency_table := Empty_object_currency_table,
434: p_current_date IN date,
435: p_func_currency IN varchar2
436: );

Line 441: p_commit IN VARCHAR2 := Fnd_Api.G_TRUE,

437:
438: PROCEDURE UPDATE_VARIABLE
439: (x_errbuf OUT NOCOPY VARCHAR2,
440: x_retcode OUT NOCOPY NUMBER,
441: p_commit IN VARCHAR2 := Fnd_Api.G_TRUE,
442: p_object_list IN object_currency_table := Empty_object_currency_table,
443: p_current_date IN date,
444: p_func_currency IN varchar2
445: );

Line 450: p_commit IN VARCHAR2 := Fnd_Api.G_TRUE,

446:
447: PROCEDURE Update_formulas(
448: x_errbuf OUT NOCOPY VARCHAR2,
449: x_retcode OUT NOCOPY NUMBER,
450: p_commit IN VARCHAR2 := Fnd_Api.G_TRUE,
451: p_object_list IN object_currency_table := Empty_object_currency_table,
452: p_current_date IN date,
453: p_func_currency IN varchar2
454: );

Line 1191: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

1187: x_dirty_actmets(l_id).default_uom_code,
1188: p_from_quantity => l_func_actual_value);
1189: IF l_final_actual_value < 0 THEN
1190: l_final_actual_value := 0;
1191: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1192: END IF;
1193: ELSE
1194: l_final_actual_value := l_func_actual_value;
1195: END IF;

Line 1252: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

1248: IF x_dirty_actmets.EXISTS(l_child_id) THEN
1249: -- Child nodes ought never be dirty.
1250: IF x_dirty_actmets(l_child_id).dirty_flag = G_IS_DIRTY
1251: THEN
1252: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1253: END IF;
1254:
1255: l_func_actual_value := x_dirty_actmets(l_child_id).
1256: func_actual_value;

Line 1349: l_is_canceled := Fnd_Api.G_FALSE;

1345: l_EVEO_status_table.exists(l_act_metric_used_by_id) then
1346: l_is_canceled := l_EVEO_status_table(l_act_metric_used_by_id);
1347: else
1348: **/
1349: l_is_canceled := Fnd_Api.G_FALSE;
1350: -- Changed to use local definition.
1351: --Ams_Refreshmetric_Pvt.CHECK_OBJECT_STATUS(
1352: Check_Object_Status(
1353: p_arc_act_metric_used_by => l_arc_act_metric_used_by,

Line 1372: l_is_canceled = Fnd_Api.G_FALSE OR

1368: **/
1369: END IF;
1370:
1371: IF p_calc_type = G_SUMMARY OR
1372: l_is_canceled = Fnd_Api.G_FALSE OR
1373: l_func_actual_value <> 0
1374: THEN
1375: -- Validate that the currencies are the same.
1376: -- BUG3484528: Drive by display type.

Line 1391: p_round => Fnd_Api.G_FALSE

1387: p_from_amount => l_func_actual_value,
1388: x_to_amount => l_func_actual_value,
1389: p_from_amount2 => l_func_forecast_value,
1390: x_to_amount2 => l_func_forecast_value,
1391: p_round => Fnd_Api.G_FALSE
1392: );
1393: END IF;
1394: l_child_count := l_child_count + 1;
1395: l_final_actual_value := l_final_actual_value +

Line 1434: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

1430: p_to_uom_code => l_metric_uom_code,
1431: p_from_quantity => l_final_forecast_value);
1432: IF l_conv_uom_actual_value < 0 OR
1433: l_conv_uom_forecast_value < 0 THEN
1434: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1435: END IF;
1436: ELSE
1437: l_conv_uom_actual_value := l_final_actual_value;
1438: l_conv_uom_forecast_value := l_final_forecast_value;

Line 1592: p_round => Fnd_Api.G_TRUE);

1588: p_from_amount => x_dirty_actmet(l_id).func_actual_value,
1589: x_to_amount => x_dirty_actmet(l_id).trans_actual_value,
1590: p_from_amount2 => x_dirty_actmet(l_id).func_forecast_value,
1591: x_to_amount2 => x_dirty_actmet(l_id).trans_forecast_value,
1592: p_round => Fnd_Api.G_TRUE);
1593: ELSE
1594: -- Otherwise transfer resulting values to the transaction values.
1595: x_dirty_actmet(l_id).trans_actual_value :=
1596: x_dirty_actmet(l_id).func_actual_value;

Line 1710: IF p_commit = fnd_api.G_TRUE THEN

1706: where c1.metric_id=f1.source_id) and f.source_type = G_METRIC)
1707: or (c.metric_category = f.source_id and f.source_type = G_CATEGORY))
1708: and b.activity_metric_id = l_act_met_id (l_count));
1709:
1710: IF p_commit = fnd_api.G_TRUE THEN
1711: COMMIT;
1712: IF AMS_DEBUG_MEDIUM_ON THEN
1713: write_msg(L_API_NAME, 'BATCH UPDATE COMMIT: COUNT='||
1714: l_act_met_id.COUNT||', Dirty index='||l_index);

Line 1759: p_commit IN VARCHAR2 := Fnd_Api.G_TRUE,

1755: --
1756: PROCEDURE Refresh_Act_Metrics_Engine
1757: (x_errbuf OUT NOCOPY VARCHAR2,
1758: x_retcode OUT NOCOPY NUMBER,
1759: p_commit IN VARCHAR2 := Fnd_Api.G_TRUE,
1760: p_run_functions IN VARCHAR2 := Fnd_Api.G_TRUE,
1761: p_update_history IN VARCHAR2 := Fnd_Api.G_FALSE
1762: )
1763: IS

Line 1760: p_run_functions IN VARCHAR2 := Fnd_Api.G_TRUE,

1756: PROCEDURE Refresh_Act_Metrics_Engine
1757: (x_errbuf OUT NOCOPY VARCHAR2,
1758: x_retcode OUT NOCOPY NUMBER,
1759: p_commit IN VARCHAR2 := Fnd_Api.G_TRUE,
1760: p_run_functions IN VARCHAR2 := Fnd_Api.G_TRUE,
1761: p_update_history IN VARCHAR2 := Fnd_Api.G_FALSE
1762: )
1763: IS
1764: L_API_VERSION CONSTANT NUMBER := 1.0;

Line 1761: p_update_history IN VARCHAR2 := Fnd_Api.G_FALSE

1757: (x_errbuf OUT NOCOPY VARCHAR2,
1758: x_retcode OUT NOCOPY NUMBER,
1759: p_commit IN VARCHAR2 := Fnd_Api.G_TRUE,
1760: p_run_functions IN VARCHAR2 := Fnd_Api.G_TRUE,
1761: p_update_history IN VARCHAR2 := Fnd_Api.G_FALSE
1762: )
1763: IS
1764: L_API_VERSION CONSTANT NUMBER := 1.0;
1765: L_API_NAME VARCHAR2(30) := 'Refresh_Act_Metrics_Engine';

Line 1804: p_init_msg_list => Fnd_Api.G_TRUE,

1800:
1801: Clear_Cache;
1802:
1803: Check_Create_Rollup_Parents (
1804: p_init_msg_list => Fnd_Api.G_TRUE,
1805: p_commit => FND_API.G_FALSE,
1806: x_return_status => l_return_status
1807: );
1808:

Line 1805: p_commit => FND_API.G_FALSE,

1801: Clear_Cache;
1802:
1803: Check_Create_Rollup_Parents (
1804: p_init_msg_list => Fnd_Api.G_TRUE,
1805: p_commit => FND_API.G_FALSE,
1806: x_return_status => l_return_status
1807: );
1808:
1809: IF p_run_functions = Fnd_Api.G_TRUE THEN

Line 1809: IF p_run_functions = Fnd_Api.G_TRUE THEN

1805: p_commit => FND_API.G_FALSE,
1806: x_return_status => l_return_status
1807: );
1808:
1809: IF p_run_functions = Fnd_Api.G_TRUE THEN
1810: run_functions(x_errbuf => x_errbuf,
1811: x_retcode => x_retcode,
1812: p_commit => FND_API.G_FALSE,
1813: p_current_date => l_current_date,

Line 1812: p_commit => FND_API.G_FALSE,

1808:
1809: IF p_run_functions = Fnd_Api.G_TRUE THEN
1810: run_functions(x_errbuf => x_errbuf,
1811: x_retcode => x_retcode,
1812: p_commit => FND_API.G_FALSE,
1813: p_current_date => l_current_date,
1814: p_func_currency => l_default_currency);
1815: END IF;
1816:

Line 1819: p_commit => FND_API.G_FALSE,

1815: END IF;
1816:
1817: UPDATE_VARIABLE(x_errbuf => x_errbuf,
1818: x_retcode => x_retcode,
1819: p_commit => FND_API.G_FALSE,
1820: p_current_date => l_current_date,
1821: p_func_currency => l_default_currency);
1822:
1823: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN

Line 1823: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN

1819: p_commit => FND_API.G_FALSE,
1820: p_current_date => l_current_date,
1821: p_func_currency => l_default_currency);
1822:
1823: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
1824: RAISE Fnd_Api.G_EXC_ERROR;
1825: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
1826: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1827: END IF;

Line 1824: RAISE Fnd_Api.G_EXC_ERROR;

1820: p_current_date => l_current_date,
1821: p_func_currency => l_default_currency);
1822:
1823: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
1824: RAISE Fnd_Api.G_EXC_ERROR;
1825: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
1826: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1827: END IF;
1828:

Line 1825: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN

1821: p_func_currency => l_default_currency);
1822:
1823: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
1824: RAISE Fnd_Api.G_EXC_ERROR;
1825: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
1826: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1827: END IF;
1828:
1829: Build_Refresh_Act_Metrics (

Line 1826: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

1822:
1823: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
1824: RAISE Fnd_Api.G_EXC_ERROR;
1825: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
1826: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1827: END IF;
1828:
1829: Build_Refresh_Act_Metrics (
1830: x_dirty_act_metric_table => l_dirty_actmet,

Line 1848: p_commit => FND_API.G_FALSE,

1844:
1845: Bulk_Update(
1846: x_dirty_actmet => l_dirty_actmet,
1847: p_calc_type => G_ROLLUP,
1848: p_commit => FND_API.G_FALSE,
1849: x_return_status => l_return_status
1850: );
1851:
1852: l_dirty_actmet.DELETE;

Line 1874: p_commit => FND_API.G_FALSE,

1870:
1871: Bulk_Update(
1872: x_dirty_actmet => l_dirty_actmet,
1873: p_calc_type => G_SUMMARY,
1874: p_commit => FND_API.G_FALSE,
1875: x_return_status => l_return_status
1876: );
1877:
1878: l_dirty_actmet.DELETE;

Line 1882: p_commit => FND_API.G_FALSE,

1878: l_dirty_actmet.DELETE;
1879:
1880: Update_formulas(x_errbuf => x_errbuf,
1881: x_retcode => x_retcode,
1882: p_commit => FND_API.G_FALSE,
1883: p_current_date => l_current_date,
1884: p_func_currency => l_default_currency);
1885:
1886: -- Update history if flag is either 'T' or 'Y'.

Line 1888: IF p_update_history IN (Fnd_Api.G_TRUE, G_UPDATE_HISTORY) THEN

1884: p_func_currency => l_default_currency);
1885:
1886: -- Update history if flag is either 'T' or 'Y'.
1887: -- Due to concurrent program restrictions.
1888: IF p_update_history IN (Fnd_Api.G_TRUE, G_UPDATE_HISTORY) THEN
1889: Update_History(p_commit => FND_API.G_FALSE);
1890: END IF;
1891:
1892: Clear_Cache;

Line 1889: Update_History(p_commit => FND_API.G_FALSE);

1885:
1886: -- Update history if flag is either 'T' or 'Y'.
1887: -- Due to concurrent program restrictions.
1888: IF p_update_history IN (Fnd_Api.G_TRUE, G_UPDATE_HISTORY) THEN
1889: Update_History(p_commit => FND_API.G_FALSE);
1890: END IF;
1891:
1892: Clear_Cache;
1893:

Line 1903: WHEN Fnd_Api.G_EXC_ERROR THEN

1899: IF AMS_DEBUG_HIGH_ON THEN
1900: write_msg(L_API_NAME,'END');
1901: END IF;
1902: EXCEPTION
1903: WHEN Fnd_Api.G_EXC_ERROR THEN
1904: l_return_status := Fnd_Api.G_RET_STS_ERROR;
1905: write_error(l_api_name);
1906: -- Fnd_Msg_Pub.Count_And_Get (
1907: -- p_count => l_msg_count,

Line 1904: l_return_status := Fnd_Api.G_RET_STS_ERROR;

1900: write_msg(L_API_NAME,'END');
1901: END IF;
1902: EXCEPTION
1903: WHEN Fnd_Api.G_EXC_ERROR THEN
1904: l_return_status := Fnd_Api.G_RET_STS_ERROR;
1905: write_error(l_api_name);
1906: -- Fnd_Msg_Pub.Count_And_Get (
1907: -- p_count => l_msg_count,
1908: -- p_data => l_msg_data

Line 1913: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

1909: -- );
1910: x_retcode := 1;
1911: -- x_errbuf := l_msg_data;
1912: RAISE;
1913: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1914: l_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1915: write_error(l_api_name);
1916: -- Fnd_Msg_Pub.Count_And_Get (
1917: -- p_count => l_msg_count,

Line 1914: l_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1910: x_retcode := 1;
1911: -- x_errbuf := l_msg_data;
1912: RAISE;
1913: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1914: l_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1915: write_error(l_api_name);
1916: -- Fnd_Msg_Pub.Count_And_Get (
1917: -- p_count => l_msg_count,
1918: -- p_data => l_msg_data

Line 1924: l_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1920: x_retcode := 1;
1921: -- x_errbuf := l_msg_data;
1922: RAISE;
1923: WHEN OTHERS THEN
1924: l_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1925: x_errbuf := SQLERRM;
1926: write_msg(l_api_name,'SQLERROR: '||x_errbuf);
1927: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
1928: Fnd_Msg_Pub.Add_Exc_Msg (G_PKG_NAME, L_API_NAME);

Line 1958: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_TRUE,

1954: -- 03/26/2001 dmvincen Created
1955: --
1956: PROCEDURE Refresh_Act_Metrics_Engine
1957: (p_api_version IN NUMBER,
1958: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_TRUE,
1959: p_commit IN VARCHAR2 := Fnd_Api.G_TRUE,
1960: x_return_status IN OUT NOCOPY VARCHAR2,
1961: x_msg_count IN OUT NOCOPY NUMBER,
1962: x_msg_data IN OUT NOCOPY VARCHAR2,

Line 1959: p_commit IN VARCHAR2 := Fnd_Api.G_TRUE,

1955: --
1956: PROCEDURE Refresh_Act_Metrics_Engine
1957: (p_api_version IN NUMBER,
1958: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_TRUE,
1959: p_commit IN VARCHAR2 := Fnd_Api.G_TRUE,
1960: x_return_status IN OUT NOCOPY VARCHAR2,
1961: x_msg_count IN OUT NOCOPY NUMBER,
1962: x_msg_data IN OUT NOCOPY VARCHAR2,
1963: p_arc_act_metric_used_by IN varchar2,

Line 1965: p_run_functions IN VARCHAR2 := Fnd_Api.G_TRUE,

1961: x_msg_count IN OUT NOCOPY NUMBER,
1962: x_msg_data IN OUT NOCOPY VARCHAR2,
1963: p_arc_act_metric_used_by IN varchar2,
1964: p_act_metric_used_by_id IN number,
1965: p_run_functions IN VARCHAR2 := Fnd_Api.G_TRUE,
1966: p_update_history IN VARCHAR2 := Fnd_Api.G_FALSE
1967: )
1968: IS
1969: L_API_VERSION CONSTANT NUMBER := 1.0;

Line 1966: p_update_history IN VARCHAR2 := Fnd_Api.G_FALSE

1962: x_msg_data IN OUT NOCOPY VARCHAR2,
1963: p_arc_act_metric_used_by IN varchar2,
1964: p_act_metric_used_by_id IN number,
1965: p_run_functions IN VARCHAR2 := Fnd_Api.G_TRUE,
1966: p_update_history IN VARCHAR2 := Fnd_Api.G_FALSE
1967: )
1968: IS
1969: L_API_VERSION CONSTANT NUMBER := 1.0;
1970: L_API_NAME VARCHAR2(30) := 'Refresh_Act_Metrics_Engine';

Line 2012: IF Fnd_Api.To_Boolean (p_init_msg_list) THEN

2008: END IF;
2009: --
2010: -- Initialize message list if p_init_msg_list is set to TRUE.
2011: --
2012: IF Fnd_Api.To_Boolean (p_init_msg_list) THEN
2013: Fnd_Msg_Pub.Initialize;
2014: END IF;
2015:
2016: --

Line 2019: IF NOT Fnd_Api.Compatible_API_Call (L_API_VERSION,

2015:
2016: --
2017: -- Standard check for API version compatibility.
2018: --
2019: IF NOT Fnd_Api.Compatible_API_Call (L_API_VERSION,
2020: p_api_version,
2021: L_API_NAME,
2022: G_PKG_NAME)
2023: THEN

Line 2024: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

2020: p_api_version,
2021: L_API_NAME,
2022: G_PKG_NAME)
2023: THEN
2024: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2025: END IF;
2026:
2027: Clear_Cache;
2028:

Line 2029: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

2025: END IF;
2026:
2027: Clear_Cache;
2028:
2029: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
2030: l_return_status := Fnd_Api.G_RET_STS_SUCCESS;
2031:
2032: Get_Object_List(p_arc_act_metric_used_by => p_arc_act_metric_used_by,
2033: p_act_metric_used_by_id => p_act_metric_used_by_id,

Line 2030: l_return_status := Fnd_Api.G_RET_STS_SUCCESS;

2026:
2027: Clear_Cache;
2028:
2029: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
2030: l_return_status := Fnd_Api.G_RET_STS_SUCCESS;
2031:
2032: Get_Object_List(p_arc_act_metric_used_by => p_arc_act_metric_used_by,
2033: p_act_metric_used_by_id => p_act_metric_used_by_id,
2034: x_return_status => l_return_status ,

Line 2039: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN

2035: x_msg_count => l_msg_count ,
2036: x_msg_data => l_msg_data ,
2037: x_object_list => l_object_list );
2038:
2039: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2040: RAISE Fnd_Api.G_EXC_ERROR;
2041: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2042: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2043: END IF;

Line 2040: RAISE Fnd_Api.G_EXC_ERROR;

2036: x_msg_data => l_msg_data ,
2037: x_object_list => l_object_list );
2038:
2039: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2040: RAISE Fnd_Api.G_EXC_ERROR;
2041: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2042: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2043: END IF;
2044:

Line 2041: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN

2037: x_object_list => l_object_list );
2038:
2039: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2040: RAISE Fnd_Api.G_EXC_ERROR;
2041: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2042: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2043: END IF;
2044:
2045: Check_Create_Rollup_Parents (

Line 2042: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

2038:
2039: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2040: RAISE Fnd_Api.G_EXC_ERROR;
2041: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2042: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2043: END IF;
2044:
2045: Check_Create_Rollup_Parents (
2046: p_init_msg_list => FND_API.G_FALSE,

Line 2046: p_init_msg_list => FND_API.G_FALSE,

2042: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2043: END IF;
2044:
2045: Check_Create_Rollup_Parents (
2046: p_init_msg_list => FND_API.G_FALSE,
2047: p_commit => FND_API.G_FALSE,
2048: x_return_status => l_return_status,
2049: p_object_list => l_object_list
2050: );

Line 2047: p_commit => FND_API.G_FALSE,

2043: END IF;
2044:
2045: Check_Create_Rollup_Parents (
2046: p_init_msg_list => FND_API.G_FALSE,
2047: p_commit => FND_API.G_FALSE,
2048: x_return_status => l_return_status,
2049: p_object_list => l_object_list
2050: );
2051:

Line 2052: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN

2048: x_return_status => l_return_status,
2049: p_object_list => l_object_list
2050: );
2051:
2052: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2053: RAISE Fnd_Api.G_EXC_ERROR;
2054: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2055: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2056: END IF;

Line 2053: RAISE Fnd_Api.G_EXC_ERROR;

2049: p_object_list => l_object_list
2050: );
2051:
2052: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2053: RAISE Fnd_Api.G_EXC_ERROR;
2054: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2055: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2056: END IF;
2057:

Line 2054: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN

2050: );
2051:
2052: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2053: RAISE Fnd_Api.G_EXC_ERROR;
2054: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2055: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2056: END IF;
2057:
2058: IF p_run_functions = Fnd_Api.G_TRUE THEN

Line 2055: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

2051:
2052: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2053: RAISE Fnd_Api.G_EXC_ERROR;
2054: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2055: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2056: END IF;
2057:
2058: IF p_run_functions = Fnd_Api.G_TRUE THEN
2059: run_functions(x_errbuf => l_errbuf,

Line 2058: IF p_run_functions = Fnd_Api.G_TRUE THEN

2054: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2055: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2056: END IF;
2057:
2058: IF p_run_functions = Fnd_Api.G_TRUE THEN
2059: run_functions(x_errbuf => l_errbuf,
2060: x_retcode => l_retcode,
2061: p_commit => FND_API.G_FALSE,
2062: p_object_list => l_object_list,

Line 2061: p_commit => FND_API.G_FALSE,

2057:
2058: IF p_run_functions = Fnd_Api.G_TRUE THEN
2059: run_functions(x_errbuf => l_errbuf,
2060: x_retcode => l_retcode,
2061: p_commit => FND_API.G_FALSE,
2062: p_object_list => l_object_list,
2063: p_current_date => l_current_date,
2064: p_func_currency => l_default_currency);
2065:

Line 2070: p_commit => FND_API.G_FALSE,

2066: END IF;
2067:
2068: UPDATE_VARIABLE(x_errbuf => l_errbuf,
2069: x_retcode => l_retcode,
2070: p_commit => FND_API.G_FALSE,
2071: p_object_list => l_object_list,
2072: p_current_date => l_current_date,
2073: p_func_currency => l_default_currency);
2074:

Line 2082: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN

2078: p_calc_type => G_ROLLUP,
2079: x_return_status => l_return_status,
2080: p_object_list => l_object_list);
2081:
2082: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2083: RAISE Fnd_Api.G_EXC_ERROR;
2084: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2085: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2086: END IF;

Line 2083: RAISE Fnd_Api.G_EXC_ERROR;

2079: x_return_status => l_return_status,
2080: p_object_list => l_object_list);
2081:
2082: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2083: RAISE Fnd_Api.G_EXC_ERROR;
2084: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2085: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2086: END IF;
2087:

Line 2084: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN

2080: p_object_list => l_object_list);
2081:
2082: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2083: RAISE Fnd_Api.G_EXC_ERROR;
2084: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2085: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2086: END IF;
2087:
2088: Calculate_This_Metric(

Line 2085: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

2081:
2082: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2083: RAISE Fnd_Api.G_EXC_ERROR;
2084: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2085: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2086: END IF;
2087:
2088: Calculate_This_Metric(
2089: x_dirty_actmets => l_dirty_actmet,

Line 2095: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN

2091: p_calc_type => G_ROLLUP,
2092: x_return_status => l_return_status,
2093: p_default_currency => l_default_currency);
2094:
2095: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2096: RAISE Fnd_Api.G_EXC_ERROR;
2097: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2098: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2099: END IF;

Line 2096: RAISE Fnd_Api.G_EXC_ERROR;

2092: x_return_status => l_return_status,
2093: p_default_currency => l_default_currency);
2094:
2095: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2096: RAISE Fnd_Api.G_EXC_ERROR;
2097: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2098: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2099: END IF;
2100:

Line 2097: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN

2093: p_default_currency => l_default_currency);
2094:
2095: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2096: RAISE Fnd_Api.G_EXC_ERROR;
2097: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2098: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2099: END IF;
2100:
2101: Bulk_Update(

Line 2098: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

2094:
2095: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2096: RAISE Fnd_Api.G_EXC_ERROR;
2097: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2098: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2099: END IF;
2100:
2101: Bulk_Update(
2102: x_dirty_actmet => l_dirty_actmet,

Line 2104: p_commit => FND_API.G_FALSE,

2100:
2101: Bulk_Update(
2102: x_dirty_actmet => l_dirty_actmet,
2103: p_calc_type => G_ROLLUP,
2104: p_commit => FND_API.G_FALSE,
2105: x_return_status => l_return_status
2106: );
2107:
2108: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN

Line 2108: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN

2104: p_commit => FND_API.G_FALSE,
2105: x_return_status => l_return_status
2106: );
2107:
2108: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2109: RAISE Fnd_Api.G_EXC_ERROR;
2110: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2111: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2112: END IF;

Line 2109: RAISE Fnd_Api.G_EXC_ERROR;

2105: x_return_status => l_return_status
2106: );
2107:
2108: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2109: RAISE Fnd_Api.G_EXC_ERROR;
2110: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2111: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2112: END IF;
2113:

Line 2110: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN

2106: );
2107:
2108: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2109: RAISE Fnd_Api.G_EXC_ERROR;
2110: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2111: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2112: END IF;
2113:
2114: l_dirty_actmet.DELETE;

Line 2111: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

2107:
2108: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2109: RAISE Fnd_Api.G_EXC_ERROR;
2110: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2111: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2112: END IF;
2113:
2114: l_dirty_actmet.DELETE;
2115: l_max_level := 0;

Line 2124: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN

2120: p_calc_type => G_SUMMARY,
2121: x_return_status => l_return_status,
2122: p_object_list => l_object_list);
2123:
2124: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2125: RAISE Fnd_Api.G_EXC_ERROR;
2126: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2127: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2128: END IF;

Line 2125: RAISE Fnd_Api.G_EXC_ERROR;

2121: x_return_status => l_return_status,
2122: p_object_list => l_object_list);
2123:
2124: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2125: RAISE Fnd_Api.G_EXC_ERROR;
2126: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2127: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2128: END IF;
2129:

Line 2126: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN

2122: p_object_list => l_object_list);
2123:
2124: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2125: RAISE Fnd_Api.G_EXC_ERROR;
2126: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2127: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2128: END IF;
2129:
2130: Calculate_This_Metric(

Line 2127: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

2123:
2124: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2125: RAISE Fnd_Api.G_EXC_ERROR;
2126: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2127: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2128: END IF;
2129:
2130: Calculate_This_Metric(
2131: x_dirty_actmets => l_dirty_actmet,

Line 2137: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN

2133: p_calc_type => G_SUMMARY,
2134: x_return_status => l_return_status,
2135: p_default_currency => l_default_currency);
2136:
2137: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2138: RAISE Fnd_Api.G_EXC_ERROR;
2139: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2140: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2141: END IF;

Line 2138: RAISE Fnd_Api.G_EXC_ERROR;

2134: x_return_status => l_return_status,
2135: p_default_currency => l_default_currency);
2136:
2137: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2138: RAISE Fnd_Api.G_EXC_ERROR;
2139: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2140: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2141: END IF;
2142:

Line 2139: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN

2135: p_default_currency => l_default_currency);
2136:
2137: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2138: RAISE Fnd_Api.G_EXC_ERROR;
2139: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2140: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2141: END IF;
2142:
2143: Bulk_Update(

Line 2140: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

2136:
2137: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2138: RAISE Fnd_Api.G_EXC_ERROR;
2139: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2140: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2141: END IF;
2142:
2143: Bulk_Update(
2144: x_dirty_actmet => l_dirty_actmet,

Line 2146: p_commit => FND_API.G_FALSE,

2142:
2143: Bulk_Update(
2144: x_dirty_actmet => l_dirty_actmet,
2145: p_calc_type => G_SUMMARY,
2146: p_commit => FND_API.G_FALSE,
2147: x_return_status => l_return_status
2148: );
2149:
2150: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN

Line 2150: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN

2146: p_commit => FND_API.G_FALSE,
2147: x_return_status => l_return_status
2148: );
2149:
2150: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2151: RAISE Fnd_Api.G_EXC_ERROR;
2152: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2153: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2154: END IF;

Line 2151: RAISE Fnd_Api.G_EXC_ERROR;

2147: x_return_status => l_return_status
2148: );
2149:
2150: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2151: RAISE Fnd_Api.G_EXC_ERROR;
2152: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2153: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2154: END IF;
2155:

Line 2152: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN

2148: );
2149:
2150: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2151: RAISE Fnd_Api.G_EXC_ERROR;
2152: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2153: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2154: END IF;
2155:
2156: l_dirty_actmet.DELETE;

Line 2153: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

2149:
2150: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2151: RAISE Fnd_Api.G_EXC_ERROR;
2152: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2153: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2154: END IF;
2155:
2156: l_dirty_actmet.DELETE;
2157:

Line 2160: p_commit => FND_API.G_FALSE,

2156: l_dirty_actmet.DELETE;
2157:
2158: Update_formulas(x_errbuf => l_errbuf,
2159: x_retcode => l_retcode,
2160: p_commit => FND_API.G_FALSE,
2161: p_object_list => l_object_list,
2162: p_current_date => l_current_date,
2163: p_func_currency => l_default_currency);
2164:

Line 2167: IF p_update_history IN (Fnd_Api.G_TRUE, G_UPDATE_HISTORY) THEN

2163: p_func_currency => l_default_currency);
2164:
2165: -- Update history if flag is either 'T' or 'Y'.
2166: -- Due to concurrent program restrictions.
2167: IF p_update_history IN (Fnd_Api.G_TRUE, G_UPDATE_HISTORY) THEN
2168: Update_History(p_commit => FND_API.G_FALSE);
2169: END IF;
2170:
2171: Clear_Cache;

Line 2168: Update_History(p_commit => FND_API.G_FALSE);

2164:
2165: -- Update history if flag is either 'T' or 'Y'.
2166: -- Due to concurrent program restrictions.
2167: IF p_update_history IN (Fnd_Api.G_TRUE, G_UPDATE_HISTORY) THEN
2168: Update_History(p_commit => FND_API.G_FALSE);
2169: END IF;
2170:
2171: Clear_Cache;
2172:

Line 2184: WHEN Fnd_Api.G_EXC_ERROR THEN

2180: IF AMS_DEBUG_HIGH_ON THEN
2181: write_msg(L_API_NAME,'END');
2182: END IF;
2183: EXCEPTION
2184: WHEN Fnd_Api.G_EXC_ERROR THEN
2185: x_return_status := Fnd_Api.G_RET_STS_ERROR;
2186: x_msg_count := l_msg_count;
2187: x_msg_data := l_msg_data;
2188: Fnd_Msg_Pub.Count_And_Get (

Line 2185: x_return_status := Fnd_Api.G_RET_STS_ERROR;

2181: write_msg(L_API_NAME,'END');
2182: END IF;
2183: EXCEPTION
2184: WHEN Fnd_Api.G_EXC_ERROR THEN
2185: x_return_status := Fnd_Api.G_RET_STS_ERROR;
2186: x_msg_count := l_msg_count;
2187: x_msg_data := l_msg_data;
2188: Fnd_Msg_Pub.Count_And_Get (
2189: p_count => x_msg_count,

Line 2193: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

2189: p_count => x_msg_count,
2190: p_data => x_msg_data
2191: );
2192: -- RAISE;
2193: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2194: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2195: x_msg_count := l_msg_count;
2196: x_msg_data := l_msg_data;
2197: Fnd_Msg_Pub.Count_And_Get (

Line 2194: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

2190: p_data => x_msg_data
2191: );
2192: -- RAISE;
2193: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2194: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2195: x_msg_count := l_msg_count;
2196: x_msg_data := l_msg_data;
2197: Fnd_Msg_Pub.Count_And_Get (
2198: p_count => x_msg_count,

Line 2203: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

2199: p_data => x_msg_data
2200: );
2201: -- RAISE;
2202: WHEN OTHERS THEN
2203: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2204: x_msg_count := l_msg_count;
2205: x_msg_data := l_msg_data;
2206: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
2207: Fnd_Msg_Pub.Add_Exc_Msg (G_PKG_NAME, L_API_NAME);

Line 2235: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

2231: -- 10/23/2001 huili Took out the "arc_metric_used_for_object"
2232: -- from the "c_act_metrics_parents" cursor.
2233: --
2234: PROCEDURE Check_Create_Rollup_Parents (
2235: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2236: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
2237: x_return_status OUT NOCOPY VARCHAR2,
2238: p_object_list IN object_currency_table := Empty_object_currency_table
2239: )

Line 2236: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,

2232: -- from the "c_act_metrics_parents" cursor.
2233: --
2234: PROCEDURE Check_Create_Rollup_Parents (
2235: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2236: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
2237: x_return_status OUT NOCOPY VARCHAR2,
2238: p_object_list IN object_currency_table := Empty_object_currency_table
2239: )
2240: IS

Line 2315: IF Fnd_Api.To_Boolean (p_init_msg_list) THEN

2311: END IF;
2312: --
2313: -- Initialize message list if p_init_msg_list is set to TRUE.
2314: --
2315: IF Fnd_Api.To_Boolean (p_init_msg_list) THEN
2316: Fnd_Msg_Pub.Initialize;
2317: END IF;
2318:
2319: --

Line 2323: IF NOT Fnd_Api.Compatible_API_Call (L_API_VERSION,

2319: --
2320: -- Standard check for API version compatibility.
2321: --
2322: /*** NOT REQUIRED
2323: IF NOT Fnd_Api.Compatible_API_Call (L_API_VERSION,
2324: p_api_version,
2325: L_API_NAME,
2326: G_PKG_NAME)
2327: THEN

Line 2328: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

2324: p_api_version,
2325: L_API_NAME,
2326: G_PKG_NAME)
2327: THEN
2328: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2329: END IF;
2330: ****/
2331:
2332: --

Line 2335: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

2331:
2332: --
2333: -- Initialize API return status to success.
2334: --
2335: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
2336:
2337: IF p_object_list.count = 0 THEN
2338: OPEN c_act_metrics_parents;
2339: FETCH c_act_metrics_parents BULK COLLECT INTO

Line 2397: IF x_return_status = Fnd_Api.G_RET_STS_ERROR THEN

2393: x_act_metrics => l_act_metrics,
2394: x_act_metric_id => l_new_act_metric_id,
2395: x_return_status => l_return_status);
2396:
2397: IF x_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2398: RAISE Fnd_Api.G_EXC_ERROR;
2399: ELSIF x_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2400: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2401: END IF;

Line 2398: RAISE Fnd_Api.G_EXC_ERROR;

2394: x_act_metric_id => l_new_act_metric_id,
2395: x_return_status => l_return_status);
2396:
2397: IF x_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2398: RAISE Fnd_Api.G_EXC_ERROR;
2399: ELSIF x_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2400: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2401: END IF;
2402:

Line 2399: ELSIF x_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN

2395: x_return_status => l_return_status);
2396:
2397: IF x_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2398: RAISE Fnd_Api.G_EXC_ERROR;
2399: ELSIF x_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2400: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2401: END IF;
2402:
2403: EXCEPTION

Line 2400: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

2396:
2397: IF x_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2398: RAISE Fnd_Api.G_EXC_ERROR;
2399: ELSIF x_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2400: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2401: END IF;
2402:
2403: EXCEPTION
2404: WHEN others THEN

Line 2411: p_commit = FND_API.G_TRUE THEN

2407: -- Commit subsets of new rollup metrics
2408: IF (l_creates - l_creates_committed > G_BATCH_SIZE OR
2409: (l_index = l_metric_parent_ids.last AND
2410: l_creates - l_creates_committed > 0)) AND
2411: p_commit = FND_API.G_TRUE THEN
2412: COMMIT;
2413: l_creates_committed := l_creates;
2414: IF AMS_DEBUG_MEDIUM_ON THEN
2415: write_msg(L_API_NAME,'BATCH COMMIT: PARENTS CREATED='||l_creates);

Line 2458: IF p_commit = FND_API.G_TRUE THEN

2454: SET dirty_flag = G_IS_DIRTY
2455: WHERE activity_metric_id = l_act_metric_parents (l_row_count)
2456: AND dirty_flag = G_NOT_DIRTY;
2457: -- Commit a batch of rollup ids.
2458: IF p_commit = FND_API.G_TRUE THEN
2459: COMMIT;
2460: IF AMS_DEBUG_MEDIUM_ON THEN
2461: write_msg(L_API_NAME,'BATCH COMMIT: ROLLUPS='||l_last);
2462: END IF;

Line 2479: IF Fnd_Api.To_Boolean (p_commit) THEN

2475:
2476: --
2477: -- Standard check for commit request.
2478: --
2479: IF Fnd_Api.To_Boolean (p_commit) THEN
2480: COMMIT WORK;
2481: END IF;
2482: --
2483: -- Standard API to get message count, and if 1,

Line 2489: -- p_encoded => Fnd_Api.G_FALSE

2485: --
2486: -- Fnd_Msg_Pub.Count_And_Get (
2487: -- p_count => x_msg_count,
2488: -- p_data => x_msg_data,
2489: -- p_encoded => Fnd_Api.G_FALSE
2490: -- );
2491:
2492: EXCEPTION
2493: WHEN Fnd_Api.G_EXC_ERROR THEN

Line 2493: WHEN Fnd_Api.G_EXC_ERROR THEN

2489: -- p_encoded => Fnd_Api.G_FALSE
2490: -- );
2491:
2492: EXCEPTION
2493: WHEN Fnd_Api.G_EXC_ERROR THEN
2494: ROLLBACK TO CREATE_ROLLUP_PARENTS_SP1;
2495: x_return_status := Fnd_Api.G_RET_STS_ERROR;
2496: -- Fnd_Msg_Pub.Count_And_Get (
2497: -- p_count => x_msg_count,

Line 2495: x_return_status := Fnd_Api.G_RET_STS_ERROR;

2491:
2492: EXCEPTION
2493: WHEN Fnd_Api.G_EXC_ERROR THEN
2494: ROLLBACK TO CREATE_ROLLUP_PARENTS_SP1;
2495: x_return_status := Fnd_Api.G_RET_STS_ERROR;
2496: -- Fnd_Msg_Pub.Count_And_Get (
2497: -- p_count => x_msg_count,
2498: -- p_data => x_msg_data
2499: -- );

Line 2500: -- RAISE Fnd_Api.G_EXC_ERROR;

2496: -- Fnd_Msg_Pub.Count_And_Get (
2497: -- p_count => x_msg_count,
2498: -- p_data => x_msg_data
2499: -- );
2500: -- RAISE Fnd_Api.G_EXC_ERROR;
2501: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2502: ROLLBACK TO CREATE_ROLLUP_PARENTS_SP1;
2503: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2504: -- Fnd_Msg_Pub.Count_And_Get (

Line 2501: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

2497: -- p_count => x_msg_count,
2498: -- p_data => x_msg_data
2499: -- );
2500: -- RAISE Fnd_Api.G_EXC_ERROR;
2501: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2502: ROLLBACK TO CREATE_ROLLUP_PARENTS_SP1;
2503: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2504: -- Fnd_Msg_Pub.Count_And_Get (
2505: -- p_count => x_msg_count,

Line 2503: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

2499: -- );
2500: -- RAISE Fnd_Api.G_EXC_ERROR;
2501: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2502: ROLLBACK TO CREATE_ROLLUP_PARENTS_SP1;
2503: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2504: -- Fnd_Msg_Pub.Count_And_Get (
2505: -- p_count => x_msg_count,
2506: -- p_data => x_msg_data
2507: -- );

Line 2508: -- RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR ;

2504: -- Fnd_Msg_Pub.Count_And_Get (
2505: -- p_count => x_msg_count,
2506: -- p_data => x_msg_data
2507: -- );
2508: -- RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR ;
2509:
2510: WHEN OTHERS THEN
2511: ROLLBACK TO CREATE_ROLLUP_PARENTS_SP1;
2512: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 2512: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

2508: -- RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR ;
2509:
2510: WHEN OTHERS THEN
2511: ROLLBACK TO CREATE_ROLLUP_PARENTS_SP1;
2512: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2513: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
2514: Fnd_Msg_Pub.Add_Exc_Msg (G_PKG_NAME, L_API_NAME);
2515: END IF;
2516: -- Fnd_Msg_Pub.Count_And_Get (

Line 2520: -- RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR ;

2516: -- Fnd_Msg_Pub.Count_And_Get (
2517: -- p_count => x_msg_count,
2518: -- p_data => x_msg_data
2519: -- );
2520: -- RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR ;
2521: END Check_Create_Rollup_Parents;
2522:
2523:
2524: -- NAME

Line 2543: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

2539: -- 10/23/2001 huili Commented out the "c_metric_used_type" cursor.
2540: --
2541: PROCEDURE Check_Cr_Roll_Par_Helper (
2542:
2543: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2544: p_metric_parent_id IN NUMBER,
2545: p_act_metric_id IN NUMBER,
2546: p_obj_id IN NUMBER,
2547: p_obj_type IN VARCHAR2,

Line 2555: p_commit IN VARCHAR2 := FND_API.G_FALSE

2551: x_creates IN OUT NOCOPY NUMBER,
2552:
2553: x_act_metric_id OUT NOCOPY NUMBER, -- Id of the activity metric created
2554: x_return_status OUT NOCOPY VARCHAR2,
2555: p_commit IN VARCHAR2 := FND_API.G_FALSE
2556: )
2557:
2558: IS
2559:

Line 2650: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

2646:
2647: --
2648: -- Initialize API return status to success.
2649: --
2650: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
2651:
2652: IF p_depth > G_MAX_DEPTH THEN
2653: write_msg(l_api_name,'Exceeded depth '||G_MAX_DEPTH||': p_act_metric_id='||p_act_metric_id);
2654: RETURN;

Line 2759: p_init_msg_list => FND_API.G_FALSE,

2755: write_msg(L_API_NAME,'creating parent: metric_id='||p_metric_parent_id);
2756: END IF;
2757: Ams_Actmetric_Pvt.Create_ActMetric (
2758: p_api_version => l_api_version,
2759: p_init_msg_list => FND_API.G_FALSE,
2760: p_act_metric_rec => l_act_metrics_rec,
2761: x_return_status => l_return_status,
2762: x_msg_count => l_msg_count,
2763: x_msg_data => l_msg_data,

Line 2765: p_commit => FND_API.G_FALSE);

2761: x_return_status => l_return_status,
2762: x_msg_count => l_msg_count,
2763: x_msg_data => l_msg_data,
2764: x_activity_metric_id => l_parent_act_metric_id,
2765: p_commit => FND_API.G_FALSE);
2766:
2767: x_creates := x_creates + 1;
2768:
2769: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN

Line 2769: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN

2765: p_commit => FND_API.G_FALSE);
2766:
2767: x_creates := x_creates + 1;
2768:
2769: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2770: IF p_init_msg_list = FND_API.G_TRUE THEN
2771: --write_msg(l_api_name,'CREATE_ACTMETRIC ERROR on metric_id='||p_metric_parent_id
2772: -- ||', obj_type='||l_parent_obj_type||', obj_id='||l_parent_obj_id);
2773: fnd_message.Set_Name('AMS','AMS_METR_IGNORE_ERROR');

Line 2770: IF p_init_msg_list = FND_API.G_TRUE THEN

2766:
2767: x_creates := x_creates + 1;
2768:
2769: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2770: IF p_init_msg_list = FND_API.G_TRUE THEN
2771: --write_msg(l_api_name,'CREATE_ACTMETRIC ERROR on metric_id='||p_metric_parent_id
2772: -- ||', obj_type='||l_parent_obj_type||', obj_id='||l_parent_obj_id);
2773: fnd_message.Set_Name('AMS','AMS_METR_IGNORE_ERROR');
2774: Fnd_Msg_Pub.Add;

Line 2777: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN

2773: fnd_message.Set_Name('AMS','AMS_METR_IGNORE_ERROR');
2774: Fnd_Msg_Pub.Add;
2775: write_error(l_api_name);
2776: END IF;
2777: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2778: IF p_init_msg_list = FND_API.G_TRUE THEN
2779: --write_msg(l_api_name,'CREATE_ACTMETRIC UNEXP on metric_id='||p_metric_parent_id
2780: -- ||', obj_type='||l_parent_obj_type||', obj_id='||l_parent_obj_id);
2781: fnd_message.Set_Name('AMS','AMS_METR_IGNORE_ERROR');

Line 2778: IF p_init_msg_list = FND_API.G_TRUE THEN

2774: Fnd_Msg_Pub.Add;
2775: write_error(l_api_name);
2776: END IF;
2777: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2778: IF p_init_msg_list = FND_API.G_TRUE THEN
2779: --write_msg(l_api_name,'CREATE_ACTMETRIC UNEXP on metric_id='||p_metric_parent_id
2780: -- ||', obj_type='||l_parent_obj_type||', obj_id='||l_parent_obj_id);
2781: fnd_message.Set_Name('AMS','AMS_METR_IGNORE_ERROR');
2782: Fnd_Msg_Pub.Add;

Line 2826: END IF; -- l_return_status = Fnd_Api.G_RET_STS_ERROR

2822: l_count := x_act_metrics.count +1;
2823: x_act_metric_parents (l_count) := l_parent_act_metric_id;
2824: x_act_metrics (l_count) := p_act_metric_id;
2825: END IF;--l_parent_act_metric_id IS NULL
2826: END IF; -- l_return_status = Fnd_Api.G_RET_STS_ERROR
2827: ELSE --l_parent_act_metric_id IS NOT NULL
2828: l_count := x_act_metrics.count +1;
2829: x_act_metric_parents (l_count) := l_parent_act_metric_id;
2830: x_act_metrics (l_count) := p_act_metric_id;

Line 2843: p_encoded => Fnd_Api.G_FALSE

2839: /*** Not required for this routine.
2840: Fnd_Msg_Pub.Count_And_Get (
2841: p_count => x_msg_count,
2842: p_data => x_msg_data,
2843: p_encoded => Fnd_Api.G_FALSE
2844: );
2845: ****/
2846: /*
2847: EXCEPTION

Line 2848: WHEN Fnd_Api.G_EXC_ERROR THEN

2844: );
2845: ****/
2846: /*
2847: EXCEPTION
2848: WHEN Fnd_Api.G_EXC_ERROR THEN
2849: x_return_status := Fnd_Api.G_RET_STS_ERROR;
2850: Fnd_Msg_Pub.Count_And_Get (
2851: p_count => x_msg_count,
2852: p_data => x_msg_data

Line 2849: x_return_status := Fnd_Api.G_RET_STS_ERROR;

2845: ****/
2846: /*
2847: EXCEPTION
2848: WHEN Fnd_Api.G_EXC_ERROR THEN
2849: x_return_status := Fnd_Api.G_RET_STS_ERROR;
2850: Fnd_Msg_Pub.Count_And_Get (
2851: p_count => x_msg_count,
2852: p_data => x_msg_data
2853: );

Line 2854: RAISE Fnd_Api.G_EXC_ERROR;

2850: Fnd_Msg_Pub.Count_And_Get (
2851: p_count => x_msg_count,
2852: p_data => x_msg_data
2853: );
2854: RAISE Fnd_Api.G_EXC_ERROR;
2855: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2856: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2857: Fnd_Msg_Pub.Count_And_Get (
2858: p_count => x_msg_count,

Line 2855: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

2851: p_count => x_msg_count,
2852: p_data => x_msg_data
2853: );
2854: RAISE Fnd_Api.G_EXC_ERROR;
2855: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2856: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2857: Fnd_Msg_Pub.Count_And_Get (
2858: p_count => x_msg_count,
2859: p_data => x_msg_data

Line 2856: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

2852: p_data => x_msg_data
2853: );
2854: RAISE Fnd_Api.G_EXC_ERROR;
2855: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2856: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2857: Fnd_Msg_Pub.Count_And_Get (
2858: p_count => x_msg_count,
2859: p_data => x_msg_data
2860: );

Line 2861: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR ;

2857: Fnd_Msg_Pub.Count_And_Get (
2858: p_count => x_msg_count,
2859: p_data => x_msg_data
2860: );
2861: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR ;
2862:
2863: WHEN OTHERS THEN
2864: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2865: Fnd_Msg_Pub.Count_And_Get (

Line 2864: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

2860: );
2861: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR ;
2862:
2863: WHEN OTHERS THEN
2864: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2865: Fnd_Msg_Pub.Count_And_Get (
2866: p_count => x_msg_count,
2867: p_data => x_msg_data
2868: );

Line 2869: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR ;

2865: Fnd_Msg_Pub.Count_And_Get (
2866: p_count => x_msg_count,
2867: p_data => x_msg_data
2868: );
2869: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR ;
2870: */
2871: END Check_Cr_Roll_Par_Helper;
2872:
2873: --

Line 2902: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

2898: l_return_value NUMBER := NULL;
2899: l_sql_str VARCHAR2(4000);
2900: l_error VARCHAR2(4000);
2901: BEGIN
2902: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
2903: IF p_activity_metric_id IS NOT NULL THEN
2904: l_sql_str := 'BEGIN :return_value := ' || p_function_name ||
2905: '( :activity_metric_id ); END;';
2906: EXECUTE IMMEDIATE l_sql_str

Line 2931: x_return_status := Fnd_Api.G_RET_STS_ERROR;

2927: write_msg(L_API_NAME,'SQL_STR: '||l_sql_str);
2928: write_msg(L_API_NAME,'ACTIVITY_METRIC_ID="'||p_activity_metric_id
2929: ||'", p_arc_act_metric_used_by="'||p_arc_act_metric_used_by
2930: ||'", p_act_metric_used_by_id="'||p_act_metric_used_by_id||'"');
2931: x_return_status := Fnd_Api.G_RET_STS_ERROR;
2932: RETURN l_return_value;
2933: END Exec_Function;
2934:
2935: -------------------------------------------------------------------------------

Line 2952: p_commit IN VARCHAR2 := Fnd_Api.G_TRUE,

2948: -------------------------------------------------------------------------------
2949: PROCEDURE Run_Functions
2950: (x_errbuf OUT NOCOPY VARCHAR2,
2951: x_retcode OUT NOCOPY NUMBER,
2952: p_commit IN VARCHAR2 := Fnd_Api.G_TRUE,
2953: p_object_list IN object_currency_table := Empty_object_currency_table,
2954: p_current_date IN date,
2955: p_func_currency IN varchar2
2956: )

Line 3102: IF p_commit = FND_API.G_TRUE THEN

3098: IF AMS_DEBUG_HIGH_ON THEN
3099: write_msg(L_API_NAME,'elapse time (seconds)= '
3100: || ((DBMS_UTILITY.get_time - l_start_time) / 100));
3101: END IF;
3102: IF p_commit = FND_API.G_TRUE THEN
3103: COMMIT;
3104: IF AMS_DEBUG_MEDIUM_ON THEN
3105: write_msg(L_API_NAME,'BATCH COMMIT');
3106: END IF;

Line 3193: IF l_return_status <> Fnd_Api.G_RET_STS_ERROR

3189: ': function_name='||l_function_names(l_index)||
3190: ': actual_value='||l_func_actual_values(l_index)||
3191: ': new_value='||l_new_func_value);
3192: END IF;
3193: IF l_return_status <> Fnd_Api.G_RET_STS_ERROR
3194: AND NVL(l_new_func_value,0) <> NVL(l_func_actual_values(l_index),0)
3195: THEN
3196: l_count := l_new_act_metric_ids.count+1;
3197: l_new_act_metric_ids(l_count) := l_act_metric_ids(l_index);

Line 3210: p_round => Fnd_Api.G_TRUE);

3206: p_to_currency => l_trans_currencies(l_count),
3207: p_conv_date => l_current_date,
3208: p_from_amount => l_new_func_value,
3209: x_to_amount => l_new_trans_actuals(l_count),
3210: p_round => Fnd_Api.G_TRUE);
3211: ELSE
3212: l_new_trans_actuals(l_count) := l_new_func_value;
3213: END IF;
3214: END IF;

Line 3254: IF p_commit = fnd_api.g_true THEN

3250: WHERE activity_metric_id = l_new_act_metric_ids(l_count)
3251: AND summarize_to_metric IS NOT NULL);
3252:
3253: l_first := l_last + 1;
3254: IF p_commit = fnd_api.g_true THEN
3255: COMMIT;
3256: IF AMS_DEBUG_MEDIUM_ON THEN
3257: write_msg(L_API_NAME,'BATCH COMMIT: l_last='||l_last);
3258: END IF;

Line 3296: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,

3292: -- 22-Aug_2003 dmvincen Created.
3293: -------------------------------------------------------------------------------
3294: PROCEDURE Run_Functions (
3295: p_api_version IN NUMBER,
3296: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
3297: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
3298:
3299: x_return_status OUT NOCOPY VARCHAR2,
3300: x_msg_count OUT NOCOPY NUMBER,

Line 3297: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,

3293: -------------------------------------------------------------------------------
3294: PROCEDURE Run_Functions (
3295: p_api_version IN NUMBER,
3296: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
3297: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
3298:
3299: x_return_status OUT NOCOPY VARCHAR2,
3300: x_msg_count OUT NOCOPY NUMBER,
3301: x_msg_data OUT NOCOPY VARCHAR2,

Line 3319: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

3315: begin
3316:
3317: savepoint sp_run_functions;
3318:
3319: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
3320:
3321: l_index := l_object_list.count + 1;
3322: l_object_list(l_index).obj_type := p_arc_act_metric_used_by;
3323: l_object_list(l_index).obj_id := p_act_metric_used_by_id;

Line 3327: p_commit => FND_API.G_FALSE,

3323: l_object_list(l_index).obj_id := p_act_metric_used_by_id;
3324:
3325: run_functions(x_errbuf => l_errbuf,
3326: x_retcode => l_retcode,
3327: p_commit => FND_API.G_FALSE,
3328: p_object_list => l_object_list,
3329: p_current_date => l_current_date,
3330: p_func_currency => l_default_currency);
3331:

Line 3333: IF x_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN

3329: p_current_date => l_current_date,
3330: p_func_currency => l_default_currency);
3331:
3332: -- If any errors happen abort API.
3333: IF x_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
3334: RAISE Fnd_Api.G_EXC_ERROR;
3335: END IF;
3336:
3337: --COMMIT WORK;

Line 3334: RAISE Fnd_Api.G_EXC_ERROR;

3330: p_func_currency => l_default_currency);
3331:
3332: -- If any errors happen abort API.
3333: IF x_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
3334: RAISE Fnd_Api.G_EXC_ERROR;
3335: END IF;
3336:
3337: --COMMIT WORK;
3338:

Line 3339: IF Fnd_Api.to_boolean(p_commit) THEN

3335: END IF;
3336:
3337: --COMMIT WORK;
3338:
3339: IF Fnd_Api.to_boolean(p_commit) THEN
3340: COMMIT;
3341: END IF;
3342:
3343: --

Line 3350: p_encoded => Fnd_Api.G_FALSE

3346: --
3347: Fnd_Msg_Pub.Count_And_Get (
3348: p_count => x_msg_count,
3349: p_data => x_msg_data,
3350: p_encoded => Fnd_Api.G_FALSE
3351: );
3352:
3353: EXCEPTION
3354: WHEN Fnd_Api.G_EXC_ERROR THEN

Line 3354: WHEN Fnd_Api.G_EXC_ERROR THEN

3350: p_encoded => Fnd_Api.G_FALSE
3351: );
3352:
3353: EXCEPTION
3354: WHEN Fnd_Api.G_EXC_ERROR THEN
3355: ROLLBACK TO sp_run_functions;
3356: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3357: Fnd_Msg_Pub.Count_And_Get (
3358: p_count => x_msg_count,

Line 3356: x_return_status := Fnd_Api.G_RET_STS_ERROR;

3352:
3353: EXCEPTION
3354: WHEN Fnd_Api.G_EXC_ERROR THEN
3355: ROLLBACK TO sp_run_functions;
3356: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3357: Fnd_Msg_Pub.Count_And_Get (
3358: p_count => x_msg_count,
3359: p_data => x_msg_data,
3360: p_encoded => FND_API.G_FALSE

Line 3360: p_encoded => FND_API.G_FALSE

3356: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3357: Fnd_Msg_Pub.Count_And_Get (
3358: p_count => x_msg_count,
3359: p_data => x_msg_data,
3360: p_encoded => FND_API.G_FALSE
3361: );
3362: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
3363: ROLLBACK TO sp_run_functions;
3364: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 3362: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

3358: p_count => x_msg_count,
3359: p_data => x_msg_data,
3360: p_encoded => FND_API.G_FALSE
3361: );
3362: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
3363: ROLLBACK TO sp_run_functions;
3364: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3365: Fnd_Msg_Pub.Count_And_Get (
3366: p_count => x_msg_count,

Line 3364: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

3360: p_encoded => FND_API.G_FALSE
3361: );
3362: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
3363: ROLLBACK TO sp_run_functions;
3364: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3365: Fnd_Msg_Pub.Count_And_Get (
3366: p_count => x_msg_count,
3367: p_data => x_msg_data,
3368: p_encoded => FND_API.G_FALSE

Line 3368: p_encoded => FND_API.G_FALSE

3364: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3365: Fnd_Msg_Pub.Count_And_Get (
3366: p_count => x_msg_count,
3367: p_data => x_msg_data,
3368: p_encoded => FND_API.G_FALSE
3369: );
3370: WHEN OTHERS THEN
3371: ROLLBACK TO sp_run_functions;
3372: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 3372: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

3368: p_encoded => FND_API.G_FALSE
3369: );
3370: WHEN OTHERS THEN
3371: ROLLBACK TO sp_run_functions;
3372: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3373: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
3374: Fnd_Msg_Pub.Add_Exc_Msg (G_PKG_NAME, L_API_NAME);
3375: END IF;
3376: Fnd_Msg_Pub.Count_And_Get (

Line 3379: p_encoded => FND_API.G_FALSE

3375: END IF;
3376: Fnd_Msg_Pub.Count_And_Get (
3377: p_count => x_msg_count,
3378: p_data => x_msg_data,
3379: p_encoded => FND_API.G_FALSE
3380: );
3381:
3382: end run_functions;
3383:

Line 3424: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

3420: BEGIN
3421: --
3422: -- Initialize API return status to success.
3423: --
3424: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
3425: --
3426: -- Begin API Body
3427: --
3428: OPEN c_obj_det ;

Line 3442: IF l_return_status = Fnd_Api.G_RET_STS_SUCCESS THEN

3438: p_metric_category => G_COST, --Apportioning only for Cost
3439: p_return_type => G_ACTUAL, -- Return the Actual Value
3440: x_value => l_amount
3441: ) ;
3442: IF l_return_status = Fnd_Api.G_RET_STS_SUCCESS THEN
3443: l_apport_value :=
3444: l_amount * l_obj_det_rec.pct_of_cost_to_charge_used_by/100 ;
3445: ELSE
3446: x_return_status := l_return_status ;

Line 3463: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

3459: -- End API Body.
3460: --
3461: EXCEPTION
3462: WHEN OTHERS THEN
3463: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3464: END Get_Met_Apport_Val;
3465:
3466: -- NAME
3467: -- GetMetricCatVal

Line 3526: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

3522: BEGIN
3523: --
3524: -- Initialize API return status to success.
3525: --
3526: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
3527: --
3528: -- Begin API Body.
3529: --
3530: -- Take the First Metric ID of all the Metrics attached to this Usage and of

Line 3543: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

3539: -- this usage type (for e.g. Total Cost )
3540: OPEN c_sum_metrics(l_cat_met_rec.metric_id, p_arc_act_metric_used_by);
3541: FETCH c_sum_metrics INTO l_sum_met_rec;
3542: IF c_sum_metrics%NOTFOUND THEN
3543: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3544: RETURN;
3545: END IF;
3546: CLOSE c_sum_metrics;
3547:

Line 3574: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

3570: -- End API Body.
3571: --
3572: EXCEPTION
3573: WHEN OTHERS THEN
3574: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3575: RETURN;
3576: END GetMetCatVal;
3577:
3578: --

Line 3643: SELECT Fnd_Api.G_TRUE

3639: )
3640: IS
3641: /**
3642: CURSOR c_camp(id NUMBER) IS
3643: SELECT Fnd_Api.G_TRUE
3644: FROM ams_campaigns_all_b
3645: WHERE campaign_id = id
3646: AND status_code = G_CANCELLED;
3647:

Line 3649: SELECT Fnd_Api.G_TRUE

3645: WHERE campaign_id = id
3646: AND status_code = G_CANCELLED;
3647:
3648: CURSOR c_csch(id NUMBER) IS
3649: SELECT Fnd_Api.G_TRUE
3650: FROM ams_campaign_schedules_b
3651: WHERE schedule_id = id
3652: AND status_code = G_CANCELLED;
3653:

Line 3655: SELECT Fnd_Api.G_TRUE

3651: WHERE schedule_id = id
3652: AND status_code = G_CANCELLED;
3653:
3654: CURSOR c_delv(id NUMBER) IS
3655: SELECT Fnd_Api.G_TRUE
3656: FROM ams_deliverables_all_b
3657: WHERE deliverable_id = id
3658: AND status_code = G_CANCELLED;
3659:

Line 3661: SELECT Fnd_Api.G_TRUE

3657: WHERE deliverable_id = id
3658: AND status_code = G_CANCELLED;
3659:
3660: CURSOR c_eveh(id NUMBER) IS
3661: SELECT Fnd_Api.G_TRUE
3662: FROM ams_event_headers_all_b
3663: WHERE event_header_id = id
3664: AND system_status_code = G_CANCELLED;
3665:

Line 3667: SELECT Fnd_Api.G_TRUE

3663: WHERE event_header_id = id
3664: AND system_status_code = G_CANCELLED;
3665:
3666: CURSOR c_eveo(id NUMBER) IS
3667: SELECT Fnd_Api.G_TRUE
3668: FROM ams_event_offers_all_b
3669: WHERE event_offer_id = id
3670: AND system_status_code IN (G_CANCELLED);
3671: **/

Line 3672: l_is_canceled VARCHAR2(1) := Fnd_Api.G_FALSE;

3668: FROM ams_event_offers_all_b
3669: WHERE event_offer_id = id
3670: AND system_status_code IN (G_CANCELLED);
3671: **/
3672: l_is_canceled VARCHAR2(1) := Fnd_Api.G_FALSE;
3673:
3674: BEGIN
3675: /**
3676: if p_arc_act_metric_used_by in (G_CAMP,G_RCAM) and

Line 3689: l_is_canceled := Fnd_Api.G_FALSE;

3685: elsif p_arc_act_metric_used_by in (G_EVEO,G_EONE) and
3686: G_EVEO_status_table.exists(p_act_metric_used_by_id) then
3687: l_is_canceled := g_EVEO_status_table(p_act_metric_used_by_id);
3688: else
3689: l_is_canceled := Fnd_Api.G_FALSE;
3690: IF p_arc_act_metric_used_by IN (G_RCAM, G_CAMP) THEN
3691: OPEN c_camp(p_act_metric_used_by_id);
3692: FETCH c_camp INTO l_is_canceled;
3693: CLOSE c_camp;

Line 3759: p_commit IN VARCHAR2 := Fnd_Api.G_TRUE,

3755: --
3756: PROCEDURE UPDATE_VARIABLE
3757: (x_errbuf OUT NOCOPY VARCHAR2,
3758: x_retcode OUT NOCOPY NUMBER,
3759: p_commit IN VARCHAR2 := Fnd_Api.G_TRUE,
3760: p_object_list IN object_currency_table := Empty_object_currency_table,
3761: p_current_date IN date,
3762: p_func_currency IN varchar2
3763: )

Line 4011: p_round => fnd_api.g_false);

4007: p_from_amount => l_trans_actual_values(l_index),
4008: x_to_amount => l_new_func_actual_values(l_index),
4009: p_from_amount2 => l_new_trans_forecasted_values(l_index),
4010: x_to_amount2 => l_new_func_forecasted_values(l_index),
4011: p_round => fnd_api.g_false);
4012: ELSE
4013: -- Variables only apply to costs and revenues.
4014: -- This code should never execute.
4015: l_new_func_currencies(l_index) := NULL;

Line 4059: IF p_commit = FND_API.G_TRUE THEN

4055: UNION ALL
4056: SELECT summarize_to_metric FROM ams_act_metrics_all
4057: WHERE activity_metric_id = l_activity_metric_ids(l_index));
4058: l_first := l_last + 1;
4059: IF p_commit = FND_API.G_TRUE THEN
4060: COMMIT;
4061: IF AMS_DEBUG_MEDIUM_ON THEN
4062: write_msg(L_API_NAME, 'BATCH COMMIT: l_last='||l_last);
4063: END IF;

Line 4102: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,

4098: -- 22-Aug_2003 dmvincen Created.
4099: -------------------------------------------------------------------------------
4100: PROCEDURE Update_Variable (
4101: p_api_version IN NUMBER,
4102: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
4103: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
4104:
4105: x_return_status OUT NOCOPY VARCHAR2,
4106: x_msg_count OUT NOCOPY NUMBER,

Line 4103: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,

4099: -------------------------------------------------------------------------------
4100: PROCEDURE Update_Variable (
4101: p_api_version IN NUMBER,
4102: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
4103: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
4104:
4105: x_return_status OUT NOCOPY VARCHAR2,
4106: x_msg_count OUT NOCOPY NUMBER,
4107: x_msg_data OUT NOCOPY VARCHAR2,

Line 4125: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

4121: begin
4122:
4123: savepoint sp_Update_Variable;
4124:
4125: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
4126:
4127: l_index := l_object_list.count + 1;
4128: l_object_list(l_index).obj_type := p_arc_act_metric_used_by;
4129: l_object_list(l_index).obj_id := p_act_metric_used_by_id;

Line 4133: p_commit => FND_API.G_FALSE,

4129: l_object_list(l_index).obj_id := p_act_metric_used_by_id;
4130:
4131: Update_Variable(x_errbuf => l_errbuf,
4132: x_retcode => l_retcode,
4133: p_commit => FND_API.G_FALSE,
4134: p_object_list => l_object_list,
4135: p_current_date => l_current_date,
4136: p_func_currency => l_default_currency);
4137:

Line 4139: IF x_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN

4135: p_current_date => l_current_date,
4136: p_func_currency => l_default_currency);
4137:
4138: -- If any errors happen abort API.
4139: IF x_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
4140: RAISE Fnd_Api.G_EXC_ERROR;
4141: END IF;
4142:
4143: --COMMIT WORK;

Line 4140: RAISE Fnd_Api.G_EXC_ERROR;

4136: p_func_currency => l_default_currency);
4137:
4138: -- If any errors happen abort API.
4139: IF x_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
4140: RAISE Fnd_Api.G_EXC_ERROR;
4141: END IF;
4142:
4143: --COMMIT WORK;
4144:

Line 4145: IF Fnd_Api.to_boolean(p_commit) THEN

4141: END IF;
4142:
4143: --COMMIT WORK;
4144:
4145: IF Fnd_Api.to_boolean(p_commit) THEN
4146: COMMIT;
4147: END IF;
4148:
4149: --

Line 4156: p_encoded => Fnd_Api.G_FALSE

4152: --
4153: Fnd_Msg_Pub.Count_And_Get (
4154: p_count => x_msg_count,
4155: p_data => x_msg_data,
4156: p_encoded => Fnd_Api.G_FALSE
4157: );
4158:
4159: EXCEPTION
4160: WHEN Fnd_Api.G_EXC_ERROR THEN

Line 4160: WHEN Fnd_Api.G_EXC_ERROR THEN

4156: p_encoded => Fnd_Api.G_FALSE
4157: );
4158:
4159: EXCEPTION
4160: WHEN Fnd_Api.G_EXC_ERROR THEN
4161: ROLLBACK TO sp_Update_Variable;
4162: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4163: Fnd_Msg_Pub.Count_And_Get (
4164: p_count => x_msg_count,

Line 4162: x_return_status := Fnd_Api.G_RET_STS_ERROR;

4158:
4159: EXCEPTION
4160: WHEN Fnd_Api.G_EXC_ERROR THEN
4161: ROLLBACK TO sp_Update_Variable;
4162: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4163: Fnd_Msg_Pub.Count_And_Get (
4164: p_count => x_msg_count,
4165: p_data => x_msg_data,
4166: p_encoded => FND_API.G_FALSE

Line 4166: p_encoded => FND_API.G_FALSE

4162: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4163: Fnd_Msg_Pub.Count_And_Get (
4164: p_count => x_msg_count,
4165: p_data => x_msg_data,
4166: p_encoded => FND_API.G_FALSE
4167: );
4168: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4169: ROLLBACK TO sp_Update_Variable;
4170: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 4168: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

4164: p_count => x_msg_count,
4165: p_data => x_msg_data,
4166: p_encoded => FND_API.G_FALSE
4167: );
4168: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4169: ROLLBACK TO sp_Update_Variable;
4170: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
4171: Fnd_Msg_Pub.Count_And_Get (
4172: p_count => x_msg_count,

Line 4170: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

4166: p_encoded => FND_API.G_FALSE
4167: );
4168: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4169: ROLLBACK TO sp_Update_Variable;
4170: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
4171: Fnd_Msg_Pub.Count_And_Get (
4172: p_count => x_msg_count,
4173: p_data => x_msg_data,
4174: p_encoded => FND_API.G_FALSE

Line 4174: p_encoded => FND_API.G_FALSE

4170: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
4171: Fnd_Msg_Pub.Count_And_Get (
4172: p_count => x_msg_count,
4173: p_data => x_msg_data,
4174: p_encoded => FND_API.G_FALSE
4175: );
4176: WHEN OTHERS THEN
4177: ROLLBACK TO sp_Update_Variable;
4178: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 4178: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

4174: p_encoded => FND_API.G_FALSE
4175: );
4176: WHEN OTHERS THEN
4177: ROLLBACK TO sp_Update_Variable;
4178: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
4179: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
4180: Fnd_Msg_Pub.Add_Exc_Msg (G_PKG_NAME, L_API_NAME);
4181: END IF;
4182: Fnd_Msg_Pub.Count_And_Get (

Line 4185: p_encoded => FND_API.G_FALSE

4181: END IF;
4182: Fnd_Msg_Pub.Count_And_Get (
4183: p_count => x_msg_count,
4184: p_data => x_msg_data,
4185: p_encoded => FND_API.G_FALSE
4186: );
4187:
4188: end Update_Variable;
4189:

Line 4209: decode(status_code, G_CANCELLED, Fnd_Api.G_TRUE, Fnd_Api.G_FALSE) cancelled_flag,

4205: --check the parent campaign or program
4206: CURSOR c_check_campaign(l_act_metric_used_by_id NUMBER)
4207: return object_detail_type IS
4208: SELECT decode(rollup_type,G_RCAM,G_RCAM,G_CAMP), campaign_id, transaction_currency_code, G_RCAM, parent_campaign_id,
4209: decode(status_code, G_CANCELLED, Fnd_Api.G_TRUE, Fnd_Api.G_FALSE) cancelled_flag,
4210: upper(show_campaign_flag)
4211: FROM ams_campaigns_all_b
4212: WHERE campaign_id = l_act_metric_used_by_id;
4213: -- AND UPPER(show_campaign_flag) = 'Y';

Line 4218: decode(status_code, G_CANCELLED, Fnd_Api.G_TRUE, Fnd_Api.G_FALSE) cancelled_flag,

4214:
4215: CURSOR c_check_schedule (l_act_metric_used_by_id NUMBER)
4216: return object_detail_type IS
4217: SELECT G_CSCH, campaign_id, transaction_currency_code, G_CAMP, campaign_id,
4218: decode(status_code, G_CANCELLED, Fnd_Api.G_TRUE, Fnd_Api.G_FALSE) cancelled_flag,
4219: G_SHOW
4220: FROM ams_campaign_schedules_b
4221: WHERE schedule_id = l_act_metric_used_by_id;
4222:

Line 4228: decode(system_status_code, G_CANCELLED, Fnd_Api.G_TRUE, Fnd_Api.G_FALSE) cancelled_flag,

4224: -- BUG 3456849: Changed parent to be a program_id.
4225: CURSOR c_check_event_h(l_act_metric_used_by_id NUMBER)
4226: return object_detail_type IS
4227: SELECT G_EVEH, event_header_id, currency_code_tc, G_RCAM, program_id,
4228: decode(system_status_code, G_CANCELLED, Fnd_Api.G_TRUE, Fnd_Api.G_FALSE) cancelled_flag,
4229: G_SHOW
4230: FROM ams_event_headers_all_b
4231: WHERE event_header_id = l_act_metric_used_by_id;
4232:

Line 4239: decode(system_status_code, G_CANCELLED, Fnd_Api.G_TRUE, Fnd_Api.G_FALSE) cancelled_flag,

4235: return object_detail_type IS
4236: SELECT event_object_type, event_offer_id, currency_code_tc,
4237: decode(parent_type,null,G_EVEH,parent_type) parent_type,
4238: decode(parent_type,null, event_header_id, parent_id) parent_id,
4239: decode(system_status_code, G_CANCELLED, Fnd_Api.G_TRUE, Fnd_Api.G_FALSE) cancelled_flag,
4240: G_SHOW
4241: FROM ams_event_offers_all_b
4242: WHERE event_offer_id = l_act_metric_used_by_id;
4243:

Line 4247: decode(status_code, G_CANCELLED, Fnd_Api.G_TRUE, Fnd_Api.G_FALSE) cancelled_flag,

4243:
4244: CURSOR c_check_deliverable(l_act_metric_used_by_id NUMBER)
4245: return object_detail_type IS
4246: SELECT G_DELV, deliverable_id, transaction_currency_code, NULL, NULL,
4247: decode(status_code, G_CANCELLED, Fnd_Api.G_TRUE, Fnd_Api.G_FALSE) cancelled_flag,
4248: G_SHOW
4249: FROM ams_deliverables_all_b
4250: WHERE deliverable_id = l_act_metric_used_by_id;
4251:

Line 4255: NULL, NULL, Fnd_Api.G_FALSE cancelled_flag,

4251:
4252: CURSOR c_check_act_list(l_act_metric_used_by_id NUMBER)
4253: return object_detail_type IS
4254: SELECT G_ALIST, act_list_header_id, Ams_Actmetric_Pvt.DEFAULT_FUNC_CURRENCY,
4255: NULL, NULL, Fnd_Api.G_FALSE cancelled_flag,
4256: G_SHOW
4257: FROM ams_act_lists
4258: WHERE act_list_header_id = l_act_metric_used_by_id;
4259:

Line 4520: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

4516: l_msg_data VARCHAR2(2000);
4517: ****** NOT REQUIRED ****/
4518:
4519: BEGIN
4520: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
4521:
4522: IF p_arc_act_metric_used_by = G_RCAM THEN
4523: OPEN c_get_program_family(p_act_metric_used_by_id);
4524: FETCH c_get_program_family BULK COLLECT INTO l_obj_ids, l_obj_types, l_obj_currencies;

Line 4570: x_return_status := Fnd_Api.G_RET_STS_ERROR;

4566: FND_MESSAGE.set_token('OBJTYPE', p_arc_act_metric_used_by);
4567: FND_MESSAGE.set_token('OBJID', p_act_metric_used_by_id);
4568: FND_MSG_PUB.add;
4569: END IF;
4570: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4571: END IF;
4572:
4573: IF x_return_status = Fnd_Api.G_RET_STS_SUCCESS
4574: AND l_obj_ids.count > 0 THEN

Line 4573: IF x_return_status = Fnd_Api.G_RET_STS_SUCCESS

4569: END IF;
4570: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4571: END IF;
4572:
4573: IF x_return_status = Fnd_Api.G_RET_STS_SUCCESS
4574: AND l_obj_ids.count > 0 THEN
4575: FOR l_index IN l_obj_ids.first .. l_obj_ids.last
4576: LOOP
4577: l_obj_item.obj_id := l_obj_ids(l_index);

Line 4586: p_init_msg_list => Fnd_Api.G_FALSE,

4582: --Sunkumar Bug# 3106033
4583: IF l_obj_item.obj_id IS NOT NULL THEN
4584: l_is_locked := ams_actmetric_pvt.lock_object(
4585: p_api_version => 1 ,
4586: p_init_msg_list => Fnd_Api.G_FALSE,
4587: p_arc_act_metric_used_by => l_obj_item.obj_type,
4588: p_act_metric_used_by_id => l_obj_item.obj_id,
4589: x_return_status => l_return_status,
4590: x_msg_count => l_msg_count,

Line 4593: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN

4589: x_return_status => l_return_status,
4590: x_msg_count => l_msg_count,
4591: x_msg_data => l_msg_data);
4592:
4593: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
4594: RAISE Fnd_Api.G_EXC_ERROR;
4595: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
4596: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
4597: elsif l_is_locked = FND_API.G_FALSE THEN

Line 4594: RAISE Fnd_Api.G_EXC_ERROR;

4590: x_msg_count => l_msg_count,
4591: x_msg_data => l_msg_data);
4592:
4593: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
4594: RAISE Fnd_Api.G_EXC_ERROR;
4595: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
4596: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
4597: elsif l_is_locked = FND_API.G_FALSE THEN
4598: -- the object needs to be lock by this process.

Line 4595: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN

4591: x_msg_data => l_msg_data);
4592:
4593: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
4594: RAISE Fnd_Api.G_EXC_ERROR;
4595: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
4596: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
4597: elsif l_is_locked = FND_API.G_FALSE THEN
4598: -- the object needs to be lock by this process.
4599: RAISE ams_utility_pvt.resource_locked;

Line 4596: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

4592:
4593: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
4594: RAISE Fnd_Api.G_EXC_ERROR;
4595: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
4596: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
4597: elsif l_is_locked = FND_API.G_FALSE THEN
4598: -- the object needs to be lock by this process.
4599: RAISE ams_utility_pvt.resource_locked;
4600: END IF;

Line 4597: elsif l_is_locked = FND_API.G_FALSE THEN

4593: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
4594: RAISE Fnd_Api.G_EXC_ERROR;
4595: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
4596: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
4597: elsif l_is_locked = FND_API.G_FALSE THEN
4598: -- the object needs to be lock by this process.
4599: RAISE ams_utility_pvt.resource_locked;
4600: END IF;
4601: END IF;

Line 5099: IF SQL%ROWCOUNT > 0 AND p_commit = FND_API.G_TRUE THEN

5095: IF AMS_DEBUG_HIGH_ON THEN
5096: write_msg(L_API_NAME, 'INSERTED EXISTING METRICS: '||SQL%ROWCOUNT);
5097: END IF;
5098:
5099: IF SQL%ROWCOUNT > 0 AND p_commit = FND_API.G_TRUE THEN
5100: COMMIT;
5101: IF AMS_DEBUG_HIGH_ON THEN
5102: write_msg(L_API_NAME, 'COMMIT');
5103: END IF;

Line 5279: IF SQL%ROWCOUNT > 0 AND p_commit = FND_API.G_TRUE THEN

5275: IF AMS_DEBUG_HIGH_ON THEN
5276: write_msg(L_API_NAME, 'INSERTED new metrics: '|| SQL%ROWCOUNT);
5277: END IF;
5278:
5279: IF SQL%ROWCOUNT > 0 AND p_commit = FND_API.G_TRUE THEN
5280: COMMIT;
5281: IF AMS_DEBUG_HIGH_ON THEN
5282: write_msg(L_API_NAME, 'COMMIT');
5283: END IF;

Line 5555: IF SQL%ROWCOUNT > 0 AND p_commit = FND_API.G_TRUE THEN

5551: IF AMS_DEBUG_HIGH_ON THEN
5552: write_msg(L_API_NAME, 'UPDATED repeat updates: count='||SQL%ROWCOUNT);
5553: END IF;
5554:
5555: IF SQL%ROWCOUNT > 0 AND p_commit = FND_API.G_TRUE THEN
5556: COMMIT;
5557: IF AMS_DEBUG_HIGH_ON THEN
5558: write_msg(L_API_NAME, 'COMMIT');
5559: END IF;

Line 5595: IF SQL%ROWCOUNT > 0 AND p_commit = FND_API.G_TRUE THEN

5591: IF AMS_DEBUG_HIGH_ON THEN
5592: write_msg(L_API_NAME, 'Deleted today UPDATED: '||SQL%ROWCOUNT);
5593: END IF;
5594:
5595: IF SQL%ROWCOUNT > 0 AND p_commit = FND_API.G_TRUE THEN
5596: COMMIT;
5597: IF AMS_DEBUG_HIGH_ON THEN
5598: write_msg(L_API_NAME, 'COMMIT');
5599: END IF;

Line 5779: IF SQL%ROWCOUNT > 0 AND p_commit = FND_API.G_TRUE THEN

5775: IF AMS_DEBUG_HIGH_ON THEN
5776: write_msg(L_API_NAME, 'Inserted delete before today: '||SQL%ROWCOUNT);
5777: END IF;
5778:
5779: IF SQL%ROWCOUNT > 0 AND p_commit = FND_API.G_TRUE THEN
5780: COMMIT;
5781: IF AMS_DEBUG_HIGH_ON THEN
5782: write_msg(L_API_NAME, 'COMMIT');
5783: END IF;

Line 5951: p_commit IN VARCHAR2 := Fnd_Api.G_TRUE,

5947: --
5948: PROCEDURE Update_formulas(
5949: x_errbuf OUT NOCOPY VARCHAR2,
5950: x_retcode OUT NOCOPY NUMBER,
5951: p_commit IN VARCHAR2 := Fnd_Api.G_TRUE,
5952: p_object_list IN object_currency_table := Empty_object_currency_table,
5953: p_current_date IN date,
5954: p_func_currency IN varchar2
5955: )

Line 6300: p_round => fnd_api.g_false);

6296: p_from_amount => l_func_actual_values(l_index),
6297: x_to_amount => l_trans_actual_values(l_index),
6298: p_from_amount2 => l_func_forecasted_values(l_index),
6299: x_to_amount2 => l_trans_forecasted_values(l_index),
6300: p_round => fnd_api.g_false);
6301: else -- Error: display type not supported.
6302: IF AMS_DEBUG_MEDIUM_ON THEN
6303: write_msg(L_API_NAME, 'display_type not supported='||
6304: l_display_types(l_index));

Line 6345: IF p_commit = FND_API.G_TRUE THEN

6341: dirty_flag = G_NOT_DIRTY
6342: WHERE activity_metric_id = l_activity_metric_ids(l_index);
6343:
6344: l_first := l_last + 1;
6345: IF p_commit = FND_API.G_TRUE THEN
6346: COMMIT;
6347: IF AMS_DEBUG_MEDIUM_ON THEN
6348: write_msg(L_API_NAME, 'BATCH COMMIT: l_last='||l_last);
6349: END IF;

Line 6385: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,

6381: -- 22-Aug_2003 dmvincen Created.
6382: -------------------------------------------------------------------------------
6383: PROCEDURE Update_formulas (
6384: p_api_version IN NUMBER,
6385: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
6386: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
6387:
6388: x_return_status OUT NOCOPY VARCHAR2,
6389: x_msg_count OUT NOCOPY NUMBER,

Line 6386: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,

6382: -------------------------------------------------------------------------------
6383: PROCEDURE Update_formulas (
6384: p_api_version IN NUMBER,
6385: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
6386: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
6387:
6388: x_return_status OUT NOCOPY VARCHAR2,
6389: x_msg_count OUT NOCOPY NUMBER,
6390: x_msg_data OUT NOCOPY VARCHAR2,

Line 6408: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

6404: begin
6405:
6406: savepoint sp_Update_formulas;
6407:
6408: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
6409:
6410: l_index := l_object_list.count + 1;
6411: l_object_list(l_index).obj_type := p_arc_act_metric_used_by;
6412: l_object_list(l_index).obj_id := p_act_metric_used_by_id;

Line 6416: p_commit => FND_API.G_FALSE,

6412: l_object_list(l_index).obj_id := p_act_metric_used_by_id;
6413:
6414: Update_formulas(x_errbuf => l_errbuf,
6415: x_retcode => l_retcode,
6416: p_commit => FND_API.G_FALSE,
6417: p_object_list => l_object_list,
6418: p_current_date => l_current_date,
6419: p_func_currency => l_default_currency);
6420:

Line 6422: IF x_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN

6418: p_current_date => l_current_date,
6419: p_func_currency => l_default_currency);
6420:
6421: -- If any errors happen abort API.
6422: IF x_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
6423: RAISE Fnd_Api.G_EXC_ERROR;
6424: END IF;
6425:
6426: --COMMIT WORK;

Line 6423: RAISE Fnd_Api.G_EXC_ERROR;

6419: p_func_currency => l_default_currency);
6420:
6421: -- If any errors happen abort API.
6422: IF x_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
6423: RAISE Fnd_Api.G_EXC_ERROR;
6424: END IF;
6425:
6426: --COMMIT WORK;
6427:

Line 6428: IF Fnd_Api.to_boolean(p_commit) THEN

6424: END IF;
6425:
6426: --COMMIT WORK;
6427:
6428: IF Fnd_Api.to_boolean(p_commit) THEN
6429: COMMIT;
6430: END IF;
6431:
6432: --

Line 6439: p_encoded => Fnd_Api.G_FALSE

6435: --
6436: Fnd_Msg_Pub.Count_And_Get (
6437: p_count => x_msg_count,
6438: p_data => x_msg_data,
6439: p_encoded => Fnd_Api.G_FALSE
6440: );
6441:
6442: EXCEPTION
6443: WHEN Fnd_Api.G_EXC_ERROR THEN

Line 6443: WHEN Fnd_Api.G_EXC_ERROR THEN

6439: p_encoded => Fnd_Api.G_FALSE
6440: );
6441:
6442: EXCEPTION
6443: WHEN Fnd_Api.G_EXC_ERROR THEN
6444: ROLLBACK TO sp_Update_formulas;
6445: x_return_status := Fnd_Api.G_RET_STS_ERROR;
6446: Fnd_Msg_Pub.Count_And_Get (
6447: p_count => x_msg_count,

Line 6445: x_return_status := Fnd_Api.G_RET_STS_ERROR;

6441:
6442: EXCEPTION
6443: WHEN Fnd_Api.G_EXC_ERROR THEN
6444: ROLLBACK TO sp_Update_formulas;
6445: x_return_status := Fnd_Api.G_RET_STS_ERROR;
6446: Fnd_Msg_Pub.Count_And_Get (
6447: p_count => x_msg_count,
6448: p_data => x_msg_data,
6449: p_encoded => FND_API.G_FALSE

Line 6449: p_encoded => FND_API.G_FALSE

6445: x_return_status := Fnd_Api.G_RET_STS_ERROR;
6446: Fnd_Msg_Pub.Count_And_Get (
6447: p_count => x_msg_count,
6448: p_data => x_msg_data,
6449: p_encoded => FND_API.G_FALSE
6450: );
6451: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
6452: ROLLBACK TO sp_Update_formulas;
6453: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 6451: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

6447: p_count => x_msg_count,
6448: p_data => x_msg_data,
6449: p_encoded => FND_API.G_FALSE
6450: );
6451: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
6452: ROLLBACK TO sp_Update_formulas;
6453: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
6454: Fnd_Msg_Pub.Count_And_Get (
6455: p_count => x_msg_count,

Line 6453: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

6449: p_encoded => FND_API.G_FALSE
6450: );
6451: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
6452: ROLLBACK TO sp_Update_formulas;
6453: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
6454: Fnd_Msg_Pub.Count_And_Get (
6455: p_count => x_msg_count,
6456: p_data => x_msg_data,
6457: p_encoded => FND_API.G_FALSE

Line 6457: p_encoded => FND_API.G_FALSE

6453: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
6454: Fnd_Msg_Pub.Count_And_Get (
6455: p_count => x_msg_count,
6456: p_data => x_msg_data,
6457: p_encoded => FND_API.G_FALSE
6458: );
6459: WHEN OTHERS THEN
6460: ROLLBACK TO sp_Update_formulas;
6461: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 6461: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

6457: p_encoded => FND_API.G_FALSE
6458: );
6459: WHEN OTHERS THEN
6460: ROLLBACK TO sp_Update_formulas;
6461: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
6462: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
6463: Fnd_Msg_Pub.Add_Exc_Msg (G_PKG_NAME, L_API_NAME);
6464: END IF;
6465: Fnd_Msg_Pub.Count_And_Get (

Line 6468: p_encoded => FND_API.G_FALSE

6464: END IF;
6465: Fnd_Msg_Pub.Count_And_Get (
6466: p_count => x_msg_count,
6467: p_data => x_msg_data,
6468: p_encoded => FND_API.G_FALSE
6469: );
6470:
6471: end Update_formulas;
6472:

Line 6497: x_return_status := FND_API.G_RET_STS_SUCCESS;

6493:
6494:
6495: BEGIN
6496:
6497: x_return_status := FND_API.G_RET_STS_SUCCESS;
6498: x_msg_data := l_msg_data;
6499:
6500: --bms_output.put_line('deleting all entries');
6501: IF AMS_DEBUG_HIGH_ON THEN

Line 6664: x_return_status := FND_API.G_RET_STS_SUCCESS;

6660: l_calc_since DATE := sysdate - fnd_profile.value('AMS_METR_SEEDED_CALC_EXP');
6661:
6662: BEGIN
6663:
6664: x_return_status := FND_API.G_RET_STS_SUCCESS;
6665:
6666: ----Ams_Utility_Pvt.Write_Conc_log('Inserting entries ams_act_metrics_all_denorm') ;
6667: l_metric_col_date := SYSDATE;
6668:

Line 6924: p_run_incremental IN VARCHAR2 := Fnd_Api.G_TRUE

6920: --========================================================================
6921: PROCEDURE populate_metrics_denorm(
6922: errbuf OUT NOCOPY VARCHAR2,
6923: retcode OUT NOCOPY NUMBER,
6924: p_run_incremental IN VARCHAR2 := Fnd_Api.G_TRUE
6925: ) IS
6926:
6927: l_return_status VARCHAR2(1) ;
6928: l_msg_count NUMBER ;

Line 6958: IF (p_run_incremental IN (Fnd_Api.G_TRUE, 'Y') AND l_last_run_date IS NOT NULL) THEN

6954: IF AMS_DEBUG_HIGH_ON THEN
6955: write_msg('populate_metrics_denorm','Last run date determined '||TO_CHAR(l_last_run_date,'DD_MON_RRRR HH:MM:SS'));
6956: END IF;
6957:
6958: IF (p_run_incremental IN (Fnd_Api.G_TRUE, 'Y') AND l_last_run_date IS NOT NULL) THEN
6959: IF AMS_DEBUG_HIGH_ON THEN
6960: write_msg('populate_metrics_denorm','Calling populate incremental');
6961: END IF;
6962:

Line 7007: IF(l_return_status = FND_API.G_RET_STS_SUCCESS)THEN

7003:
7004: --Write_log ;
7005: ----Ams_Utility_Pvt.Write_Conc_log ;
7006:
7007: IF(l_return_status = FND_API.G_RET_STS_SUCCESS)THEN
7008: retcode :=0;
7009: ELSE
7010: retcode := 2;
7011: errbuf := l_msg_data ;