DBA Data[Home] [Help]

APPS.PA_FP_CALC_PLAN_PKG dependencies on PA_FP_CALC_PLAN_PKG

Line 1: PACKAGE BODY PA_FP_CALC_PLAN_PKG AS

1: PACKAGE BODY PA_FP_CALC_PLAN_PKG AS
2: --$Header: PAFPCALB.pls 120.37.12020000.6 2013/03/13 23:42:58 srakitin ship $
3:
4: g_module_name VARCHAR2(100) := 'pa.plsql.PA_FP_CALC_PLAN_PKG';
5: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

Line 4: g_module_name VARCHAR2(100) := 'pa.plsql.PA_FP_CALC_PLAN_PKG';

1: PACKAGE BODY PA_FP_CALC_PLAN_PKG AS
2: --$Header: PAFPCALB.pls 120.37.12020000.6 2013/03/13 23:42:58 srakitin ship $
3:
4: g_module_name VARCHAR2(100) := 'pa.plsql.PA_FP_CALC_PLAN_PKG';
5: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
6:
7: skip_record EXCEPTION;
8: g_stage Varchar2(1000);

Line 1384: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

1380: EXCEPTION
1381: WHEN OTHERS THEN
1382: x_return_status := 'U';
1383: fnd_msg_pub.add_exc_msg
1384: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
1385: ,p_procedure_name => 'SetGatherTmpTblIndxStats' );
1386: print_msg('Failed in SetGatherTmpTblIndxStats substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
1387: ROLLBACK;
1388: RAISE;

Line 1489: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

1485: EXCEPTION
1486: WHEN OTHERS THEN
1487: x_return_status := 'U';
1488: fnd_msg_pub.add_exc_msg
1489: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
1490: ,p_procedure_name => 'initialize_fp_cur_details' );
1491: print_msg('Failed in initialize_fp_cur_details substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
1492: RAISE;
1493:

Line 2340: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.Update_PCPFCrounding_diff');

2336: l_return_status := 'S';
2337: l_msg_count := 0;
2338: l_msg_data := NULL;
2339: IF p_pa_debug_mode = 'Y' Then
2340: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.Update_PCPFCrounding_diff');
2341: End If;
2342:
2343: g_stage := 'Update_PCPFC_rounding_diff:100';
2344: pa_debug.g_err_stage := 'Entered Update_PCPFCrounding_diff API';

Line 2544: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

2540: print_msg('Failed in Update_PCPFCrounding_diff API ['||sqlcode||sqlerrm);
2541: x_return_status := 'U';
2542: x_msg_data := sqlcode||sqlerrm;
2543: fnd_msg_pub.add_exc_msg
2544: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
2545: ,p_procedure_name => 'Update_PCPFC_rounding_diff' );
2546: print_msg('Failed in Update_PCPFC_rounding_diff substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
2547: IF p_pa_debug_mode = 'Y' Then
2548: pa_debug.reset_err_stack;

Line 2642: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.Update_rounding_diff');

2638: l_return_status := 'S';
2639: l_msg_count := 0;
2640: l_msg_data := NULL;
2641: IF p_pa_debug_mode = 'Y' Then
2642: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.Update_rounding_diff');
2643: End If;
2644:
2645: g_stage := 'Update_rounding_diff:100';
2646: pa_debug.g_err_stage := 'Entered Update_rounding_diff API';

Line 2774: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

2770: print_msg('Failed in Update_rounding_diff API ['||sqlcode||sqlerrm);
2771: x_return_status := 'U';
2772: x_msg_data := sqlcode||sqlerrm;
2773: fnd_msg_pub.add_exc_msg
2774: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
2775: ,p_procedure_name => 'Update_rounding_diff' );
2776: print_msg('Failed in Update_rounding_diff substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
2777: IF p_pa_debug_mode = 'Y' Then
2778: pa_debug.reset_err_stack;

Line 2884: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.validate_inputs');

2880: x_msg_count := NULL;
2881: x_msg_data := NULL;
2882: l_return_status := 'S';
2883: IF p_pa_debug_mode = 'Y' Then
2884: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.validate_inputs');
2885: pa_debug.g_err_stage := 'Entered PA_FP_CALC_PLAN_PKG.validate_inputs';
2886: End If;
2887: g_stage := 'validate_inputs:100';
2888: /*

Line 2885: pa_debug.g_err_stage := 'Entered PA_FP_CALC_PLAN_PKG.validate_inputs';

2881: x_msg_data := NULL;
2882: l_return_status := 'S';
2883: IF p_pa_debug_mode = 'Y' Then
2884: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.validate_inputs');
2885: pa_debug.g_err_stage := 'Entered PA_FP_CALC_PLAN_PKG.validate_inputs';
2886: End If;
2887: g_stage := 'validate_inputs:100';
2888: /*
2889: -- Check to see if Budget_version_id, project_id, or source_context

Line 3303: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

3299: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3300: x_msg_count := 1;
3301: x_msg_data := SQLCODE||SQLERRM;
3302: fnd_msg_pub.add_exc_msg
3303: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
3304: ,p_procedure_name => 'validate_inputs' );
3305: print_msg(to_char(l_stage)||' substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
3306: IF p_pa_debug_mode = 'Y' Then
3307: pa_debug.reset_err_stack;

Line 3399: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

3395: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3396: x_msg_data := SQLCODE||SQLERRM;
3397: print_msg('Errored in Reset_Planning_end_date API ['||x_msg_data||']');
3398: fnd_msg_pub.add_exc_msg
3399: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
3400: ,p_procedure_name => 'Reset_Planning_end_date');
3401: print_msg(to_char(l_stage)||' substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
3402: RAISE;
3403: END Reset_Planning_end_date;

Line 3736: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.Get_Agreement_Details');

3732: l_error_msg_code Varchar2(100);
3733: INVALID_EXCEPTION EXCEPTION;
3734: BEGIN
3735: IF p_pa_debug_mode = 'Y' Then
3736: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.Get_Agreement_Details');
3737: print_msg('Entered Get_Agreement_Details Api');
3738: End If;
3739: x_return_status := 'S';
3740:

Line 3768: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

3764:
3765: WHEN OTHERS THEN
3766: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3767: fnd_msg_pub.add_exc_msg
3768: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
3769: ,p_procedure_name => 'Get_Agreement_Details' );
3770: print_msg('Failed in Get_Agreement_Details substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
3771: IF p_pa_debug_mode = 'Y' Then
3772: pa_debug.reset_err_stack;

Line 4061: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.clear_closed_period_etcs');

4057: END initUpdPlsqlTabs;
4058:
4059: BEGIN
4060: IF p_pa_debug_mode = 'Y' Then
4061: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.clear_closed_period_etcs');
4062: End If;
4063: x_return_status := 'S';
4064: l_stage := 'Entered clear_closed_period_etcs api ETC Date['||p_etc_start_date||']';
4065: g_stage := 'clear_closed_period_etcs:100';

Line 4574: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

4570: EXCEPTION
4571: WHEN OTHERS THEN
4572: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4573: fnd_msg_pub.add_exc_msg
4574: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
4575: ,p_procedure_name => 'clear_closed_period_etcs' );
4576: IF p_pa_debug_mode = 'Y' Then
4577: pa_debug.reset_err_stack;
4578: end if;

Line 4690: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

4686: EXCEPTION
4687: WHEN OTHERS THEN
4688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4689: fnd_msg_pub.add_exc_msg
4690: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
4691: ,p_procedure_name => 'Upd_spread_calc_tmp' );
4692: RAISE;
4693:
4694: END Upd_spread_calc_tmp;

Line 5180: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.delete_budget_lines');

5176: l_return_status := 'S';
5177: x_msg_data := NULL;
5178: g_stage := 'delete_budget_lines:100';
5179: IF p_pa_debug_mode = 'Y' Then
5180: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.delete_budget_lines');
5181: print_msg('Entered PA_FP_CALC_PLAN_PKG.delete_budget_lines ResAssId['||p_resource_assignment_id||']spreadDate['||g_spread_from_date||']');
5182: End If;
5183: l_stage := 7800;
5184: OPEN get_delete_bl_id ;

Line 5181: print_msg('Entered PA_FP_CALC_PLAN_PKG.delete_budget_lines ResAssId['||p_resource_assignment_id||']spreadDate['||g_spread_from_date||']');

5177: x_msg_data := NULL;
5178: g_stage := 'delete_budget_lines:100';
5179: IF p_pa_debug_mode = 'Y' Then
5180: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.delete_budget_lines');
5181: print_msg('Entered PA_FP_CALC_PLAN_PKG.delete_budget_lines ResAssId['||p_resource_assignment_id||']spreadDate['||g_spread_from_date||']');
5182: End If;
5183: l_stage := 7800;
5184: OPEN get_delete_bl_id ;
5185: FETCH get_delete_bl_id BULK COLLECT INTO

Line 5619: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

5615: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5616: x_msg_count := 1;
5617: x_msg_data := 'Stage['||l_stage||SQLCODE||SQLERRM;
5618: fnd_msg_pub.add_exc_msg
5619: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
5620: ,p_procedure_name => 'delete_budget_lines' );
5621: IF p_pa_debug_mode = 'Y' Then
5622: pa_debug.reset_err_stack;
5623: End If;

Line 5673: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.chk_req_rate_api_inputs');

5669:
5670: x_return_status := FND_API.G_RET_STS_SUCCESS;
5671: l_return_status := 'S';
5672: IF p_pa_debug_mode = 'Y' Then
5673: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.chk_req_rate_api_inputs');
5674: End If;
5675:
5676: g_stage := 'chk_req_rate_api_inputs:100';
5677: l_stage := 8010;

Line 5740: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

5736: WHEN OTHERS THEN
5737:
5738: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5739: fnd_msg_pub.add_exc_msg
5740: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
5741: ,p_procedure_name => 'chk_req_rate_api_inputs' );
5742: IF p_pa_debug_mode = 'Y' Then
5743: pa_debug.reset_err_stack;
5744: End If;

Line 5769: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.populate_rollup_tmp');

5765: x_return_status := 'S';
5766: l_stage := 2000;
5767: g_stage := 'populate_rollup_tmp:100';
5768: IF p_pa_debug_mode = 'Y' Then
5769: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.populate_rollup_tmp');
5770: print_msg(to_char(l_stage)||'Entered PA_FP_CALC_PLAN_PKG.populate_rollup_tmp');
5771: End If;
5772: /*
5773: If P_PA_DEBUG_MODE = 'Y' Then

Line 5770: print_msg(to_char(l_stage)||'Entered PA_FP_CALC_PLAN_PKG.populate_rollup_tmp');

5766: l_stage := 2000;
5767: g_stage := 'populate_rollup_tmp:100';
5768: IF p_pa_debug_mode = 'Y' Then
5769: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.populate_rollup_tmp');
5770: print_msg(to_char(l_stage)||'Entered PA_FP_CALC_PLAN_PKG.populate_rollup_tmp');
5771: End If;
5772: /*
5773: If P_PA_DEBUG_MODE = 'Y' Then
5774: for i in (select * from pa_fp_spread_calc_tmp ) LOOP

Line 6272: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

6268: WHEN OTHERS THEN
6269: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6270: x_msg_data := sqlcode||sqlerrm;
6271: fnd_msg_pub.add_exc_msg
6272: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
6273: ,p_procedure_name => 'populate_rollup_tmp' );
6274: l_stage := 2120;
6275: print_msg(to_char(l_stage)||' substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
6276: IF p_pa_debug_mode = 'Y' Then

Line 6370: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.mass_adjust');

6366: BEGIN
6367:
6368: x_return_status := FND_API.G_RET_STS_SUCCESS;
6369: IF p_pa_debug_mode = 'Y' Then
6370: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.mass_adjust');
6371: End If;
6372: g_stage := 'mass_adjust:100';
6373: If P_PA_DEBUG_MODE = 'Y' Then
6374: print_msg('QtyAdjPct['||l_quantity_adj_pct||']RateAdjPct['||l_cost_rate_adj_pct||']RwCostPct['||l_raw_cost_adj_pct||']');

Line 6706: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

6702: WHEN OTHERS THEN
6703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6704: x_msg_data := sqlcode||sqlerrm;
6705: fnd_msg_pub.add_exc_msg
6706: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
6707: ,p_procedure_name => 'mass_adjust' );
6708: print_msg(g_stage||' substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
6709: IF p_pa_debug_mode = 'Y' Then
6710: pa_debug.reset_err_stack;

Line 6932: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

6928: EXCEPTION
6929: WHEN OTHERS THEN
6930: x_return_status := 'U';
6931: fnd_msg_pub.add_exc_msg
6932: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
6933: ,p_procedure_name => 'rollup_pf_pfc_to_ra' );
6934: l_stage := 5140;
6935: print_msg(to_char(l_stage)||' substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
6936: RAISE;

Line 7103: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

7099: EXCEPTION WHEN OTHERS THEN
7100:
7101: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7102: fnd_msg_pub.add_exc_msg
7103: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
7104: ,p_procedure_name => 'rollup_pf_pfc_to_bv' );
7105: pa_debug.g_err_stage := 'Stage : '||to_char(l_stage)||' '||substr(SQLERRM,1,240);
7106: l_stage := 6140;
7107: print_msg(to_char(l_stage)||' substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));

Line 7224: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

7220: WHEN OTHERS THEN
7221: print_msg('Unexpected error from populate_spreadRecs['||sqlcode||sqlerrm);
7222: x_return_status := 'U';
7223: fnd_msg_pub.add_exc_msg
7224: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
7225: ,p_procedure_name => 'populate_spreadRecs');
7226: RAISE;
7227: END populate_spreadRecs;
7228: /*

Line 7402: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.convert_ra_txn_currency');

7398: r.txn_currency_code;
7399:
7400: BEGIN
7401: IF p_pa_debug_mode = 'Y' Then
7402: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.convert_ra_txn_currency');
7403: End If;
7404: l_entire_return_status := FND_API.G_RET_STS_SUCCESS;
7405: l_return_status := 'S';
7406: l_msg_count := 0;

Line 7594: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

7590: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7591: x_msg_count := 1;
7592: x_msg_data := sqlcode||sqlerrm;
7593: fnd_msg_pub.add_exc_msg
7594: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
7595: ,p_procedure_name => 'convert_ra_txn_currency' );
7596: pa_debug.g_err_stage := 'Stage : '||to_char(l_stage)||' '||substr(SQLERRM,1,240);
7597: print_msg('PA_FP_CALC_PLAN_PKG.convert_ra_txn_currency -- Stage : ' ||to_char(l_stage)||' '||substr(SQLERRM,1,240));
7598: IF p_pa_debug_mode = 'Y' Then

Line 7597: print_msg('PA_FP_CALC_PLAN_PKG.convert_ra_txn_currency -- Stage : ' ||to_char(l_stage)||' '||substr(SQLERRM,1,240));

7593: fnd_msg_pub.add_exc_msg
7594: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
7595: ,p_procedure_name => 'convert_ra_txn_currency' );
7596: pa_debug.g_err_stage := 'Stage : '||to_char(l_stage)||' '||substr(SQLERRM,1,240);
7597: print_msg('PA_FP_CALC_PLAN_PKG.convert_ra_txn_currency -- Stage : ' ||to_char(l_stage)||' '||substr(SQLERRM,1,240));
7598: IF p_pa_debug_mode = 'Y' Then
7599: pa_debug.reset_err_stack;
7600: End If;
7601: RAISE;

Line 8291: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.calculate');

8287: -- For Bug# 6781055
8288: gl_cl_roll_up_tmp_rowid_tab.delete;
8289:
8290: IF p_pa_debug_mode = 'Y' Then
8291: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.calculate');
8292: pa_debug.set_process('PLSQL','LOG',l_debug_mode);
8293: End If;
8294: l_return_status := FND_API.G_RET_STS_SUCCESS;
8295: l_entire_return_status := FND_API.G_RET_STS_SUCCESS;

Line 8305: --pa_debug.set_curr_function( p_function => 'PA_FP_CALC_PLAN_PKG.calculate'

8301: SAVEPOINT start_of_calculate_api;
8302:
8303: /* Bug fix: 4078623 Set curr and init err stack both are calling but reset curr function is not done.
8304: * This api call is not required as it does the same as init_err_stack
8305: --pa_debug.set_curr_function( p_function => 'PA_FP_CALC_PLAN_PKG.calculate'
8306: --,p_debug_mode => p_pa_debug_mode);
8307: */
8308: l_calc_start_time := dbms_utility.get_time;
8309: print_plsql_time('Calculate API start Time:['||l_calc_start_time||']','Y');

Line 8312: print_msg(to_char(l_stage)||' Entered PA_FP_CALC_PLAN_PKG.calculate');

8308: l_calc_start_time := dbms_utility.get_time;
8309: print_plsql_time('Calculate API start Time:['||l_calc_start_time||']','Y');
8310: If P_PA_DEBUG_MODE = 'Y' Then
8311: l_stage := 10;
8312: print_msg(to_char(l_stage)||' Entered PA_FP_CALC_PLAN_PKG.calculate');
8313: print_msg('Calculate API start Time:['||l_calc_start_time||']','Y');
8314: l_stage := 20;
8315: print_msg('PA_FP_CALC_PLAN_PKG.calculat IN param(Scalar) values');
8316: print_msg('p_project_id => '|| to_char(p_project_id));

Line 8315: print_msg('PA_FP_CALC_PLAN_PKG.calculat IN param(Scalar) values');

8311: l_stage := 10;
8312: print_msg(to_char(l_stage)||' Entered PA_FP_CALC_PLAN_PKG.calculate');
8313: print_msg('Calculate API start Time:['||l_calc_start_time||']','Y');
8314: l_stage := 20;
8315: print_msg('PA_FP_CALC_PLAN_PKG.calculat IN param(Scalar) values');
8316: print_msg('p_project_id => '|| to_char(p_project_id));
8317: print_msg('p_budget_version_id => '|| to_char(p_budget_version_id));
8318: print_msg('p_refresh_rates_flag => '|| p_refresh_rates_flag);
8319: print_msg('p_refresh_conv_rates_flag => '|| p_refresh_conv_rates_flag);

Line 8499: pa_fp_calc_plan_pkg.validate_inputs

8495: If P_PA_DEBUG_MODE = 'Y' Then
8496: print_msg(to_char(l_stage)||' Calling Validate Inputs');
8497: print_msg('Start of Validate Inputs:['||l_pls_start_time||']','Y');
8498: End If;
8499: pa_fp_calc_plan_pkg.validate_inputs
8500: ( p_project_id => p_project_id
8501: ,p_budget_version_id => p_budget_version_id
8502: ,p_calling_module => l_calling_module
8503: ,p_refresh_rates_flag => G_refresh_rates_flag

Line 9457: pa_fp_calc_plan_pkg.delete_budget_lines

9453: IF l_delete_budget_lines = 'Y' THEN
9454: If P_PA_DEBUG_MODE = 'Y' Then
9455: print_msg(to_char(l_stage)||' Delete from pa_budget_lines, rollup pfc numbers, and skip record');
9456: End if;
9457: pa_fp_calc_plan_pkg.delete_budget_lines
9458: (p_budget_version_id => p_budget_version_id
9459: ,p_resource_assignment_id => l_resource_assignment_id
9460: ,p_txn_currency_code => l_txn_currency_code
9461: ,p_line_start_date => g_line_start_date

Line 10241: pa_fp_calc_plan_pkg.populate_rollup_tmp

10237: print_msg(']refresh_rates_flag['||g_refresh_rates_flag||']');
10238: End if;
10239: l_pls_start_time := dbms_utility.get_time;
10240: --print_plsql_time('Start of populate rollupTmp:['||l_pls_start_time);
10241: pa_fp_calc_plan_pkg.populate_rollup_tmp
10242: ( p_budget_version_id => g_budget_version_id
10243: ,x_return_status => l_return_status
10244: ,x_msg_count => x_msg_count
10245: ,x_msg_data => x_msg_data

Line 10263: print_msg(l_stage||'Calling pa_fp_calc_plan_pkg.mass_adjust API');

10259:
10260: IF g_mass_adjust_flag = 'Y' THEN
10261: l_stage := 537;
10262: If P_PA_DEBUG_MODE = 'Y' Then
10263: print_msg(l_stage||'Calling pa_fp_calc_plan_pkg.mass_adjust API');
10264: End If;
10265: /*bug fix:4657962 */
10266: l_pls_start_time := dbms_utility.get_time;
10267: --print_plsql_time('Start of MassAdjust:['||l_pls_start_time);

Line 10268: pa_fp_calc_plan_pkg.mass_adjust_new

10264: End If;
10265: /*bug fix:4657962 */
10266: l_pls_start_time := dbms_utility.get_time;
10267: --print_plsql_time('Start of MassAdjust:['||l_pls_start_time);
10268: pa_fp_calc_plan_pkg.mass_adjust_new
10269: ( p_budget_version_id => g_budget_version_id
10270: ,p_quantity_adj_pct => p_quantity_adj_pct
10271: ,p_cost_rate_adj_pct => p_cost_rate_adj_pct
10272: ,p_burdened_rate_adj_pct => p_burdened_rate_adj_pct

Line 10284: print_msg('End of pa_fp_calc_plan_pkg.mass_adjust API retSts['||l_return_status||']');

10280: );
10281: l_pls_end_time := dbms_utility.get_time;
10282: print_plsql_time('End of MassAdjust:Total time :['||(l_pls_end_time-l_pls_start_time)||']');
10283: If P_PA_DEBUG_MODE = 'Y' Then
10284: print_msg('End of pa_fp_calc_plan_pkg.mass_adjust API retSts['||l_return_status||']');
10285: End If;
10286: IF l_return_status <> 'S' Then
10287: x_return_status := l_return_status;
10288: l_entire_return_status := l_return_status;

Line 10305: pa_fp_calc_plan_pkg.populate_rollup_tmp

10301: print_msg('Calling populate rollup tmp in apply progress mode to rederive the etc costs');
10302: End If;
10303: l_pls_start_time := dbms_utility.get_time;
10304: --print_plsql_time('Start of populaterollupTmp inApplyProgMode:['||l_pls_start_time);
10305: pa_fp_calc_plan_pkg.populate_rollup_tmp
10306: ( p_budget_version_id => g_budget_version_id
10307: ,x_return_status => l_return_status
10308: ,x_msg_count => x_msg_count
10309: ,x_msg_data => x_msg_data

Line 11028: /* Bug fix: 4184159 moved to bulk update pa_fp_calc_plan_pkg.update_budget_lines */

11024: *table pa_budget_lines is ready to be updated with the values stored in pa_fp_rollup_tmp
11025: *It will update pa_budget_lines with ALL rows stored in pa_fp_rollup_tmp
11026: */
11027: l_stage := 1100;
11028: /* Bug fix: 4184159 moved to bulk update pa_fp_calc_plan_pkg.update_budget_lines */
11029: l_pls_start_time := dbms_utility.get_time;
11030: --print_plsql_time('Start of BLK UpdateBudget Lines:['||l_pls_start_time);
11031: PA_FP_CALC_UTILS.BLK_update_budget_lines
11032: ( p_budget_version_id => p_budget_version_id

Line 11184: pa_fp_calc_plan_pkg.rollup_pf_pfc_to_ra

11180: print_msg('Rollup PC and PFC to RA ');
11181: End if;
11182: l_pls_start_time := dbms_utility.get_time;
11183: --print_plsql_time('Start of rollup_pf_pfc_to_ra :['||l_pls_start_time);
11184: pa_fp_calc_plan_pkg.rollup_pf_pfc_to_ra
11185: ( p_budget_version_id => g_budget_version_id
11186: ,x_return_status => l_return_status
11187: ,x_msg_count => x_msg_count
11188: ,x_msg_data => l_msg_data --5028631

Line 11193: print_msg('After calling pa_fp_calc_plan_pkg.rollup_pf_pfc_to_ra retSts['||l_return_status||']msgData['||l_msg_data||']');

11189: );
11190: l_pls_end_time := dbms_utility.get_time;
11191: print_plsql_time('End of rollup_pf_pfc_to_raTotal time :['||(l_pls_end_time-l_pls_start_time)||']');
11192: If P_PA_DEBUG_MODE = 'Y' Then
11193: print_msg('After calling pa_fp_calc_plan_pkg.rollup_pf_pfc_to_ra retSts['||l_return_status||']msgData['||l_msg_data||']');
11194: End if;
11195: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11196: x_return_status := l_return_status;
11197: l_entire_return_status := l_return_status;

Line 11199: print_msg('Errored in pa_fp_calc_plan_pkg.rollup_pf_pfc_to_ra');

11195: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11196: x_return_status := l_return_status;
11197: l_entire_return_status := l_return_status;
11198: x_msg_data := l_msg_data; --5028631
11199: print_msg('Errored in pa_fp_calc_plan_pkg.rollup_pf_pfc_to_ra');
11200: GOTO END_OF_PROCESS;
11201: END IF;
11202: END IF;
11203:

Line 11307: pa_fp_calc_plan_pkg.rollup_pf_pfc_to_bv

11303: print_msg(to_char(l_stage)||' Calling rollup_pf_pfc_to_bv with following parameters:');
11304: End if;
11305: l_pls_start_time := dbms_utility.get_time;
11306: --print_plsql_time('Start of rollup_pf_pfc_to_bv:['||l_pls_start_time);
11307: pa_fp_calc_plan_pkg.rollup_pf_pfc_to_bv
11308: ( p_budget_version_id => g_budget_version_id
11309: ,x_return_status => l_return_status
11310: ,x_msg_count => x_msg_count
11311: ,x_msg_data => l_msg_data --5028631

Line 11316: print_msg('After calling pa_fp_calc_plan_pkg.rollup_pf_pfc_to_bv retSts['||l_return_status||']msgData['||l_msg_data||']');

11312: );
11313: l_pls_end_time := dbms_utility.get_time;
11314: print_plsql_time('End of rollup_pf_pfc_to_bvTotal time :['||(l_pls_end_time-l_pls_start_time)||']');
11315: If P_PA_DEBUG_MODE = 'Y' Then
11316: print_msg('After calling pa_fp_calc_plan_pkg.rollup_pf_pfc_to_bv retSts['||l_return_status||']msgData['||l_msg_data||']');
11317: End if;
11318: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11319: x_return_status := l_return_status;
11320: l_entire_return_status := l_return_status;

Line 11474: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

11470: If x_msg_data is NULL Then
11471: x_msg_data := sqlcode||sqlerrm;
11472: End If;
11473: fnd_msg_pub.add_exc_msg
11474: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
11475: ,p_procedure_name => 'calculate:'||substr(l_stage,1,240) );
11476: pa_debug.write_file('LOG: '||substr(l_stage||':'||sqlcode||sqlerrm,1,240));
11477:
11478: /* Bug fix: 4343985 */

Line 11563: PA_DEBUG.INIT_ERR_STACK('PA_FP_CALC_PLAN_PKG.Convert_Final_Txn_Cur_Amts');

11559:
11560: BEGIN
11561: -- INitialize the err stack;
11562: IF p_pa_debug_mode = 'Y' Then
11563: PA_DEBUG.INIT_ERR_STACK('PA_FP_CALC_PLAN_PKG.Convert_Final_Txn_Cur_Amts');
11564: End If;
11565: l_return_status := 'S';
11566: x_return_status := 'S';
11567:

Line 11719: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

11715: IF p_pa_debug_mode = 'Y' Then
11716: pa_debug.reset_err_stack;
11717: End If;
11718: fnd_msg_pub.add_exc_msg
11719: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
11720: ,p_procedure_name => 'Convert_Final_Txn_Cur_Amts' );
11721: print_msg('Unexpected Error from Convert_Final_Txn_Cur_Amts :'||x_msg_data);
11722: RAISE;
11723: END Convert_Final_Txn_Cur_Amts;

Line 12079: PA_DEBUG.INIT_ERR_STACK('PA_FP_CALC_PLAN_PKG.Get_Res_Rates');

12075: BEGIN
12076:
12077: -- INitialize the err stack;
12078: IF p_pa_debug_mode = 'Y' Then
12079: PA_DEBUG.INIT_ERR_STACK('PA_FP_CALC_PLAN_PKG.Get_Res_Rates');
12080: print_msg('Entered Get_Res_Rates API');
12081: End If;
12082: l_return_status := 'S';
12083: x_return_status := 'S';

Line 12498: pa_fp_calc_plan_pkg.chk_req_rate_api_inputs

12494: l_stage := 660;
12495: --print_msg(to_char(l_stage)||' Some or all txn amounts are not present so need to call rate API');
12496: --print_msg(to_char(l_stage)||' Calling chk_req_rate_api_inputs');
12497:
12498: pa_fp_calc_plan_pkg.chk_req_rate_api_inputs
12499: ( p_budget_version_id => p_budget_version_id
12500: ,p_budget_version_type => rate_rec.fp_budget_version_type
12501: ,p_person_id => z.person_id
12502: ,p_job_id => z.job_id

Line 14328: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

14324: End If;
14325: EXCEPTION
14326: WHEN RATEAPI_UNEXPECTED_ERRORS THEN
14327: fnd_msg_pub.add_exc_msg
14328: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
14329: ,p_procedure_name => 'Get_Res_Rates.pa_plan_revenue.Get_planning_Rates');
14330: print_msg(to_char(l_stage)||' substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
14331: IF p_pa_debug_mode = 'Y' Then
14332: pa_debug.reset_err_stack;

Line 14339: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

14335: RAISE;
14336:
14337: WHEN UNEXPECTED_ERRORS THEN
14338: fnd_msg_pub.add_exc_msg
14339: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
14340: ,p_procedure_name => 'Get_Res_Rates:Update_rollupTmp_OvrRates');
14341: print_msg(to_char(l_stage)||' substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
14342: IF p_pa_debug_mode = 'Y' Then
14343: pa_debug.reset_err_stack;

Line 14349: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

14345: x_return_status := 'U';
14346: RAISE;
14347: WHEN OTHERS THEN
14348: fnd_msg_pub.add_exc_msg
14349: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
14350: ,p_procedure_name => 'Get_Res_Rates');
14351: print_msg(to_char(l_stage)||' substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
14352: IF p_pa_debug_mode = 'Y' Then
14353: pa_debug.reset_err_stack;

Line 15786: print_msg(to_char(l_stage)||'Entered PA_FP_CALC_PLAN_PKG.Process_skipped_records');

15782: BEGIN
15783:
15784: x_return_status := 'S';
15785: IF p_pa_debug_mode = 'Y' Then
15786: print_msg(to_char(l_stage)||'Entered PA_FP_CALC_PLAN_PKG.Process_skipped_records');
15787: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.Process_skipped_records');
15788: End If;
15789: /***
15790: If P_PA_DEBUG_MODE = 'Y' Then

Line 15787: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.Process_skipped_records');

15783:
15784: x_return_status := 'S';
15785: IF p_pa_debug_mode = 'Y' Then
15786: print_msg(to_char(l_stage)||'Entered PA_FP_CALC_PLAN_PKG.Process_skipped_records');
15787: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.Process_skipped_records');
15788: End If;
15789: /***
15790: If P_PA_DEBUG_MODE = 'Y' Then
15791: for i in (select * from pa_fp_spread_calc_tmp ) LOOP

Line 15964: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

15960: WHEN OTHERS THEN
15961: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
15962: x_msg_data := sqlcode||sqlerrm;
15963: fnd_msg_pub.add_exc_msg
15964: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
15965: ,p_procedure_name => 'Process_skipped_records' );
15966: l_stage := 2120;
15967: print_msg(to_char(l_stage)||' substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
15968: IF p_pa_debug_mode = 'Y' Then

Line 15977: END PA_FP_CALC_PLAN_PKG;

15973: END Process_skipped_records;
15974: /* End for bug 5028631 */
15975:
15976:
15977: END PA_FP_CALC_PLAN_PKG;