DBA Data[Home] [Help]

APPS.PA_FP_GEN_BUDGET_AMT_PUB 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_BUDGET_AMT_PUB as
2: /* $Header: PAFPGAMB.pls 120.22.12020000.4 2013/05/23 07:35:56 bpottipa ship $ */
3:
4: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
5:
6: /**
7: * Wrapper API
8: *

Line 64: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN

60:
61: X_MSG_COUNT := 0;
62: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
63:
64: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
65: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GENERATE_BUDGET_AMT_WRP');
66: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
67: pa_debug.set_curr_function( p_function => 'GENERATE_BUDGET_AMT_WRP'
68: ,p_debug_mode => p_pa_debug_mode);

Line 65: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GENERATE_BUDGET_AMT_WRP');

61: X_MSG_COUNT := 0;
62: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
63:
64: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
65: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GENERATE_BUDGET_AMT_WRP');
66: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
67: pa_debug.set_curr_function( p_function => 'GENERATE_BUDGET_AMT_WRP'
68: ,p_debug_mode => p_pa_debug_mode);
69: END IF;

Line 66: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

62: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
63:
64: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
65: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GENERATE_BUDGET_AMT_WRP');
66: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
67: pa_debug.set_curr_function( p_function => 'GENERATE_BUDGET_AMT_WRP'
68: ,p_debug_mode => p_pa_debug_mode);
69: END IF;
70:

Line 67: pa_debug.set_curr_function( p_function => 'GENERATE_BUDGET_AMT_WRP'

63:
64: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
65: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GENERATE_BUDGET_AMT_WRP');
66: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
67: pa_debug.set_curr_function( p_function => 'GENERATE_BUDGET_AMT_WRP'
68: ,p_debug_mode => p_pa_debug_mode);
69: END IF;
70:
71: /*CBS enhancement to validate Planning Options of the budget bug#16600305*/

Line 68: ,p_debug_mode => p_pa_debug_mode);

64: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
65: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GENERATE_BUDGET_AMT_WRP');
66: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
67: pa_debug.set_curr_function( p_function => 'GENERATE_BUDGET_AMT_WRP'
68: ,p_debug_mode => p_pa_debug_mode);
69: END IF;
70:
71: /*CBS enhancement to validate Planning Options of the budget bug#16600305*/
72: PA_ALTERNATE_TASK_PVT.Is_Planning_Options_Valid(

Line 84: IF p_pa_debug_mode = 'Y' THEN

80: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
81: END IF;
82:
83: --Calling the get_plan_version_dtls api
84: IF p_pa_debug_mode = 'Y' THEN
85: pa_fp_gen_amount_utils.fp_debug
86: (p_called_mode => p_called_mode,
87: p_msg => 'Before calling
88: pa_fp_gen_amount_utils.get_plan_version_dtls',

Line 99: IF p_pa_debug_mode = 'Y' THEN

95: X_FP_COLS_REC => l_fp_cols_rec,
96: X_RETURN_STATUS => X_RETURN_STATUS,
97: X_MSG_COUNT => X_MSG_COUNT,
98: X_MSG_DATA => X_MSG_DATA);
99: IF p_pa_debug_mode = 'Y' THEN
100: pa_fp_gen_amount_utils.fp_debug
101: (p_called_mode => p_called_mode,
102: p_msg => 'Status after calling
103: pa_fp_gen_amount_utils.get_plan_version_dtls: '

Line 116: IF p_pa_debug_mode = 'Y' THEN

112: /* This API validates that the current generation is supported.
113: * For a list of unsupported cases, please see comments at the
114: * beginning of the VALIDATE_SUPPORT_CASES API (PAFPGAUB.pls) */
115:
116: IF p_pa_debug_mode = 'Y' THEN
117: pa_fp_gen_amount_utils.fp_debug
118: ( p_msg => 'Before calling
119: pa_fp_gen_amount_utils.validate_support_cases',
120: p_module_name => l_module_name,

Line 133: IF p_pa_debug_mode = 'Y' THEN

129: X_RETURN_STATUS => X_RETURN_STATUS,
130: X_MSG_COUNT => X_MSG_COUNT,
131: X_MSG_DATA => X_MSG_DATA );
132:
133: IF p_pa_debug_mode = 'Y' THEN
134: pa_fp_gen_amount_utils.fp_debug
135: ( p_msg => 'Status after calling
136: pa_fp_gen_amount_utils.validate_support_cases: '
137: ||x_return_status,

Line 151: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN

147: * can be displayed asking the user whether or not to proceed.
148: */
149: IF X_WARNING_MESSAGE IS NOT NULL THEN
150: -- Before returning, we always have the following check.
151: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
152: PA_DEBUG.reset_err_stack;
153: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
154: PA_DEBUG.Reset_Curr_Function;
155: END IF;

Line 152: PA_DEBUG.reset_err_stack;

148: */
149: IF X_WARNING_MESSAGE IS NOT NULL THEN
150: -- Before returning, we always have the following check.
151: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
152: PA_DEBUG.reset_err_stack;
153: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
154: PA_DEBUG.Reset_Curr_Function;
155: END IF;
156:

Line 153: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

149: IF X_WARNING_MESSAGE IS NOT NULL THEN
150: -- Before returning, we always have the following check.
151: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
152: PA_DEBUG.reset_err_stack;
153: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
154: PA_DEBUG.Reset_Curr_Function;
155: END IF;
156:
157: RETURN;

Line 154: PA_DEBUG.Reset_Curr_Function;

150: -- Before returning, we always have the following check.
151: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
152: PA_DEBUG.reset_err_stack;
153: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
154: PA_DEBUG.Reset_Curr_Function;
155: END IF;
156:
157: RETURN;
158: END IF;

Line 166: IF p_pa_debug_mode = 'Y' THEN

162: SELECT record_version_number
163: INTO l_record_version_number
164: FROM pa_budget_versions
165: WHERE budget_version_id = p_budget_version_id;
166: IF p_pa_debug_mode = 'Y' THEN
167: pa_fp_gen_amount_utils.fp_debug
168: (p_called_mode => p_called_mode,
169: p_msg => 'Before calling pa_fin_plan_pvt.lock_unlock_version',
170: p_module_name => l_module_name,

Line 182: IF p_pa_debug_mode = 'Y' THEN

178: p_person_id => NULL,
179: x_return_status => x_return_status,
180: x_msg_count => x_msg_count,
181: x_msg_data => x_msg_data);
182: IF p_pa_debug_mode = 'Y' THEN
183: pa_fp_gen_amount_utils.fp_debug
184: (p_called_mode => p_called_mode,
185: p_msg => 'Status after calling pa_fin_plan_pvt.lock_unlock_version:'
186: ||x_return_status,

Line 191: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN

187: p_module_name => l_module_name,
188: p_log_level => 5);
189: END IF;
190: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
191: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
192: PA_DEBUG.reset_err_stack;
193: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
194: PA_DEBUG.Reset_Curr_Function;
195: END IF;

Line 192: PA_DEBUG.reset_err_stack;

188: p_log_level => 5);
189: END IF;
190: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
191: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
192: PA_DEBUG.reset_err_stack;
193: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
194: PA_DEBUG.Reset_Curr_Function;
195: END IF;
196: RETURN;

Line 193: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

189: END IF;
190: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
191: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
192: PA_DEBUG.reset_err_stack;
193: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
194: PA_DEBUG.Reset_Curr_Function;
195: END IF;
196: RETURN;
197: END IF;

Line 194: PA_DEBUG.Reset_Curr_Function;

190: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
191: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
192: PA_DEBUG.reset_err_stack;
193: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
194: PA_DEBUG.Reset_Curr_Function;
195: END IF;
196: RETURN;
197: END IF;
198:

Line 209: IF p_pa_debug_mode = 'Y' THEN

205: can be used for any other process for
206: locking the main budget table */
207:
208: --Calling the acquire_locks_for_copy_actual api
209: IF p_pa_debug_mode = 'Y' THEN
210: pa_fp_gen_amount_utils.fp_debug
211: (p_called_mode => p_called_mode,
212: p_msg => 'Before calling
213: pa_fp_copy_from_pkg.acquire_locks_for_copy_actual',

Line 225: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN

221: X_MSG_DATA => X_MSG_DATA);
222: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
223: --If we can't acquire lock, customized message is thrown from within
224: -- the API, so we should suppress exception error.
225: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
226: PA_DEBUG.reset_err_stack;
227: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
228: PA_DEBUG.Reset_Curr_Function;
229: END IF;

Line 226: PA_DEBUG.reset_err_stack;

222: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
223: --If we can't acquire lock, customized message is thrown from within
224: -- the API, so we should suppress exception error.
225: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
226: PA_DEBUG.reset_err_stack;
227: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
228: PA_DEBUG.Reset_Curr_Function;
229: END IF;
230: RETURN;

Line 227: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

223: --If we can't acquire lock, customized message is thrown from within
224: -- the API, so we should suppress exception error.
225: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
226: PA_DEBUG.reset_err_stack;
227: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
228: PA_DEBUG.Reset_Curr_Function;
229: END IF;
230: RETURN;
231: END IF;

Line 228: PA_DEBUG.Reset_Curr_Function;

224: -- the API, so we should suppress exception error.
225: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
226: PA_DEBUG.reset_err_stack;
227: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
228: PA_DEBUG.Reset_Curr_Function;
229: END IF;
230: RETURN;
231: END IF;
232: IF p_pa_debug_mode = 'Y' THEN

Line 232: IF p_pa_debug_mode = 'Y' THEN

228: PA_DEBUG.Reset_Curr_Function;
229: END IF;
230: RETURN;
231: END IF;
232: IF p_pa_debug_mode = 'Y' THEN
233: pa_fp_gen_amount_utils.fp_debug
234: (p_called_mode => p_called_mode,
235: p_msg => 'Status after calling
236: pa_fp_copy_from_pkg.acquire_locks_for_copy_actual: '

Line 253: IF p_pa_debug_mode = 'Y' THEN

249: WHERE budget_version_id = p_budget_version_id ;
250:
251: -- IPM: New Entity ER ------------------------------------------
252: -- Call the maintenance api in DELETE mode
253: IF p_pa_debug_mode = 'Y' THEN
254: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
255: ( P_MSG => 'Before calling PA_RES_ASG_CURRENCY_PUB.'
256: || 'MAINTAIN_DATA',
257: P_CALLED_MODE => p_called_mode,

Line 270: IF p_pa_debug_mode = 'Y' THEN

266: P_CALLED_MODE => p_called_mode,
267: X_RETURN_STATUS => x_return_status,
268: X_MSG_COUNT => x_msg_count,
269: X_MSG_DATA => x_msg_data );
270: IF p_pa_debug_mode = 'Y' THEN
271: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
272: ( P_MSG => 'After calling PA_RES_ASG_CURRENCY_PUB.'
273: || 'MAINTAIN_DATA: ' || x_return_status,
274: P_CALLED_MODE => p_called_mode,

Line 324: IF p_pa_debug_mode = 'Y' THEN

320: l_res_as_id(k),
321: 'Y' );
322:
323: -- Call the maintenance api in DELETE mode
324: IF p_pa_debug_mode = 'Y' THEN
325: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
326: ( P_MSG => 'Before calling PA_RES_ASG_CURRENCY_PUB.'
327: || 'MAINTAIN_DATA',
328: P_CALLED_MODE => p_called_mode,

Line 341: IF p_pa_debug_mode = 'Y' THEN

337: P_CALLED_MODE => p_called_mode,
338: X_RETURN_STATUS => x_return_status,
339: X_MSG_COUNT => x_msg_count,
340: X_MSG_DATA => x_msg_data );
341: IF p_pa_debug_mode = 'Y' THEN
342: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
343: ( P_MSG => 'After calling PA_RES_ASG_CURRENCY_PUB.'
344: || 'MAINTAIN_DATA: ' || x_return_status,
345: P_CALLED_MODE => p_called_mode,

Line 363: IF p_pa_debug_mode = 'Y' THEN

359: /* Checking for the planning level and calling appropriate API */
360: IF l_fp_cols_rec.x_gen_src_code = 'RESOURCE_SCHEDULE' THEN
361: IF l_fp_cols_rec.x_version_type = 'REVENUE'
362: AND l_rev_gen_method = 'C' THEN
363: IF p_pa_debug_mode = 'Y' THEN
364: pa_fp_gen_amount_utils.fp_debug
365: (p_called_mode => p_called_mode,
366: p_msg => 'Before calling
367: pa_fp_gen_budget_amt_pub.gen_rev_bdgt_amt_res_sch_wrp',

Line 398: IF p_pa_debug_mode = 'Y' THEN

394:
395: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
396: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
397: END IF;
398: IF p_pa_debug_mode = 'Y' THEN
399: pa_fp_gen_amount_utils.fp_debug
400: (p_called_mode => p_called_mode,
401: p_msg => 'Status after calling pa_fp_gen_budget_amt_pub.'||
402: 'gen_rev_bdgt_amt_res_sch_wrp:'||x_return_status,

Line 408: IF p_pa_debug_mode = 'Y' THEN

404: p_log_level => 5);
405: END IF;
406: ELSE
407: /* Calling Resource Schedule API */
408: IF p_pa_debug_mode = 'Y' THEN
409: pa_fp_gen_amount_utils.fp_debug
410: (p_called_mode => p_called_mode,
411: p_msg => 'Before calling
412: pa_fp_gen_budget_amt_pub.generate_budget_amt_res_sch',

Line 442: IF p_pa_debug_mode = 'Y' THEN

438: --dbms_output.put_line('after PA_FP_GEN_BUDGET_AMT_PUB.GENERATE_BUDGET_AMT_RES_SCH:'||x_return_status);
439: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
440: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
441: END IF;
442: IF p_pa_debug_mode = 'Y' THEN
443: pa_fp_gen_amount_utils.fp_debug
444: (p_called_mode => p_called_mode,
445: p_msg => 'Status after calling
446: pa_fp_gen_budget_amt_pub.generate_budget_amt_res_sch: '

Line 459: IF p_pa_debug_mode = 'Y' THEN

455: l_wp_track_cost_flag := Pa_Fp_wp_gen_amt_utils.get_wp_track_cost_amt_flag (p_project_id);
456: IF l_fp_cols_rec.x_version_type = 'REVENUE'
457: AND l_rev_gen_method = 'C'
458: AND l_wp_track_cost_flag <> 'Y' THEN
459: IF p_pa_debug_mode = 'Y' THEN
460: pa_fp_gen_amount_utils.fp_debug
461: (p_called_mode => p_called_mode,
462: p_msg => 'Before calling
463: pa_fp_wp_gen_budget_amt_pub.generate_wp_budget_amt',

Line 490: IF p_pa_debug_mode = 'Y' THEN

486: X_MSG_DATA => X_MSG_DATA);
487: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
488: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
489: END IF;
490: IF p_pa_debug_mode = 'Y' THEN
491: pa_fp_gen_amount_utils.fp_debug
492: (p_called_mode => p_called_mode,
493: p_msg => 'Status after calling
494: pa_fp_wp_gen_budget_amt_pub.generate_wp_budget_amt: '

Line 500: IF p_pa_debug_mode = 'Y' THEN

496: p_module_name => l_module_name,
497: p_log_level => 5);
498: END IF;
499: ELSE
500: IF p_pa_debug_mode = 'Y' THEN
501: pa_fp_gen_amount_utils.fp_debug
502: (p_called_mode => p_called_mode,
503: p_msg => 'Before calling
504: pa_fp_wp_gen_budget_amt_pub.generate_wp_budget_amt',

Line 532: IF p_pa_debug_mode = 'Y' THEN

528:
529: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
530: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
531: END IF;
532: IF p_pa_debug_mode = 'Y' THEN
533: pa_fp_gen_amount_utils.fp_debug
534: (p_called_mode => p_called_mode,
535: p_msg => 'Status after calling
536: pa_fp_wp_gen_budget_amt_pub.generate_wp_budget_amt: '

Line 546: IF p_pa_debug_mode = 'Y' THEN

542: END IF;
543:
544: IF l_fp_cols_rec.x_gen_incl_open_comm_flag = 'Y' THEN
545: /* Calling Commitment API*/
546: IF p_pa_debug_mode = 'Y' THEN
547: pa_fp_gen_amount_utils.fp_debug
548: (p_called_mode => p_called_mode,
549: p_msg => 'Before calling
550: pa_fp_gen_commitment_amounts.gen_commitment_amounts',

Line 567: IF p_pa_debug_mode = 'Y' THEN

563:
564: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
565: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
566: END IF;
567: IF p_pa_debug_mode = 'Y' THEN
568: pa_fp_gen_amount_utils.fp_debug
569: (p_called_mode => p_called_mode,
570: p_msg =>'Status after calling
571: pa_fp_gen_commitment_amounts.gen_commitment_amounts: '

Line 607: IF p_pa_debug_mode = 'Y' THEN

603:
604: IF l_fp_cols_rec.x_version_type = 'ALL' AND
605: l_fp_cols_rec.x_gen_src_code <> 'RESOURCE_SCHEDULE' THEN
606: /* Calling the currency conversion API*/
607: IF p_pa_debug_mode = 'Y' THEN
608: pa_fp_gen_amount_utils.fp_debug
609: (p_called_mode => p_called_mode,
610: p_msg => 'Before calling
611: pa_fp_multi_currency_pkg.convert_txn_currency',

Line 625: IF p_pa_debug_mode = 'Y' THEN

621: X_MSG_DATA => X_MSG_DATA);
622: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
623: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
624: END IF;
625: IF p_pa_debug_mode = 'Y' THEN
626: pa_fp_gen_amount_utils.fp_debug
627: (p_called_mode => p_called_mode,
628: p_msg => 'Status after calling
629: pa_fp_multi_currency_pkg.convert_txn_currency: '

Line 647: IF p_pa_debug_mode = 'Y' THEN

643: -- rolled up amounts, but the Change Document wrapper API takes
644: -- care of this already.
645:
646: /* Calling gen cost based revenue api */
647: IF p_pa_debug_mode = 'Y' THEN
648: pa_fp_gen_amount_utils.fp_debug
649: (p_called_mode => p_called_mode,
650: p_msg => 'Before calling
651: pa_fp_rev_gen_pub.gen_cost_based_revenue',

Line 664: IF p_pa_debug_mode = 'Y' THEN

660: X_MSG_DATA => X_MSG_DATA);
661: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
662: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
663: END IF;
664: IF p_pa_debug_mode = 'Y' THEN
665: pa_fp_gen_amount_utils.fp_debug
666: (p_called_mode => p_called_mode,
667: p_msg => 'Status after calling
668: pa_fp_rev_gen_pub.gen_cost_based_revenue: '

Line 678: IF p_pa_debug_mode = 'Y' THEN

674:
675: /* Calling include_change_document_wrp api */
676: IF l_fp_cols_rec.x_gen_incl_change_doc_flag = 'Y' THEN
677: IF l_fp_cols_rec.x_gen_src_code = 'FINANCIAL_PLAN' THEN
678: IF p_pa_debug_mode = 'Y' THEN
679: pa_fp_gen_amount_utils.fp_debug
680: (p_called_mode => p_called_mode,
681: p_msg => 'Before calling
682: pa_fp_ci_merge.copy_merged_ctrl_items',

Line 697: IF p_pa_debug_mode = 'Y' THEN

693: ,x_msg_data => x_msg_data);
694: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
695: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
696: END IF;
697: IF p_pa_debug_mode = 'Y' THEN
698: pa_fp_gen_amount_utils.fp_debug
699: (p_called_mode => p_called_mode,
700: p_msg => 'Status after calling
701: pa_fp_ci_merge.copy_merged_ctrl_items: '

Line 708: IF p_pa_debug_mode = 'Y' THEN

704: p_log_level => 5);
705: END IF;
706: END IF;
707:
708: IF p_pa_debug_mode = 'Y' THEN
709: pa_fp_gen_amount_utils.fp_debug
710: (p_called_mode => p_called_mode,
711: p_msg => 'Before calling PA_FP_GEN_PUB.include_change_document_wrp',
712: p_module_name => l_module_name,

Line 725: IF p_pa_debug_mode = 'Y' THEN

721: --dbms_output.put_line('after chg_doc:'||x_return_status);
722: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
723: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
724: END IF;
725: IF p_pa_debug_mode = 'Y' THEN
726: pa_fp_gen_amount_utils.fp_debug
727: (p_called_mode => p_called_mode,
728: p_msg => 'Status after calling PA_FP_GEN_PUB.include_change_document_wrp: '
729: ||x_return_status,

Line 743: IF p_pa_debug_mode = 'Y' THEN

739: OR l_fp_cols_rec.x_version_type = 'REVENUE')
740: AND (l_rev_gen_method = 'E'
741: OR l_fp_cols_rec.x_gen_incl_bill_event_flag = 'Y') THEN
742: /* Calling Billing Events API */
743: IF p_pa_debug_mode = 'Y' THEN
744: pa_fp_gen_amount_utils.fp_debug
745: (p_called_mode => p_called_mode,
746: p_msg => 'Before calling
747: pa_fp_gen_billing_amounts.gen_billing_amounts',

Line 764: IF p_pa_debug_mode = 'Y' THEN

760:
761: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
762: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
763: END IF;
764: IF p_pa_debug_mode = 'Y' THEN
765: pa_fp_gen_amount_utils.fp_debug
766: (p_called_mode => p_called_mode,
767: p_msg => 'Status after calling
768: pa_fp_gen_billing_amounts.gen_billing_amounts: '

Line 776: IF p_pa_debug_mode = 'Y' THEN

772: END IF;
773: END IF;
774:
775: IF l_fp_cols_rec.x_version_type = 'REVENUE' THEN
776: IF p_pa_debug_mode = 'Y' THEN
777: pa_fp_gen_amount_utils.fp_debug
778: (p_called_mode => p_called_mode,
779: p_msg => 'Before calling
780: pa_fp_gen_budget_amt_pub.reset_cost_amounts',

Line 793: IF p_pa_debug_mode = 'Y' THEN

789:
790: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
791: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
792: END IF;
793: IF p_pa_debug_mode = 'Y' THEN
794: pa_fp_gen_amount_utils.fp_debug
795: (p_called_mode => p_called_mode,
796: p_msg => 'Status after calling
797: pa_fp_gen_budget_amt_pub.reset_cost_amounts: '

Line 803: IF p_pa_debug_mode = 'Y' THEN

799: p_module_name => l_module_name,
800: p_log_level => 5);
801: END IF;
802: END IF;
803: IF p_pa_debug_mode = 'Y' THEN
804: pa_fp_gen_amount_utils.fp_debug
805: (p_called_mode => p_called_mode,
806: p_msg => 'Before calling
807: pa_fp_gen_fcst_amt_pub1.maintain_budget_version',

Line 822: IF p_pa_debug_mode = 'Y' THEN

818: --hr_utility.trace('after pub1.maintain bv:'||x_return_status);
819: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
820: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
821: END IF;
822: IF p_pa_debug_mode = 'Y' THEN
823: pa_fp_gen_amount_utils.fp_debug
824: (p_called_mode => p_called_mode,
825: p_msg => 'Status after calling
826: pa_fp_gen_fcst_amt_pub1.maintain_budget_version: '

Line 836: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN

832: IF P_COMMIT_FLAG = 'Y' THEN
833: COMMIT;
834: END IF;
835:
836: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
837: PA_DEBUG.reset_err_stack;
838: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
839: PA_DEBUG.Reset_Curr_Function;
840: END IF;

Line 837: PA_DEBUG.reset_err_stack;

833: COMMIT;
834: END IF;
835:
836: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
837: PA_DEBUG.reset_err_stack;
838: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
839: PA_DEBUG.Reset_Curr_Function;
840: END IF;
841:

Line 838: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

834: END IF;
835:
836: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
837: PA_DEBUG.reset_err_stack;
838: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
839: PA_DEBUG.Reset_Curr_Function;
840: END IF;
841:
842: EXCEPTION

Line 839: PA_DEBUG.Reset_Curr_Function;

835:
836: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
837: PA_DEBUG.reset_err_stack;
838: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
839: PA_DEBUG.Reset_Curr_Function;
840: END IF;
841:
842: EXCEPTION
843: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 863: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN

859: END IF;
860: ROLLBACK;
861: x_return_status := FND_API.G_RET_STS_ERROR;
862:
863: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
864: PA_DEBUG.reset_err_stack;
865: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
866: PA_DEBUG.Reset_Curr_Function;
867: END IF;

Line 864: PA_DEBUG.reset_err_stack;

860: ROLLBACK;
861: x_return_status := FND_API.G_RET_STS_ERROR;
862:
863: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
864: PA_DEBUG.reset_err_stack;
865: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
866: PA_DEBUG.Reset_Curr_Function;
867: END IF;
868:

Line 865: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

861: x_return_status := FND_API.G_RET_STS_ERROR;
862:
863: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
864: PA_DEBUG.reset_err_stack;
865: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
866: PA_DEBUG.Reset_Curr_Function;
867: END IF;
868:
869: WHEN OTHERS THEN

Line 866: PA_DEBUG.Reset_Curr_Function;

862:
863: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
864: PA_DEBUG.reset_err_stack;
865: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
866: PA_DEBUG.Reset_Curr_Function;
867: END IF;
868:
869: WHEN OTHERS THEN
870: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 876: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN

872: FND_MSG_PUB.add_exc_msg
873: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
874: ,p_procedure_name => 'GENERATE_BUDGET_AMT_WRP');
875:
876: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
877: PA_DEBUG.reset_err_stack;
878: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
879: PA_DEBUG.Reset_Curr_Function;
880: END IF;

Line 877: PA_DEBUG.reset_err_stack;

873: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
874: ,p_procedure_name => 'GENERATE_BUDGET_AMT_WRP');
875:
876: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
877: PA_DEBUG.reset_err_stack;
878: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
879: PA_DEBUG.Reset_Curr_Function;
880: END IF;
881:

Line 878: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

874: ,p_procedure_name => 'GENERATE_BUDGET_AMT_WRP');
875:
876: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
877: PA_DEBUG.reset_err_stack;
878: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
879: PA_DEBUG.Reset_Curr_Function;
880: END IF;
881:
882: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 879: PA_DEBUG.Reset_Curr_Function;

875:
876: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
877: PA_DEBUG.reset_err_stack;
878: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
879: PA_DEBUG.Reset_Curr_Function;
880: END IF;
881:
882: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
883:

Line 2077: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN

2073: END IF;
2074: X_MSG_COUNT := 0;
2075: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
2076:
2077: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
2078: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GENERATE_BUDGET_AMT_RES_SCH');
2079: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
2080: pa_debug.set_curr_function( p_function => 'GENERATE_BUDGET_AMT_RES_SCH'
2081: ,p_debug_mode => p_pa_debug_mode);

Line 2078: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GENERATE_BUDGET_AMT_RES_SCH');

2074: X_MSG_COUNT := 0;
2075: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
2076:
2077: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
2078: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GENERATE_BUDGET_AMT_RES_SCH');
2079: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
2080: pa_debug.set_curr_function( p_function => 'GENERATE_BUDGET_AMT_RES_SCH'
2081: ,p_debug_mode => p_pa_debug_mode);
2082: END IF;

Line 2079: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

2075: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
2076:
2077: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
2078: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GENERATE_BUDGET_AMT_RES_SCH');
2079: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
2080: pa_debug.set_curr_function( p_function => 'GENERATE_BUDGET_AMT_RES_SCH'
2081: ,p_debug_mode => p_pa_debug_mode);
2082: END IF;
2083:

Line 2080: pa_debug.set_curr_function( p_function => 'GENERATE_BUDGET_AMT_RES_SCH'

2076:
2077: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
2078: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GENERATE_BUDGET_AMT_RES_SCH');
2079: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
2080: pa_debug.set_curr_function( p_function => 'GENERATE_BUDGET_AMT_RES_SCH'
2081: ,p_debug_mode => p_pa_debug_mode);
2082: END IF;
2083:
2084: -- Bug 4549862: Added counter to track unique budget_line_id values for

Line 2081: ,p_debug_mode => p_pa_debug_mode);

2077: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
2078: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GENERATE_BUDGET_AMT_RES_SCH');
2079: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
2080: pa_debug.set_curr_function( p_function => 'GENERATE_BUDGET_AMT_RES_SCH'
2081: ,p_debug_mode => p_pa_debug_mode);
2082: END IF;
2083:
2084: -- Bug 4549862: Added counter to track unique budget_line_id values for
2085: -- the PA_FP_ROLLUP_TMP table. Will be arbitrarily initialized to 0 and

Line 2338: IF p_pa_debug_mode = 'Y' THEN

2334: END IF;
2335: END LOOP;
2336:
2337: --hr_utility.trace('l_proj_assignment_id.count:'||l_proj_assignment_id.count);
2338: IF p_pa_debug_mode = 'Y' THEN
2339: pa_fp_gen_amount_utils.fp_debug
2340: (p_called_mode => p_called_mode,
2341: p_msg => 'l_proj_assignment_id.count:'||l_proj_assignment_id.count,
2342: p_module_name => l_module_name,

Line 2347: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN

2343: p_log_level => 5);
2344: END IF;
2345:
2346: if l_proj_resource_id.count = 0 then
2347: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
2348: PA_DEBUG.reset_err_stack;
2349: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
2350: PA_DEBUG.Reset_Curr_Function;
2351: END IF;

Line 2348: PA_DEBUG.reset_err_stack;

2344: END IF;
2345:
2346: if l_proj_resource_id.count = 0 then
2347: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
2348: PA_DEBUG.reset_err_stack;
2349: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
2350: PA_DEBUG.Reset_Curr_Function;
2351: END IF;
2352: return;

Line 2349: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

2345:
2346: if l_proj_resource_id.count = 0 then
2347: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
2348: PA_DEBUG.reset_err_stack;
2349: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
2350: PA_DEBUG.Reset_Curr_Function;
2351: END IF;
2352: return;
2353: end if;

Line 2350: PA_DEBUG.Reset_Curr_Function;

2346: if l_proj_resource_id.count = 0 then
2347: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
2348: PA_DEBUG.reset_err_stack;
2349: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
2350: PA_DEBUG.Reset_Curr_Function;
2351: END IF;
2352: return;
2353: end if;
2354:

Line 2409: IF P_PA_DEBUG_MODE = 'Y' THEN

2405: l_TXN_WBS_ELEMENT_VER_ID_tab(bb):= null;
2406: l_TXN_RBS_ELEMENT_ID_tab(bb) := null;
2407: END LOOP;
2408:
2409: IF P_PA_DEBUG_MODE = 'Y' THEN
2410: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
2411: P_MSG => 'Before calling PA_RLMI_RBS_MAP_PUB.MAP_RLMI_RBS',
2412: P_MODULE_NAME => l_module_name);
2413: END IF;

Line 2463: IF P_PA_DEBUG_MODE = 'Y' THEN

2459: X_TXN_ACCUM_HEADER_ID_TAB =>l_map_txn_accum_header_id_tab,
2460: X_RETURN_STATUS => x_return_status,
2461: X_MSG_COUNT => x_msg_count,
2462: X_MSG_DATA => x_msg_data );
2463: IF P_PA_DEBUG_MODE = 'Y' THEN
2464: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
2465: P_MSG => 'After calling PA_RLMI_RBS_MAP_PUB.MAP_RLMI_RBS: '||
2466: x_return_status,
2467: P_MODULE_NAME => l_module_name);

Line 2487: IF p_pa_debug_mode = 'Y' THEN

2483: END IF;
2484:
2485: SELECT count(*) INTO l_count
2486: FROM PA_RES_LIST_MAP_TMP4;
2487: IF p_pa_debug_mode = 'Y' THEN
2488: pa_fp_gen_amount_utils.fp_debug
2489: (p_called_mode => p_called_mode,
2490: p_msg => 'After calling pa_resource_mapping.map_resource_list,'||
2491: 'pa_res_list_map_tmp4.count has '||l_count||' rows',

Line 2498: IF p_pa_debug_mode = 'Y' THEN

2494: END IF;
2495:
2496:
2497: /* Calling the API to get the resource_assignment_id */
2498: IF p_pa_debug_mode = 'Y' THEN
2499: pa_fp_gen_amount_utils.fp_debug
2500: (p_called_mode => p_called_mode,
2501: p_msg => 'Before calling
2502: pa_fp_gen_budget_amt_pub.create_res_asg',

Line 2519: IF p_pa_debug_mode = 'Y' THEN

2515: X_MSG_DATA => X_MSG_DATA);
2516: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2517: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2518: END IF;
2519: IF p_pa_debug_mode = 'Y' THEN
2520: pa_fp_gen_amount_utils.fp_debug
2521: (p_called_mode => p_called_mode,
2522: p_msg => 'Status after calling
2523: pa_fp_gen_budget_amt_pub.create_res_asg: '

Line 2531: IF p_pa_debug_mode = 'Y' THEN

2527: END IF;
2528:
2529: /* Calling the API to update the tmp4
2530: table with resource_assignment_id */
2531: IF p_pa_debug_mode = 'Y' THEN
2532: pa_fp_gen_amount_utils.fp_debug
2533: (p_called_mode => p_called_mode,
2534: p_msg => 'Before calling
2535: pa_fp_gen_budget_amt_pub.update_res_asg',

Line 2551: IF p_pa_debug_mode = 'Y' THEN

2547: X_MSG_DATA => X_MSG_DATA);
2548: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2549: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2550: END IF;
2551: IF p_pa_debug_mode = 'Y' THEN
2552: pa_fp_gen_amount_utils.fp_debug
2553: (p_called_mode => p_called_mode,
2554: p_msg => 'Status after calling
2555: pa_fp_gen_budget_amt_pub.update_res_asg: '

Line 2591: IF p_pa_debug_mode = 'Y' THEN

2587: AND WB.WORK_TYPE_ID = PA.WORK_TYPE_ID(+);
2588:
2589: --dbms_output.put_line('From tmp4, l_proj_assgn_id_tab:'||l_proj_assgn_id_tab.count
2590: -- ||';l_proj_res_assgn_id_tab.count:'||l_proj_res_assgn_id_tab.count);
2591: IF p_pa_debug_mode = 'Y' THEN
2592: pa_fp_gen_amount_utils.fp_debug
2593: (p_called_mode => p_called_mode,
2594: p_msg => 'From tmp4, l_proj_assgn_id_tab.count:'||l_proj_assgn_id_tab.count
2595: ||';l_proj_res_assgn_id_tab.count:'||l_proj_res_assgn_id_tab.count,

Line 2627: IF p_pa_debug_mode = 'Y' THEN

2623:
2624: IF p_fp_cols_rec.x_version_type = 'ALL' AND
2625: ( l_bill_rate_ovrd_exists_flag = 'Y' OR l_rev_gen_method = 'C' ) THEN
2626:
2627: IF p_pa_debug_mode = 'Y' THEN
2628: pa_fp_gen_amount_utils.fp_debug
2629: (p_called_mode => p_called_mode,
2630: p_msg => 'Honoring bill rate override and call Rate API',
2631: p_module_name => l_module_name,

Line 2641: IF p_pa_debug_mode = 'Y' THEN

2637: FOR j IN 1..l_proj_assgn_id_tab.count LOOP
2638: --dbms_output.put_line('before cursor:l_proj_res_assgn_id_tab('||j
2639: -- ||'):'||l_proj_res_assgn_id_tab(j)
2640: -- ||';p_actuals_thru_date:'||p_actuals_thru_date);
2641: IF p_pa_debug_mode = 'Y' THEN
2642: pa_fp_gen_amount_utils.fp_debug
2643: (p_called_mode => p_called_mode,
2644: p_msg => 'before cursor:l_proj_assgn_id_tab('||j
2645: ||'):'||l_proj_assgn_id_tab(j)

Line 2783: IF p_pa_debug_mode = 'Y' THEN

2779: -- assignments with different bill rate override currency are mapped
2780: -- to different budget lines.)
2781: FOR k in 1..l_rt_start_date_tab.COUNT LOOP
2782:
2783: IF p_pa_debug_mode = 'Y' THEN
2784: pa_fp_gen_amount_utils.fp_debug
2785: (p_called_mode => p_called_mode,
2786: p_msg => 'inside FOR k in 1..l_rt_start_date_tab.COUNT LOOP ('||k
2787: ||'):'||l_rt_start_date_tab(k),

Line 2815: IF p_pa_debug_mode = 'Y' THEN

2811: ELSE
2812: l_txn_currency_code := rate_rec.project_currency_code;
2813: END IF;
2814:
2815: IF p_pa_debug_mode = 'Y' THEN
2816:
2817: pa_fp_gen_amount_utils.fp_debug
2818: (p_called_mode => p_called_mode,
2819: p_msg => 'BEFORE calling pa_plan_revenue.Get_planning_Rates',

Line 2970: IF p_pa_debug_mode = 'Y' THEN

2966: x_return_status := l_return_status;
2967: RAISE;
2968: END;
2969:
2970: IF p_pa_debug_mode = 'Y' THEN
2971: pa_fp_gen_amount_utils.fp_debug
2972: (p_called_mode => p_called_mode,
2973: p_msg => 'calling client extensions',
2974: p_module_name => l_module_name,

Line 3122: IF p_pa_debug_mode = 'Y' THEN

3118:
3119: IF x_cost_txn_curr_code <> l_Final_Txn_Currency_Code AND
3120: l_calculate_mode IN ('COST_REVENUE', 'COST') THEN
3121:
3122: IF p_pa_debug_mode = 'Y' THEN
3123: pa_fp_gen_amount_utils.fp_debug
3124: (p_called_mode => p_called_mode,
3125: p_msg => 'convert cost from '|| x_cost_txn_curr_code ||
3126: ' to '||l_Final_Txn_Currency_Code,

Line 3205: IF p_pa_debug_mode = 'Y' THEN

3201:
3202: IF x_rev_txn_curr_code <> l_Final_Txn_Currency_Code AND
3203: l_calculate_mode IN ('COST_REVENUE', 'REVENUE') THEN
3204:
3205: IF p_pa_debug_mode = 'Y' THEN
3206: pa_fp_gen_amount_utils.fp_debug
3207: (p_called_mode => p_called_mode,
3208: p_msg => 'convert revenue from '|| x_rev_txn_curr_code ||
3209: ' to '||l_Final_Txn_Currency_Code,

Line 3285: IF p_pa_debug_mode = 'Y' THEN

3281: l_calculate_mode IN ('COST_REVENUE', 'REVENUE') THEN
3282:
3283: l_insert_Txn_Currency_Code := x_cost_txn_curr_code; -- Bug 4615589
3284:
3285: IF p_pa_debug_mode = 'Y' THEN
3286: pa_fp_gen_amount_utils.fp_debug
3287: (p_called_mode => p_called_mode,
3288: p_msg => 'cost cur <> rev cur, convert revenue from '|| x_rev_txn_curr_code ||
3289: ' to '||l_insert_Txn_Currency_Code, -- Bug 4615589

Line 3357: IF p_pa_debug_mode = 'Y' THEN

3353: l_insert_Txn_Currency_Code := x_cost_txn_curr_code; -- Bug 4615589
3354:
3355: END IF; -- ELSIF x_cost_txn_curr_code <> x_rev_txn_curr_code THEN
3356:
3357: IF p_pa_debug_mode = 'Y' THEN
3358: pa_fp_gen_amount_utils.fp_debug
3359: (p_called_mode => p_called_mode,
3360: p_msg => 'Populate temporary table (pa_fp_rollup_tmp) with rates and rejection code',
3361: p_module_name => l_module_name,

Line 3450: IF p_pa_debug_mode = 'Y' THEN

3446: -- the p_entire_version parameter tells to the API to convert
3447: -- currencies in the PA_FP_ROLLUP_TMP table instead of in the
3448: -- PA_BUDGET_LINES table.
3449:
3450: IF p_pa_debug_mode = 'Y' THEN
3451: pa_fp_gen_amount_utils.fp_debug
3452: (p_called_mode => p_called_mode,
3453: p_msg => 'Before calling
3454: pa_fp_multi_currency_pkg.convert_txn_currency',

Line 3468: IF p_pa_debug_mode = 'Y' THEN

3464: X_MSG_DATA => X_MSG_DATA );
3465: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
3466: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3467: END IF;
3468: IF p_pa_debug_mode = 'Y' THEN
3469: pa_fp_gen_amount_utils.fp_debug
3470: (p_called_mode => p_called_mode,
3471: p_msg => 'Status after calling
3472: pa_fp_multi_currency_pkg.convert_txn_currency: '

Line 3694: IF p_pa_debug_mode = 'Y' THEN

3690: revenue_rejection_code is null);
3691:
3692: END LOOP; -- FOR m IN 1..l_rej_res_assignment_id_tab.COUNT LOOP
3693:
3694: IF p_pa_debug_mode = 'Y' THEN
3695: pa_fp_gen_amount_utils.fp_debug
3696: (p_called_mode => p_called_mode,
3697: p_msg => 'Group temp table data by res asgmt, txn cur and period. Insert into budget lines',
3698: p_module_name => l_module_name,

Line 3934: IF p_pa_debug_mode = 'Y' THEN

3930: FOR j IN 1..l_proj_assgn_id_tab.count LOOP
3931: --dbms_output.put_line('before cursor:l_proj_res_assgn_id_tab('||j
3932: -- ||'):'||l_proj_res_assgn_id_tab(j)
3933: -- ||';p_actuals_thru_date:'||p_actuals_thru_date);
3934: IF p_pa_debug_mode = 'Y' THEN
3935: pa_fp_gen_amount_utils.fp_debug
3936: (p_called_mode => p_called_mode,
3937: p_msg => 'before cursor:l_proj_assgn_id_tab('||j
3938: ||'):'||l_proj_assgn_id_tab(j)

Line 4019: IF p_pa_debug_mode = 'Y' THEN

4015: ELSE
4016: CLOSE FCST_NONE;
4017: END IF;
4018:
4019: IF p_pa_debug_mode = 'Y' THEN
4020: pa_fp_gen_amount_utils.fp_debug
4021: (p_called_mode => p_called_mode,
4022: p_msg => '==j=='||j
4023: ||';==l_rt_start_date_tab.count:'||l_rt_start_date_tab.count,

Line 4037: IF p_pa_debug_mode = 'Y' THEN

4033: --dbms_output.put_line('==j=='||j
4034: -- ||';l_proj_res_assgn_id_tab(j):'||l_proj_res_assgn_id_tab(j)
4035: -- ||';count:'||l_count
4036: -- ||';l_rt_start_date_tab.count:'||l_rt_start_date_tab.count);
4037: IF p_pa_debug_mode = 'Y' THEN
4038: pa_fp_gen_amount_utils.fp_debug
4039: (p_called_mode => p_called_mode,
4040: p_msg => '==j=='||j
4041: ||';l_proj_res_assgn_id_tab(j):'||l_proj_res_assgn_id_tab(j)

Line 4169: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN

4165: END LOOP; -- FOR j IN 1..l_proj_assgn_id_tab.count LOOP
4166:
4167: /*Duplicate res_assignment needs to be filtered before calling calculate API*/
4168: IF l_proj_res_assgn_id_tab.count = 0 THEN
4169: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
4170: PA_DEBUG.reset_err_stack;
4171: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
4172: PA_DEBUG.Reset_Curr_Function;
4173: END IF;

Line 4170: PA_DEBUG.reset_err_stack;

4166:
4167: /*Duplicate res_assignment needs to be filtered before calling calculate API*/
4168: IF l_proj_res_assgn_id_tab.count = 0 THEN
4169: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
4170: PA_DEBUG.reset_err_stack;
4171: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
4172: PA_DEBUG.Reset_Curr_Function;
4173: END IF;
4174: RETURN;

Line 4171: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

4167: /*Duplicate res_assignment needs to be filtered before calling calculate API*/
4168: IF l_proj_res_assgn_id_tab.count = 0 THEN
4169: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
4170: PA_DEBUG.reset_err_stack;
4171: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
4172: PA_DEBUG.Reset_Curr_Function;
4173: END IF;
4174: RETURN;
4175: END IF;

Line 4172: PA_DEBUG.Reset_Curr_Function;

4168: IF l_proj_res_assgn_id_tab.count = 0 THEN
4169: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
4170: PA_DEBUG.reset_err_stack;
4171: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
4172: PA_DEBUG.Reset_Curr_Function;
4173: END IF;
4174: RETURN;
4175: END IF;
4176: l_dp_counter := 0;

Line 4215: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN

4211: VALUES(
4212: l_res_assgn_id_tmp_tab(i),
4213: l_total_plan_quantity);
4214: END LOOP;
4215: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
4216: PA_DEBUG.reset_err_stack;
4217: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
4218: PA_DEBUG.Reset_Curr_Function;
4219: END IF;

Line 4216: PA_DEBUG.reset_err_stack;

4212: l_res_assgn_id_tmp_tab(i),
4213: l_total_plan_quantity);
4214: END LOOP;
4215: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
4216: PA_DEBUG.reset_err_stack;
4217: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
4218: PA_DEBUG.Reset_Curr_Function;
4219: END IF;
4220: RETURN;

Line 4217: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

4213: l_total_plan_quantity);
4214: END LOOP;
4215: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
4216: PA_DEBUG.reset_err_stack;
4217: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
4218: PA_DEBUG.Reset_Curr_Function;
4219: END IF;
4220: RETURN;
4221: END IF;

Line 4218: PA_DEBUG.Reset_Curr_Function;

4214: END LOOP;
4215: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
4216: PA_DEBUG.reset_err_stack;
4217: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
4218: PA_DEBUG.Reset_Curr_Function;
4219: END IF;
4220: RETURN;
4221: END IF;
4222: --dbms_output.put_line('gen_ret_manual_line_flag: '||p_fp_cols_rec.x_gen_ret_manual_line_flag);

Line 4279: IF p_pa_debug_mode = 'Y' THEN

4275: -- Calculate API with values 'BUDGET_GENERATION' and 'N', respectively, so that calling
4276: -- PJI rollup api is bypassed for increased performance.
4277:
4278: /* Calling the calculate API */
4279: IF p_pa_debug_mode = 'Y' THEN
4280: pa_fp_gen_amount_utils.fp_debug
4281: (p_called_mode => p_called_mode,
4282: p_msg => 'Before calling
4283: pa_fp_calc_plan_pkg.calculate',

Line 4336: IF p_pa_debug_mode = 'Y' THEN

4332:
4333: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
4334: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
4335: END IF;
4336: IF p_pa_debug_mode = 'Y' THEN
4337: pa_fp_gen_amount_utils.fp_debug
4338: (p_called_mode => p_called_mode,
4339: p_msg => 'Status after calling
4340: pa_fp_calc_plan_pkg.calculate: '

Line 4354: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN

4350: IF P_COMMIT_FLAG = 'Y' THEN
4351: COMMIT;
4352: END IF;
4353:
4354: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
4355: PA_DEBUG.reset_err_stack;
4356: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
4357: PA_DEBUG.Reset_Curr_Function;
4358: END IF;

Line 4355: PA_DEBUG.reset_err_stack;

4351: COMMIT;
4352: END IF;
4353:
4354: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
4355: PA_DEBUG.reset_err_stack;
4356: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
4357: PA_DEBUG.Reset_Curr_Function;
4358: END IF;
4359:

Line 4356: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

4352: END IF;
4353:
4354: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
4355: PA_DEBUG.reset_err_stack;
4356: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
4357: PA_DEBUG.Reset_Curr_Function;
4358: END IF;
4359:
4360:

Line 4357: PA_DEBUG.Reset_Curr_Function;

4353:
4354: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
4355: PA_DEBUG.reset_err_stack;
4356: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
4357: PA_DEBUG.Reset_Curr_Function;
4358: END IF;
4359:
4360:
4361: EXCEPTION

Line 4383: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN

4379: END IF;
4380: ROLLBACK;
4381: x_return_status := FND_API.G_RET_STS_ERROR;
4382:
4383: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
4384: PA_DEBUG.reset_err_stack;
4385: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
4386: PA_DEBUG.Reset_Curr_Function;
4387: END IF;

Line 4384: PA_DEBUG.reset_err_stack;

4380: ROLLBACK;
4381: x_return_status := FND_API.G_RET_STS_ERROR;
4382:
4383: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
4384: PA_DEBUG.reset_err_stack;
4385: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
4386: PA_DEBUG.Reset_Curr_Function;
4387: END IF;
4388:

Line 4385: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

4381: x_return_status := FND_API.G_RET_STS_ERROR;
4382:
4383: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
4384: PA_DEBUG.reset_err_stack;
4385: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
4386: PA_DEBUG.Reset_Curr_Function;
4387: END IF;
4388:
4389: RAISE;

Line 4386: PA_DEBUG.Reset_Curr_Function;

4382:
4383: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
4384: PA_DEBUG.reset_err_stack;
4385: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
4386: PA_DEBUG.Reset_Curr_Function;
4387: END IF;
4388:
4389: RAISE;
4390:

Line 4398: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN

4394: FND_MSG_PUB.add_exc_msg
4395: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
4396: ,p_procedure_name => 'GENERATE_BUDGET_AMT_RES_SCH');
4397:
4398: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
4399: PA_DEBUG.reset_err_stack;
4400: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
4401: PA_DEBUG.Reset_Curr_Function;
4402: END IF;

Line 4399: PA_DEBUG.reset_err_stack;

4395: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
4396: ,p_procedure_name => 'GENERATE_BUDGET_AMT_RES_SCH');
4397:
4398: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
4399: PA_DEBUG.reset_err_stack;
4400: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
4401: PA_DEBUG.Reset_Curr_Function;
4402: END IF;
4403:

Line 4400: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

4396: ,p_procedure_name => 'GENERATE_BUDGET_AMT_RES_SCH');
4397:
4398: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
4399: PA_DEBUG.reset_err_stack;
4400: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
4401: PA_DEBUG.Reset_Curr_Function;
4402: END IF;
4403:
4404: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 4401: PA_DEBUG.Reset_Curr_Function;

4397:
4398: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
4399: PA_DEBUG.reset_err_stack;
4400: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
4401: PA_DEBUG.Reset_Curr_Function;
4402: END IF;
4403:
4404: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4405: END GENERATE_BUDGET_AMT_RES_SCH;

Line 4821: IF p_pa_debug_mode = 'Y' THEN

4817: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
4818:
4819: l_project_id := p_project_id;
4820:
4821: IF p_pa_debug_mode = 'Y' THEN
4822: PA_DEBUG.SET_CURR_FUNCTION
4823: ( p_function => 'CREATE_RES_ASG',
4824: p_debug_mode => p_pa_debug_mode );
4825: END IF;

Line 4822: PA_DEBUG.SET_CURR_FUNCTION

4818:
4819: l_project_id := p_project_id;
4820:
4821: IF p_pa_debug_mode = 'Y' THEN
4822: PA_DEBUG.SET_CURR_FUNCTION
4823: ( p_function => 'CREATE_RES_ASG',
4824: p_debug_mode => p_pa_debug_mode );
4825: END IF;
4826:

Line 4824: p_debug_mode => p_pa_debug_mode );

4820:
4821: IF p_pa_debug_mode = 'Y' THEN
4822: PA_DEBUG.SET_CURR_FUNCTION
4823: ( p_function => 'CREATE_RES_ASG',
4824: p_debug_mode => p_pa_debug_mode );
4825: END IF;
4826:
4827: l_stru_sharing_code :=
4828: PA_PROJECT_STRUCTURE_UTILS.GET_STRUCTURE_SHARING_CODE

Line 4860: IF P_PA_DEBUG_MODE = 'Y' THEN

4856: l_end_date_tab;
4857: CLOSE RES_ASG1;
4858:
4859: IF l_res_list_member_id.count = 0 THEN
4860: IF P_PA_DEBUG_MODE = 'Y' THEN
4861: PA_DEBUG.Reset_Curr_Function;
4862: END IF;
4863: RETURN;
4864: END IF;

Line 4861: PA_DEBUG.Reset_Curr_Function;

4857: CLOSE RES_ASG1;
4858:
4859: IF l_res_list_member_id.count = 0 THEN
4860: IF P_PA_DEBUG_MODE = 'Y' THEN
4861: PA_DEBUG.Reset_Curr_Function;
4862: END IF;
4863: RETURN;
4864: END IF;
4865:

Line 4925: IF P_PA_DEBUG_MODE = 'Y' THEN

4921: l_end_date_tab;
4922: CLOSE RES_ASG2;
4923:
4924: IF l_res_list_member_id.count = 0 then
4925: IF P_PA_DEBUG_MODE = 'Y' THEN
4926: PA_DEBUG.Reset_Curr_Function;
4927: END IF;
4928: RETURN;
4929: END IF;

Line 4926: PA_DEBUG.Reset_Curr_Function;

4922: CLOSE RES_ASG2;
4923:
4924: IF l_res_list_member_id.count = 0 then
4925: IF P_PA_DEBUG_MODE = 'Y' THEN
4926: PA_DEBUG.Reset_Curr_Function;
4927: END IF;
4928: RETURN;
4929: END IF;
4930:

Line 4984: IF P_PA_DEBUG_MODE = 'Y' THEN

4980: l_end_date_tab;
4981: CLOSE RES_ASG3;
4982:
4983: IF l_res_list_member_id.count = 0 then
4984: IF P_PA_DEBUG_MODE = 'Y' THEN
4985: PA_DEBUG.Reset_Curr_Function;
4986: END IF;
4987: RETURN;
4988: END IF;

Line 4985: PA_DEBUG.Reset_Curr_Function;

4981: CLOSE RES_ASG3;
4982:
4983: IF l_res_list_member_id.count = 0 then
4984: IF P_PA_DEBUG_MODE = 'Y' THEN
4985: PA_DEBUG.Reset_Curr_Function;
4986: END IF;
4987: RETURN;
4988: END IF;
4989: FORALL i IN 1..l_res_list_member_id.count

Line 5045: IF P_PA_DEBUG_MODE = 'Y' THEN

5041: l_end_date_tab;
5042: CLOSE RES_ASG4;
5043:
5044: IF l_res_list_member_id.count = 0 then
5045: IF P_PA_DEBUG_MODE = 'Y' THEN
5046: PA_DEBUG.Reset_Curr_Function;
5047: END IF;
5048: RETURN;
5049: END IF;

Line 5046: PA_DEBUG.Reset_Curr_Function;

5042: CLOSE RES_ASG4;
5043:
5044: IF l_res_list_member_id.count = 0 then
5045: IF P_PA_DEBUG_MODE = 'Y' THEN
5046: PA_DEBUG.Reset_Curr_Function;
5047: END IF;
5048: RETURN;
5049: END IF;
5050: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 5050: IF P_PA_DEBUG_MODE = 'Y' THEN

5046: PA_DEBUG.Reset_Curr_Function;
5047: END IF;
5048: RETURN;
5049: END IF;
5050: IF P_PA_DEBUG_MODE = 'Y' THEN
5051: FOR i IN 1..l_res_list_member_id.count LOOP
5052: pa_fp_gen_amount_utils.fp_debug
5053: (p_msg => 'in res_asg4:@@rlm in cursor:'||l_res_list_member_id(i)
5054: ||'; @@task in cursor:'||l_task_id(i)

Line 5122: IF P_PA_DEBUG_MODE = 'Y' THEN

5118: l_end_date_tab;
5119: CLOSE RES_ASG5;
5120:
5121: IF l_res_list_member_id.count = 0 then
5122: IF P_PA_DEBUG_MODE = 'Y' THEN
5123: PA_DEBUG.Reset_Curr_Function;
5124: END IF;
5125: RETURN;
5126: END IF;

Line 5123: PA_DEBUG.Reset_Curr_Function;

5119: CLOSE RES_ASG5;
5120:
5121: IF l_res_list_member_id.count = 0 then
5122: IF P_PA_DEBUG_MODE = 'Y' THEN
5123: PA_DEBUG.Reset_Curr_Function;
5124: END IF;
5125: RETURN;
5126: END IF;
5127: FORALL i IN 1..l_res_list_member_id.count

Line 5169: IF P_PA_DEBUG_MODE = 'Y' THEN

5165: RETURNING resource_assignment_id BULK COLLECT INTO l_ins_ra_id_tbl;
5166: END IF;
5167:
5168: IF SQL%ROWCOUNT = 0 THEN
5169: IF P_PA_DEBUG_MODE = 'Y' THEN
5170: PA_DEBUG.Reset_Curr_Function;
5171: END IF;
5172: RETURN;
5173: END IF;

Line 5170: PA_DEBUG.Reset_Curr_Function;

5166: END IF;
5167:
5168: IF SQL%ROWCOUNT = 0 THEN
5169: IF P_PA_DEBUG_MODE = 'Y' THEN
5170: PA_DEBUG.Reset_Curr_Function;
5171: END IF;
5172: RETURN;
5173: END IF;
5174: --dbms_output.put_line('before res_list_map');

Line 5200: IF p_pa_debug_mode = 'Y' THEN

5196: l_da_resource_list_members_tab(kk) := l_unique_rlm_id_tab(kk);
5197: END LOOP;
5198:
5199: --Calling resource defualt API
5200: IF p_pa_debug_mode = 'Y' THEN
5201: pa_fp_gen_amount_utils.fp_debug
5202: (p_msg => 'Before calling
5203: pa_planning_resource_utils.get_resource_defaults',
5204: p_module_name => l_module_name,

Line 5255: IF p_pa_debug_mode = 'Y' THEN

5251: --dbms_output.put_line('after get_resource_defaults:'||x_return_status);
5252: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
5253: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
5254: END IF;
5255: IF p_pa_debug_mode = 'Y' THEN
5256: pa_fp_gen_amount_utils.fp_debug
5257: (p_msg => 'Status after calling
5258: pa_planning_resource_utils.get_resource_defaults'
5259: ||x_return_status,

Line 5348: IF P_PA_DEBUG_MODE = 'Y' THEN

5344: l_cbs_ele_ids;
5345: CLOSE RES_ASG2_CBS;
5346:
5347: IF l_res_list_member_id.count = 0 then
5348: IF P_PA_DEBUG_MODE = 'Y' THEN
5349: PA_DEBUG.Reset_Curr_Function;
5350: END IF;
5351: RETURN;
5352: END IF;

Line 5349: PA_DEBUG.Reset_Curr_Function;

5345: CLOSE RES_ASG2_CBS;
5346:
5347: IF l_res_list_member_id.count = 0 then
5348: IF P_PA_DEBUG_MODE = 'Y' THEN
5349: PA_DEBUG.Reset_Curr_Function;
5350: END IF;
5351: RETURN;
5352: END IF;
5353:

Line 5409: IF P_PA_DEBUG_MODE = 'Y' THEN

5405: l_cbs_ele_ids;
5406: CLOSE RES_ASG3_CBS;
5407:
5408: IF l_res_list_member_id.count = 0 then
5409: IF P_PA_DEBUG_MODE = 'Y' THEN
5410: PA_DEBUG.Reset_Curr_Function;
5411: END IF;
5412: RETURN;
5413: END IF;

Line 5410: PA_DEBUG.Reset_Curr_Function;

5406: CLOSE RES_ASG3_CBS;
5407:
5408: IF l_res_list_member_id.count = 0 then
5409: IF P_PA_DEBUG_MODE = 'Y' THEN
5410: PA_DEBUG.Reset_Curr_Function;
5411: END IF;
5412: RETURN;
5413: END IF;
5414:

Line 5473: IF P_PA_DEBUG_MODE = 'Y' THEN

5469: l_cbs_ele_ids;
5470: CLOSE RES_ASG4_CBS;
5471:
5472: IF l_res_list_member_id.count = 0 then
5473: IF P_PA_DEBUG_MODE = 'Y' THEN
5474: PA_DEBUG.Reset_Curr_Function;
5475: END IF;
5476: RETURN;
5477: END IF;

Line 5474: PA_DEBUG.Reset_Curr_Function;

5470: CLOSE RES_ASG4_CBS;
5471:
5472: IF l_res_list_member_id.count = 0 then
5473: IF P_PA_DEBUG_MODE = 'Y' THEN
5474: PA_DEBUG.Reset_Curr_Function;
5475: END IF;
5476: RETURN;
5477: END IF;
5478: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 5478: IF P_PA_DEBUG_MODE = 'Y' THEN

5474: PA_DEBUG.Reset_Curr_Function;
5475: END IF;
5476: RETURN;
5477: END IF;
5478: IF P_PA_DEBUG_MODE = 'Y' THEN
5479: FOR i IN 1..l_res_list_member_id.count LOOP
5480: pa_fp_gen_amount_utils.fp_debug
5481: (p_msg => 'in res_asg4:@@rlm in cursor:'||l_res_list_member_id(i)
5482: ||'; @@task in cursor:'||l_task_id(i)

Line 5551: IF P_PA_DEBUG_MODE = 'Y' THEN

5547: l_end_date_tab;
5548: CLOSE RES_ASG5;
5549:
5550: IF l_res_list_member_id.count = 0 then
5551: IF P_PA_DEBUG_MODE = 'Y' THEN
5552: PA_DEBUG.Reset_Curr_Function;
5553: END IF;
5554: RETURN;
5555: END IF;

Line 5552: PA_DEBUG.Reset_Curr_Function;

5548: CLOSE RES_ASG5;
5549:
5550: IF l_res_list_member_id.count = 0 then
5551: IF P_PA_DEBUG_MODE = 'Y' THEN
5552: PA_DEBUG.Reset_Curr_Function;
5553: END IF;
5554: RETURN;
5555: END IF;
5556:

Line 5598: IF P_PA_DEBUG_MODE = 'Y' THEN

5594: RETURNING resource_assignment_id BULK COLLECT INTO l_ins_ra_id_tbl;
5595: END IF;
5596:
5597: IF SQL%ROWCOUNT = 0 THEN
5598: IF P_PA_DEBUG_MODE = 'Y' THEN
5599: PA_DEBUG.Reset_Curr_Function;
5600: END IF;
5601: RETURN;
5602: END IF;

Line 5599: PA_DEBUG.Reset_Curr_Function;

5595: END IF;
5596:
5597: IF SQL%ROWCOUNT = 0 THEN
5598: IF P_PA_DEBUG_MODE = 'Y' THEN
5599: PA_DEBUG.Reset_Curr_Function;
5600: END IF;
5601: RETURN;
5602: END IF;
5603: --dbms_output.put_line('before res_list_map');

Line 5627: IF p_pa_debug_mode = 'Y' THEN

5623: l_da_resource_list_members_tab(kk) := l_unique_rlm_id_tab(kk);
5624: END LOOP;
5625:
5626: --Calling resource defualt API
5627: IF p_pa_debug_mode = 'Y' THEN
5628: pa_fp_gen_amount_utils.fp_debug
5629: (p_msg => 'Before calling
5630: pa_planning_resource_utils.get_resource_defaults',
5631: p_module_name => l_module_name,

Line 5683: IF p_pa_debug_mode = 'Y' THEN

5679: --dbms_output.put_line('after get_resource_defaults:'||x_return_status);
5680: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
5681: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
5682: END IF;
5683: IF p_pa_debug_mode = 'Y' THEN
5684: pa_fp_gen_amount_utils.fp_debug
5685: (p_msg => 'Status after calling
5686: pa_planning_resource_utils.get_resource_defaults'
5687: ||x_return_status,

Line 5751: IF P_PA_DEBUG_MODE = 'Y' THEN

5747:
5748: */ --bug#16827157
5749: --END IF;
5750:
5751: IF P_PA_DEBUG_MODE = 'Y' THEN
5752: PA_DEBUG.Reset_Curr_Function;
5753: END IF;
5754: RETURN;
5755:

Line 5752: PA_DEBUG.Reset_Curr_Function;

5748: */ --bug#16827157
5749: --END IF;
5750:
5751: IF P_PA_DEBUG_MODE = 'Y' THEN
5752: PA_DEBUG.Reset_Curr_Function;
5753: END IF;
5754: RETURN;
5755:
5756: EXCEPTION

Line 5777: IF P_PA_DEBUG_MODE = 'Y' THEN

5773: END IF;
5774: ROLLBACK;
5775: x_return_status := FND_API.G_RET_STS_ERROR;
5776:
5777: IF P_PA_DEBUG_MODE = 'Y' THEN
5778: PA_DEBUG.Reset_Curr_Function;
5779: END IF;
5780: WHEN OTHERS THEN
5781: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 5778: PA_DEBUG.Reset_Curr_Function;

5774: ROLLBACK;
5775: x_return_status := FND_API.G_RET_STS_ERROR;
5776:
5777: IF P_PA_DEBUG_MODE = 'Y' THEN
5778: PA_DEBUG.Reset_Curr_Function;
5779: END IF;
5780: WHEN OTHERS THEN
5781: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5782: x_msg_data := SUBSTR(SQLERRM,1,240);

Line 5789: IF P_PA_DEBUG_MODE = 'Y' THEN

5785: FND_MSG_PUB.add_exc_msg
5786: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
5787: ,p_procedure_name => 'CREATE_RES_ASG');
5788:
5789: IF P_PA_DEBUG_MODE = 'Y' THEN
5790: PA_DEBUG.Reset_Curr_Function;
5791: END IF;
5792: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5793:

Line 5790: PA_DEBUG.Reset_Curr_Function;

5786: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
5787: ,p_procedure_name => 'CREATE_RES_ASG');
5788:
5789: IF P_PA_DEBUG_MODE = 'Y' THEN
5790: PA_DEBUG.Reset_Curr_Function;
5791: END IF;
5792: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5793:
5794: END CREATE_RES_ASG;

Line 5844: IF p_pa_debug_mode = 'Y' THEN

5840: BEGIN
5841: X_MSG_COUNT := 0;
5842: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
5843:
5844: IF p_pa_debug_mode = 'Y' THEN
5845: pa_debug.set_curr_function( p_function => 'UPDATE_RES_ASG'
5846: ,p_debug_mode => p_pa_debug_mode);
5847: END IF;
5848: l_project_id := p_project_id;

Line 5845: pa_debug.set_curr_function( p_function => 'UPDATE_RES_ASG'

5841: X_MSG_COUNT := 0;
5842: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
5843:
5844: IF p_pa_debug_mode = 'Y' THEN
5845: pa_debug.set_curr_function( p_function => 'UPDATE_RES_ASG'
5846: ,p_debug_mode => p_pa_debug_mode);
5847: END IF;
5848: l_project_id := p_project_id;
5849:

Line 5846: ,p_debug_mode => p_pa_debug_mode);

5842: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
5843:
5844: IF p_pa_debug_mode = 'Y' THEN
5845: pa_debug.set_curr_function( p_function => 'UPDATE_RES_ASG'
5846: ,p_debug_mode => p_pa_debug_mode);
5847: END IF;
5848: l_project_id := p_project_id;
5849:
5850: l_stru_sharing_code := PA_PROJECT_STRUCTURE_UTILS.

Line 6002: IF P_PA_DEBUG_MODE = 'Y' THEN

5998: AND NVL(T.CBS_ELEMENT_ID,-1) = NVL(P.CBS_ELEMENT_ID,-1) --bug#16827157
5999: AND NVL(P.TASK_ID,0) = 0 );
6000:
6001: --@@
6002: IF P_PA_DEBUG_MODE = 'Y' THEN
6003: for i in 1..l_res_assgn_id_tab.count loop
6004: pa_fp_gen_amount_utils.fp_debug
6005: (p_msg => 'within update when share partial and planning at lowest task i:'
6006: ||i||'; ra id in cursor:'||l_res_assgn_id_tab(i)

Line 6212: IF P_PA_DEBUG_MODE = 'Y' THEN

6208: FROM pa_res_list_map_tmp4 tmp
6209: WHERE tmp.txn_resource_assignment_id = resource_assignment_id
6210: AND rownum = 1 );
6211:
6212: IF P_PA_DEBUG_MODE = 'Y' THEN
6213: PA_DEBUG.Reset_Curr_Function;
6214: END IF;
6215: RETURN;
6216:

Line 6213: PA_DEBUG.Reset_Curr_Function;

6209: WHERE tmp.txn_resource_assignment_id = resource_assignment_id
6210: AND rownum = 1 );
6211:
6212: IF P_PA_DEBUG_MODE = 'Y' THEN
6213: PA_DEBUG.Reset_Curr_Function;
6214: END IF;
6215: RETURN;
6216:
6217: EXCEPTION

Line 6224: IF P_PA_DEBUG_MODE = 'Y' THEN

6220: x_msg_data := SUBSTR(SQLERRM,1,240);
6221: FND_MSG_PUB.add_exc_msg
6222: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
6223: ,p_procedure_name => 'UPDATE_RES_ASG');
6224: IF P_PA_DEBUG_MODE = 'Y' THEN
6225: PA_DEBUG.Reset_Curr_Function;
6226: END IF;
6227: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6228:

Line 6225: PA_DEBUG.Reset_Curr_Function;

6221: FND_MSG_PUB.add_exc_msg
6222: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
6223: ,p_procedure_name => 'UPDATE_RES_ASG');
6224: IF P_PA_DEBUG_MODE = 'Y' THEN
6225: PA_DEBUG.Reset_Curr_Function;
6226: END IF;
6227: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6228:
6229: END UPDATE_RES_ASG;

Line 6260: IF p_pa_debug_mode = 'Y' THEN

6256:
6257: X_MSG_COUNT := 0;
6258: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
6259:
6260: IF p_pa_debug_mode = 'Y' THEN
6261: pa_debug.set_curr_function( p_function => 'DEL_MANUAL_BDGT_LINES'
6262: ,p_debug_mode => p_pa_debug_mode);
6263: END IF;
6264:

Line 6261: pa_debug.set_curr_function( p_function => 'DEL_MANUAL_BDGT_LINES'

6257: X_MSG_COUNT := 0;
6258: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
6259:
6260: IF p_pa_debug_mode = 'Y' THEN
6261: pa_debug.set_curr_function( p_function => 'DEL_MANUAL_BDGT_LINES'
6262: ,p_debug_mode => p_pa_debug_mode);
6263: END IF;
6264:
6265: FOR i IN 1..PX_RES_ASG_ID_TAB.count LOOP

Line 6262: ,p_debug_mode => p_pa_debug_mode);

6258: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
6259:
6260: IF p_pa_debug_mode = 'Y' THEN
6261: pa_debug.set_curr_function( p_function => 'DEL_MANUAL_BDGT_LINES'
6262: ,p_debug_mode => p_pa_debug_mode);
6263: END IF;
6264:
6265: FOR i IN 1..PX_RES_ASG_ID_TAB.count LOOP
6266: l_del_res_asg_id_tab(i) := PX_RES_ASG_ID_TAB(i);

Line 6296: IF p_pa_debug_mode = 'Y' THEN

6292: FORALL i in 1..PX_DELETED_RES_ASG_ID_TAB.count
6293: DELETE FROM PA_BUDGET_LINES
6294: WHERE RESOURCE_ASSIGNMENT_ID = PX_DELETED_RES_ASG_ID_TAB(i);
6295:
6296: IF p_pa_debug_mode = 'Y' THEN
6297: pa_fp_gen_amount_utils.fp_debug
6298: (p_msg => 'Before calling
6299: pa_fp_rollup_pkg.rollup_budget_version',
6300: p_module_name => l_module_name,

Line 6313: IF p_pa_debug_mode = 'Y' THEN

6309:
6310: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
6311: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
6312: END IF;
6313: IF p_pa_debug_mode = 'Y' THEN
6314: pa_fp_gen_amount_utils.fp_debug
6315: (p_msg => 'Status after calling
6316: pa_fp_rollup_pkg.rollup_budget_version: '
6317: ||x_return_status,

Line 6322: IF P_PA_DEBUG_MODE = 'Y' THEN

6318: p_module_name => l_module_name,
6319: p_log_level => 5);
6320: END IF;
6321:
6322: IF P_PA_DEBUG_MODE = 'Y' THEN
6323: PA_DEBUG.Reset_Curr_Function;
6324: END IF;
6325:
6326: EXCEPTION

Line 6323: PA_DEBUG.Reset_Curr_Function;

6319: p_log_level => 5);
6320: END IF;
6321:
6322: IF P_PA_DEBUG_MODE = 'Y' THEN
6323: PA_DEBUG.Reset_Curr_Function;
6324: END IF;
6325:
6326: EXCEPTION
6327: WHEN OTHERS THEN

Line 6334: IF P_PA_DEBUG_MODE = 'Y' THEN

6330: FND_MSG_PUB.add_exc_msg
6331: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
6332: ,p_procedure_name => 'DEL_MANUAL_BDGT_LINES');
6333:
6334: IF P_PA_DEBUG_MODE = 'Y' THEN
6335: PA_DEBUG.Reset_Curr_Function;
6336: END IF;
6337:
6338: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 6335: PA_DEBUG.Reset_Curr_Function;

6331: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
6332: ,p_procedure_name => 'DEL_MANUAL_BDGT_LINES');
6333:
6334: IF P_PA_DEBUG_MODE = 'Y' THEN
6335: PA_DEBUG.Reset_Curr_Function;
6336: END IF;
6337:
6338: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6339: END DEL_MANUAL_BDGT_LINES;

Line 6357: IF p_pa_debug_mode = 'Y' THEN

6353:
6354: X_MSG_COUNT := 0;
6355: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
6356:
6357: IF p_pa_debug_mode = 'Y' THEN
6358: pa_debug.set_curr_function( p_function => 'UPDATE_INIT_AMOUNTS'
6359: ,p_debug_mode => p_pa_debug_mode);
6360: END IF;
6361:

Line 6358: pa_debug.set_curr_function( p_function => 'UPDATE_INIT_AMOUNTS'

6354: X_MSG_COUNT := 0;
6355: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
6356:
6357: IF p_pa_debug_mode = 'Y' THEN
6358: pa_debug.set_curr_function( p_function => 'UPDATE_INIT_AMOUNTS'
6359: ,p_debug_mode => p_pa_debug_mode);
6360: END IF;
6361:
6362: FORALL i IN 1..P_RES_ASG_ID_TAB.count

Line 6359: ,p_debug_mode => p_pa_debug_mode);

6355: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
6356:
6357: IF p_pa_debug_mode = 'Y' THEN
6358: pa_debug.set_curr_function( p_function => 'UPDATE_INIT_AMOUNTS'
6359: ,p_debug_mode => p_pa_debug_mode);
6360: END IF;
6361:
6362: FORALL i IN 1..P_RES_ASG_ID_TAB.count
6363: UPDATE PA_BUDGET_LINES

Line 6380: IF P_PA_DEBUG_MODE = 'Y' THEN

6376: TXN_INIT_BURDENED_COST = TXN_BURDENED_COST,
6377: TXN_INIT_REVENUE = TXN_REVENUE
6378: WHERE RESOURCE_ASSIGNMENT_ID = P_RES_ASG_ID_TAB(i);
6379:
6380: IF P_PA_DEBUG_MODE = 'Y' THEN
6381: PA_DEBUG.Reset_Curr_Function;
6382: END IF;
6383:
6384: EXCEPTION

Line 6381: PA_DEBUG.Reset_Curr_Function;

6377: TXN_INIT_REVENUE = TXN_REVENUE
6378: WHERE RESOURCE_ASSIGNMENT_ID = P_RES_ASG_ID_TAB(i);
6379:
6380: IF P_PA_DEBUG_MODE = 'Y' THEN
6381: PA_DEBUG.Reset_Curr_Function;
6382: END IF;
6383:
6384: EXCEPTION
6385: WHEN OTHERS THEN

Line 6392: IF P_PA_DEBUG_MODE = 'Y' THEN

6388: FND_MSG_PUB.add_exc_msg
6389: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
6390: ,p_procedure_name => 'UPDATE_INIT_AMOUNTS');
6391:
6392: IF P_PA_DEBUG_MODE = 'Y' THEN
6393: PA_DEBUG.Reset_Curr_Function;
6394: END IF;
6395:
6396: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 6393: PA_DEBUG.Reset_Curr_Function;

6389: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
6390: ,p_procedure_name => 'UPDATE_INIT_AMOUNTS');
6391:
6392: IF P_PA_DEBUG_MODE = 'Y' THEN
6393: PA_DEBUG.Reset_Curr_Function;
6394: END IF;
6395:
6396: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6397:

Line 6421: IF p_pa_debug_mode = 'Y' THEN

6417:
6418: X_MSG_COUNT := 0;
6419: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
6420:
6421: IF p_pa_debug_mode = 'Y' THEN
6422: pa_debug.set_curr_function( p_function => 'UPDATE_BV_FOR_GEN_DATE'
6423: ,p_debug_mode => p_pa_debug_mode);
6424: END IF;
6425:

Line 6422: pa_debug.set_curr_function( p_function => 'UPDATE_BV_FOR_GEN_DATE'

6418: X_MSG_COUNT := 0;
6419: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
6420:
6421: IF p_pa_debug_mode = 'Y' THEN
6422: pa_debug.set_curr_function( p_function => 'UPDATE_BV_FOR_GEN_DATE'
6423: ,p_debug_mode => p_pa_debug_mode);
6424: END IF;
6425:
6426: UPDATE PA_BUDGET_VERSIONS

Line 6423: ,p_debug_mode => p_pa_debug_mode);

6419: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
6420:
6421: IF p_pa_debug_mode = 'Y' THEN
6422: pa_debug.set_curr_function( p_function => 'UPDATE_BV_FOR_GEN_DATE'
6423: ,p_debug_mode => p_pa_debug_mode);
6424: END IF;
6425:
6426: UPDATE PA_BUDGET_VERSIONS
6427: SET LAST_AMT_GEN_DATE = l_sysdate,

Line 6437: IF P_PA_DEBUG_MODE = 'Y' THEN

6433: record_version_number = nvl(record_version_number,0)+1,
6434: ETC_START_DATE = p_etc_start_date
6435: WHERE BUDGET_VERSION_ID = P_BUDGET_VERSION_ID;
6436:
6437: IF P_PA_DEBUG_MODE = 'Y' THEN
6438: PA_DEBUG.Reset_Curr_Function;
6439: END IF;
6440:
6441: EXCEPTION

Line 6438: PA_DEBUG.Reset_Curr_Function;

6434: ETC_START_DATE = p_etc_start_date
6435: WHERE BUDGET_VERSION_ID = P_BUDGET_VERSION_ID;
6436:
6437: IF P_PA_DEBUG_MODE = 'Y' THEN
6438: PA_DEBUG.Reset_Curr_Function;
6439: END IF;
6440:
6441: EXCEPTION
6442: WHEN OTHERS THEN

Line 6450: IF P_PA_DEBUG_MODE = 'Y' THEN

6446: FND_MSG_PUB.add_exc_msg
6447: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
6448: ,p_procedure_name => 'UPDATE_BV_FOR_GEN_DATE');
6449:
6450: IF P_PA_DEBUG_MODE = 'Y' THEN
6451: PA_DEBUG.Reset_Curr_Function;
6452: END IF;
6453:
6454: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 6451: PA_DEBUG.Reset_Curr_Function;

6447: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
6448: ,p_procedure_name => 'UPDATE_BV_FOR_GEN_DATE');
6449:
6450: IF P_PA_DEBUG_MODE = 'Y' THEN
6451: PA_DEBUG.Reset_Curr_Function;
6452: END IF;
6453:
6454: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6455:

Line 6476: IF p_pa_debug_mode = 'Y' THEN

6472: BEGIN
6473: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
6474: X_MSG_COUNT := 0;
6475:
6476: IF p_pa_debug_mode = 'Y' THEN
6477: pa_debug.set_curr_function( p_function => 'GET_GENERATED_RES_ASG'
6478: ,p_debug_mode => p_pa_debug_mode);
6479: END IF;
6480:

Line 6477: pa_debug.set_curr_function( p_function => 'GET_GENERATED_RES_ASG'

6473: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
6474: X_MSG_COUNT := 0;
6475:
6476: IF p_pa_debug_mode = 'Y' THEN
6477: pa_debug.set_curr_function( p_function => 'GET_GENERATED_RES_ASG'
6478: ,p_debug_mode => p_pa_debug_mode);
6479: END IF;
6480:
6481: /* For first time call PA_GEN_RES_ASG_ID_TAB will

Line 6478: ,p_debug_mode => p_pa_debug_mode);

6474: X_MSG_COUNT := 0;
6475:
6476: IF p_pa_debug_mode = 'Y' THEN
6477: pa_debug.set_curr_function( p_function => 'GET_GENERATED_RES_ASG'
6478: ,p_debug_mode => p_pa_debug_mode);
6479: END IF;
6480:
6481: /* For first time call PA_GEN_RES_ASG_ID_TAB will
6482: be empty so it is bulk collected from tmp4 table*/

Line 6515: IF P_PA_DEBUG_MODE = 'Y' THEN

6511: END IF;
6512: END LOOP;
6513: END IF;
6514:
6515: IF P_PA_DEBUG_MODE = 'Y' THEN
6516: PA_DEBUG.Reset_Curr_Function;
6517: END IF;
6518:
6519: EXCEPTION

Line 6516: PA_DEBUG.Reset_Curr_Function;

6512: END LOOP;
6513: END IF;
6514:
6515: IF P_PA_DEBUG_MODE = 'Y' THEN
6516: PA_DEBUG.Reset_Curr_Function;
6517: END IF;
6518:
6519: EXCEPTION
6520: WHEN OTHERS THEN

Line 6527: IF P_PA_DEBUG_MODE = 'Y' THEN

6523: FND_MSG_PUB.add_exc_msg
6524: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
6525: ,p_procedure_name => 'GET_GENERATED_RES_ASG');
6526:
6527: IF P_PA_DEBUG_MODE = 'Y' THEN
6528: PA_DEBUG.Reset_Curr_Function;
6529: END IF;
6530:
6531: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 6528: PA_DEBUG.Reset_Curr_Function;

6524: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
6525: ,p_procedure_name => 'GET_GENERATED_RES_ASG');
6526:
6527: IF P_PA_DEBUG_MODE = 'Y' THEN
6528: PA_DEBUG.Reset_Curr_Function;
6529: END IF;
6530:
6531: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6532: END GET_GENERATED_RES_ASG;

Line 6577: IF p_pa_debug_mode = 'Y' THEN

6573: BEGIN
6574: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
6575: X_MSG_COUNT := 0;
6576:
6577: IF p_pa_debug_mode = 'Y' THEN
6578: pa_debug.set_curr_function( p_function => 'INSERT_TXN_CURRENCY'
6579: ,p_debug_mode => p_pa_debug_mode);
6580: END IF;
6581:

Line 6578: pa_debug.set_curr_function( p_function => 'INSERT_TXN_CURRENCY'

6574: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
6575: X_MSG_COUNT := 0;
6576:
6577: IF p_pa_debug_mode = 'Y' THEN
6578: pa_debug.set_curr_function( p_function => 'INSERT_TXN_CURRENCY'
6579: ,p_debug_mode => p_pa_debug_mode);
6580: END IF;
6581:
6582: l_fp_cols_rec := P_FP_COLS_REC;

Line 6579: ,p_debug_mode => p_pa_debug_mode);

6575: X_MSG_COUNT := 0;
6576:
6577: IF p_pa_debug_mode = 'Y' THEN
6578: pa_debug.set_curr_function( p_function => 'INSERT_TXN_CURRENCY'
6579: ,p_debug_mode => p_pa_debug_mode);
6580: END IF;
6581:
6582: l_fp_cols_rec := P_FP_COLS_REC;
6583:

Line 6590: IF p_pa_debug_mode = 'Y' THEN

6586: IF ( l_fp_cols_rec.x_proj_fp_options_id is null
6587: OR l_fp_cols_rec.x_fin_plan_type_id is null
6588: OR p_project_id is null) THEN
6589:
6590: IF p_pa_debug_mode = 'Y' THEN
6591: pa_fp_gen_amount_utils.fp_debug
6592: (p_msg => 'Before calling
6593: pa_fp_gen_amount_utils.get_plan_version_dtls',
6594: p_module_name => l_module_name,

Line 6609: IF p_pa_debug_mode = 'Y' THEN

6605:
6606: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
6607: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
6608: END IF;
6609: IF p_pa_debug_mode = 'Y' THEN
6610: pa_fp_gen_amount_utils.fp_debug
6611: (p_msg => 'Status after calling
6612: pa_fp_gen_amount_utils.get_plan_version_dtls: '
6613: ||x_return_status,

Line 6735: IF P_PA_DEBUG_MODE = 'Y' THEN

6731: l_sysdate );
6732:
6733: END LOOP; -- FOR j IN l_proj_fp_options_id_tbl.first .. l_proj_fp_options_id_tbl.last
6734:
6735: IF P_PA_DEBUG_MODE = 'Y' THEN
6736: PA_DEBUG.Reset_Curr_Function;
6737: END IF;
6738:
6739: EXCEPTION

Line 6736: PA_DEBUG.Reset_Curr_Function;

6732:
6733: END LOOP; -- FOR j IN l_proj_fp_options_id_tbl.first .. l_proj_fp_options_id_tbl.last
6734:
6735: IF P_PA_DEBUG_MODE = 'Y' THEN
6736: PA_DEBUG.Reset_Curr_Function;
6737: END IF;
6738:
6739: EXCEPTION
6740: WHEN OTHERS THEN

Line 6747: IF P_PA_DEBUG_MODE = 'Y' THEN

6743: FND_MSG_PUB.add_exc_msg
6744: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
6745: ,p_procedure_name => 'INSERT_TXN_CURRENCY');
6746:
6747: IF P_PA_DEBUG_MODE = 'Y' THEN
6748: PA_DEBUG.Reset_Curr_Function;
6749: END IF;
6750:
6751: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 6748: PA_DEBUG.Reset_Curr_Function;

6744: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
6745: ,p_procedure_name => 'INSERT_TXN_CURRENCY');
6746:
6747: IF P_PA_DEBUG_MODE = 'Y' THEN
6748: PA_DEBUG.Reset_Curr_Function;
6749: END IF;
6750:
6751: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6752: END INSERT_TXN_CURRENCY;

Line 6765: IF p_pa_debug_mode = 'Y' THEN

6761:
6762: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
6763: X_MSG_COUNT := 0;
6764:
6765: IF p_pa_debug_mode = 'Y' THEN
6766: pa_debug.set_curr_function( p_function => 'RESET_COST_AMOUNTS'
6767: ,p_debug_mode => p_pa_debug_mode);
6768: END IF;
6769:

Line 6766: pa_debug.set_curr_function( p_function => 'RESET_COST_AMOUNTS'

6762: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
6763: X_MSG_COUNT := 0;
6764:
6765: IF p_pa_debug_mode = 'Y' THEN
6766: pa_debug.set_curr_function( p_function => 'RESET_COST_AMOUNTS'
6767: ,p_debug_mode => p_pa_debug_mode);
6768: END IF;
6769:
6770: UPDATE PA_BUDGET_LINES

Line 6767: ,p_debug_mode => p_pa_debug_mode);

6763: X_MSG_COUNT := 0;
6764:
6765: IF p_pa_debug_mode = 'Y' THEN
6766: pa_debug.set_curr_function( p_function => 'RESET_COST_AMOUNTS'
6767: ,p_debug_mode => p_pa_debug_mode);
6768: END IF;
6769:
6770: UPDATE PA_BUDGET_LINES
6771: SET RAW_COST = null,

Line 6787: IF P_PA_DEBUG_MODE = 'Y' THEN

6783: PROJECT_COST_RATE_DATE_TYPE = null,
6784: PROJECT_COST_RATE_DATE = null
6785: WHERE BUDGET_VERSION_ID = P_BUDGET_VERSION_ID;
6786:
6787: IF P_PA_DEBUG_MODE = 'Y' THEN
6788: PA_DEBUG.Reset_Curr_Function;
6789: END IF;
6790:
6791: EXCEPTION

Line 6788: PA_DEBUG.Reset_Curr_Function;

6784: PROJECT_COST_RATE_DATE = null
6785: WHERE BUDGET_VERSION_ID = P_BUDGET_VERSION_ID;
6786:
6787: IF P_PA_DEBUG_MODE = 'Y' THEN
6788: PA_DEBUG.Reset_Curr_Function;
6789: END IF;
6790:
6791: EXCEPTION
6792: WHEN OTHERS THEN

Line 6799: IF P_PA_DEBUG_MODE = 'Y' THEN

6795: FND_MSG_PUB.add_exc_msg
6796: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
6797: ,p_procedure_name => 'RESET_COST_AMOUNTS');
6798:
6799: IF P_PA_DEBUG_MODE = 'Y' THEN
6800: PA_DEBUG.Reset_Curr_Function;
6801: END IF;
6802:
6803: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 6800: PA_DEBUG.Reset_Curr_Function;

6796: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
6797: ,p_procedure_name => 'RESET_COST_AMOUNTS');
6798:
6799: IF P_PA_DEBUG_MODE = 'Y' THEN
6800: PA_DEBUG.Reset_Curr_Function;
6801: END IF;
6802:
6803: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6804:

Line 6941: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN

6937: END IF;
6938: X_MSG_COUNT := 0;
6939: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
6940:
6941: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
6942: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GEN_REV_BDGT_AMT_RES_SCH_WRP');
6943: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
6944: pa_debug.set_curr_function( p_function => 'GEN_REV_BDGT_AMT_RES_SCH_WRP',
6945: p_debug_mode => p_pa_debug_mode);

Line 6942: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GEN_REV_BDGT_AMT_RES_SCH_WRP');

6938: X_MSG_COUNT := 0;
6939: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
6940:
6941: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
6942: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GEN_REV_BDGT_AMT_RES_SCH_WRP');
6943: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
6944: pa_debug.set_curr_function( p_function => 'GEN_REV_BDGT_AMT_RES_SCH_WRP',
6945: p_debug_mode => p_pa_debug_mode);
6946: END IF;

Line 6943: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

6939: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
6940:
6941: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
6942: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GEN_REV_BDGT_AMT_RES_SCH_WRP');
6943: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
6944: pa_debug.set_curr_function( p_function => 'GEN_REV_BDGT_AMT_RES_SCH_WRP',
6945: p_debug_mode => p_pa_debug_mode);
6946: END IF;
6947:

Line 6944: pa_debug.set_curr_function( p_function => 'GEN_REV_BDGT_AMT_RES_SCH_WRP',

6940:
6941: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
6942: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GEN_REV_BDGT_AMT_RES_SCH_WRP');
6943: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
6944: pa_debug.set_curr_function( p_function => 'GEN_REV_BDGT_AMT_RES_SCH_WRP',
6945: p_debug_mode => p_pa_debug_mode);
6946: END IF;
6947:
6948:

Line 6945: p_debug_mode => p_pa_debug_mode);

6941: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
6942: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GEN_REV_BDGT_AMT_RES_SCH_WRP');
6943: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
6944: pa_debug.set_curr_function( p_function => 'GEN_REV_BDGT_AMT_RES_SCH_WRP',
6945: p_debug_mode => p_pa_debug_mode);
6946: END IF;
6947:
6948:
6949: IF p_pa_debug_mode = 'Y' THEN

Line 6949: IF p_pa_debug_mode = 'Y' THEN

6945: p_debug_mode => p_pa_debug_mode);
6946: END IF;
6947:
6948:
6949: IF p_pa_debug_mode = 'Y' THEN
6950: pa_fp_gen_amount_utils.fp_debug
6951: (p_msg => 'Before calling
6952: pa_fp_gen_budget_amt_pub.generate_budget_amt_res_sch',
6953: p_module_name => l_module_name,

Line 6981: IF p_pa_debug_mode = 'Y' THEN

6977: X_MSG_DATA => X_MSG_DATA);
6978: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
6979: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
6980: END IF;
6981: IF p_pa_debug_mode = 'Y' THEN
6982: pa_fp_gen_amount_utils.fp_debug
6983: (p_msg => 'Status after calling
6984: pa_fp_gen_budget_amt_pub.generate_budget_amt_res_sch: '
6985: ||x_return_status,

Line 7099: IF p_pa_debug_mode = 'Y' THEN

7095: AND fp.fin_plan_version_id = ra.budget_version_id
7096: AND ra.resource_list_member_id = rlm.resource_list_member_id;
7097:
7098: FOR i IN 1..l_res_asg_id_tab.count LOOP
7099: IF p_pa_debug_mode = 'Y' THEN
7100: pa_fp_gen_amount_utils.fp_debug
7101: (p_msg => 'Before calling pa_plan_revenue.Get_planning_Rates',
7102: p_module_name => l_module_name,
7103: p_log_level => 5);

Line 7182: IF p_pa_debug_mode = 'Y' THEN

7178: x_msg_count => x_msg_count);
7179: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
7180: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
7181: END IF;
7182: IF p_pa_debug_mode = 'Y' THEN
7183: pa_fp_gen_amount_utils.fp_debug
7184: (p_msg => 'Status after calling pa_plan_revenue.Get_planning_Rates'
7185: ||x_return_status,
7186: p_module_name => l_module_name,

Line 7242: IF p_pa_debug_mode = 'Y' THEN

7238: -- Calculate API with values 'BUDGET_GENERATION' and 'N', respectively, so that calling
7239: -- PJI rollup api is bypassed for increased performance.
7240:
7241: /* Calling the calculate API */
7242: IF p_pa_debug_mode = 'Y' THEN
7243: pa_fp_gen_amount_utils.fp_debug
7244: (p_called_mode => p_called_mode,
7245: p_msg => 'Before calling
7246: pa_fp_calc_plan_pkg.calculate',

Line 7292: IF p_pa_debug_mode = 'Y' THEN

7288: ,X_MSG_DATA => X_MSG_DATA);
7289: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
7290: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
7291: END IF;
7292: IF p_pa_debug_mode = 'Y' THEN
7293: pa_fp_gen_amount_utils.fp_debug
7294: (p_called_mode => p_called_mode,
7295: p_msg => 'Status after calling
7296: pa_fp_calc_plan_pkg.calculate: '

Line 7306: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN

7302: IF P_COMMIT_FLAG = 'Y' THEN
7303: COMMIT;
7304: END IF;
7305:
7306: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7307: PA_DEBUG.reset_err_stack;
7308: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7309: PA_DEBUG.Reset_Curr_Function;
7310: END IF;

Line 7307: PA_DEBUG.reset_err_stack;

7303: COMMIT;
7304: END IF;
7305:
7306: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7307: PA_DEBUG.reset_err_stack;
7308: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7309: PA_DEBUG.Reset_Curr_Function;
7310: END IF;
7311:

Line 7308: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

7304: END IF;
7305:
7306: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7307: PA_DEBUG.reset_err_stack;
7308: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7309: PA_DEBUG.Reset_Curr_Function;
7310: END IF;
7311:
7312: EXCEPTION

Line 7309: PA_DEBUG.Reset_Curr_Function;

7305:
7306: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7307: PA_DEBUG.reset_err_stack;
7308: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7309: PA_DEBUG.Reset_Curr_Function;
7310: END IF;
7311:
7312: EXCEPTION
7313: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 7333: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN

7329: END IF;
7330: ROLLBACK;
7331: x_return_status := FND_API.G_RET_STS_ERROR;
7332:
7333: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7334: PA_DEBUG.reset_err_stack;
7335: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7336: PA_DEBUG.Reset_Curr_Function;
7337: END IF;

Line 7334: PA_DEBUG.reset_err_stack;

7330: ROLLBACK;
7331: x_return_status := FND_API.G_RET_STS_ERROR;
7332:
7333: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7334: PA_DEBUG.reset_err_stack;
7335: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7336: PA_DEBUG.Reset_Curr_Function;
7337: END IF;
7338:

Line 7335: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

7331: x_return_status := FND_API.G_RET_STS_ERROR;
7332:
7333: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7334: PA_DEBUG.reset_err_stack;
7335: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7336: PA_DEBUG.Reset_Curr_Function;
7337: END IF;
7338:
7339: WHEN OTHERS THEN

Line 7336: PA_DEBUG.Reset_Curr_Function;

7332:
7333: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7334: PA_DEBUG.reset_err_stack;
7335: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7336: PA_DEBUG.Reset_Curr_Function;
7337: END IF;
7338:
7339: WHEN OTHERS THEN
7340: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 7346: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN

7342: FND_MSG_PUB.add_exc_msg
7343: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
7344: ,p_procedure_name => 'GEN_REV_BDGT_AMT_RES_SCH_WRP');
7345:
7346: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7347: PA_DEBUG.reset_err_stack;
7348: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7349: PA_DEBUG.Reset_Curr_Function;
7350: END IF;

Line 7347: PA_DEBUG.reset_err_stack;

7343: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
7344: ,p_procedure_name => 'GEN_REV_BDGT_AMT_RES_SCH_WRP');
7345:
7346: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7347: PA_DEBUG.reset_err_stack;
7348: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7349: PA_DEBUG.Reset_Curr_Function;
7350: END IF;
7351:

Line 7348: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

7344: ,p_procedure_name => 'GEN_REV_BDGT_AMT_RES_SCH_WRP');
7345:
7346: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7347: PA_DEBUG.reset_err_stack;
7348: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7349: PA_DEBUG.Reset_Curr_Function;
7350: END IF;
7351:
7352: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 7349: PA_DEBUG.Reset_Curr_Function;

7345:
7346: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7347: PA_DEBUG.reset_err_stack;
7348: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7349: PA_DEBUG.Reset_Curr_Function;
7350: END IF;
7351:
7352: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7353:

Line 7487: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN

7483: END IF;
7484: X_MSG_COUNT := 0;
7485: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
7486:
7487: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7488: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GEN_REV_BDGT_AMT_RES_SCH_WRP');
7489: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7490: pa_debug.set_curr_function(p_function => 'GEN_WP_REV_BDGT_AMT_WRP',
7491: p_debug_mode => p_pa_debug_mode);

Line 7488: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GEN_REV_BDGT_AMT_RES_SCH_WRP');

7484: X_MSG_COUNT := 0;
7485: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
7486:
7487: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7488: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GEN_REV_BDGT_AMT_RES_SCH_WRP');
7489: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7490: pa_debug.set_curr_function(p_function => 'GEN_WP_REV_BDGT_AMT_WRP',
7491: p_debug_mode => p_pa_debug_mode);
7492: END IF;

Line 7489: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

7485: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
7486:
7487: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7488: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GEN_REV_BDGT_AMT_RES_SCH_WRP');
7489: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7490: pa_debug.set_curr_function(p_function => 'GEN_WP_REV_BDGT_AMT_WRP',
7491: p_debug_mode => p_pa_debug_mode);
7492: END IF;
7493:

Line 7490: pa_debug.set_curr_function(p_function => 'GEN_WP_REV_BDGT_AMT_WRP',

7486:
7487: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7488: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GEN_REV_BDGT_AMT_RES_SCH_WRP');
7489: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7490: pa_debug.set_curr_function(p_function => 'GEN_WP_REV_BDGT_AMT_WRP',
7491: p_debug_mode => p_pa_debug_mode);
7492: END IF;
7493:
7494: IF p_pa_debug_mode = 'Y' THEN

Line 7491: p_debug_mode => p_pa_debug_mode);

7487: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7488: PA_DEBUG.init_err_stack('PA_FP_GEN_BUDGET_AMT_PUB.GEN_REV_BDGT_AMT_RES_SCH_WRP');
7489: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7490: pa_debug.set_curr_function(p_function => 'GEN_WP_REV_BDGT_AMT_WRP',
7491: p_debug_mode => p_pa_debug_mode);
7492: END IF;
7493:
7494: IF p_pa_debug_mode = 'Y' THEN
7495: pa_fp_gen_amount_utils.fp_debug

Line 7494: IF p_pa_debug_mode = 'Y' THEN

7490: pa_debug.set_curr_function(p_function => 'GEN_WP_REV_BDGT_AMT_WRP',
7491: p_debug_mode => p_pa_debug_mode);
7492: END IF;
7493:
7494: IF p_pa_debug_mode = 'Y' THEN
7495: pa_fp_gen_amount_utils.fp_debug
7496: (p_called_mode => p_called_mode,
7497: p_msg => 'Before calling
7498: pa_fp_wp_gen_budget_amt_pub.generate_wp_budget_amt',

Line 7525: IF p_pa_debug_mode = 'Y' THEN

7521: X_MSG_DATA => X_MSG_DATA);
7522: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
7523: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
7524: END IF;
7525: IF p_pa_debug_mode = 'Y' THEN
7526: pa_fp_gen_amount_utils.fp_debug
7527: (p_called_mode => p_called_mode,
7528: p_msg => 'Status after calling pa_fp_wp_gen_budget_amt_pub.generate_wp_budget_amt:'
7529: ||x_return_status,

Line 7643: IF p_pa_debug_mode = 'Y' THEN

7639: AND fp.fin_plan_version_id = ra.budget_version_id
7640: AND ra.resource_list_member_id = rlm.resource_list_member_id;
7641:
7642: FOR i IN 1..l_res_asg_id_tab.count LOOP
7643: IF p_pa_debug_mode = 'Y' THEN
7644: pa_fp_gen_amount_utils.fp_debug
7645: (p_msg => 'Before calling pa_plan_revenue.Get_planning_Rates',
7646: p_module_name => l_module_name,
7647: p_log_level => 5);

Line 7726: IF p_pa_debug_mode = 'Y' THEN

7722: x_msg_count => x_msg_count);
7723: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
7724: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
7725: END IF;
7726: IF p_pa_debug_mode = 'Y' THEN
7727: pa_fp_gen_amount_utils.fp_debug
7728: (p_msg => 'Status after calling pa_plan_revenue.Get_planning_Rates'
7729: ||x_return_status,
7730: p_module_name => l_module_name,

Line 7786: IF p_pa_debug_mode = 'Y' THEN

7782: -- Calculate API with values 'BUDGET_GENERATION' and 'N', respectively, so that calling
7783: -- PJI rollup api is bypassed for increased performance.
7784:
7785: /* Calling the calculate API */
7786: IF p_pa_debug_mode = 'Y' THEN
7787: pa_fp_gen_amount_utils.fp_debug
7788: (p_called_mode => p_called_mode,
7789: p_msg => 'Before calling pa_fp_calc_plan_pkg.calculate',
7790: p_module_name => l_module_name,

Line 7835: IF p_pa_debug_mode = 'Y' THEN

7831: ,X_MSG_DATA => X_MSG_DATA);
7832: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
7833: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
7834: END IF;
7835: IF p_pa_debug_mode = 'Y' THEN
7836: pa_fp_gen_amount_utils.fp_debug
7837: (p_called_mode => p_called_mode,
7838: p_msg => 'Status after calling
7839: pa_fp_calc_plan_pkg.calculate: '

Line 7849: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN

7845: IF P_COMMIT_FLAG = 'Y' THEN
7846: COMMIT;
7847: END IF;
7848:
7849: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7850: PA_DEBUG.reset_err_stack;
7851: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7852: PA_DEBUG.Reset_Curr_Function;
7853: END IF;

Line 7850: PA_DEBUG.reset_err_stack;

7846: COMMIT;
7847: END IF;
7848:
7849: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7850: PA_DEBUG.reset_err_stack;
7851: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7852: PA_DEBUG.Reset_Curr_Function;
7853: END IF;
7854:

Line 7851: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

7847: END IF;
7848:
7849: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7850: PA_DEBUG.reset_err_stack;
7851: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7852: PA_DEBUG.Reset_Curr_Function;
7853: END IF;
7854:
7855: EXCEPTION

Line 7852: PA_DEBUG.Reset_Curr_Function;

7848:
7849: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7850: PA_DEBUG.reset_err_stack;
7851: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7852: PA_DEBUG.Reset_Curr_Function;
7853: END IF;
7854:
7855: EXCEPTION
7856: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 7876: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN

7872: END IF;
7873: ROLLBACK;
7874: x_return_status := FND_API.G_RET_STS_ERROR;
7875:
7876: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7877: PA_DEBUG.reset_err_stack;
7878: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7879: PA_DEBUG.Reset_Curr_Function;
7880: END IF;

Line 7877: PA_DEBUG.reset_err_stack;

7873: ROLLBACK;
7874: x_return_status := FND_API.G_RET_STS_ERROR;
7875:
7876: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7877: PA_DEBUG.reset_err_stack;
7878: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7879: PA_DEBUG.Reset_Curr_Function;
7880: END IF;
7881: WHEN OTHERS THEN

Line 7878: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

7874: x_return_status := FND_API.G_RET_STS_ERROR;
7875:
7876: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7877: PA_DEBUG.reset_err_stack;
7878: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7879: PA_DEBUG.Reset_Curr_Function;
7880: END IF;
7881: WHEN OTHERS THEN
7882: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 7879: PA_DEBUG.Reset_Curr_Function;

7875:
7876: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7877: PA_DEBUG.reset_err_stack;
7878: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7879: PA_DEBUG.Reset_Curr_Function;
7880: END IF;
7881: WHEN OTHERS THEN
7882: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7883: x_msg_data := SUBSTR(SQLERRM,1,240);

Line 7888: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN

7884: FND_MSG_PUB.add_exc_msg
7885: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
7886: ,p_procedure_name => 'GEN_WP_REV_BDGT_AMT_WRP');
7887:
7888: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7889: PA_DEBUG.reset_err_stack;
7890: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7891: PA_DEBUG.Reset_Curr_Function;
7892: END IF;

Line 7889: PA_DEBUG.reset_err_stack;

7885: ( p_pkg_name => 'PA_FP_GEN_BUDGET_AMT_PUB'
7886: ,p_procedure_name => 'GEN_WP_REV_BDGT_AMT_WRP');
7887:
7888: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7889: PA_DEBUG.reset_err_stack;
7890: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7891: PA_DEBUG.Reset_Curr_Function;
7892: END IF;
7893:

Line 7890: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN

7886: ,p_procedure_name => 'GEN_WP_REV_BDGT_AMT_WRP');
7887:
7888: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7889: PA_DEBUG.reset_err_stack;
7890: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7891: PA_DEBUG.Reset_Curr_Function;
7892: END IF;
7893:
7894: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 7891: PA_DEBUG.Reset_Curr_Function;

7887:
7888: IF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'Y' THEN
7889: PA_DEBUG.reset_err_stack;
7890: ELSIF p_pa_debug_mode = 'Y' AND p_init_msg_flag = 'N' THEN
7891: PA_DEBUG.Reset_Curr_Function;
7892: END IF;
7893:
7894: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7895: