DBA Data[Home] [Help]

APPS.PA_FP_CI_IMPLEMENT_PKG 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_ci_implement_pkg as
2: /* $Header: PAFPCOMB.pls 120.3.12010000.3 2008/09/10 21:11:27 snizam ship $ */
3: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
4:
5: --3 new parameters are added as part of rounding changes.
6: ---->p_impl_txn_rev_amt : contain the amount in agreement currency for which funding lines should be created
7: ---->p_impl_pc_rev_amt : contain the amount in project currency for which funding lines should be created

Line 93: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);

89: l_projfunc_exchange_rate pa_project_fundings.projfunc_exchange_rate%TYPE;
90: BEGIN
91:
92: x_return_status := FND_API.G_RET_STS_SUCCESS;
93: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
94: l_debug_mode := NVL(l_debug_mode, 'Y');
95: /* the above default is set for testing purpose only
96: need to set to 'N' after testing */
97: IF l_debug_mode = 'Y' THEN

Line 98: IF P_PA_DEBUG_MODE = 'Y' THEN

94: l_debug_mode := NVL(l_debug_mode, 'Y');
95: /* the above default is set for testing purpose only
96: need to set to 'N' after testing */
97: IF l_debug_mode = 'Y' THEN
98: IF P_PA_DEBUG_MODE = 'Y' THEN
99: PA_DEBUG.init_err_stack('pa_fp_ci_implement_pkg.create_ci_impact_fund_lines');
100: END IF;
101: END IF;
102: IF p_ci_id IS NULL OR

Line 99: PA_DEBUG.init_err_stack('pa_fp_ci_implement_pkg.create_ci_impact_fund_lines');

95: /* the above default is set for testing purpose only
96: need to set to 'N' after testing */
97: IF l_debug_mode = 'Y' THEN
98: IF P_PA_DEBUG_MODE = 'Y' THEN
99: PA_DEBUG.init_err_stack('pa_fp_ci_implement_pkg.create_ci_impact_fund_lines');
100: END IF;
101: END IF;
102: IF p_ci_id IS NULL OR
103: p_partial_factor IS NULL OR

Line 107: pa_debug.g_err_stage:= 'p_ci_id IS '||p_ci_id;

103: p_partial_factor IS NULL OR
104: p_project_id IS NULL THEN
105:
106: IF l_debug_mode = 'Y' THEN
107: pa_debug.g_err_stage:= 'p_ci_id IS '||p_ci_id;
108: pa_debug.write(l_module_name,pa_debug.g_err_stage,5);
109:
110: pa_debug.g_err_stage:= 'p_partial_factor IS '||p_partial_factor;
111: pa_debug.write(l_module_name,pa_debug.g_err_stage,5);

Line 108: pa_debug.write(l_module_name,pa_debug.g_err_stage,5);

104: p_project_id IS NULL THEN
105:
106: IF l_debug_mode = 'Y' THEN
107: pa_debug.g_err_stage:= 'p_ci_id IS '||p_ci_id;
108: pa_debug.write(l_module_name,pa_debug.g_err_stage,5);
109:
110: pa_debug.g_err_stage:= 'p_partial_factor IS '||p_partial_factor;
111: pa_debug.write(l_module_name,pa_debug.g_err_stage,5);
112:

Line 110: pa_debug.g_err_stage:= 'p_partial_factor IS '||p_partial_factor;

106: IF l_debug_mode = 'Y' THEN
107: pa_debug.g_err_stage:= 'p_ci_id IS '||p_ci_id;
108: pa_debug.write(l_module_name,pa_debug.g_err_stage,5);
109:
110: pa_debug.g_err_stage:= 'p_partial_factor IS '||p_partial_factor;
111: pa_debug.write(l_module_name,pa_debug.g_err_stage,5);
112:
113: pa_debug.g_err_stage:= 'p_project_id IS '||p_project_id;
114: pa_debug.write(l_module_name,pa_debug.g_err_stage,5);

Line 111: pa_debug.write(l_module_name,pa_debug.g_err_stage,5);

107: pa_debug.g_err_stage:= 'p_ci_id IS '||p_ci_id;
108: pa_debug.write(l_module_name,pa_debug.g_err_stage,5);
109:
110: pa_debug.g_err_stage:= 'p_partial_factor IS '||p_partial_factor;
111: pa_debug.write(l_module_name,pa_debug.g_err_stage,5);
112:
113: pa_debug.g_err_stage:= 'p_project_id IS '||p_project_id;
114: pa_debug.write(l_module_name,pa_debug.g_err_stage,5);
115: END IF;

Line 113: pa_debug.g_err_stage:= 'p_project_id IS '||p_project_id;

109:
110: pa_debug.g_err_stage:= 'p_partial_factor IS '||p_partial_factor;
111: pa_debug.write(l_module_name,pa_debug.g_err_stage,5);
112:
113: pa_debug.g_err_stage:= 'p_project_id IS '||p_project_id;
114: pa_debug.write(l_module_name,pa_debug.g_err_stage,5);
115: END IF;
116: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
117: p_msg_name => 'PA_FP_INV_PARAM_PASSED',

Line 114: pa_debug.write(l_module_name,pa_debug.g_err_stage,5);

110: pa_debug.g_err_stage:= 'p_partial_factor IS '||p_partial_factor;
111: pa_debug.write(l_module_name,pa_debug.g_err_stage,5);
112:
113: pa_debug.g_err_stage:= 'p_project_id IS '||p_project_id;
114: pa_debug.write(l_module_name,pa_debug.g_err_stage,5);
115: END IF;
116: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
117: p_msg_name => 'PA_FP_INV_PARAM_PASSED',
118: p_token1 => 'PROCEDURENAME',

Line 166: PA_DEBUG.write_log (x_module =>

162:
163: IF l_budget_line_count > 0 THEN --Bug 5509687: Prevent from creating funding lines if there are no impact lines
164:
165: IF l_debug_mode = 'Y' THEN
166: PA_DEBUG.write_log (x_module =>
167: 'pa.plsql.pa_fp_ci_implement_pkg.create_ci_impact_fund_lines'
168: ,x_msg => 'before getting CW REVENUE budget version id '
169: ,x_log_level => 5);
170: END IF;

Line 187: PA_DEBUG.Reset_Err_Stack;

183: x_return_status := FND_API.G_RET_STS_ERROR;
184: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA',
185: p_msg_name => 'PA_FP_CI_NO_CURR_WK_VERSION');
186: IF l_debug_mode = 'Y' THEN
187: PA_DEBUG.Reset_Err_Stack;
188: END IF;
189: RETURN;
190: END;
191:

Line 193: PA_DEBUG.write_log (x_module =>

189: RETURN;
190: END;
191:
192: IF l_debug_mode = 'Y' THEN
193: PA_DEBUG.write_log (x_module =>
194: 'pa.plsql.pa_fp_ci_implement_pkg.create_ci_impact_fund_lines'
195: ,x_msg => 'after getting CW REVENUE budget version id '||
196: TO_CHAR(l_bv_id)
197: ,x_log_level => 5);

Line 251: PA_DEBUG.write_log (x_module =>

247: FROM pa_agreements_all WHERE
248: agreement_id = l_agreement_id;
249:
250: IF l_debug_mode = 'Y' THEN
251: PA_DEBUG.write_log (x_module =>
252: 'pa.plsql.pa_fp_ci_implement_pkg.create_ci_impact_fund_lines'
253: ,x_msg => 'fund level chk begin '||
254: 'upd agr amt flag from page '||p_update_agr_amount_flag
255: ||' fund cate fr page '||p_funding_category

Line 257: PA_DEBUG.write_log (x_module

253: ,x_msg => 'fund level chk begin '||
254: 'upd agr amt flag from page '||p_update_agr_amount_flag
255: ||' fund cate fr page '||p_funding_category
256: ,x_log_level => 5);
257: PA_DEBUG.write_log (x_module
258: => 'pa.plsql.pa_fp_ci_implement_pkg.create_ci_impact_fund_lines'
259: ,x_msg => 'prj id '||to_char(p_project_id) ||
260: 'ci id '||to_char(p_ci_id)
261: ,x_log_level => 5);

Line 283: PA_DEBUG.Reset_Err_Stack;

279: p_data => x_msg_data,
280: p_msg_index_out => l_msg_index_out);
281: END IF; */
282: IF l_debug_mode = 'Y' THEN
283: PA_DEBUG.Reset_Err_Stack;
284: END IF;
285:
286: RETURN;
287: END IF;

Line 289: PA_DEBUG.write_log (x_module =>

285:
286: RETURN;
287: END IF;
288: IF l_debug_mode = 'Y' THEN
289: PA_DEBUG.write_log (x_module =>
290: 'pa.plsql.pa_fp_ci_implement_pkg.create_ci_impact_fund_lines'
291: ,x_msg => 'funding level '||l_funding_level
292: ,x_log_level => 5);
293: END IF;

Line 301: PA_DEBUG.write_log (x_module =>

297: l_total_proj_revenue := p_impl_pc_rev_amt;
298:
299: /* check for agreement amount update allowed */
300: IF l_debug_mode = 'Y' THEN
301: PA_DEBUG.write_log (x_module =>
302: 'pa.plsql.pa_fp_ci_implement_pkg.create_ci_impact_fund_lines'
303: ,x_msg => 'total fund amt '||ltrim(to_char(l_total_amount))
304: ,x_log_level => 5);
305: END IF;

Line 328: PA_DEBUG.write_log (x_module =>

324: ,p_billing_sequence => PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM -- Bug 5522880
325: ,p_amount => PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM); -- Bug 5522880
326:
327: IF l_debug_mode = 'Y' THEN
328: PA_DEBUG.write_log (x_module =>
329: 'pa.plsql.pa_fp_ci_implement_pkg.create_ci_impact_fund_lines'
330: ,x_msg => 'upd agr allowed flag '||l_upd_agr_allowed
331: ,x_log_level => 5);
332: END IF;

Line 346: PA_DEBUG.Reset_Err_Stack;

342: p_data => x_msg_data,
343: p_msg_index_out => l_msg_index_out);
344: END IF; */
345: IF l_debug_mode = 'Y' THEN
346: PA_DEBUG.Reset_Err_Stack;
347: END IF;
348: RETURN;
349: END IF;
350: /* calling update agreement API */

Line 357: PA_DEBUG.write_log (x_module =>

353:
354: l_new_agr_amount := NVL(l_total_amount,0) + l_agr_amount;
355:
356: IF l_debug_mode = 'Y' THEN
357: PA_DEBUG.write_log (x_module =>
358: 'pa.plsql.pa_fp_ci_implement_pkg.create_ci_impact_fund_lines'
359: ,x_msg => 'new agr amt '||ltrim(to_char(l_new_agr_amount))
360: ||' Agr ID '||ltrim(to_char(l_agreement_id))
361: ,x_log_level => 5);

Line 429: PA_DEBUG.write_log (x_module =>

425: WHEN OTHERS THEN
426: l_tmp_amount := 0;
427: END;
428: IF l_debug_mode = 'Y' THEN
429: PA_DEBUG.write_log (x_module =>
430: 'pa.plsql.pa_fp_ci_implement_pkg.create_ci_impact_fund_lines'
431: ,x_msg => 'aft upd agr api'||ltrim(to_char(l_tmp_amount))
432: ,x_log_level => 5);
433: END IF;

Line 449: PA_DEBUG.write_log (x_module =>

445: p_funding_id => NULL,
446: p_pm_funding_reference => NULL );
447:
448: IF l_debug_mode = 'Y' THEN
449: PA_DEBUG.write_log (x_module =>
450: 'pa.plsql.pa_fp_ci_implement_pkg.create_ci_impact_fund_lines'
451: ,x_msg => 'aft valid fund amt api call '||l_valid_funding_amt_flag
452: ,x_log_level => 5);
453: END IF;

Line 472: PA_DEBUG.Reset_Err_Stack;

468: p_data => x_msg_data,
469: p_msg_index_out => l_msg_index_out);
470: END IF; */
471: IF l_debug_mode = 'Y' THEN
472: PA_DEBUG.Reset_Err_Stack;
473: END IF;
474: RETURN;
475: END IF;
476:

Line 491: PA_DEBUG.write_log (x_module =>

487: l_amount_tab_in_pfc(1) := l_total_projfunc_revenue;
488: l_amount_tab_in_pc(1) := l_total_proj_revenue;
489: l_task_id_tab(1) := NULL;
490: IF l_debug_mode = 'Y' THEN
491: PA_DEBUG.write_log (x_module =>
492: 'pa.plsql.pa_fp_ci_implement_pkg.create_ci_impact_fund_lines'
493: ,x_msg => 'inside fund : ci level PP PT'
494: ,x_log_level => 5);
495: END IF;

Line 501: PA_DEBUG.write_log (x_module =>

497:
498: ELSIF l_ci_ver_planning_level = 'T' AND
499: l_funding_level = 'T' THEN
500: IF l_debug_mode = 'Y' THEN
501: PA_DEBUG.write_log (x_module =>
502: 'pa.plsql.pa_fp_ci_implement_pkg.create_ci_impact_fund_lines'
503: ,x_msg => 'inside fund : ci level TT'
504: ,x_log_level => 5);
505: END IF;

Line 542: PA_DEBUG.Reset_Err_Stack;

538: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA',
539: p_msg_name => 'PA_FP_CI_FUNDING_LEVEL' );
540: x_return_status := FND_API.G_RET_STS_ERROR;
541: IF l_debug_mode = 'Y' THEN
542: PA_DEBUG.Reset_Err_Stack;
543: END IF;
544: RETURN;
545: ELSIF l_ci_ver_planning_level = 'L' AND -- Bug 3755783: FP.M change
546: l_funding_level = 'T' THEN

Line 665: PA_DEBUG.write_log (x_module =>

661: p_customer_id => l_customer_id ,
662: p_calling_context => 'CI');
663:
664: IF l_debug_mode = 'Y' THEN
665: PA_DEBUG.write_log (x_module =>
666: 'pa.plsql.pa_fp_ci_implement_pkg.create_ci_impact_fund_lines'
667: ,x_msg => 'chk for add fund ok '||
668: ltrim(to_char(nvl(l_task_id_tab(i),-1)))
669: || ' amt '||to_char(l_amount_tab(i)) ||

Line 687: PA_DEBUG.Reset_Err_Stack;

683: p_data => x_msg_data,
684: p_msg_index_out => l_msg_index_out);
685: END IF; */
686: IF l_debug_mode = 'Y' THEN
687: PA_DEBUG.Reset_Err_Stack;
688: END IF;
689: RETURN;
690: END IF;
691:

Line 693: PA_DEBUG.write_log (x_module =>

689: RETURN;
690: END IF;
691:
692: IF l_debug_mode = 'Y' THEN
693: PA_DEBUG.write_log (x_module =>
694: 'pa.plsql.pa_fp_ci_implement_pkg.create_ci_impact_fund_lines'
695: ,x_msg => 'bef create_funding api call'
696: ,x_log_level => 5);
697: END IF;

Line 758: PA_DEBUG.write_log (x_module =>

754: x_err_msg => l_err_stage,
755: p_funding_category => p_funding_category );
756:
757: IF l_debug_mode = 'Y' THEN
758: PA_DEBUG.write_log (x_module =>
759: 'pa.plsql.pa_fp_ci_implement_pkg.create_ci_impact_fund_lines'
760: ,x_msg => 'aft create_funding api call ret code '||
761: to_char(l_err_code)
762: ,x_log_level => 5);

Line 781: PA_DEBUG.Reset_Err_Stack;

777: p_data => x_msg_data,
778: p_msg_index_out => l_msg_index_out);
779: END IF; */
780: IF l_debug_mode = 'Y' THEN
781: PA_DEBUG.Reset_Err_Stack;
782: END IF;
783: RETURN;
784: END IF;
785:

Line 794: PA_DEBUG.write_log (x_module =>

790: p_login_id => LTRIM(RTRIM(TO_CHAR(l_last_update_login))),
791: p_user_id => LTRIM(RTRIM(TO_CHAR(l_last_updated_by)))
792: );
793: IF l_debug_mode = 'Y' THEN
794: PA_DEBUG.write_log (x_module =>
795: 'pa.plsql.pa_fp_ci_implement_pkg.create_ci_impact_fund_lines'
796: ,x_msg => 'aft calling summary fund ins API '
797: ,x_log_level => 5);
798: END IF;

Line 816: PA_DEBUG.write_log (x_module =>

812: x_msg_data => x_msg_data
813: );
814:
815: IF l_debug_mode = 'Y' THEN
816: PA_DEBUG.write_log (x_module =>
817: 'pa.plsql.pa_fp_ci_implement_pkg.create_ci_impact_fund_lines'
818: ,x_msg => 'aft calling link api : ret status '||
819: x_return_status
820: ,x_log_level => 5);

Line 824: PA_DEBUG.Reset_Err_Stack;

820: ,x_log_level => 5);
821: END IF;
822: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
823: IF l_debug_mode = 'Y' THEN
824: PA_DEBUG.Reset_Err_Stack;
825: END IF;
826: RETURN;
827: END IF;
828: /* checking for project level funding */

Line 830: /* PA_DEBUG.Reset_Err_Stack; */

826: RETURN;
827: END IF;
828: /* checking for project level funding */
829: END IF; --Bug 5509687
830: /* PA_DEBUG.Reset_Err_Stack; */
831: IF l_debug_mode = 'Y' THEN
832: PA_DEBUG.Reset_Err_Stack;
833: END IF;
834: RETURN;

Line 832: PA_DEBUG.Reset_Err_Stack;

828: /* checking for project level funding */
829: END IF; --Bug 5509687
830: /* PA_DEBUG.Reset_Err_Stack; */
831: IF l_debug_mode = 'Y' THEN
832: PA_DEBUG.Reset_Err_Stack;
833: END IF;
834: RETURN;
835: EXCEPTION
836: WHEN OTHERS THEN

Line 840: PA_DEBUG.Reset_Err_Stack;

836: WHEN OTHERS THEN
837: ROLLBACK;
838:
839: IF l_debug_mode = 'Y' THEN
840: PA_DEBUG.Reset_Err_Stack;
841: END IF;
842:
843: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
844: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_FP_CI_IMPLEMENT_PKG',