DBA Data[Home] [Help]

APPS.PA_FP_CALC_PLAN_PKG dependencies on FND_API

Line 2849: x_return_status := FND_API.G_RET_STS_SUCCESS;

2845: );
2846:
2847: BEGIN
2848:
2849: x_return_status := FND_API.G_RET_STS_SUCCESS;
2850: x_msg_count := NULL;
2851: x_msg_data := NULL;
2852: l_return_status := 'S';
2853: IF p_pa_debug_mode = 'Y' Then

Line 3269: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3265: End If;
3266:
3267: EXCEPTION
3268: WHEN OTHERS THEN
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'

Line 3363: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3359: Return;
3360:
3361: EXCEPTION
3362: WHEN OTHERS THEN
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'

Line 3734: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3730:
3731: EXCEPTION
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));

Line 4537: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4533: End If;
4534:
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

Line 4653: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4649:
4650:
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;

Line 5140: x_return_status := FND_API.G_RET_STS_SUCCESS;

5136: l_pjf_init_revenue_tab pa_plsql_datatypes.NumTabTyp;
5137:
5138: BEGIN
5139:
5140: x_return_status := FND_API.G_RET_STS_SUCCESS;
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

Line 5580: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5576: End If;
5577: RAISE;
5578:
5579: WHEN OTHERS THEN
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'

Line 5635: x_return_status := FND_API.G_RET_STS_SUCCESS;

5631: l_return_status VARCHAR2(30);
5632: l_error_msg_code Varchar2(100);
5633: BEGIN
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;

Line 5703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5699:
5700: EXCEPTION
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

Line 6234: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6230: pa_debug.reset_err_stack;
6231: End If;
6232: EXCEPTION
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' );

Line 6333: x_return_status := FND_API.G_RET_STS_SUCCESS;

6329: ORDER BY tmp.resource_assignment_id,tmp.txn_currency_code;
6330:
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';

Line 6668: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6664: pa_debug.reset_err_stack;
6665: End If;
6666: EXCEPTION
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' );

Line 6911: x_return_status := FND_API.G_RET_STS_SUCCESS;

6907:
6908: rollup_ra_rec rollup_ra_csr%ROWTYPE;
6909: l_msg_index_out NUMBER;
6910: BEGIN
6911: x_return_status := FND_API.G_RET_STS_SUCCESS;
6912: l_stage := 6000;
6913:
6914: rollup_ra_rec := NULL;
6915: IF NOT rollup_ra_csr%ISOPEN THEN

Line 6951: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6947: pa_debug.g_err_stage := to_char(l_stage)||': ***ERROR*** Updating pa_budget_versions in rollup_pf_pfc_to_bv';
6948: IF P_PA_DEBUG_MODE = 'Y' THEN
6949: pa_debug.write('rollup_pf_pfc_to_bv: ' || g_module_name,pa_debug.g_err_stage,3);
6950: END IF;
6951: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6952: SELECT TO_CHAR(SYSDATE,'DD-MON-YYYY HH:MI:SS') INTO g_session_time
6953: FROM DUAL;
6954: print_msg('RETURN bvid => '||g_budget_version_id||' ,pid => '||g_project_id||' ,sesstime => '||g_session_time);
6955: RETURN;

Line 6995: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6991: pa_debug.g_err_stage := to_char(l_stage)||': ***ERROR*** Updating pa_budget_versions in rollup_pf_pfc_to_bv';
6992: IF P_PA_DEBUG_MODE = 'Y' THEN
6993: pa_debug.write('rollup_pf_pfc_to_bv: ' || g_module_name,pa_debug.g_err_stage,3);
6994: END IF;
6995: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6996: SELECT TO_CHAR(SYSDATE,'DD-MON-YYYY HH:MI:SS') INTO g_session_time
6997: FROM DUAL;
6998: print_msg('RETURN bvid => '||g_budget_version_id||' ,pid => '||g_project_id||' ,sesstime => '||g_session_time);
6999: RETURN;

Line 7011: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

7007: */
7008:
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);

Line 7021: raise FND_API.G_EXC_UNEXPECTED_ERROR;

7017: print_msg(to_char(l_stage)||' substr(SQLERRM,1,240) => '|| substr(SQLERRM,1,240));
7018: IF P_PA_DEBUG_MODE = 'Y' THEN
7019: pa_debug.write('rollup_pf_pfc_to_bv: ' || g_module_name,pa_debug.g_err_stage,3);
7020: END IF;
7021: raise FND_API.G_EXC_UNEXPECTED_ERROR;
7022:
7023: END rollup_pf_pfc_to_bv;
7024:
7025: /* This API populates the spread records in the tmp table and finally spread api is called to process these records */

Line 7314: l_entire_return_status := FND_API.G_RET_STS_SUCCESS;

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;
7317: l_msg_data := NULL;
7318: x_return_status := 'S';

Line 7456: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

7452: l_entire_msg_count := nvl(l_entire_msg_count,0) + nvl(l_msg_count,0);
7453: l_entire_msg_data := l_msg_data;
7454: --print_msg('After calling pa_fp_multi_currency_pkg.conv_mc_bulk msgData['||l_msg_data||'RetSts['||l_return_status||']msgCt['||l_msg_count||']');
7455:
7456: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7457: l_stage := 6600;
7458: print_msg(to_char(l_stage)||' Errored In convert_ra_txn_currency');
7459: l_entire_return_status := l_return_status;
7460: END IF;

Line 7500: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

7496:
7497:
7498: EXCEPTION
7499: WHEN OTHERS THEN
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'

Line 8187: l_return_status := FND_API.G_RET_STS_SUCCESS;

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;
8189: x_return_status := FND_API.G_RET_STS_SUCCESS;
8190:
8191: /* Initialize the msg stack */

Line 8188: l_entire_return_status := FND_API.G_RET_STS_SUCCESS;

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;
8189: x_return_status := FND_API.G_RET_STS_SUCCESS;
8190:
8191: /* Initialize the msg stack */
8192: FND_MSG_PUB.initialize;

Line 8189: x_return_status := FND_API.G_RET_STS_SUCCESS;

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;
8189: x_return_status := FND_API.G_RET_STS_SUCCESS;
8190:
8191: /* Initialize the msg stack */
8192: FND_MSG_PUB.initialize;
8193:

Line 9107: l_entire_return_status := FND_API.G_RET_STS_ERROR;

9103: ,p_value3 => g_resource_name
9104: ,p_token4 => 'G_CURRENCY_CODE'
9105: ,p_value4 => l_txn_currency_code_override
9106: );
9107: l_entire_return_status := FND_API.G_RET_STS_ERROR;
9108: RAISE skip_record;
9109: Elsif (l_actual_exists_flag = 'Y' AND g_wp_version_flag = 'Y') Then
9110: OPEN get_line_info(l_resource_assignment_id);
9111: FETCH get_line_info INTO

Line 9126: l_entire_return_status := FND_API.G_RET_STS_ERROR;

9122: ,p_value3 => g_resource_name
9123: ,p_token4 => 'G_CURRENCY_CODE'
9124: ,p_value4 => l_txn_currency_code_override
9125: );
9126: l_entire_return_status := FND_API.G_RET_STS_ERROR;
9127: RAISE skip_record;
9128: /* Note: If only currency with out change in quantity, then refresh else spread the addl qty */
9129: ElsIF (NVL(l_delete_budget_lines,'N') <> 'Y' AND l_quantity_changed_flag = 'N'
9130: and NVL(p_apply_progress_flag,'N') <> 'Y' ) Then

Line 9188: l_entire_return_status := FND_API.G_RET_STS_ERROR;

9184: p_token3 => 'G_RESOURCE_NAME',
9185: p_value3 => g_resource_name,
9186: p_token4 => 'G_SPREAD_FROM_DATE',
9187: p_value4 => g_spread_from_date);
9188: l_entire_return_status := FND_API.G_RET_STS_ERROR;
9189: RAISE skip_record;
9190: End IF;
9191: END IF;
9192:

Line 10592: l_entire_return_status := FND_API.G_RET_STS_ERROR;

10588: IF l_return_status <> '0' THEN
10589: print_msg('retSts of calc_raw_cost ['||l_return_status||']l_msg_data['||l_msg_data||']'); --5028631
10590: x_return_status := 'E';
10591: x_msg_data := l_msg_data; --5028631
10592: l_entire_return_status := FND_API.G_RET_STS_ERROR;
10593: ADD_MSGTO_STACK( P_MSG_NAME => x_msg_data); --5028631
10594: GOTO END_OF_PROCESS; --5028631
10595: END IF;
10596:

Line 10661: l_entire_return_status := FND_API.G_RET_STS_ERROR;

10657:
10658: IF l_return_status <> '0' THEN
10659: x_return_status := 'E';
10660: x_msg_data := l_msg_data; --5028631
10661: l_entire_return_status := FND_API.G_RET_STS_ERROR;
10662: ADD_MSGTO_STACK( P_MSG_NAME => x_msg_data); --5028631
10663: GOTO END_OF_PROCESS; --5028631
10664: END IF;
10665:

Line 10704: l_entire_return_status := FND_API.G_RET_STS_ERROR;

10700: );
10701: IF l_return_status <> '0' THEN
10702: x_return_status := 'E';
10703: x_msg_data := l_msg_data; --5028631
10704: l_entire_return_status := FND_API.G_RET_STS_ERROR;
10705: ADD_MSGTO_STACK( P_MSG_NAME => x_msg_data); --5028631
10706: GOTO END_OF_PROCESS; --5028631
10707: END IF;
10708:

Line 10804: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

10800: ,x_msg_data => l_msg_data --5028631
10801: );
10802: l_pls_end_time := dbms_utility.get_time;
10803: print_plsql_time('End of Update_rounding_diff:Total time :['||(l_pls_end_time-l_pls_start_time)||']');
10804: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10805: x_return_status := l_return_status;
10806: x_msg_data := l_msg_data; --5028631
10807: l_entire_return_status := l_return_status;
10808: END IF;

Line 10838: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

10834: print_plsql_time('End of Currency ConversionTotal time :['||(l_pls_end_time-l_pls_start_time)||']');
10835: If P_PA_DEBUG_MODE = 'Y' Then
10836: print_msg('AFter calling convert_txn_currency API returnSTS['||l_return_status||']');
10837: End if;
10838: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10839: x_return_status := l_return_status;
10840: x_msg_data := l_msg_data; --5028631
10841: l_entire_return_status := l_return_status;
10842: END IF;

Line 10859: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

10855: ,x_msg_count => x_msg_count
10856: ,x_msg_data => l_msg_data --5028631
10857: );
10858: --print_msg('AFter calling Update_PCPFC_rounding_diff retSts['||l_return_status||']');
10859: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10860: x_return_status := l_return_status;
10861: x_msg_data := l_msg_data; --5028631
10862: l_entire_return_status := l_return_status;
10863: END IF;

Line 11015: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

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;
11018: x_msg_data := l_msg_data; --5028631
11019: print_msg('Errored in pa_fp_calc_plan_pkg.rollup_pf_pfc_to_ra');

Line 11082: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

11078: );
11079: If P_PA_DEBUG_MODE = 'Y' Then
11080: print_msg('After calling Populate_rollup_WithMrcRecs retSts['||l_return_status||']msgData['||l_msg_data||']');
11081: End if;
11082: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11083: x_return_status := l_return_status;
11084: l_entire_return_status := l_return_status;
11085: x_msg_data := l_msg_data; --5028631
11086: print_msg('Failed Unexpected exception in Populate_rollup_WithMrcRecs API['||sqlcode||sqlerrm);

Line 11105: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

11101: );
11102: If P_PA_DEBUG_MODE = 'Y' Then
11103: print_msg('After calling pa_mrc_finplan.maintain_all_mc_budget_lines retSts['||l_return_status||']msgData['||l_msg_data||']');
11104: end if;
11105: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11106: x_return_status := l_return_status;
11107: l_entire_return_status := l_return_status;
11108: x_msg_data := l_msg_data; --5028631
11109: print_msg('Failed Unexpected exception in MRC API['||sqlcode||sqlerrm);

Line 11138: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

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;
11141: x_msg_data := l_msg_data; --5028631
11142: GOTO END_OF_PROCESS;

Line 11162: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

11158: );
11159: If P_PA_DEBUG_MODE = 'Y' Then
11160: print_msg('After calling pa_fp_gen_amount_utils.get_plan_version_dtls retSts['||l_return_status||']msgData['||l_msg_data||']');
11161: End if;
11162: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11163: x_return_status := l_return_status;
11164: l_entire_return_status := l_return_status;
11165: x_msg_data := l_msg_data; --5028631
11166: GOTO END_OF_PROCESS;

Line 11184: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

11180: );
11181: If P_PA_DEBUG_MODE = 'Y' Then
11182: print_msg('AFter calling pa_fp_gen_budget_amt_pub.insert_txn_currency API retSts['||l_return_status||']x_msg_date['||l_msg_data||']');
11183: End if;
11184: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11185: x_return_status := l_return_status;
11186: l_entire_return_status := l_return_status;
11187: x_msg_data := l_msg_data; --5028631
11188: GOTO END_OF_PROCESS;

Line 11232: ( p_encoded => FND_API.G_TRUE

11228: ElsIf x_return_status <> 'S' Then
11229: x_msg_count := fnd_msg_pub.count_msg;
11230: IF x_msg_count = 1 THEN
11231: pa_interface_utils_pub.get_messages
11232: ( p_encoded => FND_API.G_TRUE
11233: ,p_msg_index => 1
11234: ,p_data => x_msg_data
11235: ,p_msg_index_out => l_msg_index_out
11236: );

Line 11285: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

11281: print_plsql_time('End of CalculateAPI:Total time :['||(l_pls_end_time-l_calc_start_time)||']');
11282:
11283: EXCEPTION
11284: WHEN OTHERS THEN
11285: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11286: IF p_pa_debug_mode = 'Y' Then
11287: pa_debug.write_file('LOG: '||pa_debug.g_err_stage);
11288: pa_debug.reset_err_stack;
11289: End If;

Line 11531: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

11527:
11528: EXCEPTION
11529:
11530: WHEN OTHERS THEN
11531: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11532: If x_msg_data is NULL Then
11533: x_msg_data := sqlcode||sqlerrm;
11534: End If;
11535: IF p_pa_debug_mode = 'Y' Then

Line 15749: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

15745: pa_debug.reset_err_stack;
15746: End If;
15747: EXCEPTION
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' );