APPS.PA_FP_GEN_FCST_AMT_PUB1 dependencies on PA_DEBUG

Line 4: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

1: PACKAGE body PA_FP_GEN_FCST_AMT_PUB1 as
2: /* $Header: PAFPFG2B.pls 120.5.12010000.3 2008/09/30 01:10:02 asahoo ship $ */
3:
4: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
5:
6: /**
7: * This procedure updates planning txn level override rates
8: * for NON-RATE-BASED txns in the following ways:

Line 130: IF p_pa_debug_mode = 'Y' THEN

126:
127: x_return_status := FND_API.G_RET_STS_SUCCESS;
128: x_msg_count := 0;
129:
130: IF p_pa_debug_mode = 'Y' THEN
131: PA_DEBUG.SET_CURR_FUNCTION( p_function => l_procedure_name,
132: p_debug_mode => p_pa_debug_mode );
133: END IF;
134:

Line 131: PA_DEBUG.SET_CURR_FUNCTION( p_function => l_procedure_name,

127: x_return_status := FND_API.G_RET_STS_SUCCESS;
128: x_msg_count := 0;
129:
130: IF p_pa_debug_mode = 'Y' THEN
131: PA_DEBUG.SET_CURR_FUNCTION( p_function => l_procedure_name,
132: p_debug_mode => p_pa_debug_mode );
133: END IF;
134:
135: -- Print values of Input Parameters to debug log

Line 132: p_debug_mode => p_pa_debug_mode );

128: x_msg_count := 0;
129:
130: IF p_pa_debug_mode = 'Y' THEN
131: PA_DEBUG.SET_CURR_FUNCTION( p_function => l_procedure_name,
132: p_debug_mode => p_pa_debug_mode );
133: END IF;
134:
135: -- Print values of Input Parameters to debug log
136: IF p_pa_debug_mode = 'Y' THEN

Line 136: IF p_pa_debug_mode = 'Y' THEN

132: p_debug_mode => p_pa_debug_mode );
133: END IF;
134:
135: -- Print values of Input Parameters to debug log
136: IF p_pa_debug_mode = 'Y' THEN
137: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
138: ( p_msg => 'Input Parameters for '
139: || l_module_name || '():',
140: --p_called_mode => p_called_mode,

Line 170: END IF; -- IF p_pa_debug_mode = 'Y' THEN

166: ( p_msg => 'P_ETC_START_DATE:['||p_etc_start_date||']',
167: --p_called_mode => p_called_mode,
168: p_module_name => l_module_name,
169: p_log_level => l_log_level );
170: END IF; -- IF p_pa_debug_mode = 'Y' THEN
171:
172: -- Validate input parameters
173: IF p_project_id is NULL OR
174: p_budget_version_id is NULL OR

Line 177: IF p_pa_debug_mode = 'Y' THEN

173: IF p_project_id is NULL OR
174: p_budget_version_id is NULL OR
175: ( p_etc_start_date is NULL AND
176: p_fp_cols_rec.x_plan_class_code = 'FORECAST' ) THEN
177: IF p_pa_debug_mode = 'Y' THEN
178: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
179: ( p_msg => 'Input Parameter Validation FAILED',
180: --p_called_mode => p_called_mode,
181: p_module_name => l_module_name,

Line 183: PA_DEBUG.RESET_CURR_FUNCTION;

179: ( p_msg => 'Input Parameter Validation FAILED',
180: --p_called_mode => p_called_mode,
181: p_module_name => l_module_name,
182: p_log_level => l_log_level );
183: PA_DEBUG.RESET_CURR_FUNCTION;
184: END IF;
185: RETURN;
186: END IF;
187:

Line 212: IF p_pa_debug_mode = 'Y' THEN

208: -- txns that need to be updated so that maintain_data
209: -- can be called just once.
210: l_maint_data_ins_req_flag := 'N';
211:
212: IF p_pa_debug_mode = 'Y' THEN
213: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
214: ( p_msg => 'Beginning Update Case 1',
215: --p_called_mode => p_called_mode,
216: p_module_name => l_module_name,

Line 258: IF p_pa_debug_mode = 'Y' THEN

254: IF l_rbc_tmp_tbl_deleted_flag = 'N' THEN
255: DELETE pa_resource_asgn_curr_tmp;
256: l_rbc_tmp_tbl_deleted_flag := 'Y';
257:
258: IF p_pa_debug_mode = 'Y' THEN
259: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
260: ( p_msg => 'Records Deleted from pa_resource_asgn_curr_tmp',
261: --p_called_mode => p_called_mode,
262: p_module_name => l_module_name,

Line 281: IF p_pa_debug_mode = 'Y' THEN

277: 0, -- txn_raw_cost_rate_override
278: 0, -- txn_burden_cost_rate_override
279: 1 ); -- txn_bill_rate_override
280:
281: IF p_pa_debug_mode = 'Y' THEN
282: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
283: ( p_msg => 'Number of records Inserted into ' ||
284: 'PA_RESOURCE_ASGN_CURR_TMP:['||sql%Rowcount||']',
285: --p_called_mode => p_called_mode,

Line 294: IF p_pa_debug_mode = 'Y' THEN

290:
291: END IF; -- IF p_fp_cols_rec.x_version_type = 'ALL' THEN
292: /* End Update Case 1 */
293:
294: IF p_pa_debug_mode = 'Y' THEN
295: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
296: ( p_msg => 'Beginning Update Case 2',
297: --p_called_mode => p_called_mode,
298: p_module_name => l_module_name,

Line 345: IF p_pa_debug_mode = 'Y' THEN

341: IF l_rbc_tmp_tbl_deleted_flag = 'N' THEN
342: DELETE pa_resource_asgn_curr_tmp;
343: l_rbc_tmp_tbl_deleted_flag := 'Y';
344:
345: IF p_pa_debug_mode = 'Y' THEN
346: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
347: ( p_msg => 'Records Deleted from pa_resource_asgn_curr_tmp',
348: --p_called_mode => p_called_mode,
349: p_module_name => l_module_name,

Line 373: IF p_pa_debug_mode = 'Y' THEN

369: VALUES
370: ( l_res_asg_id_tab(i),
371: l_txn_currency_code_tab(i) );
372:
373: IF p_pa_debug_mode = 'Y' THEN
374: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
375: ( p_msg => 'Number of records Inserted into ' ||
376: 'PA_RESOURCE_ASGN_CURR_TMP:['||sql%Rowcount||']',
377: --p_called_mode => p_called_mode,

Line 393: IF p_pa_debug_mode = 'Y' THEN

389:
390: IF l_maint_data_ins_req_flag = 'Y' THEN
391:
392: -- Call the maintenance api in INSERT mode
393: IF p_pa_debug_mode = 'Y' THEN
394: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
395: P_MSG => 'Before calling PA_RES_ASG_CURRENCY_PUB.' ||
396: 'MAINTAIN_DATA',
397: --P_CALLED_MODE => p_called_mode,

Line 409: IF p_pa_debug_mode = 'Y' THEN

405: --P_CALLED_MODE => p_called_mode,
406: X_RETURN_STATUS => x_return_status,
407: X_MSG_COUNT => x_msg_count,
408: X_MSG_DATA => x_msg_data );
409: IF p_pa_debug_mode = 'Y' THEN
410: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
411: P_MSG => 'After calling PA_RES_ASG_CURRENCY_PUB.' ||
412: 'MAINTAIN_DATA: '||x_return_status,
413: --P_CALLED_MODE => p_called_mode,

Line 422: IF p_pa_debug_mode = 'Y' THEN

418: END IF;
419:
420: END IF; -- IF l_maint_data_ins_req_flag = 'Y' THEN
421:
422: IF p_pa_debug_mode = 'Y' THEN
423: PA_DEBUG.RESET_CURR_FUNCTION;
424: END IF;
425: EXCEPTION
426: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 423: PA_DEBUG.RESET_CURR_FUNCTION;

419:
420: END IF; -- IF l_maint_data_ins_req_flag = 'Y' THEN
421:
422: IF p_pa_debug_mode = 'Y' THEN
423: PA_DEBUG.RESET_CURR_FUNCTION;
424: END IF;
425: EXCEPTION
426: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
427: l_msg_count := FND_MSG_PUB.count_msg;

Line 445: IF p_pa_debug_mode = 'Y' THEN

441:
442: ROLLBACK;
443: x_return_status := FND_API.G_RET_STS_ERROR;
444:
445: IF p_pa_debug_mode = 'Y' THEN
446: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
447: (p_msg => 'Invalid Arguments Passed',
448: p_module_name => l_module_name,
449: p_log_level => 5);

Line 450: PA_DEBUG.RESET_CURR_FUNCTION;

446: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
447: (p_msg => 'Invalid Arguments Passed',
448: p_module_name => l_module_name,
449: p_log_level => 5);
450: PA_DEBUG.RESET_CURR_FUNCTION;
451: END IF;
452: RAISE;
453: WHEN OTHERS THEN
454: ROLLBACK;

Line 463: IF p_pa_debug_mode = 'Y' THEN

459: ( p_pkg_name => l_package_name,
460: p_procedure_name => l_procedure_name,
461: p_error_text => substr(sqlerrm,1,240));
462:
463: IF p_pa_debug_mode = 'Y' THEN
464: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
465: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
466: p_module_name => l_module_name,
467: p_log_level => 5);

Line 468: PA_DEBUG.RESET_CURR_FUNCTION;

464: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
465: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
466: p_module_name => l_module_name,
467: p_log_level => 5);
468: PA_DEBUG.RESET_CURR_FUNCTION;
469: END IF;
470: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
471:
472: END UPD_NRB_TXN_OVR_RATES;

Line 518: IF p_pa_debug_mode = 'Y' THEN

514:
515: x_return_status := FND_API.G_RET_STS_SUCCESS;
516: x_msg_count := 0;
517:
518: IF p_pa_debug_mode = 'Y' THEN
519: PA_DEBUG.SET_CURR_FUNCTION( p_function => l_procedure_name,
520: p_debug_mode => p_pa_debug_mode );
521: END IF;
522:

Line 519: PA_DEBUG.SET_CURR_FUNCTION( p_function => l_procedure_name,

515: x_return_status := FND_API.G_RET_STS_SUCCESS;
516: x_msg_count := 0;
517:
518: IF p_pa_debug_mode = 'Y' THEN
519: PA_DEBUG.SET_CURR_FUNCTION( p_function => l_procedure_name,
520: p_debug_mode => p_pa_debug_mode );
521: END IF;
522:
523: IF p_source_res_asg_id IS NULL OR p_txn_currency_code is NULL THEN

Line 520: p_debug_mode => p_pa_debug_mode );

516: x_msg_count := 0;
517:
518: IF p_pa_debug_mode = 'Y' THEN
519: PA_DEBUG.SET_CURR_FUNCTION( p_function => l_procedure_name,
520: p_debug_mode => p_pa_debug_mode );
521: END IF;
522:
523: IF p_source_res_asg_id IS NULL OR p_txn_currency_code is NULL THEN
524: IF p_pa_debug_mode = 'Y' THEN

Line 524: IF p_pa_debug_mode = 'Y' THEN

520: p_debug_mode => p_pa_debug_mode );
521: END IF;
522:
523: IF p_source_res_asg_id IS NULL OR p_txn_currency_code is NULL THEN
524: IF p_pa_debug_mode = 'Y' THEN
525: PA_DEBUG.RESET_CURR_FUNCTION;
526: END IF;
527: RETURN;
528: END IF;

Line 525: PA_DEBUG.RESET_CURR_FUNCTION;

521: END IF;
522:
523: IF p_source_res_asg_id IS NULL OR p_txn_currency_code is NULL THEN
524: IF p_pa_debug_mode = 'Y' THEN
525: PA_DEBUG.RESET_CURR_FUNCTION;
526: END IF;
527: RETURN;
528: END IF;
529:

Line 560: IF p_pa_debug_mode = 'Y' THEN

556: l_burdened_cost_rate_tab(i),
557: l_revenue_bill_rate_tab(i),
558: p_target_res_asg_id );
559:
560: IF p_pa_debug_mode = 'Y' THEN
561: PA_DEBUG.RESET_CURR_FUNCTION;
562: END IF;
563: EXCEPTION
564: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 561: PA_DEBUG.RESET_CURR_FUNCTION;

557: l_revenue_bill_rate_tab(i),
558: p_target_res_asg_id );
559:
560: IF p_pa_debug_mode = 'Y' THEN
561: PA_DEBUG.RESET_CURR_FUNCTION;
562: END IF;
563: EXCEPTION
564: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
565: l_msg_count := FND_MSG_PUB.count_msg;

Line 583: IF p_pa_debug_mode = 'Y' THEN

579:
580: ROLLBACK;
581: x_return_status := FND_API.G_RET_STS_ERROR;
582:
583: IF p_pa_debug_mode = 'Y' THEN
584: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
585: (p_msg => 'Invalid Arguments Passed',
586: p_module_name => l_module_name,
587: p_log_level => 5);

Line 588: PA_DEBUG.RESET_CURR_FUNCTION;

584: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
585: (p_msg => 'Invalid Arguments Passed',
586: p_module_name => l_module_name,
587: p_log_level => 5);
588: PA_DEBUG.RESET_CURR_FUNCTION;
589: END IF;
590: RAISE;
591: WHEN OTHERS THEN
592: ROLLBACK;

Line 601: IF p_pa_debug_mode = 'Y' THEN

597: ( p_pkg_name => l_package_name,
598: p_procedure_name => l_procedure_name,
599: p_error_text => substr(sqlerrm,1,240));
600:
601: IF p_pa_debug_mode = 'Y' THEN
602: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
603: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
604: p_module_name => l_module_name,
605: p_log_level => 5);

Line 606: PA_DEBUG.RESET_CURR_FUNCTION;

602: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
603: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
604: p_module_name => l_module_name,
605: p_log_level => 5);
606: PA_DEBUG.RESET_CURR_FUNCTION;
607: END IF;
608: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
609:
610: END POPULATE_GEN_RATE;

Line 657: IF p_pa_debug_mode = 'Y' THEN

653: BEGIN
654: x_return_status := FND_API.G_RET_STS_SUCCESS;
655: x_msg_count := 0;
656:
657: IF p_pa_debug_mode = 'Y' THEN
658: PA_DEBUG.SET_CURR_FUNCTION( p_function => 'CHK_UPD_RATE_BASED_FLAG',
659: p_debug_mode => p_pa_debug_mode );
660: END IF;
661:

Line 658: PA_DEBUG.SET_CURR_FUNCTION( p_function => 'CHK_UPD_RATE_BASED_FLAG',

654: x_return_status := FND_API.G_RET_STS_SUCCESS;
655: x_msg_count := 0;
656:
657: IF p_pa_debug_mode = 'Y' THEN
658: PA_DEBUG.SET_CURR_FUNCTION( p_function => 'CHK_UPD_RATE_BASED_FLAG',
659: p_debug_mode => p_pa_debug_mode );
660: END IF;
661:
662: OPEN get_res_asg_cur;

Line 659: p_debug_mode => p_pa_debug_mode );

655: x_msg_count := 0;
656:
657: IF p_pa_debug_mode = 'Y' THEN
658: PA_DEBUG.SET_CURR_FUNCTION( p_function => 'CHK_UPD_RATE_BASED_FLAG',
659: p_debug_mode => p_pa_debug_mode );
660: END IF;
661:
662: OPEN get_res_asg_cur;
663: FETCH get_res_asg_cur

Line 669: IF p_pa_debug_mode = 'Y' THEN

665: INTO l_res_asg_id_tab;
666: CLOSE get_res_asg_cur;
667:
668: IF l_res_asg_id_tab.count = 0 THEN
669: IF p_pa_debug_mode = 'Y' THEN
670: PA_DEBUG.RESET_CURR_FUNCTION;
671: END IF;
672: RETURN;
673: END IF;

Line 670: PA_DEBUG.RESET_CURR_FUNCTION;

666: CLOSE get_res_asg_cur;
667:
668: IF l_res_asg_id_tab.count = 0 THEN
669: IF p_pa_debug_mode = 'Y' THEN
670: PA_DEBUG.RESET_CURR_FUNCTION;
671: END IF;
672: RETURN;
673: END IF;
674:

Line 684: IF p_pa_debug_mode = 'Y' THEN

680: last_updated_by = l_last_updated_by,
681: last_update_login = l_last_update_login
682: WHERE resource_assignment_id = l_res_asg_id_tab(i);
683:
684: IF p_pa_debug_mode = 'Y' THEN
685: PA_DEBUG.RESET_CURR_FUNCTION;
686: END IF;
687: EXCEPTION
688: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 685: PA_DEBUG.RESET_CURR_FUNCTION;

681: last_update_login = l_last_update_login
682: WHERE resource_assignment_id = l_res_asg_id_tab(i);
683:
684: IF p_pa_debug_mode = 'Y' THEN
685: PA_DEBUG.RESET_CURR_FUNCTION;
686: END IF;
687: EXCEPTION
688: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
689: l_msg_count := FND_MSG_PUB.count_msg;

Line 707: IF p_pa_debug_mode = 'Y' THEN

703:
704: ROLLBACK;
705: x_return_status := FND_API.G_RET_STS_ERROR;
706:
707: IF p_pa_debug_mode = 'Y' THEN
708: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
709: (p_msg => 'Invalid Arguments Passed',
710: p_module_name => l_module_name,
711: p_log_level => 5);

Line 712: PA_DEBUG.RESET_CURR_FUNCTION;

708: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
709: (p_msg => 'Invalid Arguments Passed',
710: p_module_name => l_module_name,
711: p_log_level => 5);
712: PA_DEBUG.RESET_CURR_FUNCTION;
713: END IF;
714: RAISE;
715: WHEN OTHERS THEN
716: ROLLBACK;

Line 725: IF p_pa_debug_mode = 'Y' THEN

721: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
722: p_procedure_name => 'CHK_UPD_RATE_BASED_FLAG',
723: p_error_text => substr(sqlerrm,1,240));
724:
725: IF p_pa_debug_mode = 'Y' THEN
726: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
727: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
728: p_module_name => l_module_name,
729: p_log_level => 5);

Line 730: PA_DEBUG.RESET_CURR_FUNCTION;

726: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
727: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
728: p_module_name => l_module_name,
729: p_log_level => 5);
730: PA_DEBUG.RESET_CURR_FUNCTION;
731: END IF;
732: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
733:
734: END CHK_UPD_RATE_BASED_FLAG;

Line 770: IF p_pa_debug_mode = 'Y' THEN

766: l_count NUMBER;
767: l_rlm_id pa_resource_list_members.resource_list_member_id%TYPE;
768: l_uncategorized_flag VARCHAR2(1);
769: BEGIN
770: IF p_pa_debug_mode = 'Y' THEN
771: pa_debug.set_curr_function( p_function => 'CALL_SUMM_POP_TMPS',
772: p_debug_mode => p_pa_debug_mode);
773: END IF;
774: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

Line 771: pa_debug.set_curr_function( p_function => 'CALL_SUMM_POP_TMPS',

767: l_rlm_id pa_resource_list_members.resource_list_member_id%TYPE;
768: l_uncategorized_flag VARCHAR2(1);
769: BEGIN
770: IF p_pa_debug_mode = 'Y' THEN
771: pa_debug.set_curr_function( p_function => 'CALL_SUMM_POP_TMPS',
772: p_debug_mode => p_pa_debug_mode);
773: END IF;
774: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
775: X_MSG_COUNT := 0;

Line 772: p_debug_mode => p_pa_debug_mode);

768: l_uncategorized_flag VARCHAR2(1);
769: BEGIN
770: IF p_pa_debug_mode = 'Y' THEN
771: pa_debug.set_curr_function( p_function => 'CALL_SUMM_POP_TMPS',
772: p_debug_mode => p_pa_debug_mode);
773: END IF;
774: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
775: X_MSG_COUNT := 0;
776:

Line 788: IF P_PA_DEBUG_MODE = 'Y' THEN

784: l_struct_ver_id_tab(1) := P_STRUCT_VER_ID;
785: l_calendar_type_tab(1) := P_CALENDAR_TYPE;
786: l_end_date_tab(1) := P_ACTUALS_THRU_DATE;
787:
788: IF P_PA_DEBUG_MODE = 'Y' THEN
789: pa_fp_gen_amount_utils.fp_debug
790: (p_msg => 'Before calling PJI_FM_XBS_ACCUM_UTILS.get_summarized_data;'
791: ||'project id passed to get_summarized:'||l_project_id_tab(1)
792: ||'; resource_list_id:'||l_resource_list_id_tab(1)

Line 817: IF P_PA_DEBUG_MODE = 'Y' THEN

813: p_record_type => p_record_type,
814: p_currency_type => 6,
815: x_return_status => x_return_status,
816: x_msg_code => x_msg_data);
817: IF P_PA_DEBUG_MODE = 'Y' THEN
818: pa_fp_gen_amount_utils.fp_debug
819: (p_msg => 'After calling PJI_FM_XBS_ACCUM_UTILS.get_summarized_data,
820: return status is:'||x_return_status,
821: p_module_name => l_module_name,

Line 955: IF p_pa_debug_mode = 'Y' THEN

951: EQUIPMENT_HOURS,
952: SOURCE_ID,
953: P_DATA_TYPE_CODE
954: FROM PJI_FM_XBS_ACCUM_TMP1 );
955: IF p_pa_debug_mode = 'Y' THEN
956: PA_DEBUG.Reset_Curr_Function;
957: END IF;
958: EXCEPTION
959: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 956: PA_DEBUG.Reset_Curr_Function;

952: SOURCE_ID,
953: P_DATA_TYPE_CODE
954: FROM PJI_FM_XBS_ACCUM_TMP1 );
955: IF p_pa_debug_mode = 'Y' THEN
956: PA_DEBUG.Reset_Curr_Function;
957: END IF;
958: EXCEPTION
959: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
960: l_msg_count := FND_MSG_PUB.count_msg;

Line 977: IF P_PA_DEBUG_MODE = 'Y' THEN

973: END IF;
974: ROLLBACK;
975:
976: x_return_status := FND_API.G_RET_STS_ERROR;
977: IF P_PA_DEBUG_MODE = 'Y' THEN
978: pa_fp_gen_amount_utils.fp_debug
979: (p_msg => 'Invalid Arguments Passed',
980: p_module_name => l_module_name,
981: p_log_level => 5);

Line 982: PA_DEBUG.Reset_Curr_Function;

978: pa_fp_gen_amount_utils.fp_debug
979: (p_msg => 'Invalid Arguments Passed',
980: p_module_name => l_module_name,
981: p_log_level => 5);
982: PA_DEBUG.Reset_Curr_Function;
983: END IF;
984: RAISE;
985:
986: WHEN OTHERS THEN

Line 992: IF P_PA_DEBUG_MODE = 'Y' THEN

988: x_msg_data := SUBSTR(SQLERRM,1,240);
989: FND_MSG_PUB.add_exc_msg
990: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1'
991: ,p_procedure_name => 'CALL_SUMM_POP_TMPS');
992: IF P_PA_DEBUG_MODE = 'Y' THEN
993: pa_fp_gen_amount_utils.fp_debug
994: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
995: p_module_name => l_module_name,
996: p_log_level => 5);

Line 997: PA_DEBUG.Reset_Curr_Function;

993: pa_fp_gen_amount_utils.fp_debug
994: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
995: p_module_name => l_module_name,
996: p_log_level => 5);
997: PA_DEBUG.Reset_Curr_Function;
998: END IF;
999: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1000: END CALL_SUMM_POP_TMPS;
1001:

Line 1205: IF p_pa_debug_mode = 'Y' THEN

1201: l_msg_data VARCHAR2(2000);
1202: l_data VARCHAR2(2000);
1203: l_msg_index_out NUMBER:=0;
1204: BEGIN
1205: IF p_pa_debug_mode = 'Y' THEN
1206: pa_debug.set_curr_function( p_function => 'GEN_AVERAGE_OF_ACTUALS_WRP',
1207: p_debug_mode => p_pa_debug_mode);
1208: END IF;
1209: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

Line 1206: pa_debug.set_curr_function( p_function => 'GEN_AVERAGE_OF_ACTUALS_WRP',

1202: l_data VARCHAR2(2000);
1203: l_msg_index_out NUMBER:=0;
1204: BEGIN
1205: IF p_pa_debug_mode = 'Y' THEN
1206: pa_debug.set_curr_function( p_function => 'GEN_AVERAGE_OF_ACTUALS_WRP',
1207: p_debug_mode => p_pa_debug_mode);
1208: END IF;
1209: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1210: X_MSG_COUNT := 0;

Line 1207: p_debug_mode => p_pa_debug_mode);

1203: l_msg_index_out NUMBER:=0;
1204: BEGIN
1205: IF p_pa_debug_mode = 'Y' THEN
1206: pa_debug.set_curr_function( p_function => 'GEN_AVERAGE_OF_ACTUALS_WRP',
1207: p_debug_mode => p_pa_debug_mode);
1208: END IF;
1209: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1210: X_MSG_COUNT := 0;
1211:

Line 1328: IF P_PA_DEBUG_MODE = 'Y' THEN

1324: END IF;
1325: END IF;
1326:
1327: IF l_res_asg_id_tab.count = 0 THEN
1328: IF P_PA_DEBUG_MODE = 'Y' THEN
1329: pa_fp_gen_amount_utils.fp_debug
1330: (p_msg => 'inside GEN_AVERAGE_OF_ACTUALS_WRP,no res asg, return...',
1331: p_module_name => l_module_name,
1332: p_log_level => 5);

Line 1333: PA_DEBUG.RESET_CURR_FUNCTION;

1329: pa_fp_gen_amount_utils.fp_debug
1330: (p_msg => 'inside GEN_AVERAGE_OF_ACTUALS_WRP,no res asg, return...',
1331: p_module_name => l_module_name,
1332: p_log_level => 5);
1333: PA_DEBUG.RESET_CURR_FUNCTION;
1334: END IF;
1335: RETURN;
1336: END IF;
1337: FOR i IN 1..l_res_asg_id_tab.count LOOP

Line 1360: IF P_PA_DEBUG_MODE = 'Y' THEN

1356: l_currency_flag := 'PC';
1357: l_currency_code := P_FP_COLS_REC.x_project_currency_code;
1358: END IF;
1359:
1360: IF P_PA_DEBUG_MODE = 'Y' THEN
1361: pa_fp_gen_amount_utils.fp_debug
1362: (p_msg => 'Before calling PA_FP_GEN_FCST_AMT_PVT.GEN_AVERAGE_OF_ACTUALS',
1363: p_module_name => l_module_name,
1364: p_log_level => 5);

Line 1384: IF P_PA_DEBUG_MODE = 'Y' THEN

1380: P_RESOURCE_ASSIGNMENT_ID => l_res_asg_id_tab(i),
1381: X_RETURN_STATUS => X_RETURN_STATUS,
1382: X_MSG_COUNT => X_MSG_COUNT,
1383: X_MSG_DATA => X_MSG_DATA );
1384: IF P_PA_DEBUG_MODE = 'Y' THEN
1385: pa_fp_gen_amount_utils.fp_debug
1386: (p_msg => 'After calling PA_FP_GEN_FCST_AMT_PVT.GEN_AVERAGE_OF_ACTUALS,
1387: return status is: '||x_return_status,
1388: p_module_name => l_module_name,

Line 1407: IF P_PA_DEBUG_MODE = 'Y' THEN

1403: sp_fixed_date = NULL,
1404: transaction_source_code = 'AVERAGE_ACTUALS' -- bug 4232619
1405: WHERE resource_assignment_id = l_res_asg_id_tab(i);
1406:
1407: IF P_PA_DEBUG_MODE = 'Y' THEN
1408: PA_DEBUG.RESET_CURR_FUNCTION;
1409: END IF;
1410: EXCEPTION
1411: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 1408: PA_DEBUG.RESET_CURR_FUNCTION;

1404: transaction_source_code = 'AVERAGE_ACTUALS' -- bug 4232619
1405: WHERE resource_assignment_id = l_res_asg_id_tab(i);
1406:
1407: IF P_PA_DEBUG_MODE = 'Y' THEN
1408: PA_DEBUG.RESET_CURR_FUNCTION;
1409: END IF;
1410: EXCEPTION
1411: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
1412: l_msg_count := FND_MSG_PUB.count_msg;

Line 1430: IF P_PA_DEBUG_MODE = 'Y' THEN

1426:
1427: ROLLBACK;
1428: x_return_status := FND_API.G_RET_STS_ERROR;
1429:
1430: IF P_PA_DEBUG_MODE = 'Y' THEN
1431: pa_fp_gen_amount_utils.fp_debug
1432: (p_msg => 'Invalid Arguments Passed',
1433: p_module_name => l_module_name,
1434: p_log_level => 5);

Line 1435: PA_DEBUG.RESET_CURR_FUNCTION;

1431: pa_fp_gen_amount_utils.fp_debug
1432: (p_msg => 'Invalid Arguments Passed',
1433: p_module_name => l_module_name,
1434: p_log_level => 5);
1435: PA_DEBUG.RESET_CURR_FUNCTION;
1436: END IF;
1437: RAISE;
1438: WHEN OTHERS THEN
1439: rollback;

Line 1448: IF P_PA_DEBUG_MODE = 'Y' THEN

1444: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
1445: p_procedure_name => 'GEN_AVERAGE_OF_ACTUALS_WRP',
1446: p_error_text => substr(sqlerrm,1,240));
1447:
1448: IF P_PA_DEBUG_MODE = 'Y' THEN
1449: pa_fp_gen_amount_utils.fp_debug
1450: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
1451: p_module_name => l_module_name,
1452: p_log_level => 5);

Line 1453: PA_DEBUG.RESET_CURR_FUNCTION;

1449: pa_fp_gen_amount_utils.fp_debug
1450: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
1451: p_module_name => l_module_name,
1452: p_log_level => 5);
1453: PA_DEBUG.RESET_CURR_FUNCTION;
1454: END IF;
1455: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1456: END GEN_AVERAGE_OF_ACTUALS_WRP;
1457:

Line 1528: IF p_pa_debug_mode = 'Y' THEN

1524: l_msg_data VARCHAR2(2000);
1525: l_data VARCHAR2(2000);
1526: l_msg_index_out NUMBER:=0;
1527: BEGIN
1528: IF p_pa_debug_mode = 'Y' THEN
1529: pa_debug.set_curr_function( p_function => 'GEN_ETC_REMAIN_BDGT_AMTS',
1530: p_debug_mode => p_pa_debug_mode);
1531: END IF;
1532: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

Line 1529: pa_debug.set_curr_function( p_function => 'GEN_ETC_REMAIN_BDGT_AMTS',

1525: l_data VARCHAR2(2000);
1526: l_msg_index_out NUMBER:=0;
1527: BEGIN
1528: IF p_pa_debug_mode = 'Y' THEN
1529: pa_debug.set_curr_function( p_function => 'GEN_ETC_REMAIN_BDGT_AMTS',
1530: p_debug_mode => p_pa_debug_mode);
1531: END IF;
1532: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1533: X_MSG_COUNT := 0;

Line 1530: p_debug_mode => p_pa_debug_mode);

1526: l_msg_index_out NUMBER:=0;
1527: BEGIN
1528: IF p_pa_debug_mode = 'Y' THEN
1529: pa_debug.set_curr_function( p_function => 'GEN_ETC_REMAIN_BDGT_AMTS',
1530: p_debug_mode => p_pa_debug_mode);
1531: END IF;
1532: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1533: X_MSG_COUNT := 0;
1534:

Line 1565: IF P_PA_DEBUG_MODE = 'Y' THEN

1561: AND data_type_code = P_ETC_SOURCE_CODE;
1562: /* hr_utility.trace('currency count tot :'||l_currency_count_tot );
1563: hr_utility.trace('currency count act :'||l_currency_count_act ); */
1564: IF l_currency_count_tot = 0 and l_currency_count_act = 0 THEN
1565: IF P_PA_DEBUG_MODE = 'Y' THEN
1566: PA_DEBUG.RESET_CURR_FUNCTION;
1567: END IF;
1568: RETURN;
1569: END IF;

Line 1566: PA_DEBUG.RESET_CURR_FUNCTION;

1562: /* hr_utility.trace('currency count tot :'||l_currency_count_tot );
1563: hr_utility.trace('currency count act :'||l_currency_count_act ); */
1564: IF l_currency_count_tot = 0 and l_currency_count_act = 0 THEN
1565: IF P_PA_DEBUG_MODE = 'Y' THEN
1566: PA_DEBUG.RESET_CURR_FUNCTION;
1567: END IF;
1568: RETURN;
1569: END IF;
1570:

Line 1689: IF P_PA_DEBUG_MODE = 'Y' THEN

1685: /*getting actuals*/
1686: l_currency_flag := 'PC';
1687: l_etc_currency_code := P_FP_COLS_REC.x_project_currency_code;
1688:
1689: IF P_PA_DEBUG_MODE = 'Y' THEN
1690: pa_fp_gen_amount_utils.fp_debug
1691: (p_msg => 'Before calling PA_PROGRESS_UTILS.'||
1692: 'get_actuals_for_task in remain_bdgt',
1693: p_module_name => l_module_name,

Line 1730: IF P_PA_DEBUG_MODE = 'Y' THEN

1726: X_OTH_QUANTITY => l_oth_quantity,
1727: x_return_status => x_return_status,
1728: x_msg_count => x_msg_count,
1729: x_msg_data => x_msg_data );
1730: IF P_PA_DEBUG_MODE = 'Y' THEN
1731: pa_fp_gen_amount_utils.fp_debug
1732: (p_msg => 'After calling PA_PROGRESS_UTILS.'||
1733: 'get_actuals_for_task in remain_bdgt'||x_return_status,
1734: p_module_name => l_module_name,

Line 1833: IF P_PA_DEBUG_MODE = 'Y' THEN

1829: l_etc_txn_raw_cost,
1830: l_etc_txn_brdn_cost);
1831: END IF;
1832:
1833: IF P_PA_DEBUG_MODE = 'Y' THEN
1834: PA_DEBUG.RESET_CURR_FUNCTION;
1835: END IF;
1836: EXCEPTION
1837: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 1834: PA_DEBUG.RESET_CURR_FUNCTION;

1830: l_etc_txn_brdn_cost);
1831: END IF;
1832:
1833: IF P_PA_DEBUG_MODE = 'Y' THEN
1834: PA_DEBUG.RESET_CURR_FUNCTION;
1835: END IF;
1836: EXCEPTION
1837: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
1838: l_msg_count := FND_MSG_PUB.count_msg;

Line 1856: IF P_PA_DEBUG_MODE = 'Y' THEN

1852:
1853: ROLLBACK;
1854: x_return_status := FND_API.G_RET_STS_ERROR;
1855:
1856: IF P_PA_DEBUG_MODE = 'Y' THEN
1857: pa_fp_gen_amount_utils.fp_debug
1858: (p_msg => 'Invalid Arguments Passed',
1859: p_module_name => l_module_name,
1860: p_log_level => 5);

Line 1861: PA_DEBUG.RESET_CURR_FUNCTION;

1857: pa_fp_gen_amount_utils.fp_debug
1858: (p_msg => 'Invalid Arguments Passed',
1859: p_module_name => l_module_name,
1860: p_log_level => 5);
1861: PA_DEBUG.RESET_CURR_FUNCTION;
1862: END IF;
1863: RAISE;
1864: WHEN OTHERS THEN
1865: rollback;

Line 1875: IF P_PA_DEBUG_MODE = 'Y' THEN

1871: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
1872: p_procedure_name => 'GEN_ETC_REMAIN_BDGT_AMTS',
1873: p_error_text => substr(sqlerrm,1,240));
1874:
1875: IF P_PA_DEBUG_MODE = 'Y' THEN
1876: pa_fp_gen_amount_utils.fp_debug
1877: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
1878: p_module_name => l_module_name,
1879: p_log_level => 5);

Line 1880: PA_DEBUG.RESET_CURR_FUNCTION;

1876: pa_fp_gen_amount_utils.fp_debug
1877: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
1878: p_module_name => l_module_name,
1879: p_log_level => 5);
1880: PA_DEBUG.RESET_CURR_FUNCTION;
1881: END IF;
1882: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1883: END GET_ETC_REMAIN_BDGT_AMTS;
1884:

Line 1933: IF p_pa_debug_mode = 'Y' THEN

1929: l_data VARCHAR2(2000);
1930: l_msg_index_out NUMBER:=0;
1931: l_WP_STRUCTURE_VERSION_ID number;
1932: BEGIN
1933: IF p_pa_debug_mode = 'Y' THEN
1934: pa_debug.set_curr_function( p_function => 'GEN_ETC_BDGT_COMPLETE_AMTS',
1935: p_debug_mode => p_pa_debug_mode);
1936: END IF;
1937: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

Line 1934: pa_debug.set_curr_function( p_function => 'GEN_ETC_BDGT_COMPLETE_AMTS',

1930: l_msg_index_out NUMBER:=0;
1931: l_WP_STRUCTURE_VERSION_ID number;
1932: BEGIN
1933: IF p_pa_debug_mode = 'Y' THEN
1934: pa_debug.set_curr_function( p_function => 'GEN_ETC_BDGT_COMPLETE_AMTS',
1935: p_debug_mode => p_pa_debug_mode);
1936: END IF;
1937: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1938: X_MSG_COUNT := 0;

Line 1935: p_debug_mode => p_pa_debug_mode);

1931: l_WP_STRUCTURE_VERSION_ID number;
1932: BEGIN
1933: IF p_pa_debug_mode = 'Y' THEN
1934: pa_debug.set_curr_function( p_function => 'GEN_ETC_BDGT_COMPLETE_AMTS',
1935: p_debug_mode => p_pa_debug_mode);
1936: END IF;
1937: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1938: X_MSG_COUNT := 0;
1939:

Line 1966: IF P_PA_DEBUG_MODE = 'Y' THEN

1962: END IF;
1963: END IF;
1964:
1965:
1966: IF P_PA_DEBUG_MODE = 'Y' THEN
1967: pa_fp_gen_amount_utils.fp_debug
1968: (p_msg => 'Before calling PA_PROGRESS_UTILS.REDEFAULT_BASE_PC',
1969: p_module_name => l_module_name,
1970: p_log_level => 5);

Line 1992: IF P_PA_DEBUG_MODE = 'Y' THEN

1988: X_base_percent_complete => lx_percent_complete,
1989: x_return_status => x_return_status,
1990: x_msg_count => x_msg_count,
1991: x_msg_data => x_msg_data );
1992: IF P_PA_DEBUG_MODE = 'Y' THEN
1993: pa_fp_gen_amount_utils.fp_debug
1994: (p_msg => 'After calling PA_PROGRESS_UTILS.REDEFAULT_BASE_PC,
1995: return status is:'||x_return_status,
1996: p_module_name => l_module_name,

Line 2035: IF P_PA_DEBUG_MODE = 'Y' THEN

2031: AND res_list_member_id = P_RESOURCE_LIST_MEMBER_ID
2032: AND res_asg_id = P_RESOURCE_ASSIGNMENT_ID;*/
2033:
2034: IF l_currency_count_tot = 0 THEN
2035: IF P_PA_DEBUG_MODE = 'Y' THEN
2036: PA_DEBUG.RESET_CURR_FUNCTION;
2037: END IF;
2038: RETURN;
2039: END IF;

Line 2036: PA_DEBUG.RESET_CURR_FUNCTION;

2032: AND res_asg_id = P_RESOURCE_ASSIGNMENT_ID;*/
2033:
2034: IF l_currency_count_tot = 0 THEN
2035: IF P_PA_DEBUG_MODE = 'Y' THEN
2036: PA_DEBUG.RESET_CURR_FUNCTION;
2037: END IF;
2038: RETURN;
2039: END IF;
2040:

Line 2103: IF P_PA_DEBUG_MODE = 'Y' THEN

2099: l_etc_txn_raw_cost,
2100: l_etc_txn_brdn_cost);
2101: END IF;
2102:
2103: IF P_PA_DEBUG_MODE = 'Y' THEN
2104: PA_DEBUG.RESET_CURR_FUNCTION;
2105: END IF;
2106: EXCEPTION
2107: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 2104: PA_DEBUG.RESET_CURR_FUNCTION;

2100: l_etc_txn_brdn_cost);
2101: END IF;
2102:
2103: IF P_PA_DEBUG_MODE = 'Y' THEN
2104: PA_DEBUG.RESET_CURR_FUNCTION;
2105: END IF;
2106: EXCEPTION
2107: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
2108: l_msg_count := FND_MSG_PUB.count_msg;

Line 2126: IF P_PA_DEBUG_MODE = 'Y' THEN

2122:
2123: ROLLBACK;
2124: x_return_status := FND_API.G_RET_STS_ERROR;
2125:
2126: IF P_PA_DEBUG_MODE = 'Y' THEN
2127: pa_fp_gen_amount_utils.fp_debug
2128: (p_msg => 'Invalid Arguments Passed',
2129: p_module_name => l_module_name,
2130: p_log_level => 5);

Line 2131: PA_DEBUG.RESET_CURR_FUNCTION;

2127: pa_fp_gen_amount_utils.fp_debug
2128: (p_msg => 'Invalid Arguments Passed',
2129: p_module_name => l_module_name,
2130: p_log_level => 5);
2131: PA_DEBUG.RESET_CURR_FUNCTION;
2132: END IF;
2133: RAISE;
2134: WHEN OTHERS THEN
2135: rollback;

Line 2145: IF P_PA_DEBUG_MODE = 'Y' THEN

2141: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
2142: p_procedure_name => 'GEN_ETC_BDGT_COMPLETE_AMTS',
2143: p_error_text => substr(sqlerrm,1,240));
2144:
2145: IF P_PA_DEBUG_MODE = 'Y' THEN
2146: pa_fp_gen_amount_utils.fp_debug
2147: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
2148: p_module_name => l_module_name,
2149: p_log_level => 5);

Line 2150: PA_DEBUG.RESET_CURR_FUNCTION;

2146: pa_fp_gen_amount_utils.fp_debug
2147: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
2148: p_module_name => l_module_name,
2149: p_log_level => 5);
2150: PA_DEBUG.RESET_CURR_FUNCTION;
2151: END IF;
2152: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2153: END GET_ETC_BDGT_COMPLETE_AMTS;
2154:

Line 2234: IF p_pa_debug_mode = 'Y' THEN

2230: l_act_exist_flag VARCHAR2(1):= 'N';
2231: l_act_txn_pc_flag VARCHAR2(10):= 'PC';
2232: l_tot_txn_pc_flag VARCHAR2(10):= 'PC';
2233: BEGIN
2234: IF p_pa_debug_mode = 'Y' THEN
2235: pa_debug.set_curr_function( p_function => 'GEN_ETC_EARNED_VALUE_AMTS',
2236: p_debug_mode => p_pa_debug_mode);
2237: END IF;
2238: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

Line 2235: pa_debug.set_curr_function( p_function => 'GEN_ETC_EARNED_VALUE_AMTS',

2231: l_act_txn_pc_flag VARCHAR2(10):= 'PC';
2232: l_tot_txn_pc_flag VARCHAR2(10):= 'PC';
2233: BEGIN
2234: IF p_pa_debug_mode = 'Y' THEN
2235: pa_debug.set_curr_function( p_function => 'GEN_ETC_EARNED_VALUE_AMTS',
2236: p_debug_mode => p_pa_debug_mode);
2237: END IF;
2238: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
2239: X_MSG_COUNT := 0;

Line 2236: p_debug_mode => p_pa_debug_mode);

2232: l_tot_txn_pc_flag VARCHAR2(10):= 'PC';
2233: BEGIN
2234: IF p_pa_debug_mode = 'Y' THEN
2235: pa_debug.set_curr_function( p_function => 'GEN_ETC_EARNED_VALUE_AMTS',
2236: p_debug_mode => p_pa_debug_mode);
2237: END IF;
2238: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
2239: X_MSG_COUNT := 0;
2240:

Line 2265: IF P_PA_DEBUG_MODE = 'Y' THEN

2261: END IF;
2262: END IF;
2263:
2264:
2265: IF P_PA_DEBUG_MODE = 'Y' THEN
2266: pa_fp_gen_amount_utils.fp_debug
2267: (p_msg => 'Before calling PA_PROGRESS_UTILS.REDEFAULT_BASE_PC',
2268: p_module_name => l_module_name,
2269: p_log_level => 5);

Line 2284: IF P_PA_DEBUG_MODE = 'Y' THEN

2280: X_base_percent_complete => lx_percent_complete,
2281: x_return_status => x_return_status,
2282: x_msg_count => x_msg_count,
2283: x_msg_data => x_msg_data );
2284: IF P_PA_DEBUG_MODE = 'Y' THEN
2285: pa_fp_gen_amount_utils.fp_debug
2286: (p_msg => 'After calling PA_PROGRESS_UTILS.REDEFAULT_BASE_PC,
2287: return status is:'||x_return_status,
2288: p_module_name => l_module_name,

Line 2297: IF P_PA_DEBUG_MODE = 'Y' THEN

2293: END IF;
2294:
2295: l_percent_complete := NVL(lx_percent_complete,0)/100;
2296: IF l_percent_complete = 1 THEN
2297: IF P_PA_DEBUG_MODE = 'Y' THEN
2298: PA_DEBUG.RESET_CURR_FUNCTION;
2299: END IF;
2300: RETURN;
2301: END IF;

Line 2298: PA_DEBUG.RESET_CURR_FUNCTION;

2294:
2295: l_percent_complete := NVL(lx_percent_complete,0)/100;
2296: IF l_percent_complete = 1 THEN
2297: IF P_PA_DEBUG_MODE = 'Y' THEN
2298: PA_DEBUG.RESET_CURR_FUNCTION;
2299: END IF;
2300: RETURN;
2301: END IF;
2302:

Line 2377: IF P_PA_DEBUG_MODE = 'Y' THEN

2373: l_act_pc_brdn_cost := 0;
2374: END;
2375: END IF;
2376: ELSIF P_ETC_SOURCE_CODE = 'WORKPLAN_RESOURCES' THEN
2377: IF P_PA_DEBUG_MODE = 'Y' THEN
2378: pa_fp_gen_amount_utils.fp_debug
2379: (p_msg => 'Before calling PA_PROGRESS_UTILS.'||
2380: 'get_actuals_for_task in earned_value',
2381: p_module_name => l_module_name,

Line 2417: IF P_PA_DEBUG_MODE = 'Y' THEN

2413: X_OTH_QUANTITY => l_oth_quantity,
2414: x_return_status => x_return_status,
2415: x_msg_count => x_msg_count,
2416: x_msg_data => x_msg_data );
2417: IF P_PA_DEBUG_MODE = 'Y' THEN
2418: pa_fp_gen_amount_utils.fp_debug
2419: (p_msg => 'After calling PA_PROGRESS_UTILS.'||
2420: 'get_actuals_for_task in earned_value'||x_return_status,
2421: p_module_name => l_module_name,

Line 2572: IF P_PA_DEBUG_MODE = 'Y' THEN

2568: l_etc_raw_cost,
2569: l_etc_brdn_cost);
2570: END IF;
2571:
2572: IF P_PA_DEBUG_MODE = 'Y' THEN
2573: PA_DEBUG.RESET_CURR_FUNCTION;
2574: END IF;
2575:
2576: EXCEPTION

Line 2573: PA_DEBUG.RESET_CURR_FUNCTION;

2569: l_etc_brdn_cost);
2570: END IF;
2571:
2572: IF P_PA_DEBUG_MODE = 'Y' THEN
2573: PA_DEBUG.RESET_CURR_FUNCTION;
2574: END IF;
2575:
2576: EXCEPTION
2577: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 2596: IF P_PA_DEBUG_MODE = 'Y' THEN

2592:
2593: ROLLBACK;
2594: x_return_status := FND_API.G_RET_STS_ERROR;
2595:
2596: IF P_PA_DEBUG_MODE = 'Y' THEN
2597: pa_fp_gen_amount_utils.fp_debug
2598: (p_msg => 'Invalid Arguments Passed',
2599: p_module_name => l_module_name,
2600: p_log_level => 5);

Line 2601: PA_DEBUG.RESET_CURR_FUNCTION;

2597: pa_fp_gen_amount_utils.fp_debug
2598: (p_msg => 'Invalid Arguments Passed',
2599: p_module_name => l_module_name,
2600: p_log_level => 5);
2601: PA_DEBUG.RESET_CURR_FUNCTION;
2602: END IF;
2603: RAISE;
2604: WHEN OTHERS THEN
2605: rollback;

Line 2615: IF P_PA_DEBUG_MODE = 'Y' THEN

2611: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
2612: p_procedure_name => 'GEN_ETC_EARNED_VALUE_AMTS',
2613: p_error_text => substr(sqlerrm,1,240));
2614:
2615: IF P_PA_DEBUG_MODE = 'Y' THEN
2616: pa_fp_gen_amount_utils.fp_debug
2617: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
2618: p_module_name => l_module_name,
2619: p_log_level => 5);

Line 2620: PA_DEBUG.RESET_CURR_FUNCTION;

2616: pa_fp_gen_amount_utils.fp_debug
2617: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
2618: p_module_name => l_module_name,
2619: p_log_level => 5);
2620: PA_DEBUG.RESET_CURR_FUNCTION;
2621: END IF;
2622: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2623: END GET_ETC_EARNED_VALUE_AMTS;
2624:

Line 2731: IF p_pa_debug_mode = 'Y' THEN

2727: BEGIN
2728: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
2729: X_MSG_COUNT := 0;
2730: l_sysdate := trunc(sysdate);
2731: IF p_pa_debug_mode = 'Y' THEN
2732: pa_debug.set_curr_function( p_function => 'GEN_ETC_WORK_QTY_AMTS',
2733: p_debug_mode => p_pa_debug_mode);
2734: END IF;
2735:

Line 2732: pa_debug.set_curr_function( p_function => 'GEN_ETC_WORK_QTY_AMTS',

2728: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
2729: X_MSG_COUNT := 0;
2730: l_sysdate := trunc(sysdate);
2731: IF p_pa_debug_mode = 'Y' THEN
2732: pa_debug.set_curr_function( p_function => 'GEN_ETC_WORK_QTY_AMTS',
2733: p_debug_mode => p_pa_debug_mode);
2734: END IF;
2735:
2736: l_stru_sharing_code :=

Line 2733: p_debug_mode => p_pa_debug_mode);

2729: X_MSG_COUNT := 0;
2730: l_sysdate := trunc(sysdate);
2731: IF p_pa_debug_mode = 'Y' THEN
2732: pa_debug.set_curr_function( p_function => 'GEN_ETC_WORK_QTY_AMTS',
2733: p_debug_mode => p_pa_debug_mode);
2734: END IF;
2735:
2736: l_stru_sharing_code :=
2737: PA_PROJECT_STRUCTURE_UTILS.get_Structure_sharing_code(P_PROJECT_ID=> P_PROJECT_ID);

Line 2739: IF P_PA_DEBUG_MODE = 'Y' THEN

2735:
2736: l_stru_sharing_code :=
2737: PA_PROJECT_STRUCTURE_UTILS.get_Structure_sharing_code(P_PROJECT_ID=> P_PROJECT_ID);
2738: IF l_stru_sharing_code = 'SHARE_FULL' THEN
2739: IF P_PA_DEBUG_MODE = 'Y' THEN
2740: pa_fp_gen_amount_utils.fp_debug
2741: (p_msg => 'Before calling PA_PROGRESS_UTILS.'||
2742: 'get_actuals_for_task when SHARE_FULL',
2743: p_module_name => l_module_name,

Line 2779: IF P_PA_DEBUG_MODE = 'Y' THEN

2775: X_OTH_QUANTITY => l_oth_quantity,
2776: x_return_status => x_return_status,
2777: x_msg_count => x_msg_count,
2778: x_msg_data => x_msg_data );
2779: IF P_PA_DEBUG_MODE = 'Y' THEN
2780: pa_fp_gen_amount_utils.fp_debug
2781: (p_msg => 'After calling PA_PROGRESS_UTILS.'||
2782: 'get_actuals_for_task when SHARE_FULL'||x_return_status,
2783: p_module_name => l_module_name,

Line 2810: IF P_PA_DEBUG_MODE = 'Y' THEN

2806: WHERE PARENT_STRUCTURE_VERSION_ID = P_WP_STRUCTURE_VERSION_ID
2807: AND MAPPED_FIN_TASK_ID = P_TASK_ID;
2808:
2809: FOR i IN 1..l_wp_task_tab.count LOOP
2810: IF P_PA_DEBUG_MODE = 'Y' THEN
2811: pa_fp_gen_amount_utils.fp_debug
2812: (p_msg => 'Before calling PA_PROGRESS_UTILS.'||
2813: 'get_actuals_for_task when MAPPING',
2814: p_module_name => l_module_name,

Line 2850: IF P_PA_DEBUG_MODE = 'Y' THEN

2846: X_OTH_QUANTITY => l_oth_quantity_ind,
2847: x_return_status => x_return_status,
2848: x_msg_count => x_msg_count,
2849: x_msg_data => x_msg_data );
2850: IF P_PA_DEBUG_MODE = 'Y' THEN
2851: pa_fp_gen_amount_utils.fp_debug
2852: (p_msg => 'After calling PA_PROGRESS_UTILS.'||
2853: 'get_actuals_for_task when MAPPING'||x_return_status,
2854: p_module_name => l_module_name,

Line 2885: IF P_PA_DEBUG_MODE = 'Y' THEN

2881: WHERE PARENT_STRUCTURE_VERSION_ID = P_WP_STRUCTURE_VERSION_ID
2882: AND OBJECT_TYPE = 'PA_TASKS';
2883:
2884: FOR i IN 1..l_wp_task_tab.count LOOP
2885: IF P_PA_DEBUG_MODE = 'Y' THEN
2886: pa_fp_gen_amount_utils.fp_debug
2887: (p_msg => 'Before calling PA_PROGRESS_UTILS.'||
2888: 'get_actuals_for_task when NO_MAPPINGL',
2889: p_module_name => l_module_name,

Line 2925: IF P_PA_DEBUG_MODE = 'Y' THEN

2921: X_OTH_QUANTITY => l_oth_quantity_ind,
2922: x_return_status => x_return_status,
2923: x_msg_count => x_msg_count,
2924: x_msg_data => x_msg_data );
2925: IF P_PA_DEBUG_MODE = 'Y' THEN
2926: pa_fp_gen_amount_utils.fp_debug
2927: (p_msg => 'After calling PA_PROGRESS_UTILS.'||
2928: 'get_actuals_for_task when NO_MAPPING'||x_return_status,
2929: p_module_name => l_module_name,

Line 3040: IF P_PA_DEBUG_MODE = 'Y' THEN

3036: l_completion_date,
3037: 'WORK_QUANTITY',
3038: P_TASK_ID );
3039:
3040: IF P_PA_DEBUG_MODE = 'Y' THEN
3041: PA_DEBUG.RESET_CURR_FUNCTION;
3042: END IF;
3043: EXCEPTION
3044: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 3041: PA_DEBUG.RESET_CURR_FUNCTION;

3037: 'WORK_QUANTITY',
3038: P_TASK_ID );
3039:
3040: IF P_PA_DEBUG_MODE = 'Y' THEN
3041: PA_DEBUG.RESET_CURR_FUNCTION;
3042: END IF;
3043: EXCEPTION
3044: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
3045: l_msg_count := FND_MSG_PUB.count_msg;

Line 3063: IF P_PA_DEBUG_MODE = 'Y' THEN

3059:
3060: ROLLBACK;
3061: x_return_status := FND_API.G_RET_STS_ERROR;
3062:
3063: IF P_PA_DEBUG_MODE = 'Y' THEN
3064: pa_fp_gen_amount_utils.fp_debug
3065: (p_msg => 'Invalid Arguments Passed',
3066: p_module_name => l_module_name,
3067: p_log_level => 5);

Line 3068: PA_DEBUG.RESET_CURR_FUNCTION;

3064: pa_fp_gen_amount_utils.fp_debug
3065: (p_msg => 'Invalid Arguments Passed',
3066: p_module_name => l_module_name,
3067: p_log_level => 5);
3068: PA_DEBUG.RESET_CURR_FUNCTION;
3069: END IF;
3070: RAISE;
3071: WHEN OTHERS THEN
3072: rollback;

Line 3082: IF P_PA_DEBUG_MODE = 'Y' THEN

3078: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
3079: p_procedure_name => 'GEN_ETC_WORK_QTY_AMTS',
3080: p_error_text => substr(sqlerrm,1,240));
3081:
3082: IF P_PA_DEBUG_MODE = 'Y' THEN
3083: pa_fp_gen_amount_utils.fp_debug
3084: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
3085: p_module_name => l_module_name,
3086: p_log_level => 5);

Line 3087: PA_DEBUG.RESET_CURR_FUNCTION;

3083: pa_fp_gen_amount_utils.fp_debug
3084: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
3085: p_module_name => l_module_name,
3086: p_log_level => 5);
3087: PA_DEBUG.RESET_CURR_FUNCTION;
3088: END IF;
3089: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3090: END GET_ETC_WORK_QTY_AMTS;
3091:

Line 3114: IF p_pa_debug_mode = 'Y' THEN

3110: l_sysdate date;
3111: BEGIN
3112: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
3113: X_MSG_COUNT := 0;
3114: IF p_pa_debug_mode = 'Y' THEN
3115: pa_debug.set_curr_function( p_function => 'NONE_ETC_SRC',
3116: p_debug_mode => p_pa_debug_mode);
3117: END IF;
3118:

Line 3115: pa_debug.set_curr_function( p_function => 'NONE_ETC_SRC',

3111: BEGIN
3112: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
3113: X_MSG_COUNT := 0;
3114: IF p_pa_debug_mode = 'Y' THEN
3115: pa_debug.set_curr_function( p_function => 'NONE_ETC_SRC',
3116: p_debug_mode => p_pa_debug_mode);
3117: END IF;
3118:
3119: l_sysdate := trunc(SYSDATE);

Line 3116: p_debug_mode => p_pa_debug_mode);

3112: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
3113: X_MSG_COUNT := 0;
3114: IF p_pa_debug_mode = 'Y' THEN
3115: pa_debug.set_curr_function( p_function => 'NONE_ETC_SRC',
3116: p_debug_mode => p_pa_debug_mode);
3117: END IF;
3118:
3119: l_sysdate := trunc(SYSDATE);
3120:

Line 3167: IF P_PA_DEBUG_MODE = 'Y' THEN

3163: l_task_start_date,
3164: l_task_completion_date,
3165: P_TASK_ID );
3166:
3167: IF P_PA_DEBUG_MODE = 'Y' THEN
3168: PA_DEBUG.RESET_CURR_FUNCTION;
3169: END IF;
3170:
3171: EXCEPTION

Line 3168: PA_DEBUG.RESET_CURR_FUNCTION;

3164: l_task_completion_date,
3165: P_TASK_ID );
3166:
3167: IF P_PA_DEBUG_MODE = 'Y' THEN
3168: PA_DEBUG.RESET_CURR_FUNCTION;
3169: END IF;
3170:
3171: EXCEPTION
3172: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 3191: IF P_PA_DEBUG_MODE = 'Y' THEN

3187:
3188: ROLLBACK;
3189: x_return_status := FND_API.G_RET_STS_ERROR;
3190:
3191: IF P_PA_DEBUG_MODE = 'Y' THEN
3192: pa_fp_gen_amount_utils.fp_debug
3193: (p_msg => 'Invalid Arguments Passed',
3194: p_module_name => l_module_name,
3195: p_log_level => 5);

Line 3196: PA_DEBUG.RESET_CURR_FUNCTION;

3192: pa_fp_gen_amount_utils.fp_debug
3193: (p_msg => 'Invalid Arguments Passed',
3194: p_module_name => l_module_name,
3195: p_log_level => 5);
3196: PA_DEBUG.RESET_CURR_FUNCTION;
3197: END IF;
3198: RAISE;
3199: WHEN OTHERS THEN
3200: rollback;

Line 3209: IF P_PA_DEBUG_MODE = 'Y' THEN

3205: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
3206: p_procedure_name => 'NONE_ETC_SOURCE',
3207: p_error_text => substr(sqlerrm,1,240));
3208:
3209: IF P_PA_DEBUG_MODE = 'Y' THEN
3210: pa_fp_gen_amount_utils.fp_debug
3211: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
3212: p_module_name => l_module_name,
3213: p_log_level => 5);

Line 3214: PA_DEBUG.RESET_CURR_FUNCTION;

3210: pa_fp_gen_amount_utils.fp_debug
3211: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
3212: p_module_name => l_module_name,
3213: p_log_level => 5);
3214: PA_DEBUG.RESET_CURR_FUNCTION;
3215: END IF;
3216: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3217: END NONE_ETC_SRC;
3218:

Line 3249: IF p_pa_debug_mode = 'Y' THEN

3245:
3246: BEGIN
3247: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
3248: X_MSG_COUNT := 0;
3249: IF p_pa_debug_mode = 'Y' THEN
3250: pa_debug.set_curr_function( p_function => 'MAINTAIN_BUDGET_VERSION',
3251: p_debug_mode => p_pa_debug_mode);
3252: END IF;
3253:

Line 3250: pa_debug.set_curr_function( p_function => 'MAINTAIN_BUDGET_VERSION',

3246: BEGIN
3247: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
3248: X_MSG_COUNT := 0;
3249: IF p_pa_debug_mode = 'Y' THEN
3250: pa_debug.set_curr_function( p_function => 'MAINTAIN_BUDGET_VERSION',
3251: p_debug_mode => p_pa_debug_mode);
3252: END IF;
3253:
3254: /* Calling the get_plan_version_dtls api */

Line 3251: p_debug_mode => p_pa_debug_mode);

3247: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
3248: X_MSG_COUNT := 0;
3249: IF p_pa_debug_mode = 'Y' THEN
3250: pa_debug.set_curr_function( p_function => 'MAINTAIN_BUDGET_VERSION',
3251: p_debug_mode => p_pa_debug_mode);
3252: END IF;
3253:
3254: /* Calling the get_plan_version_dtls api */
3255: IF p_pa_debug_mode = 'Y' THEN

Line 3255: IF p_pa_debug_mode = 'Y' THEN

3251: p_debug_mode => p_pa_debug_mode);
3252: END IF;
3253:
3254: /* Calling the get_plan_version_dtls api */
3255: IF p_pa_debug_mode = 'Y' THEN
3256: pa_fp_gen_amount_utils.fp_debug
3257: (p_msg => 'Before calling
3258: pa_fp_gen_amount_utils.get_plan_version_dtls',
3259: p_module_name => l_module_name,

Line 3269: IF p_pa_debug_mode = 'Y' THEN

3265: X_FP_COLS_REC => l_fp_cols_rec,
3266: X_RETURN_STATUS => X_RETURN_STATUS,
3267: X_MSG_COUNT => X_MSG_COUNT,
3268: X_MSG_DATA => X_MSG_DATA);
3269: IF p_pa_debug_mode = 'Y' THEN
3270: pa_fp_gen_amount_utils.fp_debug
3271: (p_msg => 'Status after calling
3272: pa_fp_gen_amount_utils.get_plan_version_dtls'
3273: ||x_return_status,

Line 3303: IF p_pa_debug_mode = 'Y' THEN

3299: the same resource assignments should be updated to the same start and end
3300: dates, which honor the max and min of the individual budget lines. This
3301: should also be updated back to resource assignments. **/
3302: IF l_fp_cols_rec.x_time_phased_code = 'N' THEN
3303: IF p_pa_debug_mode = 'Y' THEN
3304: pa_fp_gen_amount_utils.fp_debug
3305: (p_msg => 'Before calling pa_fp_maintain_actual_pub.'||
3306: 'SYNC_UP_PLANNING_DATES_NONE_TP',
3307: p_module_name => l_module_name,

Line 3316: IF p_pa_debug_mode = 'Y' THEN

3312: P_FP_COLS_REC => l_fp_cols_rec,
3313: X_RETURN_STATUS => X_RETURN_STATUS,
3314: X_MSG_COUNT => X_MSG_COUNT,
3315: X_MSG_DATA => X_MSG_DATA);
3316: IF p_pa_debug_mode = 'Y' THEN
3317: pa_fp_gen_amount_utils.fp_debug
3318: (p_msg => 'Status after calling pa_fp_maintain_actual_pub.'||
3319: 'SYNC_UP_PLANNING_DATES_NONE_TP:'||x_return_status,
3320: p_module_name => l_module_name,

Line 3328: IF p_pa_debug_mode = 'Y' THEN

3324: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3325: END IF;
3326: END IF;
3327:
3328: IF p_pa_debug_mode = 'Y' THEN
3329: pa_fp_gen_amount_utils.fp_debug
3330: (p_msg => 'Before calling
3331: PA_FP_GEN_PUB.MAINTAIN_FIXED_DATE_SP',
3332: p_module_name => l_module_name,

Line 3341: IF p_pa_debug_mode = 'Y' THEN

3337: P_FP_COLS_REC => l_fp_cols_rec,
3338: X_RETURN_STATUS => x_return_status,
3339: X_MSG_COUNT => x_msg_count,
3340: X_MSG_DATA => x_msg_data);
3341: IF p_pa_debug_mode = 'Y' THEN
3342: pa_fp_gen_amount_utils.fp_debug
3343: (p_msg => 'Status after calling
3344: PA_FP_GEN_PUB.MAINTAIN_FIXED_DATE_SP:'||x_return_status,
3345: p_module_name => l_module_name,

Line 3352: IF P_PA_DEBUG_MODE = 'Y' THEN

3348: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
3349: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3350: END IF;
3351:
3352: IF P_PA_DEBUG_MODE = 'Y' THEN
3353: pa_fp_gen_amount_utils.fp_debug
3354: (p_msg => 'Before calling PA_FP_MULTI_CURRENCY_PKG.CONVERT_TXN_CURRENCY',
3355: p_module_name => l_module_name,
3356: p_log_level => 5);

Line 3365: IF P_PA_DEBUG_MODE = 'Y' THEN

3361: p_calling_module => 'BUDGET_GENERATION', -- Added for Bug#5395732
3362: X_RETURN_STATUS => X_RETURN_STATUS,
3363: X_MSG_COUNT => X_MSG_COUNT,
3364: X_MSG_DATA => X_MSG_DATA);
3365: IF P_PA_DEBUG_MODE = 'Y' THEN
3366: pa_fp_gen_amount_utils.fp_debug
3367: (p_msg => 'After calling PA_FP_MULTI_CURRENCY_PKG.CONVERT_TXN_CURRENCY,
3368: ret status: '||x_return_status,
3369: p_module_name => l_module_name,

Line 3377: IF P_PA_DEBUG_MODE = 'Y' THEN

3373: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3374: raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3375: END IF;
3376:
3377: IF P_PA_DEBUG_MODE = 'Y' THEN
3378: pa_fp_gen_amount_utils.fp_debug
3379: (p_msg => 'Before calling PA_FP_ROLLUP_PKG.ROLLUP_BUDGET_VERSION',
3380: p_module_name => l_module_name,
3381: p_log_level => 5);

Line 3389: IF P_PA_DEBUG_MODE = 'Y' THEN

3385: p_entire_version => 'Y',
3386: X_RETURN_STATUS => X_RETURN_STATUS,
3387: X_MSG_COUNT => X_MSG_COUNT,
3388: X_MSG_DATA => X_MSG_DATA);
3389: IF P_PA_DEBUG_MODE = 'Y' THEN
3390: pa_fp_gen_amount_utils.fp_debug
3391: (p_msg => 'After calling PA_FP_ROLLUP_PKG.ROLLUP_BUDGET_VERSION,
3392: ret status: '||x_return_status,
3393: p_module_name => l_module_name,

Line 3408: IF p_pa_debug_mode = 'Y' THEN

3404:
3405: IF l_wp_version_flag = 'Y' THEN
3406: IF l_fp_cols_rec.x_fin_plan_level_code <> 'P' THEN
3407: /* Calling the UPD_WBS_ELEMENT_VERSION_ID api */
3408: IF p_pa_debug_mode = 'Y' THEN
3409: pa_fp_gen_amount_utils.fp_debug
3410: (p_msg => 'Before calling
3411: PA_FP_GEN_PUB.UPD_WBS_ELEMENT_VERSION_ID',
3412: p_module_name => l_module_name,

Line 3424: IF p_pa_debug_mode = 'Y' THEN

3420: X_MSG_DATA => X_MSG_DATA);
3421: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
3422: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3423: END IF;
3424: IF p_pa_debug_mode = 'Y' THEN
3425: pa_fp_gen_amount_utils.fp_debug
3426: (p_msg => 'Status after calling
3427: PA_FP_GEN_PUB.UPD_WBS_ELEMENT_VERSION_ID'
3428: ||x_return_status,

Line 3439: IF p_pa_debug_mode = 'Y' THEN

3435:
3436:
3437: IF l_fp_cols_rec.x_plan_in_multi_curr_flag = 'Y' THEN
3438: /* Calling insert_txn_currency api */
3439: IF p_pa_debug_mode = 'Y' THEN
3440: pa_fp_gen_amount_utils.fp_debug
3441: (p_msg => 'Before calling
3442: pa_fp_gen_budget_amt_pub.insert_txn_currency',
3443: p_module_name => l_module_name,

Line 3456: IF p_pa_debug_mode = 'Y' THEN

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
3458: (p_msg => 'Status after calling
3459: pa_fp_gen_budget_amt_pub.insert_txn_currency'
3460: ||x_return_status,

Line 3472: IF P_PA_DEBUG_MODE = 'Y' THEN

3468: -- Bug 4187704: Uncommented the MRC code. Also, set added logic to set
3469: -- PA_MRC_FINPLAN.G_CALLING_MODULE based on Target Plan Class Code.
3470: IF PA_MRC_FINPLAN.G_MRC_ENABLED_FOR_BUDGETS IS NULL THEN
3471:
3472: IF P_PA_DEBUG_MODE = 'Y' THEN
3473: pa_fp_gen_amount_utils.fp_debug
3474: (p_msg => 'Before calling PA_MRC_FINPLAN.CHECK_MRC_INSTALL',
3475: p_module_name => l_module_name,
3476: p_log_level => 5);

Line 3482: IF P_PA_DEBUG_MODE = 'Y' THEN

3478: PA_MRC_FINPLAN.CHECK_MRC_INSTALL
3479: (x_return_status => x_return_status,
3480: x_msg_count => x_msg_count,
3481: x_msg_data => x_msg_data);
3482: IF P_PA_DEBUG_MODE = 'Y' THEN
3483: pa_fp_gen_amount_utils.fp_debug
3484: (p_msg => 'After calling PA_MRC_FINPLAN.CHECK_MRC_INSTALL,
3485: ret status: '||x_return_status,
3486: p_module_name => l_module_name,

Line 3503: IF P_PA_DEBUG_MODE = 'Y' THEN

3499: ELSIF l_fp_cols_rec.x_plan_class_code = 'BUDGET' THEN
3500: PA_MRC_FINPLAN.G_CALLING_MODULE := PA_MRC_FINPLAN.G_GENERATE_BUDGET;
3501: END IF;
3502:
3503: IF P_PA_DEBUG_MODE = 'Y' THEN
3504: pa_fp_gen_amount_utils.fp_debug
3505: (p_msg => 'Before calling PA_MRC_FINPLAN.MAINTAIN_ALL_MC_BUDGET_LINES',
3506: p_module_name => l_module_name,
3507: p_log_level => 5);

Line 3515: IF P_PA_DEBUG_MODE = 'Y' THEN

3511: p_entire_version => 'Y',
3512: x_return_status => x_return_status,
3513: x_msg_count => x_msg_count,
3514: x_msg_data => x_msg_data);
3515: IF P_PA_DEBUG_MODE = 'Y' THEN
3516: pa_fp_gen_amount_utils.fp_debug
3517: (p_msg => 'After calling PA_MRC_FINPLAN.MAINTAIN_ALL_MC_BUDGET_LINES,
3518: ret status: '||x_return_status,
3519: p_module_name => l_module_name,

Line 3533: IF P_PA_DEBUG_MODE = 'Y' THEN

3529:
3530: l_fp_version_ids_tab.extend;
3531: l_fp_version_ids_tab(1) := P_BUDGET_VERSION_ID;
3532:
3533: IF P_PA_DEBUG_MODE = 'Y' THEN
3534: pa_fp_gen_amount_utils.fp_debug
3535: (p_msg => 'Before calling PJI_FM_XBS_ACCUM_MAINT.PLAN_DELETE',
3536: p_module_name => l_module_name,
3537: p_log_level => 5);

Line 3543: IF P_PA_DEBUG_MODE = 'Y' THEN

3539: PJI_FM_XBS_ACCUM_MAINT.PLAN_DELETE (
3540: p_fp_version_ids => l_fp_version_ids_tab,
3541: x_return_status => x_return_status,
3542: x_msg_code => x_msg_data );
3543: IF P_PA_DEBUG_MODE = 'Y' THEN
3544: pa_fp_gen_amount_utils.fp_debug
3545: (p_msg => 'After calling PJI_FM_XBS_ACCUM_MAINT.PLAN_DELETE,
3546: ret status: '||x_return_status,
3547: p_module_name => l_module_name,

Line 3556: IF P_PA_DEBUG_MODE = 'Y' THEN

3552: END IF;
3553:
3554: IF l_fp_cols_rec.X_RBS_VERSION_ID IS NOT NULL THEN
3555:
3556: IF P_PA_DEBUG_MODE = 'Y' THEN
3557: pa_fp_gen_amount_utils.fp_debug
3558: (p_msg => 'Before calling
3559: pa_fp_map_bv_pub.maintain_rbs_dtls',
3560: p_module_name => l_module_name,

Line 3573: IF P_PA_DEBUG_MODE = 'Y' THEN

3569: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
3570: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3571: END IF;
3572:
3573: IF P_PA_DEBUG_MODE = 'Y' THEN
3574: pa_fp_gen_amount_utils.fp_debug
3575: (p_msg => 'After calling pa_fp_map_bv_pub.maintain_rbs_dtls,
3576: ret status: '||x_return_status,
3577: p_module_name => l_module_name,

Line 3581: IF P_PA_DEBUG_MODE = 'Y' THEN

3577: p_module_name => l_module_name,
3578: p_log_level => 5);
3579: END IF;
3580: END IF;
3581: IF P_PA_DEBUG_MODE = 'Y' THEN
3582: pa_fp_gen_amount_utils.fp_debug
3583: (p_msg => 'Before calling PJI_FM_XBS_ACCUM_MAINT.PLAN_CREATE',
3584: p_module_name => l_module_name,
3585: p_log_level => 5);

Line 3591: IF P_PA_DEBUG_MODE = 'Y' THEN

3587: PJI_FM_XBS_ACCUM_MAINT.PLAN_CREATE (
3588: p_fp_version_ids => l_fp_version_ids_tab,
3589: x_return_status => x_return_status,
3590: x_msg_code => x_msg_data );
3591: IF P_PA_DEBUG_MODE = 'Y' THEN
3592: pa_fp_gen_amount_utils.fp_debug
3593: (p_msg => 'After calling PJI_FM_XBS_ACCUM_MAINT.PLAN_CREATE,
3594: ret status: '||x_return_status,
3595: p_module_name => l_module_name,

Line 3602: IF P_PA_DEBUG_MODE = 'Y' THEN

3598: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
3599: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3600: END IF;
3601:
3602: IF P_PA_DEBUG_MODE = 'Y' THEN
3603: pa_fp_gen_amount_utils.fp_debug
3604: (p_msg => 'Before calling PA_FP_GEN_BUDGET_AMT_PUB.UPDATE_BV_FOR_GEN_DATE',
3605: p_module_name => l_module_name,
3606: p_log_level => 5);

Line 3615: IF P_PA_DEBUG_MODE = 'Y' THEN

3611: P_ETC_START_DATE => P_ETC_START_DATE,
3612: X_RETURN_STATUS => X_RETURN_STATUS,
3613: X_MSG_COUNT => X_MSG_COUNT,
3614: X_MSG_DATA => X_MSG_DATA);
3615: IF P_PA_DEBUG_MODE = 'Y' THEN
3616: pa_fp_gen_amount_utils.fp_debug
3617: (p_msg => 'After calling PA_FP_GEN_BUDGET_AMT_PUB.UPDATE_BV_FOR_GEN_DATE,
3618: ret status: '||x_return_status,
3619: p_module_name => l_module_name,

Line 3634: IF p_pa_debug_mode = 'Y' THEN

3630: -- the beginning of the API for details.
3631:
3632: IF P_CALL_MAINTAIN_DATA_API = 'Y' THEN
3633: -- Call the maintenance api in ROLLUP mode
3634: IF p_pa_debug_mode = 'Y' THEN
3635: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
3636: P_MSG => 'Before calling PA_FP_GEN_FCST_AMT_PUB1.' ||
3637: 'UPD_NRB_TXN_OVR_RATES',
3638: --P_CALLED_MODE => p_called_mode,

Line 3649: IF p_pa_debug_mode = 'Y' THEN

3645: P_ETC_START_DATE => P_ETC_START_DATE,
3646: X_RETURN_STATUS => X_RETURN_STATUS,
3647: X_MSG_COUNT => X_MSG_COUNT,
3648: X_MSG_DATA => X_MSG_DATA);
3649: IF p_pa_debug_mode = 'Y' THEN
3650: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
3651: P_MSG => 'After calling PA_FP_GEN_FCST_AMT_PUB1.' ||
3652: 'UPD_NRB_TXN_OVR_RATES: '||x_return_status,
3653: --P_CALLED_MODE => p_called_mode,

Line 3688: IF p_pa_debug_mode = 'Y' THEN

3684: FROM pa_resource_assignments ra
3685: WHERE ra.budget_version_id = p_budget_version_id
3686: AND ra.transaction_source_code IS NOT NULL;
3687:
3688: IF p_pa_debug_mode = 'Y' THEN
3689: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
3690: P_MSG => 'Before calling PA_BUDGET_LINES_UTILS.' ||
3691: 'POPULATE_DISPLAY_QTY',
3692: --P_CALLED_MODE => p_called_mode,

Line 3700: IF p_pa_debug_mode = 'Y' THEN

3696: ( P_BUDGET_VERSION_ID => p_budget_version_id,
3697: P_CONTEXT => 'FINANCIAL',
3698: P_USE_TEMP_TABLE_FLAG => 'Y',
3699: X_RETURN_STATUS => x_return_status );
3700: IF p_pa_debug_mode = 'Y' THEN
3701: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
3702: P_MSG => 'After calling PA_BUDGET_LINES_UTILS.' ||
3703: 'POPULATE_DISPLAY_QTY: '||x_return_status,
3704: --P_CALLED_MODE => p_called_mode,

Line 3738: IF p_pa_debug_mode = 'Y' THEN

3734: AND bl.resource_assignment_id = ra.resource_assignment_id
3735: AND bl.resource_assignment_id = rbc.resource_assignment_id (+)
3736: AND bl.txn_currency_code = rbc.txn_currency_code (+);
3737:
3738: IF p_pa_debug_mode = 'Y' THEN
3739: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
3740: P_MSG => 'Before calling PA_RES_ASG_CURRENCY_PUB.' ||
3741: 'MAINTAIN_DATA',
3742: --P_CALLED_MODE => p_called_mode,

Line 3754: IF p_pa_debug_mode = 'Y' THEN

3750: --P_CALLED_MODE => p_called_mode,
3751: X_RETURN_STATUS => x_return_status,
3752: X_MSG_COUNT => x_msg_count,
3753: X_MSG_DATA => x_msg_data );
3754: IF p_pa_debug_mode = 'Y' THEN
3755: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
3756: P_MSG => 'After calling PA_RES_ASG_CURRENCY_PUB.' ||
3757: 'MAINTAIN_DATA: '||x_return_status,
3758: --P_CALLED_MODE => p_called_mode,

Line 3777: IF p_pa_debug_mode = 'Y' THEN

3773: -- the populate_display_qty() and maintain_data() API calls.
3774:
3775: -- Populate the display quantity for all resources in the version.
3776:
3777: IF p_pa_debug_mode = 'Y' THEN
3778: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
3779: P_MSG => 'Before calling PA_BUDGET_LINES_UTILS.' ||
3780: 'POPULATE_DISPLAY_QTY',
3781: --P_CALLED_MODE => p_called_mode,

Line 3789: IF p_pa_debug_mode = 'Y' THEN

3785: ( P_BUDGET_VERSION_ID => p_budget_version_id,
3786: P_CONTEXT => 'FINANCIAL',
3787: P_USE_TEMP_TABLE_FLAG => 'N',
3788: X_RETURN_STATUS => x_return_status );
3789: IF p_pa_debug_mode = 'Y' THEN
3790: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
3791: P_MSG => 'After calling PA_BUDGET_LINES_UTILS.' ||
3792: 'POPULATE_DISPLAY_QTY: '||x_return_status,
3793: --P_CALLED_MODE => p_called_mode,

Line 3808: IF p_pa_debug_mode = 'Y' THEN

3804: ELSIF l_fp_cols_rec.x_plan_class_code = 'FORECAST' THEN
3805: l_calling_module := 'FORECAST_GENERATION';
3806: END IF;
3807:
3808: IF p_pa_debug_mode = 'Y' THEN
3809: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
3810: P_MSG => 'Before calling PA_RES_ASG_CURRENCY_PUB.' ||
3811: 'MAINTAIN_DATA',
3812: --P_CALLED_MODE => p_called_mode,

Line 3824: IF p_pa_debug_mode = 'Y' THEN

3820: --P_CALLED_MODE => p_called_mode,
3821: X_RETURN_STATUS => x_return_status,
3822: X_MSG_COUNT => x_msg_count,
3823: X_MSG_DATA => x_msg_data );
3824: IF p_pa_debug_mode = 'Y' THEN
3825: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
3826: P_MSG => 'After calling PA_RES_ASG_CURRENCY_PUB.' ||
3827: 'MAINTAIN_DATA: '||x_return_status,
3828: --P_CALLED_MODE => p_called_mode,

Line 3859: IF P_PA_DEBUG_MODE = 'Y' THEN

3855:
3856: -- END OF IPM: New Entity and Display Quantity ERs --------------------
3857:
3858:
3859: IF P_PA_DEBUG_MODE = 'Y' THEN
3860: PA_DEBUG.RESET_CURR_FUNCTION;
3861: END IF;
3862: EXCEPTION
3863: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 3860: PA_DEBUG.RESET_CURR_FUNCTION;

3856: -- END OF IPM: New Entity and Display Quantity ERs --------------------
3857:
3858:
3859: IF P_PA_DEBUG_MODE = 'Y' THEN
3860: PA_DEBUG.RESET_CURR_FUNCTION;
3861: END IF;
3862: EXCEPTION
3863: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
3864: l_msg_count := FND_MSG_PUB.count_msg;

Line 3882: IF P_PA_DEBUG_MODE = 'Y' THEN

3878:
3879: ROLLBACK;
3880: x_return_status := FND_API.G_RET_STS_ERROR;
3881:
3882: IF P_PA_DEBUG_MODE = 'Y' THEN
3883: pa_fp_gen_amount_utils.fp_debug
3884: (p_msg => 'Invalid Arguments Passed',
3885: p_module_name => l_module_name,
3886: p_log_level => 5);

Line 3887: PA_DEBUG.RESET_CURR_FUNCTION;

3883: pa_fp_gen_amount_utils.fp_debug
3884: (p_msg => 'Invalid Arguments Passed',
3885: p_module_name => l_module_name,
3886: p_log_level => 5);
3887: PA_DEBUG.RESET_CURR_FUNCTION;
3888: END IF;
3889: RAISE;
3890: WHEN OTHERS THEN
3891: rollback;

Line 3901: IF P_PA_DEBUG_MODE = 'Y' THEN

3897: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
3898: p_procedure_name => 'MAINTAIN_BUDGET_VERSION',
3899: p_error_text => substr(sqlerrm,1,240));
3900:
3901: IF P_PA_DEBUG_MODE = 'Y' THEN
3902: pa_fp_gen_amount_utils.fp_debug
3903: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
3904: p_module_name => l_module_name,
3905: p_log_level => 5);

Line 3906: PA_DEBUG.RESET_CURR_FUNCTION;

3902: pa_fp_gen_amount_utils.fp_debug
3903: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
3904: p_module_name => l_module_name,
3905: p_log_level => 5);
3906: PA_DEBUG.RESET_CURR_FUNCTION;
3907: END IF;
3908: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3909: END MAINTAIN_BUDGET_VERSION;
3910:

Line 4199: IF p_pa_debug_mode = 'Y' THEN

4195: l_msg_data VARCHAR2(2000);
4196: l_data VARCHAR2(2000);
4197: l_msg_index_out NUMBER:=0;
4198: BEGIN
4199: IF p_pa_debug_mode = 'Y' THEN
4200: pa_debug.set_curr_function( p_function => 'GEN_ETC_BDGT_COMPLETE_AMTS',
4201: p_debug_mode => p_pa_debug_mode);
4202: END IF;
4203: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

Line 4200: pa_debug.set_curr_function( p_function => 'GEN_ETC_BDGT_COMPLETE_AMTS',

4196: l_data VARCHAR2(2000);
4197: l_msg_index_out NUMBER:=0;
4198: BEGIN
4199: IF p_pa_debug_mode = 'Y' THEN
4200: pa_debug.set_curr_function( p_function => 'GEN_ETC_BDGT_COMPLETE_AMTS',
4201: p_debug_mode => p_pa_debug_mode);
4202: END IF;
4203: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
4204: X_MSG_COUNT := 0;

Line 4201: p_debug_mode => p_pa_debug_mode);

4197: l_msg_index_out NUMBER:=0;
4198: BEGIN
4199: IF p_pa_debug_mode = 'Y' THEN
4200: pa_debug.set_curr_function( p_function => 'GEN_ETC_BDGT_COMPLETE_AMTS',
4201: p_debug_mode => p_pa_debug_mode);
4202: END IF;
4203: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
4204: X_MSG_COUNT := 0;
4205:

Line 4283: IF P_PA_DEBUG_MODE = 'Y' THEN

4279: X_ACT_PFC_RAW_COST := 0;
4280: X_ACT_PFC_BRDN_COST := 0;
4281: END IF;
4282:
4283: IF P_PA_DEBUG_MODE = 'Y' THEN
4284: PA_DEBUG.RESET_CURR_FUNCTION;
4285: END IF;
4286:
4287: EXCEPTION

Line 4284: PA_DEBUG.RESET_CURR_FUNCTION;

4280: X_ACT_PFC_BRDN_COST := 0;
4281: END IF;
4282:
4283: IF P_PA_DEBUG_MODE = 'Y' THEN
4284: PA_DEBUG.RESET_CURR_FUNCTION;
4285: END IF;
4286:
4287: EXCEPTION
4288: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 4307: IF P_PA_DEBUG_MODE = 'Y' THEN

4303:
4304: ROLLBACK;
4305: x_return_status := FND_API.G_RET_STS_ERROR;
4306:
4307: IF P_PA_DEBUG_MODE = 'Y' THEN
4308: pa_fp_gen_amount_utils.fp_debug
4309: (p_msg => 'Invalid Arguments Passed',
4310: p_module_name => l_module_name,
4311: p_log_level => 5);

Line 4312: PA_DEBUG.RESET_CURR_FUNCTION;

4308: pa_fp_gen_amount_utils.fp_debug
4309: (p_msg => 'Invalid Arguments Passed',
4310: p_module_name => l_module_name,
4311: p_log_level => 5);
4312: PA_DEBUG.RESET_CURR_FUNCTION;
4313: END IF;
4314: RAISE;
4315: WHEN OTHERS THEN
4316: rollback;

Line 4326: IF P_PA_DEBUG_MODE = 'Y' THEN

4322: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
4323: p_procedure_name => 'GET_WP_ACTUALS_FOR_RA',
4324: p_error_text => substr(sqlerrm,1,240));
4325:
4326: IF P_PA_DEBUG_MODE = 'Y' THEN
4327: pa_fp_gen_amount_utils.fp_debug
4328: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
4329: p_module_name => l_module_name,
4330: p_log_level => 5);

Line 4331: PA_DEBUG.RESET_CURR_FUNCTION;

4327: pa_fp_gen_amount_utils.fp_debug
4328: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
4329: p_module_name => l_module_name,
4330: p_log_level => 5);
4331: PA_DEBUG.RESET_CURR_FUNCTION;
4332: END IF;
4333: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4334: END GET_WP_ACTUALS_FOR_RA;
4335:

Line 4534: IF p_pa_debug_mode = 'Y' THEN

4530:
4531: BEGIN
4532:
4533: x_call_maintain_data_api := 'Y';
4534: IF p_pa_debug_mode = 'Y' THEN
4535: pa_debug.set_curr_function( p_function => 'call_clnt_extn_and_update_bl',
4536: p_debug_mode => p_pa_debug_mode);
4537: END IF;
4538: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

Line 4535: pa_debug.set_curr_function( p_function => 'call_clnt_extn_and_update_bl',

4531: BEGIN
4532:
4533: x_call_maintain_data_api := 'Y';
4534: IF p_pa_debug_mode = 'Y' THEN
4535: pa_debug.set_curr_function( p_function => 'call_clnt_extn_and_update_bl',
4536: p_debug_mode => p_pa_debug_mode);
4537: END IF;
4538: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
4539: X_MSG_COUNT := 0;

Line 4536: p_debug_mode => p_pa_debug_mode);

4532:
4533: x_call_maintain_data_api := 'Y';
4534: IF p_pa_debug_mode = 'Y' THEN
4535: pa_debug.set_curr_function( p_function => 'call_clnt_extn_and_update_bl',
4536: p_debug_mode => p_pa_debug_mode);
4537: END IF;
4538: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
4539: X_MSG_COUNT := 0;
4540:

Line 4544: IF p_pa_debug_mode = 'Y' THEN

4540:
4541:
4542:
4543: IF p_project_id IS NULL OR p_budget_version_id IS NULL THEN
4544: IF p_pa_debug_mode = 'Y' THEN
4545: pa_fp_gen_amount_utils.fp_debug
4546: (p_msg => 'PA_FP_INV_PARAM_PASSED',
4547: p_module_name => l_module_name,
4548: p_log_level => 5);

Line 4549: PA_DEBUG.RESET_CURR_FUNCTION;

4545: pa_fp_gen_amount_utils.fp_debug
4546: (p_msg => 'PA_FP_INV_PARAM_PASSED',
4547: p_module_name => l_module_name,
4548: p_log_level => 5);
4549: PA_DEBUG.RESET_CURR_FUNCTION;
4550: END IF;
4551: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
4552: END IF;
4553:

Line 4554: IF p_pa_debug_mode = 'Y' THEN

4550: END IF;
4551: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
4552: END IF;
4553:
4554: IF p_pa_debug_mode = 'Y' THEN
4555: pa_fp_gen_amount_utils.fp_debug
4556: (p_msg => 'Before calling pa_fp_gen_amount_utils.get_plan_version_dtls',
4557: p_module_name => l_module_name,
4558: p_log_level => 5);

Line 4568: IF p_pa_debug_mode = 'Y' THEN

4564: X_FP_COLS_REC => l_fp_cols_rec,
4565: X_RETURN_STATUS => X_RETURN_STATUS,
4566: X_MSG_COUNT => X_MSG_COUNT,
4567: X_MSG_DATA => X_MSG_DATA);
4568: IF p_pa_debug_mode = 'Y' THEN
4569: pa_fp_gen_amount_utils.fp_debug
4570: (p_msg => 'Status after calling pa_fp_gen_amount_utils.get_plan_version_dtls'||x_return_status,
4571: p_module_name => l_module_name,
4572: p_log_level => 5);

Line 4596: IF p_pa_debug_mode = 'Y' THEN

4592:
4593:
4594: -- Getting the project percent complete.
4595:
4596: IF p_pa_debug_mode = 'Y' THEN
4597: pa_fp_gen_amount_utils.fp_debug
4598: (p_msg => 'Getting the project percent complete',
4599: p_module_name => l_module_name,
4600: p_log_level => 5);

Line 4617: IF P_PA_DEBUG_MODE = 'Y' THEN

4613: x_return_status => x_return_status,
4614: x_msg_count => x_msg_count,
4615: x_msg_data => x_msg_data );
4616:
4617: IF P_PA_DEBUG_MODE = 'Y' THEN
4618: pa_fp_gen_amount_utils.fp_debug
4619: (p_msg => 'After calling PA_PROGRESS_UTILS.REDEFAULT_BASE_PC,
4620: return status is:'||x_return_status,
4621: p_module_name => l_module_name,

Line 4633: IF p_pa_debug_mode = 'Y' THEN

4629:
4630:
4631:
4632:
4633: IF p_pa_debug_mode = 'Y' THEN
4634: pa_fp_gen_amount_utils.fp_debug
4635: (p_msg => 'Start of bulk collecting budget lines',
4636: p_module_name => l_module_name,
4637: p_log_level => 5);

Line 4647: IF P_PA_debug_mode = 'Y' THEN

4643: p_context => 'FINANCIAL',
4644: x_return_status => X_RETURN_STATUS);
4645:
4646: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
4647: IF P_PA_debug_mode = 'Y' THEN
4648: pa_fp_gen_amount_utils.fp_debug
4649: (p_msg => 'Status after calling PA_BUDGET_LINES_UTILS.populate_display_qty'||X_RETURN_STATUS,
4650: p_module_name => l_module_name,
4651: p_log_level => 5);

Line 4661: IF p_pa_debug_mode = 'Y' THEN

4657: -- further down in this API and in Calculate API when it is called in RESOURCE_ASSIGNMENT mode.
4658: -- Call MAINTAIN_DATA to roll up amounts to pa_resource_asgn_curr
4659:
4660:
4661: IF p_pa_debug_mode = 'Y' THEN
4662: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
4663: P_MSG => 'Before calling PA_FP_GEN_FCST_AMT_PUB1.' ||
4664: 'UPD_NRB_TXN_OVR_RATES',
4665: --P_CALLED_MODE => p_called_mode,

Line 4676: IF p_pa_debug_mode = 'Y' THEN

4672: P_ETC_START_DATE => l_etc_start_date,
4673: X_RETURN_STATUS => X_RETURN_STATUS,
4674: X_MSG_COUNT => X_MSG_COUNT,
4675: X_MSG_DATA => X_MSG_DATA);
4676: IF p_pa_debug_mode = 'Y' THEN
4677: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
4678: P_MSG => 'After calling PA_FP_GEN_FCST_AMT_PUB1.' ||
4679: 'UPD_NRB_TXN_OVR_RATES: '||x_return_status,
4680: --P_CALLED_MODE => p_called_mode,

Line 4701: IF P_PA_debug_mode = 'Y' THEN

4697: x_msg_data => X_MSG_DATA,
4698: x_msg_count => X_MSG_COUNT);
4699:
4700: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
4701: IF P_PA_debug_mode = 'Y' THEN
4702: pa_fp_gen_amount_utils.fp_debug
4703: (p_msg => 'Status after calling PA_RES_ASG_CURRENCY_PUB.maintain_data'||X_RETURN_STATUS,
4704: p_module_name => l_module_name,
4705: p_log_level => 5);

Line 4722: IF P_PA_debug_mode = 'Y' THEN

4718: X_MSG_COUNT => X_MSG_COUNT,
4719: X_MSG_DATA => X_MSG_DATA);
4720:
4721: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
4722: IF P_PA_debug_mode = 'Y' THEN
4723: pa_fp_gen_amount_utils.fp_debug
4724: (p_msg => 'PA_FP_MAINTAIN_ACTUAL_PUB.SYNC_UP_PLANNING_DATES_NONE_TP'||X_RETURN_STATUS,
4725: p_module_name => l_module_name,
4726: p_log_level => 5);

Line 4798: IF p_pa_debug_mode = 'Y' THEN

4794: WHERE prac.budget_version_id = p_budget_version_id
4795: AND pra.budget_version_id = p_budget_version_id
4796: AND prac.resource_assignment_id = pra.resource_assignment_id;
4797:
4798: IF p_pa_debug_mode = 'Y' THEN
4799: pa_fp_gen_amount_utils.fp_debug
4800: (p_msg => 'End of bulk collecting budget lines',
4801: p_module_name => l_module_name,
4802: p_log_level => 5);

Line 4835: IF p_pa_debug_mode = 'Y' THEN

4831: l_actual_raw_cost := l_init_raw_cost_tbl_1(kk);
4832: l_actual_burdened_cost := l_init_burd_cost_tbl_1(kk);
4833: l_actual_revenue := l_init_revenue_tbl_1(kk);
4834: l_total_quantity := l_etc_qty_tbl_1(kk) + l_init_quantity_tbl_1(kk);
4835: IF p_pa_debug_mode = 'Y' THEN
4836: pa_fp_gen_amount_utils.fp_debug
4837: (p_msg => 'Before collecting budget lines for a ra id',
4838: p_module_name => l_module_name,
4839: p_log_level => 5);

Line 4878: IF p_pa_debug_mode = 'Y' THEN

4874: FROM pa_budget_lines pbl
4875: WHERE resource_assignment_id = l_ra_id_tbl_1(kk)
4876: AND txn_currency_code = l_txn_currency_code_tbl_1(kk);
4877:
4878: IF p_pa_debug_mode = 'Y' THEN
4879: pa_fp_gen_amount_utils.fp_debug
4880: (p_msg => 'After collecting budget lines for a ra id',
4881: p_module_name => l_module_name,
4882: p_log_level => 5);

Line 4933: IF P_PA_DEBUG_MODE = 'Y' THEN

4929: END LOOP;
4930:
4931:
4932: -- Call the client extension for each planning transaction
4933: IF P_PA_DEBUG_MODE = 'Y' THEN
4934: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
4935: P_MSG =>
4936: 'Before calling pa_fp_fcst_gen_client_ext.fcst_gen_client_extn',
4937: P_MODULE_NAME => l_module_name);

Line 5052: IF P_PA_DEBUG_MODE = 'Y' THEN

5048:
5049:
5050:
5051:
5052: IF P_PA_DEBUG_MODE = 'Y' THEN
5053: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
5054: P_MSG => 'After calling pa_fp_fcst_gen_client_ext.fcst_gen_client_extn: '||x_return_status,
5055: P_MODULE_NAME => l_module_name);
5056: END IF;

Line 5629: IF P_PA_DEBUG_MODE = 'Y' THEN

5625:
5626: --For Bug 6722414
5627: pa_fp_calc_plan_pkg.g_from_etc_client_extn_flag := 'N';
5628:
5629: IF P_PA_DEBUG_MODE = 'Y' THEN
5630: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
5631: P_MSG =>
5632: 'After calling PA_FP_CALC_PLAN_PKG.calculate '
5633: ||x_return_status,

Line 5669: IF P_PA_DEBUG_MODE = 'Y' THEN

5665: */
5666: IF l_call_calculate_flag = 'N' and l_upd_count = 0 and l_del_count = 0 THEN
5667: x_call_maintain_data_api := 'N';
5668: END IF;
5669: IF P_PA_DEBUG_MODE = 'Y' THEN
5670: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
5671: P_MSG =>
5672: 'After calling PA_FP_CALC_PLAN_PKG.CheckZeroQTyNegETC '
5673: ||x_return_status,

Line 5709: IF p_pa_debug_mode = 'Y' THEN

5705: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
5706: p_procedure_name => 'call_clnt_extn_and_update_bl',
5707: p_error_text => substr(sqlerrm,1,240));
5708:
5709: IF p_pa_debug_mode = 'Y' THEN
5710: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
5711: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
5712: p_module_name => l_module_name,
5713: p_log_level => 5);

Line 5714: PA_DEBUG.RESET_CURR_FUNCTION;

5710: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
5711: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
5712: p_module_name => l_module_name,
5713: p_log_level => 5);
5714: PA_DEBUG.RESET_CURR_FUNCTION;
5715: END IF;
5716: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5717:
5718: END call_clnt_extn_and_update_bl;