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.5.12020000.2 2012/12/28 07:52:13 nisinha 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 94: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);

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

Line 99: IF P_PA_DEBUG_MODE = 'Y' THEN

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

Line 167: PA_DEBUG.write_log (x_module =>

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

Line 188: PA_DEBUG.Reset_Err_Stack;

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

Line 194: PA_DEBUG.write_log (x_module =>

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

Line 254: PA_DEBUG.write_log (x_module =>

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

Line 260: PA_DEBUG.write_log (x_module

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

Line 286: PA_DEBUG.Reset_Err_Stack;

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

Line 292: PA_DEBUG.write_log (x_module =>

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

Line 304: PA_DEBUG.write_log (x_module =>

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

Line 331: PA_DEBUG.write_log (x_module =>

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

Line 349: PA_DEBUG.Reset_Err_Stack;

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

Line 360: PA_DEBUG.write_log (x_module =>

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

Line 432: PA_DEBUG.write_log (x_module =>

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

Line 452: PA_DEBUG.write_log (x_module =>

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

Line 475: PA_DEBUG.Reset_Err_Stack;

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

Line 494: PA_DEBUG.write_log (x_module =>

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

Line 504: PA_DEBUG.write_log (x_module =>

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

Line 545: PA_DEBUG.Reset_Err_Stack;

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

Line 668: PA_DEBUG.write_log (x_module =>

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

Line 690: PA_DEBUG.Reset_Err_Stack;

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

Line 696: PA_DEBUG.write_log (x_module =>

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

Line 761: PA_DEBUG.write_log (x_module =>

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

Line 784: PA_DEBUG.Reset_Err_Stack;

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

Line 797: PA_DEBUG.write_log (x_module =>

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

Line 819: PA_DEBUG.write_log (x_module =>

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

Line 827: PA_DEBUG.Reset_Err_Stack;

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

Line 833: /* PA_DEBUG.Reset_Err_Stack; */

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

Line 835: PA_DEBUG.Reset_Err_Stack;

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

Line 843: PA_DEBUG.Reset_Err_Stack;

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