eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PA_FIN_PLAN_PVT dependencies on PA_FIN_PLAN_PVT

Line 1: PACKAGE BODY pa_fin_plan_pvt AS

1: PACKAGE BODY pa_fin_plan_pvt AS
2: /* $Header: PAFPPVTB.pls 120.17.12020000.4 2013/04/04 07:24:23 djambhek ship $
3: Start of Comments
4: Package name : PA_FIN_PLAN_UTILS
5: Purpose : utility API's for Org Forecast pages

Line 11: g_module_name VARCHAR2(100) := 'pa.plsql.PA_FIN_PLAN_PVT';

7: NOTE :
8: End of Comments
9: */
10:
11: g_module_name VARCHAR2(100) := 'pa.plsql.PA_FIN_PLAN_PVT';
12: Delete_Ver_Exc_PVT EXCEPTION;
13:
14: -- PROCEDURE lock_unlock_version
15: -- created 8/27/02

Line 673: pa_debug.write('pa_fin_plan_pvt: ' || l_module_name,pa_debug.g_err_stage,5);

669: NVL(l_auto_baseline_project,'N')='N' THEN
670:
671: IF P_PA_DEBUG_MODE = 'Y' THEN
672: pa_debug.g_err_stage := 'Updating the rev_partially_impl_flag in partially implemented CIs';
673: pa_debug.write('pa_fin_plan_pvt: ' || l_module_name,pa_debug.g_err_stage,5);
674: END IF;
675:
676: UPDATE pa_budget_versions
677: SET last_update_date = SYSDATE,

Line 688: pa_debug.write('pa_fin_plan_pvt: ' || l_module_name,pa_debug.g_err_stage,5);

684: AND rev_partially_impl_flag='Y';
685:
686: IF P_PA_DEBUG_MODE = 'Y' THEN
687: pa_debug.g_err_stage := 'No of records updated '||SQL%ROWCOUNT;
688: pa_debug.write('pa_fin_plan_pvt: ' || l_module_name,pa_debug.g_err_stage,5);
689: END IF;
690:
691: END IF;
692:

Line 835: pa_debug.write('pa_fin_plan_pvt: ' || l_module_name,pa_debug.g_err_stage,5);

831: * change documents included in that version
832: */
833: IF P_PA_DEBUG_MODE = 'Y' THEN
834: pa_debug.g_err_stage := 'After Copy Version-- Firing Select';
835: pa_debug.write('pa_fin_plan_pvt: ' || l_module_name,pa_debug.g_err_stage,5);
836: END IF;
837:
838: SELECT ci_id, inclusion_method_code, version_type, creation_date
839: BULK COLLECT INTO l_temp_ci_id_tbl, l_tmp_incl_method_code_tbl, l_version_type_tbl, l_cw_creation_date_tbl

Line 853: pa_debug.write('pa_fin_plan_pvt: ' || l_module_name,pa_debug.g_err_stage,5);

849: AND project_id = p_project_id;
850:
851: IF P_PA_DEBUG_MODE = 'Y' THEN
852: pa_debug.g_err_stage := 'Rows returned in ci_id tbl: ' || l_temp_ci_id_tbl.COUNT;
853: pa_debug.write('pa_fin_plan_pvt: ' || l_module_name,pa_debug.g_err_stage,5);
854: END IF;
855: -- Flipping inclusion_method_code, creation_date, Updating the WHO columns for the baselined version
856: IF l_temp_ci_id_tbl.COUNT > 0 THEN
857: FORALL i in l_temp_ci_id_tbl.FIRST..l_temp_ci_id_tbl.LAST

Line 1285: when pa_fin_plan_pvt.baseline_finplan_error then

1281: pa_debug.reset_err_stack;
1282: END IF;
1283: EXCEPTION
1284:
1285: when pa_fin_plan_pvt.baseline_finplan_error then
1286: rollback to before_fp_baseline;
1287: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1288: return;
1289: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 1317: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_PVT',

1313: rollback to before_fp_baseline;
1314: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1315: x_msg_count := 1;
1316: x_msg_data := SQLERRM;
1317: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_PVT',
1318: p_procedure_name => 'Baseline_FinPlan');
1319: IF p_pa_debug_mode = 'Y' THEN
1320: pa_debug.reset_err_stack;
1321: END IF;

Line 1560: raise pa_fin_plan_pvt.check_wf_error;

1556: -- l_err_code = 0 ==> SUCCESS
1557: if l_err_code <> 0 then
1558: -- PA_CLIENT_EXTN_BUDGET_WF.Budget_Wf_Is_Used returned errors
1559: --dbms_output.put_line('PA_CLIENT_EXTN_BUDGET_WF.Budget_Wf_Is_Used: RETURNED ERRORS');
1560: raise pa_fin_plan_pvt.check_wf_error;
1561: else
1562: If l_workflow_is_used = 'T' Then
1563: v_emp_id := pa_utils.GetEmpIdFromUser(pa_budget_wf.g_baselined_by_user_id);
1564:

Line 1581: raise pa_fin_plan_pvt.start_wf_error;

1577: --dbms_output.put_line('START_BUDGET_WF called');
1578: -- l_err_code = 0 ==> SUCCESS
1579: if l_err_code <> 0 then
1580: -- PA_BUDGET_WF.START_BUDGET_WF returned errors
1581: raise pa_fin_plan_pvt.start_wf_error;
1582: else
1583: -- update pa_budget_versions: set wf_status_code = 'IN_ROUTE'
1584: update pa_budget_versions
1585: set wf_status_code = 'IN_ROUTE'

Line 1604: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_PVT',

1600: when others then
1601: rollback to before_fp_sbmt_cur_working;
1602: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1603: x_msg_count := 1;
1604: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_PVT',
1605: p_procedure_name => 'Submit_Current_Working_FinPlan');
1606: IF p_pa_debug_mode = 'Y' THEN
1607: pa_debug.reset_err_stack;
1608: END IF;

Line 1638: ,x_ci_rec_tab OUT NOCOPY pa_fin_plan_pvt.ci_rec_tab

1634: PROCEDURE Get_Included_Ci
1635: ( p_from_bv_id IN pa_budget_versions.budget_version_id%TYPE
1636: ,p_to_bv_id IN pa_budget_versions.budget_version_id%TYPE --DEFAULT NULL
1637: ,p_impact_status IN pa_ci_impacts.status_code%TYPE
1638: ,x_ci_rec_tab OUT NOCOPY pa_fin_plan_pvt.ci_rec_tab
1639: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
1640: ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
1641: ,x_msg_data OUT NOCOPY VARCHAR2) --File.Sql.39 bug 4440895
1642:

Line 1779: ( p_pkg_name => 'pa_fin_plan_pvt'

1775: x_msg_count := 1;
1776: x_msg_data := substr(SQLERRM,1,240);
1777:
1778: fnd_msg_pub.add_exc_msg
1779: ( p_pkg_name => 'pa_fin_plan_pvt'
1780: ,p_procedure_name => 'Get_Included_Ci'
1781: ,p_error_text => substr(SQLERRM,1,240));
1782:
1783: END Get_Included_Ci;

Line 1815: l_ci_rec_tab pa_fin_plan_pvt.ci_rec_tab;

1811: l_fin_plan_type_id pa_budget_versions.fin_plan_type_id%TYPE;
1812: l_version_type pa_budget_versions.version_type%TYPE;
1813: l_fp_options_id pa_proj_fp_options.proj_fp_options_id%TYPE;
1814: l_fin_plan_version_id pa_proj_fp_options.fin_plan_version_id%TYPE;
1815: l_ci_rec_tab pa_fin_plan_pvt.ci_rec_tab;
1816: l_return_status VARCHAR2(2000);
1817: l_msg_count NUMBER;
1818: l_msg_data VARCHAR2(2000);
1819: l_msg_index_out number;

Line 1856: ( p_pkg_name => 'pa_fin_plan_pvt'

1852: ,x_msg_data => l_msg_data);
1853:
1854: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1855: fnd_msg_pub.add_exc_msg
1856: ( p_pkg_name => 'pa_fin_plan_pvt'
1857: ,p_procedure_name => 'handle_ci_links'
1858: ,p_error_text => to_char(l_stage)||': '||substr(SQLERRM,1,240));
1859: ELSE
1860: /* Get ci linked to latest baselined versions and not already present

Line 1869: pa_fin_plan_pvt.Get_Included_Ci(

1865:
1866: l_stage := 70;
1867: l_ci_rec_tab.delete;
1868:
1869: pa_fin_plan_pvt.Get_Included_Ci(
1870: p_from_bv_id => l_fin_plan_version_id /* Baselined Version */
1871: , p_to_bv_id => p_target_bv_id /* New Current Working */
1872: , p_impact_status => NULL
1873: , x_ci_rec_tab => l_ci_rec_tab

Line 1881: ( p_pkg_name => 'pa_fin_plan_pvt'

1877:
1878:
1879: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1880: fnd_msg_pub.add_exc_msg
1881: ( p_pkg_name => 'pa_fin_plan_pvt'
1882: ,p_procedure_name => 'handle_ci_links'
1883: ,p_error_text => to_char(l_stage)||': '||substr(SQLERRM,1,240));
1884: ELSE
1885: l_stage := 80;

Line 1917: ( p_pkg_name => 'pa_fin_plan_pvt'

1913: ) ;
1914:
1915: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1916: fnd_msg_pub.add_exc_msg
1917: ( p_pkg_name => 'pa_fin_plan_pvt'
1918: ,p_procedure_name => 'handle_ci_links'
1919: ,p_error_text => to_char(l_stage)||': '||substr(SQLERRM,1,240));
1920: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS
1921: END LOOP;

Line 1933: pa_fin_plan_pvt.Get_Included_Ci(

1929: contains the links to ci from Latest Baselined version */
1930: l_stage := 110;
1931: l_ci_rec_tab.delete;
1932:
1933: pa_fin_plan_pvt.Get_Included_Ci(
1934: p_from_bv_id => p_source_bv_id /* Old Current Working */
1935: , p_to_bv_id => p_target_bv_id /* New Current Working */
1936: , p_impact_status => 'CI_IMPACT_IMPLEMENTED'
1937: , x_ci_rec_tab => l_ci_rec_tab

Line 1945: ( p_pkg_name => 'pa_fin_plan_pvt'

1941:
1942:
1943: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1944: fnd_msg_pub.add_exc_msg
1945: ( p_pkg_name => 'pa_fin_plan_pvt'
1946: ,p_procedure_name => 'handle_ci_links'
1947: ,p_error_text => to_char(l_stage)||': '||substr(SQLERRM,1,240));
1948: ELSE
1949: l_stage := 120;

Line 1986: ( p_pkg_name => 'pa_fin_plan_pvt'

1982: ,x_msg_data => l_msg_data);
1983:
1984: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1985: fnd_msg_pub.add_exc_msg
1986: ( p_pkg_name => 'pa_fin_plan_pvt'
1987: ,p_procedure_name => 'handle_ci_links'
1988: ,p_error_text => to_char(l_stage)||': '||substr(SQLERRM,1,240));
1989: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS
1990: END LOOP;

Line 2000: pa_fin_plan_pvt.Get_Included_Ci(

1996: and change their status to implemented */
1997: l_stage := 150;
1998: l_ci_rec_tab.delete;
1999:
2000: pa_fin_plan_pvt.Get_Included_Ci(
2001: p_from_bv_id => p_target_bv_id /* New Current Working */
2002: , p_to_bv_id => NULL
2003: , p_impact_status => 'CI_IMPACT_PENDING'
2004: , x_ci_rec_tab => l_ci_rec_tab

Line 2012: ( p_pkg_name => 'pa_fin_plan_pvt'

2008:
2009:
2010: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2011: fnd_msg_pub.add_exc_msg
2012: ( p_pkg_name => 'pa_fin_plan_pvt'
2013: ,p_procedure_name => 'handle_ci_links'
2014: ,p_error_text => to_char(l_stage)||': '||substr(SQLERRM,1,240));
2015: ELSE
2016: l_stage := 160;

Line 2039: ( p_pkg_name => 'pa_fin_plan_pvt'

2035: ,x_msg_data => l_msg_data);
2036:
2037: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2038: fnd_msg_pub.add_exc_msg
2039: ( p_pkg_name => 'pa_fin_plan_pvt'
2040: ,p_procedure_name => 'handle_ci_links'
2041: ,p_error_text => to_char(l_stage)||': '||substr(SQLERRM,1,240));
2042: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS
2043: END LOOP;

Line 2063: ( p_pkg_name => 'pa_fin_plan_pvt'

2059: ,p_data => x_msg_data
2060: ,p_msg_index_out => l_msg_index_out);
2061: END IF;
2062: fnd_msg_pub.add_exc_msg
2063: ( p_pkg_name => 'pa_fin_plan_pvt'
2064: ,p_procedure_name => 'handle_ci_links'
2065: ,p_error_text => to_char(l_stage)||': '||substr(SQLERRM,1,240));
2066:
2067: fnd_msg_pub.count_and_get (p_count => x_msg_count,

Line 2128: ,p_budget_lines_tab IN pa_fin_plan_pvt.budget_lines_tab

2124: ,p_project_rev_rate_date_type IN pa_proj_fp_options.project_rev_rate_date_type%TYPE
2125: ,p_project_rev_rate_date IN pa_proj_fp_options.project_rev_rate_date%TYPE
2126: ,p_pm_product_code IN pa_budget_versions.pm_product_code%TYPE
2127: ,p_pm_budget_reference IN pa_budget_versions.pm_budget_reference%TYPE
2128: ,p_budget_lines_tab IN pa_fin_plan_pvt.budget_lines_tab
2129: -- Start of additional columns for Bug :- 2634900 . Commented out the default parameters.
2130: ,p_ci_id IN pa_budget_versions.ci_id%TYPE --:= NULL
2131: ,p_est_proj_raw_cost IN pa_budget_versions.est_project_raw_cost%TYPE --:= NULL
2132: ,p_est_proj_bd_cost IN pa_budget_versions.est_project_burdened_cost%TYPE--:= NULL

Line 2184: l_ci_rec_tab pa_fin_plan_pvt.ci_rec_tab; /* Included for bug 2672654 */

2180: l_uncat_rlmid pa_resource_assignments.resource_list_member_id%TYPE;
2181: l_track_as_labor_flag pa_resource_list_members.track_as_labor_flag%TYPE;
2182: l_unit_of_measure pa_resource_assignments.unit_of_measure%TYPE;
2183:
2184: l_ci_rec_tab pa_fin_plan_pvt.ci_rec_tab; /* Included for bug 2672654 */
2185:
2186: -- Bug Fix: 4569365. Removed MRC code.
2187: -- l_calling_context pa_mrc_finplan.g_calling_module%TYPE; /* Bug# 2674353 */
2188: l_calling_context VARCHAR2(30);

Line 2205: pa_debug.set_err_stack('PA_FIN_PLAN_PVT.CREATE_DRAFT');

2201:
2202: x_msg_count := 0;
2203: x_return_status := FND_API.G_RET_STS_SUCCESS;
2204: IF p_pa_debug_mode = 'Y' THEN
2205: pa_debug.set_err_stack('PA_FIN_PLAN_PVT.CREATE_DRAFT');
2206: END IF;
2207: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
2208: l_debug_mode := NVL(l_debug_mode, 'Y');
2209: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 2299: pa_fin_plan_pvt.Get_Included_Ci(

2295: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);
2296: END IF;
2297:
2298: IF (l_curr_work_version_id is not null) THEN /* Bug 2672654 */
2299: pa_fin_plan_pvt.Get_Included_Ci(
2300: p_from_bv_id => l_curr_work_version_id
2301: ,p_to_bv_id => NULL
2302: ,p_impact_status => NULL
2303: ,x_ci_rec_tab => l_ci_rec_tab /* Bug 2672654 */

Line 2339: pa_fin_plan_pvt.lock_unlock_version

2335:
2336: --Try to lock the version before deleting the version. This is required so as not to delete
2337: --versions locked by other users. AMG UT2
2338: l_user_id := FND_GLOBAL.User_id;
2339: pa_fin_plan_pvt.lock_unlock_version
2340: (p_budget_version_id => l_curr_work_version_id,
2341: p_record_version_number => l_record_version_number,
2342: p_action => 'L',
2343: p_user_id => l_user_id,

Line 2529: pa_fin_plan_pvt.lock_unlock_version

2525:
2526: --Get the record version number of the newly created version
2527: l_created_ver_rec_ver_num := pa_fin_plan_utils.Retrieve_Record_Version_Number(l_created_version_id);
2528: l_user_id := FND_GLOBAL.User_id;
2529: pa_fin_plan_pvt.lock_unlock_version
2530: (p_budget_version_id => l_CW_version_id,
2531: p_record_version_number => l_CW_record_version_number,
2532: p_action => 'L',
2533: p_user_id => l_user_id,

Line 2783: --call PA_FIN_PLAN_PVT.CRETAE_FINPLAN_LINES. This API will create

2779: END;
2780:
2781: END IF;
2782:
2783: --call PA_FIN_PLAN_PVT.CRETAE_FINPLAN_LINES. This API will create
2784: --resource assignments, elements and budget lines for the version.
2785: /* Bug# 2672654 - create_fin_plan_lines API needs to be called only if p_budget_lines_tab is not null */
2786:
2787: ELSIF ( nvl(p_budget_lines_tab.last,0) > 0 ) THEN

Line 2790: --Commented the call to PA_FIN_PLAN_PVT.CREATE_FINPLAN_LINES

2786:
2787: ELSIF ( nvl(p_budget_lines_tab.last,0) > 0 ) THEN
2788:
2789: --Bug # 3507156-
2790: --Commented the call to PA_FIN_PLAN_PVT.CREATE_FINPLAN_LINES
2791: --Comment START
2792: /*
2793: PA_FIN_PLAN_PVT.CREATE_FINPLAN_LINES
2794: ( p_calling_context => l_calling_context -- Bug# 2674353

Line 2793: PA_FIN_PLAN_PVT.CREATE_FINPLAN_LINES

2789: --Bug # 3507156-
2790: --Commented the call to PA_FIN_PLAN_PVT.CREATE_FINPLAN_LINES
2791: --Comment START
2792: /*
2793: PA_FIN_PLAN_PVT.CREATE_FINPLAN_LINES
2794: ( p_calling_context => l_calling_context -- Bug# 2674353
2795: ,p_fin_plan_version_id => l_created_version_id
2796: ,p_budget_lines_tab => p_budget_lines_tab
2797: ,x_return_status => x_return_status

Line 2810: --Added a call to PA_FIN_PLAN_PVT.ADD_FIN_PLAN_LINES

2806: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2807: END IF;
2808: */
2809: --Bug # 3507156-
2810: --Added a call to PA_FIN_PLAN_PVT.ADD_FIN_PLAN_LINES
2811:
2812: PA_FIN_PLAN_PVT.ADD_FIN_PLAN_LINES
2813: ( p_calling_context => l_calling_context
2814: ,p_fin_plan_version_id => l_created_version_id

Line 2812: PA_FIN_PLAN_PVT.ADD_FIN_PLAN_LINES

2808: */
2809: --Bug # 3507156-
2810: --Added a call to PA_FIN_PLAN_PVT.ADD_FIN_PLAN_LINES
2811:
2812: PA_FIN_PLAN_PVT.ADD_FIN_PLAN_LINES
2813: ( p_calling_context => l_calling_context
2814: ,p_fin_plan_version_id => l_created_version_id
2815: ,p_finplan_lines_tab => p_budget_lines_tab
2816: ,x_return_status => x_return_status

Line 2896: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_pvt'

2892:
2893: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2894: x_msg_count := 1;
2895: x_msg_data := SQLERRM;
2896: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_pvt'
2897: ,p_procedure_name => 'CREATE_DRAFT');
2898: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
2899: IF P_PA_DEBUG_MODE = 'Y' THEN
2900: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

Line 2917: ,p_budget_lines_tab IN pa_fin_plan_pvt.budget_lines_tab

2913: ( -- Bug Fix: 4569365. Removed MRC code.
2914: -- p_calling_context IN pa_mrc_finplan.g_calling_module%TYPE /* Bug# 2674353 */
2915: p_calling_context IN VARCHAR2
2916: ,p_fin_plan_version_id IN pa_budget_versions.budget_version_id%TYPE
2917: ,p_budget_lines_tab IN pa_fin_plan_pvt.budget_lines_tab
2918: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
2919: ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
2920: ,x_msg_data OUT NOCOPY VARCHAR2) --File.Sql.39 bug 4440895
2921: IS

Line 3014: pa_debug.set_err_stack('pa_fin_plan_pvt.CREATE_FINPLAN_LINES');

3010:
3011: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
3012: l_debug_mode := NVL(l_debug_mode, 'Y');
3013: IF p_pa_debug_mode = 'Y' THEN
3014: pa_debug.set_err_stack('pa_fin_plan_pvt.CREATE_FINPLAN_LINES');
3015: END IF;
3016: IF P_PA_DEBUG_MODE = 'Y' THEN
3017: pa_debug.set_process('CREATE_FINPLAN_LINES: ' || 'PLSQL','LOG',l_debug_mode);
3018: END IF;

Line 3750: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_pvt'

3746:
3747: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3748: x_msg_count := 1;
3749: x_msg_data := SQLERRM;
3750: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_pvt'
3751: ,p_procedure_name => 'CREATE_FINPLAN_LINES');
3752: IF P_PA_DEBUG_MODE = 'Y' THEN
3753: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
3754: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);

Line 3950: ( p_pkg_name => 'pa_fin_plan_pvt'

3946: x_msg_data := SQLERRM;
3947:
3948:
3949: FND_MSG_PUB.add_exc_msg
3950: ( p_pkg_name => 'pa_fin_plan_pvt'
3951: ,p_procedure_name => 'convert_plan_type_name_to_id'
3952: ,p_error_text => x_msg_data);
3953:
3954: IF l_debug_mode = 'Y' THEN

Line 4020: PA_DEBUG.Set_Curr_Function( p_function => 'PA_FIN_PLAN_PVT.Delete_wp_option',

4016: l_debug_mode := NVL(l_debug_mode, 'N');
4017: x_msg_count := 0;
4018: x_return_status := FND_API.G_RET_STS_SUCCESS;
4019: IF p_pa_debug_mode = 'Y' THEN
4020: PA_DEBUG.Set_Curr_Function( p_function => 'PA_FIN_PLAN_PVT.Delete_wp_option',
4021: p_debug_mode => l_debug_mode );
4022: END IF;
4023: ---------------------------------------------------------------
4024: -- validating input parameter p_project_id.

Line 4194: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PVT'

4190: ROLLBACK TO SAVEPOINT DELETE_WP_OPTION_SAVE;
4191: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4192: x_msg_count := 1;
4193: x_msg_data := SQLERRM;
4194: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PVT'
4195: ,p_procedure_name => 'Delete_wp_option');
4196:
4197: IF l_debug_mode = 'Y' THEN
4198: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;

Line 4246: PA_DEBUG.Set_Curr_Function( p_function => 'PA_FIN_PLAN_PVT.Delete_wp_bugdet_versions',

4242: l_debug_mode := NVL(l_debug_mode, 'N');
4243: x_msg_count := 0;
4244: x_return_status := FND_API.G_RET_STS_SUCCESS;
4245: IF p_pa_debug_mode = 'Y' THEN
4246: PA_DEBUG.Set_Curr_Function( p_function => 'PA_FIN_PLAN_PVT.Delete_wp_bugdet_versions',
4247: p_debug_mode => l_debug_mode );
4248: END IF;
4249:
4250: ------------------------------------------------------------------------

Line 4375: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PVT'

4371: ROLLBACK TO SAVEPOINT DELETE_WP_OPTION_SAVE;
4372: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4373: x_msg_count := 1;
4374: x_msg_data := SQLERRM;
4375: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PVT'
4376: ,p_procedure_name => 'Delete_wp_budget_versions');
4377:
4378: IF l_debug_mode = 'Y' THEN
4379: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;

Line 4392: ,p_finplan_lines_tab IN pa_fin_plan_pvt.budget_lines_tab

4388: ( -- Bug Fix: 4569365. Removed MRC code.
4389: -- p_calling_context IN pa_mrc_finplan.g_calling_module%TYPE
4390: p_calling_context IN VARCHAR2
4391: ,p_fin_plan_version_id IN pa_budget_versions.budget_version_id%TYPE
4392: ,p_finplan_lines_tab IN pa_fin_plan_pvt.budget_lines_tab
4393: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
4394: ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
4395: ,x_msg_data OUT NOCOPY VARCHAR2) --File.Sql.39 bug 4440895
4396: IS

Line 4417: l_module_name VARCHAR2(30) := 'pa.plsql.PA_FIN_PLAN_PVT';

4413: l_line_start_date_tab SYSTEM.pa_date_tbl_type := SYSTEM.pa_date_tbl_type();
4414: l_line_end_date_tab SYSTEM.pa_date_tbl_type := SYSTEM.pa_date_tbl_type();
4415: i NUMBER;
4416: l_lines_count NUMBER; -- Bug 3639983
4417: l_module_name VARCHAR2(30) := 'pa.plsql.PA_FIN_PLAN_PVT';
4418: l_project_id pa_budget_versions.project_id%TYPE;
4419: l_fp_version_ids SYSTEM.pa_num_tbl_type := SYSTEM.pa_num_tbl_type();
4420: l_txn_currency_code_tab SYSTEM.pa_varchar2_15_tbl_type := SYSTEM.pa_varchar2_15_tbl_type();
4421: l_txn_currency_override_tab SYSTEM.pa_varchar2_15_tbl_type := SYSTEM.pa_varchar2_15_tbl_type();

Line 4443: PA_DEBUG.Set_Curr_Function( p_function => 'PA_FIN_PLAN_PVT.ADD_FIN_PLAN_LINES',

4439: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4440: l_debug_mode := NVL(l_debug_mode, 'Y');
4441:
4442: IF p_pa_debug_mode = 'Y' THEN
4443: PA_DEBUG.Set_Curr_Function( p_function => 'PA_FIN_PLAN_PVT.ADD_FIN_PLAN_LINES',
4444: p_debug_mode => l_debug_mode );
4445: END IF;
4446: l_lines_count := p_finplan_lines_tab.COUNT;
4447: IF l_debug_mode = 'Y' THEN

Line 4468: --Call to api PA_FIN_PLAN_PVT.CREATE_FINPLAN_LINES

4464: pa_debug.g_err_stage:='Calling CREATE_FINPLAN_LINES';
4465: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4466: END IF;
4467:
4468: --Call to api PA_FIN_PLAN_PVT.CREATE_FINPLAN_LINES
4469:
4470: IF ( nvl(p_finplan_lines_tab.last,0) > 0 ) THEN
4471:
4472: PA_FIN_PLAN_PVT.CREATE_FINPLAN_LINES

Line 4472: PA_FIN_PLAN_PVT.CREATE_FINPLAN_LINES

4468: --Call to api PA_FIN_PLAN_PVT.CREATE_FINPLAN_LINES
4469:
4470: IF ( nvl(p_finplan_lines_tab.last,0) > 0 ) THEN
4471:
4472: PA_FIN_PLAN_PVT.CREATE_FINPLAN_LINES
4473: ( p_calling_context => p_calling_context
4474: ,p_fin_plan_version_id => p_fin_plan_version_id
4475: ,p_budget_lines_tab => p_finplan_lines_tab
4476: ,x_return_status => x_return_status

Line 4782: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_pvt'

4778: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4779: x_msg_count := 1;
4780: x_msg_data := SQLERRM;
4781:
4782: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_pvt'
4783: ,p_procedure_name => 'ADD_FIN_PLAN_LINES');
4784: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
4785:
4786: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 4794: END pa_fin_plan_pvt;

4790: RAISE;
4791:
4792: END ADD_FIN_PLAN_LINES;
4793:
4794: END pa_fin_plan_pvt;