DBA Data[Home] [Help]

APPS.PA_FP_FCST_GEN_AMT_UTILS 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_FCST_GEN_AMT_UTILS as
2: /* $Header: PAFPGFUB.pls 120.5 2011/09/23 05:40:37 smijosep ship $ */
3:
4: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
5:
6: /**
7: * This procedure verifies that the following attributes match for the specified
8: * Source plan version(s) and Target plan version:

Line 66: IF p_pa_debug_mode = 'Y' THEN

62: BEGIN
63: x_return_status := FND_API.G_RET_STS_SUCCESS;
64: x_msg_count := 0;
65:
66: IF p_pa_debug_mode = 'Y' THEN
67: PA_DEBUG.SET_CURR_FUNCTION( p_function => 'COMPARE_ETC_SRC_TARGET_FP_OPT',
68: p_debug_mode => p_pa_debug_mode );
69: END IF;
70:

Line 67: PA_DEBUG.SET_CURR_FUNCTION( p_function => 'COMPARE_ETC_SRC_TARGET_FP_OPT',

63: x_return_status := FND_API.G_RET_STS_SUCCESS;
64: x_msg_count := 0;
65:
66: IF p_pa_debug_mode = 'Y' THEN
67: PA_DEBUG.SET_CURR_FUNCTION( p_function => 'COMPARE_ETC_SRC_TARGET_FP_OPT',
68: p_debug_mode => p_pa_debug_mode );
69: END IF;
70:
71: /* Initialize the planning option flag */

Line 68: p_debug_mode => p_pa_debug_mode );

64: x_msg_count := 0;
65:
66: IF p_pa_debug_mode = 'Y' THEN
67: PA_DEBUG.SET_CURR_FUNCTION( p_function => 'COMPARE_ETC_SRC_TARGET_FP_OPT',
68: p_debug_mode => p_pa_debug_mode );
69: END IF;
70:
71: /* Initialize the planning option flag */
72: x_same_planning_option_flag := 'N';

Line 91: IF p_pa_debug_mode = 'Y' THEN

87: l_stru_sharing_code :=
88: PA_PROJECT_STRUCTURE_UTILS.GET_STRUCTURE_SHARING_CODE( p_project_id => p_project_id );
89: IF (p_wp_src_plan_ver_id IS NULL AND p_fp_src_plan_ver_id IS NULL) OR
90: (p_wp_src_plan_ver_id IS NOT NULL AND l_stru_sharing_code <> 'SHARE_FULL') THEN
91: IF p_pa_debug_mode = 'Y' THEN
92: PA_DEBUG.RESET_CURR_FUNCTION;
93: END IF;
94: RETURN;
95: END IF;

Line 92: PA_DEBUG.RESET_CURR_FUNCTION;

88: PA_PROJECT_STRUCTURE_UTILS.GET_STRUCTURE_SHARING_CODE( p_project_id => p_project_id );
89: IF (p_wp_src_plan_ver_id IS NULL AND p_fp_src_plan_ver_id IS NULL) OR
90: (p_wp_src_plan_ver_id IS NOT NULL AND l_stru_sharing_code <> 'SHARE_FULL') THEN
91: IF p_pa_debug_mode = 'Y' THEN
92: PA_DEBUG.RESET_CURR_FUNCTION;
93: END IF;
94: RETURN;
95: END IF;
96:

Line 98: IF p_pa_debug_mode = 'Y' THEN

94: RETURN;
95: END IF;
96:
97: /* CAll API to get Target data into l_fp_cols_rec_target. */
98: IF p_pa_debug_mode = 'Y' THEN
99: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
100: ( p_msg => 'Before calling PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DTLS',
101: p_module_name => l_module_name,
102: p_log_level => l_log_level );

Line 110: IF p_pa_debug_mode = 'Y' THEN

106: x_fp_cols_rec => l_fp_cols_rec_target,
107: x_return_status => x_return_status,
108: x_msg_count => x_msg_count,
109: x_msg_data => x_msg_data );
110: IF p_pa_debug_mode = 'Y' THEN
111: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
112: ( p_msg => 'Status after calling
113: PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DTLS: '
114: || x_return_status,

Line 129: IF p_pa_debug_mode = 'Y' THEN

125: /* Check Source workplan attributes against Target plan */
126: IF p_wp_src_plan_ver_id IS NOT NULL THEN
127:
128: /* CAll API to get Source data into l_fp_cols_rec_src */
129: IF p_pa_debug_mode = 'Y' THEN
130: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
131: ( p_msg => 'Before calling PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DTLS',
132: p_module_name => l_module_name,
133: p_log_level => l_log_level );

Line 141: IF p_pa_debug_mode = 'Y' THEN

137: x_fp_cols_rec => l_fp_cols_rec_src,
138: x_return_status => x_return_status,
139: x_msg_count => x_msg_count,
140: x_msg_data => x_msg_data );
141: IF p_pa_debug_mode = 'Y' THEN
142: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
143: ( p_msg => 'Status after calling
144: PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DTLS: '
145: || x_return_status,

Line 163: IF p_pa_debug_mode = 'Y' THEN

159: l_fp_cols_rec_target.x_fin_plan_level_code = 'P' ) OR
160: (l_fp_cols_rec_src.x_plan_in_multi_curr_flag = 'Y' AND
161: l_fp_cols_rec_target.x_plan_in_multi_curr_flag = 'N') THEN
162: x_same_planning_option_flag := 'N';
163: IF p_pa_debug_mode = 'Y' THEN
164: PA_DEBUG.RESET_CURR_FUNCTION;
165: END IF;
166: RETURN;
167: END IF;

Line 164: PA_DEBUG.RESET_CURR_FUNCTION;

160: (l_fp_cols_rec_src.x_plan_in_multi_curr_flag = 'Y' AND
161: l_fp_cols_rec_target.x_plan_in_multi_curr_flag = 'N') THEN
162: x_same_planning_option_flag := 'N';
163: IF p_pa_debug_mode = 'Y' THEN
164: PA_DEBUG.RESET_CURR_FUNCTION;
165: END IF;
166: RETURN;
167: END IF;
168: END IF;

Line 174: IF p_pa_debug_mode = 'Y' THEN

170: /* Check Source financial plan attributes against Target plan */
171: IF p_fp_src_plan_ver_id IS NOT NULL THEN
172:
173: /* CAll API to get Source data into l_fp_cols_rec_src */
174: IF p_pa_debug_mode = 'Y' THEN
175: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
176: ( p_msg => 'Before calling PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DTLS',
177: p_module_name => l_module_name,
178: p_log_level => l_log_level );

Line 186: IF p_pa_debug_mode = 'Y' THEN

182: x_fp_cols_rec => l_fp_cols_rec_src,
183: x_return_status => x_return_status,
184: x_msg_count => x_msg_count,
185: x_msg_data => x_msg_data );
186: IF p_pa_debug_mode = 'Y' THEN
187: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
188: ( p_msg => 'Status after calling
189: PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DTLS: '
190: || x_return_status,

Line 211: IF p_pa_debug_mode = 'Y' THEN

207: x_same_planning_option_flag := 'N';
208: END IF;
209: END IF;
210:
211: IF p_pa_debug_mode = 'Y' THEN
212: PA_DEBUG.RESET_CURR_FUNCTION;
213: END IF;
214: EXCEPTION
215: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 212: PA_DEBUG.RESET_CURR_FUNCTION;

208: END IF;
209: END IF;
210:
211: IF p_pa_debug_mode = 'Y' THEN
212: PA_DEBUG.RESET_CURR_FUNCTION;
213: END IF;
214: EXCEPTION
215: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
216: l_msg_count := FND_MSG_PUB.count_msg;

Line 234: IF p_pa_debug_mode = 'Y' THEN

230:
231: ROLLBACK;
232: x_return_status := FND_API.G_RET_STS_ERROR;
233:
234: IF p_pa_debug_mode = 'Y' THEN
235: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
236: ( p_msg => 'Invalid Arguments Passed',
237: p_module_name => l_module_name,
238: p_log_level => l_log_level );

Line 239: PA_DEBUG.RESET_CURR_FUNCTION;

235: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
236: ( p_msg => 'Invalid Arguments Passed',
237: p_module_name => l_module_name,
238: p_log_level => l_log_level );
239: PA_DEBUG.RESET_CURR_FUNCTION;
240: END IF;
241: RAISE;
242: WHEN OTHERS THEN
243: ROLLBACK;

Line 252: IF P_PA_DEBUG_MODE = 'Y' THEN

248: ( p_pkg_name => 'PA_FP_FCST_GEN_AMT_UTILS',
249: p_procedure_name => 'COMPARE_ETC_SRC_TARGET_FP_OPT',
250: p_error_text => substr(sqlerrm,1,240) );
251:
252: IF P_PA_DEBUG_MODE = 'Y' THEN
253: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
254: ( p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
255: p_module_name => l_module_name,
256: p_log_level => l_log_level );

Line 257: PA_DEBUG.RESET_CURR_FUNCTION;

253: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
254: ( p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
255: p_module_name => l_module_name,
256: p_log_level => l_log_level );
257: PA_DEBUG.RESET_CURR_FUNCTION;
258: END IF;
259: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
260:
261: END COMPARE_ETC_SRC_TARGET_FP_OPT;