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_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.25.12010000.6 2008/12/05 10:10:01 rthumma 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.25.12010000.6 2008/12/05 10:10:01 rthumma 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 1354: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

1350: EXCEPTION
1351: WHEN OTHERS THEN
1352: x_return_status := 'U';
1353: fnd_msg_pub.add_exc_msg
1354: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
1355: ,p_procedure_name => 'SetGatherTmpTblIndxStats' );
1356: print_msg('Failed in SetGatherTmpTblIndxStats substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
1357: ROLLBACK;
1358: RAISE;

Line 1459: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

1455: EXCEPTION
1456: WHEN OTHERS THEN
1457: x_return_status := 'U';
1458: fnd_msg_pub.add_exc_msg
1459: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
1460: ,p_procedure_name => 'initialize_fp_cur_details' );
1461: print_msg('Failed in initialize_fp_cur_details substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
1462: RAISE;
1463:

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

2306: l_return_status := 'S';
2307: l_msg_count := 0;
2308: l_msg_data := NULL;
2309: IF p_pa_debug_mode = 'Y' Then
2310: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.Update_PCPFCrounding_diff');
2311: End If;
2312:
2313: g_stage := 'Update_PCPFC_rounding_diff:100';
2314: pa_debug.g_err_stage := 'Entered Update_PCPFCrounding_diff API';

Line 2514: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

2510: print_msg('Failed in Update_PCPFCrounding_diff API ['||sqlcode||sqlerrm);
2511: x_return_status := 'U';
2512: x_msg_data := sqlcode||sqlerrm;
2513: fnd_msg_pub.add_exc_msg
2514: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
2515: ,p_procedure_name => 'Update_PCPFC_rounding_diff' );
2516: print_msg('Failed in Update_PCPFC_rounding_diff substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
2517: IF p_pa_debug_mode = 'Y' Then
2518: pa_debug.reset_err_stack;

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

2608: l_return_status := 'S';
2609: l_msg_count := 0;
2610: l_msg_data := NULL;
2611: IF p_pa_debug_mode = 'Y' Then
2612: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.Update_rounding_diff');
2613: End If;
2614:
2615: g_stage := 'Update_rounding_diff:100';
2616: pa_debug.g_err_stage := 'Entered Update_rounding_diff API';

Line 2744: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

2740: print_msg('Failed in Update_rounding_diff API ['||sqlcode||sqlerrm);
2741: x_return_status := 'U';
2742: x_msg_data := sqlcode||sqlerrm;
2743: fnd_msg_pub.add_exc_msg
2744: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
2745: ,p_procedure_name => 'Update_rounding_diff' );
2746: print_msg('Failed in Update_rounding_diff substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
2747: IF p_pa_debug_mode = 'Y' Then
2748: pa_debug.reset_err_stack;

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

2850: x_msg_count := NULL;
2851: x_msg_data := NULL;
2852: l_return_status := 'S';
2853: IF p_pa_debug_mode = 'Y' Then
2854: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.validate_inputs');
2855: pa_debug.g_err_stage := 'Entered PA_FP_CALC_PLAN_PKG.validate_inputs';
2856: End If;
2857: g_stage := 'validate_inputs:100';
2858: /*

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

2851: x_msg_data := NULL;
2852: l_return_status := 'S';
2853: IF p_pa_debug_mode = 'Y' Then
2854: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.validate_inputs');
2855: pa_debug.g_err_stage := 'Entered PA_FP_CALC_PLAN_PKG.validate_inputs';
2856: End If;
2857: g_stage := 'validate_inputs:100';
2858: /*
2859: -- Check to see if Budget_version_id, project_id, or source_context

Line 3273: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

3269: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3270: x_msg_count := 1;
3271: x_msg_data := SQLCODE||SQLERRM;
3272: fnd_msg_pub.add_exc_msg
3273: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
3274: ,p_procedure_name => 'validate_inputs' );
3275: print_msg(to_char(l_stage)||' substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
3276: IF p_pa_debug_mode = 'Y' Then
3277: pa_debug.reset_err_stack;

Line 3367: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

3363: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3364: x_msg_data := SQLCODE||SQLERRM;
3365: print_msg('Errored in Reset_Planning_end_date API ['||x_msg_data||']');
3366: fnd_msg_pub.add_exc_msg
3367: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
3368: ,p_procedure_name => 'Reset_Planning_end_date');
3369: print_msg(to_char(l_stage)||' substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
3370: RAISE;
3371: END Reset_Planning_end_date;

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

3700: l_error_msg_code Varchar2(100);
3701: INVALID_EXCEPTION EXCEPTION;
3702: BEGIN
3703: IF p_pa_debug_mode = 'Y' Then
3704: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.Get_Agreement_Details');
3705: print_msg('Entered Get_Agreement_Details Api');
3706: End If;
3707: x_return_status := 'S';
3708:

Line 3736: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

3732:
3733: WHEN OTHERS THEN
3734: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3735: fnd_msg_pub.add_exc_msg
3736: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
3737: ,p_procedure_name => 'Get_Agreement_Details' );
3738: print_msg('Failed in Get_Agreement_Details substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
3739: IF p_pa_debug_mode = 'Y' Then
3740: pa_debug.reset_err_stack;

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

4025: END initUpdPlsqlTabs;
4026:
4027: BEGIN
4028: IF p_pa_debug_mode = 'Y' Then
4029: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.clear_closed_period_etcs');
4030: End If;
4031: x_return_status := 'S';
4032: l_stage := 'Entered clear_closed_period_etcs api ETC Date['||p_etc_start_date||']';
4033: g_stage := 'clear_closed_period_etcs:100';

Line 4539: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

4535: EXCEPTION
4536: WHEN OTHERS THEN
4537: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4538: fnd_msg_pub.add_exc_msg
4539: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
4540: ,p_procedure_name => 'clear_closed_period_etcs' );
4541: IF p_pa_debug_mode = 'Y' Then
4542: pa_debug.reset_err_stack;
4543: end if;

Line 4655: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

4651: EXCEPTION
4652: WHEN OTHERS THEN
4653: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4654: fnd_msg_pub.add_exc_msg
4655: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
4656: ,p_procedure_name => 'Upd_spread_calc_tmp' );
4657: RAISE;
4658:
4659: END Upd_spread_calc_tmp;

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

5141: l_return_status := 'S';
5142: x_msg_data := NULL;
5143: g_stage := 'delete_budget_lines:100';
5144: IF p_pa_debug_mode = 'Y' Then
5145: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.delete_budget_lines');
5146: print_msg('Entered PA_FP_CALC_PLAN_PKG.delete_budget_lines ResAssId['||p_resource_assignment_id||']spreadDate['||g_spread_from_date||']');
5147: End If;
5148: l_stage := 7800;
5149: OPEN get_delete_bl_id ;

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

5142: x_msg_data := NULL;
5143: g_stage := 'delete_budget_lines:100';
5144: IF p_pa_debug_mode = 'Y' Then
5145: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.delete_budget_lines');
5146: print_msg('Entered PA_FP_CALC_PLAN_PKG.delete_budget_lines ResAssId['||p_resource_assignment_id||']spreadDate['||g_spread_from_date||']');
5147: End If;
5148: l_stage := 7800;
5149: OPEN get_delete_bl_id ;
5150: FETCH get_delete_bl_id BULK COLLECT INTO

Line 5584: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

5580: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5581: x_msg_count := 1;
5582: x_msg_data := 'Stage['||l_stage||SQLCODE||SQLERRM;
5583: fnd_msg_pub.add_exc_msg
5584: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
5585: ,p_procedure_name => 'delete_budget_lines' );
5586: IF p_pa_debug_mode = 'Y' Then
5587: pa_debug.reset_err_stack;
5588: End If;

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

5634:
5635: x_return_status := FND_API.G_RET_STS_SUCCESS;
5636: l_return_status := 'S';
5637: IF p_pa_debug_mode = 'Y' Then
5638: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.chk_req_rate_api_inputs');
5639: End If;
5640:
5641: g_stage := 'chk_req_rate_api_inputs:100';
5642: l_stage := 8010;

Line 5705: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

5701: WHEN OTHERS THEN
5702:
5703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5704: fnd_msg_pub.add_exc_msg
5705: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
5706: ,p_procedure_name => 'chk_req_rate_api_inputs' );
5707: IF p_pa_debug_mode = 'Y' Then
5708: pa_debug.reset_err_stack;
5709: End If;

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

5730: x_return_status := 'S';
5731: l_stage := 2000;
5732: g_stage := 'populate_rollup_tmp:100';
5733: IF p_pa_debug_mode = 'Y' Then
5734: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.populate_rollup_tmp');
5735: print_msg(to_char(l_stage)||'Entered PA_FP_CALC_PLAN_PKG.populate_rollup_tmp');
5736: End If;
5737: /*
5738: If P_PA_DEBUG_MODE = 'Y' Then

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

5731: l_stage := 2000;
5732: g_stage := 'populate_rollup_tmp:100';
5733: IF p_pa_debug_mode = 'Y' Then
5734: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.populate_rollup_tmp');
5735: print_msg(to_char(l_stage)||'Entered PA_FP_CALC_PLAN_PKG.populate_rollup_tmp');
5736: End If;
5737: /*
5738: If P_PA_DEBUG_MODE = 'Y' Then
5739: for i in (select * from pa_fp_spread_calc_tmp ) LOOP

Line 6237: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

6233: WHEN OTHERS THEN
6234: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6235: x_msg_data := sqlcode||sqlerrm;
6236: fnd_msg_pub.add_exc_msg
6237: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
6238: ,p_procedure_name => 'populate_rollup_tmp' );
6239: l_stage := 2120;
6240: print_msg(to_char(l_stage)||' substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
6241: IF p_pa_debug_mode = 'Y' Then

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

6331: BEGIN
6332:
6333: x_return_status := FND_API.G_RET_STS_SUCCESS;
6334: IF p_pa_debug_mode = 'Y' Then
6335: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.mass_adjust');
6336: End If;
6337: g_stage := 'mass_adjust:100';
6338: If P_PA_DEBUG_MODE = 'Y' Then
6339: print_msg('QtyAdjPct['||l_quantity_adj_pct||']RateAdjPct['||l_cost_rate_adj_pct||']RwCostPct['||l_raw_cost_adj_pct||']');

Line 6671: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

6667: WHEN OTHERS THEN
6668: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6669: x_msg_data := sqlcode||sqlerrm;
6670: fnd_msg_pub.add_exc_msg
6671: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
6672: ,p_procedure_name => 'mass_adjust' );
6673: print_msg(g_stage||' substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
6674: IF p_pa_debug_mode = 'Y' Then
6675: pa_debug.reset_err_stack;

Line 6842: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

6838: EXCEPTION
6839: WHEN OTHERS THEN
6840: x_return_status := 'U';
6841: fnd_msg_pub.add_exc_msg
6842: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
6843: ,p_procedure_name => 'rollup_pf_pfc_to_ra' );
6844: l_stage := 5140;
6845: print_msg(to_char(l_stage)||' substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
6846: RAISE;

Line 7013: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

7009: EXCEPTION WHEN OTHERS THEN
7010:
7011: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7012: fnd_msg_pub.add_exc_msg
7013: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
7014: ,p_procedure_name => 'rollup_pf_pfc_to_bv' );
7015: pa_debug.g_err_stage := 'Stage : '||to_char(l_stage)||' '||substr(SQLERRM,1,240);
7016: l_stage := 6140;
7017: print_msg(to_char(l_stage)||' substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));

Line 7134: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

7130: WHEN OTHERS THEN
7131: print_msg('Unexpected error from populate_spreadRecs['||sqlcode||sqlerrm);
7132: x_return_status := 'U';
7133: fnd_msg_pub.add_exc_msg
7134: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
7135: ,p_procedure_name => 'populate_spreadRecs');
7136: RAISE;
7137: END populate_spreadRecs;
7138: /*

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

7308: r.txn_currency_code;
7309:
7310: BEGIN
7311: IF p_pa_debug_mode = 'Y' Then
7312: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.convert_ra_txn_currency');
7313: End If;
7314: l_entire_return_status := FND_API.G_RET_STS_SUCCESS;
7315: l_return_status := 'S';
7316: l_msg_count := 0;

Line 7504: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

7500: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7501: x_msg_count := 1;
7502: x_msg_data := sqlcode||sqlerrm;
7503: fnd_msg_pub.add_exc_msg
7504: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
7505: ,p_procedure_name => 'convert_ra_txn_currency' );
7506: pa_debug.g_err_stage := 'Stage : '||to_char(l_stage)||' '||substr(SQLERRM,1,240);
7507: print_msg('PA_FP_CALC_PLAN_PKG.convert_ra_txn_currency -- Stage : ' ||to_char(l_stage)||' '||substr(SQLERRM,1,240));
7508: IF p_pa_debug_mode = 'Y' Then

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

7503: fnd_msg_pub.add_exc_msg
7504: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
7505: ,p_procedure_name => 'convert_ra_txn_currency' );
7506: pa_debug.g_err_stage := 'Stage : '||to_char(l_stage)||' '||substr(SQLERRM,1,240);
7507: print_msg('PA_FP_CALC_PLAN_PKG.convert_ra_txn_currency -- Stage : ' ||to_char(l_stage)||' '||substr(SQLERRM,1,240));
7508: IF p_pa_debug_mode = 'Y' Then
7509: pa_debug.reset_err_stack;
7510: End If;
7511: RAISE;

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

8180: -- For Bug# 6781055
8181: gl_cl_roll_up_tmp_rowid_tab.delete;
8182:
8183: IF p_pa_debug_mode = 'Y' Then
8184: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.calculate');
8185: pa_debug.set_process('PLSQL','LOG',l_debug_mode);
8186: End If;
8187: l_return_status := FND_API.G_RET_STS_SUCCESS;
8188: l_entire_return_status := FND_API.G_RET_STS_SUCCESS;

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

8194: SAVEPOINT start_of_calculate_api;
8195:
8196: /* Bug fix: 4078623 Set curr and init err stack both are calling but reset curr function is not done.
8197: * This api call is not required as it does the same as init_err_stack
8198: --pa_debug.set_curr_function( p_function => 'PA_FP_CALC_PLAN_PKG.calculate'
8199: --,p_debug_mode => p_pa_debug_mode);
8200: */
8201: l_calc_start_time := dbms_utility.get_time;
8202: print_plsql_time('Calculate API start Time:['||l_calc_start_time||']','Y');

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

8201: l_calc_start_time := dbms_utility.get_time;
8202: print_plsql_time('Calculate API start Time:['||l_calc_start_time||']','Y');
8203: If P_PA_DEBUG_MODE = 'Y' Then
8204: l_stage := 10;
8205: print_msg(to_char(l_stage)||' Entered PA_FP_CALC_PLAN_PKG.calculate');
8206: print_msg('Calculate API start Time:['||l_calc_start_time||']','Y');
8207: l_stage := 20;
8208: print_msg('PA_FP_CALC_PLAN_PKG.calculat IN param(Scalar) values');
8209: print_msg('p_project_id => '|| to_char(p_project_id));

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

8204: l_stage := 10;
8205: print_msg(to_char(l_stage)||' Entered PA_FP_CALC_PLAN_PKG.calculate');
8206: print_msg('Calculate API start Time:['||l_calc_start_time||']','Y');
8207: l_stage := 20;
8208: print_msg('PA_FP_CALC_PLAN_PKG.calculat IN param(Scalar) values');
8209: print_msg('p_project_id => '|| to_char(p_project_id));
8210: print_msg('p_budget_version_id => '|| to_char(p_budget_version_id));
8211: print_msg('p_refresh_rates_flag => '|| p_refresh_rates_flag);
8212: print_msg('p_refresh_conv_rates_flag => '|| p_refresh_conv_rates_flag);

Line 8392: pa_fp_calc_plan_pkg.validate_inputs

8388: If P_PA_DEBUG_MODE = 'Y' Then
8389: print_msg(to_char(l_stage)||' Calling Validate Inputs');
8390: print_msg('Start of Validate Inputs:['||l_pls_start_time||']','Y');
8391: End If;
8392: pa_fp_calc_plan_pkg.validate_inputs
8393: ( p_project_id => p_project_id
8394: ,p_budget_version_id => p_budget_version_id
8395: ,p_calling_module => l_calling_module
8396: ,p_refresh_rates_flag => G_refresh_rates_flag

Line 9350: pa_fp_calc_plan_pkg.delete_budget_lines

9346: IF l_delete_budget_lines = 'Y' THEN
9347: If P_PA_DEBUG_MODE = 'Y' Then
9348: print_msg(to_char(l_stage)||' Delete from pa_budget_lines, rollup pfc numbers, and skip record');
9349: End if;
9350: pa_fp_calc_plan_pkg.delete_budget_lines
9351: (p_budget_version_id => p_budget_version_id
9352: ,p_resource_assignment_id => l_resource_assignment_id
9353: ,p_txn_currency_code => l_txn_currency_code
9354: ,p_line_start_date => g_line_start_date

Line 10134: pa_fp_calc_plan_pkg.populate_rollup_tmp

10130: print_msg(']refresh_rates_flag['||g_refresh_rates_flag||']');
10131: End if;
10132: l_pls_start_time := dbms_utility.get_time;
10133: --print_plsql_time('Start of populate rollupTmp:['||l_pls_start_time);
10134: pa_fp_calc_plan_pkg.populate_rollup_tmp
10135: ( p_budget_version_id => g_budget_version_id
10136: ,x_return_status => l_return_status
10137: ,x_msg_count => x_msg_count
10138: ,x_msg_data => x_msg_data

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

10152:
10153: IF g_mass_adjust_flag = 'Y' THEN
10154: l_stage := 537;
10155: If P_PA_DEBUG_MODE = 'Y' Then
10156: print_msg(l_stage||'Calling pa_fp_calc_plan_pkg.mass_adjust API');
10157: End If;
10158: /*bug fix:4657962 */
10159: l_pls_start_time := dbms_utility.get_time;
10160: --print_plsql_time('Start of MassAdjust:['||l_pls_start_time);

Line 10161: pa_fp_calc_plan_pkg.mass_adjust_new

10157: End If;
10158: /*bug fix:4657962 */
10159: l_pls_start_time := dbms_utility.get_time;
10160: --print_plsql_time('Start of MassAdjust:['||l_pls_start_time);
10161: pa_fp_calc_plan_pkg.mass_adjust_new
10162: ( p_budget_version_id => g_budget_version_id
10163: ,p_quantity_adj_pct => p_quantity_adj_pct
10164: ,p_cost_rate_adj_pct => p_cost_rate_adj_pct
10165: ,p_burdened_rate_adj_pct => p_burdened_rate_adj_pct

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

10173: );
10174: l_pls_end_time := dbms_utility.get_time;
10175: print_plsql_time('End of MassAdjust:Total time :['||(l_pls_end_time-l_pls_start_time)||']');
10176: If P_PA_DEBUG_MODE = 'Y' Then
10177: print_msg('End of pa_fp_calc_plan_pkg.mass_adjust API retSts['||l_return_status||']');
10178: End If;
10179: IF l_return_status <> 'S' Then
10180: x_return_status := l_return_status;
10181: l_entire_return_status := l_return_status;

Line 10198: pa_fp_calc_plan_pkg.populate_rollup_tmp

10194: print_msg('Calling populate rollup tmp in apply progress mode to rederive the etc costs');
10195: End If;
10196: l_pls_start_time := dbms_utility.get_time;
10197: --print_plsql_time('Start of populaterollupTmp inApplyProgMode:['||l_pls_start_time);
10198: pa_fp_calc_plan_pkg.populate_rollup_tmp
10199: ( p_budget_version_id => g_budget_version_id
10200: ,x_return_status => l_return_status
10201: ,x_msg_count => x_msg_count
10202: ,x_msg_data => x_msg_data

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

10870: *table pa_budget_lines is ready to be updated with the values stored in pa_fp_rollup_tmp
10871: *It will update pa_budget_lines with ALL rows stored in pa_fp_rollup_tmp
10872: */
10873: l_stage := 1100;
10874: /* Bug fix: 4184159 moved to bulk update pa_fp_calc_plan_pkg.update_budget_lines */
10875: l_pls_start_time := dbms_utility.get_time;
10876: --print_plsql_time('Start of BLK UpdateBudget Lines:['||l_pls_start_time);
10877: PA_FP_CALC_UTILS.BLK_update_budget_lines
10878: ( p_budget_version_id => p_budget_version_id

Line 11004: pa_fp_calc_plan_pkg.rollup_pf_pfc_to_ra

11000: print_msg('Rollup PC and PFC to RA ');
11001: End if;
11002: l_pls_start_time := dbms_utility.get_time;
11003: --print_plsql_time('Start of rollup_pf_pfc_to_ra :['||l_pls_start_time);
11004: pa_fp_calc_plan_pkg.rollup_pf_pfc_to_ra
11005: ( p_budget_version_id => g_budget_version_id
11006: ,x_return_status => l_return_status
11007: ,x_msg_count => x_msg_count
11008: ,x_msg_data => l_msg_data --5028631

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

11009: );
11010: l_pls_end_time := dbms_utility.get_time;
11011: print_plsql_time('End of rollup_pf_pfc_to_raTotal time :['||(l_pls_end_time-l_pls_start_time)||']');
11012: If P_PA_DEBUG_MODE = 'Y' Then
11013: print_msg('After calling pa_fp_calc_plan_pkg.rollup_pf_pfc_to_ra retSts['||l_return_status||']msgData['||l_msg_data||']');
11014: End if;
11015: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11016: x_return_status := l_return_status;
11017: l_entire_return_status := l_return_status;

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

11015: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11016: x_return_status := l_return_status;
11017: l_entire_return_status := l_return_status;
11018: x_msg_data := l_msg_data; --5028631
11019: print_msg('Errored in pa_fp_calc_plan_pkg.rollup_pf_pfc_to_ra');
11020: GOTO END_OF_PROCESS;
11021: END IF;
11022: END IF;
11023:

Line 11127: pa_fp_calc_plan_pkg.rollup_pf_pfc_to_bv

11123: print_msg(to_char(l_stage)||' Calling rollup_pf_pfc_to_bv with following parameters:');
11124: End if;
11125: l_pls_start_time := dbms_utility.get_time;
11126: --print_plsql_time('Start of rollup_pf_pfc_to_bv:['||l_pls_start_time);
11127: pa_fp_calc_plan_pkg.rollup_pf_pfc_to_bv
11128: ( p_budget_version_id => g_budget_version_id
11129: ,x_return_status => l_return_status
11130: ,x_msg_count => x_msg_count
11131: ,x_msg_data => l_msg_data --5028631

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

11132: );
11133: l_pls_end_time := dbms_utility.get_time;
11134: print_plsql_time('End of rollup_pf_pfc_to_bvTotal time :['||(l_pls_end_time-l_pls_start_time)||']');
11135: If P_PA_DEBUG_MODE = 'Y' Then
11136: print_msg('After calling pa_fp_calc_plan_pkg.rollup_pf_pfc_to_bv retSts['||l_return_status||']msgData['||l_msg_data||']');
11137: End if;
11138: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11139: x_return_status := l_return_status;
11140: l_entire_return_status := l_return_status;

Line 11294: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

11290: If x_msg_data is NULL Then
11291: x_msg_data := sqlcode||sqlerrm;
11292: End If;
11293: fnd_msg_pub.add_exc_msg
11294: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
11295: ,p_procedure_name => 'calculate:'||substr(l_stage,1,240) );
11296: pa_debug.write_file('LOG: '||substr(l_stage||':'||sqlcode||sqlerrm,1,240));
11297:
11298: /* Bug fix: 4343985 */

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

11379:
11380: BEGIN
11381: -- INitialize the err stack;
11382: IF p_pa_debug_mode = 'Y' Then
11383: PA_DEBUG.INIT_ERR_STACK('PA_FP_CALC_PLAN_PKG.Convert_Final_Txn_Cur_Amts');
11384: End If;
11385: l_return_status := 'S';
11386: x_return_status := 'S';
11387:

Line 11539: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

11535: IF p_pa_debug_mode = 'Y' Then
11536: pa_debug.reset_err_stack;
11537: End If;
11538: fnd_msg_pub.add_exc_msg
11539: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
11540: ,p_procedure_name => 'Convert_Final_Txn_Cur_Amts' );
11541: print_msg('Unexpected Error from Convert_Final_Txn_Cur_Amts :'||x_msg_data);
11542: RAISE;
11543: END Convert_Final_Txn_Cur_Amts;

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

11895: BEGIN
11896:
11897: -- INitialize the err stack;
11898: IF p_pa_debug_mode = 'Y' Then
11899: PA_DEBUG.INIT_ERR_STACK('PA_FP_CALC_PLAN_PKG.Get_Res_Rates');
11900: print_msg('Entered Get_Res_Rates API');
11901: End If;
11902: l_return_status := 'S';
11903: x_return_status := 'S';

Line 12309: pa_fp_calc_plan_pkg.chk_req_rate_api_inputs

12305: l_stage := 660;
12306: --print_msg(to_char(l_stage)||' Some or all txn amounts are not present so need to call rate API');
12307: --print_msg(to_char(l_stage)||' Calling chk_req_rate_api_inputs');
12308:
12309: pa_fp_calc_plan_pkg.chk_req_rate_api_inputs
12310: ( p_budget_version_id => p_budget_version_id
12311: ,p_budget_version_type => rate_rec.fp_budget_version_type
12312: ,p_person_id => z.person_id
12313: ,p_job_id => z.job_id

Line 14116: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

14112: End If;
14113: EXCEPTION
14114: WHEN RATEAPI_UNEXPECTED_ERRORS THEN
14115: fnd_msg_pub.add_exc_msg
14116: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
14117: ,p_procedure_name => 'Get_Res_Rates.pa_plan_revenue.Get_planning_Rates');
14118: print_msg(to_char(l_stage)||' substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
14119: IF p_pa_debug_mode = 'Y' Then
14120: pa_debug.reset_err_stack;

Line 14127: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

14123: RAISE;
14124:
14125: WHEN UNEXPECTED_ERRORS THEN
14126: fnd_msg_pub.add_exc_msg
14127: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
14128: ,p_procedure_name => 'Get_Res_Rates:Update_rollupTmp_OvrRates');
14129: print_msg(to_char(l_stage)||' substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
14130: IF p_pa_debug_mode = 'Y' Then
14131: pa_debug.reset_err_stack;

Line 14137: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

14133: x_return_status := 'U';
14134: RAISE;
14135: WHEN OTHERS THEN
14136: fnd_msg_pub.add_exc_msg
14137: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
14138: ,p_procedure_name => 'Get_Res_Rates');
14139: print_msg(to_char(l_stage)||' substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
14140: IF p_pa_debug_mode = 'Y' Then
14141: pa_debug.reset_err_stack;

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

15570: BEGIN
15571:
15572: x_return_status := 'S';
15573: IF p_pa_debug_mode = 'Y' Then
15574: print_msg(to_char(l_stage)||'Entered PA_FP_CALC_PLAN_PKG.Process_skipped_records');
15575: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.Process_skipped_records');
15576: End If;
15577: /***
15578: If P_PA_DEBUG_MODE = 'Y' Then

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

15571:
15572: x_return_status := 'S';
15573: IF p_pa_debug_mode = 'Y' Then
15574: print_msg(to_char(l_stage)||'Entered PA_FP_CALC_PLAN_PKG.Process_skipped_records');
15575: pa_debug.init_err_stack('PA_FP_CALC_PLAN_PKG.Process_skipped_records');
15576: End If;
15577: /***
15578: If P_PA_DEBUG_MODE = 'Y' Then
15579: for i in (select * from pa_fp_spread_calc_tmp ) LOOP

Line 15752: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'

15748: WHEN OTHERS THEN
15749: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
15750: x_msg_data := sqlcode||sqlerrm;
15751: fnd_msg_pub.add_exc_msg
15752: ( p_pkg_name => 'PA_FP_CALC_PLAN_PKG'
15753: ,p_procedure_name => 'Process_skipped_records' );
15754: l_stage := 2120;
15755: print_msg(to_char(l_stage)||' substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
15756: IF p_pa_debug_mode = 'Y' Then

Line 15765: END PA_FP_CALC_PLAN_PKG;

15761: END Process_skipped_records;
15762: /* End for bug 5028631 */
15763:
15764:
15765: END PA_FP_CALC_PLAN_PKG;