DBA Data[Home] [Help]

APPS.PA_FP_GEN_FCST_RMAP_PKG 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_RMAP_PKG as
2: /* $Header: PAFPFGRB.pls 120.2 2006/01/16 10:54:19 appldev noship $ */
3:
4: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
5:
6: /** This method is used to map the ETC source txns to the target
7: * plan version resource list. */
8: PROCEDURE FCST_SRC_TXNS_RMAP

Line 149: IF p_pa_debug_mode = 'Y' THEN

145: BEGIN
146: x_return_status := FND_API.G_RET_STS_SUCCESS;
147: x_msg_count := 0;
148:
149: IF p_pa_debug_mode = 'Y' THEN
150: PA_DEBUG.SET_CURR_FUNCTION( p_function => 'FCST_SRC_TXNS_RMAP',
151: p_debug_mode => p_pa_debug_mode );
152: END IF;
153:

Line 150: PA_DEBUG.SET_CURR_FUNCTION( p_function => 'FCST_SRC_TXNS_RMAP',

146: x_return_status := FND_API.G_RET_STS_SUCCESS;
147: x_msg_count := 0;
148:
149: IF p_pa_debug_mode = 'Y' THEN
150: PA_DEBUG.SET_CURR_FUNCTION( p_function => 'FCST_SRC_TXNS_RMAP',
151: p_debug_mode => p_pa_debug_mode );
152: END IF;
153:
154: SELECT NVL(uncategorized_flag,'N')

Line 151: p_debug_mode => p_pa_debug_mode );

147: x_msg_count := 0;
148:
149: IF p_pa_debug_mode = 'Y' THEN
150: PA_DEBUG.SET_CURR_FUNCTION( p_function => 'FCST_SRC_TXNS_RMAP',
151: p_debug_mode => p_pa_debug_mode );
152: END IF;
153:
154: SELECT NVL(uncategorized_flag,'N')
155: INTO l_uncategorized_flag

Line 171: IF p_pa_debug_mode = 'Y' THEN

167:
168: -- Beginning of code change for Bug 4070976 --
169: /* We get a fresh local copy of the target version details because
170: * p_fp_cols_rec does not have the updated source version ids. */
171: IF p_pa_debug_mode = 'Y' THEN
172: pa_fp_gen_amount_utils.fp_debug
173: ( p_msg => 'Before calling
174: pa_fp_gen_amount_utils.get_plan_version_dtls',
175: p_module_name => l_module_name,

Line 187: IF p_pa_debug_mode = 'Y' THEN

183: X_MSG_DATA => x_msg_data );
184: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
185: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
186: END IF;
187: IF p_pa_debug_mode = 'Y' THEN
188: pa_fp_gen_amount_utils.fp_debug
189: ( p_msg => 'Status after calling
190: pa_fp_gen_amount_utils.get_plan_version_dtls: ' ||
191: x_return_status,

Line 263: /*IF p_pa_debug_mode = 'Y' THEN

259: l_TXN_PLAN_START_DATE_tab,
260: l_TXN_PLAN_END_DATE_tab;
261: CLOSE map_to_target_fp_cur;
262:
263: /*IF p_pa_debug_mode = 'Y' THEN
264: pa_fp_gen_amount_utils.fp_debug
265: (p_msg => 'Value of l_txn_source_id_tab.count: '||l_txn_source_id_tab.count,
266: p_module_name => l_module_name,
267: p_log_level => 5);

Line 272: IF p_pa_debug_mode = 'Y' THEN

268: END IF;*/
269: --dbms_output.put_line('--l_txn_source_id_tab.count:'||l_txn_source_id_tab.count);
270:
271: IF ( l_TXN_SOURCE_ID_tab.count > 0 ) THEN
272: IF p_pa_debug_mode = 'Y' THEN
273: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG (
274: P_CALLED_MODE => p_called_mode,
275: P_MSG => 'Before calling PA_RLMI_RBS_MAP_PUB.MAP_RLMI_RBS',
276: P_MODULE_NAME => l_module_name );

Line 332: IF p_pa_debug_mode = 'Y' THEN

328: X_TXN_ACCUM_HEADER_ID_TAB => l_map_txn_accum_header_id_tab,
329: X_RETURN_STATUS => x_return_status,
330: X_MSG_COUNT => x_msg_count,
331: X_MSG_DATA => x_msg_data );
332: IF p_pa_debug_mode = 'Y' THEN
333: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
334: P_CALLED_MODE => p_called_mode,
335: P_MSG => 'After calling PA_RLMI_RBS_MAP_PUB.MAP_RLMI_RBS: '||
336: x_return_status,

Line 350: /*IF p_pa_debug_mode = 'Y' THEN

346: version_id not needed in pa_budget_versions. So update deleted **/
347:
348: --select count(*) into l_count_tmp from PA_FP_CALC_AMT_TMP1;
349:
350: /*IF p_pa_debug_mode = 'Y' THEN
351: pa_fp_gen_amount_utils.fp_debug
352: (p_msg => 'Count of PA_FP_CALC_AMT_TMP1: '||l_count_tmp,
353: p_module_name => l_module_name,
354: p_log_level => 5);

Line 365: /*IF p_pa_debug_mode = 'Y' THEN

361:
362: /* hr_utility.trace('==PA_FP_CALC_AMT_TMP1.count aft res map call'||l_count_tmp);
363: hr_utility.trace('map rlm id tab count '||l_map_rlm_id_tab.count);
364: hr_utility.trace('map src id tab count '||l_map_txn_source_id_tab.count); */
365: /*IF p_pa_debug_mode = 'Y' THEN
366: pa_fp_gen_amount_utils.fp_debug
367: (p_msg => 'Value of l_map_rlm_id_tab.count: '||l_map_rlm_id_tab.count,
368: p_module_name => l_module_name,
369: p_log_level => 5);

Line 393: IF P_PA_DEBUG_MODE = 'Y' THEN

389: --from pa_resource_assignments where budget_version_id = P_BUDGET_VERSION_ID;
390: --dbms_output.put_line('@@before maintain_res_asg, count of pa_resource_asgs:' ||l_count_tmp);
391: --hr_utility.trace('before calling maintain res asg');
392:
393: IF P_PA_DEBUG_MODE = 'Y' THEN
394: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
395: P_CALLED_MODE => P_CALLED_MODE,
396: P_MSG => 'Before calling PA_FP_GEN_FCST_AMT_PUB.MAINTAIN_RES_ASG',
397: P_MODULE_NAME => l_module_name );

Line 406: IF P_PA_DEBUG_MODE = 'Y' THEN

402: P_FP_COLS_REC => P_FP_COLS_REC,
403: X_RETURN_STATUS => x_return_status,
404: X_MSG_COUNT => x_msg_count,
405: X_MSG_DATA => x_msg_data );
406: IF P_PA_DEBUG_MODE = 'Y' THEN
407: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
408: P_CALLED_MODE => P_CALLED_MODE,
409: P_MSG => 'After calling PA_FP_GEN_FCST_AMT_PUB.'||
410: 'MAINTAIN_RES_ASG: '||x_return_status,

Line 524: /*IF p_pa_debug_mode = 'Y' THEN

520: l_upd_rlm_id_tab,
521: l_upd_target_ra_id_tab;
522: CLOSE update_res_asg;
523:
524: /*IF p_pa_debug_mode = 'Y' THEN
525: pa_fp_gen_amount_utils.fp_debug
526: (p_msg => 'Value of l_upd_target_ra_id_tab.count: '||l_upd_target_ra_id_tab.count,
527: p_module_name => l_module_name,
528: p_log_level => 5);

Line 641: /*IF p_pa_debug_mode = 'Y' THEN

637: --for i in 1.. l_upd_ra_id_tab1.count LOOP
638: --hr_utility.trace('??l_upd_ra_id_tab1(i):'||l_upd_ra_id_tab1(i));
639: --hr_utility.trace('??l_upd_target_ra_id_tab1(i):'||l_upd_target_ra_id_tab1(i));
640: --END LOOP;
641: /*IF p_pa_debug_mode = 'Y' THEN
642: pa_fp_gen_amount_utils.fp_debug
643: (p_msg => 'Value of l_upd_ra_id_tab1.count: '||l_upd_ra_id_tab1.count,
644: p_module_name => l_module_name,
645: p_log_level => 5);

Line 654: IF p_pa_debug_mode = 'Y' THEN

650: PA_FP_CALC_AMT_TMP2
651: SET target_res_asg_id = l_upd_target_ra_id_tab1(i)
652: WHERE resource_assignment_id = l_upd_ra_id_tab1(i);
653:
654: IF p_pa_debug_mode = 'Y' THEN
655: PA_DEBUG.RESET_CURR_FUNCTION;
656: END IF;
657: EXCEPTION
658: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 655: PA_DEBUG.RESET_CURR_FUNCTION;

651: SET target_res_asg_id = l_upd_target_ra_id_tab1(i)
652: WHERE resource_assignment_id = l_upd_ra_id_tab1(i);
653:
654: IF p_pa_debug_mode = 'Y' THEN
655: PA_DEBUG.RESET_CURR_FUNCTION;
656: END IF;
657: EXCEPTION
658: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
659: l_msg_count := FND_MSG_PUB.count_msg;

Line 677: IF p_pa_debug_mode = 'Y' THEN

673:
674: ROLLBACK;
675: x_return_status := FND_API.G_RET_STS_ERROR;
676:
677: IF p_pa_debug_mode = 'Y' THEN
678: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
679: (p_msg => 'Invalid Arguments Passed',
680: p_module_name => l_module_name,
681: p_log_level => 5);

Line 682: PA_DEBUG.RESET_CURR_FUNCTION;

678: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
679: (p_msg => 'Invalid Arguments Passed',
680: p_module_name => l_module_name,
681: p_log_level => 5);
682: PA_DEBUG.RESET_CURR_FUNCTION;
683: END IF;
684: RAISE;
685: WHEN OTHERS THEN
686: ROLLBACK;

Line 695: IF p_pa_debug_mode = 'Y' THEN

691: ( p_pkg_name => 'PA_FP_GEN_FCST_RMAP_PKG',
692: p_procedure_name => 'FCST_SRC_TXNS_RMAP',
693: p_error_text => substr(sqlerrm,1,240));
694:
695: IF p_pa_debug_mode = 'Y' THEN
696: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
697: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
698: p_module_name => l_module_name,
699: p_log_level => 5);

Line 700: PA_DEBUG.RESET_CURR_FUNCTION;

696: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
697: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
698: p_module_name => l_module_name,
699: p_log_level => 5);
700: PA_DEBUG.RESET_CURR_FUNCTION;
701: END IF;
702: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
703:
704: END FCST_SRC_TXNS_RMAP;