DBA Data[Home] [Help]

APPS.PA_FP_GEN_BUDGET_AMT_PUB dependencies on FND_API

Line 62: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

58: FND_MSG_PUB.initialize;
59: END IF;
60:
61: X_MSG_COUNT := 0;
62: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
63:
64: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
65: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GENERATE_BUDGET_AMT_WRP');
66: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

Line 96: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

92: ||x_return_status,
93: p_module_name => l_module_name,
94: p_log_level => 5);
95: END IF;
96: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
97: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
98: END IF;
99:
100: /* This API validates that the current generation is supported.

Line 129: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

125: ||x_return_status,
126: p_module_name => l_module_name,
127: p_log_level => 5 );
128: END IF;
129: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
130: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
131: END IF;
132:
133: /* When VALIDATE_SUPPORT_CASES returns a non-null warning message,

Line 178: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

174: ||x_return_status,
175: p_module_name => l_module_name,
176: p_log_level => 5);
177: END IF;
178: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
179: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
180: PA_DEBUG.reset_err_stack;
181: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
182: PA_DEBUG.Reset_Curr_Function;

Line 210: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

206: (P_PLAN_VERSION_ID => P_BUDGET_VERSION_ID,
207: X_RETURN_STATUS => X_RETURN_STATUS,
208: X_MSG_COUNT => X_MSG_COUNT,
209: X_MSG_DATA => X_MSG_DATA);
210: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
211: --If we can't acquire lock, customized message is thrown from within
212: -- the API, so we should suppress exception error.
213: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
214: PA_DEBUG.reset_err_stack;

Line 266: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

262: P_CALLED_MODE => p_called_mode,
263: P_MODULE_NAME => l_module_name,
264: P_LOG_LEVEL => 5 );
265: END IF;
266: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
267: raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
268: END IF;
269: -- END OF IPM: New Entity ER ------------------------------------------
270:

Line 337: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

333: P_CALLED_MODE => p_called_mode,
334: P_MODULE_NAME => l_module_name,
335: P_LOG_LEVEL => 5 );
336: END IF;
337: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
338: raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
339: END IF;
340: -- END OF IPM: New Entity ER ------------------------------------------
341:

Line 383: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

379: X_RETURN_STATUS => X_RETURN_STATUS,
380: X_MSG_COUNT => X_MSG_COUNT,
381: X_MSG_DATA => X_MSG_DATA);
382:
383: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
384: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
385: END IF;
386: IF p_pa_debug_mode = 'Y' THEN
387: pa_fp_gen_amount_utils.fp_debug

Line 427: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

423: X_RETURN_STATUS => X_RETURN_STATUS,
424: X_MSG_COUNT => X_MSG_COUNT,
425: X_MSG_DATA => X_MSG_DATA);
426: --dbms_output.put_line('after PA_FP_GEN_BUDGET_AMT_PUB.GENERATE_BUDGET_AMT_RES_SCH:'||x_return_status);
427: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
428: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
429: END IF;
430: IF p_pa_debug_mode = 'Y' THEN
431: pa_fp_gen_amount_utils.fp_debug

Line 475: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

471: P_COMMIT_FLAG => P_COMMIT_FLAG,
472: X_RETURN_STATUS => X_RETURN_STATUS,
473: X_MSG_COUNT => X_MSG_COUNT,
474: X_MSG_DATA => X_MSG_DATA);
475: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
476: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
477: END IF;
478: IF p_pa_debug_mode = 'Y' THEN
479: pa_fp_gen_amount_utils.fp_debug

Line 517: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

513: X_RETURN_STATUS => X_RETURN_STATUS,
514: X_MSG_COUNT => X_MSG_COUNT,
515: X_MSG_DATA => X_MSG_DATA);
516:
517: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
518: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
519: END IF;
520: IF p_pa_debug_mode = 'Y' THEN
521: pa_fp_gen_amount_utils.fp_debug

Line 552: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

548: X_RETURN_STATUS => X_RETURN_STATUS,
549: X_MSG_COUNT => X_MSG_COUNT,
550: X_MSG_DATA => X_MSG_DATA);
551:
552: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
553: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
554: END IF;
555: IF p_pa_debug_mode = 'Y' THEN
556: pa_fp_gen_amount_utils.fp_debug

Line 610: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

606: p_calling_module => 'BUDGET_GENERATION', -- Added for Bug#5395732
607: X_RETURN_STATUS => X_RETURN_STATUS,
608: X_MSG_COUNT => X_MSG_COUNT,
609: X_MSG_DATA => X_MSG_DATA);
610: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
611: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
612: END IF;
613: IF p_pa_debug_mode = 'Y' THEN
614: pa_fp_gen_amount_utils.fp_debug

Line 649: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

645: P_FP_COLS_REC => l_fp_cols_rec,
646: X_RETURN_STATUS => X_RETURN_STATUS,
647: X_MSG_COUNT => X_MSG_COUNT,
648: X_MSG_DATA => X_MSG_DATA);
649: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
650: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
651: END IF;
652: IF p_pa_debug_mode = 'Y' THEN
653: pa_fp_gen_amount_utils.fp_debug

Line 682: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

678: ,p_calling_context => 'GENERATION' --Bug 4247703
679: ,x_return_status => x_return_status
680: ,x_msg_count => x_msg_count
681: ,x_msg_data => x_msg_data);
682: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
683: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
684: END IF;
685: IF p_pa_debug_mode = 'Y' THEN
686: pa_fp_gen_amount_utils.fp_debug

Line 710: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

706: X_RETURN_STATUS => X_RETURN_STATUS,
707: X_MSG_COUNT => X_MSG_COUNT,
708: X_MSG_DATA => X_MSG_DATA);
709: --dbms_output.put_line('after chg_doc:'||x_return_status);
710: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
711: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
712: END IF;
713: IF p_pa_debug_mode = 'Y' THEN
714: pa_fp_gen_amount_utils.fp_debug

Line 749: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

745: X_RETURN_STATUS => X_RETURN_STATUS,
746: X_MSG_COUNT => X_MSG_COUNT,
747: X_MSG_DATA => X_MSG_DATA);
748:
749: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
750: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
751: END IF;
752: IF p_pa_debug_mode = 'Y' THEN
753: pa_fp_gen_amount_utils.fp_debug

Line 778: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

774: X_RETURN_STATUS => X_RETURN_STATUS,
775: X_MSG_COUNT => X_MSG_COUNT,
776: X_MSG_DATA => X_MSG_DATA);
777:
778: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
779: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
780: END IF;
781: IF p_pa_debug_mode = 'Y' THEN
782: pa_fp_gen_amount_utils.fp_debug

Line 807: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

803: X_RETURN_STATUS => X_RETURN_STATUS,
804: X_MSG_COUNT => X_MSG_COUNT,
805: X_MSG_DATA => X_MSG_DATA);
806: --hr_utility.trace('after pub1.maintain bv:'||x_return_status);
807: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
808: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
809: END IF;
810: IF p_pa_debug_mode = 'Y' THEN
811: pa_fp_gen_amount_utils.fp_debug

Line 837: (p_encoded => FND_API.G_TRUE

833: -- PA_MRC_FINPLAN.G_CALLING_MODULE := Null;
834: l_msg_count := FND_MSG_PUB.count_msg;
835: IF l_msg_count = 1 THEN
836: PA_INTERFACE_UTILS_PUB.get_messages
837: (p_encoded => FND_API.G_TRUE
838: ,p_msg_index => 1
839: ,p_msg_count => l_msg_count
840: ,p_msg_data => l_msg_data
841: ,p_data => l_data

Line 849: x_return_status := FND_API.G_RET_STS_ERROR;

845: ELSE
846: x_msg_count := l_msg_count;
847: END IF;
848: ROLLBACK;
849: x_return_status := FND_API.G_RET_STS_ERROR;
850:
851: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
852: PA_DEBUG.reset_err_stack;
853: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

Line 858: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

854: PA_DEBUG.Reset_Curr_Function;
855: END IF;
856:
857: WHEN OTHERS THEN
858: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
859: x_msg_data := SUBSTR(SQLERRM,1,240);
860: FND_MSG_PUB.add_exc_msg
861: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
862: ,p_procedure_name => 'GENERATE_BUDGET_AMT_WRP');

Line 870: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

866: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
867: PA_DEBUG.Reset_Curr_Function;
868: END IF;
869:
870: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
871:
872: END GENERATE_BUDGET_AMT_WRP;
873:
874: FUNCTION Get_Person_Id(p_res_id NUMBER)

Line 2063: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

2059: IF p_init_msg_flag = 'Y' THEN
2060: FND_MSG_PUB.initialize;
2061: END IF;
2062: X_MSG_COUNT := 0;
2063: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
2064:
2065: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
2066: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GENERATE_BUDGET_AMT_RES_SCH');
2067: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

Line 2249: x_return_status := FND_API.G_RET_STS_ERROR;

2245: l_labor_sch_fixed_dt,
2246: l_labor_sch_type;
2247:
2248: IF PROJ_DETAILS%NOTFOUND THEN
2249: x_return_status := FND_API.G_RET_STS_ERROR;
2250: l_role_error_code_flag := 'Y';
2251: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA',
2252: p_msg_name => 'PA_INVALID_PROJECT_ID');
2253: END IF;

Line 2255: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

2251: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA',
2252: p_msg_name => 'PA_INVALID_PROJECT_ID');
2253: END IF;
2254:
2255: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2256: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2257: END IF;
2258: CLOSE PROJ_DETAILS;
2259:

Line 2504: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

2500: P_FP_COLS_REC => p_FP_COLS_REC,
2501: X_RETURN_STATUS => X_RETURN_STATUS,
2502: X_MSG_COUNT => X_MSG_COUNT,
2503: X_MSG_DATA => X_MSG_DATA);
2504: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2505: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2506: END IF;
2507: IF p_pa_debug_mode = 'Y' THEN
2508: pa_fp_gen_amount_utils.fp_debug

Line 2536: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

2532: P_FP_COLS_REC => p_FP_COLS_REC,
2533: X_RETURN_STATUS => X_RETURN_STATUS,
2534: X_MSG_COUNT => X_MSG_COUNT,
2535: X_MSG_DATA => X_MSG_DATA);
2536: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2537: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2538: END IF;
2539: IF p_pa_debug_mode = 'Y' THEN
2540: pa_fp_gen_amount_utils.fp_debug

Line 2791: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2787: ,X_return_status => l_return_status
2788: ,X_msg_count => x_msg_count
2789: ,X_msg_data => x_msg_data);
2790:
2791: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2792: x_return_status := l_return_status;
2793: END IF;
2794:
2795: BEGIN

Line 2997: x_return_status := FND_API.G_RET_STS_ERROR;

2993: ,x_error_message => x_msg_data
2994: );
2995:
2996: IF l_return_status <> '0' THEN
2997: x_return_status := FND_API.G_RET_STS_ERROR;
2998: END IF;
2999:
3000: IF NVL(l_ce_raw_cost,0) <> NVL(x_raw_cost,0) THEN
3001: x_raw_cost := pa_currency.round_trans_currency_amt1(x_raw_cost,x_cost_txn_curr_code);

Line 3027: x_return_status := FND_API.G_RET_STS_ERROR;

3023: ,x_error_message => x_msg_data
3024: );
3025:
3026: IF l_return_status <> '0' THEN
3027: x_return_status := FND_API.G_RET_STS_ERROR;
3028: END IF;
3029:
3030: IF NVL(l_ce_burdened_cost,0) <> NVL(x_burden_cost,0) THEN
3031: x_burden_cost := pa_currency.round_trans_currency_amt1(l_ce_burdened_cost,x_cost_txn_curr_code);

Line 3067: x_return_status := FND_API.G_RET_STS_ERROR;

3063: ,x_error_code => l_return_status
3064: ,x_error_message => x_msg_data
3065: );
3066: IF l_return_status <> '0' THEN
3067: x_return_status := FND_API.G_RET_STS_ERROR;
3068: END IF;
3069:
3070: IF NVL(l_ce_revenue,0) <> NVL(x_raw_revenue,0) THEN
3071: x_raw_revenue := pa_currency.round_trans_currency_amt1(l_ce_revenue,x_rev_txn_curr_code);

Line 3151: x_return_status := FND_API.G_RET_STS_ERROR;

3147:
3148:
3149: IF l_final_txn_exch_rate IS NULL OR l_status IS NOT NULL THEN
3150:
3151: x_return_status := FND_API.G_RET_STS_ERROR;
3152:
3153: pa_utils.add_message
3154: ( p_app_short_name => 'PA'
3155: ,p_msg_name => 'PA_FP_PROJ_NO_TXNCONVRATE'

Line 3234: x_return_status := FND_API.G_RET_STS_ERROR;

3230:
3231:
3232: IF l_final_txn_exch_rate IS NULL OR l_status IS NOT NULL THEN
3233:
3234: x_return_status := FND_API.G_RET_STS_ERROR;
3235:
3236: pa_utils.add_message
3237: ( p_app_short_name => 'PA'
3238: ,p_msg_name => 'PA_FP_PROJ_NO_TXNCONVRATE'

Line 3314: x_return_status := FND_API.G_RET_STS_ERROR;

3310:
3311:
3312: IF l_final_txn_exch_rate IS NULL OR l_status IS NOT NULL THEN
3313:
3314: x_return_status := FND_API.G_RET_STS_ERROR;
3315:
3316: pa_utils.add_message
3317: ( p_app_short_name => 'PA'
3318: ,p_msg_name => 'PA_FP_PROJ_NO_TXNCONVRATE'

Line 3453: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

3449: p_calling_module => 'BUDGET_GENERATION', -- Added for Bug#5395732
3450: X_RETURN_STATUS => X_RETURN_STATUS,
3451: X_MSG_COUNT => X_MSG_COUNT,
3452: X_MSG_DATA => X_MSG_DATA );
3453: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
3454: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3455: END IF;
3456: IF p_pa_debug_mode = 'Y' THEN
3457: pa_fp_gen_amount_utils.fp_debug

Line 4321: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

4317: X_RETURN_STATUS => X_RETURN_STATUS,
4318: X_MSG_COUNT => X_MSG_COUNT,
4319: X_MSG_DATA => X_MSG_DATA);
4320:
4321: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
4322: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
4323: END IF;
4324: IF p_pa_debug_mode = 'Y' THEN
4325: pa_fp_gen_amount_utils.fp_debug

Line 4357: (p_encoded => FND_API.G_TRUE

4353: -- PA_MRC_FINPLAN.G_CALLING_MODULE := Null;
4354: l_msg_count := FND_MSG_PUB.count_msg;
4355: IF l_msg_count = 1 THEN
4356: PA_INTERFACE_UTILS_PUB.get_messages
4357: (p_encoded => FND_API.G_TRUE
4358: ,p_msg_index => 1
4359: ,p_msg_count => l_msg_count
4360: ,p_msg_data => l_msg_data
4361: ,p_data => l_data

Line 4369: x_return_status := FND_API.G_RET_STS_ERROR;

4365: ELSE
4366: x_msg_count := l_msg_count;
4367: END IF;
4368: ROLLBACK;
4369: x_return_status := FND_API.G_RET_STS_ERROR;
4370:
4371: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
4372: PA_DEBUG.reset_err_stack;
4373: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

Line 4380: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4376:
4377: RAISE;
4378:
4379: WHEN OTHERS THEN
4380: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4381: x_msg_data := SUBSTR(SQLERRM,1,240);
4382: FND_MSG_PUB.add_exc_msg
4383: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
4384: ,p_procedure_name => 'GENERATE_BUDGET_AMT_RES_SCH');

Line 4392: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4388: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
4389: PA_DEBUG.Reset_Curr_Function;
4390: END IF;
4391:
4392: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4393: END GENERATE_BUDGET_AMT_RES_SCH;
4394:
4395: PROCEDURE CREATE_RES_ASG
4396: (P_PROJECT_ID IN PA_PROJ_FP_OPTIONS.PROJECT_ID%TYPE,

Line 4644: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

4640: --Bug 4052036. This tbl will hold the ra ids that are inserted in this API
4641: l_ins_ra_id_tbl SYSTEM.PA_VARCHAR2_30_TBL_TYPE;
4642: BEGIN
4643: X_MSG_COUNT := 0;
4644: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
4645:
4646: l_project_id := p_project_id;
4647:
4648: IF p_pa_debug_mode = 'Y' THEN

Line 5052: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

5048: X_msg_data => X_MSG_DATA,
5049: X_msg_count => X_MSG_COUNT,
5050: X_return_status => X_RETURN_STATUS);
5051: --dbms_output.put_line('after get_resource_defaults:'||x_return_status);
5052: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
5053: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
5054: END IF;
5055: IF p_pa_debug_mode = 'Y' THEN
5056: pa_fp_gen_amount_utils.fp_debug

Line 5131: (p_encoded => FND_API.G_TRUE

5127: -- PA_MRC_FINPLAN.G_CALLING_MODULE := Null;
5128: l_msg_count := FND_MSG_PUB.count_msg;
5129: IF l_msg_count = 1 THEN
5130: PA_INTERFACE_UTILS_PUB.get_messages
5131: (p_encoded => FND_API.G_TRUE
5132: ,p_msg_index => 1
5133: ,p_msg_count => l_msg_count
5134: ,p_msg_data => l_msg_data
5135: ,p_data => l_data

Line 5143: x_return_status := FND_API.G_RET_STS_ERROR;

5139: ELSE
5140: x_msg_count := l_msg_count;
5141: END IF;
5142: ROLLBACK;
5143: x_return_status := FND_API.G_RET_STS_ERROR;
5144:
5145: IF P_PA_DEBUG_MODE = 'Y' THEN
5146: PA_DEBUG.Reset_Curr_Function;
5147: END IF;

Line 5149: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5145: IF P_PA_DEBUG_MODE = 'Y' THEN
5146: PA_DEBUG.Reset_Curr_Function;
5147: END IF;
5148: WHEN OTHERS THEN
5149: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5150: x_msg_data := SUBSTR(SQLERRM,1,240);
5151: -- dbms_output.put_line('inside excep create res asg');
5152: -- dbms_output.put_line(SUBSTR(SQLERRM,1,240));
5153: FND_MSG_PUB.add_exc_msg

Line 5160: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

5156:
5157: IF P_PA_DEBUG_MODE = 'Y' THEN
5158: PA_DEBUG.Reset_Curr_Function;
5159: END IF;
5160: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5161:
5162: END CREATE_RES_ASG;
5163:
5164:

Line 5209: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

5205: l_etc_start_date DATE;
5206: l_spread_curve_id pa_spread_curves_b.spread_curve_id%TYPE;
5207: BEGIN
5208: X_MSG_COUNT := 0;
5209: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
5210:
5211: IF p_pa_debug_mode = 'Y' THEN
5212: pa_debug.set_curr_function( p_function => 'UPDATE_RES_ASG'
5213: ,p_debug_mode => p_pa_debug_mode);

Line 5562: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5558: RETURN;
5559:
5560: EXCEPTION
5561: WHEN OTHERS THEN
5562: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5563: x_msg_data := SUBSTR(SQLERRM,1,240);
5564: FND_MSG_PUB.add_exc_msg
5565: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
5566: ,p_procedure_name => 'UPDATE_RES_ASG');

Line 5570: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

5566: ,p_procedure_name => 'UPDATE_RES_ASG');
5567: IF P_PA_DEBUG_MODE = 'Y' THEN
5568: PA_DEBUG.Reset_Curr_Function;
5569: END IF;
5570: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5571:
5572: END UPDATE_RES_ASG;
5573:
5574: /*Procedure to delete the manually entered budget line records

Line 5601: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

5597:
5598: BEGIN
5599:
5600: X_MSG_COUNT := 0;
5601: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
5602:
5603: IF p_pa_debug_mode = 'Y' THEN
5604: pa_debug.set_curr_function( p_function => 'DEL_MANUAL_BDGT_LINES'
5605: ,p_debug_mode => p_pa_debug_mode);

Line 5653: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

5649: X_RETURN_STATUS => X_RETURN_STATUS,
5650: X_MSG_COUNT => X_MSG_COUNT,
5651: X_MSG_DATA => X_MSG_DATA);
5652:
5653: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
5654: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
5655: END IF;
5656: IF p_pa_debug_mode = 'Y' THEN
5657: pa_fp_gen_amount_utils.fp_debug

Line 5671: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5667: END IF;
5668:
5669: EXCEPTION
5670: WHEN OTHERS THEN
5671: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5672: x_msg_data := SUBSTR(SQLERRM,1,240);
5673: FND_MSG_PUB.add_exc_msg
5674: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
5675: ,p_procedure_name => 'DEL_MANUAL_BDGT_LINES');

Line 5681: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

5677: IF P_PA_DEBUG_MODE = 'Y' THEN
5678: PA_DEBUG.Reset_Curr_Function;
5679: END IF;
5680:
5681: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5682: END DEL_MANUAL_BDGT_LINES;
5683:
5684: PROCEDURE UPDATE_INIT_AMOUNTS
5685: (P_PROJECT_ID IN PA_PROJ_FP_OPTIONS.PROJECT_ID%TYPE,

Line 5698: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

5694:
5695: BEGIN
5696:
5697: X_MSG_COUNT := 0;
5698: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
5699:
5700: IF p_pa_debug_mode = 'Y' THEN
5701: pa_debug.set_curr_function( p_function => 'UPDATE_INIT_AMOUNTS'
5702: ,p_debug_mode => p_pa_debug_mode);

Line 5729: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5725: END IF;
5726:
5727: EXCEPTION
5728: WHEN OTHERS THEN
5729: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5730: x_msg_data := SUBSTR(SQLERRM,1,240);
5731: FND_MSG_PUB.add_exc_msg
5732: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
5733: ,p_procedure_name => 'UPDATE_INIT_AMOUNTS');

Line 5739: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

5735: IF P_PA_DEBUG_MODE = 'Y' THEN
5736: PA_DEBUG.Reset_Curr_Function;
5737: END IF;
5738:
5739: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5740:
5741: END UPDATE_INIT_AMOUNTS;
5742:
5743: /* Procedure to update the latest amount

Line 5762: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

5758:
5759: BEGIN
5760:
5761: X_MSG_COUNT := 0;
5762: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
5763:
5764: IF p_pa_debug_mode = 'Y' THEN
5765: pa_debug.set_curr_function( p_function => 'UPDATE_BV_FOR_GEN_DATE'
5766: ,p_debug_mode => p_pa_debug_mode);

Line 5786: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5782: END IF;
5783:
5784: EXCEPTION
5785: WHEN OTHERS THEN
5786: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5787: x_msg_data := SUBSTR(SQLERRM,1,240);
5788: rollback;
5789: FND_MSG_PUB.add_exc_msg
5790: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'

Line 5797: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

5793: IF P_PA_DEBUG_MODE = 'Y' THEN
5794: PA_DEBUG.Reset_Curr_Function;
5795: END IF;
5796:
5797: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5798:
5799: END UPDATE_BV_FOR_GEN_DATE;
5800:
5801: PROCEDURE GET_GENERATED_RES_ASG

Line 5816: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

5812: l_cmt_res_id_tab PA_PLSQL_DATATYPES.IdTabTyp;
5813: l_exist_flag VARCHAR2(1);
5814:
5815: BEGIN
5816: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
5817: X_MSG_COUNT := 0;
5818:
5819: IF p_pa_debug_mode = 'Y' THEN
5820: pa_debug.set_curr_function( p_function => 'GET_GENERATED_RES_ASG'

Line 5864: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5860: END IF;
5861:
5862: EXCEPTION
5863: WHEN OTHERS THEN
5864: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5865: x_msg_data := SUBSTR(SQLERRM,1,240);
5866: FND_MSG_PUB.add_exc_msg
5867: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
5868: ,p_procedure_name => 'GET_GENERATED_RES_ASG');

Line 5874: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

5870: IF P_PA_DEBUG_MODE = 'Y' THEN
5871: PA_DEBUG.Reset_Curr_Function;
5872: END IF;
5873:
5874: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5875: END GET_GENERATED_RES_ASG;
5876:
5877:
5878: /******************************************************************************

Line 5917: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

5913:
5914: l_wp_version_flag pa_budget_versions.wp_version_flag%type;
5915:
5916: BEGIN
5917: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
5918: X_MSG_COUNT := 0;
5919:
5920: IF p_pa_debug_mode = 'Y' THEN
5921: pa_debug.set_curr_function( p_function => 'INSERT_TXN_CURRENCY'

Line 5949: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

5945: X_RETURN_STATUS => X_RETURN_STATUS,
5946: X_MSG_COUNT => X_MSG_COUNT,
5947: X_MSG_DATA => X_MSG_DATA);
5948:
5949: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
5950: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
5951: END IF;
5952: IF p_pa_debug_mode = 'Y' THEN
5953: pa_fp_gen_amount_utils.fp_debug

Line 6084: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6080: END IF;
6081:
6082: EXCEPTION
6083: WHEN OTHERS THEN
6084: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6085: x_msg_data := SUBSTR(SQLERRM,1,240);
6086: FND_MSG_PUB.add_exc_msg
6087: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
6088: ,p_procedure_name => 'INSERT_TXN_CURRENCY');

Line 6094: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

6090: IF P_PA_DEBUG_MODE = 'Y' THEN
6091: PA_DEBUG.Reset_Curr_Function;
6092: END IF;
6093:
6094: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6095: END INSERT_TXN_CURRENCY;
6096:
6097: PROCEDURE RESET_COST_AMOUNTS
6098: (P_BUDGET_VERSION_ID IN PA_BUDGET_VERSIONS.BUDGET_VERSION_ID%TYPE,

Line 6105: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

6101: X_MSG_DATA OUT NOCOPY VARCHAR2) IS
6102: l_module_name VARCHAR2(200) := 'pa.plsql.PA_FP_GEN_BUDGET_AMT_PUB.RESET_COST_AMOUNTS';
6103: BEGIN
6104:
6105: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
6106: X_MSG_COUNT := 0;
6107:
6108: IF p_pa_debug_mode = 'Y' THEN
6109: pa_debug.set_curr_function( p_function => 'RESET_COST_AMOUNTS'

Line 6136: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6132: END IF;
6133:
6134: EXCEPTION
6135: WHEN OTHERS THEN
6136: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6137: x_msg_data := SUBSTR(SQLERRM,1,240);
6138: FND_MSG_PUB.add_exc_msg
6139: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
6140: ,p_procedure_name => 'RESET_COST_AMOUNTS');

Line 6146: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

6142: IF P_PA_DEBUG_MODE = 'Y' THEN
6143: PA_DEBUG.Reset_Curr_Function;
6144: END IF;
6145:
6146: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6147:
6148: END RESET_COST_AMOUNTS;
6149:
6150: PROCEDURE GEN_REV_BDGT_AMT_RES_SCH_WRP

Line 6282: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

6278: IF p_init_msg_flag = 'Y' THEN
6279: FND_MSG_PUB.initialize;
6280: END IF;
6281: X_MSG_COUNT := 0;
6282: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
6283:
6284: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
6285: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GEN_REV_BDGT_AMT_RES_SCH_WRP');
6286: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

Line 6321: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

6317: P_INIT_MSG_FLAG => P_INIT_MSG_FLAG,
6318: X_RETURN_STATUS => X_RETURN_STATUS,
6319: X_MSG_COUNT => X_MSG_COUNT,
6320: X_MSG_DATA => X_MSG_DATA);
6321: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
6322: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
6323: END IF;
6324: IF p_pa_debug_mode = 'Y' THEN
6325: pa_fp_gen_amount_utils.fp_debug

Line 6522: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

6518: x_cost_ind_compiled_set_id => l_cost_ind_compiled_set_id,
6519: x_return_status => x_return_status,
6520: x_msg_data => x_msg_data,
6521: x_msg_count => x_msg_count);
6522: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
6523: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
6524: END IF;
6525: IF p_pa_debug_mode = 'Y' THEN
6526: pa_fp_gen_amount_utils.fp_debug

Line 6632: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

6628: ,p_line_end_date_tab => l_line_end_date_tab
6629: ,X_RETURN_STATUS => X_RETURN_STATUS
6630: ,X_MSG_COUNT => X_MSG_COUNT
6631: ,X_MSG_DATA => X_MSG_DATA);
6632: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
6633: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
6634: END IF;
6635: IF p_pa_debug_mode = 'Y' THEN
6636: pa_fp_gen_amount_utils.fp_debug

Line 6662: (p_encoded => FND_API.G_TRUE

6658: -- PA_MRC_FINPLAN.G_CALLING_MODULE := Null;
6659: l_msg_count := FND_MSG_PUB.count_msg;
6660: IF l_msg_count = 1 THEN
6661: PA_INTERFACE_UTILS_PUB.get_messages
6662: (p_encoded => FND_API.G_TRUE
6663: ,p_msg_index => 1
6664: ,p_msg_count => l_msg_count
6665: ,p_msg_data => l_msg_data
6666: ,p_data => l_data

Line 6674: x_return_status := FND_API.G_RET_STS_ERROR;

6670: ELSE
6671: x_msg_count := l_msg_count;
6672: END IF;
6673: ROLLBACK;
6674: x_return_status := FND_API.G_RET_STS_ERROR;
6675:
6676: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
6677: PA_DEBUG.reset_err_stack;
6678: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

Line 6683: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6679: PA_DEBUG.Reset_Curr_Function;
6680: END IF;
6681:
6682: WHEN OTHERS THEN
6683: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6684: x_msg_data := SUBSTR(SQLERRM,1,240);
6685: FND_MSG_PUB.add_exc_msg
6686: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
6687: ,p_procedure_name => 'GEN_REV_BDGT_AMT_RES_SCH_WRP');

Line 6695: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

6691: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
6692: PA_DEBUG.Reset_Curr_Function;
6693: END IF;
6694:
6695: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6696:
6697: END GEN_REV_BDGT_AMT_RES_SCH_WRP;
6698:
6699: PROCEDURE GEN_WP_REV_BDGT_AMT_WRP

Line 6828: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

6824: IF p_init_msg_flag = 'Y' THEN
6825: FND_MSG_PUB.initialize;
6826: END IF;
6827: X_MSG_COUNT := 0;
6828: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
6829:
6830: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
6831: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GEN_REV_BDGT_AMT_RES_SCH_WRP');
6832: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

Line 6865: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

6861: P_COMMIT_FLAG => P_COMMIT_FLAG,
6862: X_RETURN_STATUS => X_RETURN_STATUS,
6863: X_MSG_COUNT => X_MSG_COUNT,
6864: X_MSG_DATA => X_MSG_DATA);
6865: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
6866: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
6867: END IF;
6868: IF p_pa_debug_mode = 'Y' THEN
6869: pa_fp_gen_amount_utils.fp_debug

Line 7066: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

7062: x_cost_ind_compiled_set_id => l_cost_ind_compiled_set_id,
7063: x_return_status => x_return_status,
7064: x_msg_data => x_msg_data,
7065: x_msg_count => x_msg_count);
7066: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
7067: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
7068: END IF;
7069: IF p_pa_debug_mode = 'Y' THEN
7070: pa_fp_gen_amount_utils.fp_debug

Line 7175: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

7171: ,p_line_end_date_tab => l_line_end_date_tab
7172: ,X_RETURN_STATUS => X_RETURN_STATUS
7173: ,X_MSG_COUNT => X_MSG_COUNT
7174: ,X_MSG_DATA => X_MSG_DATA);
7175: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
7176: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
7177: END IF;
7178: IF p_pa_debug_mode = 'Y' THEN
7179: pa_fp_gen_amount_utils.fp_debug

Line 7205: (p_encoded => FND_API.G_TRUE

7201: -- PA_MRC_FINPLAN.G_CALLING_MODULE := Null;
7202: l_msg_count := FND_MSG_PUB.count_msg;
7203: IF l_msg_count = 1 THEN
7204: PA_INTERFACE_UTILS_PUB.get_messages
7205: (p_encoded => FND_API.G_TRUE
7206: ,p_msg_index => 1
7207: ,p_msg_count => l_msg_count
7208: ,p_msg_data => l_msg_data
7209: ,p_data => l_data

Line 7217: x_return_status := FND_API.G_RET_STS_ERROR;

7213: ELSE
7214: x_msg_count := l_msg_count;
7215: END IF;
7216: ROLLBACK;
7217: x_return_status := FND_API.G_RET_STS_ERROR;
7218:
7219: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7220: PA_DEBUG.reset_err_stack;
7221: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

Line 7225: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

7221: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7222: PA_DEBUG.Reset_Curr_Function;
7223: END IF;
7224: WHEN OTHERS THEN
7225: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7226: x_msg_data := SUBSTR(SQLERRM,1,240);
7227: FND_MSG_PUB.add_exc_msg
7228: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
7229: ,p_procedure_name => 'GEN_WP_REV_BDGT_AMT_WRP');

Line 7237: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

7233: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7234: PA_DEBUG.Reset_Curr_Function;
7235: END IF;
7236:
7237: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7238:
7239: END GEN_WP_REV_BDGT_AMT_WRP;
7240:
7241: END PA_FP_GEN_BUDGET_AMT_PUB;