eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PA_FP_GEN_PUB dependencies on PA_DEBUG

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

1: PACKAGE body PA_FP_GEN_PUB as
2: /* $Header: PAFPGNPB.pls 120.6.12010000.2 2009/06/25 11:01:43 rthumma ship $ */
3: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
4:
5: PROCEDURE UPDATE_RES_DEFAULTS
6: (P_PROJECT_ID IN pa_projects_all.PROJECT_ID%TYPE,
7: P_BUDGET_VERSION_ID IN PA_BUDGET_VERSIONS.BUDGET_VERSION_ID%TYPE,

Line 115: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN

111:
112: X_MSG_COUNT := 0;
113: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
114:
115: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
116: PA_DEBUG.init_err_stack('PA_FP_GEN_PUB.UPDATE_RES_DEFAULTS');
117: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
118: pa_debug.set_curr_function( p_function => 'UPDATE_RES_DEFAULTS'
119: ,p_debug_mode => p_pa_debug_mode);

Line 116: PA_DEBUG.init_err_stack('PA_FP_GEN_PUB.UPDATE_RES_DEFAULTS');

112: X_MSG_COUNT := 0;
113: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
114:
115: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
116: PA_DEBUG.init_err_stack('PA_FP_GEN_PUB.UPDATE_RES_DEFAULTS');
117: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
118: pa_debug.set_curr_function( p_function => 'UPDATE_RES_DEFAULTS'
119: ,p_debug_mode => p_pa_debug_mode);
120: END IF;

Line 117: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

113: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
114:
115: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
116: PA_DEBUG.init_err_stack('PA_FP_GEN_PUB.UPDATE_RES_DEFAULTS');
117: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
118: pa_debug.set_curr_function( p_function => 'UPDATE_RES_DEFAULTS'
119: ,p_debug_mode => p_pa_debug_mode);
120: END IF;
121:

Line 118: pa_debug.set_curr_function( p_function => 'UPDATE_RES_DEFAULTS'

114:
115: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
116: PA_DEBUG.init_err_stack('PA_FP_GEN_PUB.UPDATE_RES_DEFAULTS');
117: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
118: pa_debug.set_curr_function( p_function => 'UPDATE_RES_DEFAULTS'
119: ,p_debug_mode => p_pa_debug_mode);
120: END IF;
121:
122: -- 1. Bug 4895793: Get all target resources and their rlm_ids.

Line 119: ,p_debug_mode => p_pa_debug_mode);

115: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
116: PA_DEBUG.init_err_stack('PA_FP_GEN_PUB.UPDATE_RES_DEFAULTS');
117: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
118: pa_debug.set_curr_function( p_function => 'UPDATE_RES_DEFAULTS'
119: ,p_debug_mode => p_pa_debug_mode);
120: END IF;
121:
122: -- 1. Bug 4895793: Get all target resources and their rlm_ids.
123: SELECT resource_assignment_id,

Line 132: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN

128: FROM pa_resource_assignments
129: WHERE budget_version_id = p_budget_version_id;
130:
131: IF l_da_resource_list_members_tab.count = 0 then
132: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
133: PA_DEBUG.reset_err_stack;
134: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
135: PA_DEBUG.Reset_Curr_Function;
136: END IF;

Line 133: PA_DEBUG.reset_err_stack;

129: WHERE budget_version_id = p_budget_version_id;
130:
131: IF l_da_resource_list_members_tab.count = 0 then
132: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
133: PA_DEBUG.reset_err_stack;
134: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
135: PA_DEBUG.Reset_Curr_Function;
136: END IF;
137: RETURN;

Line 134: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

130:
131: IF l_da_resource_list_members_tab.count = 0 then
132: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
133: PA_DEBUG.reset_err_stack;
134: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
135: PA_DEBUG.Reset_Curr_Function;
136: END IF;
137: RETURN;
138: END IF;

Line 135: PA_DEBUG.Reset_Curr_Function;

131: IF l_da_resource_list_members_tab.count = 0 then
132: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
133: PA_DEBUG.reset_err_stack;
134: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
135: PA_DEBUG.Reset_Curr_Function;
136: END IF;
137: RETURN;
138: END IF;
139:

Line 161: IF p_pa_debug_mode = 'Y' THEN

157: -- 3. Bug 4895793: Get default attribute values for the distinct rlm_ids and store
158: -- them in the pl/sql tables prefixed by "l_" instead of by "l_da_".
159:
160: --Calling resource defualt API
161: IF p_pa_debug_mode = 'Y' THEN
162: pa_fp_gen_amount_utils.fp_debug
163: (p_msg => 'Before calling
164: pa_planning_resource_utils.get_resource_defaults',
165: p_module_name => l_module_name,

Line 215: IF p_pa_debug_mode = 'Y' THEN

211:
212: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
213: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
214: END IF;
215: IF p_pa_debug_mode = 'Y' THEN
216: pa_fp_gen_amount_utils.fp_debug
217: (p_msg => 'Status after calling
218: pa_planning_resource_utils.get_resource_defaults'
219: ||x_return_status,

Line 278: IF P_PA_DEBUG_MODE = 'Y' THEN

274: -- Bug 4143869: Added call to GET_PLAN_VERSION_DTLS to get the value of the
275: -- Retain Maually Added Lines flag. Also, added manual lines logic to the
276: -- UPDATE statement for pa_resource_assignments.
277:
278: IF P_PA_DEBUG_MODE = 'Y' THEN
279: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
280: P_CALLED_MODE => P_CALLED_MODE,
281: P_MSG => 'Before calling PA_FP_GEN_AMOUNT_UTILS.'||
282: 'GET_PLAN_VERSION_DTL',

Line 292: IF P_PA_DEBUG_MODE = 'Y' THEN

288: X_FP_COLS_REC => l_fp_cols_rec,
289: X_RETURN_STATUS => x_return_status,
290: X_MSG_COUNT => x_msg_count,
291: X_MSG_DATA => x_msg_data);
292: IF P_PA_DEBUG_MODE = 'Y' THEN
293: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
294: P_CALLED_MODE => P_CALLED_MODE,
295: P_MSG => 'After calling PA_FP_GEN_AMOUNT_UTILS.'||
296: 'GET_PLAN_VERSION_DTL:'||x_return_status,

Line 417: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN

413: bl.start_date)
414: AND rownum = 1 )));
415: END IF;
416:
417: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
418: PA_DEBUG.reset_err_stack;
419: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
420: PA_DEBUG.Reset_Curr_Function;
421: END IF;

Line 418: PA_DEBUG.reset_err_stack;

414: AND rownum = 1 )));
415: END IF;
416:
417: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
418: PA_DEBUG.reset_err_stack;
419: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
420: PA_DEBUG.Reset_Curr_Function;
421: END IF;
422: RETURN;

Line 419: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

415: END IF;
416:
417: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
418: PA_DEBUG.reset_err_stack;
419: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
420: PA_DEBUG.Reset_Curr_Function;
421: END IF;
422: RETURN;
423:

Line 420: PA_DEBUG.Reset_Curr_Function;

416:
417: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
418: PA_DEBUG.reset_err_stack;
419: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
420: PA_DEBUG.Reset_Curr_Function;
421: END IF;
422: RETURN;
423:
424: EXCEPTION

Line 443: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN

439: x_msg_count := l_msg_count;
440: END IF;
441: ROLLBACK;
442: x_return_status := FND_API.G_RET_STS_ERROR;
443: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
444: PA_DEBUG.reset_err_stack;
445: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
446: PA_DEBUG.Reset_Curr_Function;
447: END IF;

Line 444: PA_DEBUG.reset_err_stack;

440: END IF;
441: ROLLBACK;
442: x_return_status := FND_API.G_RET_STS_ERROR;
443: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
444: PA_DEBUG.reset_err_stack;
445: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
446: PA_DEBUG.Reset_Curr_Function;
447: END IF;
448:

Line 445: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

441: ROLLBACK;
442: x_return_status := FND_API.G_RET_STS_ERROR;
443: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
444: PA_DEBUG.reset_err_stack;
445: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
446: PA_DEBUG.Reset_Curr_Function;
447: END IF;
448:
449: WHEN OTHERS THEN

Line 446: PA_DEBUG.Reset_Curr_Function;

442: x_return_status := FND_API.G_RET_STS_ERROR;
443: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
444: PA_DEBUG.reset_err_stack;
445: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
446: PA_DEBUG.Reset_Curr_Function;
447: END IF;
448:
449: WHEN OTHERS THEN
450: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 458: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN

454: FND_MSG_PUB.add_exc_msg
455: ( p_pkg_name => 'PA_FP_GEN_PUB'
456: ,p_procedure_name => 'UPDATE_RES_DEFAULTS');
457:
458: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
459: PA_DEBUG.reset_err_stack;
460: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
461: PA_DEBUG.Reset_Curr_Function;
462: END IF;

Line 459: PA_DEBUG.reset_err_stack;

455: ( p_pkg_name => 'PA_FP_GEN_PUB'
456: ,p_procedure_name => 'UPDATE_RES_DEFAULTS');
457:
458: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
459: PA_DEBUG.reset_err_stack;
460: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
461: PA_DEBUG.Reset_Curr_Function;
462: END IF;
463: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 460: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

456: ,p_procedure_name => 'UPDATE_RES_DEFAULTS');
457:
458: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
459: PA_DEBUG.reset_err_stack;
460: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
461: PA_DEBUG.Reset_Curr_Function;
462: END IF;
463: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
464:

Line 461: PA_DEBUG.Reset_Curr_Function;

457:
458: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
459: PA_DEBUG.reset_err_stack;
460: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
461: PA_DEBUG.Reset_Curr_Function;
462: END IF;
463: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
464:
465: END UPDATE_RES_DEFAULTS;

Line 495: IF p_pa_debug_mode = 'Y' THEN

491: /* Setting initial values */
492: X_MSG_COUNT := 0;
493: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
494:
495: IF p_pa_debug_mode = 'Y' THEN
496: pa_debug.set_curr_function( p_function => 'INCLUDE_CHANGE_DOCUMENT_WRP'
497: ,p_debug_mode => p_pa_debug_mode);
498: END IF;
499:

Line 496: pa_debug.set_curr_function( p_function => 'INCLUDE_CHANGE_DOCUMENT_WRP'

492: X_MSG_COUNT := 0;
493: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
494:
495: IF p_pa_debug_mode = 'Y' THEN
496: pa_debug.set_curr_function( p_function => 'INCLUDE_CHANGE_DOCUMENT_WRP'
497: ,p_debug_mode => p_pa_debug_mode);
498: END IF;
499:
500: -- Bug 5845142

Line 497: ,p_debug_mode => p_pa_debug_mode);

493: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
494:
495: IF p_pa_debug_mode = 'Y' THEN
496: pa_debug.set_curr_function( p_function => 'INCLUDE_CHANGE_DOCUMENT_WRP'
497: ,p_debug_mode => p_pa_debug_mode);
498: END IF;
499:
500: -- Bug 5845142
501: IF Pa_Fp_Control_Items_Utils.check_valid_combo

Line 506: IF P_PA_DEBUG_MODE = 'Y' THEN

502: ( p_project_id => p_fp_cols_rec.x_project_id
503: ,p_targ_app_cost_flag => 'N'
504: ,p_targ_app_rev_flag => 'N') = 'N' THEN
505:
506: IF P_PA_DEBUG_MODE = 'Y' THEN
507: PA_DEBUG.Reset_Curr_Function;
508: END IF;
509: RETURN;
510:

Line 507: PA_DEBUG.Reset_Curr_Function;

503: ,p_targ_app_cost_flag => 'N'
504: ,p_targ_app_rev_flag => 'N') = 'N' THEN
505:
506: IF P_PA_DEBUG_MODE = 'Y' THEN
507: PA_DEBUG.Reset_Curr_Function;
508: END IF;
509: RETURN;
510:
511: END IF;

Line 564: IF p_pa_debug_mode = 'Y' THEN

560: AND pal.lookup_type = 'CONTROL_ITEM_SYSTEM_STATUS';
561: -- AND pfc.ci_type_id = pci.ci_type_id;
562:
563: IF l_ci_id_tbl.count = 0 THEN
564: IF p_pa_debug_mode = 'Y' THEN
565: pa_fp_gen_amount_utils.fp_debug
566: (p_msg => 'No CIs to implement. no rows returned from the view.Returning',
567: p_module_name => l_module_name,
568: p_log_level => 5);

Line 570: IF P_PA_DEBUG_MODE = 'Y' THEN

566: (p_msg => 'No CIs to implement. no rows returned from the view.Returning',
567: p_module_name => l_module_name,
568: p_log_level => 5);
569: END IF;
570: IF P_PA_DEBUG_MODE = 'Y' THEN
571: PA_DEBUG.Reset_Curr_Function;
572: END IF;
573: RETURN;
574: END IF;

Line 571: PA_DEBUG.Reset_Curr_Function;

567: p_module_name => l_module_name,
568: p_log_level => 5);
569: END IF;
570: IF P_PA_DEBUG_MODE = 'Y' THEN
571: PA_DEBUG.Reset_Curr_Function;
572: END IF;
573: RETURN;
574: END IF;
575: l_budget_version_id_tbl.extend;

Line 587: IF P_PA_DEBUG_MODE = 'Y' THEN

583:
584: /* Added PA_FP_MULTI_CURRENCY_PKG.CONVERT_TXN_CURRENCY and PA_FP_ROLLUP_PKG.ROLLUP_BUDGET_VERSION APIs
585: to include change orders. Bug 3985706 */
586:
587: IF P_PA_DEBUG_MODE = 'Y' THEN
588: pa_fp_gen_amount_utils.fp_debug
589: (p_msg => 'Before calling PA_FP_MULTI_CURRENCY_PKG.CONVERT_TXN_CURRENCY',
590: p_module_name => l_module_name,
591: p_log_level => 5);

Line 600: IF P_PA_DEBUG_MODE = 'Y' THEN

596: p_calling_module => 'BUDGET_GENERATION', -- Added for Bug#5395732
597: X_RETURN_STATUS => X_RETURN_STATUS,
598: X_MSG_COUNT => X_MSG_COUNT,
599: X_MSG_DATA => X_MSG_DATA);
600: IF P_PA_DEBUG_MODE = 'Y' THEN
601: pa_fp_gen_amount_utils.fp_debug
602: (p_msg => 'After calling PA_FP_MULTI_CURRENCY_PKG.CONVERT_TXN_CURRENCY,
603: ret status: '||x_return_status,
604: p_module_name => l_module_name,

Line 612: IF P_PA_DEBUG_MODE = 'Y' THEN

608: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
609: raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
610: END IF;
611:
612: IF P_PA_DEBUG_MODE = 'Y' THEN
613: pa_fp_gen_amount_utils.fp_debug
614: (p_msg => 'Before calling PA_FP_ROLLUP_PKG.ROLLUP_BUDGET_VERSION',
615: p_module_name => l_module_name,
616: p_log_level => 5);

Line 624: IF P_PA_DEBUG_MODE = 'Y' THEN

620: p_entire_version => 'Y',
621: X_RETURN_STATUS => X_RETURN_STATUS,
622: X_MSG_COUNT => X_MSG_COUNT,
623: X_MSG_DATA => X_MSG_DATA);
624: IF P_PA_DEBUG_MODE = 'Y' THEN
625: pa_fp_gen_amount_utils.fp_debug
626: (p_msg => 'After calling PA_FP_ROLLUP_PKG.ROLLUP_BUDGET_VERSION,
627: ret status: '||x_return_status,
628: p_module_name => l_module_name,

Line 636: IF p_pa_debug_mode = 'Y' THEN

632: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
633: END IF;
634:
635:
636: IF p_pa_debug_mode = 'Y' THEN
637: pa_fp_gen_amount_utils.fp_debug
638: (p_msg => 'Before calling
639: pa_fp_ci_merge.implement_change_document',
640: p_module_name => l_module_name,

Line 670: IF p_pa_debug_mode = 'Y' THEN

666: x_msg_count =>
667: x_msg_count,
668: x_msg_data =>
669: x_msg_data);
670: IF p_pa_debug_mode = 'Y' THEN
671: pa_fp_gen_amount_utils.fp_debug
672: (p_msg => 'Status after calling pa_fp_ci_merge.implement_change_document'
673: ||x_return_status,
674: p_module_name => l_module_name,

Line 682: IF P_PA_DEBUG_MODE = 'Y' THEN

678: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
679: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
680: END IF;
681:
682: IF P_PA_DEBUG_MODE = 'Y' THEN
683: PA_DEBUG.Reset_Curr_Function;
684: END IF;
685:
686:

Line 683: PA_DEBUG.Reset_Curr_Function;

679: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
680: END IF;
681:
682: IF P_PA_DEBUG_MODE = 'Y' THEN
683: PA_DEBUG.Reset_Curr_Function;
684: END IF;
685:
686:
687: EXCEPTION

Line 706: IF P_PA_DEBUG_MODE = 'Y' THEN

702: END IF;
703: ROLLBACK;
704: x_return_status := FND_API.G_RET_STS_ERROR;
705:
706: IF P_PA_DEBUG_MODE = 'Y' THEN
707: PA_DEBUG.Reset_Curr_Function;
708: END IF;
709: WHEN OTHERS THEN
710: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 707: PA_DEBUG.Reset_Curr_Function;

703: ROLLBACK;
704: x_return_status := FND_API.G_RET_STS_ERROR;
705:
706: IF P_PA_DEBUG_MODE = 'Y' THEN
707: PA_DEBUG.Reset_Curr_Function;
708: END IF;
709: WHEN OTHERS THEN
710: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
711: x_msg_data := SUBSTR(SQLERRM,1,240);

Line 715: IF P_PA_DEBUG_MODE = 'Y' THEN

711: x_msg_data := SUBSTR(SQLERRM,1,240);
712: FND_MSG_PUB.add_exc_msg
713: ( p_pkg_name => 'PA_FP_GEN_PUB'
714: ,p_procedure_name => 'INCLUDE_CHANGE_DOCUMENT_WRP');
715: IF P_PA_DEBUG_MODE = 'Y' THEN
716: PA_DEBUG.Reset_Curr_Function;
717: END IF;
718: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
719:

Line 716: PA_DEBUG.Reset_Curr_Function;

712: FND_MSG_PUB.add_exc_msg
713: ( p_pkg_name => 'PA_FP_GEN_PUB'
714: ,p_procedure_name => 'INCLUDE_CHANGE_DOCUMENT_WRP');
715: IF P_PA_DEBUG_MODE = 'Y' THEN
716: PA_DEBUG.Reset_Curr_Function;
717: END IF;
718: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
719:
720: END INCLUDE_CHANGE_DOCUMENT_WRP;

Line 849: IF p_pa_debug_mode = 'Y' THEN

845: /* Setting initial values */
846: X_MSG_COUNT := 0;
847: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
848:
849: IF p_pa_debug_mode = 'Y' THEN
850: pa_debug.set_curr_function( p_function => 'UNSPENT_AMOUNT'
851: ,p_debug_mode => p_pa_debug_mode);
852: END IF;
853:

Line 850: pa_debug.set_curr_function( p_function => 'UNSPENT_AMOUNT'

846: X_MSG_COUNT := 0;
847: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
848:
849: IF p_pa_debug_mode = 'Y' THEN
850: pa_debug.set_curr_function( p_function => 'UNSPENT_AMOUNT'
851: ,p_debug_mode => p_pa_debug_mode);
852: END IF;
853:
854: --dbms_output.put_line('p_app_cost_bdgt_ver_id = ' || p_app_cost_bdgt_ver_id);

Line 851: ,p_debug_mode => p_pa_debug_mode);

847: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
848:
849: IF p_pa_debug_mode = 'Y' THEN
850: pa_debug.set_curr_function( p_function => 'UNSPENT_AMOUNT'
851: ,p_debug_mode => p_pa_debug_mode);
852: END IF;
853:
854: --dbms_output.put_line('p_app_cost_bdgt_ver_id = ' || p_app_cost_bdgt_ver_id);
855:

Line 858: IF p_pa_debug_mode = 'Y' THEN

854: --dbms_output.put_line('p_app_cost_bdgt_ver_id = ' || p_app_cost_bdgt_ver_id);
855:
856: /* Calling the get_plan_version_dtls api
857: for the given app_cost_bdgt_ver_id*/
858: IF p_pa_debug_mode = 'Y' THEN
859: pa_fp_gen_amount_utils.fp_debug
860: (p_msg => 'Before calling
861: pa_fp_gen_amount_utils.get_plan_version_dtls',
862: p_module_name => l_module_name,

Line 875: IF p_pa_debug_mode = 'Y' THEN

871: X_MSG_DATA => X_MSG_DATA);
872: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
873: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
874: END IF;
875: IF p_pa_debug_mode = 'Y' THEN
876: pa_fp_gen_amount_utils.fp_debug
877: (p_msg => 'Status after calling
878: pa_fp_gen_amount_utils.get_plan_version_dtls'
879: ||x_return_status,

Line 890: IF P_PA_DEBUG_MODE = 'Y' THEN

886: resource list and the amounts will be
887: populated in the pa_fp_calc_amt_tmp3 table only
888: for the periods till the actual thru period */
889:
890: IF P_PA_DEBUG_MODE = 'Y' THEN
891: pa_fp_gen_amount_utils.fp_debug
892: (p_msg => 'Before calling
893: pa_fp_map_bv_pub.gen_map_bv_to_target_rl',
894: p_module_name => l_module_name,

Line 908: IF P_PA_DEBUG_MODE = 'Y' THEN

904: X_MSG_DATA => x_msg_data);
905: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
906: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
907: END IF;
908: IF P_PA_DEBUG_MODE = 'Y' THEN
909: pa_fp_gen_amount_utils.fp_debug
910: (p_msg => 'Status after calling
911: pa_fp_map_bv_pub.gen_map_bv_to_target_rl'
912: ||x_return_status,

Line 936: IF p_pa_debug_mode = 'Y' THEN

932: select count(*) into l_count from pa_res_list_map_tmp4 where rownum=1;
933: --dbms_output.put_line('Number of records inserted into tmp4 from tmp3 = ' || l_count);
934:
935: IF l_count = 0 THEN
936: IF p_pa_debug_mode = 'Y' THEN
937: PA_DEBUG.RESET_CURR_FUNCTION;
938: END IF;
939: RETURN;
940: END IF;

Line 937: PA_DEBUG.RESET_CURR_FUNCTION;

933: --dbms_output.put_line('Number of records inserted into tmp4 from tmp3 = ' || l_count);
934:
935: IF l_count = 0 THEN
936: IF p_pa_debug_mode = 'Y' THEN
937: PA_DEBUG.RESET_CURR_FUNCTION;
938: END IF;
939: RETURN;
940: END IF;
941:

Line 1016: IF p_pa_debug_mode = 'Y' THEN

1012: select count(*) into l_count from pa_res_list_map_tmp4 where rownum=1;
1013: --dbms_output.put_line('Number of target resources in tmp4 to be processed = ' || l_count);
1014:
1015: IF l_count = 0 THEN
1016: IF p_pa_debug_mode = 'Y' THEN
1017: PA_DEBUG.RESET_CURR_FUNCTION;
1018: END IF;
1019: RETURN;
1020: END IF;

Line 1017: PA_DEBUG.RESET_CURR_FUNCTION;

1013: --dbms_output.put_line('Number of target resources in tmp4 to be processed = ' || l_count);
1014:
1015: IF l_count = 0 THEN
1016: IF p_pa_debug_mode = 'Y' THEN
1017: PA_DEBUG.RESET_CURR_FUNCTION;
1018: END IF;
1019: RETURN;
1020: END IF;
1021:

Line 1406: IF p_pa_debug_mode = 'Y' THEN

1402: (nvl(quantity,0) + nvl(l_upd_quantity_tab(i),0))
1403: WHERE BUDGET_LINE_ID = l_upd_bl_id_tab(i);
1404: END IF;
1405:
1406: IF p_pa_debug_mode = 'Y' THEN
1407: pa_fp_gen_amount_utils.fp_debug
1408: (p_msg => 'Before calling
1409: pa_fp_maintain_actual_pub.sync_up_planning_dates',
1410: p_module_name => l_module_name,

Line 1419: IF p_pa_debug_mode = 'Y' THEN

1415: P_CALLING_CONTEXT => 'SYNC_VERSION_LEVEL',
1416: X_RETURN_STATUS => x_return_Status,
1417: X_MSG_COUNT => x_msg_count,
1418: X_MSG_DATA => x_msg_data );
1419: IF p_pa_debug_mode = 'Y' THEN
1420: pa_fp_gen_amount_utils.fp_debug
1421: (p_msg => 'Status after calling
1422: pa_fp_maintain_actual_pub.sync_up_planning_dates'
1423: ||x_return_status,

Line 1431: IF P_PA_DEBUG_MODE = 'Y' THEN

1427: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1428: raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
1429: END IF;
1430:
1431: IF P_PA_DEBUG_MODE = 'Y' THEN
1432: PA_DEBUG.RESET_CURR_FUNCTION;
1433: END IF;
1434:
1435: EXCEPTION

Line 1432: PA_DEBUG.RESET_CURR_FUNCTION;

1428: raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
1429: END IF;
1430:
1431: IF P_PA_DEBUG_MODE = 'Y' THEN
1432: PA_DEBUG.RESET_CURR_FUNCTION;
1433: END IF;
1434:
1435: EXCEPTION
1436: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 1455: IF p_pa_debug_mode = 'Y' THEN

1451:
1452: ROLLBACK;
1453: x_return_status := FND_API.G_RET_STS_ERROR;
1454:
1455: IF p_pa_debug_mode = 'Y' THEN
1456: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
1457: ( p_msg => 'Invalid Arguments Passed',
1458: p_module_name => l_module_name,
1459: p_log_level => 5 );

Line 1460: PA_DEBUG.RESET_CURR_FUNCTION;

1456: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
1457: ( p_msg => 'Invalid Arguments Passed',
1458: p_module_name => l_module_name,
1459: p_log_level => 5 );
1460: PA_DEBUG.RESET_CURR_FUNCTION;
1461: END IF;
1462: RAISE;
1463: WHEN OTHERS THEN
1464: ROLLBACK;

Line 1473: IF p_pa_debug_mode = 'Y' THEN

1469: ( p_pkg_name => 'PA_FP_GEN_PUB',
1470: p_procedure_name => 'UNSPENT_AMOUNT',
1471: p_error_text => substr(sqlerrm,1,240) );
1472:
1473: IF p_pa_debug_mode = 'Y' THEN
1474: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
1475: ( p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
1476: p_module_name => l_module_name,
1477: p_log_level => 5 );

Line 1478: PA_DEBUG.RESET_CURR_FUNCTION;

1474: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
1475: ( p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
1476: p_module_name => l_module_name,
1477: p_log_level => 5 );
1478: PA_DEBUG.RESET_CURR_FUNCTION;
1479: END IF;
1480: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1481:
1482: END UNSPENT_AMOUNT;

Line 1504: IF p_pa_debug_mode = 'Y' THEN

1500: /* Setting initial values */
1501: X_MSG_COUNT := 0;
1502: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1503:
1504: IF p_pa_debug_mode = 'Y' THEN
1505: pa_debug.set_curr_function( p_function => 'UPD_WBS_ELEMENT_VERSION_ID'
1506: ,p_debug_mode => p_pa_debug_mode);
1507: END IF;
1508:

Line 1505: pa_debug.set_curr_function( p_function => 'UPD_WBS_ELEMENT_VERSION_ID'

1501: X_MSG_COUNT := 0;
1502: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1503:
1504: IF p_pa_debug_mode = 'Y' THEN
1505: pa_debug.set_curr_function( p_function => 'UPD_WBS_ELEMENT_VERSION_ID'
1506: ,p_debug_mode => p_pa_debug_mode);
1507: END IF;
1508:
1509:

Line 1506: ,p_debug_mode => p_pa_debug_mode);

1502: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1503:
1504: IF p_pa_debug_mode = 'Y' THEN
1505: pa_debug.set_curr_function( p_function => 'UPD_WBS_ELEMENT_VERSION_ID'
1506: ,p_debug_mode => p_pa_debug_mode);
1507: END IF;
1508:
1509:
1510:

Line 1519: IF P_PA_DEBUG_MODE = 'Y' THEN

1515: FROM pa_budget_versions
1516: WHERE budget_version_id = p_budget_version_id;
1517:
1518: IF l_wp_version_flag = 'N' THEN
1519: IF P_PA_DEBUG_MODE = 'Y' THEN
1520: PA_DEBUG.Reset_Curr_Function;
1521: END IF;
1522: RETURN;
1523: END IF;

Line 1520: PA_DEBUG.Reset_Curr_Function;

1516: WHERE budget_version_id = p_budget_version_id;
1517:
1518: IF l_wp_version_flag = 'N' THEN
1519: IF P_PA_DEBUG_MODE = 'Y' THEN
1520: PA_DEBUG.Reset_Curr_Function;
1521: END IF;
1522: RETURN;
1523: END IF;
1524:

Line 1537: IF P_PA_DEBUG_MODE = 'Y' THEN

1533: WHERE ra.budget_version_id = p_budget_version_id
1534: AND nvl(ra.task_id,0) > 0;
1535:
1536: IF l_task_id_tab.count = 0 THEN
1537: IF P_PA_DEBUG_MODE = 'Y' THEN
1538: PA_DEBUG.Reset_Curr_Function;
1539: END IF;
1540: RETURN;
1541: END IF;

Line 1538: PA_DEBUG.Reset_Curr_Function;

1534: AND nvl(ra.task_id,0) > 0;
1535:
1536: IF l_task_id_tab.count = 0 THEN
1537: IF P_PA_DEBUG_MODE = 'Y' THEN
1538: PA_DEBUG.Reset_Curr_Function;
1539: END IF;
1540: RETURN;
1541: END IF;
1542:

Line 1549: IF P_PA_DEBUG_MODE = 'Y' THEN

1545: SET wbs_element_version_id = l_wbs_element_ver_id_tab(i)
1546: WHERE budget_version_id = p_budget_version_id
1547: AND task_id = l_task_id_tab(i);
1548:
1549: IF P_PA_DEBUG_MODE = 'Y' THEN
1550: PA_DEBUG.Reset_Curr_Function;
1551: END IF;
1552:
1553: EXCEPTION

Line 1550: PA_DEBUG.Reset_Curr_Function;

1546: WHERE budget_version_id = p_budget_version_id
1547: AND task_id = l_task_id_tab(i);
1548:
1549: IF P_PA_DEBUG_MODE = 'Y' THEN
1550: PA_DEBUG.Reset_Curr_Function;
1551: END IF;
1552:
1553: EXCEPTION
1554: WHEN OTHERS THEN

Line 1560: IF P_PA_DEBUG_MODE = 'Y' THEN

1556: x_msg_data := SUBSTR(SQLERRM,1,240);
1557: FND_MSG_PUB.add_exc_msg
1558: ( p_pkg_name => 'PA_FP_GEN_PUB'
1559: ,p_procedure_name => 'UPD_WBS_ELEMENT_VERSION_ID');
1560: IF P_PA_DEBUG_MODE = 'Y' THEN
1561: PA_DEBUG.Reset_Curr_Function;
1562: END IF;
1563: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1564:

Line 1561: PA_DEBUG.Reset_Curr_Function;

1557: FND_MSG_PUB.add_exc_msg
1558: ( p_pkg_name => 'PA_FP_GEN_PUB'
1559: ,p_procedure_name => 'UPD_WBS_ELEMENT_VERSION_ID');
1560: IF P_PA_DEBUG_MODE = 'Y' THEN
1561: PA_DEBUG.Reset_Curr_Function;
1562: END IF;
1563: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1564:
1565: END UPD_WBS_ELEMENT_VERSION_ID;

Line 1636: IF P_PA_DEBUG_MODE = 'Y' THEN

1632:
1633: l_source_bv_id pa_budget_lines.budget_version_id%TYPE;
1634: BEGIN
1635:
1636: IF P_PA_DEBUG_MODE = 'Y' THEN
1637: pa_debug.set_curr_function( p_function => 'PRORATE_UNALIGNED_PERIOD_AMTS',
1638: p_debug_mode => p_pa_debug_mode );
1639: END IF;
1640:

Line 1637: pa_debug.set_curr_function( p_function => 'PRORATE_UNALIGNED_PERIOD_AMTS',

1633: l_source_bv_id pa_budget_lines.budget_version_id%TYPE;
1634: BEGIN
1635:
1636: IF P_PA_DEBUG_MODE = 'Y' THEN
1637: pa_debug.set_curr_function( p_function => 'PRORATE_UNALIGNED_PERIOD_AMTS',
1638: p_debug_mode => p_pa_debug_mode );
1639: END IF;
1640:
1641: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1638: p_debug_mode => p_pa_debug_mode );

1634: BEGIN
1635:
1636: IF P_PA_DEBUG_MODE = 'Y' THEN
1637: pa_debug.set_curr_function( p_function => 'PRORATE_UNALIGNED_PERIOD_AMTS',
1638: p_debug_mode => p_pa_debug_mode );
1639: END IF;
1640:
1641: x_return_status := FND_API.G_RET_STS_SUCCESS;
1642: /* Business Rules check */

Line 1657: IF P_PA_DEBUG_MODE = 'Y' THEN

1653: x_proj_burdened_cost := NULL;
1654: x_proj_revenue := NULL;
1655:
1656: IF p_src_res_asg_id_tab.count = 0 THEN
1657: IF P_PA_DEBUG_MODE = 'Y' THEN
1658: PA_DEBUG.RESET_CURR_FUNCTION;
1659: END IF;
1660: RETURN;
1661: END IF;

Line 1658: PA_DEBUG.RESET_CURR_FUNCTION;

1654: x_proj_revenue := NULL;
1655:
1656: IF p_src_res_asg_id_tab.count = 0 THEN
1657: IF P_PA_DEBUG_MODE = 'Y' THEN
1658: PA_DEBUG.RESET_CURR_FUNCTION;
1659: END IF;
1660: RETURN;
1661: END IF;
1662:

Line 1702: IF P_PA_DEBUG_MODE = 'Y' THEN

1698: l_source_start_date,
1699: l_source_end_date;
1700: CLOSE gl_period_csr;
1701: ELSE
1702: IF P_PA_DEBUG_MODE = 'Y' THEN
1703: PA_DEBUG.RESET_CURR_FUNCTION;
1704: END IF;
1705: RETURN;
1706: END IF;

Line 1703: PA_DEBUG.RESET_CURR_FUNCTION;

1699: l_source_end_date;
1700: CLOSE gl_period_csr;
1701: ELSE
1702: IF P_PA_DEBUG_MODE = 'Y' THEN
1703: PA_DEBUG.RESET_CURR_FUNCTION;
1704: END IF;
1705: RETURN;
1706: END IF;
1707:

Line 1712: IF P_PA_DEBUG_MODE = 'Y' THEN

1708: l_prorated_multiplier := (l_source_end_date - p_actual_thru_date) /
1709: (l_source_end_date - l_source_start_date + 1);
1710:
1711: IF l_prorated_multiplier = 0 THEN
1712: IF P_PA_DEBUG_MODE = 'Y' THEN
1713: PA_DEBUG.RESET_CURR_FUNCTION;
1714: END IF;
1715: RETURN;
1716: END IF;

Line 1713: PA_DEBUG.RESET_CURR_FUNCTION;

1709: (l_source_end_date - l_source_start_date + 1);
1710:
1711: IF l_prorated_multiplier = 0 THEN
1712: IF P_PA_DEBUG_MODE = 'Y' THEN
1713: PA_DEBUG.RESET_CURR_FUNCTION;
1714: END IF;
1715: RETURN;
1716: END IF;
1717:

Line 1860: IF p_pa_debug_mode = 'Y' THEN

1856: BEGIN
1857: x_return_status := FND_API.G_RET_STS_SUCCESS;
1858: x_msg_count := 0;
1859:
1860: IF p_pa_debug_mode = 'Y' THEN
1861: PA_DEBUG.SET_CURR_FUNCTION
1862: ( p_function => 'MAINTAIN_FIXED_DATE_SP',
1863: p_debug_mode => p_pa_debug_mode );
1864: END IF;

Line 1861: PA_DEBUG.SET_CURR_FUNCTION

1857: x_return_status := FND_API.G_RET_STS_SUCCESS;
1858: x_msg_count := 0;
1859:
1860: IF p_pa_debug_mode = 'Y' THEN
1861: PA_DEBUG.SET_CURR_FUNCTION
1862: ( p_function => 'MAINTAIN_FIXED_DATE_SP',
1863: p_debug_mode => p_pa_debug_mode );
1864: END IF;
1865:

Line 1863: p_debug_mode => p_pa_debug_mode );

1859:
1860: IF p_pa_debug_mode = 'Y' THEN
1861: PA_DEBUG.SET_CURR_FUNCTION
1862: ( p_function => 'MAINTAIN_FIXED_DATE_SP',
1863: p_debug_mode => p_pa_debug_mode );
1864: END IF;
1865:
1866: /* Check the input parameter(s) */
1867: IF p_budget_version_id IS NULL THEN

Line 1933: IF p_pa_debug_mode = 'Y' THEN

1929: WHERE budget_version_id = p_budget_version_id
1930: AND spread_curve_id <> l_fixed_date_id
1931: AND sp_fixed_date IS NOT NULL;
1932:
1933: IF p_pa_debug_mode = 'Y' THEN
1934: PA_DEBUG.RESET_CURR_FUNCTION;
1935: END IF;
1936: EXCEPTION
1937: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 1934: PA_DEBUG.RESET_CURR_FUNCTION;

1930: AND spread_curve_id <> l_fixed_date_id
1931: AND sp_fixed_date IS NOT NULL;
1932:
1933: IF p_pa_debug_mode = 'Y' THEN
1934: PA_DEBUG.RESET_CURR_FUNCTION;
1935: END IF;
1936: EXCEPTION
1937: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
1938: l_msg_count := FND_MSG_PUB.count_msg;

Line 1956: IF p_pa_debug_mode = 'Y' THEN

1952:
1953: ROLLBACK;
1954: x_return_status := FND_API.G_RET_STS_ERROR;
1955:
1956: IF p_pa_debug_mode = 'Y' THEN
1957: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
1958: ( p_msg => 'Invalid Arguments Passed',
1959: p_module_name => l_module_name,
1960: p_log_level => 5 );

Line 1961: PA_DEBUG.RESET_CURR_FUNCTION;

1957: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
1958: ( p_msg => 'Invalid Arguments Passed',
1959: p_module_name => l_module_name,
1960: p_log_level => 5 );
1961: PA_DEBUG.RESET_CURR_FUNCTION;
1962: END IF;
1963: RAISE;
1964: WHEN OTHERS THEN
1965: ROLLBACK;

Line 1974: IF p_pa_debug_mode = 'Y' THEN

1970: ( p_pkg_name => 'PA_FP_GEN_PUB',
1971: p_procedure_name => 'MAINTAIN_FIXED_DATE_SP',
1972: p_error_text => substr(sqlerrm,1,240) );
1973:
1974: IF p_pa_debug_mode = 'Y' THEN
1975: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
1976: ( p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
1977: p_module_name => l_module_name,
1978: p_log_level => 5 );

Line 1979: PA_DEBUG.RESET_CURR_FUNCTION;

1975: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
1976: ( p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
1977: p_module_name => l_module_name,
1978: p_log_level => 5 );
1979: PA_DEBUG.RESET_CURR_FUNCTION;
1980: END IF;
1981: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1982:
1983: END MAINTAIN_FIXED_DATE_SP;

Line 2072: IF p_pa_debug_mode = 'Y' THEN

2068: BEGIN
2069: x_return_status := FND_API.G_RET_STS_SUCCESS;
2070: x_msg_count := 0;
2071:
2072: IF p_pa_debug_mode = 'Y' THEN
2073: PA_DEBUG.SET_CURR_FUNCTION
2074: ( p_function => 'COPY_SRC_ATTRS_TO_TARGET_FCST',
2075: p_debug_mode => p_pa_debug_mode );
2076: END IF;

Line 2073: PA_DEBUG.SET_CURR_FUNCTION

2069: x_return_status := FND_API.G_RET_STS_SUCCESS;
2070: x_msg_count := 0;
2071:
2072: IF p_pa_debug_mode = 'Y' THEN
2073: PA_DEBUG.SET_CURR_FUNCTION
2074: ( p_function => 'COPY_SRC_ATTRS_TO_TARGET_FCST',
2075: p_debug_mode => p_pa_debug_mode );
2076: END IF;
2077:

Line 2075: p_debug_mode => p_pa_debug_mode );

2071:
2072: IF p_pa_debug_mode = 'Y' THEN
2073: PA_DEBUG.SET_CURR_FUNCTION
2074: ( p_function => 'COPY_SRC_ATTRS_TO_TARGET_FCST',
2075: p_debug_mode => p_pa_debug_mode );
2076: END IF;
2077:
2078: /* Enforce that p_fp_cols_rec has valid id values. */
2079: IF p_fp_cols_rec.x_project_id IS NULL OR

Line 2093: IF p_pa_debug_mode = 'Y' THEN

2089: ( p_project_id => p_fp_cols_rec.x_project_id );
2090: IF l_stru_sharing_code <> 'SHARE_FULL' OR
2091: ( p_fp_cols_rec.x_gen_src_wp_version_id IS NULL AND
2092: p_fp_cols_rec.x_gen_src_plan_version_id IS NULL ) THEN
2093: IF p_pa_debug_mode = 'Y' THEN
2094: PA_DEBUG.RESET_CURR_FUNCTION;
2095: END IF;
2096: RETURN;
2097: END IF;

Line 2094: PA_DEBUG.RESET_CURR_FUNCTION;

2090: IF l_stru_sharing_code <> 'SHARE_FULL' OR
2091: ( p_fp_cols_rec.x_gen_src_wp_version_id IS NULL AND
2092: p_fp_cols_rec.x_gen_src_plan_version_id IS NULL ) THEN
2093: IF p_pa_debug_mode = 'Y' THEN
2094: PA_DEBUG.RESET_CURR_FUNCTION;
2095: END IF;
2096: RETURN;
2097: END IF;
2098:

Line 2110: IF p_pa_debug_mode = 'Y' THEN

2106: l_src_version_id := l_src_version_id_tab(i);
2107: IF l_src_version_id IS NOT NULL THEN
2108: --dbms_output.put_line('l_src_version_id = ' || l_src_version_id);
2109: /* CAll API to get Source data into l_fp_cols_rec_src */
2110: IF p_pa_debug_mode = 'Y' THEN
2111: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
2112: ( p_msg => 'Before calling PA_FP_GEN_AMOUNT_UTILS.' ||
2113: 'GET_PLAN_VERSION_DTLS',
2114: p_module_name => l_module_name,

Line 2124: IF p_pa_debug_mode = 'Y' THEN

2120: x_fp_cols_rec => l_fp_cols_rec_src,
2121: x_return_status => x_return_status,
2122: x_msg_count => x_msg_count,
2123: x_msg_data => x_msg_data );
2124: IF p_pa_debug_mode = 'Y' THEN
2125: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
2126: ( p_msg => 'Status after calling PA_FP_GEN_AMOUNT_UTILS.' ||
2127: 'GET_PLAN_VERSION_DTLS: ' ||
2128: x_return_status,

Line 2260: IF p_pa_debug_mode = 'Y' THEN

2256: END IF; -- copy attributes logic
2257: END IF; -- src id not null
2258: END LOOP;
2259:
2260: IF p_pa_debug_mode = 'Y' THEN
2261: PA_DEBUG.RESET_CURR_FUNCTION;
2262: END IF;
2263: EXCEPTION
2264: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 2261: PA_DEBUG.RESET_CURR_FUNCTION;

2257: END IF; -- src id not null
2258: END LOOP;
2259:
2260: IF p_pa_debug_mode = 'Y' THEN
2261: PA_DEBUG.RESET_CURR_FUNCTION;
2262: END IF;
2263: EXCEPTION
2264: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
2265: l_msg_count := FND_MSG_PUB.count_msg;

Line 2283: IF p_pa_debug_mode = 'Y' THEN

2279:
2280: ROLLBACK;
2281: x_return_status := FND_API.G_RET_STS_ERROR;
2282:
2283: IF p_pa_debug_mode = 'Y' THEN
2284: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
2285: ( p_msg => 'Invalid Arguments Passed',
2286: p_module_name => l_module_name,
2287: p_log_level => 5 );

Line 2288: PA_DEBUG.RESET_CURR_FUNCTION;

2284: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
2285: ( p_msg => 'Invalid Arguments Passed',
2286: p_module_name => l_module_name,
2287: p_log_level => 5 );
2288: PA_DEBUG.RESET_CURR_FUNCTION;
2289: END IF;
2290: RAISE;
2291: WHEN OTHERS THEN
2292: ROLLBACK;

Line 2301: IF p_pa_debug_mode = 'Y' THEN

2297: ( p_pkg_name => 'PA_FP_GEN_PUB',
2298: p_procedure_name => 'COPY_SRC_ATTRS_TO_TARGET_FCST',
2299: p_error_text => substr(sqlerrm,1,240) );
2300:
2301: IF p_pa_debug_mode = 'Y' THEN
2302: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
2303: ( p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
2304: p_module_name => l_module_name,
2305: p_log_level => 5 );

Line 2306: PA_DEBUG.RESET_CURR_FUNCTION;

2302: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
2303: ( p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
2304: p_module_name => l_module_name,
2305: p_log_level => 5 );
2306: PA_DEBUG.RESET_CURR_FUNCTION;
2307: END IF;
2308: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2309:
2310: END COPY_SRC_ATTRS_TO_TARGET_FCST;