DBA Data[Home] [Help]

APPS.PA_FP_GEN_FCST_AMT_PUB4 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_PUB4 as
2: /* $Header: PAFPFG4B.pls 120.5 2007/02/06 09:51:54 dthakker ship $ */
3:
4: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
5:
6: PROCEDURE GET_ETC_BDGT_COMPLETE_AMTS (
7: P_SRC_RES_ASG_ID IN PA_RESOURCE_ASSIGNMENTS.RESOURCE_ASSIGNMENT_ID%TYPE,
8: P_TGT_RES_ASG_ID IN PA_RESOURCE_ASSIGNMENTS.RESOURCE_ASSIGNMENT_ID%TYPE,

Line 77: IF p_pa_debug_mode = 'Y' THEN

73: l_data VARCHAR2(2000);
74: l_msg_index_out NUMBER:=0;
75:
76: BEGIN
77: IF p_pa_debug_mode = 'Y' THEN
78: pa_debug.set_curr_function( p_function => 'GEN_ETC_BDGT_COMPLETE_AMTS',
79: p_debug_mode=> p_pa_debug_mode);
80: END IF;
81: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

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

74: l_msg_index_out NUMBER:=0;
75:
76: BEGIN
77: IF p_pa_debug_mode = 'Y' THEN
78: pa_debug.set_curr_function( p_function => 'GEN_ETC_BDGT_COMPLETE_AMTS',
79: p_debug_mode=> p_pa_debug_mode);
80: END IF;
81: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
82: X_MSG_COUNT := 0;

Line 79: p_debug_mode=> p_pa_debug_mode);

75:
76: BEGIN
77: IF p_pa_debug_mode = 'Y' THEN
78: pa_debug.set_curr_function( p_function => 'GEN_ETC_BDGT_COMPLETE_AMTS',
79: p_debug_mode=> p_pa_debug_mode);
80: END IF;
81: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
82: X_MSG_COUNT := 0;
83:

Line 105: IF P_PA_DEBUG_MODE = 'Y' THEN

101: l_structure_status := 'WORKING';
102: END IF;
103: END IF;
104:
105: IF P_PA_DEBUG_MODE = 'Y' THEN
106: pa_fp_gen_amount_utils.fp_debug
107: (p_msg => 'Before calling PA_PROGRESS_UTILS.REDEFAULT_BASE_PC',
108: p_module_name => l_module_name,
109: p_log_level => 5);

Line 124: IF P_PA_DEBUG_MODE = 'Y' THEN

120: X_base_percent_complete => lx_percent_complete,
121: x_return_status => x_return_status,
122: x_msg_count => x_msg_count,
123: x_msg_data => x_msg_data );
124: IF P_PA_DEBUG_MODE = 'Y' THEN
125: pa_fp_gen_amount_utils.fp_debug
126: (p_msg => 'After calling PA_PROGRESS_UTILS.REDEFAULT_BASE_PC,
127: return status is:'||x_return_status,
128: p_module_name => l_module_name,

Line 137: IF P_PA_DEBUG_MODE = 'Y' THEN

133: END IF;
134:
135: l_percent_complete := NVL(lx_percent_complete,0)/100;
136: IF (l_percent_complete = 1) THEN
137: IF P_PA_DEBUG_MODE = 'Y' THEN
138: PA_DEBUG.RESET_CURR_FUNCTION;
139: END IF;
140: RETURN;
141: END IF;

Line 138: PA_DEBUG.RESET_CURR_FUNCTION;

134:
135: l_percent_complete := NVL(lx_percent_complete,0)/100;
136: IF (l_percent_complete = 1) THEN
137: IF P_PA_DEBUG_MODE = 'Y' THEN
138: PA_DEBUG.RESET_CURR_FUNCTION;
139: END IF;
140: RETURN;
141: END IF;
142:

Line 331: IF P_PA_DEBUG_MODE = 'Y' THEN

327: l_etc_quantity_tab(i) * l_pfc_brdn_cost_rate_tab(i),
328: l_etc_quantity_tab(i) * l_pfc_revenue_rate_tab(i),
329: l_transaction_source_code );
330:
331: IF P_PA_DEBUG_MODE = 'Y' THEN
332: PA_DEBUG.RESET_CURR_FUNCTION;
333: END IF;
334: EXCEPTION
335: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 332: PA_DEBUG.RESET_CURR_FUNCTION;

328: l_etc_quantity_tab(i) * l_pfc_revenue_rate_tab(i),
329: l_transaction_source_code );
330:
331: IF P_PA_DEBUG_MODE = 'Y' THEN
332: PA_DEBUG.RESET_CURR_FUNCTION;
333: END IF;
334: EXCEPTION
335: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
336: l_msg_count := FND_MSG_PUB.count_msg;

Line 354: IF P_PA_DEBUG_MODE = 'Y' THEN

350:
351: ROLLBACK;
352: x_return_status := FND_API.G_RET_STS_ERROR;
353:
354: IF P_PA_DEBUG_MODE = 'Y' THEN
355: pa_fp_gen_amount_utils.fp_debug
356: (p_msg => 'Invalid Arguments Passed',
357: p_module_name => l_module_name,
358: p_log_level => 5);

Line 359: PA_DEBUG.RESET_CURR_FUNCTION;

355: pa_fp_gen_amount_utils.fp_debug
356: (p_msg => 'Invalid Arguments Passed',
357: p_module_name => l_module_name,
358: p_log_level => 5);
359: PA_DEBUG.RESET_CURR_FUNCTION;
360: END IF;
361: RAISE;
362: WHEN OTHERS THEN
363: rollback;

Line 373: IF P_PA_DEBUG_MODE = 'Y' THEN

369: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB4',
370: p_procedure_name => 'GEN_ETC_BDGT_COMPLETE_AMTS',
371: p_error_text => substr(sqlerrm,1,240));
372:
373: IF P_PA_DEBUG_MODE = 'Y' THEN
374: pa_fp_gen_amount_utils.fp_debug
375: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
376: p_module_name => l_module_name,
377: p_log_level => 5);

Line 378: PA_DEBUG.RESET_CURR_FUNCTION;

374: pa_fp_gen_amount_utils.fp_debug
375: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
376: p_module_name => l_module_name,
377: p_log_level => 5);
378: PA_DEBUG.RESET_CURR_FUNCTION;
379: END IF;
380: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
381: END GET_ETC_BDGT_COMPLETE_AMTS;
382:

Line 475: IF p_pa_debug_mode = 'Y' THEN

471: l_data VARCHAR2(2000);
472: l_msg_index_out NUMBER:=0;
473:
474: BEGIN
475: IF p_pa_debug_mode = 'Y' THEN
476: pa_debug.set_curr_function( p_function => 'GEN_ETC_BDGT_COMPLETE_AMTS_BLK',
477: p_debug_mode=> p_pa_debug_mode);
478: END IF;
479: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

Line 476: pa_debug.set_curr_function( p_function => 'GEN_ETC_BDGT_COMPLETE_AMTS_BLK',

472: l_msg_index_out NUMBER:=0;
473:
474: BEGIN
475: IF p_pa_debug_mode = 'Y' THEN
476: pa_debug.set_curr_function( p_function => 'GEN_ETC_BDGT_COMPLETE_AMTS_BLK',
477: p_debug_mode=> p_pa_debug_mode);
478: END IF;
479: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
480: X_MSG_COUNT := 0;

Line 477: p_debug_mode=> p_pa_debug_mode);

473:
474: BEGIN
475: IF p_pa_debug_mode = 'Y' THEN
476: pa_debug.set_curr_function( p_function => 'GEN_ETC_BDGT_COMPLETE_AMTS_BLK',
477: p_debug_mode=> p_pa_debug_mode);
478: END IF;
479: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
480: X_MSG_COUNT := 0;
481:

Line 536: IF P_PA_DEBUG_MODE = 'Y' THEN

532: l_structure_status := 'WORKING';
533: END IF;
534: END IF;
535:
536: IF P_PA_DEBUG_MODE = 'Y' THEN
537: pa_fp_gen_amount_utils.fp_debug
538: (p_msg => 'Before calling PA_PROGRESS_UTILS.REDEFAULT_BASE_PC',
539: p_module_name => l_module_name,
540: p_log_level => 5);

Line 555: IF P_PA_DEBUG_MODE = 'Y' THEN

551: X_base_percent_complete => lx_percent_complete,
552: x_return_status => x_return_status,
553: x_msg_count => x_msg_count,
554: x_msg_data => x_msg_data );
555: IF P_PA_DEBUG_MODE = 'Y' THEN
556: pa_fp_gen_amount_utils.fp_debug
557: (p_msg => 'After calling PA_PROGRESS_UTILS.REDEFAULT_BASE_PC,
558: return status is:'||x_return_status,
559: p_module_name => l_module_name,

Line 827: IF P_PA_DEBUG_MODE = 'Y' THEN

823: l_blk_etc_pfc_rcost_tab(i),
824: l_blk_etc_pfc_bcost_tab(i),
825: l_blk_etc_pfc_revenue_tab(i),
826: l_transaction_source_code );
827: IF P_PA_DEBUG_MODE = 'Y' THEN
828: PA_DEBUG.RESET_CURR_FUNCTION;
829: END IF;
830: EXCEPTION
831: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 828: PA_DEBUG.RESET_CURR_FUNCTION;

824: l_blk_etc_pfc_bcost_tab(i),
825: l_blk_etc_pfc_revenue_tab(i),
826: l_transaction_source_code );
827: IF P_PA_DEBUG_MODE = 'Y' THEN
828: PA_DEBUG.RESET_CURR_FUNCTION;
829: END IF;
830: EXCEPTION
831: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
832: l_msg_count := FND_MSG_PUB.count_msg;

Line 850: IF P_PA_DEBUG_MODE = 'Y' THEN

846:
847: ROLLBACK;
848: x_return_status := FND_API.G_RET_STS_ERROR;
849:
850: IF P_PA_DEBUG_MODE = 'Y' THEN
851: pa_fp_gen_amount_utils.fp_debug
852: (p_msg => 'Invalid Arguments Passed',
853: p_module_name => l_module_name,
854: p_log_level => 5);

Line 855: PA_DEBUG.RESET_CURR_FUNCTION;

851: pa_fp_gen_amount_utils.fp_debug
852: (p_msg => 'Invalid Arguments Passed',
853: p_module_name => l_module_name,
854: p_log_level => 5);
855: PA_DEBUG.RESET_CURR_FUNCTION;
856: END IF;
857: RAISE;
858: WHEN OTHERS THEN
859: rollback;

Line 869: IF P_PA_DEBUG_MODE = 'Y' THEN

865: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB4',
866: p_procedure_name => 'GEN_ETC_BDGT_COMPLETE_AMTS_BLK',
867: p_error_text => substr(sqlerrm,1,240));
868:
869: IF P_PA_DEBUG_MODE = 'Y' THEN
870: pa_fp_gen_amount_utils.fp_debug
871: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
872: p_module_name => l_module_name,
873: p_log_level => 5);

Line 874: PA_DEBUG.RESET_CURR_FUNCTION;

870: pa_fp_gen_amount_utils.fp_debug
871: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
872: p_module_name => l_module_name,
873: p_log_level => 5);
874: PA_DEBUG.RESET_CURR_FUNCTION;
875: END IF;
876: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
877: END GET_ETC_BDGT_COMPLETE_AMTS_BLK;
878: