eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PA_FIN_PLAN_PUB dependencies on PA_DEBUG

Line 20: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

16:
17: /* ------------------------------------------------------------------------- */
18:
19:
20: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
21:
22: --Bug 3964755. Introduced the parameter p_calling_context. Valid values are NULL and 'COPY_PROJECT'
23: procedure Submit_Current_Working
24: (p_calling_context IN VARCHAR2 DEFAULT NULL,

Line 50: IF P_PA_DEBUG_MODE = 'Y' THEN

46: l_return_status VARCHAR2(2000);
47:
48: begin
49: FND_MSG_PUB.initialize;
50: IF P_PA_DEBUG_MODE = 'Y' THEN
51: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Submit_Current_Working');
52: END IF;
53: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
54: l_debug_mode := NVL(l_debug_mode, 'Y');

Line 51: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Submit_Current_Working');

47:
48: begin
49: FND_MSG_PUB.initialize;
50: IF P_PA_DEBUG_MODE = 'Y' THEN
51: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Submit_Current_Working');
52: END IF;
53: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
54: l_debug_mode := NVL(l_debug_mode, 'Y');
55: IF P_PA_DEBUG_MODE = 'Y' THEN

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

49: FND_MSG_PUB.initialize;
50: IF P_PA_DEBUG_MODE = 'Y' THEN
51: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Submit_Current_Working');
52: END IF;
53: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
54: l_debug_mode := NVL(l_debug_mode, 'Y');
55: IF P_PA_DEBUG_MODE = 'Y' THEN
56: pa_debug.set_process('Submit_Current_Working: ' || 'PLSQL','LOG',l_debug_mode);
57: END IF;

Line 55: IF P_PA_DEBUG_MODE = 'Y' THEN

51: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Submit_Current_Working');
52: END IF;
53: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
54: l_debug_mode := NVL(l_debug_mode, 'Y');
55: IF P_PA_DEBUG_MODE = 'Y' THEN
56: pa_debug.set_process('Submit_Current_Working: ' || 'PLSQL','LOG',l_debug_mode);
57: END IF;
58: x_msg_count := 0;
59: /* CHECK FOR BUSINESS RULES VIOLATIONS */

Line 56: pa_debug.set_process('Submit_Current_Working: ' || 'PLSQL','LOG',l_debug_mode);

52: END IF;
53: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
54: l_debug_mode := NVL(l_debug_mode, 'Y');
55: IF P_PA_DEBUG_MODE = 'Y' THEN
56: pa_debug.set_process('Submit_Current_Working: ' || 'PLSQL','LOG',l_debug_mode);
57: END IF;
58: x_msg_count := 0;
59: /* CHECK FOR BUSINESS RULES VIOLATIONS */
60: /* check for null budget_version_id */

Line 92: IF P_PA_DEBUG_MODE = 'Y' THEN

88: po.fin_plan_option_level_code = 'PLAN_VERSION' and
89: po.fin_plan_type_id = pt.fin_plan_type_id;
90: /* allow user to Submit a version that's already Submitted */
91: if not ((l_current_working_flag = 'Y') and (l_budget_status_code in ('W', 'S'))) then
92: IF P_PA_DEBUG_MODE = 'Y' THEN
93: pa_debug.write_file('Submit_Current_Working: ' || 'selected budget version is not a current working version');
94: END IF;
95: x_return_status := FND_API.G_RET_STS_ERROR;
96: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 93: pa_debug.write_file('Submit_Current_Working: ' || 'selected budget version is not a current working version');

89: po.fin_plan_type_id = pt.fin_plan_type_id;
90: /* allow user to Submit a version that's already Submitted */
91: if not ((l_current_working_flag = 'Y') and (l_budget_status_code in ('W', 'S'))) then
92: IF P_PA_DEBUG_MODE = 'Y' THEN
93: pa_debug.write_file('Submit_Current_Working: ' || 'selected budget version is not a current working version');
94: END IF;
95: x_return_status := FND_API.G_RET_STS_ERROR;
96: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
97: p_msg_name => 'PA_FP_SUBMIT_CURRENT_WORKING');

Line 125: IF P_PA_DEBUG_MODE = 'Y' THEN

121: x_valid_flag => l_valid_flag,
122: x_return_status => l_return_status,
123: x_error_msg_code => l_error_msg_code);
124: if x_return_status = FND_API.G_RET_STS_ERROR then
125: IF P_PA_DEBUG_MODE = 'Y' THEN
126: pa_debug.write_file('Submit_Current_Working: ' || 'record version number error ');
127: END IF;
128: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
129: p_msg_name => l_error_msg_code);

Line 126: pa_debug.write_file('Submit_Current_Working: ' || 'record version number error ');

122: x_return_status => l_return_status,
123: x_error_msg_code => l_error_msg_code);
124: if x_return_status = FND_API.G_RET_STS_ERROR then
125: IF P_PA_DEBUG_MODE = 'Y' THEN
126: pa_debug.write_file('Submit_Current_Working: ' || 'record version number error ');
127: END IF;
128: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
129: p_msg_name => l_error_msg_code);
130: end if;

Line 161: pa_debug.reset_err_stack;

157: x_msg_count := l_msg_count;
158: else
159: x_msg_count := l_msg_count;
160: end if;
161: pa_debug.reset_err_stack;
162: return;
163: end if;
164:
165: /* If There are NO Business Rules Violations , Then proceed with Submit Current Working */

Line 166: IF P_PA_DEBUG_MODE = 'Y' THEN

162: return;
163: end if;
164:
165: /* If There are NO Business Rules Violations , Then proceed with Submit Current Working */
166: IF P_PA_DEBUG_MODE = 'Y' THEN
167: pa_debug.write_file('Submit_Current_Working: ' || 'no business rules violations');
168: END IF;
169: if l_msg_count = 0 then
170: SAVEPOINT PA_FIN_PLAN_PUB_SUBMIT_WORKING;

Line 167: pa_debug.write_file('Submit_Current_Working: ' || 'no business rules violations');

163: end if;
164:
165: /* If There are NO Business Rules Violations , Then proceed with Submit Current Working */
166: IF P_PA_DEBUG_MODE = 'Y' THEN
167: pa_debug.write_file('Submit_Current_Working: ' || 'no business rules violations');
168: END IF;
169: if l_msg_count = 0 then
170: SAVEPOINT PA_FIN_PLAN_PUB_SUBMIT_WORKING;
171:

Line 213: pa_debug.reset_err_stack;

209: x_msg_count := l_msg_count;
210: else
211: x_msg_count := l_msg_count;
212: end if;
213: pa_debug.reset_err_stack;
214: return;
215: end if;
216: end if; -- l_fin_plan_type_code
217:

Line 220: pa_debug.reset_err_stack;

216: end if; -- l_fin_plan_type_code
217:
218: end if;
219: x_return_status := FND_API.G_RET_STS_SUCCESS;
220: pa_debug.reset_err_stack;
221:
222: exception
223: when pa_fin_plan_pub.rollback_on_error then
224: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 224: IF P_PA_DEBUG_MODE = 'Y' THEN

220: pa_debug.reset_err_stack;
221:
222: exception
223: when pa_fin_plan_pub.rollback_on_error then
224: IF P_PA_DEBUG_MODE = 'Y' THEN
225: pa_debug.write_file('Submit_Current_Working: ' || 'Procedure Submit_working: rollback_on_error exception');
226: END IF;
227: rollback to PA_FIN_PLAN_PUB_SUBMIT_WORKING;
228: raise FND_API.G_EXC_UNEXPECTED_ERROR;

Line 225: pa_debug.write_file('Submit_Current_Working: ' || 'Procedure Submit_working: rollback_on_error exception');

221:
222: exception
223: when pa_fin_plan_pub.rollback_on_error then
224: IF P_PA_DEBUG_MODE = 'Y' THEN
225: pa_debug.write_file('Submit_Current_Working: ' || 'Procedure Submit_working: rollback_on_error exception');
226: END IF;
227: rollback to PA_FIN_PLAN_PUB_SUBMIT_WORKING;
228: raise FND_API.G_EXC_UNEXPECTED_ERROR;
229:

Line 237: pa_debug.reset_err_stack;

233: x_msg_count := 1;
234: x_msg_data := SQLERRM;
235: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PUB',
236: p_procedure_name => 'Submit_Current_Working');
237: pa_debug.reset_err_stack;
238: raise FND_API.G_EXC_UNEXPECTED_ERROR;
239: end Submit_Current_Working;
240: /* ------------------------------------------------------------------------- */
241:

Line 278: IF P_PA_DEBUG_MODE = 'Y' THEN

274: l_resource_list_id pa_budget_versions.resource_list_id%TYPE;
275:
276: begin
277: FND_MSG_PUB.initialize;
278: IF P_PA_DEBUG_MODE = 'Y' THEN
279: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Set_Current_Working');
280: END IF;
281: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
282: l_debug_mode := NVL(l_debug_mode, 'Y');

Line 279: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Set_Current_Working');

275:
276: begin
277: FND_MSG_PUB.initialize;
278: IF P_PA_DEBUG_MODE = 'Y' THEN
279: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Set_Current_Working');
280: END IF;
281: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
282: l_debug_mode := NVL(l_debug_mode, 'Y');
283: IF P_PA_DEBUG_MODE = 'Y' THEN

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

277: FND_MSG_PUB.initialize;
278: IF P_PA_DEBUG_MODE = 'Y' THEN
279: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Set_Current_Working');
280: END IF;
281: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
282: l_debug_mode := NVL(l_debug_mode, 'Y');
283: IF P_PA_DEBUG_MODE = 'Y' THEN
284: pa_debug.set_process('Set_Current_Working: ' || 'PLSQL','LOG',l_debug_mode);
285: END IF;

Line 283: IF P_PA_DEBUG_MODE = 'Y' THEN

279: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Set_Current_Working');
280: END IF;
281: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
282: l_debug_mode := NVL(l_debug_mode, 'Y');
283: IF P_PA_DEBUG_MODE = 'Y' THEN
284: pa_debug.set_process('Set_Current_Working: ' || 'PLSQL','LOG',l_debug_mode);
285: END IF;
286: x_msg_count := 0;
287: /* CHECK FOR BUSINESS RULES VIOLATIONS */

Line 284: pa_debug.set_process('Set_Current_Working: ' || 'PLSQL','LOG',l_debug_mode);

280: END IF;
281: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
282: l_debug_mode := NVL(l_debug_mode, 'Y');
283: IF P_PA_DEBUG_MODE = 'Y' THEN
284: pa_debug.set_process('Set_Current_Working: ' || 'PLSQL','LOG',l_debug_mode);
285: END IF;
286: x_msg_count := 0;
287: /* CHECK FOR BUSINESS RULES VIOLATIONS */
288: /* check for null budget_version_id */

Line 290: IF P_PA_DEBUG_MODE = 'Y' THEN

286: x_msg_count := 0;
287: /* CHECK FOR BUSINESS RULES VIOLATIONS */
288: /* check for null budget_version_id */
289: if p_budget_version_id is NULL then
290: IF P_PA_DEBUG_MODE = 'Y' THEN
291: pa_debug.write_file('Set_Current_Working: ' || 'no budget version id entered');
292: END IF;
293: x_return_status := FND_API.G_RET_STS_ERROR;
294: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 291: pa_debug.write_file('Set_Current_Working: ' || 'no budget version id entered');

287: /* CHECK FOR BUSINESS RULES VIOLATIONS */
288: /* check for null budget_version_id */
289: if p_budget_version_id is NULL then
290: IF P_PA_DEBUG_MODE = 'Y' THEN
291: pa_debug.write_file('Set_Current_Working: ' || 'no budget version id entered');
292: END IF;
293: x_return_status := FND_API.G_RET_STS_ERROR;
294: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
295: p_msg_name => 'PA_FP_NO_PLAN_VERSION');

Line 305: IF P_PA_DEBUG_MODE = 'Y' THEN

301: p_record_version_number => p_record_version_number,
302: x_valid_flag => l_valid1_flag,
303: x_return_status => l_return_status,
304: x_error_msg_code => l_error_msg_code);
305: IF P_PA_DEBUG_MODE = 'Y' THEN
306: pa_debug.write_file('Set_Current_Working: ' || 'record version check #1: return status is ' || l_valid1_flag);
307: END IF;
308: /* check to see if the old current working budget version has been updated */
309: /* by someone else already */

Line 306: pa_debug.write_file('Set_Current_Working: ' || 'record version check #1: return status is ' || l_valid1_flag);

302: x_valid_flag => l_valid1_flag,
303: x_return_status => l_return_status,
304: x_error_msg_code => l_error_msg_code);
305: IF P_PA_DEBUG_MODE = 'Y' THEN
306: pa_debug.write_file('Set_Current_Working: ' || 'record version check #1: return status is ' || l_valid1_flag);
307: END IF;
308: /* check to see if the old current working budget version has been updated */
309: /* by someone else already */
310: /* BUT, need to check if there was an old current working version */

Line 318: IF P_PA_DEBUG_MODE = 'Y' THEN

314: p_record_version_number => p_orig_record_version_number,
315: x_valid_flag => l_valid2_flag,
316: x_return_status => x_return_status,
317: x_error_msg_code => l_error_msg_code);
318: IF P_PA_DEBUG_MODE = 'Y' THEN
319: pa_debug.write_file('Set_Current_Working: ' || 'record version check #2: return status is ' || l_valid2_flag);
320: END IF;
321: if (not ((l_valid1_flag = 'Y')and (l_valid2_flag='Y'))) then
322: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 319: pa_debug.write_file('Set_Current_Working: ' || 'record version check #2: return status is ' || l_valid2_flag);

315: x_valid_flag => l_valid2_flag,
316: x_return_status => x_return_status,
317: x_error_msg_code => l_error_msg_code);
318: IF P_PA_DEBUG_MODE = 'Y' THEN
319: pa_debug.write_file('Set_Current_Working: ' || 'record version check #2: return status is ' || l_valid2_flag);
320: END IF;
321: if (not ((l_valid1_flag = 'Y')and (l_valid2_flag='Y'))) then
322: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
323: p_msg_name => l_error_msg_code);

Line 362: pa_debug.reset_err_stack;

358: x_msg_count := l_msg_count;
359: else
360: x_msg_count := l_msg_count;
361: end if;
362: pa_debug.reset_err_stack;
363: return;
364: end if;
365:
366: /* Fix for bug 2651851:

Line 532: pa_debug.reset_err_stack;

528: x_msg_count := l_msg_count;
529: else
530: x_msg_count := l_msg_count;
531: end if;
532: pa_debug.reset_err_stack;
533: return;
534: end if;
535: END IF;
536:

Line 538: IF P_PA_DEBUG_MODE = 'Y' THEN

534: end if;
535: END IF;
536:
537: /* If There are NO Business Rules Violations , Then proceed with Set Current Working */
538: IF P_PA_DEBUG_MODE = 'Y' THEN
539: pa_debug.write_file('Set_Current_Working: ' || 'no business rules violations: beginning Set Current Working');
540: END IF;
541: if l_msg_count = 0 then
542: SAVEPOINT PA_FIN_PLAN_PUB_SET_WORKING;

Line 539: pa_debug.write_file('Set_Current_Working: ' || 'no business rules violations: beginning Set Current Working');

535: END IF;
536:
537: /* If There are NO Business Rules Violations , Then proceed with Set Current Working */
538: IF P_PA_DEBUG_MODE = 'Y' THEN
539: pa_debug.write_file('Set_Current_Working: ' || 'no business rules violations: beginning Set Current Working');
540: END IF;
541: if l_msg_count = 0 then
542: SAVEPOINT PA_FIN_PLAN_PUB_SET_WORKING;
543: /* remove the CURRENT_WORKING status from the old current working version */

Line 570: pa_debug.reset_err_stack;

566: where
567: budget_version_id=p_budget_version_id;
568: end if;
569: x_return_status := FND_API.G_RET_STS_SUCCESS;
570: pa_debug.reset_err_stack;
571: exception
572: when pa_fin_plan_pub.rollback_on_error then
573: IF P_PA_DEBUG_MODE = 'Y' THEN
574: pa_debug.write_file('Procedure Set_Current_Working: rollback_on_error exception');

Line 573: IF P_PA_DEBUG_MODE = 'Y' THEN

569: x_return_status := FND_API.G_RET_STS_SUCCESS;
570: pa_debug.reset_err_stack;
571: exception
572: when pa_fin_plan_pub.rollback_on_error then
573: IF P_PA_DEBUG_MODE = 'Y' THEN
574: pa_debug.write_file('Procedure Set_Current_Working: rollback_on_error exception');
575: END IF;
576: rollback to PA_FIN_PLAN_PUB_SET_WORKING;
577: raise FND_API.G_EXC_UNEXPECTED_ERROR;

Line 574: pa_debug.write_file('Procedure Set_Current_Working: rollback_on_error exception');

570: pa_debug.reset_err_stack;
571: exception
572: when pa_fin_plan_pub.rollback_on_error then
573: IF P_PA_DEBUG_MODE = 'Y' THEN
574: pa_debug.write_file('Procedure Set_Current_Working: rollback_on_error exception');
575: END IF;
576: rollback to PA_FIN_PLAN_PUB_SET_WORKING;
577: raise FND_API.G_EXC_UNEXPECTED_ERROR;
578:

Line 586: pa_debug.reset_err_stack;

582: x_msg_count := 1;
583: x_msg_data := SQLERRM;
584: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PUB',
585: p_procedure_name => 'Set_Current_Working');
586: pa_debug.reset_err_stack;
587: raise FND_API.G_EXC_UNEXPECTED_ERROR;
588: end Set_Current_Working;
589: /* ------------------------------------------------------------------------- */
590:

Line 613: IF P_PA_DEBUG_MODE = 'Y' THEN

609: l_return_status VARCHAR2(2000);
610:
611: begin
612: FND_MSG_PUB.initialize;
613: IF P_PA_DEBUG_MODE = 'Y' THEN
614: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Rework_Submitted');
615: END IF;
616: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
617: l_debug_mode := NVL(l_debug_mode, 'Y');

Line 614: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Rework_Submitted');

610:
611: begin
612: FND_MSG_PUB.initialize;
613: IF P_PA_DEBUG_MODE = 'Y' THEN
614: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Rework_Submitted');
615: END IF;
616: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
617: l_debug_mode := NVL(l_debug_mode, 'Y');
618: IF P_PA_DEBUG_MODE = 'Y' THEN

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

612: FND_MSG_PUB.initialize;
613: IF P_PA_DEBUG_MODE = 'Y' THEN
614: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Rework_Submitted');
615: END IF;
616: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
617: l_debug_mode := NVL(l_debug_mode, 'Y');
618: IF P_PA_DEBUG_MODE = 'Y' THEN
619: pa_debug.set_process('Rework_Submitted: ' || 'PLSQL','LOG',l_debug_mode);
620: END IF;

Line 618: IF P_PA_DEBUG_MODE = 'Y' THEN

614: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Rework_Submitted');
615: END IF;
616: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
617: l_debug_mode := NVL(l_debug_mode, 'Y');
618: IF P_PA_DEBUG_MODE = 'Y' THEN
619: pa_debug.set_process('Rework_Submitted: ' || 'PLSQL','LOG',l_debug_mode);
620: END IF;
621: x_msg_count := 0;
622:

Line 619: pa_debug.set_process('Rework_Submitted: ' || 'PLSQL','LOG',l_debug_mode);

615: END IF;
616: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
617: l_debug_mode := NVL(l_debug_mode, 'Y');
618: IF P_PA_DEBUG_MODE = 'Y' THEN
619: pa_debug.set_process('Rework_Submitted: ' || 'PLSQL','LOG',l_debug_mode);
620: END IF;
621: x_msg_count := 0;
622:
623: /* CHECK FOR BUSINESS RULES VIOLATIONS */

Line 643: IF P_PA_DEBUG_MODE = 'Y' THEN

639: pa_budget_versions
640: where
641: budget_version_id = p_budget_version_id;
642: if ((l_budget_status_code <> 'S') or (l_current_working_flag <> 'Y')) then
643: IF P_PA_DEBUG_MODE = 'Y' THEN
644: pa_debug.write_file('Rework_Submitted: ' || 'version is not a submitted current working version');
645: END IF;
646: x_return_status := FND_API.G_RET_STS_ERROR;
647: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 644: pa_debug.write_file('Rework_Submitted: ' || 'version is not a submitted current working version');

640: where
641: budget_version_id = p_budget_version_id;
642: if ((l_budget_status_code <> 'S') or (l_current_working_flag <> 'Y')) then
643: IF P_PA_DEBUG_MODE = 'Y' THEN
644: pa_debug.write_file('Rework_Submitted: ' || 'version is not a submitted current working version');
645: END IF;
646: x_return_status := FND_API.G_RET_STS_ERROR;
647: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
648: p_msg_name => 'PA_FP_REWORK_SUBMITTED');

Line 679: pa_debug.reset_err_stack;

675: x_msg_count := l_msg_count;
676: else
677: x_msg_count := l_msg_count;
678: end if;
679: pa_debug.reset_err_stack;
680: return;
681: end if;
682:
683: /* If There are NO Business Rules Violations , Then proceed with Rework Submitted */

Line 685: IF P_PA_DEBUG_MODE = 'Y' THEN

681: end if;
682:
683: /* If There are NO Business Rules Violations , Then proceed with Rework Submitted */
684: if l_msg_count = 0 then
685: IF P_PA_DEBUG_MODE = 'Y' THEN
686: pa_debug.write_file('Rework_Submitted: ' || 'no business logic errors; proceeding with Rework Submitted');
687: END IF;
688: SAVEPOINT PA_FIN_PLAN_PUB_REWORK;
689: /* set the BUDGET_STATUS_CODE from 'W' to 'S' */

Line 686: pa_debug.write_file('Rework_Submitted: ' || 'no business logic errors; proceeding with Rework Submitted');

682:
683: /* If There are NO Business Rules Violations , Then proceed with Rework Submitted */
684: if l_msg_count = 0 then
685: IF P_PA_DEBUG_MODE = 'Y' THEN
686: pa_debug.write_file('Rework_Submitted: ' || 'no business logic errors; proceeding with Rework Submitted');
687: END IF;
688: SAVEPOINT PA_FIN_PLAN_PUB_REWORK;
689: /* set the BUDGET_STATUS_CODE from 'W' to 'S' */
690: update

Line 702: pa_debug.reset_err_stack;

698: where
699: budget_version_id=p_budget_version_id;
700: end if;
701: x_return_status := FND_API.G_RET_STS_SUCCESS;
702: pa_debug.reset_err_stack;
703:
704: exception
705: when pa_fin_plan_pub.rollback_on_error then
706: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 706: IF P_PA_DEBUG_MODE = 'Y' THEN

702: pa_debug.reset_err_stack;
703:
704: exception
705: when pa_fin_plan_pub.rollback_on_error then
706: IF P_PA_DEBUG_MODE = 'Y' THEN
707: pa_debug.write_file('Procedure Rework_Submitted: rollback_on_error exception');
708: END IF;
709: rollback to PA_FIN_PLAN_PUB_REWORK;
710: raise FND_API.G_EXC_UNEXPECTED_ERROR;

Line 707: pa_debug.write_file('Procedure Rework_Submitted: rollback_on_error exception');

703:
704: exception
705: when pa_fin_plan_pub.rollback_on_error then
706: IF P_PA_DEBUG_MODE = 'Y' THEN
707: pa_debug.write_file('Procedure Rework_Submitted: rollback_on_error exception');
708: END IF;
709: rollback to PA_FIN_PLAN_PUB_REWORK;
710: raise FND_API.G_EXC_UNEXPECTED_ERROR;
711:

Line 719: pa_debug.reset_err_stack;

715: x_msg_count := 1;
716: x_msg_data := SQLERRM;
717: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PUB',
718: p_procedure_name => 'Rework_Submitted');
719: pa_debug.reset_err_stack;
720: raise FND_API.G_EXC_UNEXPECTED_ERROR;
721: end Rework_Submitted;
722: /* ------------------------------------------------------------------------- */
723:

Line 746: IF P_PA_DEBUG_MODE = 'Y' THEN

742: l_msg_index_out NUMBER;
743:
744: begin
745: FND_MSG_PUB.initialize;
746: IF P_PA_DEBUG_MODE = 'Y' THEN
747: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Mark_As_Original');
748: END IF;
749: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
750: l_debug_mode := NVL(l_debug_mode, 'Y');

Line 747: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Mark_As_Original');

743:
744: begin
745: FND_MSG_PUB.initialize;
746: IF P_PA_DEBUG_MODE = 'Y' THEN
747: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Mark_As_Original');
748: END IF;
749: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
750: l_debug_mode := NVL(l_debug_mode, 'Y');
751: IF P_PA_DEBUG_MODE = 'Y' THEN

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

745: FND_MSG_PUB.initialize;
746: IF P_PA_DEBUG_MODE = 'Y' THEN
747: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Mark_As_Original');
748: END IF;
749: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
750: l_debug_mode := NVL(l_debug_mode, 'Y');
751: IF P_PA_DEBUG_MODE = 'Y' THEN
752: pa_debug.set_process('Mark_As_Original: ' || 'PLSQL','LOG',l_debug_mode);
753: END IF;

Line 751: IF P_PA_DEBUG_MODE = 'Y' THEN

747: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Mark_As_Original');
748: END IF;
749: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
750: l_debug_mode := NVL(l_debug_mode, 'Y');
751: IF P_PA_DEBUG_MODE = 'Y' THEN
752: pa_debug.set_process('Mark_As_Original: ' || 'PLSQL','LOG',l_debug_mode);
753: END IF;
754: x_msg_count := 0;
755: /* CHECK FOR BUSINESS RULES VIOLATIONS */

Line 752: pa_debug.set_process('Mark_As_Original: ' || 'PLSQL','LOG',l_debug_mode);

748: END IF;
749: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
750: l_debug_mode := NVL(l_debug_mode, 'Y');
751: IF P_PA_DEBUG_MODE = 'Y' THEN
752: pa_debug.set_process('Mark_As_Original: ' || 'PLSQL','LOG',l_debug_mode);
753: END IF;
754: x_msg_count := 0;
755: /* CHECK FOR BUSINESS RULES VIOLATIONS */
756: /* check for null budget_version_id */

Line 803: pa_debug.reset_err_stack;

799: x_msg_count := l_msg_count;
800: else
801: x_msg_count := l_msg_count;
802: end if;
803: pa_debug.reset_err_stack;
804: return;
805: end if;
806:
807: /* If There are NO Business Rules Violations , Then proceed with Mark As Original */

Line 809: IF P_PA_DEBUG_MODE = 'Y' THEN

805: end if;
806:
807: /* If There are NO Business Rules Violations , Then proceed with Mark As Original */
808: if l_msg_count = 0 then
809: IF P_PA_DEBUG_MODE = 'Y' THEN
810: pa_debug.write_file('Mark_As_Original: ' || 'no business violations; continuing with Mark As Original');
811: END IF;
812: SAVEPOINT PA_FIN_PLAN_PUB_MARK_ORIGINAL;
813: /* remove the ORIGINAL status from the old original version */

Line 810: pa_debug.write_file('Mark_As_Original: ' || 'no business violations; continuing with Mark As Original');

806:
807: /* If There are NO Business Rules Violations , Then proceed with Mark As Original */
808: if l_msg_count = 0 then
809: IF P_PA_DEBUG_MODE = 'Y' THEN
810: pa_debug.write_file('Mark_As_Original: ' || 'no business violations; continuing with Mark As Original');
811: END IF;
812: SAVEPOINT PA_FIN_PLAN_PUB_MARK_ORIGINAL;
813: /* remove the ORIGINAL status from the old original version */
814:

Line 863: pa_debug.write('Mark_As_Original','Calling PJI_FM_XBS_ACCUM_MAINT.PLAN_ORIGINAL ' ,5);

859:
860: DECLARE
861: l_budget_version_ids SYSTEM.pa_num_tbl_type := SYSTEM.pa_num_tbl_type(p_budget_version_id);
862: BEGIN
863: pa_debug.write('Mark_As_Original','Calling PJI_FM_XBS_ACCUM_MAINT.PLAN_ORIGINAL ' ,5);
864: pa_debug.write('Mark_As_Original','p_baseline_version_id '|| p_budget_version_id,5);
865: PJI_FM_XBS_ACCUM_MAINT.PLAN_ORIGINAL (
866: p_original_version_id => p_budget_version_id,
867: x_return_status => l_return_status,

Line 864: pa_debug.write('Mark_As_Original','p_baseline_version_id '|| p_budget_version_id,5);

860: DECLARE
861: l_budget_version_ids SYSTEM.pa_num_tbl_type := SYSTEM.pa_num_tbl_type(p_budget_version_id);
862: BEGIN
863: pa_debug.write('Mark_As_Original','Calling PJI_FM_XBS_ACCUM_MAINT.PLAN_ORIGINAL ' ,5);
864: pa_debug.write('Mark_As_Original','p_baseline_version_id '|| p_budget_version_id,5);
865: PJI_FM_XBS_ACCUM_MAINT.PLAN_ORIGINAL (
866: p_original_version_id => p_budget_version_id,
867: x_return_status => l_return_status,
868: x_msg_code => l_error_msg_code);

Line 882: IF P_PA_DEBUG_MODE = 'Y' THEN

878:
879:
880: exception
881: when pa_fin_plan_pub.rollback_on_error then
882: IF P_PA_DEBUG_MODE = 'Y' THEN
883: pa_debug.write_file('Procedure Mark_As_Original: rollback_on_error exception');
884: END IF;
885: rollback to PA_FIN_PLAN_PUB_MARK_ORIGINAL;
886: raise FND_API.G_EXC_UNEXPECTED_ERROR;

Line 883: pa_debug.write_file('Procedure Mark_As_Original: rollback_on_error exception');

879:
880: exception
881: when pa_fin_plan_pub.rollback_on_error then
882: IF P_PA_DEBUG_MODE = 'Y' THEN
883: pa_debug.write_file('Procedure Mark_As_Original: rollback_on_error exception');
884: END IF;
885: rollback to PA_FIN_PLAN_PUB_MARK_ORIGINAL;
886: raise FND_API.G_EXC_UNEXPECTED_ERROR;
887:

Line 895: pa_debug.reset_err_stack;

891: x_msg_count := 1;
892: x_msg_data := SQLERRM;
893: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PUB',
894: p_procedure_name => 'Mark_As_Original');
895: pa_debug.reset_err_stack;
896: raise FND_API.G_EXC_UNEXPECTED_ERROR;
897: end Mark_As_Original;
898: /* ------------------------------------------------------------------------- */
899:

Line 956: IF P_PA_DEBUG_MODE = 'Y' THEN

952: l_resource_assignments_rec l_resource_assignments_csr%ROWTYPE;
953:
954: begin
955: FND_MSG_PUB.initialize;
956: IF P_PA_DEBUG_MODE = 'Y' THEN
957: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Delete_Version');
958: END IF;
959: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
960: l_debug_mode := NVL(l_debug_mode, 'Y');

Line 957: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Delete_Version');

953:
954: begin
955: FND_MSG_PUB.initialize;
956: IF P_PA_DEBUG_MODE = 'Y' THEN
957: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Delete_Version');
958: END IF;
959: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
960: l_debug_mode := NVL(l_debug_mode, 'Y');
961: IF P_PA_DEBUG_MODE = 'Y' THEN

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

955: FND_MSG_PUB.initialize;
956: IF P_PA_DEBUG_MODE = 'Y' THEN
957: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Delete_Version');
958: END IF;
959: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
960: l_debug_mode := NVL(l_debug_mode, 'Y');
961: IF P_PA_DEBUG_MODE = 'Y' THEN
962: pa_debug.set_process('Delete_Version: ' || 'PLSQL','LOG',l_debug_mode);
963: END IF;

Line 961: IF P_PA_DEBUG_MODE = 'Y' THEN

957: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Delete_Version');
958: END IF;
959: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
960: l_debug_mode := NVL(l_debug_mode, 'Y');
961: IF P_PA_DEBUG_MODE = 'Y' THEN
962: pa_debug.set_process('Delete_Version: ' || 'PLSQL','LOG',l_debug_mode);
963: END IF;
964: x_msg_count := 0;
965:

Line 962: pa_debug.set_process('Delete_Version: ' || 'PLSQL','LOG',l_debug_mode);

958: END IF;
959: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
960: l_debug_mode := NVL(l_debug_mode, 'Y');
961: IF P_PA_DEBUG_MODE = 'Y' THEN
962: pa_debug.set_process('Delete_Version: ' || 'PLSQL','LOG',l_debug_mode);
963: END IF;
964: x_msg_count := 0;
965:
966: --------------------------------------------------------------------

Line 972: pa_debug.g_err_stage:='p_context value is invalid - p_context :' || p_context;

968: --------------------------------------------------------------------
969: IF NOT ((p_context = PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_BUDGET) OR
970: (p_context = PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_WORKPLAN)) THEN
971: IF l_debug_mode = 'Y' THEN
972: pa_debug.g_err_stage:='p_context value is invalid - p_context :' || p_context;
973: pa_debug.write('PA_FIN_PLAN_PUB.Delete_Version: ' || l_module_name,pa_debug.g_err_stage,5);
974: END IF;
975: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
976: p_msg_name => 'PA_FP_INV_PARAM_PASSED');

Line 973: pa_debug.write('PA_FIN_PLAN_PUB.Delete_Version: ' || l_module_name,pa_debug.g_err_stage,5);

969: IF NOT ((p_context = PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_BUDGET) OR
970: (p_context = PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_WORKPLAN)) THEN
971: IF l_debug_mode = 'Y' THEN
972: pa_debug.g_err_stage:='p_context value is invalid - p_context :' || p_context;
973: pa_debug.write('PA_FIN_PLAN_PUB.Delete_Version: ' || l_module_name,pa_debug.g_err_stage,5);
974: END IF;
975: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
976: p_msg_name => 'PA_FP_INV_PARAM_PASSED');
977: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 993: pa_debug.g_err_stage:= 'p_context '||p_context;

989: p_budget_version_id IS NULL AND
990: p_project_id IS NULL THEN
991:
992: IF l_debug_mode = 'Y' THEN
993: pa_debug.g_err_stage:= 'p_context '||p_context;
994: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
995:
996: pa_debug.g_err_stage:= 'p_budget_version_id '||p_budget_version_id;
997: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);

Line 994: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);

990: p_project_id IS NULL THEN
991:
992: IF l_debug_mode = 'Y' THEN
993: pa_debug.g_err_stage:= 'p_context '||p_context;
994: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
995:
996: pa_debug.g_err_stage:= 'p_budget_version_id '||p_budget_version_id;
997: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
998:

Line 996: pa_debug.g_err_stage:= 'p_budget_version_id '||p_budget_version_id;

992: IF l_debug_mode = 'Y' THEN
993: pa_debug.g_err_stage:= 'p_context '||p_context;
994: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
995:
996: pa_debug.g_err_stage:= 'p_budget_version_id '||p_budget_version_id;
997: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
998:
999: pa_debug.g_err_stage:= 'p_project_id '||p_project_id;
1000: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);

Line 997: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);

993: pa_debug.g_err_stage:= 'p_context '||p_context;
994: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
995:
996: pa_debug.g_err_stage:= 'p_budget_version_id '||p_budget_version_id;
997: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
998:
999: pa_debug.g_err_stage:= 'p_project_id '||p_project_id;
1000: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
1001:

Line 999: pa_debug.g_err_stage:= 'p_project_id '||p_project_id;

995:
996: pa_debug.g_err_stage:= 'p_budget_version_id '||p_budget_version_id;
997: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
998:
999: pa_debug.g_err_stage:= 'p_project_id '||p_project_id;
1000: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
1001:
1002: END IF;
1003:

Line 1000: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);

996: pa_debug.g_err_stage:= 'p_budget_version_id '||p_budget_version_id;
997: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
998:
999: pa_debug.g_err_stage:= 'p_project_id '||p_project_id;
1000: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
1001:
1002: END IF;
1003:
1004: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 1053: IF P_PA_DEBUG_MODE = 'Y' THEN

1049: budget_version_id = p_budget_version_id;
1050:
1051: if l_budget_status_code <> 'W' then
1052: if l_budget_status_code = 'S' then
1053: IF P_PA_DEBUG_MODE = 'Y' THEN
1054: pa_debug.write_file('Delete_Version: ' || 'budget status code is S');
1055: END IF;
1056: x_return_status := FND_API.G_RET_STS_ERROR;
1057: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 1054: pa_debug.write_file('Delete_Version: ' || 'budget status code is S');

1050:
1051: if l_budget_status_code <> 'W' then
1052: if l_budget_status_code = 'S' then
1053: IF P_PA_DEBUG_MODE = 'Y' THEN
1054: pa_debug.write_file('Delete_Version: ' || 'budget status code is S');
1055: END IF;
1056: x_return_status := FND_API.G_RET_STS_ERROR;
1057: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
1058: p_msg_name => 'PA_FP_DELETE_WORKING');

Line 1080: pa_debug.write(l_module_name,'Error getting version details',3);

1076: where p.project_id = v.project_id
1077: and v.budget_version_id = p_budget_version_id;
1078: EXCEPTION
1079: WHEN NO_DATA_FOUND THEN
1080: pa_debug.write(l_module_name,'Error getting version details',3);
1081: RAISE;
1082: END;
1083:
1084: IF NOT (nvl(l_baseline_funding_flag,'N') = 'Y' AND

Line 1176: pa_debug.reset_err_stack;

1172: x_msg_count := l_msg_count;
1173: else
1174: x_msg_count := l_msg_count;
1175: end if;
1176: pa_debug.reset_err_stack;
1177: return;
1178: end if;
1179:
1180:

Line 1183: IF P_PA_DEBUG_MODE = 'Y' THEN

1179:
1180:
1181: /* If There are NO Business Rules Violations , Then proceed with Delete Version */
1182: if l_msg_count = 0 then
1183: IF P_PA_DEBUG_MODE = 'Y' THEN
1184: pa_debug.write_file('Delete_Version: ' || 'no business errors: continuing with Delete Version');
1185: END IF;
1186: SAVEPOINT PA_FIN_PLAN_PUB_DELETE;
1187: IF p_context=PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_WORKPLAN THEN

Line 1184: pa_debug.write_file('Delete_Version: ' || 'no business errors: continuing with Delete Version');

1180:
1181: /* If There are NO Business Rules Violations , Then proceed with Delete Version */
1182: if l_msg_count = 0 then
1183: IF P_PA_DEBUG_MODE = 'Y' THEN
1184: pa_debug.write_file('Delete_Version: ' || 'no business errors: continuing with Delete Version');
1185: END IF;
1186: SAVEPOINT PA_FIN_PLAN_PUB_DELETE;
1187: IF p_context=PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_WORKPLAN THEN
1188:

Line 1197: pa_debug.g_err_stage:= 'Workplan plan type does not exist';

1193: WHERE use_for_workplan_flag='Y';
1194: EXCEPTION
1195: WHEN NO_DATA_FOUND THEN
1196: IF l_debug_mode = 'Y' THEN
1197: pa_debug.g_err_stage:= 'Workplan plan type does not exist';
1198: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
1199: END IF;
1200: RETURN;
1201: END;

Line 1198: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);

1194: EXCEPTION
1195: WHEN NO_DATA_FOUND THEN
1196: IF l_debug_mode = 'Y' THEN
1197: pa_debug.g_err_stage:= 'Workplan plan type does not exist';
1198: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
1199: END IF;
1200: RETURN;
1201: END;
1202:

Line 1344: IF P_PA_DEBUG_MODE = 'Y' THEN

1340:
1341: /* FP M - Reporting lines integration */
1342:
1343: BEGIN
1344: IF P_PA_DEBUG_MODE = 'Y' THEN
1345: pa_debug.write(l_module_name,'Calling PJI_FM_XBS_ACCUM_MAINT.PLAN_DELETE ' ,5);
1346: pa_debug.write(l_module_name,'p_fp_version_ids count '|| l_budget_version_id_tbl.count,5);
1347: END IF;
1348: /* Very sure that there is only one record in the plsql table. Just having the loop */

Line 1345: pa_debug.write(l_module_name,'Calling PJI_FM_XBS_ACCUM_MAINT.PLAN_DELETE ' ,5);

1341: /* FP M - Reporting lines integration */
1342:
1343: BEGIN
1344: IF P_PA_DEBUG_MODE = 'Y' THEN
1345: pa_debug.write(l_module_name,'Calling PJI_FM_XBS_ACCUM_MAINT.PLAN_DELETE ' ,5);
1346: pa_debug.write(l_module_name,'p_fp_version_ids count '|| l_budget_version_id_tbl.count,5);
1347: END IF;
1348: /* Very sure that there is only one record in the plsql table. Just having the loop */
1349: FOR I in 1..l_budget_version_id_tbl.count LOOP

Line 1346: pa_debug.write(l_module_name,'p_fp_version_ids count '|| l_budget_version_id_tbl.count,5);

1342:
1343: BEGIN
1344: IF P_PA_DEBUG_MODE = 'Y' THEN
1345: pa_debug.write(l_module_name,'Calling PJI_FM_XBS_ACCUM_MAINT.PLAN_DELETE ' ,5);
1346: pa_debug.write(l_module_name,'p_fp_version_ids count '|| l_budget_version_id_tbl.count,5);
1347: END IF;
1348: /* Very sure that there is only one record in the plsql table. Just having the loop */
1349: FOR I in 1..l_budget_version_id_tbl.count LOOP
1350: pa_debug.write(l_module_name,'p_fp_version_ids ('|| i || ')' || l_budget_version_id_tbl(i),5);

Line 1350: pa_debug.write(l_module_name,'p_fp_version_ids ('|| i || ')' || l_budget_version_id_tbl(i),5);

1346: pa_debug.write(l_module_name,'p_fp_version_ids count '|| l_budget_version_id_tbl.count,5);
1347: END IF;
1348: /* Very sure that there is only one record in the plsql table. Just having the loop */
1349: FOR I in 1..l_budget_version_id_tbl.count LOOP
1350: pa_debug.write(l_module_name,'p_fp_version_ids ('|| i || ')' || l_budget_version_id_tbl(i),5);
1351: END LOOP;
1352: IF l_budget_version_id_tbl.COUNT>0 THEN
1353: PJI_FM_XBS_ACCUM_MAINT.PLAN_DELETE (
1354: p_fp_version_ids => l_budget_version_id_tbl,

Line 1368: pa_debug.reset_err_stack;

1364: END IF;
1365:
1366: END;
1367: x_return_status := FND_API.G_RET_STS_SUCCESS;
1368: pa_debug.reset_err_stack;
1369: end if;
1370:
1371: exception
1372:

Line 1389: pa_debug.reset_curr_function;

1385: ELSE
1386: x_msg_count := l_msg_count;
1387: END IF;
1388: x_return_status := FND_API.G_RET_STS_ERROR;
1389: pa_debug.reset_curr_function;
1390:
1391: when pa_fin_plan_pub.rollback_on_error then
1392: IF P_PA_DEBUG_MODE = 'Y' THEN
1393: pa_debug.write_file('Procedure Delete_Version: rollback_on_error exception');

Line 1392: IF P_PA_DEBUG_MODE = 'Y' THEN

1388: x_return_status := FND_API.G_RET_STS_ERROR;
1389: pa_debug.reset_curr_function;
1390:
1391: when pa_fin_plan_pub.rollback_on_error then
1392: IF P_PA_DEBUG_MODE = 'Y' THEN
1393: pa_debug.write_file('Procedure Delete_Version: rollback_on_error exception');
1394: END IF;
1395: rollback to PA_FIN_PLAN_PUB_DELETE;
1396: raise FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1393: pa_debug.write_file('Procedure Delete_Version: rollback_on_error exception');

1389: pa_debug.reset_curr_function;
1390:
1391: when pa_fin_plan_pub.rollback_on_error then
1392: IF P_PA_DEBUG_MODE = 'Y' THEN
1393: pa_debug.write_file('Procedure Delete_Version: rollback_on_error exception');
1394: END IF;
1395: rollback to PA_FIN_PLAN_PUB_DELETE;
1396: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1397:

Line 1405: pa_debug.reset_err_stack;

1401: x_msg_count := 1;
1402: x_msg_data := SQLERRM;
1403: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PUB',
1404: p_procedure_name => 'Delete_Version');
1405: pa_debug.reset_err_stack;
1406: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1407: end Delete_Version;
1408: /* ------------------------------------------------------------------------- */
1409:

Line 1464: --pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Delete_Version_Helper');

1460: /*=================================================================
1461: BUG NO:- 2331201 for fin plan these two lines have been modified
1462: =================================================================*/
1463: --FND_MSG_PUB.initialize;
1464: --pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Delete_Version_Helper');
1465: x_return_status := FND_API.G_RET_STS_SUCCESS;
1466: pa_debug.set_err_stack('PA_FIN_PLAN_PUB.Delete_Version_Helper');
1467:
1468: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);

Line 1466: pa_debug.set_err_stack('PA_FIN_PLAN_PUB.Delete_Version_Helper');

1462: =================================================================*/
1463: --FND_MSG_PUB.initialize;
1464: --pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Delete_Version_Helper');
1465: x_return_status := FND_API.G_RET_STS_SUCCESS;
1466: pa_debug.set_err_stack('PA_FIN_PLAN_PUB.Delete_Version_Helper');
1467:
1468: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
1469: l_debug_mode := NVL(l_debug_mode, 'Y');
1470: IF P_PA_DEBUG_MODE = 'Y' THEN

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

1464: --pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Delete_Version_Helper');
1465: x_return_status := FND_API.G_RET_STS_SUCCESS;
1466: pa_debug.set_err_stack('PA_FIN_PLAN_PUB.Delete_Version_Helper');
1467:
1468: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
1469: l_debug_mode := NVL(l_debug_mode, 'Y');
1470: IF P_PA_DEBUG_MODE = 'Y' THEN
1471: pa_debug.set_process('Delete_Version: ' || 'PLSQL','LOG',l_debug_mode);
1472: END IF;

Line 1470: IF P_PA_DEBUG_MODE = 'Y' THEN

1466: pa_debug.set_err_stack('PA_FIN_PLAN_PUB.Delete_Version_Helper');
1467:
1468: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
1469: l_debug_mode := NVL(l_debug_mode, 'Y');
1470: IF P_PA_DEBUG_MODE = 'Y' THEN
1471: pa_debug.set_process('Delete_Version: ' || 'PLSQL','LOG',l_debug_mode);
1472: END IF;
1473: x_msg_count := 0;
1474: /* CHECK FOR BUSINESS RULES VIOLATIONS */

Line 1471: pa_debug.set_process('Delete_Version: ' || 'PLSQL','LOG',l_debug_mode);

1467:
1468: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
1469: l_debug_mode := NVL(l_debug_mode, 'Y');
1470: IF P_PA_DEBUG_MODE = 'Y' THEN
1471: pa_debug.set_process('Delete_Version: ' || 'PLSQL','LOG',l_debug_mode);
1472: END IF;
1473: x_msg_count := 0;
1474: /* CHECK FOR BUSINESS RULES VIOLATIONS */
1475: /* check for null budget_version_id */

Line 1479: pa_debug.g_err_stage:='p_context value is invalid - p_context :' || p_context;

1475: /* check for null budget_version_id */
1476: IF NOT ((p_context = PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_BUDGET) OR
1477: (p_context = PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_WORKPLAN)) THEN
1478: IF l_debug_mode = 'Y' THEN
1479: pa_debug.g_err_stage:='p_context value is invalid - p_context :' || p_context;
1480: pa_debug.write( l_module_name,pa_debug.g_err_stage,5);
1481: END IF;
1482: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
1483: p_msg_name => 'PA_FP_INV_PARAM_PASSED',

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

1476: IF NOT ((p_context = PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_BUDGET) OR
1477: (p_context = PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_WORKPLAN)) THEN
1478: IF l_debug_mode = 'Y' THEN
1479: pa_debug.g_err_stage:='p_context value is invalid - p_context :' || p_context;
1480: pa_debug.write( l_module_name,pa_debug.g_err_stage,5);
1481: END IF;
1482: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
1483: p_msg_name => 'PA_FP_INV_PARAM_PASSED',
1484: p_token1 => 'PROCEDURENAME',

Line 1500: pa_debug.g_err_stage:= 'p_context '||p_context;

1496: p_budget_version_id IS NULL AND
1497: p_project_id IS NULL THEN
1498:
1499: IF l_debug_mode = 'Y' THEN
1500: pa_debug.g_err_stage:= 'p_context '||p_context;
1501: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
1502:
1503: pa_debug.g_err_stage:= 'p_budget_version_id '||p_budget_version_id;
1504: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);

Line 1501: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);

1497: p_project_id IS NULL THEN
1498:
1499: IF l_debug_mode = 'Y' THEN
1500: pa_debug.g_err_stage:= 'p_context '||p_context;
1501: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
1502:
1503: pa_debug.g_err_stage:= 'p_budget_version_id '||p_budget_version_id;
1504: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
1505:

Line 1503: pa_debug.g_err_stage:= 'p_budget_version_id '||p_budget_version_id;

1499: IF l_debug_mode = 'Y' THEN
1500: pa_debug.g_err_stage:= 'p_context '||p_context;
1501: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
1502:
1503: pa_debug.g_err_stage:= 'p_budget_version_id '||p_budget_version_id;
1504: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
1505:
1506: pa_debug.g_err_stage:= 'p_project_id '||p_project_id;
1507: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);

Line 1504: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);

1500: pa_debug.g_err_stage:= 'p_context '||p_context;
1501: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
1502:
1503: pa_debug.g_err_stage:= 'p_budget_version_id '||p_budget_version_id;
1504: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
1505:
1506: pa_debug.g_err_stage:= 'p_project_id '||p_project_id;
1507: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
1508:

Line 1506: pa_debug.g_err_stage:= 'p_project_id '||p_project_id;

1502:
1503: pa_debug.g_err_stage:= 'p_budget_version_id '||p_budget_version_id;
1504: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
1505:
1506: pa_debug.g_err_stage:= 'p_project_id '||p_project_id;
1507: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
1508:
1509: END IF;
1510:

Line 1507: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);

1503: pa_debug.g_err_stage:= 'p_budget_version_id '||p_budget_version_id;
1504: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
1505:
1506: pa_debug.g_err_stage:= 'p_project_id '||p_project_id;
1507: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
1508:
1509: END IF;
1510:
1511: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 1533: pa_debug.reset_err_stack;

1529: x_msg_count := l_msg_count;
1530: else
1531: x_msg_count := l_msg_count;
1532: end if;
1533: pa_debug.reset_err_stack;
1534: return;
1535: end if;
1536:
1537: /* If There are NO Business Rules Violations , Then proceed with Delete Version Helper*/

Line 1539: IF P_PA_DEBUG_MODE = 'Y' THEN

1535: end if;
1536:
1537: /* If There are NO Business Rules Violations , Then proceed with Delete Version Helper*/
1538: if l_msg_count = 0 then
1539: IF P_PA_DEBUG_MODE = 'Y' THEN
1540: pa_debug.write_file('Delete_Version: ' || 'no business errors: continuing with Delete Version Helper');
1541: END IF;
1542: SAVEPOINT PA_FIN_PLAN_PUB_DELETE_H;
1543: IF p_context=PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_WORKPLAN THEN

Line 1540: pa_debug.write_file('Delete_Version: ' || 'no business errors: continuing with Delete Version Helper');

1536:
1537: /* If There are NO Business Rules Violations , Then proceed with Delete Version Helper*/
1538: if l_msg_count = 0 then
1539: IF P_PA_DEBUG_MODE = 'Y' THEN
1540: pa_debug.write_file('Delete_Version: ' || 'no business errors: continuing with Delete Version Helper');
1541: END IF;
1542: SAVEPOINT PA_FIN_PLAN_PUB_DELETE_H;
1543: IF p_context=PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_WORKPLAN THEN
1544:

Line 1553: pa_debug.g_err_stage:= 'Workplan plan type does not exist';

1549: WHERE use_for_workplan_flag='Y';
1550: EXCEPTION
1551: WHEN NO_DATA_FOUND THEN
1552: IF l_debug_mode = 'Y' THEN
1553: pa_debug.g_err_stage:= 'Workplan plan type does not exist';
1554: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
1555: END IF;
1556: RETURN;
1557: END;

Line 1554: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);

1550: EXCEPTION
1551: WHEN NO_DATA_FOUND THEN
1552: IF l_debug_mode = 'Y' THEN
1553: pa_debug.g_err_stage:= 'Workplan plan type does not exist';
1554: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
1555: END IF;
1556: RETURN;
1557: END;
1558:

Line 1702: IF P_PA_debug_mode = 'Y' THEN

1698: X_MSG_COUNT => l_msg_count,
1699: X_MSG_DATA => l_msg_data);
1700:
1701: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1702: IF P_PA_debug_mode = 'Y' THEN
1703: pa_debug.g_err_stage:= 'Error in PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DETAILS';
1704: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
1705: END IF;
1706: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 1703: pa_debug.g_err_stage:= 'Error in PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DETAILS';

1699: X_MSG_DATA => l_msg_data);
1700:
1701: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1702: IF P_PA_debug_mode = 'Y' THEN
1703: pa_debug.g_err_stage:= 'Error in PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DETAILS';
1704: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
1705: END IF;
1706: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
1707: END IF;

Line 1704: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);

1700:
1701: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1702: IF P_PA_debug_mode = 'Y' THEN
1703: pa_debug.g_err_stage:= 'Error in PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DETAILS';
1704: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
1705: END IF;
1706: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
1707: END IF;
1708:

Line 1720: IF P_PA_debug_mode = 'Y' THEN

1716: x_msg_count => l_msg_data);
1717:
1718:
1719: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1720: IF P_PA_debug_mode = 'Y' THEN
1721: pa_debug.g_err_stage:= 'Error in PA_RES_ASG_CURRENCY_PUB.MAINTAIN_DATA';
1722: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
1723: END IF;
1724: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 1721: pa_debug.g_err_stage:= 'Error in PA_RES_ASG_CURRENCY_PUB.MAINTAIN_DATA';

1717:
1718:
1719: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1720: IF P_PA_debug_mode = 'Y' THEN
1721: pa_debug.g_err_stage:= 'Error in PA_RES_ASG_CURRENCY_PUB.MAINTAIN_DATA';
1722: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
1723: END IF;
1724: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
1725: END IF;

Line 1722: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);

1718:
1719: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1720: IF P_PA_debug_mode = 'Y' THEN
1721: pa_debug.g_err_stage:= 'Error in PA_RES_ASG_CURRENCY_PUB.MAINTAIN_DATA';
1722: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
1723: END IF;
1724: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
1725: END IF;
1726: end if; --bug 5441949

Line 1746: pa_debug.g_err_stage:= 'Error while Fetching the data for '||p_budget_version_id;

1742: FROM pa_budget_versions
1743: WHERE budget_version_id = p_budget_version_id;
1744: EXCEPTION
1745: WHEN OTHERS THEN
1746: pa_debug.g_err_stage:= 'Error while Fetching the data for '||p_budget_version_id;
1747: IF P_PA_DEBUG_MODE = 'Y' THEN
1748: pa_debug.write('Delete_Version: ' || l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
1749: END IF;
1750: RAISE;

Line 1747: IF P_PA_DEBUG_MODE = 'Y' THEN

1743: WHERE budget_version_id = p_budget_version_id;
1744: EXCEPTION
1745: WHEN OTHERS THEN
1746: pa_debug.g_err_stage:= 'Error while Fetching the data for '||p_budget_version_id;
1747: IF P_PA_DEBUG_MODE = 'Y' THEN
1748: pa_debug.write('Delete_Version: ' || l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
1749: END IF;
1750: RAISE;
1751: END;

Line 1748: pa_debug.write('Delete_Version: ' || l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

1744: EXCEPTION
1745: WHEN OTHERS THEN
1746: pa_debug.g_err_stage:= 'Error while Fetching the data for '||p_budget_version_id;
1747: IF P_PA_DEBUG_MODE = 'Y' THEN
1748: pa_debug.write('Delete_Version: ' || l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
1749: END IF;
1750: RAISE;
1751: END;
1752:

Line 1803: pa_debug.reset_err_stack;

1799: gen_src_all_wp_version_id = p_budget_version_id );
1800: END IF;
1801: end if;
1802: x_return_status := FND_API.G_RET_STS_SUCCESS;
1803: pa_debug.reset_err_stack;
1804:
1805: exception
1806: when pa_fin_plan_pub.rollback_on_error then
1807: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 1807: IF P_PA_DEBUG_MODE = 'Y' THEN

1803: pa_debug.reset_err_stack;
1804:
1805: exception
1806: when pa_fin_plan_pub.rollback_on_error then
1807: IF P_PA_DEBUG_MODE = 'Y' THEN
1808: pa_debug.write_file('Procedure Delete_Version_Helper: rollback_on_error exception');
1809: END IF;
1810: rollback to PA_FIN_PLAN_PUB_DELETE_H;
1811: raise FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1808: pa_debug.write_file('Procedure Delete_Version_Helper: rollback_on_error exception');

1804:
1805: exception
1806: when pa_fin_plan_pub.rollback_on_error then
1807: IF P_PA_DEBUG_MODE = 'Y' THEN
1808: pa_debug.write_file('Procedure Delete_Version_Helper: rollback_on_error exception');
1809: END IF;
1810: rollback to PA_FIN_PLAN_PUB_DELETE_H;
1811: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1812:

Line 1820: pa_debug.reset_err_stack;

1816: x_msg_count := 1;
1817: x_msg_data := SQLERRM;
1818: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PUB',
1819: p_procedure_name => 'Delete_Version_Helper');
1820: pa_debug.reset_err_stack;
1821: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1822: end Delete_Version_Helper;
1823:
1824: --Bug 4290043. This is a private API called by copy version. This will return variables to indicate whether to

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

1840: l_debug_mode VARCHAR2(30);
1841: l_module_name VARCHAR2(100);
1842:
1843: BEGIN
1844: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
1845: l_debug_mode := NVL(l_debug_mode, 'Y');
1846: l_module_name := 'PAFPPUBB.get_copy_paramters';
1847:
1848: -- Set curr function

Line 1850: pa_debug.set_curr_function(

1846: l_module_name := 'PAFPPUBB.get_copy_paramters';
1847:
1848: -- Set curr function
1849: IF l_debug_mode = 'Y' THEN
1850: pa_debug.set_curr_function(
1851: p_function =>'PAFPPUBB.get_copy_paramters'
1852: ,p_debug_mode => l_debug_mode );
1853:
1854: pa_debug.g_err_stage:='In get_copy_paramters';

Line 1854: pa_debug.g_err_stage:='In get_copy_paramters';

1850: pa_debug.set_curr_function(
1851: p_function =>'PAFPPUBB.get_copy_paramters'
1852: ,p_debug_mode => l_debug_mode );
1853:
1854: pa_debug.g_err_stage:='In get_copy_paramters';
1855: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1856:
1857: pa_debug.g_err_stage:='p_source_project_id '||p_source_project_id;
1858: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);

Line 1855: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);

1851: p_function =>'PAFPPUBB.get_copy_paramters'
1852: ,p_debug_mode => l_debug_mode );
1853:
1854: pa_debug.g_err_stage:='In get_copy_paramters';
1855: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1856:
1857: pa_debug.g_err_stage:='p_source_project_id '||p_source_project_id;
1858: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1859:

Line 1857: pa_debug.g_err_stage:='p_source_project_id '||p_source_project_id;

1853:
1854: pa_debug.g_err_stage:='In get_copy_paramters';
1855: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1856:
1857: pa_debug.g_err_stage:='p_source_project_id '||p_source_project_id;
1858: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1859:
1860: pa_debug.g_err_stage:='p_target_project_id '||p_target_project_id;
1861: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);

Line 1858: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);

1854: pa_debug.g_err_stage:='In get_copy_paramters';
1855: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1856:
1857: pa_debug.g_err_stage:='p_source_project_id '||p_source_project_id;
1858: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1859:
1860: pa_debug.g_err_stage:='p_target_project_id '||p_target_project_id;
1861: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1862:

Line 1860: pa_debug.g_err_stage:='p_target_project_id '||p_target_project_id;

1856:
1857: pa_debug.g_err_stage:='p_source_project_id '||p_source_project_id;
1858: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1859:
1860: pa_debug.g_err_stage:='p_target_project_id '||p_target_project_id;
1861: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1862:
1863: pa_debug.g_err_stage:='p_source_plan_class_code '||p_source_plan_class_code;
1864: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);

Line 1861: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);

1857: pa_debug.g_err_stage:='p_source_project_id '||p_source_project_id;
1858: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1859:
1860: pa_debug.g_err_stage:='p_target_project_id '||p_target_project_id;
1861: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1862:
1863: pa_debug.g_err_stage:='p_source_plan_class_code '||p_source_plan_class_code;
1864: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1865:

Line 1863: pa_debug.g_err_stage:='p_source_plan_class_code '||p_source_plan_class_code;

1859:
1860: pa_debug.g_err_stage:='p_target_project_id '||p_target_project_id;
1861: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1862:
1863: pa_debug.g_err_stage:='p_source_plan_class_code '||p_source_plan_class_code;
1864: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1865:
1866: pa_debug.g_err_stage:='p_target_plan_class_code '||p_target_plan_class_code;
1867: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);

Line 1864: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);

1860: pa_debug.g_err_stage:='p_target_project_id '||p_target_project_id;
1861: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1862:
1863: pa_debug.g_err_stage:='p_source_plan_class_code '||p_source_plan_class_code;
1864: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1865:
1866: pa_debug.g_err_stage:='p_target_plan_class_code '||p_target_plan_class_code;
1867: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1868:

Line 1866: pa_debug.g_err_stage:='p_target_plan_class_code '||p_target_plan_class_code;

1862:
1863: pa_debug.g_err_stage:='p_source_plan_class_code '||p_source_plan_class_code;
1864: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1865:
1866: pa_debug.g_err_stage:='p_target_plan_class_code '||p_target_plan_class_code;
1867: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1868:
1869: pa_debug.g_err_stage:='p_source_version_type '||p_source_version_type;
1870: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);

Line 1867: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);

1863: pa_debug.g_err_stage:='p_source_plan_class_code '||p_source_plan_class_code;
1864: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1865:
1866: pa_debug.g_err_stage:='p_target_plan_class_code '||p_target_plan_class_code;
1867: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1868:
1869: pa_debug.g_err_stage:='p_source_version_type '||p_source_version_type;
1870: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1871:

Line 1869: pa_debug.g_err_stage:='p_source_version_type '||p_source_version_type;

1865:
1866: pa_debug.g_err_stage:='p_target_plan_class_code '||p_target_plan_class_code;
1867: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1868:
1869: pa_debug.g_err_stage:='p_source_version_type '||p_source_version_type;
1870: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1871:
1872: pa_debug.g_err_stage:='p_target_version_type '||p_target_version_type;
1873: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);

Line 1870: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);

1866: pa_debug.g_err_stage:='p_target_plan_class_code '||p_target_plan_class_code;
1867: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1868:
1869: pa_debug.g_err_stage:='p_source_version_type '||p_source_version_type;
1870: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1871:
1872: pa_debug.g_err_stage:='p_target_version_type '||p_target_version_type;
1873: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1874:

Line 1872: pa_debug.g_err_stage:='p_target_version_type '||p_target_version_type;

1868:
1869: pa_debug.g_err_stage:='p_source_version_type '||p_source_version_type;
1870: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1871:
1872: pa_debug.g_err_stage:='p_target_version_type '||p_target_version_type;
1873: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1874:
1875: END IF;
1876:

Line 1873: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);

1869: pa_debug.g_err_stage:='p_source_version_type '||p_source_version_type;
1870: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1871:
1872: pa_debug.g_err_stage:='p_target_version_type '||p_target_version_type;
1873: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1874:
1875: END IF;
1876:
1877: x_copy_actuals_flag:='Y';

Line 1896: pa_debug.reset_curr_function;

1892:
1893: END IF;
1894:
1895: IF l_debug_mode = 'Y' THEN
1896: pa_debug.reset_curr_function;
1897:
1898: pa_debug.g_err_stage:='x_copy_actuals_flag '||x_copy_actuals_flag;
1899: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1900:

Line 1898: pa_debug.g_err_stage:='x_copy_actuals_flag '||x_copy_actuals_flag;

1894:
1895: IF l_debug_mode = 'Y' THEN
1896: pa_debug.reset_curr_function;
1897:
1898: pa_debug.g_err_stage:='x_copy_actuals_flag '||x_copy_actuals_flag;
1899: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1900:
1901: pa_debug.g_err_stage:='x_derv_rates_missing_amts_flag '||x_derv_rates_missing_amts_flag;
1902: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);

Line 1899: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);

1895: IF l_debug_mode = 'Y' THEN
1896: pa_debug.reset_curr_function;
1897:
1898: pa_debug.g_err_stage:='x_copy_actuals_flag '||x_copy_actuals_flag;
1899: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1900:
1901: pa_debug.g_err_stage:='x_derv_rates_missing_amts_flag '||x_derv_rates_missing_amts_flag;
1902: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1903:

Line 1901: pa_debug.g_err_stage:='x_derv_rates_missing_amts_flag '||x_derv_rates_missing_amts_flag;

1897:
1898: pa_debug.g_err_stage:='x_copy_actuals_flag '||x_copy_actuals_flag;
1899: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1900:
1901: pa_debug.g_err_stage:='x_derv_rates_missing_amts_flag '||x_derv_rates_missing_amts_flag;
1902: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1903:
1904: pa_debug.g_err_stage:='Exiting get_copy_paramters';
1905: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);

Line 1902: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);

1898: pa_debug.g_err_stage:='x_copy_actuals_flag '||x_copy_actuals_flag;
1899: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1900:
1901: pa_debug.g_err_stage:='x_derv_rates_missing_amts_flag '||x_derv_rates_missing_amts_flag;
1902: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1903:
1904: pa_debug.g_err_stage:='Exiting get_copy_paramters';
1905: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1906:

Line 1904: pa_debug.g_err_stage:='Exiting get_copy_paramters';

1900:
1901: pa_debug.g_err_stage:='x_derv_rates_missing_amts_flag '||x_derv_rates_missing_amts_flag;
1902: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1903:
1904: pa_debug.g_err_stage:='Exiting get_copy_paramters';
1905: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1906:
1907: END IF;
1908:

Line 1905: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);

1901: pa_debug.g_err_stage:='x_derv_rates_missing_amts_flag '||x_derv_rates_missing_amts_flag;
1902: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1903:
1904: pa_debug.g_err_stage:='Exiting get_copy_paramters';
1905: pa_debug.write( l_module_name,pa_debug.g_err_stage,3);
1906:
1907: END IF;
1908:
1909:

Line 2068: pa_debug.set_err_stack ('PA_FIN_PLAN_PUB.Copy_Version');

2064:
2065:
2066: BEGIN
2067:
2068: pa_debug.set_err_stack ('PA_FIN_PLAN_PUB.Copy_Version');
2069: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
2070: l_debug_mode := NVL(l_debug_mode, 'Y');
2071: IF P_PA_DEBUG_MODE = 'Y' THEN
2072: pa_debug.set_process('Copy_Version: ' || 'PLSQL','LOG',l_debug_mode);

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

2065:
2066: BEGIN
2067:
2068: pa_debug.set_err_stack ('PA_FIN_PLAN_PUB.Copy_Version');
2069: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
2070: l_debug_mode := NVL(l_debug_mode, 'Y');
2071: IF P_PA_DEBUG_MODE = 'Y' THEN
2072: pa_debug.set_process('Copy_Version: ' || 'PLSQL','LOG',l_debug_mode);
2073: END IF;

Line 2071: IF P_PA_DEBUG_MODE = 'Y' THEN

2067:
2068: pa_debug.set_err_stack ('PA_FIN_PLAN_PUB.Copy_Version');
2069: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
2070: l_debug_mode := NVL(l_debug_mode, 'Y');
2071: IF P_PA_DEBUG_MODE = 'Y' THEN
2072: pa_debug.set_process('Copy_Version: ' || 'PLSQL','LOG',l_debug_mode);
2073: END IF;
2074: x_msg_count := 0;
2075: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 2072: pa_debug.set_process('Copy_Version: ' || 'PLSQL','LOG',l_debug_mode);

2068: pa_debug.set_err_stack ('PA_FIN_PLAN_PUB.Copy_Version');
2069: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
2070: l_debug_mode := NVL(l_debug_mode, 'Y');
2071: IF P_PA_DEBUG_MODE = 'Y' THEN
2072: pa_debug.set_process('Copy_Version: ' || 'PLSQL','LOG',l_debug_mode);
2073: END IF;
2074: x_msg_count := 0;
2075: x_return_status := FND_API.G_RET_STS_SUCCESS;
2076:

Line 2079: IF P_PA_DEBUG_MODE = 'Y' THEN

2075: x_return_status := FND_API.G_RET_STS_SUCCESS;
2076:
2077: -- Check for business rules violations
2078:
2079: IF P_PA_DEBUG_MODE = 'Y' THEN
2080: pa_debug.g_err_stage := 'Parameter Validation';
2081: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2082: END IF;
2083:

Line 2080: pa_debug.g_err_stage := 'Parameter Validation';

2076:
2077: -- Check for business rules violations
2078:
2079: IF P_PA_DEBUG_MODE = 'Y' THEN
2080: pa_debug.g_err_stage := 'Parameter Validation';
2081: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2082: END IF;
2083:
2084: -- Check for null source_version_id

Line 2081: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2077: -- Check for business rules violations
2078:
2079: IF P_PA_DEBUG_MODE = 'Y' THEN
2080: pa_debug.g_err_stage := 'Parameter Validation';
2081: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2082: END IF;
2083:
2084: -- Check for null source_version_id
2085:

Line 2087: pa_debug.g_err_stage := 'Source_plan='||p_source_version_id;

2083:
2084: -- Check for null source_version_id
2085:
2086: IF p_source_version_id IS NULL THEN
2087: pa_debug.g_err_stage := 'Source_plan='||p_source_version_id;
2088: IF P_PA_DEBUG_MODE = 'Y' THEN
2089: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,5);
2090: END IF;
2091:

Line 2088: IF P_PA_DEBUG_MODE = 'Y' THEN

2084: -- Check for null source_version_id
2085:
2086: IF p_source_version_id IS NULL THEN
2087: pa_debug.g_err_stage := 'Source_plan='||p_source_version_id;
2088: IF P_PA_DEBUG_MODE = 'Y' THEN
2089: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,5);
2090: END IF;
2091:
2092: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 2089: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,5);

2085:
2086: IF p_source_version_id IS NULL THEN
2087: pa_debug.g_err_stage := 'Source_plan='||p_source_version_id;
2088: IF P_PA_DEBUG_MODE = 'Y' THEN
2089: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,5);
2090: END IF;
2091:
2092: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
2093: p_msg_name => 'PA_FP_NO_PLAN_VERSION');

Line 2104: IF P_PA_DEBUG_MODE = 'Y' THEN

2100: --Initialise l_budget_version_id.
2101:
2102: l_budget_version_id := px_target_version_id;
2103:
2104: IF P_PA_DEBUG_MODE = 'Y' THEN
2105: pa_debug.g_err_stage := 'Source_plan='||p_source_version_id;
2106: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2107:
2108: pa_debug.g_err_stage := 'Target_plan='||l_budget_version_id;

Line 2105: pa_debug.g_err_stage := 'Source_plan='||p_source_version_id;

2101:
2102: l_budget_version_id := px_target_version_id;
2103:
2104: IF P_PA_DEBUG_MODE = 'Y' THEN
2105: pa_debug.g_err_stage := 'Source_plan='||p_source_version_id;
2106: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2107:
2108: pa_debug.g_err_stage := 'Target_plan='||l_budget_version_id;
2109: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

Line 2106: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2102: l_budget_version_id := px_target_version_id;
2103:
2104: IF P_PA_DEBUG_MODE = 'Y' THEN
2105: pa_debug.g_err_stage := 'Source_plan='||p_source_version_id;
2106: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2107:
2108: pa_debug.g_err_stage := 'Target_plan='||l_budget_version_id;
2109: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2110: END IF;

Line 2108: pa_debug.g_err_stage := 'Target_plan='||l_budget_version_id;

2104: IF P_PA_DEBUG_MODE = 'Y' THEN
2105: pa_debug.g_err_stage := 'Source_plan='||p_source_version_id;
2106: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2107:
2108: pa_debug.g_err_stage := 'Target_plan='||l_budget_version_id;
2109: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2110: END IF;
2111:
2112: --Bug 4290043. Fire the SQLs to get the details of the source/target version ids.

Line 2109: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2105: pa_debug.g_err_stage := 'Source_plan='||p_source_version_id;
2106: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2107:
2108: pa_debug.g_err_stage := 'Target_plan='||l_budget_version_id;
2109: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2110: END IF;
2111:
2112: --Bug 4290043. Fire the SQLs to get the details of the source/target version ids.
2113: --Fetch proj fp options id for source version

Line 2116: IF P_PA_DEBUG_MODE = 'Y' THEN

2112: --Bug 4290043. Fire the SQLs to get the details of the source/target version ids.
2113: --Fetch proj fp options id for source version
2114: --Bug 4290043. Selected source plan class code
2115:
2116: IF P_PA_DEBUG_MODE = 'Y' THEN
2117: pa_debug.g_err_stage := 'Fetching the Source version details';
2118: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2119: END IF;
2120:

Line 2117: pa_debug.g_err_stage := 'Fetching the Source version details';

2113: --Fetch proj fp options id for source version
2114: --Bug 4290043. Selected source plan class code
2115:
2116: IF P_PA_DEBUG_MODE = 'Y' THEN
2117: pa_debug.g_err_stage := 'Fetching the Source version details';
2118: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2119: END IF;
2120:
2121: SELECT pfo.proj_fp_options_id

Line 2118: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2114: --Bug 4290043. Selected source plan class code
2115:
2116: IF P_PA_DEBUG_MODE = 'Y' THEN
2117: pa_debug.g_err_stage := 'Fetching the Source version details';
2118: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2119: END IF;
2120:
2121: SELECT pfo.proj_fp_options_id
2122: ,pfo.fin_plan_preference_code

Line 2182: IF P_PA_DEBUG_MODE = 'Y' THEN

2178: l_target_plan_class_code := l_source_plan_class_code;
2179:
2180: END IF;
2181:
2182: IF P_PA_DEBUG_MODE = 'Y' THEN
2183: pa_debug.g_err_stage := 'l_source_proj_fp_options_id ='||l_source_proj_fp_options_id;
2184: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2185:
2186: pa_debug.g_err_stage := 'l_source_fp_preference_code = '||l_source_fp_preference_code;

Line 2183: pa_debug.g_err_stage := 'l_source_proj_fp_options_id ='||l_source_proj_fp_options_id;

2179:
2180: END IF;
2181:
2182: IF P_PA_DEBUG_MODE = 'Y' THEN
2183: pa_debug.g_err_stage := 'l_source_proj_fp_options_id ='||l_source_proj_fp_options_id;
2184: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2185:
2186: pa_debug.g_err_stage := 'l_source_fp_preference_code = '||l_source_fp_preference_code;
2187: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

Line 2184: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2180: END IF;
2181:
2182: IF P_PA_DEBUG_MODE = 'Y' THEN
2183: pa_debug.g_err_stage := 'l_source_proj_fp_options_id ='||l_source_proj_fp_options_id;
2184: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2185:
2186: pa_debug.g_err_stage := 'l_source_fp_preference_code = '||l_source_fp_preference_code;
2187: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2188:

Line 2186: pa_debug.g_err_stage := 'l_source_fp_preference_code = '||l_source_fp_preference_code;

2182: IF P_PA_DEBUG_MODE = 'Y' THEN
2183: pa_debug.g_err_stage := 'l_source_proj_fp_options_id ='||l_source_proj_fp_options_id;
2184: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2185:
2186: pa_debug.g_err_stage := 'l_source_fp_preference_code = '||l_source_fp_preference_code;
2187: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2188:
2189: pa_debug.g_err_stage := 'l_source_project_id = '||l_project_id;
2190: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

Line 2187: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2183: pa_debug.g_err_stage := 'l_source_proj_fp_options_id ='||l_source_proj_fp_options_id;
2184: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2185:
2186: pa_debug.g_err_stage := 'l_source_fp_preference_code = '||l_source_fp_preference_code;
2187: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2188:
2189: pa_debug.g_err_stage := 'l_source_project_id = '||l_project_id;
2190: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2191:

Line 2189: pa_debug.g_err_stage := 'l_source_project_id = '||l_project_id;

2185:
2186: pa_debug.g_err_stage := 'l_source_fp_preference_code = '||l_source_fp_preference_code;
2187: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2188:
2189: pa_debug.g_err_stage := 'l_source_project_id = '||l_project_id;
2190: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2191:
2192: pa_debug.g_err_stage := 'l_source_fin_plan_type_id ='||l_source_fin_plan_type_id;
2193: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

Line 2190: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2186: pa_debug.g_err_stage := 'l_source_fp_preference_code = '||l_source_fp_preference_code;
2187: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2188:
2189: pa_debug.g_err_stage := 'l_source_project_id = '||l_project_id;
2190: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2191:
2192: pa_debug.g_err_stage := 'l_source_fin_plan_type_id ='||l_source_fin_plan_type_id;
2193: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2194:

Line 2192: pa_debug.g_err_stage := 'l_source_fin_plan_type_id ='||l_source_fin_plan_type_id;

2188:
2189: pa_debug.g_err_stage := 'l_source_project_id = '||l_project_id;
2190: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2191:
2192: pa_debug.g_err_stage := 'l_source_fin_plan_type_id ='||l_source_fin_plan_type_id;
2193: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2194:
2195: pa_debug.g_err_stage := 'l_source_element_type = '||l_source_element_type;
2196: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

Line 2193: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2189: pa_debug.g_err_stage := 'l_source_project_id = '||l_project_id;
2190: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2191:
2192: pa_debug.g_err_stage := 'l_source_fin_plan_type_id ='||l_source_fin_plan_type_id;
2193: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2194:
2195: pa_debug.g_err_stage := 'l_source_element_type = '||l_source_element_type;
2196: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2197: END IF;

Line 2195: pa_debug.g_err_stage := 'l_source_element_type = '||l_source_element_type;

2191:
2192: pa_debug.g_err_stage := 'l_source_fin_plan_type_id ='||l_source_fin_plan_type_id;
2193: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2194:
2195: pa_debug.g_err_stage := 'l_source_element_type = '||l_source_element_type;
2196: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2197: END IF;
2198:
2199:

Line 2196: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2192: pa_debug.g_err_stage := 'l_source_fin_plan_type_id ='||l_source_fin_plan_type_id;
2193: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2194:
2195: pa_debug.g_err_stage := 'l_source_element_type = '||l_source_element_type;
2196: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2197: END IF;
2198:
2199:
2200:

Line 2201: IF P_PA_DEBUG_MODE = 'Y' THEN

2197: END IF;
2198:
2199:
2200:
2201: IF P_PA_DEBUG_MODE = 'Y' THEN
2202: pa_debug.g_err_stage := 'l_target_proj_fp_options_id ='||l_target_proj_fp_options_id;
2203: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2204:
2205: pa_debug.g_err_stage := 'l_target_fp_preference_code = '||l_target_fp_preference_code;

Line 2202: pa_debug.g_err_stage := 'l_target_proj_fp_options_id ='||l_target_proj_fp_options_id;

2198:
2199:
2200:
2201: IF P_PA_DEBUG_MODE = 'Y' THEN
2202: pa_debug.g_err_stage := 'l_target_proj_fp_options_id ='||l_target_proj_fp_options_id;
2203: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2204:
2205: pa_debug.g_err_stage := 'l_target_fp_preference_code = '||l_target_fp_preference_code;
2206: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

Line 2203: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2199:
2200:
2201: IF P_PA_DEBUG_MODE = 'Y' THEN
2202: pa_debug.g_err_stage := 'l_target_proj_fp_options_id ='||l_target_proj_fp_options_id;
2203: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2204:
2205: pa_debug.g_err_stage := 'l_target_fp_preference_code = '||l_target_fp_preference_code;
2206: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2207:

Line 2205: pa_debug.g_err_stage := 'l_target_fp_preference_code = '||l_target_fp_preference_code;

2201: IF P_PA_DEBUG_MODE = 'Y' THEN
2202: pa_debug.g_err_stage := 'l_target_proj_fp_options_id ='||l_target_proj_fp_options_id;
2203: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2204:
2205: pa_debug.g_err_stage := 'l_target_fp_preference_code = '||l_target_fp_preference_code;
2206: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2207:
2208: pa_debug.g_err_stage := 'l_target_fin_plan_type_id = '||l_target_fin_plan_type_id;
2209: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

Line 2206: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2202: pa_debug.g_err_stage := 'l_target_proj_fp_options_id ='||l_target_proj_fp_options_id;
2203: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2204:
2205: pa_debug.g_err_stage := 'l_target_fp_preference_code = '||l_target_fp_preference_code;
2206: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2207:
2208: pa_debug.g_err_stage := 'l_target_fin_plan_type_id = '||l_target_fin_plan_type_id;
2209: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2210:

Line 2208: pa_debug.g_err_stage := 'l_target_fin_plan_type_id = '||l_target_fin_plan_type_id;

2204:
2205: pa_debug.g_err_stage := 'l_target_fp_preference_code = '||l_target_fp_preference_code;
2206: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2207:
2208: pa_debug.g_err_stage := 'l_target_fin_plan_type_id = '||l_target_fin_plan_type_id;
2209: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2210:
2211: pa_debug.g_err_stage := 'l_target_element_type ='||l_target_element_type;
2212: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

Line 2209: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2205: pa_debug.g_err_stage := 'l_target_fp_preference_code = '||l_target_fp_preference_code;
2206: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2207:
2208: pa_debug.g_err_stage := 'l_target_fin_plan_type_id = '||l_target_fin_plan_type_id;
2209: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2210:
2211: pa_debug.g_err_stage := 'l_target_element_type ='||l_target_element_type;
2212: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2213: END IF;

Line 2211: pa_debug.g_err_stage := 'l_target_element_type ='||l_target_element_type;

2207:
2208: pa_debug.g_err_stage := 'l_target_fin_plan_type_id = '||l_target_fin_plan_type_id;
2209: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2210:
2211: pa_debug.g_err_stage := 'l_target_element_type ='||l_target_element_type;
2212: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2213: END IF;
2214:
2215: --Call the API to decide on whether to copy actuals/rates or not. Bug 4290043

Line 2212: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2208: pa_debug.g_err_stage := 'l_target_fin_plan_type_id = '||l_target_fin_plan_type_id;
2209: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2210:
2211: pa_debug.g_err_stage := 'l_target_element_type ='||l_target_element_type;
2212: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2213: END IF;
2214:
2215: --Call the API to decide on whether to copy actuals/rates or not. Bug 4290043
2216: get_copy_paramters

Line 2230: IF P_PA_DEBUG_MODE = 'Y' THEN

2226:
2227: -- Calling copy_budget_version api.This api will update the budget version incase its
2228: -- already existing else it will create a new version.
2229:
2230: IF P_PA_DEBUG_MODE = 'Y' THEN
2231: pa_debug.g_err_stage := 'Copying budget version';
2232: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2233: END IF;
2234:

Line 2231: pa_debug.g_err_stage := 'Copying budget version';

2227: -- Calling copy_budget_version api.This api will update the budget version incase its
2228: -- already existing else it will create a new version.
2229:
2230: IF P_PA_DEBUG_MODE = 'Y' THEN
2231: pa_debug.g_err_stage := 'Copying budget version';
2232: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2233: END IF;
2234:
2235: --Bug 4290043 .Added the parameters for copy actuals flag and copy missing amounts/rates fla

Line 2232: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2228: -- already existing else it will create a new version.
2229:
2230: IF P_PA_DEBUG_MODE = 'Y' THEN
2231: pa_debug.g_err_stage := 'Copying budget version';
2232: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2233: END IF;
2234:
2235: --Bug 4290043 .Added the parameters for copy actuals flag and copy missing amounts/rates fla
2236: PA_FP_COPY_FROM_PKG.Copy_Budget_Version(

Line 2275: IF P_PA_DEBUG_MODE = 'Y' THEN

2271:
2272:
2273: --Calling create fp option api
2274:
2275: IF P_PA_DEBUG_MODE = 'Y' THEN
2276: pa_debug.g_err_stage := 'Calling create_fp_option api';
2277: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2278: END IF;
2279:

Line 2276: pa_debug.g_err_stage := 'Calling create_fp_option api';

2272:
2273: --Calling create fp option api
2274:
2275: IF P_PA_DEBUG_MODE = 'Y' THEN
2276: pa_debug.g_err_stage := 'Calling create_fp_option api';
2277: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2278: END IF;
2279:
2280: PA_PROJ_FP_OPTIONS_PUB.create_fp_option (

Line 2277: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2273: --Calling create fp option api
2274:
2275: IF P_PA_DEBUG_MODE = 'Y' THEN
2276: pa_debug.g_err_stage := 'Calling create_fp_option api';
2277: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2278: END IF;
2279:
2280: PA_PROJ_FP_OPTIONS_PUB.create_fp_option (
2281: px_target_proj_fp_option_id => l_target_proj_fp_options_id

Line 2302: IF P_PA_DEBUG_MODE = 'Y' THEN

2298:
2299: --Calling an api to copy transaction currencies selected in source version to target version
2300: --Fetch multi currency flag for the target/new budget.
2301:
2302: IF P_PA_DEBUG_MODE = 'Y' THEN
2303: pa_debug.g_err_stage := 'Fetching multi currency flag for the target/new budget';
2304: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2305: END IF;
2306:

Line 2303: pa_debug.g_err_stage := 'Fetching multi currency flag for the target/new budget';

2299: --Calling an api to copy transaction currencies selected in source version to target version
2300: --Fetch multi currency flag for the target/new budget.
2301:
2302: IF P_PA_DEBUG_MODE = 'Y' THEN
2303: pa_debug.g_err_stage := 'Fetching multi currency flag for the target/new budget';
2304: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2305: END IF;
2306:
2307: SELECT pfo.plan_in_multi_curr_flag

Line 2304: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2300: --Fetch multi currency flag for the target/new budget.
2301:
2302: IF P_PA_DEBUG_MODE = 'Y' THEN
2303: pa_debug.g_err_stage := 'Fetching multi currency flag for the target/new budget';
2304: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2305: END IF;
2306:
2307: SELECT pfo.plan_in_multi_curr_flag
2308: INTO l_plan_in_multi_curr_flag

Line 2314: IF P_PA_DEBUG_MODE = 'Y' THEN

2310: WHERE pfo.fin_plan_version_id = l_budget_version_id;
2311:
2312: /* IF l_plan_in_multi_curr_flag = 'Y' THEN Commented for bug 2706430 */
2313:
2314: IF P_PA_DEBUG_MODE = 'Y' THEN
2315: pa_debug.g_err_stage := 'Calling copy_fp_txn_currencies api';
2316: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2317: END IF;
2318:

Line 2315: pa_debug.g_err_stage := 'Calling copy_fp_txn_currencies api';

2311:
2312: /* IF l_plan_in_multi_curr_flag = 'Y' THEN Commented for bug 2706430 */
2313:
2314: IF P_PA_DEBUG_MODE = 'Y' THEN
2315: pa_debug.g_err_stage := 'Calling copy_fp_txn_currencies api';
2316: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2317: END IF;
2318:
2319: PA_FP_TXN_CURRENCIES_PUB.copy_fp_txn_currencies (

Line 2316: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2312: /* IF l_plan_in_multi_curr_flag = 'Y' THEN Commented for bug 2706430 */
2313:
2314: IF P_PA_DEBUG_MODE = 'Y' THEN
2315: pa_debug.g_err_stage := 'Calling copy_fp_txn_currencies api';
2316: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2317: END IF;
2318:
2319: PA_FP_TXN_CURRENCIES_PUB.copy_fp_txn_currencies (
2320: p_source_fp_option_id => l_source_proj_fp_options_id

Line 2338: IF P_PA_DEBUG_MODE = 'Y' THEN

2334: --If the calling module is Financial Planning then its not required to go thru te route of
2335: --create_res_Task_maps as copy_resource_assignments would take care of the mapping logic too
2336: IF p_calling_module = PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_FIN_PLAN THEN
2337:
2338: IF P_PA_DEBUG_MODE = 'Y' THEN
2339: pa_debug.g_err_stage := 'Calling copy_resource_assignment';
2340: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2341: END IF;
2342:

Line 2339: pa_debug.g_err_stage := 'Calling copy_resource_assignment';

2335: --create_res_Task_maps as copy_resource_assignments would take care of the mapping logic too
2336: IF p_calling_module = PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_FIN_PLAN THEN
2337:
2338: IF P_PA_DEBUG_MODE = 'Y' THEN
2339: pa_debug.g_err_stage := 'Calling copy_resource_assignment';
2340: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2341: END IF;
2342:
2343: PA_FP_COPY_FROM_PKG.copy_resource_assignments(

Line 2340: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2336: IF p_calling_module = PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_FIN_PLAN THEN
2337:
2338: IF P_PA_DEBUG_MODE = 'Y' THEN
2339: pa_debug.g_err_stage := 'Calling copy_resource_assignment';
2340: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2341: END IF;
2342:
2343: PA_FP_COPY_FROM_PKG.copy_resource_assignments(
2344: p_source_plan_version_id => p_source_version_id

Line 2353: pa_debug.g_err_stage := 'PA_FP_COPY_FROM_PKG.copy_resource_assignments returned error';

2349: ,x_msg_data => l_msg_data );
2350:
2351: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2352:
2353: pa_debug.g_err_stage := 'PA_FP_COPY_FROM_PKG.copy_resource_assignments returned error';
2354: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2355: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2356:
2357: END IF;

Line 2354: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2350:
2351: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2352:
2353: pa_debug.g_err_stage := 'PA_FP_COPY_FROM_PKG.copy_resource_assignments returned error';
2354: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2355: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2356:
2357: END IF;
2358:

Line 2364: IF P_PA_DEBUG_MODE = 'Y' THEN

2360: --using source budget lines depending on adjustment percentage. If adjustment
2361: --percentage is non zero,amount columns aren't copied and also roll up records
2362: --aren't entered.
2363:
2364: IF P_PA_DEBUG_MODE = 'Y' THEN
2365: pa_debug.g_err_stage := 'Calling copy_budget_lines';
2366: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2367: END IF;
2368:

Line 2365: pa_debug.g_err_stage := 'Calling copy_budget_lines';

2361: --percentage is non zero,amount columns aren't copied and also roll up records
2362: --aren't entered.
2363:
2364: IF P_PA_DEBUG_MODE = 'Y' THEN
2365: pa_debug.g_err_stage := 'Calling copy_budget_lines';
2366: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2367: END IF;
2368:
2369: /* 3156057: If source plan is mc enabled but not appr rev and the target is appr rev,

Line 2366: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2362: --aren't entered.
2363:
2364: IF P_PA_DEBUG_MODE = 'Y' THEN
2365: pa_debug.g_err_stage := 'Calling copy_budget_lines';
2366: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2367: END IF;
2368:
2369: /* 3156057: If source plan is mc enabled but not appr rev and the target is appr rev,
2370: then copy copy_budget_lines_appr_rev will be called to group the source

Line 2375: IF P_PA_DEBUG_MODE = 'Y' THEN

2371: budget lines by PFC for creating target budget lines */
2372:
2373: IF l_source_appr_rev_plan_flag = 'N' and l_source_plan_in_mc_flag = 'Y' and l_target_appr_rev_plan_flag = 'Y' THEN
2374:
2375: IF P_PA_DEBUG_MODE = 'Y' THEN
2376: pa_debug.g_err_stage:='Copying a mc enabled version into a appr rev plan type version.';
2377: pa_debug.write('Copy_Plan: ' || l_module_name,pa_debug.g_err_stage,3);
2378: END IF;
2379:

Line 2376: pa_debug.g_err_stage:='Copying a mc enabled version into a appr rev plan type version.';

2372:
2373: IF l_source_appr_rev_plan_flag = 'N' and l_source_plan_in_mc_flag = 'Y' and l_target_appr_rev_plan_flag = 'Y' THEN
2374:
2375: IF P_PA_DEBUG_MODE = 'Y' THEN
2376: pa_debug.g_err_stage:='Copying a mc enabled version into a appr rev plan type version.';
2377: pa_debug.write('Copy_Plan: ' || l_module_name,pa_debug.g_err_stage,3);
2378: END IF;
2379:
2380: --Bug 4290043. Added p_derv_rates_missing_amts_flag. Note that actuals will never be copied in this

Line 2377: pa_debug.write('Copy_Plan: ' || l_module_name,pa_debug.g_err_stage,3);

2373: IF l_source_appr_rev_plan_flag = 'N' and l_source_plan_in_mc_flag = 'Y' and l_target_appr_rev_plan_flag = 'Y' THEN
2374:
2375: IF P_PA_DEBUG_MODE = 'Y' THEN
2376: pa_debug.g_err_stage:='Copying a mc enabled version into a appr rev plan type version.';
2377: pa_debug.write('Copy_Plan: ' || l_module_name,pa_debug.g_err_stage,3);
2378: END IF;
2379:
2380: --Bug 4290043. Added p_derv_rates_missing_amts_flag. Note that actuals will never be copied in this
2381: --case since the target is always Budget

Line 2410: pa_debug.g_err_stage := 'PA_FP_COPY_FROM_PKG.copy_budget_lines returned error';

2406: ,x_msg_data => l_msg_data );
2407:
2408: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2409:
2410: pa_debug.g_err_stage := 'PA_FP_COPY_FROM_PKG.copy_budget_lines returned error';
2411: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2412: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2413:
2414: END IF;

Line 2411: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2407:
2408: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2409:
2410: pa_debug.g_err_stage := 'PA_FP_COPY_FROM_PKG.copy_budget_lines returned error';
2411: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2412: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2413:
2414: END IF;
2415:

Line 2427: IF P_PA_DEBUG_MODE = 'Y' THEN

2423: --Calling create_res_task_maps api to generate new resource_assignment_ids
2424: --and store them in pa_fp_ra_map_tmp table
2425:
2426:
2427: IF P_PA_DEBUG_MODE = 'Y' THEN
2428: pa_debug.g_err_stage := 'Calling create_res_task_maps';
2429: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2430: END IF;
2431:

Line 2428: pa_debug.g_err_stage := 'Calling create_res_task_maps';

2424: --and store them in pa_fp_ra_map_tmp table
2425:
2426:
2427: IF P_PA_DEBUG_MODE = 'Y' THEN
2428: pa_debug.g_err_stage := 'Calling create_res_task_maps';
2429: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2430: END IF;
2431:
2432: pa_fp_org_fcst_gen_pub.create_res_task_maps(

Line 2429: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2425:
2426:
2427: IF P_PA_DEBUG_MODE = 'Y' THEN
2428: pa_debug.g_err_stage := 'Calling create_res_task_maps';
2429: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2430: END IF;
2431:
2432: pa_fp_org_fcst_gen_pub.create_res_task_maps(
2433: p_source_project_id => p_project_id

Line 2445: pa_debug.g_err_stage := 'pa_fp_org_fcst_gen_pub.create_res_task_maps returned error';

2441: ,x_msg_data => l_msg_data );
2442:
2443: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2444:
2445: pa_debug.g_err_stage := 'pa_fp_org_fcst_gen_pub.create_res_task_maps returned error';
2446: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2447: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2448:
2449: END IF;

Line 2446: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2442:
2443: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2444:
2445: pa_debug.g_err_stage := 'pa_fp_org_fcst_gen_pub.create_res_task_maps returned error';
2446: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2447: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2448:
2449: END IF;
2450:

Line 2452: IF P_PA_DEBUG_MODE = 'Y' THEN

2448:
2449: END IF;
2450:
2451:
2452: IF P_PA_DEBUG_MODE = 'Y' THEN
2453: pa_debug.g_err_stage := 'Calling copy_resource_assignment';
2454: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2455: END IF;
2456:

Line 2453: pa_debug.g_err_stage := 'Calling copy_resource_assignment';

2449: END IF;
2450:
2451:
2452: IF P_PA_DEBUG_MODE = 'Y' THEN
2453: pa_debug.g_err_stage := 'Calling copy_resource_assignment';
2454: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2455: END IF;
2456:
2457: pa_fp_org_fcst_gen_pub.copy_resource_assignments(

Line 2454: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2450:
2451:
2452: IF P_PA_DEBUG_MODE = 'Y' THEN
2453: pa_debug.g_err_stage := 'Calling copy_resource_assignment';
2454: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2455: END IF;
2456:
2457: pa_fp_org_fcst_gen_pub.copy_resource_assignments(
2458: p_source_plan_version_id => p_source_version_id

Line 2467: pa_debug.g_err_stage := 'pa_fp_org_fcst_gen_pub.copy_resource_assignments returned error';

2463: ,x_msg_data => l_msg_data );
2464:
2465: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2466:
2467: pa_debug.g_err_stage := 'pa_fp_org_fcst_gen_pub.copy_resource_assignments returned error';
2468: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2469: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2470:
2471: END IF;

Line 2468: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2464:
2465: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2466:
2467: pa_debug.g_err_stage := 'pa_fp_org_fcst_gen_pub.copy_resource_assignments returned error';
2468: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2469: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2470:
2471: END IF;
2472:

Line 2474: IF P_PA_DEBUG_MODE = 'Y' THEN

2470:
2471: END IF;
2472:
2473:
2474: IF P_PA_DEBUG_MODE = 'Y' THEN
2475: pa_debug.g_err_stage := 'Calling copy_budget_lines';
2476: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2477: END IF;
2478:

Line 2475: pa_debug.g_err_stage := 'Calling copy_budget_lines';

2471: END IF;
2472:
2473:
2474: IF P_PA_DEBUG_MODE = 'Y' THEN
2475: pa_debug.g_err_stage := 'Calling copy_budget_lines';
2476: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2477: END IF;
2478:
2479: pa_fp_org_fcst_gen_pub.copy_budget_lines (

Line 2476: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2472:
2473:
2474: IF P_PA_DEBUG_MODE = 'Y' THEN
2475: pa_debug.g_err_stage := 'Calling copy_budget_lines';
2476: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2477: END IF;
2478:
2479: pa_fp_org_fcst_gen_pub.copy_budget_lines (
2480: p_source_plan_version_id => p_source_version_id

Line 2489: pa_debug.g_err_stage := 'pa_fp_org_fcst_gen_pub.copy_budget_lines returned error';

2485: ,x_msg_data => l_msg_data );
2486:
2487: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2488:
2489: pa_debug.g_err_stage := 'pa_fp_org_fcst_gen_pub.copy_budget_lines returned error';
2490: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2491: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2492:
2493: END IF;

Line 2490: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2486:
2487: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2488:
2489: pa_debug.g_err_stage := 'pa_fp_org_fcst_gen_pub.copy_budget_lines returned error';
2490: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2491: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2492:
2493: END IF;
2494:

Line 2514: IF P_PA_DEBUG_MODE = 'Y' THEN

2510: /* 3156057 */
2511:
2512: IF l_source_appr_rev_plan_flag = 'N' and l_source_plan_in_mc_flag = 'Y' and l_target_appr_rev_plan_flag = 'Y' THEN
2513:
2514: IF P_PA_DEBUG_MODE = 'Y' THEN
2515: pa_debug.g_err_stage:='Not calling convert_txn_currency since copying a mc enabled version into a appr rev plan type version.';
2516: pa_debug.write('Copy_Plan: ' || l_module_name,pa_debug.g_err_stage,3);
2517: END IF;
2518:

Line 2515: pa_debug.g_err_stage:='Not calling convert_txn_currency since copying a mc enabled version into a appr rev plan type version.';

2511:
2512: IF l_source_appr_rev_plan_flag = 'N' and l_source_plan_in_mc_flag = 'Y' and l_target_appr_rev_plan_flag = 'Y' THEN
2513:
2514: IF P_PA_DEBUG_MODE = 'Y' THEN
2515: pa_debug.g_err_stage:='Not calling convert_txn_currency since copying a mc enabled version into a appr rev plan type version.';
2516: pa_debug.write('Copy_Plan: ' || l_module_name,pa_debug.g_err_stage,3);
2517: END IF;
2518:
2519: ELSE

Line 2516: pa_debug.write('Copy_Plan: ' || l_module_name,pa_debug.g_err_stage,3);

2512: IF l_source_appr_rev_plan_flag = 'N' and l_source_plan_in_mc_flag = 'Y' and l_target_appr_rev_plan_flag = 'Y' THEN
2513:
2514: IF P_PA_DEBUG_MODE = 'Y' THEN
2515: pa_debug.g_err_stage:='Not calling convert_txn_currency since copying a mc enabled version into a appr rev plan type version.';
2516: pa_debug.write('Copy_Plan: ' || l_module_name,pa_debug.g_err_stage,3);
2517: END IF;
2518:
2519: ELSE
2520:

Line 2521: IF P_PA_DEBUG_MODE = 'Y' THEN

2517: END IF;
2518:
2519: ELSE
2520:
2521: IF P_PA_DEBUG_MODE = 'Y' THEN
2522: pa_debug.g_err_stage := 'Calling convert_txn_currency';
2523: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2524: END IF;
2525:

Line 2522: pa_debug.g_err_stage := 'Calling convert_txn_currency';

2518:
2519: ELSE
2520:
2521: IF P_PA_DEBUG_MODE = 'Y' THEN
2522: pa_debug.g_err_stage := 'Calling convert_txn_currency';
2523: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2524: END IF;
2525:
2526: PA_FP_MULTI_CURRENCY_PKG.convert_txn_currency (

Line 2523: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2519: ELSE
2520:
2521: IF P_PA_DEBUG_MODE = 'Y' THEN
2522: pa_debug.g_err_stage := 'Calling convert_txn_currency';
2523: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2524: END IF;
2525:
2526: PA_FP_MULTI_CURRENCY_PKG.convert_txn_currency (
2527: p_budget_version_id => l_budget_version_id

Line 2542: IF P_PA_DEBUG_MODE = 'Y' THEN

2538: -- Bug Fix: 4569365. Removed MRC code.
2539: /* FPB2: MRC - Needs to done only in case of FINPLAN */
2540:
2541: /*
2542: IF P_PA_DEBUG_MODE = 'Y' THEN
2543: pa_debug.g_err_stage:='Calling mrc api ........ ';
2544: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2545: END IF;
2546:

Line 2543: pa_debug.g_err_stage:='Calling mrc api ........ ';

2539: /* FPB2: MRC - Needs to done only in case of FINPLAN */
2540:
2541: /*
2542: IF P_PA_DEBUG_MODE = 'Y' THEN
2543: pa_debug.g_err_stage:='Calling mrc api ........ ';
2544: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2545: END IF;
2546:
2547: IF p_calling_module = PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_FIN_PLAN THEN

Line 2544: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2540:
2541: /*
2542: IF P_PA_DEBUG_MODE = 'Y' THEN
2543: pa_debug.g_err_stage:='Calling mrc api ........ ';
2544: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2545: END IF;
2546:
2547: IF p_calling_module = PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_FIN_PLAN THEN
2548:

Line 2553: IF P_PA_DEBUG_MODE = 'Y' THEN

2549: -- Nvl is handled because we donot want to overwrite calling_module set already ,eg., COPY_PROJECTS
2550:
2551: PA_MRC_FINPLAN.G_CALLING_MODULE := Nvl(PA_MRC_FINPLAN.G_CALLING_MODULE,PA_MRC_FINPLAN.G_COPY_VERSION);
2552:
2553: IF P_PA_DEBUG_MODE = 'Y' THEN
2554: pa_debug.g_err_stage:='before mrc api ........ MRC Calling module : ' || PA_MRC_FINPLAN.G_CALLING_MODULE;
2555: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2556: END IF;
2557:

Line 2554: pa_debug.g_err_stage:='before mrc api ........ MRC Calling module : ' || PA_MRC_FINPLAN.G_CALLING_MODULE;

2550:
2551: PA_MRC_FINPLAN.G_CALLING_MODULE := Nvl(PA_MRC_FINPLAN.G_CALLING_MODULE,PA_MRC_FINPLAN.G_COPY_VERSION);
2552:
2553: IF P_PA_DEBUG_MODE = 'Y' THEN
2554: pa_debug.g_err_stage:='before mrc api ........ MRC Calling module : ' || PA_MRC_FINPLAN.G_CALLING_MODULE;
2555: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2556: END IF;
2557:
2558: IF PA_MRC_FINPLAN.G_MRC_ENABLED_FOR_BUDGETS IS NULL THEN

Line 2555: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2551: PA_MRC_FINPLAN.G_CALLING_MODULE := Nvl(PA_MRC_FINPLAN.G_CALLING_MODULE,PA_MRC_FINPLAN.G_COPY_VERSION);
2552:
2553: IF P_PA_DEBUG_MODE = 'Y' THEN
2554: pa_debug.g_err_stage:='before mrc api ........ MRC Calling module : ' || PA_MRC_FINPLAN.G_CALLING_MODULE;
2555: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2556: END IF;
2557:
2558: IF PA_MRC_FINPLAN.G_MRC_ENABLED_FOR_BUDGETS IS NULL THEN
2559: PA_MRC_FINPLAN.CHECK_MRC_INSTALL

Line 2576: IF P_PA_DEBUG_MODE = 'Y' THEN

2572: PA_MRC_FINPLAN.G_FINPLAN_MRC_OPTION_CODE = 'A' AND
2573: (l_derv_rates_missing_amts_flag = 'N' OR
2574: l_source_fp_preference_code = l_target_fp_preference_code ) THEN
2575:
2576: IF P_PA_DEBUG_MODE = 'Y' THEN
2577: pa_debug.g_err_stage:='before mrc api adj % is zero ';
2578: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2579: END IF;
2580:

Line 2577: pa_debug.g_err_stage:='before mrc api adj % is zero ';

2573: (l_derv_rates_missing_amts_flag = 'N' OR
2574: l_source_fp_preference_code = l_target_fp_preference_code ) THEN
2575:
2576: IF P_PA_DEBUG_MODE = 'Y' THEN
2577: pa_debug.g_err_stage:='before mrc api adj % is zero ';
2578: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2579: END IF;
2580:
2581: -- 3156057: If source plan is mc enabled but not appr rev and the target is appr rev,

Line 2578: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2574: l_source_fp_preference_code = l_target_fp_preference_code ) THEN
2575:
2576: IF P_PA_DEBUG_MODE = 'Y' THEN
2577: pa_debug.g_err_stage:='before mrc api adj % is zero ';
2578: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2579: END IF;
2580:
2581: -- 3156057: If source plan is mc enabled but not appr rev and the target is appr rev,
2582: -- then copy_mc_budget_lines_appr_rev will be called to group the source

Line 2590: IF P_PA_DEBUG_MODE = 'Y' THEN

2586: and l_source_plan_in_mc_flag = 'Y'
2587: and l_target_appr_rev_plan_flag = 'Y' THEN
2588:
2589:
2590: IF P_PA_DEBUG_MODE = 'Y' THEN
2591: pa_debug.g_err_stage:='calling copy_mc_budget_lines_appr_rev ';
2592: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2593: END IF;
2594:

Line 2591: pa_debug.g_err_stage:='calling copy_mc_budget_lines_appr_rev ';

2587: and l_target_appr_rev_plan_flag = 'Y' THEN
2588:
2589:
2590: IF P_PA_DEBUG_MODE = 'Y' THEN
2591: pa_debug.g_err_stage:='calling copy_mc_budget_lines_appr_rev ';
2592: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2593: END IF;
2594:
2595:

Line 2592: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2588:
2589:
2590: IF P_PA_DEBUG_MODE = 'Y' THEN
2591: pa_debug.g_err_stage:='calling copy_mc_budget_lines_appr_rev ';
2592: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2593: END IF;
2594:
2595:
2596: PA_MRC_FINPLAN.COPY_MC_BUDGET_LINES_APPR_REV

Line 2611: IF P_PA_DEBUG_MODE = 'Y' THEN

2607: END IF;
2608:
2609: ELSE
2610:
2611: IF P_PA_DEBUG_MODE = 'Y' THEN
2612: pa_debug.g_err_stage:='calling copy_mc_budget_lines ';
2613: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2614: END IF;
2615:

Line 2612: pa_debug.g_err_stage:='calling copy_mc_budget_lines ';

2608:
2609: ELSE
2610:
2611: IF P_PA_DEBUG_MODE = 'Y' THEN
2612: pa_debug.g_err_stage:='calling copy_mc_budget_lines ';
2613: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2614: END IF;
2615:
2616: PA_MRC_FINPLAN.COPY_MC_BUDGET_LINES

Line 2613: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2609: ELSE
2610:
2611: IF P_PA_DEBUG_MODE = 'Y' THEN
2612: pa_debug.g_err_stage:='calling copy_mc_budget_lines ';
2613: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2614: END IF;
2615:
2616: PA_MRC_FINPLAN.COPY_MC_BUDGET_LINES
2617: (p_source_fin_plan_version_id => p_source_version_id,

Line 2627: IF P_PA_DEBUG_MODE = 'Y' THEN

2623: END IF; -- 3156057
2624:
2625: ELSE
2626:
2627: IF P_PA_DEBUG_MODE = 'Y' THEN
2628: pa_debug.g_err_stage:='before mrc api adj % is NOT zero ';
2629: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2630: END IF;
2631:

Line 2628: pa_debug.g_err_stage:='before mrc api adj % is NOT zero ';

2624:
2625: ELSE
2626:
2627: IF P_PA_DEBUG_MODE = 'Y' THEN
2628: pa_debug.g_err_stage:='before mrc api adj % is NOT zero ';
2629: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2630: END IF;
2631:
2632: PA_MRC_FINPLAN.MAINTAIN_ALL_MC_BUDGET_LINES

Line 2629: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2625: ELSE
2626:
2627: IF P_PA_DEBUG_MODE = 'Y' THEN
2628: pa_debug.g_err_stage:='before mrc api adj % is NOT zero ';
2629: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2630: END IF;
2631:
2632: PA_MRC_FINPLAN.MAINTAIN_ALL_MC_BUDGET_LINES
2633: -- Bug# 2657812 - Commented - (p_fin_plan_version_id => p_source_version_id, - mrc should be done for target

Line 2692: IF P_PA_DEBUG_MODE = 'Y' THEN

2688:
2689:
2690: --copy the period denorm directly from source to target
2691:
2692: IF P_PA_DEBUG_MODE = 'Y' THEN
2693: pa_debug.g_err_stage := 'Calling copy_periods_denorm api';
2694: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2695: END IF;
2696:

Line 2693: pa_debug.g_err_stage := 'Calling copy_periods_denorm api';

2689:
2690: --copy the period denorm directly from source to target
2691:
2692: IF P_PA_DEBUG_MODE = 'Y' THEN
2693: pa_debug.g_err_stage := 'Calling copy_periods_denorm api';
2694: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2695: END IF;
2696:
2697: PA_FP_COPY_FROM_PKG.copy_periods_denorm (

Line 2694: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2690: --copy the period denorm directly from source to target
2691:
2692: IF P_PA_DEBUG_MODE = 'Y' THEN
2693: pa_debug.g_err_stage := 'Calling copy_periods_denorm api';
2694: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2695: END IF;
2696:
2697: PA_FP_COPY_FROM_PKG.copy_periods_denorm (
2698: p_source_plan_version_id => p_source_version_id

Line 2729: pa_debug.g_err_stage := 'Calling copy_periods_denorm api';

2725: WHERE budget_version_id = l_budget_version_id;
2726:
2727: --Calling copy_periods_denorm api
2728:
2729: pa_debug.g_err_stage := 'Calling copy_periods_denorm api';
2730: IF P_PA_DEBUG_MODE = 'Y' THEN
2731: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2732: END IF;
2733:

Line 2730: IF P_PA_DEBUG_MODE = 'Y' THEN

2726:
2727: --Calling copy_periods_denorm api
2728:
2729: pa_debug.g_err_stage := 'Calling copy_periods_denorm api';
2730: IF P_PA_DEBUG_MODE = 'Y' THEN
2731: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2732: END IF;
2733:
2734: PA_FP_COPY_FROM_PKG.copy_periods_denorm (

Line 2731: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2727: --Calling copy_periods_denorm api
2728:
2729: pa_debug.g_err_stage := 'Calling copy_periods_denorm api';
2730: IF P_PA_DEBUG_MODE = 'Y' THEN
2731: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2732: END IF;
2733:
2734: PA_FP_COPY_FROM_PKG.copy_periods_denorm (
2735: p_source_plan_version_id => p_source_version_id

Line 2745: pa_debug.g_err_stage := 'Calling call_maintain_plan_matrix api';

2741:
2742: /*--if source and target profile ids are different then call
2743: --call_maintain_plan_matrix api
2744:
2745: pa_debug.g_err_stage := 'Calling call_maintain_plan_matrix api';
2746: IF P_PA_DEBUG_MODE = 'Y' THEN
2747: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2748: END IF;
2749:

Line 2746: IF P_PA_DEBUG_MODE = 'Y' THEN

2742: /*--if source and target profile ids are different then call
2743: --call_maintain_plan_matrix api
2744:
2745: pa_debug.g_err_stage := 'Calling call_maintain_plan_matrix api';
2746: IF P_PA_DEBUG_MODE = 'Y' THEN
2747: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2748: END IF;
2749:
2750: Call_maintain_plan_matrix(

Line 2747: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2743: --call_maintain_plan_matrix api
2744:
2745: pa_debug.g_err_stage := 'Calling call_maintain_plan_matrix api';
2746: IF P_PA_DEBUG_MODE = 'Y' THEN
2747: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2748: END IF;
2749:
2750: Call_maintain_plan_matrix(
2751: p_budget_version_id => l_budget_version_id,

Line 2771: IF P_PA_debug_mode = 'Y' THEN

2767: X_MSG_COUNT => l_msg_count,
2768: X_MSG_DATA => l_msg_data);
2769:
2770: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2771: IF P_PA_debug_mode = 'Y' THEN
2772: pa_debug.g_err_stage:= 'Error in SRC PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DETAILS';
2773: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
2774: END IF;
2775: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 2772: pa_debug.g_err_stage:= 'Error in SRC PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DETAILS';

2768: X_MSG_DATA => l_msg_data);
2769:
2770: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2771: IF P_PA_debug_mode = 'Y' THEN
2772: pa_debug.g_err_stage:= 'Error in SRC PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DETAILS';
2773: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
2774: END IF;
2775: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2776: END IF;

Line 2773: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);

2769:
2770: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2771: IF P_PA_debug_mode = 'Y' THEN
2772: pa_debug.g_err_stage:= 'Error in SRC PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DETAILS';
2773: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
2774: END IF;
2775: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2776: END IF;
2777:

Line 2786: IF P_PA_debug_mode = 'Y' THEN

2782: X_MSG_COUNT => l_msg_count,
2783: X_MSG_DATA => l_msg_data);
2784:
2785: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2786: IF P_PA_debug_mode = 'Y' THEN
2787: pa_debug.g_err_stage:= 'Error in TARGET PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DETAILS';
2788: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
2789: END IF;
2790: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 2787: pa_debug.g_err_stage:= 'Error in TARGET PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DETAILS';

2783: X_MSG_DATA => l_msg_data);
2784:
2785: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2786: IF P_PA_debug_mode = 'Y' THEN
2787: pa_debug.g_err_stage:= 'Error in TARGET PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DETAILS';
2788: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
2789: END IF;
2790: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2791: END IF;

Line 2788: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);

2784:
2785: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2786: IF P_PA_debug_mode = 'Y' THEN
2787: pa_debug.g_err_stage:= 'Error in TARGET PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DETAILS';
2788: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
2789: END IF;
2790: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2791: END IF;
2792:

Line 2804: IF P_PA_debug_mode = 'Y' THEN

2800: p_use_temp_table_flag => 'N',
2801: x_return_status => l_return_status);
2802:
2803: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2804: IF P_PA_debug_mode = 'Y' THEN
2805: pa_debug.g_err_stage:= 'Error in PA_BUDGET_LINES_UTILS.populate_display_qty';
2806: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
2807: END IF;
2808: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 2805: pa_debug.g_err_stage:= 'Error in PA_BUDGET_LINES_UTILS.populate_display_qty';

2801: x_return_status => l_return_status);
2802:
2803: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2804: IF P_PA_debug_mode = 'Y' THEN
2805: pa_debug.g_err_stage:= 'Error in PA_BUDGET_LINES_UTILS.populate_display_qty';
2806: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
2807: END IF;
2808: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2809: END IF;

Line 2806: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);

2802:
2803: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2804: IF P_PA_debug_mode = 'Y' THEN
2805: pa_debug.g_err_stage:= 'Error in PA_BUDGET_LINES_UTILS.populate_display_qty';
2806: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
2807: END IF;
2808: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2809: END IF;
2810:

Line 2824: IF P_PA_debug_mode = 'Y' THEN

2820: x_msg_count => l_msg_data);
2821:
2822:
2823: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2824: IF P_PA_debug_mode = 'Y' THEN
2825: pa_debug.g_err_stage:= 'Error in PA_RES_ASG_CURRENCY_PUB.MAINTAIN_DATA';
2826: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
2827: END IF;
2828: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 2825: pa_debug.g_err_stage:= 'Error in PA_RES_ASG_CURRENCY_PUB.MAINTAIN_DATA';

2821:
2822:
2823: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2824: IF P_PA_debug_mode = 'Y' THEN
2825: pa_debug.g_err_stage:= 'Error in PA_RES_ASG_CURRENCY_PUB.MAINTAIN_DATA';
2826: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
2827: END IF;
2828: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2829: END IF;

Line 2826: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);

2822:
2823: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2824: IF P_PA_debug_mode = 'Y' THEN
2825: pa_debug.g_err_stage:= 'Error in PA_RES_ASG_CURRENCY_PUB.MAINTAIN_DATA';
2826: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
2827: END IF;
2828: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2829: END IF;
2830:

Line 2859: IF P_PA_debug_mode = 'Y' THEN

2855: x_msg_data => l_msg_data,
2856: x_msg_count => l_msg_count);
2857:
2858: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2859: IF P_PA_debug_mode = 'Y' THEN
2860: pa_debug.g_err_stage:= 'Error in PA_RES_ASG_CURRENCY_PUB.MAINTAIN_DATA - Copy Overrides';
2861: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
2862: END IF;
2863: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 2860: pa_debug.g_err_stage:= 'Error in PA_RES_ASG_CURRENCY_PUB.MAINTAIN_DATA - Copy Overrides';

2856: x_msg_count => l_msg_count);
2857:
2858: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2859: IF P_PA_debug_mode = 'Y' THEN
2860: pa_debug.g_err_stage:= 'Error in PA_RES_ASG_CURRENCY_PUB.MAINTAIN_DATA - Copy Overrides';
2861: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
2862: END IF;
2863: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2864: END IF;

Line 2861: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);

2857:
2858: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2859: IF P_PA_debug_mode = 'Y' THEN
2860: pa_debug.g_err_stage:= 'Error in PA_RES_ASG_CURRENCY_PUB.MAINTAIN_DATA - Copy Overrides';
2861: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
2862: END IF;
2863: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2864: END IF;
2865:

Line 2878: IF P_PA_debug_mode = 'Y' THEN

2874: x_msg_data => l_msg_data,
2875: x_msg_count => l_msg_count);
2876:
2877: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2878: IF P_PA_debug_mode = 'Y' THEN
2879: pa_debug.g_err_stage:= 'Error in PA_RES_ASG_CURRENCY_PUB.MAINTAIN_DATA - Rollup';
2880: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
2881: END IF;
2882: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 2879: pa_debug.g_err_stage:= 'Error in PA_RES_ASG_CURRENCY_PUB.MAINTAIN_DATA - Rollup';

2875: x_msg_count => l_msg_count);
2876:
2877: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2878: IF P_PA_debug_mode = 'Y' THEN
2879: pa_debug.g_err_stage:= 'Error in PA_RES_ASG_CURRENCY_PUB.MAINTAIN_DATA - Rollup';
2880: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
2881: END IF;
2882: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2883: END IF;

Line 2880: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);

2876:
2877: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2878: IF P_PA_debug_mode = 'Y' THEN
2879: pa_debug.g_err_stage:= 'Error in PA_RES_ASG_CURRENCY_PUB.MAINTAIN_DATA - Rollup';
2880: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
2881: END IF;
2882: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2883: END IF;
2884: END IF;

Line 2895: IF P_PA_DEBUG_MODE = 'Y' THEN

2891: --Calling rollup_budget_versions.This api rolls up resource assignments,
2892: --creates proj denorm at entered level, creates rollup proj denorm and
2893: --updates budget version with summed up values
2894:
2895: IF P_PA_DEBUG_MODE = 'Y' THEN
2896: pa_debug.g_err_stage := 'Calling rollup_budget_versions api - 1st rollup';
2897: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2898: END IF;
2899:

Line 2896: pa_debug.g_err_stage := 'Calling rollup_budget_versions api - 1st rollup';

2892: --creates proj denorm at entered level, creates rollup proj denorm and
2893: --updates budget version with summed up values
2894:
2895: IF P_PA_DEBUG_MODE = 'Y' THEN
2896: pa_debug.g_err_stage := 'Calling rollup_budget_versions api - 1st rollup';
2897: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2898: END IF;
2899:
2900: PA_FP_ROLLUP_PKG.rollup_budget_version (

Line 2897: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2893: --updates budget version with summed up values
2894:
2895: IF P_PA_DEBUG_MODE = 'Y' THEN
2896: pa_debug.g_err_stage := 'Calling rollup_budget_versions api - 1st rollup';
2897: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2898: END IF;
2899:
2900: PA_FP_ROLLUP_PKG.rollup_budget_version (
2901: p_budget_version_id => l_budget_version_id

Line 2919: IF P_PA_DEBUG_MODE = 'Y' THEN

2915: fetch chk_tgt_ver_status into l_chk_tgt_ver_status;
2916: close chk_tgt_ver_status;
2917: If l_chk_tgt_ver_status = 'Y' then
2918:
2919: IF P_PA_DEBUG_MODE = 'Y' THEN
2920: pa_debug.g_err_stage := 'Calling rollup_budget_versions api - 2nd rollup';
2921: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2922: END IF;
2923:

Line 2920: pa_debug.g_err_stage := 'Calling rollup_budget_versions api - 2nd rollup';

2916: close chk_tgt_ver_status;
2917: If l_chk_tgt_ver_status = 'Y' then
2918:
2919: IF P_PA_DEBUG_MODE = 'Y' THEN
2920: pa_debug.g_err_stage := 'Calling rollup_budget_versions api - 2nd rollup';
2921: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2922: END IF;
2923:
2924:

Line 2921: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

2917: If l_chk_tgt_ver_status = 'Y' then
2918:
2919: IF P_PA_DEBUG_MODE = 'Y' THEN
2920: pa_debug.g_err_stage := 'Calling rollup_budget_versions api - 2nd rollup';
2921: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
2922: END IF;
2923:
2924:
2925: PA_FP_ROLLUP_PKG.rollup_budget_version (

Line 2977: pa_debug.g_err_stage:='Called API Refresh_rbs_for_versions returned error';

2973: ,x_msg_data => l_msg_data);
2974:
2975: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2976: IF l_debug_mode = 'Y' THEN
2977: pa_debug.g_err_stage:='Called API Refresh_rbs_for_versions returned error';
2978: pa_debug.write('Refresh_Plan_Txns: ' || l_module_name,pa_debug.g_err_stage,5);
2979: END IF;
2980: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2981: END IF;

Line 2978: pa_debug.write('Refresh_Plan_Txns: ' || l_module_name,pa_debug.g_err_stage,5);

2974:
2975: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2976: IF l_debug_mode = 'Y' THEN
2977: pa_debug.g_err_stage:='Called API Refresh_rbs_for_versions returned error';
2978: pa_debug.write('Refresh_Plan_Txns: ' || l_module_name,pa_debug.g_err_stage,5);
2979: END IF;
2980: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2981: END IF;
2982:

Line 3002: IF P_PA_DEBUG_MODE = 'Y' THEN

2998: l_source_fp_preference_code <> l_target_fp_preference_code OR --Added for bug 42344402
2999: l_adj_percentage <> 0 OR -- Bug 4085235: Added this condition to call plan_create
3000: l_derv_rates_missing_amts_flag = 'Y' THEN
3001:
3002: IF P_PA_DEBUG_MODE = 'Y' THEN
3003: pa_debug.g_err_stage := 'Calling PJI_FM_XBS_ACCUM_MAINT.PLAN_CREATE';
3004: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
3005: END IF;
3006:

Line 3003: pa_debug.g_err_stage := 'Calling PJI_FM_XBS_ACCUM_MAINT.PLAN_CREATE';

2999: l_adj_percentage <> 0 OR -- Bug 4085235: Added this condition to call plan_create
3000: l_derv_rates_missing_amts_flag = 'Y' THEN
3001:
3002: IF P_PA_DEBUG_MODE = 'Y' THEN
3003: pa_debug.g_err_stage := 'Calling PJI_FM_XBS_ACCUM_MAINT.PLAN_CREATE';
3004: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
3005: END IF;
3006:
3007: l_dest_ver_id_tbl.extend(1);

Line 3004: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

3000: l_derv_rates_missing_amts_flag = 'Y' THEN
3001:
3002: IF P_PA_DEBUG_MODE = 'Y' THEN
3003: pa_debug.g_err_stage := 'Calling PJI_FM_XBS_ACCUM_MAINT.PLAN_CREATE';
3004: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
3005: END IF;
3006:
3007: l_dest_ver_id_tbl.extend(1);
3008: l_dest_ver_id_tbl(1) := l_budget_version_id;

Line 3017: IF P_PA_DEBUG_MODE = 'Y' THEN

3013: x_return_status => l_return_status,
3014: x_msg_code => l_error_msg_code);
3015:
3016: IF l_return_status <> FND_API.G_RET_STS_SUCCESS then
3017: IF P_PA_DEBUG_MODE = 'Y' THEN
3018: pa_debug.g_err_stage := 'API PJI_FM_XBS_ACCUM_MAINT.PLAN_DELETE returned ERROR 1 '|| l_error_msg_code;
3019: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,5);
3020: END IF;
3021:

Line 3018: pa_debug.g_err_stage := 'API PJI_FM_XBS_ACCUM_MAINT.PLAN_DELETE returned ERROR 1 '|| l_error_msg_code;

3014: x_msg_code => l_error_msg_code);
3015:
3016: IF l_return_status <> FND_API.G_RET_STS_SUCCESS then
3017: IF P_PA_DEBUG_MODE = 'Y' THEN
3018: pa_debug.g_err_stage := 'API PJI_FM_XBS_ACCUM_MAINT.PLAN_DELETE returned ERROR 1 '|| l_error_msg_code;
3019: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,5);
3020: END IF;
3021:
3022: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 3019: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,5);

3015:
3016: IF l_return_status <> FND_API.G_RET_STS_SUCCESS then
3017: IF P_PA_DEBUG_MODE = 'Y' THEN
3018: pa_debug.g_err_stage := 'API PJI_FM_XBS_ACCUM_MAINT.PLAN_DELETE returned ERROR 1 '|| l_error_msg_code;
3019: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,5);
3020: END IF;
3021:
3022: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3023:

Line 3071: IF P_PA_DEBUG_MODE = 'Y' THEN

3067: WHEN NO_DATA_FOUND THEN
3068: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3069: END;
3070:
3071: IF P_PA_DEBUG_MODE = 'Y' THEN
3072: pa_debug.g_err_stage := 'Calling PJI_FM_XBS_ACCUM_MAINT.FINPLAN_COPY';
3073: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
3074: END IF;
3075:

Line 3072: pa_debug.g_err_stage := 'Calling PJI_FM_XBS_ACCUM_MAINT.FINPLAN_COPY';

3068: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3069: END;
3070:
3071: IF P_PA_DEBUG_MODE = 'Y' THEN
3072: pa_debug.g_err_stage := 'Calling PJI_FM_XBS_ACCUM_MAINT.FINPLAN_COPY';
3073: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
3074: END IF;
3075:
3076:

Line 3073: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

3069: END;
3070:
3071: IF P_PA_DEBUG_MODE = 'Y' THEN
3072: pa_debug.g_err_stage := 'Calling PJI_FM_XBS_ACCUM_MAINT.FINPLAN_COPY';
3073: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
3074: END IF;
3075:
3076:
3077: PJI_FM_XBS_ACCUM_MAINT.FINPLAN_COPY(

Line 3116: IF P_PA_DEBUG_MODE = 'Y' THEN

3112: --pa_fp_adj_elements,pa_fin_plan_adj_lines,pa_org_fcst_elements,pa_org_forecast_lines.
3113:
3114: IF p_calling_module = PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_ORG_FORECAST THEN
3115:
3116: IF P_PA_DEBUG_MODE = 'Y' THEN
3117: pa_debug.g_err_stage := 'Calling create_org_fcst_elements api';
3118: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
3119: END IF;
3120:

Line 3117: pa_debug.g_err_stage := 'Calling create_org_fcst_elements api';

3113:
3114: IF p_calling_module = PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_ORG_FORECAST THEN
3115:
3116: IF P_PA_DEBUG_MODE = 'Y' THEN
3117: pa_debug.g_err_stage := 'Calling create_org_fcst_elements api';
3118: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
3119: END IF;
3120:
3121: PA_FIN_PLAN_PUB.create_org_fcst_elements (

Line 3118: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

3114: IF p_calling_module = PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_ORG_FORECAST THEN
3115:
3116: IF P_PA_DEBUG_MODE = 'Y' THEN
3117: pa_debug.g_err_stage := 'Calling create_org_fcst_elements api';
3118: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
3119: END IF;
3120:
3121: PA_FIN_PLAN_PUB.create_org_fcst_elements (
3122: p_project_id => p_project_id,

Line 3133: IF P_PA_DEBUG_MODE = 'Y' THEN

3129:
3130: px_target_version_id := l_budget_version_id;
3131:
3132:
3133: IF P_PA_DEBUG_MODE = 'Y' THEN
3134: pa_debug.g_err_stage := 'Exiting Copy_Version';
3135: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
3136: END IF;
3137:

Line 3134: pa_debug.g_err_stage := 'Exiting Copy_Version';

3130: px_target_version_id := l_budget_version_id;
3131:
3132:
3133: IF P_PA_DEBUG_MODE = 'Y' THEN
3134: pa_debug.g_err_stage := 'Exiting Copy_Version';
3135: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
3136: END IF;
3137:
3138: pa_debug.reset_err_stack;

Line 3135: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);

3131:
3132:
3133: IF P_PA_DEBUG_MODE = 'Y' THEN
3134: pa_debug.g_err_stage := 'Exiting Copy_Version';
3135: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
3136: END IF;
3137:
3138: pa_debug.reset_err_stack;
3139:

Line 3138: pa_debug.reset_err_stack;

3134: pa_debug.g_err_stage := 'Exiting Copy_Version';
3135: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,3);
3136: END IF;
3137:
3138: pa_debug.reset_err_stack;
3139:
3140: EXCEPTION
3141: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
3142: ROLLBACK TO PA_FIN_PLAN_PUB_COPY_VERSION;

Line 3161: pa_debug.g_err_stage:='Invalid Arguments Passed';

3157: ELSE
3158: x_msg_count := l_msg_count;
3159: END IF;
3160:
3161: pa_debug.g_err_stage:='Invalid Arguments Passed';
3162: IF P_PA_DEBUG_MODE = 'Y' THEN
3163: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,5);
3164: END IF;
3165:

Line 3162: IF P_PA_DEBUG_MODE = 'Y' THEN

3158: x_msg_count := l_msg_count;
3159: END IF;
3160:
3161: pa_debug.g_err_stage:='Invalid Arguments Passed';
3162: IF P_PA_DEBUG_MODE = 'Y' THEN
3163: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,5);
3164: END IF;
3165:
3166: x_return_status:= FND_API.G_RET_STS_ERROR;

Line 3163: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,5);

3159: END IF;
3160:
3161: pa_debug.g_err_stage:='Invalid Arguments Passed';
3162: IF P_PA_DEBUG_MODE = 'Y' THEN
3163: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,5);
3164: END IF;
3165:
3166: x_return_status:= FND_API.G_RET_STS_ERROR;
3167: pa_debug.reset_err_stack;

Line 3167: pa_debug.reset_err_stack;

3163: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,5);
3164: END IF;
3165:
3166: x_return_status:= FND_API.G_RET_STS_ERROR;
3167: pa_debug.reset_err_stack;
3168:
3169: WHEN Others THEN
3170: ROLLBACK TO PA_FIN_PLAN_PUB_COPY_VERSION;
3171: -- Bug Fix: 4569365. Removed MRC code.

Line 3178: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;

3174: x_msg_count := 1;
3175: x_msg_data := SQLERRM;
3176: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PUB'
3177: ,p_procedure_name => 'COPY_VERSION');
3178: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
3179: IF P_PA_DEBUG_MODE = 'Y' THEN
3180: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,5);
3181: END IF;
3182: pa_debug.reset_err_stack;

Line 3179: IF P_PA_DEBUG_MODE = 'Y' THEN

3175: x_msg_data := SQLERRM;
3176: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PUB'
3177: ,p_procedure_name => 'COPY_VERSION');
3178: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
3179: IF P_PA_DEBUG_MODE = 'Y' THEN
3180: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,5);
3181: END IF;
3182: pa_debug.reset_err_stack;
3183: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 3180: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,5);

3176: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PUB'
3177: ,p_procedure_name => 'COPY_VERSION');
3178: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
3179: IF P_PA_DEBUG_MODE = 'Y' THEN
3180: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,5);
3181: END IF;
3182: pa_debug.reset_err_stack;
3183: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3184: END Copy_Version;

Line 3182: pa_debug.reset_err_stack;

3178: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
3179: IF P_PA_DEBUG_MODE = 'Y' THEN
3180: pa_debug.write('Copy_Version: ' || l_module_name,pa_debug.g_err_stage,5);
3181: END IF;
3182: pa_debug.reset_err_stack;
3183: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3184: END Copy_Version;
3185:
3186: /* ------------------------------------------------------------------------- */

Line 3227: IF P_PA_DEBUG_MODE = 'Y' THEN

3223: l_temp NUMBER;
3224:
3225: begin
3226: FND_MSG_PUB.initialize;
3227: IF P_PA_DEBUG_MODE = 'Y' THEN
3228: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Baseline');
3229: END IF;
3230: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
3231: l_debug_mode := NVL(l_debug_mode, 'Y');

Line 3228: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Baseline');

3224:
3225: begin
3226: FND_MSG_PUB.initialize;
3227: IF P_PA_DEBUG_MODE = 'Y' THEN
3228: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Baseline');
3229: END IF;
3230: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
3231: l_debug_mode := NVL(l_debug_mode, 'Y');
3232: IF P_PA_DEBUG_MODE = 'Y' THEN

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

3226: FND_MSG_PUB.initialize;
3227: IF P_PA_DEBUG_MODE = 'Y' THEN
3228: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Baseline');
3229: END IF;
3230: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
3231: l_debug_mode := NVL(l_debug_mode, 'Y');
3232: IF P_PA_DEBUG_MODE = 'Y' THEN
3233: pa_debug.set_process('Baseline: ' || 'PLSQL','LOG',l_debug_mode);
3234: END IF;

Line 3232: IF P_PA_DEBUG_MODE = 'Y' THEN

3228: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Baseline');
3229: END IF;
3230: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
3231: l_debug_mode := NVL(l_debug_mode, 'Y');
3232: IF P_PA_DEBUG_MODE = 'Y' THEN
3233: pa_debug.set_process('Baseline: ' || 'PLSQL','LOG',l_debug_mode);
3234: END IF;
3235: x_msg_count := 0;
3236: /* CHECK FOR BUSINESS RULES VIOLATIONS */

Line 3233: pa_debug.set_process('Baseline: ' || 'PLSQL','LOG',l_debug_mode);

3229: END IF;
3230: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
3231: l_debug_mode := NVL(l_debug_mode, 'Y');
3232: IF P_PA_DEBUG_MODE = 'Y' THEN
3233: pa_debug.set_process('Baseline: ' || 'PLSQL','LOG',l_debug_mode);
3234: END IF;
3235: x_msg_count := 0;
3236: /* CHECK FOR BUSINESS RULES VIOLATIONS */
3237: /* check for null budget_version_id */

Line 3239: IF P_PA_DEBUG_MODE = 'Y' THEN

3235: x_msg_count := 0;
3236: /* CHECK FOR BUSINESS RULES VIOLATIONS */
3237: /* check for null budget_version_id */
3238: if p_budget_version_id is NULL then
3239: IF P_PA_DEBUG_MODE = 'Y' THEN
3240: pa_debug.write_file('Baseline: ' || 'BUSINESS RULE VIOLATION: p_budget_version_id is null');
3241: END IF;
3242: x_return_status := FND_API.G_RET_STS_ERROR;
3243: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 3240: pa_debug.write_file('Baseline: ' || 'BUSINESS RULE VIOLATION: p_budget_version_id is null');

3236: /* CHECK FOR BUSINESS RULES VIOLATIONS */
3237: /* check for null budget_version_id */
3238: if p_budget_version_id is NULL then
3239: IF P_PA_DEBUG_MODE = 'Y' THEN
3240: pa_debug.write_file('Baseline: ' || 'BUSINESS RULE VIOLATION: p_budget_version_id is null');
3241: END IF;
3242: x_return_status := FND_API.G_RET_STS_ERROR;
3243: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
3244: p_msg_name => 'PA_FP_NO_PLAN_VERSION');

Line 3248: IF P_PA_DEBUG_MODE = 'Y' THEN

3244: p_msg_name => 'PA_FP_NO_PLAN_VERSION');
3245: end if;
3246: /* check to see if the current user is an EMPLOYEE; ONLY EMPLOYEES CAN BASELINE */
3247: l_created_by:=FND_GLOBAL.user_id;
3248: IF P_PA_DEBUG_MODE = 'Y' THEN
3249: pa_debug.write_file('Baseline: ' || 'created by= ' || l_created_by);
3250: END IF;
3251: l_emp_id := PA_UTILS.GetEmpIdFromUser(l_created_by);
3252: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 3249: pa_debug.write_file('Baseline: ' || 'created by= ' || l_created_by);

3245: end if;
3246: /* check to see if the current user is an EMPLOYEE; ONLY EMPLOYEES CAN BASELINE */
3247: l_created_by:=FND_GLOBAL.user_id;
3248: IF P_PA_DEBUG_MODE = 'Y' THEN
3249: pa_debug.write_file('Baseline: ' || 'created by= ' || l_created_by);
3250: END IF;
3251: l_emp_id := PA_UTILS.GetEmpIdFromUser(l_created_by);
3252: IF P_PA_DEBUG_MODE = 'Y' THEN
3253: pa_debug.write_file('Baseline: ' || 'employee id= ' || l_emp_id);

Line 3252: IF P_PA_DEBUG_MODE = 'Y' THEN

3248: IF P_PA_DEBUG_MODE = 'Y' THEN
3249: pa_debug.write_file('Baseline: ' || 'created by= ' || l_created_by);
3250: END IF;
3251: l_emp_id := PA_UTILS.GetEmpIdFromUser(l_created_by);
3252: IF P_PA_DEBUG_MODE = 'Y' THEN
3253: pa_debug.write_file('Baseline: ' || 'employee id= ' || l_emp_id);
3254: END IF;
3255: if l_emp_id IS NULL then
3256: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 3253: pa_debug.write_file('Baseline: ' || 'employee id= ' || l_emp_id);

3249: pa_debug.write_file('Baseline: ' || 'created by= ' || l_created_by);
3250: END IF;
3251: l_emp_id := PA_UTILS.GetEmpIdFromUser(l_created_by);
3252: IF P_PA_DEBUG_MODE = 'Y' THEN
3253: pa_debug.write_file('Baseline: ' || 'employee id= ' || l_emp_id);
3254: END IF;
3255: if l_emp_id IS NULL then
3256: IF P_PA_DEBUG_MODE = 'Y' THEN
3257: pa_debug.write_file('Baseline: ' || 'BUSINESS RULE VIOLATION: l_emp_id is NULL');

Line 3256: IF P_PA_DEBUG_MODE = 'Y' THEN

3252: IF P_PA_DEBUG_MODE = 'Y' THEN
3253: pa_debug.write_file('Baseline: ' || 'employee id= ' || l_emp_id);
3254: END IF;
3255: if l_emp_id IS NULL then
3256: IF P_PA_DEBUG_MODE = 'Y' THEN
3257: pa_debug.write_file('Baseline: ' || 'BUSINESS RULE VIOLATION: l_emp_id is NULL');
3258: END IF;
3259: x_return_status := FND_API.G_RET_STS_ERROR;
3260: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 3257: pa_debug.write_file('Baseline: ' || 'BUSINESS RULE VIOLATION: l_emp_id is NULL');

3253: pa_debug.write_file('Baseline: ' || 'employee id= ' || l_emp_id);
3254: END IF;
3255: if l_emp_id IS NULL then
3256: IF P_PA_DEBUG_MODE = 'Y' THEN
3257: pa_debug.write_file('Baseline: ' || 'BUSINESS RULE VIOLATION: l_emp_id is NULL');
3258: END IF;
3259: x_return_status := FND_API.G_RET_STS_ERROR;
3260: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
3261: p_msg_name => 'PA_ALL_WARN_NO_EMPL_REC');

Line 3284: IF P_PA_DEBUG_MODE = 'Y' THEN

3280: x_valid_flag => l_valid2_flag,
3281: x_return_status => l_return_status,
3282: x_error_msg_code => l_error_msg_code);
3283: if not((l_valid1_flag='Y') and (l_valid2_flag='Y')) then
3284: IF P_PA_DEBUG_MODE = 'Y' THEN
3285: pa_debug.write_file('Baseline: ' || 'BUSINESS RULE VIOLATION: Check_Record_Version_Number failed');
3286: END IF;
3287: x_return_status := FND_API.G_RET_STS_ERROR;
3288: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 3285: pa_debug.write_file('Baseline: ' || 'BUSINESS RULE VIOLATION: Check_Record_Version_Number failed');

3281: x_return_status => l_return_status,
3282: x_error_msg_code => l_error_msg_code);
3283: if not((l_valid1_flag='Y') and (l_valid2_flag='Y')) then
3284: IF P_PA_DEBUG_MODE = 'Y' THEN
3285: pa_debug.write_file('Baseline: ' || 'BUSINESS RULE VIOLATION: Check_Record_Version_Number failed');
3286: END IF;
3287: x_return_status := FND_API.G_RET_STS_ERROR;
3288: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
3289: p_msg_name => l_error_msg_code);

Line 3308: pa_debug.reset_err_stack;

3304: x_msg_count := l_msg_count;
3305: else
3306: x_msg_count := l_msg_count;
3307: end if;
3308: pa_debug.reset_err_stack;
3309: return;
3310: end if;
3311:
3312: /* If There are NO Business Rules Violations , Then proceed with Baseline */

Line 3313: IF P_PA_DEBUG_MODE = 'Y' THEN

3309: return;
3310: end if;
3311:
3312: /* If There are NO Business Rules Violations , Then proceed with Baseline */
3313: IF P_PA_DEBUG_MODE = 'Y' THEN
3314: pa_debug.write_file('no business rules violations; proceeding with baseline');
3315: END IF;
3316: SAVEPOINT PA_FIN_PLAN_PUB_BASELINE;
3317:

Line 3314: pa_debug.write_file('no business rules violations; proceeding with baseline');

3310: end if;
3311:
3312: /* If There are NO Business Rules Violations , Then proceed with Baseline */
3313: IF P_PA_DEBUG_MODE = 'Y' THEN
3314: pa_debug.write_file('no business rules violations; proceeding with baseline');
3315: END IF;
3316: SAVEPOINT PA_FIN_PLAN_PUB_BASELINE;
3317:
3318: /* FINPLANNING PATCHSET K: If the plan type is not ORG_FORECAST, then call

Line 3358: IF P_PA_DEBUG_MODE = 'Y' THEN

3354: current_flag = 'N',
3355: record_version_number = record_version_number+1
3356: where
3357: budget_version_id=p_orig_budget_version_id;
3358: IF P_PA_DEBUG_MODE = 'Y' THEN
3359: pa_debug.write_file('the old baselined version is no longer the current baselined version');
3360: END IF;
3361: /* create a copy, labeled as 'BASELINED' */
3362: PA_FIN_PLAN_PUB.Copy_Version

Line 3359: pa_debug.write_file('the old baselined version is no longer the current baselined version');

3355: record_version_number = record_version_number+1
3356: where
3357: budget_version_id=p_orig_budget_version_id;
3358: IF P_PA_DEBUG_MODE = 'Y' THEN
3359: pa_debug.write_file('the old baselined version is no longer the current baselined version');
3360: END IF;
3361: /* create a copy, labeled as 'BASELINED' */
3362: PA_FIN_PLAN_PUB.Copy_Version
3363: (p_project_id => p_project_id,

Line 3424: IF P_PA_DEBUG_MODE = 'Y' THEN

3420: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3421:
3422: WHEN OTHERS THEN
3423:
3424: IF P_PA_DEBUG_MODE = 'Y' THEN
3425: pa_debug.g_err_stage := 'Unexpected error while deriving l_orig_budget_version_id '||sqlerrm;
3426: pa_debug.write('PAFPPUBB.Baseline',pa_debug.g_err_stage,5);
3427: END IF;
3428: RAISE;

Line 3425: pa_debug.g_err_stage := 'Unexpected error while deriving l_orig_budget_version_id '||sqlerrm;

3421:
3422: WHEN OTHERS THEN
3423:
3424: IF P_PA_DEBUG_MODE = 'Y' THEN
3425: pa_debug.g_err_stage := 'Unexpected error while deriving l_orig_budget_version_id '||sqlerrm;
3426: pa_debug.write('PAFPPUBB.Baseline',pa_debug.g_err_stage,5);
3427: END IF;
3428: RAISE;
3429: END;

Line 3426: pa_debug.write('PAFPPUBB.Baseline',pa_debug.g_err_stage,5);

3422: WHEN OTHERS THEN
3423:
3424: IF P_PA_DEBUG_MODE = 'Y' THEN
3425: pa_debug.g_err_stage := 'Unexpected error while deriving l_orig_budget_version_id '||sqlerrm;
3426: pa_debug.write('PAFPPUBB.Baseline',pa_debug.g_err_stage,5);
3427: END IF;
3428: RAISE;
3429: END;
3430:

Line 3433: IF P_PA_DEBUG_MODE = 'Y' THEN

3429: END;
3430:
3431: IF NVL(l_orig_budget_version_id,-99) <> NVL(p_orig_budget_version_id,NVL(l_orig_budget_version_id,-99)) THEN
3432:
3433: IF P_PA_DEBUG_MODE = 'Y' THEN
3434: pa_debug.g_err_stage := 'l_orig_budget_version_id IS NOT SAME AS p_orig_budget_version_id' ;
3435: pa_debug.write('PAFPPUBB.Baseline',pa_debug.g_err_stage,5);
3436:
3437: pa_debug.g_err_stage := 'l_orig_budget_version_id '||l_orig_budget_version_id ;

Line 3434: pa_debug.g_err_stage := 'l_orig_budget_version_id IS NOT SAME AS p_orig_budget_version_id' ;

3430:
3431: IF NVL(l_orig_budget_version_id,-99) <> NVL(p_orig_budget_version_id,NVL(l_orig_budget_version_id,-99)) THEN
3432:
3433: IF P_PA_DEBUG_MODE = 'Y' THEN
3434: pa_debug.g_err_stage := 'l_orig_budget_version_id IS NOT SAME AS p_orig_budget_version_id' ;
3435: pa_debug.write('PAFPPUBB.Baseline',pa_debug.g_err_stage,5);
3436:
3437: pa_debug.g_err_stage := 'l_orig_budget_version_id '||l_orig_budget_version_id ;
3438: pa_debug.write('PAFPPUBB.Baseline',pa_debug.g_err_stage,5);

Line 3435: pa_debug.write('PAFPPUBB.Baseline',pa_debug.g_err_stage,5);

3431: IF NVL(l_orig_budget_version_id,-99) <> NVL(p_orig_budget_version_id,NVL(l_orig_budget_version_id,-99)) THEN
3432:
3433: IF P_PA_DEBUG_MODE = 'Y' THEN
3434: pa_debug.g_err_stage := 'l_orig_budget_version_id IS NOT SAME AS p_orig_budget_version_id' ;
3435: pa_debug.write('PAFPPUBB.Baseline',pa_debug.g_err_stage,5);
3436:
3437: pa_debug.g_err_stage := 'l_orig_budget_version_id '||l_orig_budget_version_id ;
3438: pa_debug.write('PAFPPUBB.Baseline',pa_debug.g_err_stage,5);
3439:

Line 3437: pa_debug.g_err_stage := 'l_orig_budget_version_id '||l_orig_budget_version_id ;

3433: IF P_PA_DEBUG_MODE = 'Y' THEN
3434: pa_debug.g_err_stage := 'l_orig_budget_version_id IS NOT SAME AS p_orig_budget_version_id' ;
3435: pa_debug.write('PAFPPUBB.Baseline',pa_debug.g_err_stage,5);
3436:
3437: pa_debug.g_err_stage := 'l_orig_budget_version_id '||l_orig_budget_version_id ;
3438: pa_debug.write('PAFPPUBB.Baseline',pa_debug.g_err_stage,5);
3439:
3440: pa_debug.g_err_stage := 'p_orig_budget_version_id '||p_orig_budget_version_id ;
3441: pa_debug.write('PAFPPUBB.Baseline',pa_debug.g_err_stage,5);

Line 3438: pa_debug.write('PAFPPUBB.Baseline',pa_debug.g_err_stage,5);

3434: pa_debug.g_err_stage := 'l_orig_budget_version_id IS NOT SAME AS p_orig_budget_version_id' ;
3435: pa_debug.write('PAFPPUBB.Baseline',pa_debug.g_err_stage,5);
3436:
3437: pa_debug.g_err_stage := 'l_orig_budget_version_id '||l_orig_budget_version_id ;
3438: pa_debug.write('PAFPPUBB.Baseline',pa_debug.g_err_stage,5);
3439:
3440: pa_debug.g_err_stage := 'p_orig_budget_version_id '||p_orig_budget_version_id ;
3441: pa_debug.write('PAFPPUBB.Baseline',pa_debug.g_err_stage,5);
3442:

Line 3440: pa_debug.g_err_stage := 'p_orig_budget_version_id '||p_orig_budget_version_id ;

3436:
3437: pa_debug.g_err_stage := 'l_orig_budget_version_id '||l_orig_budget_version_id ;
3438: pa_debug.write('PAFPPUBB.Baseline',pa_debug.g_err_stage,5);
3439:
3440: pa_debug.g_err_stage := 'p_orig_budget_version_id '||p_orig_budget_version_id ;
3441: pa_debug.write('PAFPPUBB.Baseline',pa_debug.g_err_stage,5);
3442:
3443: END IF;
3444: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 3441: pa_debug.write('PAFPPUBB.Baseline',pa_debug.g_err_stage,5);

3437: pa_debug.g_err_stage := 'l_orig_budget_version_id '||l_orig_budget_version_id ;
3438: pa_debug.write('PAFPPUBB.Baseline',pa_debug.g_err_stage,5);
3439:
3440: pa_debug.g_err_stage := 'p_orig_budget_version_id '||p_orig_budget_version_id ;
3441: pa_debug.write('PAFPPUBB.Baseline',pa_debug.g_err_stage,5);
3442:
3443: END IF;
3444: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
3445: p_msg_name => 'PA_FP_INV_PARAM_PASSED',

Line 3501: pa_debug.reset_err_stack;

3497: x_msg_count := l_msg_count;
3498: else
3499: x_msg_count := l_msg_count;
3500: end if;
3501: pa_debug.reset_err_stack;
3502: return;
3503: end if;
3504: --Bug 4145705
3505: SELECT COUNT(*)

Line 3528: pa_debug.reset_err_stack;

3524:
3525: end if; -- l_fin_plan_type_code = ORG_FORECAST
3526:
3527: x_return_status := FND_API.G_RET_STS_SUCCESS;
3528: pa_debug.reset_err_stack;
3529:
3530: exception
3531: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
3532: l_msg_count := FND_MSG_PUB.count_msg;

Line 3548: pa_debug.reset_curr_function;

3544: x_msg_count := l_msg_count;
3545: END IF;
3546: ROLLBACK TO PA_FIN_PLAN_PUB_BASELINE;
3547: x_return_status := FND_API.G_RET_STS_ERROR;
3548: pa_debug.reset_curr_function;
3549: when pa_fin_plan_pub.rollback_on_error then
3550: IF P_PA_DEBUG_MODE = 'Y' THEN
3551: pa_debug.write_file('Procedure Baseline: rollback_on_error exception');
3552: END IF;

Line 3550: IF P_PA_DEBUG_MODE = 'Y' THEN

3546: ROLLBACK TO PA_FIN_PLAN_PUB_BASELINE;
3547: x_return_status := FND_API.G_RET_STS_ERROR;
3548: pa_debug.reset_curr_function;
3549: when pa_fin_plan_pub.rollback_on_error then
3550: IF P_PA_DEBUG_MODE = 'Y' THEN
3551: pa_debug.write_file('Procedure Baseline: rollback_on_error exception');
3552: END IF;
3553: rollback to PA_FIN_PLAN_PUB_BASELINE;
3554: raise FND_API.G_EXC_UNEXPECTED_ERROR;

Line 3551: pa_debug.write_file('Procedure Baseline: rollback_on_error exception');

3547: x_return_status := FND_API.G_RET_STS_ERROR;
3548: pa_debug.reset_curr_function;
3549: when pa_fin_plan_pub.rollback_on_error then
3550: IF P_PA_DEBUG_MODE = 'Y' THEN
3551: pa_debug.write_file('Procedure Baseline: rollback_on_error exception');
3552: END IF;
3553: rollback to PA_FIN_PLAN_PUB_BASELINE;
3554: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3555:

Line 3563: pa_debug.reset_err_stack;

3559: x_msg_count := 1;
3560: x_msg_data := SQLERRM;
3561: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_PUB',
3562: p_procedure_name => 'Baseline');
3563: pa_debug.reset_err_stack;
3564: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3565: end Baseline;
3566: /* ------------------------------------------------------------------------- */
3567:

Line 3640: IF P_PA_DEBUG_MODE = 'Y' THEN

3636: plan_options_rec plan_options_csr%ROWTYPE;
3637:
3638: begin
3639: FND_MSG_PUB.initialize;
3640: IF P_PA_DEBUG_MODE = 'Y' THEN
3641: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Create_Version_OrgFcst');
3642: END IF;
3643: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
3644: l_debug_mode := NVL(l_debug_mode, 'Y');

Line 3641: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Create_Version_OrgFcst');

3637:
3638: begin
3639: FND_MSG_PUB.initialize;
3640: IF P_PA_DEBUG_MODE = 'Y' THEN
3641: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Create_Version_OrgFcst');
3642: END IF;
3643: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
3644: l_debug_mode := NVL(l_debug_mode, 'Y');
3645: IF P_PA_DEBUG_MODE = 'Y' THEN

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

3639: FND_MSG_PUB.initialize;
3640: IF P_PA_DEBUG_MODE = 'Y' THEN
3641: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Create_Version_OrgFcst');
3642: END IF;
3643: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
3644: l_debug_mode := NVL(l_debug_mode, 'Y');
3645: IF P_PA_DEBUG_MODE = 'Y' THEN
3646: pa_debug.set_process('Create_Version_OrgFcst: ' || 'PLSQL','LOG',l_debug_mode);
3647: END IF;

Line 3645: IF P_PA_DEBUG_MODE = 'Y' THEN

3641: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Create_Version_OrgFcst');
3642: END IF;
3643: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
3644: l_debug_mode := NVL(l_debug_mode, 'Y');
3645: IF P_PA_DEBUG_MODE = 'Y' THEN
3646: pa_debug.set_process('Create_Version_OrgFcst: ' || 'PLSQL','LOG',l_debug_mode);
3647: END IF;
3648: x_msg_count := 0;
3649: /* CHECK FOR BUSINESS RULES VIOLATIONS */

Line 3646: pa_debug.set_process('Create_Version_OrgFcst: ' || 'PLSQL','LOG',l_debug_mode);

3642: END IF;
3643: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
3644: l_debug_mode := NVL(l_debug_mode, 'Y');
3645: IF P_PA_DEBUG_MODE = 'Y' THEN
3646: pa_debug.set_process('Create_Version_OrgFcst: ' || 'PLSQL','LOG',l_debug_mode);
3647: END IF;
3648: x_msg_count := 0;
3649: /* CHECK FOR BUSINESS RULES VIOLATIONS */
3650: /* check for null version_name */

Line 3651: IF P_PA_DEBUG_MODE = 'Y' THEN

3647: END IF;
3648: x_msg_count := 0;
3649: /* CHECK FOR BUSINESS RULES VIOLATIONS */
3650: /* check for null version_name */
3651: IF P_PA_DEBUG_MODE = 'Y' THEN
3652: pa_debug.write_file('Create_Version_OrgFcst: ' || 'starting procedure: initial message count= ' || FND_MSG_PUB.count_msg);
3653: END IF;
3654: if p_version_name is NULL then
3655: x_return_status := FND_API.G_RET_STS_ERROR;

Line 3652: pa_debug.write_file('Create_Version_OrgFcst: ' || 'starting procedure: initial message count= ' || FND_MSG_PUB.count_msg);

3648: x_msg_count := 0;
3649: /* CHECK FOR BUSINESS RULES VIOLATIONS */
3650: /* check for null version_name */
3651: IF P_PA_DEBUG_MODE = 'Y' THEN
3652: pa_debug.write_file('Create_Version_OrgFcst: ' || 'starting procedure: initial message count= ' || FND_MSG_PUB.count_msg);
3653: END IF;
3654: if p_version_name is NULL then
3655: x_return_status := FND_API.G_RET_STS_ERROR;
3656: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 3676: pa_debug.reset_err_stack;

3672: x_msg_count := l_msg_count;
3673: else
3674: x_msg_count := l_msg_count;
3675: end if;
3676: pa_debug.reset_err_stack;
3677: return;
3678: end if;
3679:
3680: /* If There are NO Business Rules Violations , Then proceed with Create Version Apply */

Line 3682: IF P_PA_DEBUG_MODE = 'Y' THEN

3678: end if;
3679:
3680: /* If There are NO Business Rules Violations , Then proceed with Create Version Apply */
3681: if l_msg_count = 0 then
3682: IF P_PA_DEBUG_MODE = 'Y' THEN
3683: pa_debug.write_file('Create_Version_OrgFcst: ' || 'no business rules violations');
3684: END IF;
3685: SAVEPOINT PA_FP_PUB_CREATE_VER_ORGFCST;
3686: /* Get the version_type by querying pa_fin_plan_types_b using fin_plan_type_id */

Line 3683: pa_debug.write_file('Create_Version_OrgFcst: ' || 'no business rules violations');

3679:
3680: /* If There are NO Business Rules Violations , Then proceed with Create Version Apply */
3681: if l_msg_count = 0 then
3682: IF P_PA_DEBUG_MODE = 'Y' THEN
3683: pa_debug.write_file('Create_Version_OrgFcst: ' || 'no business rules violations');
3684: END IF;
3685: SAVEPOINT PA_FP_PUB_CREATE_VER_ORGFCST;
3686: /* Get the version_type by querying pa_fin_plan_types_b using fin_plan_type_id */
3687: select

Line 3700: IF P_PA_DEBUG_MODE = 'Y' THEN

3696: fin_plan_type_id=p_fin_plan_type_id;
3697: if (l_version_type is null) then
3698: raise NO_DATA_FOUND;
3699: end if;
3700: IF P_PA_DEBUG_MODE = 'Y' THEN
3701: pa_debug.write_file('Create_Version_OrgFcst: ' || 'version type selected with no problems');
3702: pa_debug.write_file('Create_Version_OrgFcst: ' || 'version type code is ' || l_version_type_code);
3703: pa_debug.write_file('Create_Version_OrgFcst: ' || 'version type name is ' || l_version_type);
3704: END IF;

Line 3701: pa_debug.write_file('Create_Version_OrgFcst: ' || 'version type selected with no problems');

3697: if (l_version_type is null) then
3698: raise NO_DATA_FOUND;
3699: end if;
3700: IF P_PA_DEBUG_MODE = 'Y' THEN
3701: pa_debug.write_file('Create_Version_OrgFcst: ' || 'version type selected with no problems');
3702: pa_debug.write_file('Create_Version_OrgFcst: ' || 'version type code is ' || l_version_type_code);
3703: pa_debug.write_file('Create_Version_OrgFcst: ' || 'version type name is ' || l_version_type);
3704: END IF;
3705: /* Get the max version_number for working versions of this plan type */

Line 3702: pa_debug.write_file('Create_Version_OrgFcst: ' || 'version type code is ' || l_version_type_code);

3698: raise NO_DATA_FOUND;
3699: end if;
3700: IF P_PA_DEBUG_MODE = 'Y' THEN
3701: pa_debug.write_file('Create_Version_OrgFcst: ' || 'version type selected with no problems');
3702: pa_debug.write_file('Create_Version_OrgFcst: ' || 'version type code is ' || l_version_type_code);
3703: pa_debug.write_file('Create_Version_OrgFcst: ' || 'version type name is ' || l_version_type);
3704: END IF;
3705: /* Get the max version_number for working versions of this plan type */
3706: select

Line 3703: pa_debug.write_file('Create_Version_OrgFcst: ' || 'version type name is ' || l_version_type);

3699: end if;
3700: IF P_PA_DEBUG_MODE = 'Y' THEN
3701: pa_debug.write_file('Create_Version_OrgFcst: ' || 'version type selected with no problems');
3702: pa_debug.write_file('Create_Version_OrgFcst: ' || 'version type code is ' || l_version_type_code);
3703: pa_debug.write_file('Create_Version_OrgFcst: ' || 'version type name is ' || l_version_type);
3704: END IF;
3705: /* Get the max version_number for working versions of this plan type */
3706: select
3707: nvl(max(version_number), 0)

Line 3716: IF P_PA_DEBUG_MODE = 'Y' THEN

3712: where
3713: project_id = p_project_id and
3714: fin_plan_type_id = p_fin_plan_type_id and
3715: budget_status_code in ('W', 'S');
3716: IF P_PA_DEBUG_MODE = 'Y' THEN
3717: pa_debug.write_file('Create_Version_OrgFcst: ' || 'max version number is ' || l_max_version);
3718: END IF;
3719: /* Get the resource_list_id to be used; if it was not passed to this procedure, */
3720: /* we can retrieve it from FND_PROFILE if the version_type is ORG_FORECAST */

Line 3717: pa_debug.write_file('Create_Version_OrgFcst: ' || 'max version number is ' || l_max_version);

3713: project_id = p_project_id and
3714: fin_plan_type_id = p_fin_plan_type_id and
3715: budget_status_code in ('W', 'S');
3716: IF P_PA_DEBUG_MODE = 'Y' THEN
3717: pa_debug.write_file('Create_Version_OrgFcst: ' || 'max version number is ' || l_max_version);
3718: END IF;
3719: /* Get the resource_list_id to be used; if it was not passed to this procedure, */
3720: /* we can retrieve it from FND_PROFILE if the version_type is ORG_FORECAST */
3721: if p_resource_list_id is NULL then

Line 3722: IF P_PA_DEBUG_MODE = 'Y' THEN

3718: END IF;
3719: /* Get the resource_list_id to be used; if it was not passed to this procedure, */
3720: /* we can retrieve it from FND_PROFILE if the version_type is ORG_FORECAST */
3721: if p_resource_list_id is NULL then
3722: IF P_PA_DEBUG_MODE = 'Y' THEN
3723: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_resource_list_id is null');
3724: END IF;
3725: if l_version_type_code = PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_ORG_FORECAST then
3726: l_resource_list_id := FND_PROFILE.value('PA_FORECAST_RESOURCE_LIST');

Line 3723: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_resource_list_id is null');

3719: /* Get the resource_list_id to be used; if it was not passed to this procedure, */
3720: /* we can retrieve it from FND_PROFILE if the version_type is ORG_FORECAST */
3721: if p_resource_list_id is NULL then
3722: IF P_PA_DEBUG_MODE = 'Y' THEN
3723: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_resource_list_id is null');
3724: END IF;
3725: if l_version_type_code = PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_ORG_FORECAST then
3726: l_resource_list_id := FND_PROFILE.value('PA_FORECAST_RESOURCE_LIST');
3727: else

Line 3747: IF P_PA_DEBUG_MODE = 'Y' THEN

3743: end if;
3744: else
3745: l_resource_list_id := p_resource_list_id;
3746: end if;
3747: IF P_PA_DEBUG_MODE = 'Y' THEN
3748: pa_debug.write_file('Create_Version_OrgFcst: ' || 'resource list is ' || l_resource_list_id);
3749: END IF;
3750: /* retrieve the period type, start date, and end date from pa_forecasting_options */
3751: pa_fp_org_fcst_utils.get_forecast_option_details

Line 3748: pa_debug.write_file('Create_Version_OrgFcst: ' || 'resource list is ' || l_resource_list_id);

3744: else
3745: l_resource_list_id := p_resource_list_id;
3746: end if;
3747: IF P_PA_DEBUG_MODE = 'Y' THEN
3748: pa_debug.write_file('Create_Version_OrgFcst: ' || 'resource list is ' || l_resource_list_id);
3749: END IF;
3750: /* retrieve the period type, start date, and end date from pa_forecasting_options */
3751: pa_fp_org_fcst_utils.get_forecast_option_details
3752: (x_fcst_period_type => l_org_fcst_period_type,

Line 3766: IF P_PA_DEBUG_MODE = 'Y' THEN

3762: x_org_id => l_org_id,
3763: x_return_status => l_return_status,
3764: x_err_code => l_error_msg_code);
3765: /*
3766: IF P_PA_DEBUG_MODE = 'Y' THEN
3767: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_fcst_period_type is ' || l_org_fcst_period_type);
3768: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_period_set_name is ' || l_period_set_name);
3769: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_act_period_type is ' || l_act_period_type);
3770: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_projfunc_currency_code is ' || l_org_projfunc_currency_code);

Line 3767: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_fcst_period_type is ' || l_org_fcst_period_type);

3763: x_return_status => l_return_status,
3764: x_err_code => l_error_msg_code);
3765: /*
3766: IF P_PA_DEBUG_MODE = 'Y' THEN
3767: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_fcst_period_type is ' || l_org_fcst_period_type);
3768: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_period_set_name is ' || l_period_set_name);
3769: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_act_period_type is ' || l_act_period_type);
3770: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_projfunc_currency_code is ' || l_org_projfunc_currency_code);
3771: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_number_of_periods is ' || l_number_of_periods);

Line 3768: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_period_set_name is ' || l_period_set_name);

3764: x_err_code => l_error_msg_code);
3765: /*
3766: IF P_PA_DEBUG_MODE = 'Y' THEN
3767: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_fcst_period_type is ' || l_org_fcst_period_type);
3768: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_period_set_name is ' || l_period_set_name);
3769: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_act_period_type is ' || l_act_period_type);
3770: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_projfunc_currency_code is ' || l_org_projfunc_currency_code);
3771: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_number_of_periods is ' || l_number_of_periods);
3772: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_project_template_id is ' || l_org_project_template_id);

Line 3769: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_act_period_type is ' || l_act_period_type);

3765: /*
3766: IF P_PA_DEBUG_MODE = 'Y' THEN
3767: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_fcst_period_type is ' || l_org_fcst_period_type);
3768: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_period_set_name is ' || l_period_set_name);
3769: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_act_period_type is ' || l_act_period_type);
3770: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_projfunc_currency_code is ' || l_org_projfunc_currency_code);
3771: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_number_of_periods is ' || l_number_of_periods);
3772: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_project_template_id is ' || l_org_project_template_id);
3773: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_structure_version_id is ' || l_org_structure_version_id);

Line 3770: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_projfunc_currency_code is ' || l_org_projfunc_currency_code);

3766: IF P_PA_DEBUG_MODE = 'Y' THEN
3767: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_fcst_period_type is ' || l_org_fcst_period_type);
3768: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_period_set_name is ' || l_period_set_name);
3769: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_act_period_type is ' || l_act_period_type);
3770: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_projfunc_currency_code is ' || l_org_projfunc_currency_code);
3771: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_number_of_periods is ' || l_number_of_periods);
3772: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_project_template_id is ' || l_org_project_template_id);
3773: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_structure_version_id is ' || l_org_structure_version_id);
3774: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_id is ' || l_org_id);

Line 3771: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_number_of_periods is ' || l_number_of_periods);

3767: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_fcst_period_type is ' || l_org_fcst_period_type);
3768: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_period_set_name is ' || l_period_set_name);
3769: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_act_period_type is ' || l_act_period_type);
3770: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_projfunc_currency_code is ' || l_org_projfunc_currency_code);
3771: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_number_of_periods is ' || l_number_of_periods);
3772: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_project_template_id is ' || l_org_project_template_id);
3773: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_structure_version_id is ' || l_org_structure_version_id);
3774: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_id is ' || l_org_id);
3775: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_return_status is ' || l_return_status);

Line 3772: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_project_template_id is ' || l_org_project_template_id);

3768: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_period_set_name is ' || l_period_set_name);
3769: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_act_period_type is ' || l_act_period_type);
3770: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_projfunc_currency_code is ' || l_org_projfunc_currency_code);
3771: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_number_of_periods is ' || l_number_of_periods);
3772: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_project_template_id is ' || l_org_project_template_id);
3773: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_structure_version_id is ' || l_org_structure_version_id);
3774: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_id is ' || l_org_id);
3775: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_return_status is ' || l_return_status);
3776: END IF;

Line 3773: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_structure_version_id is ' || l_org_structure_version_id);

3769: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_act_period_type is ' || l_act_period_type);
3770: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_projfunc_currency_code is ' || l_org_projfunc_currency_code);
3771: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_number_of_periods is ' || l_number_of_periods);
3772: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_project_template_id is ' || l_org_project_template_id);
3773: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_structure_version_id is ' || l_org_structure_version_id);
3774: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_id is ' || l_org_id);
3775: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_return_status is ' || l_return_status);
3776: END IF;
3777: */

Line 3774: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_id is ' || l_org_id);

3770: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_projfunc_currency_code is ' || l_org_projfunc_currency_code);
3771: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_number_of_periods is ' || l_number_of_periods);
3772: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_project_template_id is ' || l_org_project_template_id);
3773: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_structure_version_id is ' || l_org_structure_version_id);
3774: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_id is ' || l_org_id);
3775: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_return_status is ' || l_return_status);
3776: END IF;
3777: */
3778: if l_return_status <> FND_API.G_RET_STS_SUCCESS then

Line 3775: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_return_status is ' || l_return_status);

3771: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_number_of_periods is ' || l_number_of_periods);
3772: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_project_template_id is ' || l_org_project_template_id);
3773: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_structure_version_id is ' || l_org_structure_version_id);
3774: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_org_id is ' || l_org_id);
3775: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_return_status is ' || l_return_status);
3776: END IF;
3777: */
3778: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
3779: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 3779: IF P_PA_DEBUG_MODE = 'Y' THEN

3775: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_return_status is ' || l_return_status);
3776: END IF;
3777: */
3778: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
3779: IF P_PA_DEBUG_MODE = 'Y' THEN
3780: pa_debug.write_file('Create_Version_OrgFcst: ' || 'error with pa_fp_org_fcst_utils.get_forecast_option_details');
3781: END IF;
3782: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
3783: p_msg_name => l_error_msg_code);

Line 3780: pa_debug.write_file('Create_Version_OrgFcst: ' || 'error with pa_fp_org_fcst_utils.get_forecast_option_details');

3776: END IF;
3777: */
3778: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
3779: IF P_PA_DEBUG_MODE = 'Y' THEN
3780: pa_debug.write_file('Create_Version_OrgFcst: ' || 'error with pa_fp_org_fcst_utils.get_forecast_option_details');
3781: END IF;
3782: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
3783: p_msg_name => l_error_msg_code);
3784: raise pa_fin_plan_pub.rollback_on_error;

Line 3808: IF P_PA_DEBUG_MODE = 'Y' THEN

3804: x_return_status => l_return_status,
3805: x_err_code => l_error_msg_code);
3806: /* create a new PERIOD PROFILE ID if one does not exist */
3807: if l_period_profile_id < 0 then
3808: IF P_PA_DEBUG_MODE = 'Y' THEN
3809: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_period_profile_id < 0');
3810: END IF;
3811: l_period_profile_id := NULL;
3812: if l_org_fcst_period_type = PA_FP_CONSTANTS_PKG.G_PERIOD_TYPE_PA then

Line 3809: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_period_profile_id < 0');

3805: x_err_code => l_error_msg_code);
3806: /* create a new PERIOD PROFILE ID if one does not exist */
3807: if l_period_profile_id < 0 then
3808: IF P_PA_DEBUG_MODE = 'Y' THEN
3809: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_period_profile_id < 0');
3810: END IF;
3811: l_period_profile_id := NULL;
3812: if l_org_fcst_period_type = PA_FP_CONSTANTS_PKG.G_PERIOD_TYPE_PA then
3813: l_pa_period_type := l_act_period_type;

Line 3818: IF P_PA_DEBUG_MODE = 'Y' THEN

3814: else
3815: l_pa_period_type := NULL;
3816: end if;
3817: /*
3818: IF P_PA_DEBUG_MODE = 'Y' THEN
3819: pa_debug.write_file('Create_Version_OrgFcst: ' || 'entering pa_prj_period_profile_utils.maintain_prj_period_profile');
3820: pa_debug.write_file('Create_Version_OrgFcst: ' || 'project id is ' || p_project_id);
3821: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_plan_period_type is ' || l_org_fcst_period_type);
3822: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_period_set_name is ' || l_period_set_name);

Line 3819: pa_debug.write_file('Create_Version_OrgFcst: ' || 'entering pa_prj_period_profile_utils.maintain_prj_period_profile');

3815: l_pa_period_type := NULL;
3816: end if;
3817: /*
3818: IF P_PA_DEBUG_MODE = 'Y' THEN
3819: pa_debug.write_file('Create_Version_OrgFcst: ' || 'entering pa_prj_period_profile_utils.maintain_prj_period_profile');
3820: pa_debug.write_file('Create_Version_OrgFcst: ' || 'project id is ' || p_project_id);
3821: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_plan_period_type is ' || l_org_fcst_period_type);
3822: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_period_set_name is ' || l_period_set_name);
3823: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_gl_period_type is ' || l_act_period_type);

Line 3820: pa_debug.write_file('Create_Version_OrgFcst: ' || 'project id is ' || p_project_id);

3816: end if;
3817: /*
3818: IF P_PA_DEBUG_MODE = 'Y' THEN
3819: pa_debug.write_file('Create_Version_OrgFcst: ' || 'entering pa_prj_period_profile_utils.maintain_prj_period_profile');
3820: pa_debug.write_file('Create_Version_OrgFcst: ' || 'project id is ' || p_project_id);
3821: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_plan_period_type is ' || l_org_fcst_period_type);
3822: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_period_set_name is ' || l_period_set_name);
3823: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_gl_period_type is ' || l_act_period_type);
3824: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_pa_period_type is ' || l_pa_period_type);

Line 3821: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_plan_period_type is ' || l_org_fcst_period_type);

3817: /*
3818: IF P_PA_DEBUG_MODE = 'Y' THEN
3819: pa_debug.write_file('Create_Version_OrgFcst: ' || 'entering pa_prj_period_profile_utils.maintain_prj_period_profile');
3820: pa_debug.write_file('Create_Version_OrgFcst: ' || 'project id is ' || p_project_id);
3821: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_plan_period_type is ' || l_org_fcst_period_type);
3822: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_period_set_name is ' || l_period_set_name);
3823: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_gl_period_type is ' || l_act_period_type);
3824: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_pa_period_type is ' || l_pa_period_type);
3825: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_start_date is ' || l_fcst_start_date);

Line 3822: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_period_set_name is ' || l_period_set_name);

3818: IF P_PA_DEBUG_MODE = 'Y' THEN
3819: pa_debug.write_file('Create_Version_OrgFcst: ' || 'entering pa_prj_period_profile_utils.maintain_prj_period_profile');
3820: pa_debug.write_file('Create_Version_OrgFcst: ' || 'project id is ' || p_project_id);
3821: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_plan_period_type is ' || l_org_fcst_period_type);
3822: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_period_set_name is ' || l_period_set_name);
3823: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_gl_period_type is ' || l_act_period_type);
3824: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_pa_period_type is ' || l_pa_period_type);
3825: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_start_date is ' || l_fcst_start_date);
3826: pa_debug.write_file('Create_Version_OrgFcst: ' || 'px_end_date is ' || l_fcst_end_date);

Line 3823: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_gl_period_type is ' || l_act_period_type);

3819: pa_debug.write_file('Create_Version_OrgFcst: ' || 'entering pa_prj_period_profile_utils.maintain_prj_period_profile');
3820: pa_debug.write_file('Create_Version_OrgFcst: ' || 'project id is ' || p_project_id);
3821: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_plan_period_type is ' || l_org_fcst_period_type);
3822: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_period_set_name is ' || l_period_set_name);
3823: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_gl_period_type is ' || l_act_period_type);
3824: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_pa_period_type is ' || l_pa_period_type);
3825: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_start_date is ' || l_fcst_start_date);
3826: pa_debug.write_file('Create_Version_OrgFcst: ' || 'px_end_date is ' || l_fcst_end_date);
3827: pa_debug.write_file('Create_Version_OrgFcst: ' || 'px_period_profile_id is ' || l_period_profile_id);

Line 3824: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_pa_period_type is ' || l_pa_period_type);

3820: pa_debug.write_file('Create_Version_OrgFcst: ' || 'project id is ' || p_project_id);
3821: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_plan_period_type is ' || l_org_fcst_period_type);
3822: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_period_set_name is ' || l_period_set_name);
3823: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_gl_period_type is ' || l_act_period_type);
3824: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_pa_period_type is ' || l_pa_period_type);
3825: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_start_date is ' || l_fcst_start_date);
3826: pa_debug.write_file('Create_Version_OrgFcst: ' || 'px_end_date is ' || l_fcst_end_date);
3827: pa_debug.write_file('Create_Version_OrgFcst: ' || 'px_period_profile_id is ' || l_period_profile_id);
3828: pa_debug.write_file('Create_Version_OrgFcst: ' || 'px_number_of_periods is ' || l_number_of_periods);

Line 3825: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_start_date is ' || l_fcst_start_date);

3821: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_plan_period_type is ' || l_org_fcst_period_type);
3822: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_period_set_name is ' || l_period_set_name);
3823: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_gl_period_type is ' || l_act_period_type);
3824: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_pa_period_type is ' || l_pa_period_type);
3825: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_start_date is ' || l_fcst_start_date);
3826: pa_debug.write_file('Create_Version_OrgFcst: ' || 'px_end_date is ' || l_fcst_end_date);
3827: pa_debug.write_file('Create_Version_OrgFcst: ' || 'px_period_profile_id is ' || l_period_profile_id);
3828: pa_debug.write_file('Create_Version_OrgFcst: ' || 'px_number_of_periods is ' || l_number_of_periods);
3829: END IF;

Line 3826: pa_debug.write_file('Create_Version_OrgFcst: ' || 'px_end_date is ' || l_fcst_end_date);

3822: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_period_set_name is ' || l_period_set_name);
3823: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_gl_period_type is ' || l_act_period_type);
3824: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_pa_period_type is ' || l_pa_period_type);
3825: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_start_date is ' || l_fcst_start_date);
3826: pa_debug.write_file('Create_Version_OrgFcst: ' || 'px_end_date is ' || l_fcst_end_date);
3827: pa_debug.write_file('Create_Version_OrgFcst: ' || 'px_period_profile_id is ' || l_period_profile_id);
3828: pa_debug.write_file('Create_Version_OrgFcst: ' || 'px_number_of_periods is ' || l_number_of_periods);
3829: END IF;
3830: */

Line 3827: pa_debug.write_file('Create_Version_OrgFcst: ' || 'px_period_profile_id is ' || l_period_profile_id);

3823: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_gl_period_type is ' || l_act_period_type);
3824: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_pa_period_type is ' || l_pa_period_type);
3825: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_start_date is ' || l_fcst_start_date);
3826: pa_debug.write_file('Create_Version_OrgFcst: ' || 'px_end_date is ' || l_fcst_end_date);
3827: pa_debug.write_file('Create_Version_OrgFcst: ' || 'px_period_profile_id is ' || l_period_profile_id);
3828: pa_debug.write_file('Create_Version_OrgFcst: ' || 'px_number_of_periods is ' || l_number_of_periods);
3829: END IF;
3830: */
3831: pa_prj_period_profile_utils.maintain_prj_period_profile

Line 3828: pa_debug.write_file('Create_Version_OrgFcst: ' || 'px_number_of_periods is ' || l_number_of_periods);

3824: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_pa_period_type is ' || l_pa_period_type);
3825: pa_debug.write_file('Create_Version_OrgFcst: ' || 'p_start_date is ' || l_fcst_start_date);
3826: pa_debug.write_file('Create_Version_OrgFcst: ' || 'px_end_date is ' || l_fcst_end_date);
3827: pa_debug.write_file('Create_Version_OrgFcst: ' || 'px_period_profile_id is ' || l_period_profile_id);
3828: pa_debug.write_file('Create_Version_OrgFcst: ' || 'px_number_of_periods is ' || l_number_of_periods);
3829: END IF;
3830: */
3831: pa_prj_period_profile_utils.maintain_prj_period_profile
3832: (p_project_id => p_project_id,

Line 3850: IF P_PA_DEBUG_MODE = 'Y' THEN

3846: x_msg_count => l_msg_count,
3847: x_msg_data => l_msg_data);
3848: end if;
3849: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
3850: IF P_PA_DEBUG_MODE = 'Y' THEN
3851: pa_debug.write_file('Create_Version_OrgFcst: ' || 'error with pa_prj_period_profile_utils.maintain_prj_period_profile');
3852: END IF;
3853: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
3854: p_msg_name => l_msg_data);

Line 3851: pa_debug.write_file('Create_Version_OrgFcst: ' || 'error with pa_prj_period_profile_utils.maintain_prj_period_profile');

3847: x_msg_data => l_msg_data);
3848: end if;
3849: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
3850: IF P_PA_DEBUG_MODE = 'Y' THEN
3851: pa_debug.write_file('Create_Version_OrgFcst: ' || 'error with pa_prj_period_profile_utils.maintain_prj_period_profile');
3852: END IF;
3853: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
3854: p_msg_name => l_msg_data);
3855: raise pa_fin_plan_pub.rollback_on_error;

Line 3857: IF P_PA_DEBUG_MODE = 'Y' THEN

3853: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
3854: p_msg_name => l_msg_data);
3855: raise pa_fin_plan_pub.rollback_on_error;
3856: end if;
3857: IF P_PA_DEBUG_MODE = 'Y' THEN
3858: pa_debug.write_file('Create_Version_OrgFcst: ' || ' the new period profile id is ' || l_period_profile_id);
3859: END IF;
3860: /* create the plan version */
3861: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 3858: pa_debug.write_file('Create_Version_OrgFcst: ' || ' the new period profile id is ' || l_period_profile_id);

3854: p_msg_name => l_msg_data);
3855: raise pa_fin_plan_pub.rollback_on_error;
3856: end if;
3857: IF P_PA_DEBUG_MODE = 'Y' THEN
3858: pa_debug.write_file('Create_Version_OrgFcst: ' || ' the new period profile id is ' || l_period_profile_id);
3859: END IF;
3860: /* create the plan version */
3861: IF P_PA_DEBUG_MODE = 'Y' THEN
3862: pa_debug.write_file('Create_Version_OrgFcst: ' || 'calling pa_fp_budget_versions_pkg.Insert_Row to create a budget version');

Line 3861: IF P_PA_DEBUG_MODE = 'Y' THEN

3857: IF P_PA_DEBUG_MODE = 'Y' THEN
3858: pa_debug.write_file('Create_Version_OrgFcst: ' || ' the new period profile id is ' || l_period_profile_id);
3859: END IF;
3860: /* create the plan version */
3861: IF P_PA_DEBUG_MODE = 'Y' THEN
3862: pa_debug.write_file('Create_Version_OrgFcst: ' || 'calling pa_fp_budget_versions_pkg.Insert_Row to create a budget version');
3863: END IF;
3864: select pa_budget_versions_s.nextVal into l_budget_version_id from dual;
3865: /* the new version is the current working only if it's the ONLY working version */

Line 3862: pa_debug.write_file('Create_Version_OrgFcst: ' || 'calling pa_fp_budget_versions_pkg.Insert_Row to create a budget version');

3858: pa_debug.write_file('Create_Version_OrgFcst: ' || ' the new period profile id is ' || l_period_profile_id);
3859: END IF;
3860: /* create the plan version */
3861: IF P_PA_DEBUG_MODE = 'Y' THEN
3862: pa_debug.write_file('Create_Version_OrgFcst: ' || 'calling pa_fp_budget_versions_pkg.Insert_Row to create a budget version');
3863: END IF;
3864: select pa_budget_versions_s.nextVal into l_budget_version_id from dual;
3865: /* the new version is the current working only if it's the ONLY working version */
3866: if (l_max_version = 0) then

Line 3942: IF P_PA_DEBUG_MODE = 'Y' THEN

3938: p_request_id => NULL, /* will be changed later in the script */
3939: x_row_id => l_row_id,
3940: x_return_status => l_return_status);
3941: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
3942: IF P_PA_DEBUG_MODE = 'Y' THEN
3943: pa_debug.write_file('Create_Version_OrgFcst: ' || 'error with pa_prj_period_profile_utils.maintain_prj_period_profile');
3944: END IF;
3945: /* error message added to the stack in the table handler; we don't need to do it here */
3946: raise pa_fin_plan_pub.rollback_on_error;

Line 3943: pa_debug.write_file('Create_Version_OrgFcst: ' || 'error with pa_prj_period_profile_utils.maintain_prj_period_profile');

3939: x_row_id => l_row_id,
3940: x_return_status => l_return_status);
3941: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
3942: IF P_PA_DEBUG_MODE = 'Y' THEN
3943: pa_debug.write_file('Create_Version_OrgFcst: ' || 'error with pa_prj_period_profile_utils.maintain_prj_period_profile');
3944: END IF;
3945: /* error message added to the stack in the table handler; we don't need to do it here */
3946: raise pa_fin_plan_pub.rollback_on_error;
3947: end if;

Line 3948: IF P_PA_DEBUG_MODE = 'Y' THEN

3944: END IF;
3945: /* error message added to the stack in the table handler; we don't need to do it here */
3946: raise pa_fin_plan_pub.rollback_on_error;
3947: end if;
3948: IF P_PA_DEBUG_MODE = 'Y' THEN
3949: pa_debug.write_file('Create_Version_OrgFcst: ' || 'new budget version id is ' || l_budget_version_id);
3950: END IF;
3951: x_budget_version_id := l_budget_version_id;
3952:

Line 3949: pa_debug.write_file('Create_Version_OrgFcst: ' || 'new budget version id is ' || l_budget_version_id);

3945: /* error message added to the stack in the table handler; we don't need to do it here */
3946: raise pa_fin_plan_pub.rollback_on_error;
3947: end if;
3948: IF P_PA_DEBUG_MODE = 'Y' THEN
3949: pa_debug.write_file('Create_Version_OrgFcst: ' || 'new budget version id is ' || l_budget_version_id);
3950: END IF;
3951: x_budget_version_id := l_budget_version_id;
3952:
3953:

Line 3960: IF P_PA_DEBUG_MODE = 'Y' THEN

3956: open amount_set_csr;
3957: fetch amount_set_csr into amount_set_rec;
3958: if amount_set_csr%NOTFOUND then
3959: close amount_set_csr;
3960: IF P_PA_DEBUG_MODE = 'Y' THEN
3961: pa_debug.write_file('Create_Version_OrgFcst: ' || 'no data found in amount_sets');
3962: END IF;
3963: raise pa_fin_plan_pub.rollback_on_error;
3964: else

Line 3961: pa_debug.write_file('Create_Version_OrgFcst: ' || 'no data found in amount_sets');

3957: fetch amount_set_csr into amount_set_rec;
3958: if amount_set_csr%NOTFOUND then
3959: close amount_set_csr;
3960: IF P_PA_DEBUG_MODE = 'Y' THEN
3961: pa_debug.write_file('Create_Version_OrgFcst: ' || 'no data found in amount_sets');
3962: END IF;
3963: raise pa_fin_plan_pub.rollback_on_error;
3964: else
3965: l_org_amount_set_id := amount_set_rec.fin_plan_amount_set_id;

Line 3981: IF P_PA_DEBUG_MODE = 'Y' THEN

3977: close plan_options_csr;
3978: end if;
3979:
3980: if l_proj_fin_plan_options_id is NULL then
3981: IF P_PA_DEBUG_MODE = 'Y' THEN
3982: pa_debug.write_file('Create_Version_OrgFcst: ' || 'no planning options for plan_type level: creating one now');
3983: END IF;
3984: /* call table handler to create planning options for plan_type */
3985: select pa_proj_fp_options_s.nextVal into l_proj_fin_plan_options_id from dual;

Line 3982: pa_debug.write_file('Create_Version_OrgFcst: ' || 'no planning options for plan_type level: creating one now');

3978: end if;
3979:
3980: if l_proj_fin_plan_options_id is NULL then
3981: IF P_PA_DEBUG_MODE = 'Y' THEN
3982: pa_debug.write_file('Create_Version_OrgFcst: ' || 'no planning options for plan_type level: creating one now');
3983: END IF;
3984: /* call table handler to create planning options for plan_type */
3985: select pa_proj_fp_options_s.nextVal into l_proj_fin_plan_options_id from dual;
3986: pa_proj_fp_options_pkg.Insert_Row

Line 4011: IF P_PA_DEBUG_MODE = 'Y' THEN

4007: p_fin_plan_version_id => NULL, /* use l_budget_version_id only at the VERSION_TYPE level */
4008: x_row_id => l_row_id,
4009: x_return_status => l_return_status);
4010: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
4011: IF P_PA_DEBUG_MODE = 'Y' THEN
4012: pa_debug.write_file('Create_Version_OrgFcst: ' || 'error with pa_fp_proj_fplan_options_pkg.Insert_Row: plan_type level');
4013: END IF;
4014: /* error message added to the stack in the table handler; we don't need to do it here */
4015: raise pa_fin_plan_pub.rollback_on_error;

Line 4012: pa_debug.write_file('Create_Version_OrgFcst: ' || 'error with pa_fp_proj_fplan_options_pkg.Insert_Row: plan_type level');

4008: x_row_id => l_row_id,
4009: x_return_status => l_return_status);
4010: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
4011: IF P_PA_DEBUG_MODE = 'Y' THEN
4012: pa_debug.write_file('Create_Version_OrgFcst: ' || 'error with pa_fp_proj_fplan_options_pkg.Insert_Row: plan_type level');
4013: END IF;
4014: /* error message added to the stack in the table handler; we don't need to do it here */
4015: raise pa_fin_plan_pub.rollback_on_error;
4016: end if;

Line 4019: IF P_PA_DEBUG_MODE = 'Y' THEN

4015: raise pa_fin_plan_pub.rollback_on_error;
4016: end if;
4017: end if;
4018: /* create planning option for plan VERSION */
4019: IF P_PA_DEBUG_MODE = 'Y' THEN
4020: pa_debug.write_file('Create_Version_OrgFcst: ' || 'creating planning options for PLAN_VERSION level');
4021: END IF;
4022: select pa_proj_fp_options_s.nextVal into l_proj_fin_plan_options_id from dual;
4023: pa_proj_fp_options_pkg.Insert_Row

Line 4020: pa_debug.write_file('Create_Version_OrgFcst: ' || 'creating planning options for PLAN_VERSION level');

4016: end if;
4017: end if;
4018: /* create planning option for plan VERSION */
4019: IF P_PA_DEBUG_MODE = 'Y' THEN
4020: pa_debug.write_file('Create_Version_OrgFcst: ' || 'creating planning options for PLAN_VERSION level');
4021: END IF;
4022: select pa_proj_fp_options_s.nextVal into l_proj_fin_plan_options_id from dual;
4023: pa_proj_fp_options_pkg.Insert_Row
4024: (px_proj_fp_options_id => l_proj_fin_plan_options_id,

Line 4048: IF P_PA_DEBUG_MODE = 'Y' THEN

4044: p_fin_plan_version_id => l_budget_version_id,
4045: x_row_id => l_row_id,
4046: x_return_status => l_return_status);
4047: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
4048: IF P_PA_DEBUG_MODE = 'Y' THEN
4049: pa_debug.write_file('Create_Version_OrgFcst: ' || 'error with pa_fp_proj_fplan_options_pkg.Insert_Row: plan_version level');
4050: END IF;
4051: /* error message added to the stack in the table handler; we don't need to do it here */
4052: raise pa_fin_plan_pub.rollback_on_error;

Line 4049: pa_debug.write_file('Create_Version_OrgFcst: ' || 'error with pa_fp_proj_fplan_options_pkg.Insert_Row: plan_version level');

4045: x_row_id => l_row_id,
4046: x_return_status => l_return_status);
4047: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
4048: IF P_PA_DEBUG_MODE = 'Y' THEN
4049: pa_debug.write_file('Create_Version_OrgFcst: ' || 'error with pa_fp_proj_fplan_options_pkg.Insert_Row: plan_version level');
4050: END IF;
4051: /* error message added to the stack in the table handler; we don't need to do it here */
4052: raise pa_fin_plan_pub.rollback_on_error;
4053: end if;

Line 4057: pa_debug.reset_err_stack;

4053: end if;
4054: l_msg_count := FND_MSG_PUB.count_msg;
4055: if l_msg_count = 0 then
4056: x_return_status := FND_API.G_RET_STS_SUCCESS;
4057: pa_debug.reset_err_stack;
4058: else
4059: IF P_PA_DEBUG_MODE = 'Y' THEN
4060: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_msg_count is ' || l_msg_count);
4061: END IF;

Line 4059: IF P_PA_DEBUG_MODE = 'Y' THEN

4055: if l_msg_count = 0 then
4056: x_return_status := FND_API.G_RET_STS_SUCCESS;
4057: pa_debug.reset_err_stack;
4058: else
4059: IF P_PA_DEBUG_MODE = 'Y' THEN
4060: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_msg_count is ' || l_msg_count);
4061: END IF;
4062: x_return_status := FND_API.G_RET_STS_ERROR;
4063: if l_msg_count > 0 then

Line 4060: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_msg_count is ' || l_msg_count);

4056: x_return_status := FND_API.G_RET_STS_SUCCESS;
4057: pa_debug.reset_err_stack;
4058: else
4059: IF P_PA_DEBUG_MODE = 'Y' THEN
4060: pa_debug.write_file('Create_Version_OrgFcst: ' || 'l_msg_count is ' || l_msg_count);
4061: END IF;
4062: x_return_status := FND_API.G_RET_STS_ERROR;
4063: if l_msg_count > 0 then
4064: if l_msg_count = 1 then

Line 4084: IF P_PA_DEBUG_MODE = 'Y' THEN

4080: end if;
4081:
4082: exception
4083: when pa_fin_plan_pub.rollback_on_error then
4084: IF P_PA_DEBUG_MODE = 'Y' THEN
4085: pa_debug.write_file('Create_Version_OrgFcst: rollback_on_error exception');
4086: END IF;
4087: rollback to PA_FP_PUB_CREATE_VER_ORGFCST;
4088: raise FND_API.G_EXC_UNEXPECTED_ERROR;

Line 4085: pa_debug.write_file('Create_Version_OrgFcst: rollback_on_error exception');

4081:
4082: exception
4083: when pa_fin_plan_pub.rollback_on_error then
4084: IF P_PA_DEBUG_MODE = 'Y' THEN
4085: pa_debug.write_file('Create_Version_OrgFcst: rollback_on_error exception');
4086: END IF;
4087: rollback to PA_FP_PUB_CREATE_VER_ORGFCST;
4088: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4089:

Line 4097: pa_debug.reset_err_stack;

4093: x_msg_count := 1;
4094: x_msg_data := SQLERRM;
4095: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PUB',
4096: p_procedure_name => 'Create_Version_OrgFcst');
4097: pa_debug.reset_err_stack;
4098: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4099: end Create_Version_OrgFcst;
4100: /* ------------------------------------------------------------------------- */
4101:

Line 4125: IF P_PA_DEBUG_MODE = 'Y' THEN

4121: l_org_id NUMBER;
4122:
4123: begin
4124: FND_MSG_PUB.initialize;
4125: IF P_PA_DEBUG_MODE = 'Y' THEN
4126: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Regenerate');
4127: END IF;
4128: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4129: l_debug_mode := NVL(l_debug_mode, 'Y');

Line 4126: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Regenerate');

4122:
4123: begin
4124: FND_MSG_PUB.initialize;
4125: IF P_PA_DEBUG_MODE = 'Y' THEN
4126: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Regenerate');
4127: END IF;
4128: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4129: l_debug_mode := NVL(l_debug_mode, 'Y');
4130: IF P_PA_DEBUG_MODE = 'Y' THEN

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

4124: FND_MSG_PUB.initialize;
4125: IF P_PA_DEBUG_MODE = 'Y' THEN
4126: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Regenerate');
4127: END IF;
4128: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4129: l_debug_mode := NVL(l_debug_mode, 'Y');
4130: IF P_PA_DEBUG_MODE = 'Y' THEN
4131: pa_debug.set_process('Regenerate: ' || 'PLSQL','LOG',l_debug_mode);
4132: END IF;

Line 4130: IF P_PA_DEBUG_MODE = 'Y' THEN

4126: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Regenerate');
4127: END IF;
4128: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4129: l_debug_mode := NVL(l_debug_mode, 'Y');
4130: IF P_PA_DEBUG_MODE = 'Y' THEN
4131: pa_debug.set_process('Regenerate: ' || 'PLSQL','LOG',l_debug_mode);
4132: END IF;
4133: x_msg_count := 0;
4134: /* CHECK FOR BUSINESS RULES VIOLATIONS */

Line 4131: pa_debug.set_process('Regenerate: ' || 'PLSQL','LOG',l_debug_mode);

4127: END IF;
4128: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4129: l_debug_mode := NVL(l_debug_mode, 'Y');
4130: IF P_PA_DEBUG_MODE = 'Y' THEN
4131: pa_debug.set_process('Regenerate: ' || 'PLSQL','LOG',l_debug_mode);
4132: END IF;
4133: x_msg_count := 0;
4134: /* CHECK FOR BUSINESS RULES VIOLATIONS */
4135: /* check for null budget_version_id */

Line 4200: pa_debug.reset_err_stack;

4196: x_msg_count := l_msg_count;
4197: else
4198: x_msg_count := l_msg_count;
4199: end if;
4200: pa_debug.reset_err_stack;
4201: return;
4202: end if;
4203:
4204: /* If There are NO Business Rules Violations , Then proceed with Regenerate */

Line 4207: IF P_PA_DEBUG_MODE = 'Y' THEN

4203:
4204: /* If There are NO Business Rules Violations , Then proceed with Regenerate */
4205: if l_msg_count = 0 then
4206: SAVEPOINT PA_FIN_PLAN_PUB_REGENERATE;
4207: IF P_PA_DEBUG_MODE = 'Y' THEN
4208: pa_debug.write_file('no business logic errors; proceeding with regenerate');
4209: END IF;
4210: /* submit the concurrent request to generate the forecast */
4211: /* will need to FND_REQUEST.set_mode if submit_request is called from database trigger */

Line 4208: pa_debug.write_file('no business logic errors; proceeding with regenerate');

4204: /* If There are NO Business Rules Violations , Then proceed with Regenerate */
4205: if l_msg_count = 0 then
4206: SAVEPOINT PA_FIN_PLAN_PUB_REGENERATE;
4207: IF P_PA_DEBUG_MODE = 'Y' THEN
4208: pa_debug.write_file('no business logic errors; proceeding with regenerate');
4209: END IF;
4210: /* submit the concurrent request to generate the forecast */
4211: /* will need to FND_REQUEST.set_mode if submit_request is called from database trigger */
4212:

Line 4216: If P_PA_DEBUG_MODE = 'Y' THEN

4212:
4213: /* SUBMIT THE REQUEST ONLY WHEN version_type = PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_ORG_FORECAST */
4214: /* Moac changes:4510784 initialize org id before submitting the request for single org context */
4215: MO_GLOBAL.INIT('PA');
4216: If P_PA_DEBUG_MODE = 'Y' THEN
4217: PA_DEBUG.Log_Message(p_message => 'Calling MO_GLOBAL.SET_POLICY_CONTEXT for OrgId:'||l_org_id);
4218: End If;
4219: MO_GLOBAL.SET_POLICY_CONTEXT('S',l_org_id);
4220: FND_REQUEST.SET_ORG_ID(l_org_id);

Line 4217: PA_DEBUG.Log_Message(p_message => 'Calling MO_GLOBAL.SET_POLICY_CONTEXT for OrgId:'||l_org_id);

4213: /* SUBMIT THE REQUEST ONLY WHEN version_type = PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_ORG_FORECAST */
4214: /* Moac changes:4510784 initialize org id before submitting the request for single org context */
4215: MO_GLOBAL.INIT('PA');
4216: If P_PA_DEBUG_MODE = 'Y' THEN
4217: PA_DEBUG.Log_Message(p_message => 'Calling MO_GLOBAL.SET_POLICY_CONTEXT for OrgId:'||l_org_id);
4218: End If;
4219: MO_GLOBAL.SET_POLICY_CONTEXT('S',l_org_id);
4220: FND_REQUEST.SET_ORG_ID(l_org_id);
4221: l_request_id := FND_REQUEST.submit_request

Line 4235: IF P_PA_DEBUG_MODE = 'Y' THEN

4231: argument5 => NULL,
4232: argument6 => p_budget_version_id);
4233: if l_request_id = 0 then
4234: x_return_status := FND_API.G_RET_STS_ERROR;
4235: IF P_PA_DEBUG_MODE = 'Y' THEN
4236: pa_debug.write_file('Regenerate: ' || 'l_request_id=0; ERROR');
4237: END IF;
4238: /* FND_MESSAGE.RETRIEVE; */
4239: l_msg_data := FND_MESSAGE.GET;

Line 4236: pa_debug.write_file('Regenerate: ' || 'l_request_id=0; ERROR');

4232: argument6 => p_budget_version_id);
4233: if l_request_id = 0 then
4234: x_return_status := FND_API.G_RET_STS_ERROR;
4235: IF P_PA_DEBUG_MODE = 'Y' THEN
4236: pa_debug.write_file('Regenerate: ' || 'l_request_id=0; ERROR');
4237: END IF;
4238: /* FND_MESSAGE.RETRIEVE; */
4239: l_msg_data := FND_MESSAGE.GET;
4240: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 4240: IF P_PA_DEBUG_MODE = 'Y' THEN

4236: pa_debug.write_file('Regenerate: ' || 'l_request_id=0; ERROR');
4237: END IF;
4238: /* FND_MESSAGE.RETRIEVE; */
4239: l_msg_data := FND_MESSAGE.GET;
4240: IF P_PA_DEBUG_MODE = 'Y' THEN
4241: pa_debug.write_file('Regenerate: ' || 'the error message is ' || l_msg_data);
4242: END IF;
4243: /* PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
4244: p_msg_name => FND_MESSAGE.GET); */

Line 4241: pa_debug.write_file('Regenerate: ' || 'the error message is ' || l_msg_data);

4237: END IF;
4238: /* FND_MESSAGE.RETRIEVE; */
4239: l_msg_data := FND_MESSAGE.GET;
4240: IF P_PA_DEBUG_MODE = 'Y' THEN
4241: pa_debug.write_file('Regenerate: ' || 'the error message is ' || l_msg_data);
4242: END IF;
4243: /* PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
4244: p_msg_name => FND_MESSAGE.GET); */
4245: l_msg_count := 1;

Line 4260: pa_debug.reset_err_stack;

4256: x_msg_count := l_msg_count;
4257: else
4258: x_msg_count := l_msg_count;
4259: end if;
4260: pa_debug.reset_err_stack;
4261: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4262: else
4263: IF P_PA_DEBUG_MODE = 'Y' THEN
4264: pa_debug.write_file('Regenerate: ' || 'concurrent process submitted successfully; stamping request_id');

Line 4263: IF P_PA_DEBUG_MODE = 'Y' THEN

4259: end if;
4260: pa_debug.reset_err_stack;
4261: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4262: else
4263: IF P_PA_DEBUG_MODE = 'Y' THEN
4264: pa_debug.write_file('Regenerate: ' || 'concurrent process submitted successfully; stamping request_id');
4265: END IF;
4266: update
4267: pa_budget_versions

Line 4264: pa_debug.write_file('Regenerate: ' || 'concurrent process submitted successfully; stamping request_id');

4260: pa_debug.reset_err_stack;
4261: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4262: else
4263: IF P_PA_DEBUG_MODE = 'Y' THEN
4264: pa_debug.write_file('Regenerate: ' || 'concurrent process submitted successfully; stamping request_id');
4265: END IF;
4266: update
4267: pa_budget_versions
4268: set

Line 4276: pa_debug.reset_err_stack;

4272: where
4273: budget_version_id = p_budget_version_id;
4274: end if;
4275: x_return_status := FND_API.G_RET_STS_SUCCESS;
4276: pa_debug.reset_err_stack;
4277: end if;
4278:
4279: exception
4280: when pa_fin_plan_pub.rollback_on_error then

Line 4281: IF P_PA_DEBUG_MODE = 'Y' THEN

4277: end if;
4278:
4279: exception
4280: when pa_fin_plan_pub.rollback_on_error then
4281: IF P_PA_DEBUG_MODE = 'Y' THEN
4282: pa_debug.write_file('Regenerate: rollback_on_error exception');
4283: END IF;
4284: rollback to PA_FIN_PLAN_PUB_REGENERATE;
4285: raise FND_API.G_EXC_UNEXPECTED_ERROR;

Line 4282: pa_debug.write_file('Regenerate: rollback_on_error exception');

4278:
4279: exception
4280: when pa_fin_plan_pub.rollback_on_error then
4281: IF P_PA_DEBUG_MODE = 'Y' THEN
4282: pa_debug.write_file('Regenerate: rollback_on_error exception');
4283: END IF;
4284: rollback to PA_FIN_PLAN_PUB_REGENERATE;
4285: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4286:

Line 4294: pa_debug.reset_err_stack;

4290: x_msg_count := 1;
4291: x_msg_data := SQLERRM;
4292: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PUB',
4293: p_procedure_name => 'Regenerate');
4294: pa_debug.reset_err_stack;
4295: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4296: end Regenerate;
4297:
4298: /* ------------------------------------------------------------------------- */

Line 4343: IF P_PA_DEBUG_MODE = 'Y' THEN

4339: l_return_status VARCHAR2(2000);
4340:
4341: begin
4342: FND_MSG_PUB.initialize;
4343: IF P_PA_DEBUG_MODE = 'Y' THEN
4344: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Update_Version');
4345: END IF;
4346: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4347: l_debug_mode := NVL(l_debug_mode, 'Y');

Line 4344: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Update_Version');

4340:
4341: begin
4342: FND_MSG_PUB.initialize;
4343: IF P_PA_DEBUG_MODE = 'Y' THEN
4344: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Update_Version');
4345: END IF;
4346: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4347: l_debug_mode := NVL(l_debug_mode, 'Y');
4348: IF P_PA_DEBUG_MODE = 'Y' THEN

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

4342: FND_MSG_PUB.initialize;
4343: IF P_PA_DEBUG_MODE = 'Y' THEN
4344: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Update_Version');
4345: END IF;
4346: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4347: l_debug_mode := NVL(l_debug_mode, 'Y');
4348: IF P_PA_DEBUG_MODE = 'Y' THEN
4349: pa_debug.set_process('Update_Version: ' || 'PLSQL','LOG',l_debug_mode);
4350: END IF;

Line 4348: IF P_PA_DEBUG_MODE = 'Y' THEN

4344: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Update_Version');
4345: END IF;
4346: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4347: l_debug_mode := NVL(l_debug_mode, 'Y');
4348: IF P_PA_DEBUG_MODE = 'Y' THEN
4349: pa_debug.set_process('Update_Version: ' || 'PLSQL','LOG',l_debug_mode);
4350: END IF;
4351: x_msg_count := 0;
4352: /* CHECK FOR BUSINESS RULES VIOLATIONS */

Line 4349: pa_debug.set_process('Update_Version: ' || 'PLSQL','LOG',l_debug_mode);

4345: END IF;
4346: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4347: l_debug_mode := NVL(l_debug_mode, 'Y');
4348: IF P_PA_DEBUG_MODE = 'Y' THEN
4349: pa_debug.set_process('Update_Version: ' || 'PLSQL','LOG',l_debug_mode);
4350: END IF;
4351: x_msg_count := 0;
4352: /* CHECK FOR BUSINESS RULES VIOLATIONS */
4353: /* check for null budget_version_id */

Line 4388: pa_debug.reset_err_stack;

4384: x_msg_count := l_msg_count;
4385: else
4386: x_msg_count := l_msg_count;
4387: end if;
4388: pa_debug.reset_err_stack;
4389: return;
4390: end if;
4391:
4392: /* If There are NO Business Rules Violations , Then proceed with Update Version */

Line 4429: pa_debug.reset_err_stack;

4425: WHERE
4426: budget_version_id = p_budget_version_id;
4427: end if;
4428: x_return_status := FND_API.G_RET_STS_SUCCESS;
4429: pa_debug.reset_err_stack;
4430:
4431: exception
4432: when others then
4433: rollback to PA_FIN_PLAN_PUB_UPDATE_VERSION;

Line 4439: pa_debug.reset_err_stack;

4435: x_msg_count := 1;
4436: x_msg_data := SQLERRM;
4437: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PUB',
4438: p_procedure_name => 'Update_Version');
4439: pa_debug.reset_err_stack;
4440: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4441: end Update_Version;
4442: /*========================================================================
4443: Bug no.:- 2331201

Line 4512: pa_debug.set_err_stack ('PA_FIN_PLAN_PUB.Create_Org_Fcst_Elements');

4508: l_ae_rec l_ae_csr%ROWTYPE;
4509:
4510: begin
4511:
4512: pa_debug.set_err_stack ('PA_FIN_PLAN_PUB.Create_Org_Fcst_Elements');
4513: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4514: l_debug_mode := NVL(l_debug_mode, 'Y');
4515: IF P_PA_DEBUG_MODE = 'Y' THEN
4516: pa_debug.set_process('Create_Org_Fcst_Elements: ' || 'PLSQL','LOG',l_debug_mode);

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

4509:
4510: begin
4511:
4512: pa_debug.set_err_stack ('PA_FIN_PLAN_PUB.Create_Org_Fcst_Elements');
4513: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4514: l_debug_mode := NVL(l_debug_mode, 'Y');
4515: IF P_PA_DEBUG_MODE = 'Y' THEN
4516: pa_debug.set_process('Create_Org_Fcst_Elements: ' || 'PLSQL','LOG',l_debug_mode);
4517: END IF;

Line 4515: IF P_PA_DEBUG_MODE = 'Y' THEN

4511:
4512: pa_debug.set_err_stack ('PA_FIN_PLAN_PUB.Create_Org_Fcst_Elements');
4513: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4514: l_debug_mode := NVL(l_debug_mode, 'Y');
4515: IF P_PA_DEBUG_MODE = 'Y' THEN
4516: pa_debug.set_process('Create_Org_Fcst_Elements: ' || 'PLSQL','LOG',l_debug_mode);
4517: END IF;
4518: x_msg_count := 0;
4519:

Line 4516: pa_debug.set_process('Create_Org_Fcst_Elements: ' || 'PLSQL','LOG',l_debug_mode);

4512: pa_debug.set_err_stack ('PA_FIN_PLAN_PUB.Create_Org_Fcst_Elements');
4513: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4514: l_debug_mode := NVL(l_debug_mode, 'Y');
4515: IF P_PA_DEBUG_MODE = 'Y' THEN
4516: pa_debug.set_process('Create_Org_Fcst_Elements: ' || 'PLSQL','LOG',l_debug_mode);
4517: END IF;
4518: x_msg_count := 0;
4519:
4520: /* CHECK FOR BUSINESS RULES VIOLATIONS */

Line 4544: pa_debug.reset_err_stack;

4540: x_msg_count := l_msg_count;
4541: else
4542: x_msg_count := l_msg_count;
4543: end if;
4544: pa_debug.reset_err_stack;
4545: return;
4546: end if;
4547:
4548: /* If there are no Business Rules violations, then continue with Create_Org_Fcst_Elements */

Line 4550: IF P_PA_DEBUG_MODE = 'Y' THEN

4546: end if;
4547:
4548: /* If there are no Business Rules violations, then continue with Create_Org_Fcst_Elements */
4549: if l_msg_count = 0 then
4550: IF P_PA_DEBUG_MODE = 'Y' THEN
4551: pa_debug.write_file('Create_Org_Fcst_Elements: ' || 'no business violations; continuing with create org fcst elements');
4552: END IF;
4553:
4554: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 4551: pa_debug.write_file('Create_Org_Fcst_Elements: ' || 'no business violations; continuing with create org fcst elements');

4547:
4548: /* If there are no Business Rules violations, then continue with Create_Org_Fcst_Elements */
4549: if l_msg_count = 0 then
4550: IF P_PA_DEBUG_MODE = 'Y' THEN
4551: pa_debug.write_file('Create_Org_Fcst_Elements: ' || 'no business violations; continuing with create org fcst elements');
4552: END IF;
4553:
4554: x_return_status := FND_API.G_RET_STS_SUCCESS;
4555:

Line 4655: IF P_PA_DEBUG_MODE = 'Y' THEN

4651:
4652: /* PA_PROJECT_PERIODS_DENORM: Insert a new row for every record whose budget_version_id and
4653: resource_assignment_id match our old ones */
4654: /* key on OBJECT_ID = adj_element_id of the original version */
4655: IF P_PA_DEBUG_MODE = 'Y' THEN
4656: pa_debug.write_file('Create_Org_Fcst_Elements: ' || 'inserting into pa_project_periods_denorm');
4657: END IF;
4658: insert into pa_proj_periods_denorm (
4659: creation_date,

Line 4656: pa_debug.write_file('Create_Org_Fcst_Elements: ' || 'inserting into pa_project_periods_denorm');

4652: /* PA_PROJECT_PERIODS_DENORM: Insert a new row for every record whose budget_version_id and
4653: resource_assignment_id match our old ones */
4654: /* key on OBJECT_ID = adj_element_id of the original version */
4655: IF P_PA_DEBUG_MODE = 'Y' THEN
4656: pa_debug.write_file('Create_Org_Fcst_Elements: ' || 'inserting into pa_project_periods_denorm');
4657: END IF;
4658: insert into pa_proj_periods_denorm (
4659: creation_date,
4660: created_by,

Line 4821: IF P_PA_DEBUG_MODE = 'Y' THEN

4817:
4818:
4819:
4820: /* PA_ORG_FCST_ELEMENTS: Insert a new row for each row that contained the old budget version */
4821: IF P_PA_DEBUG_MODE = 'Y' THEN
4822: pa_debug.write_file('Create_Org_Fcst_Elements: ' || 'insert into pa_org_forecast_elements');
4823: END IF;
4824: open l_fe_csr;
4825: loop

Line 4822: pa_debug.write_file('Create_Org_Fcst_Elements: ' || 'insert into pa_org_forecast_elements');

4818:
4819:
4820: /* PA_ORG_FCST_ELEMENTS: Insert a new row for each row that contained the old budget version */
4821: IF P_PA_DEBUG_MODE = 'Y' THEN
4822: pa_debug.write_file('Create_Org_Fcst_Elements: ' || 'insert into pa_org_forecast_elements');
4823: END IF;
4824: open l_fe_csr;
4825: loop
4826: /* generate next forecast_element_id into local variable */

Line 4938: IF P_PA_DEBUG_MODE = 'Y' THEN

4934: end loop; /* PA_ORG_FORECAST_LINES */
4935: close l_fl_csr;
4936: /* PA_PROJECT_PERIODS_DENORM: Insert a new row for every record whose budget_version_id and resource_assignment_id match our old ones */
4937: /* key on OBJECT_ID = forecast_element_id of the original version */
4938: IF P_PA_DEBUG_MODE = 'Y' THEN
4939: pa_debug.write_file('Create_Org_Fcst_Elements: ' || 'inserting into pa_project_periods_denorm');
4940: END IF;
4941: insert into pa_proj_periods_denorm (
4942: creation_date,

Line 4939: pa_debug.write_file('Create_Org_Fcst_Elements: ' || 'inserting into pa_project_periods_denorm');

4935: close l_fl_csr;
4936: /* PA_PROJECT_PERIODS_DENORM: Insert a new row for every record whose budget_version_id and resource_assignment_id match our old ones */
4937: /* key on OBJECT_ID = forecast_element_id of the original version */
4938: IF P_PA_DEBUG_MODE = 'Y' THEN
4939: pa_debug.write_file('Create_Org_Fcst_Elements: ' || 'inserting into pa_project_periods_denorm');
4940: END IF;
4941: insert into pa_proj_periods_denorm (
4942: creation_date,
4943: created_by,

Line 5098: pa_debug.reset_err_stack;

5094:
5095: end loop; /* l_fe_csr*/
5096: close l_fe_csr;
5097:
5098: pa_debug.reset_err_stack;
5099: end if;
5100:
5101: exception
5102:

Line 5109: pa_debug.reset_err_stack;

5105: x_msg_count := 1;
5106: x_msg_data := SQLERRM;
5107: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PUB',
5108: p_procedure_name => 'Create_Org_Fcst_Elements');
5109: pa_debug.reset_err_stack;
5110: raise FND_API.G_EXC_UNEXPECTED_ERROR;
5111:
5112: end create_org_fcst_elements;
5113:

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

5426:
5427: BEGIN
5428:
5429: FND_MSG_PUB.initialize;
5430: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
5431: l_debug_mode := NVL(l_debug_mode, 'Y');
5432: pa_debug.set_curr_function( p_function => 'Create_Version',
5433: p_debug_mode => l_debug_mode );
5434: x_msg_count := 0;

Line 5432: pa_debug.set_curr_function( p_function => 'Create_Version',

5428:
5429: FND_MSG_PUB.initialize;
5430: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
5431: l_debug_mode := NVL(l_debug_mode, 'Y');
5432: pa_debug.set_curr_function( p_function => 'Create_Version',
5433: p_debug_mode => l_debug_mode );
5434: x_msg_count := 0;
5435: x_return_status := FND_API.G_RET_STS_SUCCESS;
5436: -- Check for business rules violations

Line 5446: IF P_PA_DEBUG_MODE = 'Y' THEN

5442: l_pji_rollup_required := 'N';
5443: END IF;
5444:
5445:
5446: IF P_PA_DEBUG_MODE = 'Y' THEN
5447: pa_debug.g_err_stage:='Validating input parameters';
5448: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5449: END IF;
5450:

Line 5447: pa_debug.g_err_stage:='Validating input parameters';

5443: END IF;
5444:
5445:
5446: IF P_PA_DEBUG_MODE = 'Y' THEN
5447: pa_debug.g_err_stage:='Validating input parameters';
5448: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5449: END IF;
5450:
5451: -- Check if source and target fp option ids are null

Line 5448: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);

5444:
5445:
5446: IF P_PA_DEBUG_MODE = 'Y' THEN
5447: pa_debug.g_err_stage:='Validating input parameters';
5448: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5449: END IF;
5450:
5451: -- Check if source and target fp option ids are null
5452:

Line 5458: IF P_PA_DEBUG_MODE = 'Y' THEN

5454: (p_fin_plan_type_id IS NULL) OR
5455: (p_version_name IS NULL)
5456: THEN
5457:
5458: IF P_PA_DEBUG_MODE = 'Y' THEN
5459: pa_debug.g_err_stage:='Project_id = '||p_project_id;
5460: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5461: pa_debug.g_err_stage:='Fin_plan_type_id = '||p_fin_plan_type_id;
5462: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);

Line 5459: pa_debug.g_err_stage:='Project_id = '||p_project_id;

5455: (p_version_name IS NULL)
5456: THEN
5457:
5458: IF P_PA_DEBUG_MODE = 'Y' THEN
5459: pa_debug.g_err_stage:='Project_id = '||p_project_id;
5460: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5461: pa_debug.g_err_stage:='Fin_plan_type_id = '||p_fin_plan_type_id;
5462: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5463: pa_debug.g_err_stage:='Version_name = '||p_version_name;

Line 5460: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);

5456: THEN
5457:
5458: IF P_PA_DEBUG_MODE = 'Y' THEN
5459: pa_debug.g_err_stage:='Project_id = '||p_project_id;
5460: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5461: pa_debug.g_err_stage:='Fin_plan_type_id = '||p_fin_plan_type_id;
5462: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5463: pa_debug.g_err_stage:='Version_name = '||p_version_name;
5464: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);

Line 5461: pa_debug.g_err_stage:='Fin_plan_type_id = '||p_fin_plan_type_id;

5457:
5458: IF P_PA_DEBUG_MODE = 'Y' THEN
5459: pa_debug.g_err_stage:='Project_id = '||p_project_id;
5460: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5461: pa_debug.g_err_stage:='Fin_plan_type_id = '||p_fin_plan_type_id;
5462: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5463: pa_debug.g_err_stage:='Version_name = '||p_version_name;
5464: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5465: pa_debug.g_err_stage:='Description = '||p_description;

Line 5462: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);

5458: IF P_PA_DEBUG_MODE = 'Y' THEN
5459: pa_debug.g_err_stage:='Project_id = '||p_project_id;
5460: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5461: pa_debug.g_err_stage:='Fin_plan_type_id = '||p_fin_plan_type_id;
5462: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5463: pa_debug.g_err_stage:='Version_name = '||p_version_name;
5464: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5465: pa_debug.g_err_stage:='Description = '||p_description;
5466: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);

Line 5463: pa_debug.g_err_stage:='Version_name = '||p_version_name;

5459: pa_debug.g_err_stage:='Project_id = '||p_project_id;
5460: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5461: pa_debug.g_err_stage:='Fin_plan_type_id = '||p_fin_plan_type_id;
5462: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5463: pa_debug.g_err_stage:='Version_name = '||p_version_name;
5464: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5465: pa_debug.g_err_stage:='Description = '||p_description;
5466: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5467: END IF;

Line 5464: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);

5460: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5461: pa_debug.g_err_stage:='Fin_plan_type_id = '||p_fin_plan_type_id;
5462: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5463: pa_debug.g_err_stage:='Version_name = '||p_version_name;
5464: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5465: pa_debug.g_err_stage:='Description = '||p_description;
5466: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5467: END IF;
5468:

Line 5465: pa_debug.g_err_stage:='Description = '||p_description;

5461: pa_debug.g_err_stage:='Fin_plan_type_id = '||p_fin_plan_type_id;
5462: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5463: pa_debug.g_err_stage:='Version_name = '||p_version_name;
5464: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5465: pa_debug.g_err_stage:='Description = '||p_description;
5466: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5467: END IF;
5468:
5469: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 5466: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);

5462: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5463: pa_debug.g_err_stage:='Version_name = '||p_version_name;
5464: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5465: pa_debug.g_err_stage:='Description = '||p_description;
5466: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5467: END IF;
5468:
5469: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
5470: p_msg_name => 'PA_FP_INV_PARAM_PASSED');

Line 5473: IF P_PA_DEBUG_MODE = 'Y' THEN

5469: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
5470: p_msg_name => 'PA_FP_INV_PARAM_PASSED');
5471:
5472:
5473: IF P_PA_DEBUG_MODE = 'Y' THEN
5474: pa_debug.g_err_stage:='Invalid Arguments Passed';
5475: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5476: END IF;
5477: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 5474: pa_debug.g_err_stage:='Invalid Arguments Passed';

5470: p_msg_name => 'PA_FP_INV_PARAM_PASSED');
5471:
5472:
5473: IF P_PA_DEBUG_MODE = 'Y' THEN
5474: pa_debug.g_err_stage:='Invalid Arguments Passed';
5475: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5476: END IF;
5477: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
5478:

Line 5475: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);

5471:
5472:
5473: IF P_PA_DEBUG_MODE = 'Y' THEN
5474: pa_debug.g_err_stage:='Invalid Arguments Passed';
5475: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5476: END IF;
5477: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
5478:
5479: END IF;

Line 5486: IF P_PA_DEBUG_MODE = 'Y' THEN

5482: --Throw error
5483: IF (p_calling_context =PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_WORKPLAN AND
5484: p_struct_elem_version_id IS NULL) THEN
5485:
5486: IF P_PA_DEBUG_MODE = 'Y' THEN
5487: pa_debug.g_err_stage:='p_struct_elem_version_id in workplan context is'||p_struct_elem_version_id;
5488: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5489: END IF;
5490: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 5487: pa_debug.g_err_stage:='p_struct_elem_version_id in workplan context is'||p_struct_elem_version_id;

5483: IF (p_calling_context =PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_WORKPLAN AND
5484: p_struct_elem_version_id IS NULL) THEN
5485:
5486: IF P_PA_DEBUG_MODE = 'Y' THEN
5487: pa_debug.g_err_stage:='p_struct_elem_version_id in workplan context is'||p_struct_elem_version_id;
5488: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5489: END IF;
5490: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
5491: p_msg_name => 'PA_FP_INV_PARAM_PASSED');

Line 5488: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);

5484: p_struct_elem_version_id IS NULL) THEN
5485:
5486: IF P_PA_DEBUG_MODE = 'Y' THEN
5487: pa_debug.g_err_stage:='p_struct_elem_version_id in workplan context is'||p_struct_elem_version_id;
5488: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5489: END IF;
5490: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
5491: p_msg_name => 'PA_FP_INV_PARAM_PASSED');
5492: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 5498: IF P_PA_DEBUG_MODE = 'Y' THEN

5494: END IF;
5495:
5496: --Fetch plan type values
5497:
5498: IF P_PA_DEBUG_MODE = 'Y' THEN
5499: pa_debug.g_err_stage:='Fetching plan type properties';
5500: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5501: END IF;
5502:

Line 5499: pa_debug.g_err_stage:='Fetching plan type properties';

5495:
5496: --Fetch plan type values
5497:
5498: IF P_PA_DEBUG_MODE = 'Y' THEN
5499: pa_debug.g_err_stage:='Fetching plan type properties';
5500: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5501: END IF;
5502:
5503: OPEN plan_type_info_cur(p_project_id,p_fin_plan_type_id);

Line 5500: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);

5496: --Fetch plan type values
5497:
5498: IF P_PA_DEBUG_MODE = 'Y' THEN
5499: pa_debug.g_err_stage:='Fetching plan type properties';
5500: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5501: END IF;
5502:
5503: OPEN plan_type_info_cur(p_project_id,p_fin_plan_type_id);
5504: FETCH plan_type_info_cur INTO plan_type_info_rec;

Line 5513: IF P_PA_DEBUG_MODE = 'Y' THEN

5509: IF ( plan_type_info_rec.fin_plan_preference_code = PA_FP_CONSTANTS_PKG.G_PREF_COST_AND_REV_SEP) AND
5510: (p_element_type IS NULL )
5511: THEN
5512:
5513: IF P_PA_DEBUG_MODE = 'Y' THEN
5514: pa_debug.g_err_stage:='Element_type input can not be null for this plan type';
5515: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5516: END IF;
5517:

Line 5514: pa_debug.g_err_stage:='Element_type input can not be null for this plan type';

5510: (p_element_type IS NULL )
5511: THEN
5512:
5513: IF P_PA_DEBUG_MODE = 'Y' THEN
5514: pa_debug.g_err_stage:='Element_type input can not be null for this plan type';
5515: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5516: END IF;
5517:
5518: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 5515: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);

5511: THEN
5512:
5513: IF P_PA_DEBUG_MODE = 'Y' THEN
5514: pa_debug.g_err_stage:='Element_type input can not be null for this plan type';
5515: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
5516: END IF;
5517:
5518: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
5519: p_msg_name => 'PA_FP_INV_PARAM_PASSED');

Line 5543: IF P_PA_DEBUG_MODE = 'Y' THEN

5539: ELSE
5540: new_version_info_rec.version_type := p_element_type;
5541: END IF;
5542:
5543: IF P_PA_DEBUG_MODE = 'Y' THEN
5544: pa_debug.g_err_stage:='Element_type = '||new_version_info_rec.version_type;
5545: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5546: END IF;
5547:

Line 5544: pa_debug.g_err_stage:='Element_type = '||new_version_info_rec.version_type;

5540: new_version_info_rec.version_type := p_element_type;
5541: END IF;
5542:
5543: IF P_PA_DEBUG_MODE = 'Y' THEN
5544: pa_debug.g_err_stage:='Element_type = '||new_version_info_rec.version_type;
5545: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5546: END IF;
5547:
5548: IF ( p_ci_id IS NOT NULL )

Line 5545: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);

5541: END IF;
5542:
5543: IF P_PA_DEBUG_MODE = 'Y' THEN
5544: pa_debug.g_err_stage:='Element_type = '||new_version_info_rec.version_type;
5545: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5546: END IF;
5547:
5548: IF ( p_ci_id IS NOT NULL )
5549: THEN

Line 5597: IF P_PA_DEBUG_MODE = 'Y' THEN

5593: l_curr_work_ver_exists_flag := 'N';
5594: END IF;
5595: END IF;
5596:
5597: IF P_PA_DEBUG_MODE = 'Y' THEN
5598: pa_debug.g_err_stage:='Parameter validation complete';
5599: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5600: END IF;
5601:

Line 5598: pa_debug.g_err_stage:='Parameter validation complete';

5594: END IF;
5595: END IF;
5596:
5597: IF P_PA_DEBUG_MODE = 'Y' THEN
5598: pa_debug.g_err_stage:='Parameter validation complete';
5599: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5600: END IF;
5601:
5602: -- Derive fin_plan_level_code, resource list id plan version based on element type

Line 5599: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);

5595: END IF;
5596:
5597: IF P_PA_DEBUG_MODE = 'Y' THEN
5598: pa_debug.g_err_stage:='Parameter validation complete';
5599: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5600: END IF;
5601:
5602: -- Derive fin_plan_level_code, resource list id plan version based on element type
5603: IF ( new_version_info_rec.version_type = PA_FP_CONSTANTS_PKG.G_ELEMENT_TYPE_COST )

Line 5620: IF P_PA_DEBUG_MODE = 'Y' THEN

5616: -- Bug 3658080 copy options info from current working version only for ci versions
5617: IF (p_ci_id is not null) AND
5618: (NVL(p_calling_context,'-99') <> PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_WORKPLAN)
5619: THEN
5620: IF P_PA_DEBUG_MODE = 'Y' THEN
5621: pa_debug.g_err_stage:='Assigning values to new_version_info_rec' ;
5622: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5623: END IF;
5624:

Line 5621: pa_debug.g_err_stage:='Assigning values to new_version_info_rec' ;

5617: IF (p_ci_id is not null) AND
5618: (NVL(p_calling_context,'-99') <> PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_WORKPLAN)
5619: THEN
5620: IF P_PA_DEBUG_MODE = 'Y' THEN
5621: pa_debug.g_err_stage:='Assigning values to new_version_info_rec' ;
5622: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5623: END IF;
5624:
5625: -- bug 3658080 l_copy_res_assmt_from_cwv_flag := 'Y';

Line 5622: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);

5618: (NVL(p_calling_context,'-99') <> PA_FP_CONSTANTS_PKG.G_CALLING_MODULE_WORKPLAN)
5619: THEN
5620: IF P_PA_DEBUG_MODE = 'Y' THEN
5621: pa_debug.g_err_stage:='Assigning values to new_version_info_rec' ;
5622: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5623: END IF;
5624:
5625: -- bug 3658080 l_copy_res_assmt_from_cwv_flag := 'Y';
5626:

Line 5640: IF P_PA_DEBUG_MODE = 'Y' THEN

5636:
5637: IF ( new_version_info_rec.version_type = PA_FP_CONSTANTS_PKG.G_ELEMENT_TYPE_COST )
5638: THEN
5639:
5640: IF P_PA_DEBUG_MODE = 'Y' THEN
5641: pa_debug.g_err_stage:='Element type is COST'||new_version_info_rec.version_type ;
5642: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5643: END IF;
5644:

Line 5641: pa_debug.g_err_stage:='Element type is COST'||new_version_info_rec.version_type ;

5637: IF ( new_version_info_rec.version_type = PA_FP_CONSTANTS_PKG.G_ELEMENT_TYPE_COST )
5638: THEN
5639:
5640: IF P_PA_DEBUG_MODE = 'Y' THEN
5641: pa_debug.g_err_stage:='Element type is COST'||new_version_info_rec.version_type ;
5642: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5643: END IF;
5644:
5645: new_version_info_rec.fin_plan_level_code := plan_version_info_rec.cost_fin_plan_level_code;

Line 5642: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);

5638: THEN
5639:
5640: IF P_PA_DEBUG_MODE = 'Y' THEN
5641: pa_debug.g_err_stage:='Element type is COST'||new_version_info_rec.version_type ;
5642: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5643: END IF;
5644:
5645: new_version_info_rec.fin_plan_level_code := plan_version_info_rec.cost_fin_plan_level_code;
5646: new_version_info_rec.time_phased_code := plan_version_info_rec.cost_time_phased_code;

Line 5655: IF P_PA_DEBUG_MODE = 'Y' THEN

5651: new_version_info_rec.PERIOD_MASK_ID := plan_version_info_rec.cost_PERIOD_MASK_ID;
5652:
5653: ELSIF ( new_version_info_rec.version_type = PA_FP_CONSTANTS_PKG.G_ELEMENT_TYPE_REVENUE ) THEN
5654:
5655: IF P_PA_DEBUG_MODE = 'Y' THEN
5656: pa_debug.g_err_stage:='Element type is REVENUE'||new_version_info_rec.version_type ;
5657: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5658: END IF;
5659:

Line 5656: pa_debug.g_err_stage:='Element type is REVENUE'||new_version_info_rec.version_type ;

5652:
5653: ELSIF ( new_version_info_rec.version_type = PA_FP_CONSTANTS_PKG.G_ELEMENT_TYPE_REVENUE ) THEN
5654:
5655: IF P_PA_DEBUG_MODE = 'Y' THEN
5656: pa_debug.g_err_stage:='Element type is REVENUE'||new_version_info_rec.version_type ;
5657: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5658: END IF;
5659:
5660: new_version_info_rec.fin_plan_level_code := plan_version_info_rec.revenue_fin_plan_level_code;

Line 5657: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);

5653: ELSIF ( new_version_info_rec.version_type = PA_FP_CONSTANTS_PKG.G_ELEMENT_TYPE_REVENUE ) THEN
5654:
5655: IF P_PA_DEBUG_MODE = 'Y' THEN
5656: pa_debug.g_err_stage:='Element type is REVENUE'||new_version_info_rec.version_type ;
5657: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5658: END IF;
5659:
5660: new_version_info_rec.fin_plan_level_code := plan_version_info_rec.revenue_fin_plan_level_code;
5661: new_version_info_rec.time_phased_code := plan_version_info_rec.revenue_time_phased_code;

Line 5670: IF P_PA_DEBUG_MODE = 'Y' THEN

5666: new_version_info_rec.PERIOD_MASK_ID := plan_version_info_rec.rev_PERIOD_MASK_ID;
5667:
5668: ELSE
5669:
5670: IF P_PA_DEBUG_MODE = 'Y' THEN
5671: pa_debug.g_err_stage:='Element type is ALL'||new_version_info_rec.version_type ;
5672: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5673: END IF;
5674:

Line 5671: pa_debug.g_err_stage:='Element type is ALL'||new_version_info_rec.version_type ;

5667:
5668: ELSE
5669:
5670: IF P_PA_DEBUG_MODE = 'Y' THEN
5671: pa_debug.g_err_stage:='Element type is ALL'||new_version_info_rec.version_type ;
5672: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5673: END IF;
5674:
5675: new_version_info_rec.fin_plan_level_code := plan_version_info_rec.all_fin_plan_level_code;

Line 5672: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);

5668: ELSE
5669:
5670: IF P_PA_DEBUG_MODE = 'Y' THEN
5671: pa_debug.g_err_stage:='Element type is ALL'||new_version_info_rec.version_type ;
5672: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5673: END IF;
5674:
5675: new_version_info_rec.fin_plan_level_code := plan_version_info_rec.all_fin_plan_level_code;
5676: new_version_info_rec.time_phased_code := plan_version_info_rec.all_time_phased_code;

Line 5770: IF P_PA_DEBUG_MODE = 'Y' THEN

5766: THEN
5767:
5768: new_version_info_rec.resource_list_id := p_resource_list_id;
5769:
5770: IF P_PA_DEBUG_MODE = 'Y' THEN
5771: pa_debug.g_err_stage:='p_resource_list_id = '|| p_resource_list_id;
5772: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5773:
5774: pa_debug.g_err_stage:='fetching control flag and uncategorized flag for res list: '|| p_resource_list_id;

Line 5771: pa_debug.g_err_stage:='p_resource_list_id = '|| p_resource_list_id;

5767:
5768: new_version_info_rec.resource_list_id := p_resource_list_id;
5769:
5770: IF P_PA_DEBUG_MODE = 'Y' THEN
5771: pa_debug.g_err_stage:='p_resource_list_id = '|| p_resource_list_id;
5772: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5773:
5774: pa_debug.g_err_stage:='fetching control flag and uncategorized flag for res list: '|| p_resource_list_id;
5775: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);

Line 5772: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);

5768: new_version_info_rec.resource_list_id := p_resource_list_id;
5769:
5770: IF P_PA_DEBUG_MODE = 'Y' THEN
5771: pa_debug.g_err_stage:='p_resource_list_id = '|| p_resource_list_id;
5772: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5773:
5774: pa_debug.g_err_stage:='fetching control flag and uncategorized flag for res list: '|| p_resource_list_id;
5775: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5776: END IF;

Line 5774: pa_debug.g_err_stage:='fetching control flag and uncategorized flag for res list: '|| p_resource_list_id;

5770: IF P_PA_DEBUG_MODE = 'Y' THEN
5771: pa_debug.g_err_stage:='p_resource_list_id = '|| p_resource_list_id;
5772: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5773:
5774: pa_debug.g_err_stage:='fetching control flag and uncategorized flag for res list: '|| p_resource_list_id;
5775: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5776: END IF;
5777:
5778: -- Add resources automatically flag should be y only for project specific res lists

Line 5775: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);

5771: pa_debug.g_err_stage:='p_resource_list_id = '|| p_resource_list_id;
5772: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5773:
5774: pa_debug.g_err_stage:='fetching control flag and uncategorized flag for res list: '|| p_resource_list_id;
5775: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5776: END IF;
5777:
5778: -- Add resources automatically flag should be y only for project specific res lists
5779: SELECT nvl(control_flag,'Y'),

Line 5792: IF P_PA_DEBUG_MODE = 'Y' THEN

5788:
5789: new_version_info_rec.select_res_auto_flag := 'N';
5790:
5791: ELSE
5792: IF P_PA_DEBUG_MODE = 'Y' THEN
5793: pa_debug.g_err_stage:='Calling PA_CREATE_RESOURCE.CREATE_PROJ_RESOURCE_LIST for res list: '|| p_resource_list_id;
5794: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5795: END IF;
5796: -- Call create_proj_resource_list api for this resource list

Line 5793: pa_debug.g_err_stage:='Calling PA_CREATE_RESOURCE.CREATE_PROJ_RESOURCE_LIST for res list: '|| p_resource_list_id;

5789: new_version_info_rec.select_res_auto_flag := 'N';
5790:
5791: ELSE
5792: IF P_PA_DEBUG_MODE = 'Y' THEN
5793: pa_debug.g_err_stage:='Calling PA_CREATE_RESOURCE.CREATE_PROJ_RESOURCE_LIST for res list: '|| p_resource_list_id;
5794: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5795: END IF;
5796: -- Call create_proj_resource_list api for this resource list
5797:

Line 5794: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);

5790:
5791: ELSE
5792: IF P_PA_DEBUG_MODE = 'Y' THEN
5793: pa_debug.g_err_stage:='Calling PA_CREATE_RESOURCE.CREATE_PROJ_RESOURCE_LIST for res list: '|| p_resource_list_id;
5794: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5795: END IF;
5796: -- Call create_proj_resource_list api for this resource list
5797:
5798: PA_CREATE_RESOURCE.CREATE_PROJ_RESOURCE_LIST (

Line 5813: IF P_PA_DEBUG_MODE = 'Y' THEN

5809: ELSE -- added for bug 4724017
5810: -- this code block would be executed for all the flows other than the AMG flow.
5811: -- the uncategorized info is required to call pa_fp_planning_transaction_pub.create_default_task_plan_txns
5812: -- conditionally only for uncategorized resource lists only.
5813: IF P_PA_DEBUG_MODE = 'Y' THEN
5814: pa_debug.g_err_stage:='Fetching uncategorized flag when resource list id is not passed';
5815: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5816: END IF;
5817:

Line 5814: pa_debug.g_err_stage:='Fetching uncategorized flag when resource list id is not passed';

5810: -- this code block would be executed for all the flows other than the AMG flow.
5811: -- the uncategorized info is required to call pa_fp_planning_transaction_pub.create_default_task_plan_txns
5812: -- conditionally only for uncategorized resource lists only.
5813: IF P_PA_DEBUG_MODE = 'Y' THEN
5814: pa_debug.g_err_stage:='Fetching uncategorized flag when resource list id is not passed';
5815: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5816: END IF;
5817:
5818: BEGIN

Line 5815: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);

5811: -- the uncategorized info is required to call pa_fp_planning_transaction_pub.create_default_task_plan_txns
5812: -- conditionally only for uncategorized resource lists only.
5813: IF P_PA_DEBUG_MODE = 'Y' THEN
5814: pa_debug.g_err_stage:='Fetching uncategorized flag when resource list id is not passed';
5815: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5816: END IF;
5817:
5818: BEGIN
5819: SELECT nvl(uncategorized_flag,'N')

Line 5824: IF P_PA_DEBUG_MODE = 'Y' THEN

5820: INTO l_res_list_uncategorized_flag
5821: FROM pa_resource_lists_all_bg
5822: WHERE resource_list_id = new_version_info_rec.resource_list_id;
5823:
5824: IF P_PA_DEBUG_MODE = 'Y' THEN
5825: pa_debug.g_err_stage:='l_res_list_uncategorized_flag: ' || l_res_list_uncategorized_flag;
5826: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5827: END IF;
5828: EXCEPTION

Line 5825: pa_debug.g_err_stage:='l_res_list_uncategorized_flag: ' || l_res_list_uncategorized_flag;

5821: FROM pa_resource_lists_all_bg
5822: WHERE resource_list_id = new_version_info_rec.resource_list_id;
5823:
5824: IF P_PA_DEBUG_MODE = 'Y' THEN
5825: pa_debug.g_err_stage:='l_res_list_uncategorized_flag: ' || l_res_list_uncategorized_flag;
5826: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5827: END IF;
5828: EXCEPTION
5829: WHEN NO_DATA_FOUND THEN

Line 5826: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);

5822: WHERE resource_list_id = new_version_info_rec.resource_list_id;
5823:
5824: IF P_PA_DEBUG_MODE = 'Y' THEN
5825: pa_debug.g_err_stage:='l_res_list_uncategorized_flag: ' || l_res_list_uncategorized_flag;
5826: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5827: END IF;
5828: EXCEPTION
5829: WHEN NO_DATA_FOUND THEN
5830: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 5830: IF P_PA_DEBUG_MODE = 'Y' THEN

5826: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5827: END IF;
5828: EXCEPTION
5829: WHEN NO_DATA_FOUND THEN
5830: IF P_PA_DEBUG_MODE = 'Y' THEN
5831: pa_debug.g_err_stage:='No uncategorized flag found for the resource list id passed';
5832: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5833: END IF;
5834: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 5831: pa_debug.g_err_stage:='No uncategorized flag found for the resource list id passed';

5827: END IF;
5828: EXCEPTION
5829: WHEN NO_DATA_FOUND THEN
5830: IF P_PA_DEBUG_MODE = 'Y' THEN
5831: pa_debug.g_err_stage:='No uncategorized flag found for the resource list id passed';
5832: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5833: END IF;
5834: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
5835: END; -- bug 4724017 ends.

Line 5832: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);

5828: EXCEPTION
5829: WHEN NO_DATA_FOUND THEN
5830: IF P_PA_DEBUG_MODE = 'Y' THEN
5831: pa_debug.g_err_stage:='No uncategorized flag found for the resource list id passed';
5832: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5833: END IF;
5834: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
5835: END; -- bug 4724017 ends.
5836: END IF;

Line 5882: IF P_PA_DEBUG_MODE = 'Y' THEN

5878: END IF;
5879: END IF;
5880: END IF; -- p_time_phased_code is not null
5881:
5882: IF P_PA_DEBUG_MODE = 'Y' THEN
5883: pa_debug.g_err_stage:='new_version_info_rec.resource_list_id = '|| new_version_info_rec.resource_list_id || 'new_version_info_rec.time_phased_code = ' || new_version_info_rec.time_phased_code;
5884: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5885: END IF;
5886:

Line 5883: pa_debug.g_err_stage:='new_version_info_rec.resource_list_id = '|| new_version_info_rec.resource_list_id || 'new_version_info_rec.time_phased_code = ' || new_version_info_rec.time_phased_code;

5879: END IF;
5880: END IF; -- p_time_phased_code is not null
5881:
5882: IF P_PA_DEBUG_MODE = 'Y' THEN
5883: pa_debug.g_err_stage:='new_version_info_rec.resource_list_id = '|| new_version_info_rec.resource_list_id || 'new_version_info_rec.time_phased_code = ' || new_version_info_rec.time_phased_code;
5884: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5885: END IF;
5886:
5887: --Start of changes for Bug :- 2570250

Line 5884: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);

5880: END IF; -- p_time_phased_code is not null
5881:
5882: IF P_PA_DEBUG_MODE = 'Y' THEN
5883: pa_debug.g_err_stage:='new_version_info_rec.resource_list_id = '|| new_version_info_rec.resource_list_id || 'new_version_info_rec.time_phased_code = ' || new_version_info_rec.time_phased_code;
5884: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5885: END IF;
5886:
5887: --Start of changes for Bug :- 2570250
5888:

Line 5891: IF P_PA_DEBUG_MODE = 'Y' THEN

5887: --Start of changes for Bug :- 2570250
5888:
5889: --Fetch the MAX working version for this plan type
5890:
5891: IF P_PA_DEBUG_MODE = 'Y' THEN
5892: pa_debug.g_err_stage:='Fetching max working version number for this plan type';
5893: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5894: END IF;
5895:

Line 5892: pa_debug.g_err_stage:='Fetching max working version number for this plan type';

5888:
5889: --Fetch the MAX working version for this plan type
5890:
5891: IF P_PA_DEBUG_MODE = 'Y' THEN
5892: pa_debug.g_err_stage:='Fetching max working version number for this plan type';
5893: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5894: END IF;
5895:
5896: PA_FIN_PLAN_UTILS.Get_Max_Budget_Version_Number

Line 5893: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);

5889: --Fetch the MAX working version for this plan type
5890:
5891: IF P_PA_DEBUG_MODE = 'Y' THEN
5892: pa_debug.g_err_stage:='Fetching max working version number for this plan type';
5893: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5894: END IF;
5895:
5896: PA_FIN_PLAN_UTILS.Get_Max_Budget_Version_Number
5897: (p_project_id => p_project_id

Line 5914: IF P_PA_DEBUG_MODE = 'Y' THEN

5910: END IF;
5911:
5912: --End of changes for Bug :- 2570250
5913:
5914: IF P_PA_DEBUG_MODE = 'Y' THEN
5915: pa_debug.g_err_stage:='l_max_version_number = '|| l_max_version_number ;
5916: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5917: END IF;
5918:

Line 5915: pa_debug.g_err_stage:='l_max_version_number = '|| l_max_version_number ;

5911:
5912: --End of changes for Bug :- 2570250
5913:
5914: IF P_PA_DEBUG_MODE = 'Y' THEN
5915: pa_debug.g_err_stage:='l_max_version_number = '|| l_max_version_number ;
5916: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5917: END IF;
5918:
5919: -- Start of changes for Bug :- 2650427

Line 5916: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);

5912: --End of changes for Bug :- 2570250
5913:
5914: IF P_PA_DEBUG_MODE = 'Y' THEN
5915: pa_debug.g_err_stage:='l_max_version_number = '|| l_max_version_number ;
5916: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5917: END IF;
5918:
5919: -- Start of changes for Bug :- 2650427
5920:

Line 5961: IF P_PA_DEBUG_MODE = 'Y' THEN

5957: -- current_version as current_working_version
5958: l_current_working_flag := 'Y';
5959: WHEN OTHERS THEN
5960:
5961: IF P_PA_DEBUG_MODE = 'Y' THEN
5962: pa_debug.g_err_stage:='Error while fetching current_working budget_version_id';
5963: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5964: END IF;
5965: RAISE;

Line 5962: pa_debug.g_err_stage:='Error while fetching current_working budget_version_id';

5958: l_current_working_flag := 'Y';
5959: WHEN OTHERS THEN
5960:
5961: IF P_PA_DEBUG_MODE = 'Y' THEN
5962: pa_debug.g_err_stage:='Error while fetching current_working budget_version_id';
5963: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5964: END IF;
5965: RAISE;
5966: END;

Line 5963: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);

5959: WHEN OTHERS THEN
5960:
5961: IF P_PA_DEBUG_MODE = 'Y' THEN
5962: pa_debug.g_err_stage:='Error while fetching current_working budget_version_id';
5963: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5964: END IF;
5965: RAISE;
5966: END;
5967: END IF;

Line 5976: IF P_PA_DEBUG_MODE = 'Y' THEN

5972: --Fetch new budget version id if budget version id isn't passed
5973:
5974: IF (px_budget_version_id IS NULL) THEN
5975:
5976: IF P_PA_DEBUG_MODE = 'Y' THEN
5977: pa_debug.g_err_stage:='Fetching new budget_version_id';
5978: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5979: END IF;
5980:

Line 5977: pa_debug.g_err_stage:='Fetching new budget_version_id';

5973:
5974: IF (px_budget_version_id IS NULL) THEN
5975:
5976: IF P_PA_DEBUG_MODE = 'Y' THEN
5977: pa_debug.g_err_stage:='Fetching new budget_version_id';
5978: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5979: END IF;
5980:
5981: SELECT pa_budget_versions_s.NEXTVAL

Line 5978: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);

5974: IF (px_budget_version_id IS NULL) THEN
5975:
5976: IF P_PA_DEBUG_MODE = 'Y' THEN
5977: pa_debug.g_err_stage:='Fetching new budget_version_id';
5978: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5979: END IF;
5980:
5981: SELECT pa_budget_versions_s.NEXTVAL
5982: INTO l_new_budget_version_id

Line 5991: IF P_PA_DEBUG_MODE = 'Y' THEN

5987:
5988:
5989: --Create a new record in pa_budget_versions using plan type properties
5990:
5991: IF P_PA_DEBUG_MODE = 'Y' THEN
5992: pa_debug.g_err_stage:='Calling budget_versions table handler to insert new row ';
5993: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5994: END IF;
5995:

Line 5992: pa_debug.g_err_stage:='Calling budget_versions table handler to insert new row ';

5988:
5989: --Create a new record in pa_budget_versions using plan type properties
5990:
5991: IF P_PA_DEBUG_MODE = 'Y' THEN
5992: pa_debug.g_err_stage:='Calling budget_versions table handler to insert new row ';
5993: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5994: END IF;
5995:
5996: -- Getting the Use for workplan flag to populate WP_VERSION_FLAG in pa_budget_versions

Line 5993: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);

5989: --Create a new record in pa_budget_versions using plan type properties
5990:
5991: IF P_PA_DEBUG_MODE = 'Y' THEN
5992: pa_debug.g_err_stage:='Calling budget_versions table handler to insert new row ';
5993: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
5994: END IF;
5995:
5996: -- Getting the Use for workplan flag to populate WP_VERSION_FLAG in pa_budget_versions
5997: SELECT use_for_workplan_flag

Line 6021: IF P_PA_DEBUG_MODE = 'Y' THEN

6017: where b.budget_version_id =
6018: nvl(l_ci_apprv_cw_bv_id,l_fin_plan_version_id)
6019: and b.wp_version_flag = 'Y') ;
6020:
6021: IF P_PA_DEBUG_MODE = 'Y' THEN
6022: pa_debug.g_err_stage:='Project_id = '||p_project_id;
6023: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6024: pa_debug.g_err_stage:='Fin_plan_type_id = '||p_fin_plan_type_id;
6025: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);

Line 6022: pa_debug.g_err_stage:='Project_id = '||p_project_id;

6018: nvl(l_ci_apprv_cw_bv_id,l_fin_plan_version_id)
6019: and b.wp_version_flag = 'Y') ;
6020:
6021: IF P_PA_DEBUG_MODE = 'Y' THEN
6022: pa_debug.g_err_stage:='Project_id = '||p_project_id;
6023: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6024: pa_debug.g_err_stage:='Fin_plan_type_id = '||p_fin_plan_type_id;
6025: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6026: pa_debug.g_err_stage:='Version_name = '||p_version_name;

Line 6023: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);

6019: and b.wp_version_flag = 'Y') ;
6020:
6021: IF P_PA_DEBUG_MODE = 'Y' THEN
6022: pa_debug.g_err_stage:='Project_id = '||p_project_id;
6023: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6024: pa_debug.g_err_stage:='Fin_plan_type_id = '||p_fin_plan_type_id;
6025: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6026: pa_debug.g_err_stage:='Version_name = '||p_version_name;
6027: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);

Line 6024: pa_debug.g_err_stage:='Fin_plan_type_id = '||p_fin_plan_type_id;

6020:
6021: IF P_PA_DEBUG_MODE = 'Y' THEN
6022: pa_debug.g_err_stage:='Project_id = '||p_project_id;
6023: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6024: pa_debug.g_err_stage:='Fin_plan_type_id = '||p_fin_plan_type_id;
6025: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6026: pa_debug.g_err_stage:='Version_name = '||p_version_name;
6027: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6028: pa_debug.g_err_stage:='Description = '||p_description;

Line 6025: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);

6021: IF P_PA_DEBUG_MODE = 'Y' THEN
6022: pa_debug.g_err_stage:='Project_id = '||p_project_id;
6023: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6024: pa_debug.g_err_stage:='Fin_plan_type_id = '||p_fin_plan_type_id;
6025: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6026: pa_debug.g_err_stage:='Version_name = '||p_version_name;
6027: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6028: pa_debug.g_err_stage:='Description = '||p_description;
6029: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);

Line 6026: pa_debug.g_err_stage:='Version_name = '||p_version_name;

6022: pa_debug.g_err_stage:='Project_id = '||p_project_id;
6023: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6024: pa_debug.g_err_stage:='Fin_plan_type_id = '||p_fin_plan_type_id;
6025: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6026: pa_debug.g_err_stage:='Version_name = '||p_version_name;
6027: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6028: pa_debug.g_err_stage:='Description = '||p_description;
6029: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6030: pa_debug.g_err_stage:='proj sv id = ' || nvl(p_struct_elem_version_id,new_version_info_rec.project_structure_version_id);

Line 6027: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);

6023: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6024: pa_debug.g_err_stage:='Fin_plan_type_id = '||p_fin_plan_type_id;
6025: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6026: pa_debug.g_err_stage:='Version_name = '||p_version_name;
6027: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6028: pa_debug.g_err_stage:='Description = '||p_description;
6029: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6030: pa_debug.g_err_stage:='proj sv id = ' || nvl(p_struct_elem_version_id,new_version_info_rec.project_structure_version_id);
6031: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);

Line 6028: pa_debug.g_err_stage:='Description = '||p_description;

6024: pa_debug.g_err_stage:='Fin_plan_type_id = '||p_fin_plan_type_id;
6025: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6026: pa_debug.g_err_stage:='Version_name = '||p_version_name;
6027: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6028: pa_debug.g_err_stage:='Description = '||p_description;
6029: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6030: pa_debug.g_err_stage:='proj sv id = ' || nvl(p_struct_elem_version_id,new_version_info_rec.project_structure_version_id);
6031: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6032: pa_debug.g_err_stage:='calling context = ' || p_calling_context;

Line 6029: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);

6025: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6026: pa_debug.g_err_stage:='Version_name = '||p_version_name;
6027: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6028: pa_debug.g_err_stage:='Description = '||p_description;
6029: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6030: pa_debug.g_err_stage:='proj sv id = ' || nvl(p_struct_elem_version_id,new_version_info_rec.project_structure_version_id);
6031: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6032: pa_debug.g_err_stage:='calling context = ' || p_calling_context;
6033: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);

Line 6030: pa_debug.g_err_stage:='proj sv id = ' || nvl(p_struct_elem_version_id,new_version_info_rec.project_structure_version_id);

6026: pa_debug.g_err_stage:='Version_name = '||p_version_name;
6027: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6028: pa_debug.g_err_stage:='Description = '||p_description;
6029: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6030: pa_debug.g_err_stage:='proj sv id = ' || nvl(p_struct_elem_version_id,new_version_info_rec.project_structure_version_id);
6031: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6032: pa_debug.g_err_stage:='calling context = ' || p_calling_context;
6033: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6034: END IF;

Line 6031: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);

6027: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6028: pa_debug.g_err_stage:='Description = '||p_description;
6029: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6030: pa_debug.g_err_stage:='proj sv id = ' || nvl(p_struct_elem_version_id,new_version_info_rec.project_structure_version_id);
6031: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6032: pa_debug.g_err_stage:='calling context = ' || p_calling_context;
6033: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6034: END IF;
6035:

Line 6032: pa_debug.g_err_stage:='calling context = ' || p_calling_context;

6028: pa_debug.g_err_stage:='Description = '||p_description;
6029: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6030: pa_debug.g_err_stage:='proj sv id = ' || nvl(p_struct_elem_version_id,new_version_info_rec.project_structure_version_id);
6031: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6032: pa_debug.g_err_stage:='calling context = ' || p_calling_context;
6033: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6034: END IF;
6035:
6036: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 6033: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);

6029: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6030: pa_debug.g_err_stage:='proj sv id = ' || nvl(p_struct_elem_version_id,new_version_info_rec.project_structure_version_id);
6031: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6032: pa_debug.g_err_stage:='calling context = ' || p_calling_context;
6033: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6034: END IF;
6035:
6036: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
6037: p_msg_name => 'DUPLICATE_WP_BEING_CREATED');

Line 6039: IF P_PA_DEBUG_MODE = 'Y' THEN

6035:
6036: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
6037: p_msg_name => 'DUPLICATE_WP_BEING_CREATED');
6038:
6039: IF P_PA_DEBUG_MODE = 'Y' THEN
6040: pa_debug.g_err_stage:='Invalid Arguments Passed';
6041: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6042: END IF;
6043: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 6040: pa_debug.g_err_stage:='Invalid Arguments Passed';

6036: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
6037: p_msg_name => 'DUPLICATE_WP_BEING_CREATED');
6038:
6039: IF P_PA_DEBUG_MODE = 'Y' THEN
6040: pa_debug.g_err_stage:='Invalid Arguments Passed';
6041: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6042: END IF;
6043: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
6044: Exception

Line 6041: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);

6037: p_msg_name => 'DUPLICATE_WP_BEING_CREATED');
6038:
6039: IF P_PA_DEBUG_MODE = 'Y' THEN
6040: pa_debug.g_err_stage:='Invalid Arguments Passed';
6041: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6042: END IF;
6043: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
6044: Exception
6045: When No_Data_Found Then

Line 6171: IF P_PA_DEBUG_MODE = 'Y' THEN

6167: );
6168:
6169: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
6170:
6171: IF P_PA_DEBUG_MODE = 'Y' THEN
6172: pa_debug.g_err_stage:= 'Could not obtain currency info for the project';
6173: pa_debug.write('Create_Version: ' || l_module_name,
6174: pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
6175: END IF;

Line 6172: pa_debug.g_err_stage:= 'Could not obtain currency info for the project';

6168:
6169: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
6170:
6171: IF P_PA_DEBUG_MODE = 'Y' THEN
6172: pa_debug.g_err_stage:= 'Could not obtain currency info for the project';
6173: pa_debug.write('Create_Version: ' || l_module_name,
6174: pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
6175: END IF;
6176: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 6173: pa_debug.write('Create_Version: ' || l_module_name,

6169: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
6170:
6171: IF P_PA_DEBUG_MODE = 'Y' THEN
6172: pa_debug.g_err_stage:= 'Could not obtain currency info for the project';
6173: pa_debug.write('Create_Version: ' || l_module_name,
6174: pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
6175: END IF;
6176: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
6177: END IF;

Line 6174: pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

6170:
6171: IF P_PA_DEBUG_MODE = 'Y' THEN
6172: pa_debug.g_err_stage:= 'Could not obtain currency info for the project';
6173: pa_debug.write('Create_Version: ' || l_module_name,
6174: pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
6175: END IF;
6176: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
6177: END IF;
6178:

Line 6199: IF P_PA_DEBUG_MODE = 'Y' THEN

6195:
6196: IF (l_agreement_currency_code IS NULL) OR
6197: (x_return_status <> FND_API.G_RET_STS_SUCCESS)
6198: THEN
6199: IF P_PA_DEBUG_MODE = 'Y' THEN
6200: pa_debug.g_err_stage:='Agreement_currency_code is null';
6201: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
6202: END IF;
6203: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 6200: pa_debug.g_err_stage:='Agreement_currency_code is null';

6196: IF (l_agreement_currency_code IS NULL) OR
6197: (x_return_status <> FND_API.G_RET_STS_SUCCESS)
6198: THEN
6199: IF P_PA_DEBUG_MODE = 'Y' THEN
6200: pa_debug.g_err_stage:='Agreement_currency_code is null';
6201: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
6202: END IF;
6203: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
6204: END IF;

Line 6201: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);

6197: (x_return_status <> FND_API.G_RET_STS_SUCCESS)
6198: THEN
6199: IF P_PA_DEBUG_MODE = 'Y' THEN
6200: pa_debug.g_err_stage:='Agreement_currency_code is null';
6201: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
6202: END IF;
6203: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
6204: END IF;
6205:

Line 6216: IF P_PA_DEBUG_MODE = 'Y' THEN

6212: -- Create record in PA_PROJ_FP_OPTIONS
6213: -- Calling create_fp_options api to create new record for the created plan version
6214:
6215:
6216: IF P_PA_DEBUG_MODE = 'Y' THEN
6217: pa_debug.g_err_stage:='Calling create_fp_option api';
6218: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
6219: END IF;
6220:

Line 6217: pa_debug.g_err_stage:='Calling create_fp_option api';

6213: -- Calling create_fp_options api to create new record for the created plan version
6214:
6215:
6216: IF P_PA_DEBUG_MODE = 'Y' THEN
6217: pa_debug.g_err_stage:='Calling create_fp_option api';
6218: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
6219: END IF;
6220:
6221: PA_PROJ_FP_OPTIONS_PUB.create_fp_option (

Line 6218: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);

6214:
6215:
6216: IF P_PA_DEBUG_MODE = 'Y' THEN
6217: pa_debug.g_err_stage:='Calling create_fp_option api';
6218: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
6219: END IF;
6220:
6221: PA_PROJ_FP_OPTIONS_PUB.create_fp_option (
6222: px_target_proj_fp_option_id => l_new_proj_fp_options_id

Line 6300: IF P_PA_DEBUG_MODE = 'Y' THEN

6296: END IF;
6297:
6298: ELSE
6299:
6300: IF P_PA_DEBUG_MODE = 'Y' THEN
6301: pa_debug.g_err_stage:='Calling COPY_FP_TXN_CURRENCIES api';
6302: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
6303: END IF;
6304:

Line 6301: pa_debug.g_err_stage:='Calling COPY_FP_TXN_CURRENCIES api';

6297:
6298: ELSE
6299:
6300: IF P_PA_DEBUG_MODE = 'Y' THEN
6301: pa_debug.g_err_stage:='Calling COPY_FP_TXN_CURRENCIES api';
6302: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
6303: END IF;
6304:
6305: PA_FP_TXN_CURRENCIES_PUB.COPY_FP_TXN_CURRENCIES (

Line 6302: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);

6298: ELSE
6299:
6300: IF P_PA_DEBUG_MODE = 'Y' THEN
6301: pa_debug.g_err_stage:='Calling COPY_FP_TXN_CURRENCIES api';
6302: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
6303: END IF;
6304:
6305: PA_FP_TXN_CURRENCIES_PUB.COPY_FP_TXN_CURRENCIES (
6306: p_source_fp_option_id => new_version_info_rec.source_fp_options_id

Line 6327: IF P_PA_DEBUG_MODE = 'Y' THEN

6323: /* FP M - Reporting lines integration */
6324: l_budget_version_ids.delete;
6325: l_budget_version_ids := SYSTEM.pa_num_tbl_type(l_new_budget_version_id);
6326:
6327: IF P_PA_DEBUG_MODE = 'Y' THEN
6328: pa_debug.write('Create_Version: ' || l_module_name,'Calling PJI_FM_XBS_ACCUM_MAINT.PLAN_CREATE ' ,5);
6329: pa_debug.write('Create_Version: ' || l_module_name,'p_fp_version_ids count '|| l_budget_version_ids.count(),5);
6330: END IF;
6331:

Line 6328: pa_debug.write('Create_Version: ' || l_module_name,'Calling PJI_FM_XBS_ACCUM_MAINT.PLAN_CREATE ' ,5);

6324: l_budget_version_ids.delete;
6325: l_budget_version_ids := SYSTEM.pa_num_tbl_type(l_new_budget_version_id);
6326:
6327: IF P_PA_DEBUG_MODE = 'Y' THEN
6328: pa_debug.write('Create_Version: ' || l_module_name,'Calling PJI_FM_XBS_ACCUM_MAINT.PLAN_CREATE ' ,5);
6329: pa_debug.write('Create_Version: ' || l_module_name,'p_fp_version_ids count '|| l_budget_version_ids.count(),5);
6330: END IF;
6331:
6332: /* We are sure that there is only one record. But just looping the std way */

Line 6329: pa_debug.write('Create_Version: ' || l_module_name,'p_fp_version_ids count '|| l_budget_version_ids.count(),5);

6325: l_budget_version_ids := SYSTEM.pa_num_tbl_type(l_new_budget_version_id);
6326:
6327: IF P_PA_DEBUG_MODE = 'Y' THEN
6328: pa_debug.write('Create_Version: ' || l_module_name,'Calling PJI_FM_XBS_ACCUM_MAINT.PLAN_CREATE ' ,5);
6329: pa_debug.write('Create_Version: ' || l_module_name,'p_fp_version_ids count '|| l_budget_version_ids.count(),5);
6330: END IF;
6331:
6332: /* We are sure that there is only one record. But just looping the std way */
6333: FOR I in l_budget_version_ids.first..l_budget_version_ids.last LOOP

Line 6334: pa_debug.write('Create_Version: ' || l_module_name,''|| l_budget_version_ids(i),5);

6330: END IF;
6331:
6332: /* We are sure that there is only one record. But just looping the std way */
6333: FOR I in l_budget_version_ids.first..l_budget_version_ids.last LOOP
6334: pa_debug.write('Create_Version: ' || l_module_name,''|| l_budget_version_ids(i),5);
6335: END LOOP;
6336:
6337: PJI_FM_XBS_ACCUM_MAINT.PLAN_CREATE (
6338: p_fp_version_ids => l_budget_version_ids,

Line 6530: IF P_PA_DEBUG_MODE = 'Y' THEN

6526: -- added for bug 4724017:
6527: -- Creation of default planning transaction is not done for versions
6528: -- being created with categorized resource list.
6529: IF l_res_list_uncategorized_flag = 'Y' THEN
6530: IF P_PA_DEBUG_MODE = 'Y' THEN
6531: pa_debug.g_err_stage:='Calling create_default_task_plan_txns api';
6532: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
6533: END IF;
6534:

Line 6531: pa_debug.g_err_stage:='Calling create_default_task_plan_txns api';

6527: -- Creation of default planning transaction is not done for versions
6528: -- being created with categorized resource list.
6529: IF l_res_list_uncategorized_flag = 'Y' THEN
6530: IF P_PA_DEBUG_MODE = 'Y' THEN
6531: pa_debug.g_err_stage:='Calling create_default_task_plan_txns api';
6532: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
6533: END IF;
6534:
6535: pa_fp_planning_transaction_pub.create_default_task_plan_txns

Line 6532: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);

6528: -- being created with categorized resource list.
6529: IF l_res_list_uncategorized_flag = 'Y' THEN
6530: IF P_PA_DEBUG_MODE = 'Y' THEN
6531: pa_debug.g_err_stage:='Calling create_default_task_plan_txns api';
6532: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
6533: END IF;
6534:
6535: pa_fp_planning_transaction_pub.create_default_task_plan_txns
6536: ( p_budget_version_id => l_new_budget_version_id

Line 6556: IF P_PA_DEBUG_MODE = 'Y' THEN

6552: ELSE
6553: l_src_bv_id_for_copying_ra := l_ci_apprv_cw_bv_id ;
6554: END IF;
6555:
6556: IF P_PA_DEBUG_MODE = 'Y' THEN
6557: pa_debug.g_err_stage:='Calling copy_resource_assignments api';
6558: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
6559: END IF;
6560:

Line 6557: pa_debug.g_err_stage:='Calling copy_resource_assignments api';

6553: l_src_bv_id_for_copying_ra := l_ci_apprv_cw_bv_id ;
6554: END IF;
6555:
6556: IF P_PA_DEBUG_MODE = 'Y' THEN
6557: pa_debug.g_err_stage:='Calling copy_resource_assignments api';
6558: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
6559: END IF;
6560:
6561: pa_fp_copy_from_pkg.copy_resource_assignments

Line 6558: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);

6554: END IF;
6555:
6556: IF P_PA_DEBUG_MODE = 'Y' THEN
6557: pa_debug.g_err_stage:='Calling copy_resource_assignments api';
6558: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
6559: END IF;
6560:
6561: pa_fp_copy_from_pkg.copy_resource_assignments
6562: ( p_source_plan_version_id => l_src_bv_id_for_copying_ra

Line 6641: IF P_PA_DEBUG_MODE = 'Y' THEN

6637:
6638: ELSE
6639: -- Create resource assignments for the budget version and the impacted task id
6640:
6641: IF P_PA_DEBUG_MODE = 'Y' THEN
6642: pa_debug.g_err_stage:='Calling Create_CI_Resource_Assignments';
6643: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
6644: END IF;
6645:

Line 6642: pa_debug.g_err_stage:='Calling Create_CI_Resource_Assignments';

6638: ELSE
6639: -- Create resource assignments for the budget version and the impacted task id
6640:
6641: IF P_PA_DEBUG_MODE = 'Y' THEN
6642: pa_debug.g_err_stage:='Calling Create_CI_Resource_Assignments';
6643: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
6644: END IF;
6645:
6646: PA_FP_ELEMENTS_PUB.Create_CI_Resource_Assignments

Line 6643: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);

6639: -- Create resource assignments for the budget version and the impacted task id
6640:
6641: IF P_PA_DEBUG_MODE = 'Y' THEN
6642: pa_debug.g_err_stage:='Calling Create_CI_Resource_Assignments';
6643: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
6644: END IF;
6645:
6646: PA_FP_ELEMENTS_PUB.Create_CI_Resource_Assignments
6647: ( p_project_id => p_project_id

Line 6678: IF p_pa_debug_mode = 'Y' THEN

6674: x_msg_data => l_msg_data);
6675:
6676: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
6677: THEN
6678: IF p_pa_debug_mode = 'Y' THEN
6679: pa_debug.write_file('Failed due to error in PA_FIN_PLAN_PUB.create_default_plan_txn_rec',5);
6680: END IF;
6681: raise PA_FP_CONSTANTS_PKG.INVALID_ARG_EXC;
6682: END IF;

Line 6679: pa_debug.write_file('Failed due to error in PA_FIN_PLAN_PUB.create_default_plan_txn_rec',5);

6675:
6676: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
6677: THEN
6678: IF p_pa_debug_mode = 'Y' THEN
6679: pa_debug.write_file('Failed due to error in PA_FIN_PLAN_PUB.create_default_plan_txn_rec',5);
6680: END IF;
6681: raise PA_FP_CONSTANTS_PKG.INVALID_ARG_EXC;
6682: END IF;
6683: -- End of changes for Bug :- 2649474

Line 6686: IF P_PA_DEBUG_MODE = 'Y' THEN

6682: END IF;
6683: -- End of changes for Bug :- 2649474
6684:
6685:
6686: IF P_PA_DEBUG_MODE = 'Y' THEN
6687: pa_debug.g_err_stage:='Exiting Create_Version';
6688: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
6689: END IF;
6690:

Line 6687: pa_debug.g_err_stage:='Exiting Create_Version';

6683: -- End of changes for Bug :- 2649474
6684:
6685:
6686: IF P_PA_DEBUG_MODE = 'Y' THEN
6687: pa_debug.g_err_stage:='Exiting Create_Version';
6688: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
6689: END IF;
6690:
6691: --Return the out parameters

Line 6688: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);

6684:
6685:
6686: IF P_PA_DEBUG_MODE = 'Y' THEN
6687: pa_debug.g_err_stage:='Exiting Create_Version';
6688: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,3);
6689: END IF;
6690:
6691: --Return the out parameters
6692:

Line 6699: pa_debug.reset_curr_function;

6695: x_proj_fp_option_id := l_new_proj_fp_options_id;
6696:
6697: --Reset the error stack
6698:
6699: pa_debug.reset_curr_function;
6700:
6701: EXCEPTION
6702:
6703: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 6719: -- pa_debug.g_err_stage:='Invalid Arguments Passed';

6715: ELSE
6716: x_msg_count := l_msg_count;
6717: END IF;
6718: x_return_status := FND_API.G_RET_STS_ERROR;
6719: -- pa_debug.g_err_stage:='Invalid Arguments Passed';
6720: -- pa_debug.write(l_module_name,pa_debug.g_err_stage,5);
6721: pa_debug.reset_curr_function;
6722: RETURN;
6723:

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

6716: x_msg_count := l_msg_count;
6717: END IF;
6718: x_return_status := FND_API.G_RET_STS_ERROR;
6719: -- pa_debug.g_err_stage:='Invalid Arguments Passed';
6720: -- pa_debug.write(l_module_name,pa_debug.g_err_stage,5);
6721: pa_debug.reset_curr_function;
6722: RETURN;
6723:
6724: WHEN Others THEN

Line 6721: pa_debug.reset_curr_function;

6717: END IF;
6718: x_return_status := FND_API.G_RET_STS_ERROR;
6719: -- pa_debug.g_err_stage:='Invalid Arguments Passed';
6720: -- pa_debug.write(l_module_name,pa_debug.g_err_stage,5);
6721: pa_debug.reset_curr_function;
6722: RETURN;
6723:
6724: WHEN Others THEN
6725: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 6730: IF P_PA_DEBUG_MODE = 'Y' THEN

6726: x_msg_count := 1;
6727: x_msg_data := SQLERRM;
6728: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PUB'
6729: ,p_procedure_name => 'CREATE_VERSION');
6730: IF P_PA_DEBUG_MODE = 'Y' THEN
6731: pa_debug.g_err_stage:='Unexpected Error ' || SQLERRM;
6732: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6733: END IF;
6734: pa_debug.reset_curr_function;

Line 6731: pa_debug.g_err_stage:='Unexpected Error ' || SQLERRM;

6727: x_msg_data := SQLERRM;
6728: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PUB'
6729: ,p_procedure_name => 'CREATE_VERSION');
6730: IF P_PA_DEBUG_MODE = 'Y' THEN
6731: pa_debug.g_err_stage:='Unexpected Error ' || SQLERRM;
6732: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6733: END IF;
6734: pa_debug.reset_curr_function;
6735: RAISE;

Line 6732: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);

6728: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PUB'
6729: ,p_procedure_name => 'CREATE_VERSION');
6730: IF P_PA_DEBUG_MODE = 'Y' THEN
6731: pa_debug.g_err_stage:='Unexpected Error ' || SQLERRM;
6732: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6733: END IF;
6734: pa_debug.reset_curr_function;
6735: RAISE;
6736:

Line 6734: pa_debug.reset_curr_function;

6730: IF P_PA_DEBUG_MODE = 'Y' THEN
6731: pa_debug.g_err_stage:='Unexpected Error ' || SQLERRM;
6732: pa_debug.write('Create_Version: ' || l_module_name,pa_debug.g_err_stage,5);
6733: END IF;
6734: pa_debug.reset_curr_function;
6735: RAISE;
6736:
6737: END Create_Version;
6738:

Line 6842: pa_debug.g_err_stage := 'Entered get_profile_start_date';

6838: -- l_end_period_start_date pa_periods.end_date%TYPE;
6839:
6840: BEGIN
6841: /*
6842: pa_debug.g_err_stage := 'Entered get_profile_start_date';
6843: IF P_PA_DEBUG_MODE = 'Y' THEN
6844: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6845: END IF;
6846: pa_debug.g_err_stage := 'p_profile_end_date = ' || p_profile_end_date;

Line 6843: IF P_PA_DEBUG_MODE = 'Y' THEN

6839:
6840: BEGIN
6841: /*
6842: pa_debug.g_err_stage := 'Entered get_profile_start_date';
6843: IF P_PA_DEBUG_MODE = 'Y' THEN
6844: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6845: END IF;
6846: pa_debug.g_err_stage := 'p_profile_end_date = ' || p_profile_end_date;
6847: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 6844: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);

6840: BEGIN
6841: /*
6842: pa_debug.g_err_stage := 'Entered get_profile_start_date';
6843: IF P_PA_DEBUG_MODE = 'Y' THEN
6844: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6845: END IF;
6846: pa_debug.g_err_stage := 'p_profile_end_date = ' || p_profile_end_date;
6847: IF P_PA_DEBUG_MODE = 'Y' THEN
6848: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);

Line 6846: pa_debug.g_err_stage := 'p_profile_end_date = ' || p_profile_end_date;

6842: pa_debug.g_err_stage := 'Entered get_profile_start_date';
6843: IF P_PA_DEBUG_MODE = 'Y' THEN
6844: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6845: END IF;
6846: pa_debug.g_err_stage := 'p_profile_end_date = ' || p_profile_end_date;
6847: IF P_PA_DEBUG_MODE = 'Y' THEN
6848: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6849: END IF;
6850: pa_debug.g_err_stage := 'p_period_type = ' || p_period_type;

Line 6847: IF P_PA_DEBUG_MODE = 'Y' THEN

6843: IF P_PA_DEBUG_MODE = 'Y' THEN
6844: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6845: END IF;
6846: pa_debug.g_err_stage := 'p_profile_end_date = ' || p_profile_end_date;
6847: IF P_PA_DEBUG_MODE = 'Y' THEN
6848: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6849: END IF;
6850: pa_debug.g_err_stage := 'p_period_type = ' || p_period_type;
6851: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 6848: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);

6844: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6845: END IF;
6846: pa_debug.g_err_stage := 'p_profile_end_date = ' || p_profile_end_date;
6847: IF P_PA_DEBUG_MODE = 'Y' THEN
6848: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6849: END IF;
6850: pa_debug.g_err_stage := 'p_period_type = ' || p_period_type;
6851: IF P_PA_DEBUG_MODE = 'Y' THEN
6852: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);

Line 6850: pa_debug.g_err_stage := 'p_period_type = ' || p_period_type;

6846: pa_debug.g_err_stage := 'p_profile_end_date = ' || p_profile_end_date;
6847: IF P_PA_DEBUG_MODE = 'Y' THEN
6848: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6849: END IF;
6850: pa_debug.g_err_stage := 'p_period_type = ' || p_period_type;
6851: IF P_PA_DEBUG_MODE = 'Y' THEN
6852: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6853: END IF;
6854: */

Line 6851: IF P_PA_DEBUG_MODE = 'Y' THEN

6847: IF P_PA_DEBUG_MODE = 'Y' THEN
6848: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6849: END IF;
6850: pa_debug.g_err_stage := 'p_period_type = ' || p_period_type;
6851: IF P_PA_DEBUG_MODE = 'Y' THEN
6852: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6853: END IF;
6854: */
6855: IF p_period_type = PA_FP_CONSTANTS_PKG.G_PERIOD_TYPE_PA THEN

Line 6852: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);

6848: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6849: END IF;
6850: pa_debug.g_err_stage := 'p_period_type = ' || p_period_type;
6851: IF P_PA_DEBUG_MODE = 'Y' THEN
6852: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6853: END IF;
6854: */
6855: IF p_period_type = PA_FP_CONSTANTS_PKG.G_PERIOD_TYPE_PA THEN
6856:

Line 6869: pa_debug.g_err_stage := 'Fetching MIN of start date as profile start date';

6865: EXCEPTION
6866: WHEN NO_DATA_FOUND THEN
6867: --IF no such period existing select the first available period
6868: /*
6869: pa_debug.g_err_stage := 'Fetching MIN of start date as profile start date';
6870: IF P_PA_DEBUG_MODE = 'Y' THEN
6871: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6872: END IF;
6873: */

Line 6870: IF P_PA_DEBUG_MODE = 'Y' THEN

6866: WHEN NO_DATA_FOUND THEN
6867: --IF no such period existing select the first available period
6868: /*
6869: pa_debug.g_err_stage := 'Fetching MIN of start date as profile start date';
6870: IF P_PA_DEBUG_MODE = 'Y' THEN
6871: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6872: END IF;
6873: */
6874: SELECT MIN(start_date)

Line 6871: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);

6867: --IF no such period existing select the first available period
6868: /*
6869: pa_debug.g_err_stage := 'Fetching MIN of start date as profile start date';
6870: IF P_PA_DEBUG_MODE = 'Y' THEN
6871: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6872: END IF;
6873: */
6874: SELECT MIN(start_date)
6875: INTO l_profile_start_date

Line 6903: pa_debug.g_err_stage := 'Fetching the first available period';

6899: EXCEPTION
6900: WHEN NO_DATA_FOUND THEN
6901: --IF no such period existing select the first available period
6902: /*
6903: pa_debug.g_err_stage := 'Fetching the first available period';
6904: IF P_PA_DEBUG_MODE = 'Y' THEN
6905: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6906: END IF;
6907: */

Line 6904: IF P_PA_DEBUG_MODE = 'Y' THEN

6900: WHEN NO_DATA_FOUND THEN
6901: --IF no such period existing select the first available period
6902: /*
6903: pa_debug.g_err_stage := 'Fetching the first available period';
6904: IF P_PA_DEBUG_MODE = 'Y' THEN
6905: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6906: END IF;
6907: */
6908: SELECT MIN(start_date)

Line 6905: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);

6901: --IF no such period existing select the first available period
6902: /*
6903: pa_debug.g_err_stage := 'Fetching the first available period';
6904: IF P_PA_DEBUG_MODE = 'Y' THEN
6905: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6906: END IF;
6907: */
6908: SELECT MIN(start_date)
6909: INTO l_profile_start_date

Line 6920: pa_debug.g_err_stage := 'Exiting Get_Profile_Start_Date';

6916: END IF;
6917:
6918: x_profile_start_date := l_profile_start_date;
6919:
6920: pa_debug.g_err_stage := 'Exiting Get_Profile_Start_Date';
6921: IF P_PA_DEBUG_MODE = 'Y' THEN
6922: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6923: END IF;
6924:

Line 6921: IF P_PA_DEBUG_MODE = 'Y' THEN

6917:
6918: x_profile_start_date := l_profile_start_date;
6919:
6920: pa_debug.g_err_stage := 'Exiting Get_Profile_Start_Date';
6921: IF P_PA_DEBUG_MODE = 'Y' THEN
6922: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6923: END IF;
6924:
6925: EXCEPTION

Line 6922: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);

6918: x_profile_start_date := l_profile_start_date;
6919:
6920: pa_debug.g_err_stage := 'Exiting Get_Profile_Start_Date';
6921: IF P_PA_DEBUG_MODE = 'Y' THEN
6922: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6923: END IF;
6924:
6925: EXCEPTION
6926:

Line 6933: pa_debug.g_err_stage:='Unexpected Error' || SQLERRM;

6929: x_msg_count := 1;
6930: x_msg_data := SQLERRM;
6931: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FIN_PLAN_PUB'
6932: ,p_procedure_name => 'Get_Profile_Start_Date');
6933: pa_debug.g_err_stage:='Unexpected Error' || SQLERRM;
6934: IF P_PA_DEBUG_MODE = 'Y' THEN
6935: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,5);
6936: END IF;
6937: RAISE;

Line 6934: IF P_PA_DEBUG_MODE = 'Y' THEN

6930: x_msg_data := SQLERRM;
6931: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FIN_PLAN_PUB'
6932: ,p_procedure_name => 'Get_Profile_Start_Date');
6933: pa_debug.g_err_stage:='Unexpected Error' || SQLERRM;
6934: IF P_PA_DEBUG_MODE = 'Y' THEN
6935: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,5);
6936: END IF;
6937: RAISE;
6938:

Line 6935: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,5);

6931: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FIN_PLAN_PUB'
6932: ,p_procedure_name => 'Get_Profile_Start_Date');
6933: pa_debug.g_err_stage:='Unexpected Error' || SQLERRM;
6934: IF P_PA_DEBUG_MODE = 'Y' THEN
6935: pa_debug.write('Get_Profile_Start_Date: ' || l_module_name,pa_debug.g_err_stage,5);
6936: END IF;
6937: RAISE;
6938:
6939: END Get_Profile_Start_Date;

Line 6955: pa_debug.g_err_stage := 'Entered get_profile_end_date';

6951: AS
6952: l_profile_end_date pa_periods.end_date%TYPE;
6953: BEGIN
6954: /*
6955: pa_debug.g_err_stage := 'Entered get_profile_end_date';
6956: IF P_PA_DEBUG_MODE = 'Y' THEN
6957: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6958: END IF;
6959: pa_debug.g_err_stage := 'p_profile_start_date = ' || p_profile_start_date;

Line 6956: IF P_PA_DEBUG_MODE = 'Y' THEN

6952: l_profile_end_date pa_periods.end_date%TYPE;
6953: BEGIN
6954: /*
6955: pa_debug.g_err_stage := 'Entered get_profile_end_date';
6956: IF P_PA_DEBUG_MODE = 'Y' THEN
6957: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6958: END IF;
6959: pa_debug.g_err_stage := 'p_profile_start_date = ' || p_profile_start_date;
6960: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 6957: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);

6953: BEGIN
6954: /*
6955: pa_debug.g_err_stage := 'Entered get_profile_end_date';
6956: IF P_PA_DEBUG_MODE = 'Y' THEN
6957: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6958: END IF;
6959: pa_debug.g_err_stage := 'p_profile_start_date = ' || p_profile_start_date;
6960: IF P_PA_DEBUG_MODE = 'Y' THEN
6961: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);

Line 6959: pa_debug.g_err_stage := 'p_profile_start_date = ' || p_profile_start_date;

6955: pa_debug.g_err_stage := 'Entered get_profile_end_date';
6956: IF P_PA_DEBUG_MODE = 'Y' THEN
6957: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6958: END IF;
6959: pa_debug.g_err_stage := 'p_profile_start_date = ' || p_profile_start_date;
6960: IF P_PA_DEBUG_MODE = 'Y' THEN
6961: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6962: END IF;
6963: pa_debug.g_err_stage := 'p_period_type = ' || p_period_type;

Line 6960: IF P_PA_DEBUG_MODE = 'Y' THEN

6956: IF P_PA_DEBUG_MODE = 'Y' THEN
6957: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6958: END IF;
6959: pa_debug.g_err_stage := 'p_profile_start_date = ' || p_profile_start_date;
6960: IF P_PA_DEBUG_MODE = 'Y' THEN
6961: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6962: END IF;
6963: pa_debug.g_err_stage := 'p_period_type = ' || p_period_type;
6964: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 6961: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);

6957: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6958: END IF;
6959: pa_debug.g_err_stage := 'p_profile_start_date = ' || p_profile_start_date;
6960: IF P_PA_DEBUG_MODE = 'Y' THEN
6961: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6962: END IF;
6963: pa_debug.g_err_stage := 'p_period_type = ' || p_period_type;
6964: IF P_PA_DEBUG_MODE = 'Y' THEN
6965: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);

Line 6963: pa_debug.g_err_stage := 'p_period_type = ' || p_period_type;

6959: pa_debug.g_err_stage := 'p_profile_start_date = ' || p_profile_start_date;
6960: IF P_PA_DEBUG_MODE = 'Y' THEN
6961: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6962: END IF;
6963: pa_debug.g_err_stage := 'p_period_type = ' || p_period_type;
6964: IF P_PA_DEBUG_MODE = 'Y' THEN
6965: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6966: END IF;
6967: */

Line 6964: IF P_PA_DEBUG_MODE = 'Y' THEN

6960: IF P_PA_DEBUG_MODE = 'Y' THEN
6961: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6962: END IF;
6963: pa_debug.g_err_stage := 'p_period_type = ' || p_period_type;
6964: IF P_PA_DEBUG_MODE = 'Y' THEN
6965: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6966: END IF;
6967: */
6968: IF p_period_type = PA_FP_CONSTANTS_PKG.G_PERIOD_TYPE_GL THEN

Line 6965: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);

6961: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6962: END IF;
6963: pa_debug.g_err_stage := 'p_period_type = ' || p_period_type;
6964: IF P_PA_DEBUG_MODE = 'Y' THEN
6965: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6966: END IF;
6967: */
6968: IF p_period_type = PA_FP_CONSTANTS_PKG.G_PERIOD_TYPE_GL THEN
6969:

Line 6992: pa_debug.g_err_stage := 'Fetching last period available';

6988: EXCEPTION
6989: WHEN NO_DATA_FOUND THEN
6990: --IF no such period existing select the last available period
6991: /*
6992: pa_debug.g_err_stage := 'Fetching last period available';
6993: IF P_PA_DEBUG_MODE = 'Y' THEN
6994: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6995: END IF;
6996: */

Line 6993: IF P_PA_DEBUG_MODE = 'Y' THEN

6989: WHEN NO_DATA_FOUND THEN
6990: --IF no such period existing select the last available period
6991: /*
6992: pa_debug.g_err_stage := 'Fetching last period available';
6993: IF P_PA_DEBUG_MODE = 'Y' THEN
6994: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6995: END IF;
6996: */
6997: SELECT MAX(end_date)

Line 6994: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);

6990: --IF no such period existing select the last available period
6991: /*
6992: pa_debug.g_err_stage := 'Fetching last period available';
6993: IF P_PA_DEBUG_MODE = 'Y' THEN
6994: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);
6995: END IF;
6996: */
6997: SELECT MAX(end_date)
6998: INTO l_profile_end_date

Line 7012: pa_debug.g_err_stage := 'Fetching profile end date';

7008: BEGIN
7009: --Fetch the start date of the period in to which p_profile_start_date falls
7010: --Select the 51st period's start date from start period as profile end date
7011:
7012: pa_debug.g_err_stage := 'Fetching profile end date';
7013: IF P_PA_DEBUG_MODE = 'Y' THEN
7014: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);
7015: END IF;
7016:

Line 7013: IF P_PA_DEBUG_MODE = 'Y' THEN

7009: --Fetch the start date of the period in to which p_profile_start_date falls
7010: --Select the 51st period's start date from start period as profile end date
7011:
7012: pa_debug.g_err_stage := 'Fetching profile end date';
7013: IF P_PA_DEBUG_MODE = 'Y' THEN
7014: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);
7015: END IF;
7016:
7017: SELECT end_date

Line 7014: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);

7010: --Select the 51st period's start date from start period as profile end date
7011:
7012: pa_debug.g_err_stage := 'Fetching profile end date';
7013: IF P_PA_DEBUG_MODE = 'Y' THEN
7014: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);
7015: END IF;
7016:
7017: SELECT end_date
7018: INTO l_profile_end_date

Line 7029: pa_debug.g_err_stage := 'Fetching last available period';

7025: WHEN NO_DATA_FOUND THEN
7026:
7027: --IF no such period existing select the last available period
7028: /*
7029: pa_debug.g_err_stage := 'Fetching last available period';
7030: IF P_PA_DEBUG_MODE = 'Y' THEN
7031: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);
7032: END IF;
7033: */

Line 7030: IF P_PA_DEBUG_MODE = 'Y' THEN

7026:
7027: --IF no such period existing select the last available period
7028: /*
7029: pa_debug.g_err_stage := 'Fetching last available period';
7030: IF P_PA_DEBUG_MODE = 'Y' THEN
7031: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);
7032: END IF;
7033: */
7034: SELECT MAX(end_date)

Line 7031: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);

7027: --IF no such period existing select the last available period
7028: /*
7029: pa_debug.g_err_stage := 'Fetching last available period';
7030: IF P_PA_DEBUG_MODE = 'Y' THEN
7031: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);
7032: END IF;
7033: */
7034: SELECT MAX(end_date)
7035: INTO l_profile_end_date

Line 7042: pa_debug.g_err_stage := 'Exiting Get_Profile_End_Date';

7038: END IF;
7039:
7040: x_profile_end_date := l_profile_end_date;
7041:
7042: pa_debug.g_err_stage := 'Exiting Get_Profile_End_Date';
7043: IF P_PA_DEBUG_MODE = 'Y' THEN
7044: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);
7045: END IF;
7046:

Line 7043: IF P_PA_DEBUG_MODE = 'Y' THEN

7039:
7040: x_profile_end_date := l_profile_end_date;
7041:
7042: pa_debug.g_err_stage := 'Exiting Get_Profile_End_Date';
7043: IF P_PA_DEBUG_MODE = 'Y' THEN
7044: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);
7045: END IF;
7046:
7047: EXCEPTION

Line 7044: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);

7040: x_profile_end_date := l_profile_end_date;
7041:
7042: pa_debug.g_err_stage := 'Exiting Get_Profile_End_Date';
7043: IF P_PA_DEBUG_MODE = 'Y' THEN
7044: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,3);
7045: END IF;
7046:
7047: EXCEPTION
7048:

Line 7055: pa_debug.g_err_stage:='Unexpected Error' ||SQLERRM;

7051: x_msg_count := 1;
7052: x_msg_data := SQLERRM;
7053: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FIN_PLAN_PUB'
7054: ,p_procedure_name => 'Get_Profile_End_Date');
7055: pa_debug.g_err_stage:='Unexpected Error' ||SQLERRM;
7056: IF P_PA_DEBUG_MODE = 'Y' THEN
7057: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,5);
7058: END IF;
7059: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 7056: IF P_PA_DEBUG_MODE = 'Y' THEN

7052: x_msg_data := SQLERRM;
7053: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FIN_PLAN_PUB'
7054: ,p_procedure_name => 'Get_Profile_End_Date');
7055: pa_debug.g_err_stage:='Unexpected Error' ||SQLERRM;
7056: IF P_PA_DEBUG_MODE = 'Y' THEN
7057: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,5);
7058: END IF;
7059: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7060:

Line 7057: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,5);

7053: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FIN_PLAN_PUB'
7054: ,p_procedure_name => 'Get_Profile_End_Date');
7055: pa_debug.g_err_stage:='Unexpected Error' ||SQLERRM;
7056: IF P_PA_DEBUG_MODE = 'Y' THEN
7057: pa_debug.write('Get_Profile_End_Date: ' || l_module_name,pa_debug.g_err_stage,5);
7058: END IF;
7059: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7060:
7061: END Get_Profile_End_Date;

Line 7111: pa_debug.set_err_stack('Create_Fresh_Period_Profile');

7107:
7108: x_msg_count := 0;
7109: x_return_status := FND_API.G_RET_STS_SUCCESS;
7110:
7111: pa_debug.set_err_stack('Create_Fresh_Period_Profile');
7112: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
7113: l_debug_mode := NVL(l_debug_mode, 'Y');
7114: IF P_PA_DEBUG_MODE = 'Y' THEN
7115: pa_debug.set_process('Create_Fresh_Period_Profile: ' || 'PLSQL','LOG',l_debug_mode);

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

7108: x_msg_count := 0;
7109: x_return_status := FND_API.G_RET_STS_SUCCESS;
7110:
7111: pa_debug.set_err_stack('Create_Fresh_Period_Profile');
7112: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
7113: l_debug_mode := NVL(l_debug_mode, 'Y');
7114: IF P_PA_DEBUG_MODE = 'Y' THEN
7115: pa_debug.set_process('Create_Fresh_Period_Profile: ' || 'PLSQL','LOG',l_debug_mode);
7116: END IF;

Line 7114: IF P_PA_DEBUG_MODE = 'Y' THEN

7110:
7111: pa_debug.set_err_stack('Create_Fresh_Period_Profile');
7112: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
7113: l_debug_mode := NVL(l_debug_mode, 'Y');
7114: IF P_PA_DEBUG_MODE = 'Y' THEN
7115: pa_debug.set_process('Create_Fresh_Period_Profile: ' || 'PLSQL','LOG',l_debug_mode);
7116: END IF;
7117:
7118: -- Check if source project id is NULL,if so throw an error message

Line 7115: pa_debug.set_process('Create_Fresh_Period_Profile: ' || 'PLSQL','LOG',l_debug_mode);

7111: pa_debug.set_err_stack('Create_Fresh_Period_Profile');
7112: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
7113: l_debug_mode := NVL(l_debug_mode, 'Y');
7114: IF P_PA_DEBUG_MODE = 'Y' THEN
7115: pa_debug.set_process('Create_Fresh_Period_Profile: ' || 'PLSQL','LOG',l_debug_mode);
7116: END IF;
7117:
7118: -- Check if source project id is NULL,if so throw an error message
7119:

Line 7120: pa_debug.g_err_stage := 'Checking for valid parameters:';

7116: END IF;
7117:
7118: -- Check if source project id is NULL,if so throw an error message
7119:
7120: pa_debug.g_err_stage := 'Checking for valid parameters:';
7121: IF P_PA_DEBUG_MODE = 'Y' THEN
7122: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7123: END IF;
7124:

Line 7121: IF P_PA_DEBUG_MODE = 'Y' THEN

7117:
7118: -- Check if source project id is NULL,if so throw an error message
7119:
7120: pa_debug.g_err_stage := 'Checking for valid parameters:';
7121: IF P_PA_DEBUG_MODE = 'Y' THEN
7122: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7123: END IF;
7124:
7125: IF (p_project_id IS NULL) OR (p_period_type IS NULL) THEN

Line 7122: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);

7118: -- Check if source project id is NULL,if so throw an error message
7119:
7120: pa_debug.g_err_stage := 'Checking for valid parameters:';
7121: IF P_PA_DEBUG_MODE = 'Y' THEN
7122: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7123: END IF;
7124:
7125: IF (p_project_id IS NULL) OR (p_period_type IS NULL) THEN
7126:

Line 7127: pa_debug.g_err_stage := 'Project='||p_project_id;

7123: END IF;
7124:
7125: IF (p_project_id IS NULL) OR (p_period_type IS NULL) THEN
7126:
7127: pa_debug.g_err_stage := 'Project='||p_project_id;
7128: IF P_PA_DEBUG_MODE = 'Y' THEN
7129: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,5);
7130: END IF;
7131: pa_debug.g_err_stage := 'Period_type = '||p_period_type;

Line 7128: IF P_PA_DEBUG_MODE = 'Y' THEN

7124:
7125: IF (p_project_id IS NULL) OR (p_period_type IS NULL) THEN
7126:
7127: pa_debug.g_err_stage := 'Project='||p_project_id;
7128: IF P_PA_DEBUG_MODE = 'Y' THEN
7129: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,5);
7130: END IF;
7131: pa_debug.g_err_stage := 'Period_type = '||p_period_type;
7132: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 7129: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,5);

7125: IF (p_project_id IS NULL) OR (p_period_type IS NULL) THEN
7126:
7127: pa_debug.g_err_stage := 'Project='||p_project_id;
7128: IF P_PA_DEBUG_MODE = 'Y' THEN
7129: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,5);
7130: END IF;
7131: pa_debug.g_err_stage := 'Period_type = '||p_period_type;
7132: IF P_PA_DEBUG_MODE = 'Y' THEN
7133: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,5);

Line 7131: pa_debug.g_err_stage := 'Period_type = '||p_period_type;

7127: pa_debug.g_err_stage := 'Project='||p_project_id;
7128: IF P_PA_DEBUG_MODE = 'Y' THEN
7129: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,5);
7130: END IF;
7131: pa_debug.g_err_stage := 'Period_type = '||p_period_type;
7132: IF P_PA_DEBUG_MODE = 'Y' THEN
7133: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,5);
7134: END IF;
7135: PA_UTILS.ADD_MESSAGE(p_app_short_name=> 'PA',

Line 7132: IF P_PA_DEBUG_MODE = 'Y' THEN

7128: IF P_PA_DEBUG_MODE = 'Y' THEN
7129: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,5);
7130: END IF;
7131: pa_debug.g_err_stage := 'Period_type = '||p_period_type;
7132: IF P_PA_DEBUG_MODE = 'Y' THEN
7133: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,5);
7134: END IF;
7135: PA_UTILS.ADD_MESSAGE(p_app_short_name=> 'PA',
7136: p_msg_name => 'PA_FP_INV_PARAM_PASSED');

Line 7133: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,5);

7129: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,5);
7130: END IF;
7131: pa_debug.g_err_stage := 'Period_type = '||p_period_type;
7132: IF P_PA_DEBUG_MODE = 'Y' THEN
7133: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,5);
7134: END IF;
7135: PA_UTILS.ADD_MESSAGE(p_app_short_name=> 'PA',
7136: p_msg_name => 'PA_FP_INV_PARAM_PASSED');
7137: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 7140: pa_debug.g_err_stage := 'Parameter validation complete';

7136: p_msg_name => 'PA_FP_INV_PARAM_PASSED');
7137: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
7138: END IF;
7139:
7140: pa_debug.g_err_stage := 'Parameter validation complete';
7141: IF P_PA_DEBUG_MODE = 'Y' THEN
7142: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7143: END IF;
7144:

Line 7141: IF P_PA_DEBUG_MODE = 'Y' THEN

7137: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
7138: END IF;
7139:
7140: pa_debug.g_err_stage := 'Parameter validation complete';
7141: IF P_PA_DEBUG_MODE = 'Y' THEN
7142: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7143: END IF;
7144:
7145: --Fetch project start and completion dates

Line 7142: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);

7138: END IF;
7139:
7140: pa_debug.g_err_stage := 'Parameter validation complete';
7141: IF P_PA_DEBUG_MODE = 'Y' THEN
7142: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7143: END IF;
7144:
7145: --Fetch project start and completion dates
7146:

Line 7160: pa_debug.g_err_stage := 'Calling get_start_and_end_dates procedure';

7156:
7157: IF (l_project_start_date IS NOT NULL) AND
7158: (l_project_completion_date IS NOT NULL)
7159: THEN
7160: pa_debug.g_err_stage := 'Calling get_start_and_end_dates procedure';
7161: IF P_PA_DEBUG_MODE = 'Y' THEN
7162: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7163: END IF;
7164:

Line 7161: IF P_PA_DEBUG_MODE = 'Y' THEN

7157: IF (l_project_start_date IS NOT NULL) AND
7158: (l_project_completion_date IS NOT NULL)
7159: THEN
7160: pa_debug.g_err_stage := 'Calling get_start_and_end_dates procedure';
7161: IF P_PA_DEBUG_MODE = 'Y' THEN
7162: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7163: END IF;
7164:
7165: Get_start_and_end_dates( p_period_type => p_period_type

Line 7162: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);

7158: (l_project_completion_date IS NOT NULL)
7159: THEN
7160: pa_debug.g_err_stage := 'Calling get_start_and_end_dates procedure';
7161: IF P_PA_DEBUG_MODE = 'Y' THEN
7162: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7163: END IF;
7164:
7165: Get_start_and_end_dates( p_period_type => p_period_type
7166: ,p_profile_start_date => l_project_start_date

Line 7174: pa_debug.g_err_stage := 'Selecting start and end dates from pa_budget_lines of the project';

7170:
7171: ELSE
7172: --Fetch MIN and MAX of start dates of pa_budget_lines
7173:
7174: pa_debug.g_err_stage := 'Selecting start and end dates from pa_budget_lines of the project';
7175: IF P_PA_DEBUG_MODE = 'Y' THEN
7176: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7177: END IF;
7178:

Line 7175: IF P_PA_DEBUG_MODE = 'Y' THEN

7171: ELSE
7172: --Fetch MIN and MAX of start dates of pa_budget_lines
7173:
7174: pa_debug.g_err_stage := 'Selecting start and end dates from pa_budget_lines of the project';
7175: IF P_PA_DEBUG_MODE = 'Y' THEN
7176: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7177: END IF;
7178:
7179: SELECT MIN (pbl.start_date)

Line 7176: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);

7172: --Fetch MIN and MAX of start dates of pa_budget_lines
7173:
7174: pa_debug.g_err_stage := 'Selecting start and end dates from pa_budget_lines of the project';
7175: IF P_PA_DEBUG_MODE = 'Y' THEN
7176: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7177: END IF;
7178:
7179: SELECT MIN (pbl.start_date)
7180: ,MAX(pbl.end_date)

Line 7199: pa_debug.g_err_stage := 'Profile id cant be created';

7195: -- the calling program as there is no way we can create period profile for this project.
7196:
7197: IF l_start_date IS NULL OR l_end_date IS NULL THEN
7198:
7199: pa_debug.g_err_stage := 'Profile id cant be created';
7200: IF P_PA_DEBUG_MODE = 'Y' THEN
7201: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7202: END IF;
7203: x_period_profile_id := NULL;

Line 7200: IF P_PA_DEBUG_MODE = 'Y' THEN

7196:
7197: IF l_start_date IS NULL OR l_end_date IS NULL THEN
7198:
7199: pa_debug.g_err_stage := 'Profile id cant be created';
7200: IF P_PA_DEBUG_MODE = 'Y' THEN
7201: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7202: END IF;
7203: x_period_profile_id := NULL;
7204: pa_debug.reset_err_stack;

Line 7201: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);

7197: IF l_start_date IS NULL OR l_end_date IS NULL THEN
7198:
7199: pa_debug.g_err_stage := 'Profile id cant be created';
7200: IF P_PA_DEBUG_MODE = 'Y' THEN
7201: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7202: END IF;
7203: x_period_profile_id := NULL;
7204: pa_debug.reset_err_stack;
7205: RETURN;

Line 7204: pa_debug.reset_err_stack;

7200: IF P_PA_DEBUG_MODE = 'Y' THEN
7201: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7202: END IF;
7203: x_period_profile_id := NULL;
7204: pa_debug.reset_err_stack;
7205: RETURN;
7206: END IF;
7207:
7208: -- Fetch period_set_name, accounted_period_type and pa_period_type

Line 7211: pa_debug.g_err_stage := 'Fetching accounted_period_type, pa_period_type';

7207:
7208: -- Fetch period_set_name, accounted_period_type and pa_period_type
7209: -- required for creation of period profiles as follows
7210:
7211: pa_debug.g_err_stage := 'Fetching accounted_period_type, pa_period_type';
7212: IF P_PA_DEBUG_MODE = 'Y' THEN
7213: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7214: END IF;
7215:

Line 7212: IF P_PA_DEBUG_MODE = 'Y' THEN

7208: -- Fetch period_set_name, accounted_period_type and pa_period_type
7209: -- required for creation of period profiles as follows
7210:
7211: pa_debug.g_err_stage := 'Fetching accounted_period_type, pa_period_type';
7212: IF P_PA_DEBUG_MODE = 'Y' THEN
7213: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7214: END IF;
7215:
7216: SELECT b.period_set_name

Line 7213: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);

7209: -- required for creation of period profiles as follows
7210:
7211: pa_debug.g_err_stage := 'Fetching accounted_period_type, pa_period_type';
7212: IF P_PA_DEBUG_MODE = 'Y' THEN
7213: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7214: END IF;
7215:
7216: SELECT b.period_set_name
7217: ,DECODE(p_period_type,

Line 7234: pa_debug.g_err_stage := 'Fetching number of periods';

7230: IF TRUNC(SYSDATE) BETWEEN l_start_date AND l_end_date THEN /*2690087*/
7231:
7232: --Select the number of periods between start and end date
7233: /*
7234: pa_debug.g_err_stage := 'Fetching number of periods';
7235: IF P_PA_DEBUG_MODE = 'Y' THEN
7236: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7237: END IF;
7238: */

Line 7235: IF P_PA_DEBUG_MODE = 'Y' THEN

7231:
7232: --Select the number of periods between start and end date
7233: /*
7234: pa_debug.g_err_stage := 'Fetching number of periods';
7235: IF P_PA_DEBUG_MODE = 'Y' THEN
7236: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7237: END IF;
7238: */
7239: IF p_period_type = PA_FP_CONSTANTS_PKG.G_PERIOD_TYPE_PA THEN

Line 7236: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);

7232: --Select the number of periods between start and end date
7233: /*
7234: pa_debug.g_err_stage := 'Fetching number of periods';
7235: IF P_PA_DEBUG_MODE = 'Y' THEN
7236: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7237: END IF;
7238: */
7239: IF p_period_type = PA_FP_CONSTANTS_PKG.G_PERIOD_TYPE_PA THEN
7240:

Line 7266: pa_debug.g_err_stage := 'Calling get_profile_start_date';

7262: --Select end date as start date of end period
7263:
7264: l_profile_end_date := l_end_date;
7265:
7266: pa_debug.g_err_stage := 'Calling get_profile_start_date';
7267: IF P_PA_DEBUG_MODE = 'Y' THEN
7268: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7269: END IF;
7270:

Line 7267: IF P_PA_DEBUG_MODE = 'Y' THEN

7263:
7264: l_profile_end_date := l_end_date;
7265:
7266: pa_debug.g_err_stage := 'Calling get_profile_start_date';
7267: IF P_PA_DEBUG_MODE = 'Y' THEN
7268: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7269: END IF;
7270:
7271: Get_Profile_Start_Date (

Line 7268: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);

7264: l_profile_end_date := l_end_date;
7265:
7266: pa_debug.g_err_stage := 'Calling get_profile_start_date';
7267: IF P_PA_DEBUG_MODE = 'Y' THEN
7268: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7269: END IF;
7270:
7271: Get_Profile_Start_Date (
7272: p_profile_end_date => l_profile_end_date

Line 7319: pa_debug.g_err_stage:='Fetching start date of the period into which sysdate falls'||SQLERRM;

7315: END IF;
7316:
7317: EXCEPTION
7318: WHEN Others THEN
7319: pa_debug.g_err_stage:='Fetching start date of the period into which sysdate falls'||SQLERRM;
7320: IF P_PA_DEBUG_MODE = 'Y' THEN
7321: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,5);
7322: END IF;
7323: RAISE;

Line 7320: IF P_PA_DEBUG_MODE = 'Y' THEN

7316:
7317: EXCEPTION
7318: WHEN Others THEN
7319: pa_debug.g_err_stage:='Fetching start date of the period into which sysdate falls'||SQLERRM;
7320: IF P_PA_DEBUG_MODE = 'Y' THEN
7321: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,5);
7322: END IF;
7323: RAISE;
7324: END;

Line 7321: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,5);

7317: EXCEPTION
7318: WHEN Others THEN
7319: pa_debug.g_err_stage:='Fetching start date of the period into which sysdate falls'||SQLERRM;
7320: IF P_PA_DEBUG_MODE = 'Y' THEN
7321: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,5);
7322: END IF;
7323: RAISE;
7324: END;
7325:

Line 7328: pa_debug.g_err_stage := 'Calling get_profile_end_date';

7324: END;
7325:
7326: /* End of changes for the bug :- 2623941 */
7327:
7328: pa_debug.g_err_stage := 'Calling get_profile_end_date';
7329: IF P_PA_DEBUG_MODE = 'Y' THEN
7330: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7331: END IF;
7332:

Line 7329: IF P_PA_DEBUG_MODE = 'Y' THEN

7325:
7326: /* End of changes for the bug :- 2623941 */
7327:
7328: pa_debug.g_err_stage := 'Calling get_profile_end_date';
7329: IF P_PA_DEBUG_MODE = 'Y' THEN
7330: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7331: END IF;
7332:
7333: Get_Profile_End_Date (

Line 7330: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);

7326: /* End of changes for the bug :- 2623941 */
7327:
7328: pa_debug.g_err_stage := 'Calling get_profile_end_date';
7329: IF P_PA_DEBUG_MODE = 'Y' THEN
7330: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7331: END IF;
7332:
7333: Get_Profile_End_Date (
7334: p_profile_start_date => l_profile_start_date

Line 7358: pa_debug.g_err_stage := 'Calling get_profile_end_date';

7354: --Select start_date as start date of start period
7355:
7356: l_profile_start_date := l_start_date;
7357:
7358: pa_debug.g_err_stage := 'Calling get_profile_end_date';
7359: IF P_PA_DEBUG_MODE = 'Y' THEN
7360: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7361: END IF;
7362:

Line 7359: IF P_PA_DEBUG_MODE = 'Y' THEN

7355:
7356: l_profile_start_date := l_start_date;
7357:
7358: pa_debug.g_err_stage := 'Calling get_profile_end_date';
7359: IF P_PA_DEBUG_MODE = 'Y' THEN
7360: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7361: END IF;
7362:
7363: Get_Profile_End_Date (

Line 7360: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);

7356: l_profile_start_date := l_start_date;
7357:
7358: pa_debug.g_err_stage := 'Calling get_profile_end_date';
7359: IF P_PA_DEBUG_MODE = 'Y' THEN
7360: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7361: END IF;
7362:
7363: Get_Profile_End_Date (
7364: p_profile_start_date => l_profile_start_date

Line 7387: pa_debug.g_err_stage := 'Calling get_profile_start_date';

7383: --Select end date as profile periods last period start date
7384:
7385: l_profile_end_date := l_end_date;
7386:
7387: pa_debug.g_err_stage := 'Calling get_profile_start_date';
7388: IF P_PA_DEBUG_MODE = 'Y' THEN
7389: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7390: END IF;
7391:

Line 7388: IF P_PA_DEBUG_MODE = 'Y' THEN

7384:
7385: l_profile_end_date := l_end_date;
7386:
7387: pa_debug.g_err_stage := 'Calling get_profile_start_date';
7388: IF P_PA_DEBUG_MODE = 'Y' THEN
7389: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7390: END IF;
7391:
7392: Get_Profile_Start_Date (

Line 7389: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);

7385: l_profile_end_date := l_end_date;
7386:
7387: pa_debug.g_err_stage := 'Calling get_profile_start_date';
7388: IF P_PA_DEBUG_MODE = 'Y' THEN
7389: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7390: END IF;
7391:
7392: Get_Profile_Start_Date (
7393: p_profile_end_date => l_profile_end_date

Line 7418: pa_debug.g_err_stage := 'Calling Maintain_Prj_Period_Profile api';

7414: --Null out number of periods
7415:
7416: l_number_of_periods:= NULL;
7417:
7418: pa_debug.g_err_stage := 'Calling Maintain_Prj_Period_Profile api';
7419: IF P_PA_DEBUG_MODE = 'Y' THEN
7420: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7421: END IF;
7422:

Line 7419: IF P_PA_DEBUG_MODE = 'Y' THEN

7415:
7416: l_number_of_periods:= NULL;
7417:
7418: pa_debug.g_err_stage := 'Calling Maintain_Prj_Period_Profile api';
7419: IF P_PA_DEBUG_MODE = 'Y' THEN
7420: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7421: END IF;
7422:
7423: Pa_Prj_Period_Profile_Utils.Maintain_Prj_Period_Profile(

Line 7420: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);

7416: l_number_of_periods:= NULL;
7417:
7418: pa_debug.g_err_stage := 'Calling Maintain_Prj_Period_Profile api';
7419: IF P_PA_DEBUG_MODE = 'Y' THEN
7420: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7421: END IF;
7422:
7423: Pa_Prj_Period_Profile_Utils.Maintain_Prj_Period_Profile(
7424: p_project_id => p_project_id

Line 7444: pa_debug.g_err_stage := ' exiting Create_Fresh_Period_Profile';

7440:
7441: --Return the newly fetched profile id
7442:
7443: x_period_profile_id := l_period_profile_id;
7444: pa_debug.g_err_stage := ' exiting Create_Fresh_Period_Profile';
7445: IF P_PA_DEBUG_MODE = 'Y' THEN
7446: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7447: END IF;
7448: pa_debug.reset_err_stack;

Line 7445: IF P_PA_DEBUG_MODE = 'Y' THEN

7441: --Return the newly fetched profile id
7442:
7443: x_period_profile_id := l_period_profile_id;
7444: pa_debug.g_err_stage := ' exiting Create_Fresh_Period_Profile';
7445: IF P_PA_DEBUG_MODE = 'Y' THEN
7446: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7447: END IF;
7448: pa_debug.reset_err_stack;
7449:

Line 7446: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);

7442:
7443: x_period_profile_id := l_period_profile_id;
7444: pa_debug.g_err_stage := ' exiting Create_Fresh_Period_Profile';
7445: IF P_PA_DEBUG_MODE = 'Y' THEN
7446: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7447: END IF;
7448: pa_debug.reset_err_stack;
7449:
7450: EXCEPTION

Line 7448: pa_debug.reset_err_stack;

7444: pa_debug.g_err_stage := ' exiting Create_Fresh_Period_Profile';
7445: IF P_PA_DEBUG_MODE = 'Y' THEN
7446: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,3);
7447: END IF;
7448: pa_debug.reset_err_stack;
7449:
7450: EXCEPTION
7451:
7452: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 7467: pa_debug.g_err_stage:='Invalid Arguments Passed';

7463: x_msg_count := l_msg_count;
7464: ELSE
7465: x_msg_count := l_msg_count;
7466: END IF;
7467: pa_debug.g_err_stage:='Invalid Arguments Passed';
7468: IF P_PA_DEBUG_MODE = 'Y' THEN
7469: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,5);
7470: END IF;
7471: x_return_status:= FND_API.G_RET_STS_ERROR;

Line 7468: IF P_PA_DEBUG_MODE = 'Y' THEN

7464: ELSE
7465: x_msg_count := l_msg_count;
7466: END IF;
7467: pa_debug.g_err_stage:='Invalid Arguments Passed';
7468: IF P_PA_DEBUG_MODE = 'Y' THEN
7469: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,5);
7470: END IF;
7471: x_return_status:= FND_API.G_RET_STS_ERROR;
7472: pa_debug.reset_err_stack;

Line 7469: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,5);

7465: x_msg_count := l_msg_count;
7466: END IF;
7467: pa_debug.g_err_stage:='Invalid Arguments Passed';
7468: IF P_PA_DEBUG_MODE = 'Y' THEN
7469: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,5);
7470: END IF;
7471: x_return_status:= FND_API.G_RET_STS_ERROR;
7472: pa_debug.reset_err_stack;
7473: RAISE;

Line 7472: pa_debug.reset_err_stack;

7468: IF P_PA_DEBUG_MODE = 'Y' THEN
7469: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,5);
7470: END IF;
7471: x_return_status:= FND_API.G_RET_STS_ERROR;
7472: pa_debug.reset_err_stack;
7473: RAISE;
7474:
7475: WHEN Others THEN
7476: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 7481: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;

7477: x_msg_count := 1;
7478: x_msg_data := SQLERRM;
7479: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FIN_PLAN_PUB'
7480: ,p_procedure_name => 'Create_Fresh_Period_Profile');
7481: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
7482: IF P_PA_DEBUG_MODE = 'Y' THEN
7483: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,5);
7484: END IF;
7485: pa_debug.reset_err_stack;

Line 7482: IF P_PA_DEBUG_MODE = 'Y' THEN

7478: x_msg_data := SQLERRM;
7479: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FIN_PLAN_PUB'
7480: ,p_procedure_name => 'Create_Fresh_Period_Profile');
7481: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
7482: IF P_PA_DEBUG_MODE = 'Y' THEN
7483: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,5);
7484: END IF;
7485: pa_debug.reset_err_stack;
7486: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 7483: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,5);

7479: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_FIN_PLAN_PUB'
7480: ,p_procedure_name => 'Create_Fresh_Period_Profile');
7481: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
7482: IF P_PA_DEBUG_MODE = 'Y' THEN
7483: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,5);
7484: END IF;
7485: pa_debug.reset_err_stack;
7486: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7487:

Line 7485: pa_debug.reset_err_stack;

7481: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
7482: IF P_PA_DEBUG_MODE = 'Y' THEN
7483: pa_debug.write('Create_Fresh_Period_Profile: ' || l_module_name,pa_debug.g_err_stage,5);
7484: END IF;
7485: pa_debug.reset_err_stack;
7486: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7487:
7488: END Create_Fresh_Period_Profile;
7489:

Line 7525: pa_debug.set_err_stack('PA_FIN_PLAN_PUB.INSERT_PLAN_LINES_TMP_BULK');

7521:
7522: BEGIN
7523:
7524: -- Set the error stack.
7525: pa_debug.set_err_stack('PA_FIN_PLAN_PUB.INSERT_PLAN_LINES_TMP_BULK');
7526:
7527: -- Get the Debug mode into local variable and set it to 'Y' if its NULL
7528: fnd_profile.get('pa_debug_MODE',l_debug_mode);
7529: l_debug_mode := NVL(l_debug_mode, 'Y');

Line 7528: fnd_profile.get('pa_debug_MODE',l_debug_mode);

7524: -- Set the error stack.
7525: pa_debug.set_err_stack('PA_FIN_PLAN_PUB.INSERT_PLAN_LINES_TMP_BULK');
7526:
7527: -- Get the Debug mode into local variable and set it to 'Y' if its NULL
7528: fnd_profile.get('pa_debug_MODE',l_debug_mode);
7529: l_debug_mode := NVL(l_debug_mode, 'Y');
7530:
7531: -- Initialize the return status to success
7532: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 7534: IF P_PA_DEBUG_MODE = 'Y' THEN

7530:
7531: -- Initialize the return status to success
7532: x_return_status := FND_API.G_RET_STS_SUCCESS;
7533:
7534: IF P_PA_DEBUG_MODE = 'Y' THEN
7535: pa_debug.set_process('INSERT_PLAN_LINES_TMP_BULK: ' || 'PLSQL','LOG',l_debug_mode);
7536: END IF;
7537:
7538: pa_debug.g_err_stage := TO_CHAR(l_stage)||':In PA_FIN_PLAN_PUB.INSERT_PLAN_LINES_TMP_BULK ';

Line 7535: pa_debug.set_process('INSERT_PLAN_LINES_TMP_BULK: ' || 'PLSQL','LOG',l_debug_mode);

7531: -- Initialize the return status to success
7532: x_return_status := FND_API.G_RET_STS_SUCCESS;
7533:
7534: IF P_PA_DEBUG_MODE = 'Y' THEN
7535: pa_debug.set_process('INSERT_PLAN_LINES_TMP_BULK: ' || 'PLSQL','LOG',l_debug_mode);
7536: END IF;
7537:
7538: pa_debug.g_err_stage := TO_CHAR(l_stage)||':In PA_FIN_PLAN_PUB.INSERT_PLAN_LINES_TMP_BULK ';
7539: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 7538: pa_debug.g_err_stage := TO_CHAR(l_stage)||':In PA_FIN_PLAN_PUB.INSERT_PLAN_LINES_TMP_BULK ';

7534: IF P_PA_DEBUG_MODE = 'Y' THEN
7535: pa_debug.set_process('INSERT_PLAN_LINES_TMP_BULK: ' || 'PLSQL','LOG',l_debug_mode);
7536: END IF;
7537:
7538: pa_debug.g_err_stage := TO_CHAR(l_stage)||':In PA_FIN_PLAN_PUB.INSERT_PLAN_LINES_TMP_BULK ';
7539: IF P_PA_DEBUG_MODE = 'Y' THEN
7540: pa_debug.write('INSERT_PLAN_LINES_TMP_BULK: ' || l_module_name,pa_debug.g_err_stage,2);
7541: END IF;
7542:

Line 7539: IF P_PA_DEBUG_MODE = 'Y' THEN

7535: pa_debug.set_process('INSERT_PLAN_LINES_TMP_BULK: ' || 'PLSQL','LOG',l_debug_mode);
7536: END IF;
7537:
7538: pa_debug.g_err_stage := TO_CHAR(l_stage)||':In PA_FIN_PLAN_PUB.INSERT_PLAN_LINES_TMP_BULK ';
7539: IF P_PA_DEBUG_MODE = 'Y' THEN
7540: pa_debug.write('INSERT_PLAN_LINES_TMP_BULK: ' || l_module_name,pa_debug.g_err_stage,2);
7541: END IF;
7542:
7543:

Line 7540: pa_debug.write('INSERT_PLAN_LINES_TMP_BULK: ' || l_module_name,pa_debug.g_err_stage,2);

7536: END IF;
7537:
7538: pa_debug.g_err_stage := TO_CHAR(l_stage)||':In PA_FIN_PLAN_PUB.INSERT_PLAN_LINES_TMP_BULK ';
7539: IF P_PA_DEBUG_MODE = 'Y' THEN
7540: pa_debug.write('INSERT_PLAN_LINES_TMP_BULK: ' || l_module_name,pa_debug.g_err_stage,2);
7541: END IF;
7542:
7543:
7544: /*

Line 7548: pa_debug.g_err_stage := TO_CHAR(l_stage)||': INSERT into fin plan lines tmp';

7544: /*
7545: * Bulk Insert records into PA_FP_ELEMENTS table for the records fetched
7546: * from cursor top_task_cur.
7547: */
7548: pa_debug.g_err_stage := TO_CHAR(l_stage)||': INSERT into fin plan lines tmp';
7549: IF P_PA_DEBUG_MODE = 'Y' THEN
7550: pa_debug.write('INSERT_PLAN_LINES_TMP_BULK: ' || l_module_name,pa_debug.g_err_stage,2);
7551: END IF;
7552:

Line 7549: IF P_PA_DEBUG_MODE = 'Y' THEN

7545: * Bulk Insert records into PA_FP_ELEMENTS table for the records fetched
7546: * from cursor top_task_cur.
7547: */
7548: pa_debug.g_err_stage := TO_CHAR(l_stage)||': INSERT into fin plan lines tmp';
7549: IF P_PA_DEBUG_MODE = 'Y' THEN
7550: pa_debug.write('INSERT_PLAN_LINES_TMP_BULK: ' || l_module_name,pa_debug.g_err_stage,2);
7551: END IF;
7552:
7553:

Line 7550: pa_debug.write('INSERT_PLAN_LINES_TMP_BULK: ' || l_module_name,pa_debug.g_err_stage,2);

7546: * from cursor top_task_cur.
7547: */
7548: pa_debug.g_err_stage := TO_CHAR(l_stage)||': INSERT into fin plan lines tmp';
7549: IF P_PA_DEBUG_MODE = 'Y' THEN
7550: pa_debug.write('INSERT_PLAN_LINES_TMP_BULK: ' || l_module_name,pa_debug.g_err_stage,2);
7551: END IF;
7552:
7553:
7554: FORALL i in p_res_assignment_tbl.first..p_res_assignment_tbl.last

Line 7606: pa_debug.g_err_stage := TO_CHAR(l_stage)||': INSERTED ' || sql%rowcount || ' recs into fin plan lines tmp';

7602: ,p_parent_assignment_id_tbl(i)
7603: ,p_delete_flag_tbl(i)
7604: ,p_source_txn_curr_code_tbl(i)) ;
7605:
7606: pa_debug.g_err_stage := TO_CHAR(l_stage)||': INSERTED ' || sql%rowcount || ' recs into fin plan lines tmp';
7607: IF P_PA_DEBUG_MODE = 'Y' THEN
7608: pa_debug.write('INSERT_PLAN_LINES_TMP_BULK: ' || l_module_name,pa_debug.g_err_stage,2);
7609: END IF;
7610:

Line 7607: IF P_PA_DEBUG_MODE = 'Y' THEN

7603: ,p_delete_flag_tbl(i)
7604: ,p_source_txn_curr_code_tbl(i)) ;
7605:
7606: pa_debug.g_err_stage := TO_CHAR(l_stage)||': INSERTED ' || sql%rowcount || ' recs into fin plan lines tmp';
7607: IF P_PA_DEBUG_MODE = 'Y' THEN
7608: pa_debug.write('INSERT_PLAN_LINES_TMP_BULK: ' || l_module_name,pa_debug.g_err_stage,2);
7609: END IF;
7610:
7611: pa_debug.reset_err_stack; -- bug 2815593

Line 7608: pa_debug.write('INSERT_PLAN_LINES_TMP_BULK: ' || l_module_name,pa_debug.g_err_stage,2);

7604: ,p_source_txn_curr_code_tbl(i)) ;
7605:
7606: pa_debug.g_err_stage := TO_CHAR(l_stage)||': INSERTED ' || sql%rowcount || ' recs into fin plan lines tmp';
7607: IF P_PA_DEBUG_MODE = 'Y' THEN
7608: pa_debug.write('INSERT_PLAN_LINES_TMP_BULK: ' || l_module_name,pa_debug.g_err_stage,2);
7609: END IF;
7610:
7611: pa_debug.reset_err_stack; -- bug 2815593
7612: EXCEPTION

Line 7611: pa_debug.reset_err_stack; -- bug 2815593

7607: IF P_PA_DEBUG_MODE = 'Y' THEN
7608: pa_debug.write('INSERT_PLAN_LINES_TMP_BULK: ' || l_module_name,pa_debug.g_err_stage,2);
7609: END IF;
7610:
7611: pa_debug.reset_err_stack; -- bug 2815593
7612: EXCEPTION
7613: WHEN OTHERS THEN
7614: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7615: x_msg_count := 1;

Line 7619: ,p_procedure_name => pa_debug.G_Err_Stack );

7615: x_msg_count := 1;
7616: x_msg_data := SQLERRM;
7617: FND_MSG_PUB.add_exc_msg
7618: ( p_pkg_name => 'PA_FP_COPY_FROM_PKG'
7619: ,p_procedure_name => pa_debug.G_Err_Stack );
7620: IF P_PA_DEBUG_MODE = 'Y' THEN
7621: pa_debug.write('INSERT_PLAN_LINES_TMP_BULK: ' || l_module_name,SQLERRM,4);
7622: pa_debug.write('INSERT_PLAN_LINES_TMP_BULK: ' || l_module_name,pa_debug.G_Err_Stack,4);
7623: END IF;

Line 7620: IF P_PA_DEBUG_MODE = 'Y' THEN

7616: x_msg_data := SQLERRM;
7617: FND_MSG_PUB.add_exc_msg
7618: ( p_pkg_name => 'PA_FP_COPY_FROM_PKG'
7619: ,p_procedure_name => pa_debug.G_Err_Stack );
7620: IF P_PA_DEBUG_MODE = 'Y' THEN
7621: pa_debug.write('INSERT_PLAN_LINES_TMP_BULK: ' || l_module_name,SQLERRM,4);
7622: pa_debug.write('INSERT_PLAN_LINES_TMP_BULK: ' || l_module_name,pa_debug.G_Err_Stack,4);
7623: END IF;
7624: pa_debug.reset_err_stack;

Line 7621: pa_debug.write('INSERT_PLAN_LINES_TMP_BULK: ' || l_module_name,SQLERRM,4);

7617: FND_MSG_PUB.add_exc_msg
7618: ( p_pkg_name => 'PA_FP_COPY_FROM_PKG'
7619: ,p_procedure_name => pa_debug.G_Err_Stack );
7620: IF P_PA_DEBUG_MODE = 'Y' THEN
7621: pa_debug.write('INSERT_PLAN_LINES_TMP_BULK: ' || l_module_name,SQLERRM,4);
7622: pa_debug.write('INSERT_PLAN_LINES_TMP_BULK: ' || l_module_name,pa_debug.G_Err_Stack,4);
7623: END IF;
7624: pa_debug.reset_err_stack;
7625:

Line 7622: pa_debug.write('INSERT_PLAN_LINES_TMP_BULK: ' || l_module_name,pa_debug.G_Err_Stack,4);

7618: ( p_pkg_name => 'PA_FP_COPY_FROM_PKG'
7619: ,p_procedure_name => pa_debug.G_Err_Stack );
7620: IF P_PA_DEBUG_MODE = 'Y' THEN
7621: pa_debug.write('INSERT_PLAN_LINES_TMP_BULK: ' || l_module_name,SQLERRM,4);
7622: pa_debug.write('INSERT_PLAN_LINES_TMP_BULK: ' || l_module_name,pa_debug.G_Err_Stack,4);
7623: END IF;
7624: pa_debug.reset_err_stack;
7625:
7626: raise FND_API.G_EXC_UNEXPECTED_ERROR ;

Line 7624: pa_debug.reset_err_stack;

7620: IF P_PA_DEBUG_MODE = 'Y' THEN
7621: pa_debug.write('INSERT_PLAN_LINES_TMP_BULK: ' || l_module_name,SQLERRM,4);
7622: pa_debug.write('INSERT_PLAN_LINES_TMP_BULK: ' || l_module_name,pa_debug.G_Err_Stack,4);
7623: END IF;
7624: pa_debug.reset_err_stack;
7625:
7626: raise FND_API.G_EXC_UNEXPECTED_ERROR ;
7627:
7628: END INSERT_PLAN_LINES_TMP_BULK ;

Line 7843: pa_debug.set_err_stack('PA_FIN_PLAN_PUB.Call_Maintain_Plan_Matrix');

7839: BEGIN
7840:
7841:
7842: -- Set the error stack.
7843: pa_debug.set_err_stack('PA_FIN_PLAN_PUB.Call_Maintain_Plan_Matrix');
7844:
7845: -- Get the Debug mode into local variable and set it to 'Y'if its NULL
7846: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
7847: l_debug_mode := NVL(l_debug_mode, 'Y');

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

7842: -- Set the error stack.
7843: pa_debug.set_err_stack('PA_FIN_PLAN_PUB.Call_Maintain_Plan_Matrix');
7844:
7845: -- Get the Debug mode into local variable and set it to 'Y'if its NULL
7846: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
7847: l_debug_mode := NVL(l_debug_mode, 'Y');
7848:
7849: -- Initialize the return status to success
7850: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 7852: IF P_PA_DEBUG_MODE = 'Y' THEN

7848:
7849: -- Initialize the return status to success
7850: x_return_status := FND_API.G_RET_STS_SUCCESS;
7851:
7852: IF P_PA_DEBUG_MODE = 'Y' THEN
7853: pa_debug.set_process('Call_Maintain_Plan_Matrix: ' || 'PLSQL','LOG',l_debug_mode);
7854: END IF;
7855:
7856: pa_debug.g_err_stage := 'Getting the project and profile id';

Line 7853: pa_debug.set_process('Call_Maintain_Plan_Matrix: ' || 'PLSQL','LOG',l_debug_mode);

7849: -- Initialize the return status to success
7850: x_return_status := FND_API.G_RET_STS_SUCCESS;
7851:
7852: IF P_PA_DEBUG_MODE = 'Y' THEN
7853: pa_debug.set_process('Call_Maintain_Plan_Matrix: ' || 'PLSQL','LOG',l_debug_mode);
7854: END IF;
7855:
7856: pa_debug.g_err_stage := 'Getting the project and profile id';
7857: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 7856: pa_debug.g_err_stage := 'Getting the project and profile id';

7852: IF P_PA_DEBUG_MODE = 'Y' THEN
7853: pa_debug.set_process('Call_Maintain_Plan_Matrix: ' || 'PLSQL','LOG',l_debug_mode);
7854: END IF;
7855:
7856: pa_debug.g_err_stage := 'Getting the project and profile id';
7857: IF P_PA_DEBUG_MODE = 'Y' THEN
7858: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
7859: END IF;
7860:

Line 7857: IF P_PA_DEBUG_MODE = 'Y' THEN

7853: pa_debug.set_process('Call_Maintain_Plan_Matrix: ' || 'PLSQL','LOG',l_debug_mode);
7854: END IF;
7855:
7856: pa_debug.g_err_stage := 'Getting the project and profile id';
7857: IF P_PA_DEBUG_MODE = 'Y' THEN
7858: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
7859: END IF;
7860:
7861: /* Get the value of the Project_ID and the Period Profile ID for the

Line 7858: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);

7854: END IF;
7855:
7856: pa_debug.g_err_stage := 'Getting the project and profile id';
7857: IF P_PA_DEBUG_MODE = 'Y' THEN
7858: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
7859: END IF;
7860:
7861: /* Get the value of the Project_ID and the Period Profile ID for the
7862: Budget Version. */

Line 7874: pa_debug.g_err_stage := 'Getting the fin plan preference code';

7870:
7871: /* Get the value of the Preference code of the Budget Version. Margin and
7872: Margin % have to be populated only if the Preference code is
7873: 'COST_AND_REV_SAME'. */
7874: pa_debug.g_err_stage := 'Getting the fin plan preference code';
7875: IF P_PA_DEBUG_MODE = 'Y' THEN
7876: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
7877: END IF;
7878:

Line 7875: IF P_PA_DEBUG_MODE = 'Y' THEN

7871: /* Get the value of the Preference code of the Budget Version. Margin and
7872: Margin % have to be populated only if the Preference code is
7873: 'COST_AND_REV_SAME'. */
7874: pa_debug.g_err_stage := 'Getting the fin plan preference code';
7875: IF P_PA_DEBUG_MODE = 'Y' THEN
7876: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
7877: END IF;
7878:
7879:

Line 7876: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);

7872: Margin % have to be populated only if the Preference code is
7873: 'COST_AND_REV_SAME'. */
7874: pa_debug.g_err_stage := 'Getting the fin plan preference code';
7875: IF P_PA_DEBUG_MODE = 'Y' THEN
7876: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
7877: END IF;
7878:
7879:
7880: SELECT fin_plan_preference_code, margin_derived_from_code

Line 7887: pa_debug.g_err_stage := 'opening budget_lines_cur';

7883: WHERE fin_plan_version_id = p_budget_version_id;
7884:
7885:
7886: IF (p_data_source = PA_FP_CONSTANTS_PKG.G_DATA_SOURCE_BUDGET_LINE) THEN
7887: pa_debug.g_err_stage := 'opening budget_lines_cur';
7888: IF P_PA_DEBUG_MODE = 'Y' THEN
7889: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
7890: END IF;
7891:

Line 7888: IF P_PA_DEBUG_MODE = 'Y' THEN

7884:
7885:
7886: IF (p_data_source = PA_FP_CONSTANTS_PKG.G_DATA_SOURCE_BUDGET_LINE) THEN
7887: pa_debug.g_err_stage := 'opening budget_lines_cur';
7888: IF P_PA_DEBUG_MODE = 'Y' THEN
7889: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
7890: END IF;
7891:
7892: OPEN budget_lines_cur;

Line 7889: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);

7885:
7886: IF (p_data_source = PA_FP_CONSTANTS_PKG.G_DATA_SOURCE_BUDGET_LINE) THEN
7887: pa_debug.g_err_stage := 'opening budget_lines_cur';
7888: IF P_PA_DEBUG_MODE = 'Y' THEN
7889: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
7890: END IF;
7891:
7892: OPEN budget_lines_cur;
7893: ELSIF (p_data_source = PA_FP_CONSTANTS_PKG.G_DATA_SOURCE_ROLLUP_TMP) THEN

Line 7894: pa_debug.g_err_stage := 'opening rollup_tmp_cur';

7890: END IF;
7891:
7892: OPEN budget_lines_cur;
7893: ELSIF (p_data_source = PA_FP_CONSTANTS_PKG.G_DATA_SOURCE_ROLLUP_TMP) THEN
7894: pa_debug.g_err_stage := 'opening rollup_tmp_cur';
7895: IF P_PA_DEBUG_MODE = 'Y' THEN
7896: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
7897: END IF;
7898:

Line 7895: IF P_PA_DEBUG_MODE = 'Y' THEN

7891:
7892: OPEN budget_lines_cur;
7893: ELSIF (p_data_source = PA_FP_CONSTANTS_PKG.G_DATA_SOURCE_ROLLUP_TMP) THEN
7894: pa_debug.g_err_stage := 'opening rollup_tmp_cur';
7895: IF P_PA_DEBUG_MODE = 'Y' THEN
7896: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
7897: END IF;
7898:
7899: OPEN rollup_tmp_cur;

Line 7896: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);

7892: OPEN budget_lines_cur;
7893: ELSIF (p_data_source = PA_FP_CONSTANTS_PKG.G_DATA_SOURCE_ROLLUP_TMP) THEN
7894: pa_debug.g_err_stage := 'opening rollup_tmp_cur';
7895: IF P_PA_DEBUG_MODE = 'Y' THEN
7896: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
7897: END IF;
7898:
7899: OPEN rollup_tmp_cur;
7900: END IF;

Line 7906: pa_debug.g_err_stage := 'fetching from budget_lines_cur';

7902: delete from PA_FIN_PLAN_LINES_TMP;
7903: LOOP
7904: IF (p_data_source = PA_FP_CONSTANTS_PKG.G_DATA_SOURCE_BUDGET_LINE) THEN
7905:
7906: pa_debug.g_err_stage := 'fetching from budget_lines_cur';
7907: IF P_PA_DEBUG_MODE = 'Y' THEN
7908: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
7909: END IF;
7910:

Line 7907: IF P_PA_DEBUG_MODE = 'Y' THEN

7903: LOOP
7904: IF (p_data_source = PA_FP_CONSTANTS_PKG.G_DATA_SOURCE_BUDGET_LINE) THEN
7905:
7906: pa_debug.g_err_stage := 'fetching from budget_lines_cur';
7907: IF P_PA_DEBUG_MODE = 'Y' THEN
7908: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
7909: END IF;
7910:
7911: FETCH budget_lines_cur

Line 7908: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);

7904: IF (p_data_source = PA_FP_CONSTANTS_PKG.G_DATA_SOURCE_BUDGET_LINE) THEN
7905:
7906: pa_debug.g_err_stage := 'fetching from budget_lines_cur';
7907: IF P_PA_DEBUG_MODE = 'Y' THEN
7908: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
7909: END IF;
7910:
7911: FETCH budget_lines_cur
7912: BULK COLLECT INTO

Line 7959: pa_debug.g_err_stage := 'fetching from rollup_tmp_cur';

7955: LIMIT l_plsql_max_array_size;
7956:
7957: ELSIF (p_data_source = PA_FP_CONSTANTS_PKG.G_DATA_SOURCE_ROLLUP_TMP) THEN
7958:
7959: pa_debug.g_err_stage := 'fetching from rollup_tmp_cur';
7960: IF P_PA_DEBUG_MODE = 'Y' THEN
7961: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
7962: END IF;
7963:

Line 7960: IF P_PA_DEBUG_MODE = 'Y' THEN

7956:
7957: ELSIF (p_data_source = PA_FP_CONSTANTS_PKG.G_DATA_SOURCE_ROLLUP_TMP) THEN
7958:
7959: pa_debug.g_err_stage := 'fetching from rollup_tmp_cur';
7960: IF P_PA_DEBUG_MODE = 'Y' THEN
7961: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
7962: END IF;
7963:
7964: FETCH rollup_tmp_cur

Line 7961: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);

7957: ELSIF (p_data_source = PA_FP_CONSTANTS_PKG.G_DATA_SOURCE_ROLLUP_TMP) THEN
7958:
7959: pa_debug.g_err_stage := 'fetching from rollup_tmp_cur';
7960: IF P_PA_DEBUG_MODE = 'Y' THEN
7961: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
7962: END IF;
7963:
7964: FETCH rollup_tmp_cur
7965: BULK COLLECT INTO

Line 8011: pa_debug.g_err_stage := 'Data Source is Budget Lines';

8007: ,l_delete_flag_tbl
8008: LIMIT l_plsql_max_array_size;
8009: END IF;
8010:
8011: pa_debug.g_err_stage := 'Data Source is Budget Lines';
8012: IF P_PA_DEBUG_MODE = 'Y' THEN
8013: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
8014: END IF;
8015:

Line 8012: IF P_PA_DEBUG_MODE = 'Y' THEN

8008: LIMIT l_plsql_max_array_size;
8009: END IF;
8010:
8011: pa_debug.g_err_stage := 'Data Source is Budget Lines';
8012: IF P_PA_DEBUG_MODE = 'Y' THEN
8013: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
8014: END IF;
8015:
8016: /* Insert the Transaction, Project and Project Functional currency

Line 8013: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);

8009: END IF;
8010:
8011: pa_debug.g_err_stage := 'Data Source is Budget Lines';
8012: IF P_PA_DEBUG_MODE = 'Y' THEN
8013: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
8014: END IF;
8015:
8016: /* Insert the Transaction, Project and Project Functional currency
8017: columns as rows into the Lines Temp table one after the other selecting

Line 8023: pa_debug.g_err_stage := 'Inserting Transaction Currency Records';

8019:
8020: /* Inserting the Transaction Currency records into the Lines Temp table with
8021: the Amount Type code as 'TRANSACTION'. */
8022:
8023: pa_debug.g_err_stage := 'Inserting Transaction Currency Records';
8024: IF P_PA_DEBUG_MODE = 'Y' THEN
8025: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
8026: END IF;
8027:

Line 8024: IF P_PA_DEBUG_MODE = 'Y' THEN

8020: /* Inserting the Transaction Currency records into the Lines Temp table with
8021: the Amount Type code as 'TRANSACTION'. */
8022:
8023: pa_debug.g_err_stage := 'Inserting Transaction Currency Records';
8024: IF P_PA_DEBUG_MODE = 'Y' THEN
8025: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
8026: END IF;
8027:
8028: IF NVL(l_start_date_tbl.last,0) >= 1 THEN

Line 8025: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);

8021: the Amount Type code as 'TRANSACTION'. */
8022:
8023: pa_debug.g_err_stage := 'Inserting Transaction Currency Records';
8024: IF P_PA_DEBUG_MODE = 'Y' THEN
8025: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
8026: END IF;
8027:
8028: IF NVL(l_start_date_tbl.last,0) >= 1 THEN
8029: /* insert txn amounts */

Line 8030: pa_debug.g_err_stage := 'calling insert_plan_lines_tmp_bulk for txn curr';

8026: END IF;
8027:
8028: IF NVL(l_start_date_tbl.last,0) >= 1 THEN
8029: /* insert txn amounts */
8030: pa_debug.g_err_stage := 'calling insert_plan_lines_tmp_bulk for txn curr';
8031: IF P_PA_DEBUG_MODE = 'Y' THEN
8032: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
8033: END IF;
8034:

Line 8031: IF P_PA_DEBUG_MODE = 'Y' THEN

8027:
8028: IF NVL(l_start_date_tbl.last,0) >= 1 THEN
8029: /* insert txn amounts */
8030: pa_debug.g_err_stage := 'calling insert_plan_lines_tmp_bulk for txn curr';
8031: IF P_PA_DEBUG_MODE = 'Y' THEN
8032: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
8033: END IF;
8034:
8035: insert_plan_lines_tmp_bulk(

Line 8032: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);

8028: IF NVL(l_start_date_tbl.last,0) >= 1 THEN
8029: /* insert txn amounts */
8030: pa_debug.g_err_stage := 'calling insert_plan_lines_tmp_bulk for txn curr';
8031: IF P_PA_DEBUG_MODE = 'Y' THEN
8032: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
8033: END IF;
8034:
8035: insert_plan_lines_tmp_bulk(
8036: p_res_assignment_tbl => l_res_assignment_tbl

Line 8063: pa_debug.g_err_stage := 'calling insert_plan_lines_tmp_bulk for proj curr';

8059: ,x_msg_count => l_msg_count
8060: ,x_msg_data => l_msg_data );
8061:
8062: /* insert project amounts */
8063: pa_debug.g_err_stage := 'calling insert_plan_lines_tmp_bulk for proj curr';
8064: IF P_PA_DEBUG_MODE = 'Y' THEN
8065: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
8066: END IF;
8067:

Line 8064: IF P_PA_DEBUG_MODE = 'Y' THEN

8060: ,x_msg_data => l_msg_data );
8061:
8062: /* insert project amounts */
8063: pa_debug.g_err_stage := 'calling insert_plan_lines_tmp_bulk for proj curr';
8064: IF P_PA_DEBUG_MODE = 'Y' THEN
8065: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
8066: END IF;
8067:
8068: insert_plan_lines_tmp_bulk(

Line 8065: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);

8061:
8062: /* insert project amounts */
8063: pa_debug.g_err_stage := 'calling insert_plan_lines_tmp_bulk for proj curr';
8064: IF P_PA_DEBUG_MODE = 'Y' THEN
8065: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
8066: END IF;
8067:
8068: insert_plan_lines_tmp_bulk(
8069: p_res_assignment_tbl => l_res_assignment_tbl

Line 8096: pa_debug.g_err_stage := 'calling insert_plan_lines_tmp_bulk for projfunc curr';

8092: ,x_msg_count => l_msg_count
8093: ,x_msg_data => l_msg_data );
8094:
8095: /* insert project functional amounts */
8096: pa_debug.g_err_stage := 'calling insert_plan_lines_tmp_bulk for projfunc curr';
8097: IF P_PA_DEBUG_MODE = 'Y' THEN
8098: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
8099: END IF;
8100:

Line 8097: IF P_PA_DEBUG_MODE = 'Y' THEN

8093: ,x_msg_data => l_msg_data );
8094:
8095: /* insert project functional amounts */
8096: pa_debug.g_err_stage := 'calling insert_plan_lines_tmp_bulk for projfunc curr';
8097: IF P_PA_DEBUG_MODE = 'Y' THEN
8098: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
8099: END IF;
8100:
8101:

Line 8098: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);

8094:
8095: /* insert project functional amounts */
8096: pa_debug.g_err_stage := 'calling insert_plan_lines_tmp_bulk for projfunc curr';
8097: IF P_PA_DEBUG_MODE = 'Y' THEN
8098: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
8099: END IF;
8100:
8101:
8102: insert_plan_lines_tmp_bulk(

Line 8136: pa_debug.g_err_stage := 'closing budget_lines_cur';

8132:
8133: END LOOP; -- loop for bulk insert
8134:
8135: IF (p_data_source = PA_FP_CONSTANTS_PKG.G_DATA_SOURCE_BUDGET_LINE) THEN
8136: pa_debug.g_err_stage := 'closing budget_lines_cur';
8137: IF P_PA_DEBUG_MODE = 'Y' THEN
8138: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
8139: END IF;
8140:

Line 8137: IF P_PA_DEBUG_MODE = 'Y' THEN

8133: END LOOP; -- loop for bulk insert
8134:
8135: IF (p_data_source = PA_FP_CONSTANTS_PKG.G_DATA_SOURCE_BUDGET_LINE) THEN
8136: pa_debug.g_err_stage := 'closing budget_lines_cur';
8137: IF P_PA_DEBUG_MODE = 'Y' THEN
8138: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
8139: END IF;
8140:
8141: CLOSE budget_lines_cur;

Line 8138: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);

8134:
8135: IF (p_data_source = PA_FP_CONSTANTS_PKG.G_DATA_SOURCE_BUDGET_LINE) THEN
8136: pa_debug.g_err_stage := 'closing budget_lines_cur';
8137: IF P_PA_DEBUG_MODE = 'Y' THEN
8138: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
8139: END IF;
8140:
8141: CLOSE budget_lines_cur;
8142: ELSIF (p_data_source = PA_FP_CONSTANTS_PKG.G_DATA_SOURCE_ROLLUP_TMP) THEN

Line 8143: pa_debug.g_err_stage := 'closing rollup_tmp_cur';

8139: END IF;
8140:
8141: CLOSE budget_lines_cur;
8142: ELSIF (p_data_source = PA_FP_CONSTANTS_PKG.G_DATA_SOURCE_ROLLUP_TMP) THEN
8143: pa_debug.g_err_stage := 'closing rollup_tmp_cur';
8144: IF P_PA_DEBUG_MODE = 'Y' THEN
8145: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
8146: END IF;
8147:

Line 8144: IF P_PA_DEBUG_MODE = 'Y' THEN

8140:
8141: CLOSE budget_lines_cur;
8142: ELSIF (p_data_source = PA_FP_CONSTANTS_PKG.G_DATA_SOURCE_ROLLUP_TMP) THEN
8143: pa_debug.g_err_stage := 'closing rollup_tmp_cur';
8144: IF P_PA_DEBUG_MODE = 'Y' THEN
8145: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
8146: END IF;
8147:
8148: CLOSE rollup_tmp_cur;

Line 8145: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);

8141: CLOSE budget_lines_cur;
8142: ELSIF (p_data_source = PA_FP_CONSTANTS_PKG.G_DATA_SOURCE_ROLLUP_TMP) THEN
8143: pa_debug.g_err_stage := 'closing rollup_tmp_cur';
8144: IF P_PA_DEBUG_MODE = 'Y' THEN
8145: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
8146: END IF;
8147:
8148: CLOSE rollup_tmp_cur;
8149: END IF;

Line 8168: pa_debug.g_err_stage := 'Populating the Amount Types and Amount Sub Types';

8164: /* First populate the amt_rec PL/SQL table with the Amount Type and the
8165: Amount Sub Type codes based on the Budget Version Type
8166: to pass to the Maintain Plan Matrix procedure. */
8167:
8168: pa_debug.g_err_stage := 'Populating the Amount Types and Amount Sub Types';
8169: IF P_PA_DEBUG_MODE = 'Y' THEN
8170: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
8171: END IF;
8172:

Line 8169: IF P_PA_DEBUG_MODE = 'Y' THEN

8165: Amount Sub Type codes based on the Budget Version Type
8166: to pass to the Maintain Plan Matrix procedure. */
8167:
8168: pa_debug.g_err_stage := 'Populating the Amount Types and Amount Sub Types';
8169: IF P_PA_DEBUG_MODE = 'Y' THEN
8170: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
8171: END IF;
8172:
8173: SELECT version_type

Line 8170: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);

8166: to pass to the Maintain Plan Matrix procedure. */
8167:
8168: pa_debug.g_err_stage := 'Populating the Amount Types and Amount Sub Types';
8169: IF P_PA_DEBUG_MODE = 'Y' THEN
8170: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
8171: END IF;
8172:
8173: SELECT version_type
8174: INTO l_budget_version_type

Line 8230: pa_debug.g_err_stage := 'Calling the Maintain Plan Matrix procedure';

8226:
8227: /* Calling the Maintain_Plan_Matrix API to recalculate profile period amounts as well
8228: as preceding and succeeding period amounts in the Denorm Table. */
8229:
8230: pa_debug.g_err_stage := 'Calling the Maintain Plan Matrix procedure';
8231: IF P_PA_DEBUG_MODE = 'Y' THEN
8232: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
8233: END IF;
8234:

Line 8231: IF P_PA_DEBUG_MODE = 'Y' THEN

8227: /* Calling the Maintain_Plan_Matrix API to recalculate profile period amounts as well
8228: as preceding and succeeding period amounts in the Denorm Table. */
8229:
8230: pa_debug.g_err_stage := 'Calling the Maintain Plan Matrix procedure';
8231: IF P_PA_DEBUG_MODE = 'Y' THEN
8232: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
8233: END IF;
8234:
8235: PA_PLAN_MATRIX.Maintain_Plan_Matrix(

Line 8232: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);

8228: as preceding and succeeding period amounts in the Denorm Table. */
8229:
8230: pa_debug.g_err_stage := 'Calling the Maintain Plan Matrix procedure';
8231: IF P_PA_DEBUG_MODE = 'Y' THEN
8232: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,3);
8233: END IF;
8234:
8235: PA_PLAN_MATRIX.Maintain_Plan_Matrix(
8236: p_amount_type_tab => amt_rec,

Line 8253: pa_debug.reset_err_stack;

8249: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8250: Raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
8251: END IF;
8252:
8253: pa_debug.reset_err_stack;
8254: EXCEPTION
8255: WHEN OTHERS THEN
8256: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8257: x_msg_count := 1;

Line 8262: pa_debug.g_err_stage:='Unexpected Error';

8258: x_msg_data := SQLERRM;
8259: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PUB',
8260: p_procedure_name => 'Call_Maintain_Plan_Matrix');
8261:
8262: pa_debug.g_err_stage:='Unexpected Error';
8263: IF P_PA_DEBUG_MODE = 'Y' THEN
8264: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,5);
8265: END IF;
8266: pa_debug.reset_err_stack;

Line 8263: IF P_PA_DEBUG_MODE = 'Y' THEN

8259: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PUB',
8260: p_procedure_name => 'Call_Maintain_Plan_Matrix');
8261:
8262: pa_debug.g_err_stage:='Unexpected Error';
8263: IF P_PA_DEBUG_MODE = 'Y' THEN
8264: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,5);
8265: END IF;
8266: pa_debug.reset_err_stack;
8267: raise FND_API.G_EXC_UNEXPECTED_ERROR;

Line 8264: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,5);

8260: p_procedure_name => 'Call_Maintain_Plan_Matrix');
8261:
8262: pa_debug.g_err_stage:='Unexpected Error';
8263: IF P_PA_DEBUG_MODE = 'Y' THEN
8264: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,5);
8265: END IF;
8266: pa_debug.reset_err_stack;
8267: raise FND_API.G_EXC_UNEXPECTED_ERROR;
8268:

Line 8266: pa_debug.reset_err_stack;

8262: pa_debug.g_err_stage:='Unexpected Error';
8263: IF P_PA_DEBUG_MODE = 'Y' THEN
8264: pa_debug.write('Call_Maintain_Plan_Matrix: ' || l_module_name,pa_debug.g_err_stage,5);
8265: END IF;
8266: pa_debug.reset_err_stack;
8267: raise FND_API.G_EXC_UNEXPECTED_ERROR;
8268:
8269: END Call_Maintain_Plan_Matrix;
8270:

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

8303:
8304: x_msg_count := 0;
8305: x_return_status := FND_API.G_RET_STS_SUCCESS;
8306:
8307: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
8308: l_debug_mode := NVL(l_debug_mode, 'Y');
8309:
8310: -- Set curr function
8311: pa_debug.set_curr_function(

Line 8311: pa_debug.set_curr_function(

8307: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
8308: l_debug_mode := NVL(l_debug_mode, 'Y');
8309:
8310: -- Set curr function
8311: pa_debug.set_curr_function(
8312: p_function =>'PA_FIN_PLAN_PUB.Refresh_res_list_assignment'
8313: ,p_debug_mode => l_debug_mode );
8314:
8315:

Line 8319: pa_debug.g_err_stage:='Validating input parameters';

8315:
8316: -- Check for business rule violations
8317:
8318: IF l_debug_mode = 'Y' THEN
8319: pa_debug.g_err_stage:='Validating input parameters';
8320: pa_debug.write('Refresh_res_list_assignment: ' || l_module_name,pa_debug.g_err_stage,3);
8321: END IF;
8322:
8323: IF (p_project_id IS NULL) OR

Line 8320: pa_debug.write('Refresh_res_list_assignment: ' || l_module_name,pa_debug.g_err_stage,3);

8316: -- Check for business rule violations
8317:
8318: IF l_debug_mode = 'Y' THEN
8319: pa_debug.g_err_stage:='Validating input parameters';
8320: pa_debug.write('Refresh_res_list_assignment: ' || l_module_name,pa_debug.g_err_stage,3);
8321: END IF;
8322:
8323: IF (p_project_id IS NULL) OR
8324: (p_resource_list_id IS NULL)

Line 8328: pa_debug.g_err_stage:='p_project_id = '|| p_project_id;

8324: (p_resource_list_id IS NULL)
8325: THEN
8326:
8327: IF l_debug_mode = 'Y' THEN
8328: pa_debug.g_err_stage:='p_project_id = '|| p_project_id;
8329: pa_debug.write('Refresh_res_list_assignment: ' || l_module_name,pa_debug.g_err_stage,5);
8330:
8331: pa_debug.g_err_stage:='p_resource_list_id = '|| p_resource_list_id;
8332: pa_debug.write('Refresh_res_list_assignment: ' || l_module_name,pa_debug.g_err_stage,5);

Line 8329: pa_debug.write('Refresh_res_list_assignment: ' || l_module_name,pa_debug.g_err_stage,5);

8325: THEN
8326:
8327: IF l_debug_mode = 'Y' THEN
8328: pa_debug.g_err_stage:='p_project_id = '|| p_project_id;
8329: pa_debug.write('Refresh_res_list_assignment: ' || l_module_name,pa_debug.g_err_stage,5);
8330:
8331: pa_debug.g_err_stage:='p_resource_list_id = '|| p_resource_list_id;
8332: pa_debug.write('Refresh_res_list_assignment: ' || l_module_name,pa_debug.g_err_stage,5);
8333: END IF;

Line 8331: pa_debug.g_err_stage:='p_resource_list_id = '|| p_resource_list_id;

8327: IF l_debug_mode = 'Y' THEN
8328: pa_debug.g_err_stage:='p_project_id = '|| p_project_id;
8329: pa_debug.write('Refresh_res_list_assignment: ' || l_module_name,pa_debug.g_err_stage,5);
8330:
8331: pa_debug.g_err_stage:='p_resource_list_id = '|| p_resource_list_id;
8332: pa_debug.write('Refresh_res_list_assignment: ' || l_module_name,pa_debug.g_err_stage,5);
8333: END IF;
8334:
8335: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 8332: pa_debug.write('Refresh_res_list_assignment: ' || l_module_name,pa_debug.g_err_stage,5);

8328: pa_debug.g_err_stage:='p_project_id = '|| p_project_id;
8329: pa_debug.write('Refresh_res_list_assignment: ' || l_module_name,pa_debug.g_err_stage,5);
8330:
8331: pa_debug.g_err_stage:='p_resource_list_id = '|| p_resource_list_id;
8332: pa_debug.write('Refresh_res_list_assignment: ' || l_module_name,pa_debug.g_err_stage,5);
8333: END IF;
8334:
8335: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
8336: p_msg_name => 'PA_FP_INV_PARAM_PASSED');

Line 8397: pa_debug.g_err_stage:='Exiting Refresh_res_list_assignment';

8393: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
8394: END IF;
8395:
8396: IF l_debug_mode = 'Y' THEN
8397: pa_debug.g_err_stage:='Exiting Refresh_res_list_assignment';
8398: pa_debug.write('Refresh_res_list_assignment: ' || l_module_name,pa_debug.g_err_stage,3);
8399:
8400: -- reset curr function
8401: pa_debug.reset_curr_function;

Line 8398: pa_debug.write('Refresh_res_list_assignment: ' || l_module_name,pa_debug.g_err_stage,3);

8394: END IF;
8395:
8396: IF l_debug_mode = 'Y' THEN
8397: pa_debug.g_err_stage:='Exiting Refresh_res_list_assignment';
8398: pa_debug.write('Refresh_res_list_assignment: ' || l_module_name,pa_debug.g_err_stage,3);
8399:
8400: -- reset curr function
8401: pa_debug.reset_curr_function;
8402: END IF;

Line 8401: pa_debug.reset_curr_function;

8397: pa_debug.g_err_stage:='Exiting Refresh_res_list_assignment';
8398: pa_debug.write('Refresh_res_list_assignment: ' || l_module_name,pa_debug.g_err_stage,3);
8399:
8400: -- reset curr function
8401: pa_debug.reset_curr_function;
8402: END IF;
8403:
8404: EXCEPTION
8405:

Line 8426: pa_debug.g_err_stage:='Invalid Arguments Passed Or called api raised an error';

8422:
8423: x_return_status := FND_API.G_RET_STS_ERROR;
8424:
8425: IF l_debug_mode = 'Y' THEN
8426: pa_debug.g_err_stage:='Invalid Arguments Passed Or called api raised an error';
8427: pa_debug.write('Refresh_res_list_assignment: ' || l_module_name,pa_debug.g_err_stage,5);
8428:
8429: -- reset curr function
8430: pa_debug.reset_curr_function;

Line 8427: pa_debug.write('Refresh_res_list_assignment: ' || l_module_name,pa_debug.g_err_stage,5);

8423: x_return_status := FND_API.G_RET_STS_ERROR;
8424:
8425: IF l_debug_mode = 'Y' THEN
8426: pa_debug.g_err_stage:='Invalid Arguments Passed Or called api raised an error';
8427: pa_debug.write('Refresh_res_list_assignment: ' || l_module_name,pa_debug.g_err_stage,5);
8428:
8429: -- reset curr function
8430: pa_debug.reset_curr_function;
8431: END IF;

Line 8430: pa_debug.reset_curr_function;

8426: pa_debug.g_err_stage:='Invalid Arguments Passed Or called api raised an error';
8427: pa_debug.write('Refresh_res_list_assignment: ' || l_module_name,pa_debug.g_err_stage,5);
8428:
8429: -- reset curr function
8430: pa_debug.reset_curr_function;
8431: END IF;
8432: RETURN;
8433: WHEN Others THEN
8434: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 8442: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;

8438: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PUB'
8439: ,p_procedure_name => 'Refresh_res_list_assignment');
8440:
8441: IF l_debug_mode = 'Y' THEN
8442: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
8443: pa_debug.write('Refresh_res_list_assignment: ' || l_module_name,pa_debug.g_err_stage,5);
8444:
8445: -- reset curr function
8446: pa_debug.reset_curr_function;

Line 8443: pa_debug.write('Refresh_res_list_assignment: ' || l_module_name,pa_debug.g_err_stage,5);

8439: ,p_procedure_name => 'Refresh_res_list_assignment');
8440:
8441: IF l_debug_mode = 'Y' THEN
8442: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
8443: pa_debug.write('Refresh_res_list_assignment: ' || l_module_name,pa_debug.g_err_stage,5);
8444:
8445: -- reset curr function
8446: pa_debug.reset_curr_function;
8447: END IF;

Line 8446: pa_debug.reset_curr_function;

8442: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
8443: pa_debug.write('Refresh_res_list_assignment: ' || l_module_name,pa_debug.g_err_stage,5);
8444:
8445: -- reset curr function
8446: pa_debug.reset_curr_function;
8447: END IF;
8448: RAISE;
8449: END Refresh_res_list_assignment;
8450:

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

8505: x_msg_count := 0;
8506: x_msg_data := NULL;
8507: x_return_status := FND_API.G_RET_STS_SUCCESS;
8508:
8509: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
8510: l_debug_mode := NVL(l_debug_mode, 'Y');
8511:
8512: IF p_pa_debug_mode = 'Y' THEN
8513: pa_debug.set_err_stack('PA_FIN_PLAN_PUB.create_default_plan_txn_rec');

Line 8512: IF p_pa_debug_mode = 'Y' THEN

8508:
8509: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
8510: l_debug_mode := NVL(l_debug_mode, 'Y');
8511:
8512: IF p_pa_debug_mode = 'Y' THEN
8513: pa_debug.set_err_stack('PA_FIN_PLAN_PUB.create_default_plan_txn_rec');
8514: pa_debug.set_process('PLSQL','LOG',l_debug_mode);
8515:
8516: pa_debug.g_err_stage := 'Entered create_default_plan_txn_rec';

Line 8513: pa_debug.set_err_stack('PA_FIN_PLAN_PUB.create_default_plan_txn_rec');

8509: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
8510: l_debug_mode := NVL(l_debug_mode, 'Y');
8511:
8512: IF p_pa_debug_mode = 'Y' THEN
8513: pa_debug.set_err_stack('PA_FIN_PLAN_PUB.create_default_plan_txn_rec');
8514: pa_debug.set_process('PLSQL','LOG',l_debug_mode);
8515:
8516: pa_debug.g_err_stage := 'Entered create_default_plan_txn_rec';
8517: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);

Line 8514: pa_debug.set_process('PLSQL','LOG',l_debug_mode);

8510: l_debug_mode := NVL(l_debug_mode, 'Y');
8511:
8512: IF p_pa_debug_mode = 'Y' THEN
8513: pa_debug.set_err_stack('PA_FIN_PLAN_PUB.create_default_plan_txn_rec');
8514: pa_debug.set_process('PLSQL','LOG',l_debug_mode);
8515:
8516: pa_debug.g_err_stage := 'Entered create_default_plan_txn_rec';
8517: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8518:

Line 8516: pa_debug.g_err_stage := 'Entered create_default_plan_txn_rec';

8512: IF p_pa_debug_mode = 'Y' THEN
8513: pa_debug.set_err_stack('PA_FIN_PLAN_PUB.create_default_plan_txn_rec');
8514: pa_debug.set_process('PLSQL','LOG',l_debug_mode);
8515:
8516: pa_debug.g_err_stage := 'Entered create_default_plan_txn_rec';
8517: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8518:
8519: -- Check for not null parameters
8520:

Line 8517: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);

8513: pa_debug.set_err_stack('PA_FIN_PLAN_PUB.create_default_plan_txn_rec');
8514: pa_debug.set_process('PLSQL','LOG',l_debug_mode);
8515:
8516: pa_debug.g_err_stage := 'Entered create_default_plan_txn_rec';
8517: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8518:
8519: -- Check for not null parameters
8520:
8521: pa_debug.g_err_stage := 'Checking for valid parameters:';

Line 8521: pa_debug.g_err_stage := 'Checking for valid parameters:';

8517: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8518:
8519: -- Check for not null parameters
8520:
8521: pa_debug.g_err_stage := 'Checking for valid parameters:';
8522: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8523: END IF;
8524:
8525: IF p_budget_version_id IS NULL OR

Line 8522: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);

8518:
8519: -- Check for not null parameters
8520:
8521: pa_debug.g_err_stage := 'Checking for valid parameters:';
8522: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8523: END IF;
8524:
8525: IF p_budget_version_id IS NULL OR
8526: p_calling_module IS NULL THEN

Line 8527: IF p_pa_debug_mode = 'Y' THEN

8523: END IF;
8524:
8525: IF p_budget_version_id IS NULL OR
8526: p_calling_module IS NULL THEN
8527: IF p_pa_debug_mode = 'Y' THEN
8528: pa_debug.g_err_stage := 'p_budget_version_id = '||p_budget_version_id;
8529: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
8530: pa_debug.g_err_stage := 'p_calling_module = '||p_calling_module;
8531: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

Line 8528: pa_debug.g_err_stage := 'p_budget_version_id = '||p_budget_version_id;

8524:
8525: IF p_budget_version_id IS NULL OR
8526: p_calling_module IS NULL THEN
8527: IF p_pa_debug_mode = 'Y' THEN
8528: pa_debug.g_err_stage := 'p_budget_version_id = '||p_budget_version_id;
8529: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
8530: pa_debug.g_err_stage := 'p_calling_module = '||p_calling_module;
8531: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
8532: END IF;

Line 8529: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

8525: IF p_budget_version_id IS NULL OR
8526: p_calling_module IS NULL THEN
8527: IF p_pa_debug_mode = 'Y' THEN
8528: pa_debug.g_err_stage := 'p_budget_version_id = '||p_budget_version_id;
8529: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
8530: pa_debug.g_err_stage := 'p_calling_module = '||p_calling_module;
8531: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
8532: END IF;
8533:

Line 8530: pa_debug.g_err_stage := 'p_calling_module = '||p_calling_module;

8526: p_calling_module IS NULL THEN
8527: IF p_pa_debug_mode = 'Y' THEN
8528: pa_debug.g_err_stage := 'p_budget_version_id = '||p_budget_version_id;
8529: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
8530: pa_debug.g_err_stage := 'p_calling_module = '||p_calling_module;
8531: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
8532: END IF;
8533:
8534: PA_UTILS.ADD_MESSAGE(p_app_short_name=> 'PA',

Line 8531: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

8527: IF p_pa_debug_mode = 'Y' THEN
8528: pa_debug.g_err_stage := 'p_budget_version_id = '||p_budget_version_id;
8529: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
8530: pa_debug.g_err_stage := 'p_calling_module = '||p_calling_module;
8531: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
8532: END IF;
8533:
8534: PA_UTILS.ADD_MESSAGE(p_app_short_name=> 'PA',
8535: p_msg_name => 'PA_FP_INV_PARAM_PASSED');

Line 8540: IF p_pa_debug_mode = 'Y' THEN

8536:
8537: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
8538:
8539: END IF;
8540: IF p_pa_debug_mode = 'Y' THEN
8541: pa_debug.g_err_stage := 'Parameter validation complete';
8542: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8543: END IF;
8544:

Line 8541: pa_debug.g_err_stage := 'Parameter validation complete';

8537: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
8538:
8539: END IF;
8540: IF p_pa_debug_mode = 'Y' THEN
8541: pa_debug.g_err_stage := 'Parameter validation complete';
8542: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8543: END IF;
8544:
8545: if (p_calling_module = 'UPDATE_PLAN_TRANSACTION') then /* janani */

Line 8542: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);

8538:
8539: END IF;
8540: IF p_pa_debug_mode = 'Y' THEN
8541: pa_debug.g_err_stage := 'Parameter validation complete';
8542: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8543: END IF;
8544:
8545: if (p_calling_module = 'UPDATE_PLAN_TRANSACTION') then /* janani */
8546: l_def_plan_txn_ra_id_tbl := p_ra_id_tbl;

Line 8559: IF p_pa_debug_mode = 'Y' THEN

8555: l_curr_code_temp_tbl.extend(l_def_plan_txn_ra_id_tbl.COUNT); /* janani */
8556:
8557:
8558: IF l_def_plan_txn_ra_id_tbl.COUNT = 0 THEN
8559: IF p_pa_debug_mode = 'Y' THEN
8560: pa_debug.g_err_stage := 'No resource assignment to default, returning';
8561: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8562: pa_debug.reset_err_stack;
8563: END IF;

Line 8560: pa_debug.g_err_stage := 'No resource assignment to default, returning';

8556:
8557:
8558: IF l_def_plan_txn_ra_id_tbl.COUNT = 0 THEN
8559: IF p_pa_debug_mode = 'Y' THEN
8560: pa_debug.g_err_stage := 'No resource assignment to default, returning';
8561: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8562: pa_debug.reset_err_stack;
8563: END IF;
8564: RETURN;

Line 8561: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);

8557:
8558: IF l_def_plan_txn_ra_id_tbl.COUNT = 0 THEN
8559: IF p_pa_debug_mode = 'Y' THEN
8560: pa_debug.g_err_stage := 'No resource assignment to default, returning';
8561: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8562: pa_debug.reset_err_stack;
8563: END IF;
8564: RETURN;
8565: END IF;

Line 8562: pa_debug.reset_err_stack;

8558: IF l_def_plan_txn_ra_id_tbl.COUNT = 0 THEN
8559: IF p_pa_debug_mode = 'Y' THEN
8560: pa_debug.g_err_stage := 'No resource assignment to default, returning';
8561: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8562: pa_debug.reset_err_stack;
8563: END IF;
8564: RETURN;
8565: END IF;
8566:

Line 8568: IF p_pa_debug_mode = 'Y' THEN

8564: RETURN;
8565: END IF;
8566:
8567: IF l_def_plan_txn_ra_id_tbl.COUNT > 0 THEN
8568: IF p_pa_debug_mode = 'Y' THEN
8569: pa_debug.g_err_stage := 'Getting currency information';
8570: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8571: END IF;
8572:

Line 8569: pa_debug.g_err_stage := 'Getting currency information';

8565: END IF;
8566:
8567: IF l_def_plan_txn_ra_id_tbl.COUNT > 0 THEN
8568: IF p_pa_debug_mode = 'Y' THEN
8569: pa_debug.g_err_stage := 'Getting currency information';
8570: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8571: END IF;
8572:
8573: BEGIN

Line 8570: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);

8566:
8567: IF l_def_plan_txn_ra_id_tbl.COUNT > 0 THEN
8568: IF p_pa_debug_mode = 'Y' THEN
8569: pa_debug.g_err_stage := 'Getting currency information';
8570: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8571: END IF;
8572:
8573: BEGIN
8574: SELECT pbv.ci_id,

Line 8590: IF p_pa_debug_mode = 'Y' THEN

8586: WHERE pbv.budget_version_id = p_budget_version_id
8587: AND ppa.project_id = pbv.project_id;
8588: EXCEPTION
8589: WHEN NO_DATA_FOUND THEN
8590: IF p_pa_debug_mode = 'Y' THEN
8591: pa_debug.g_err_stage := 'Invalid budget version id';
8592: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8593: END IF;
8594: PA_UTILS.ADD_MESSAGE(p_app_short_name=> 'PA',

Line 8591: pa_debug.g_err_stage := 'Invalid budget version id';

8587: AND ppa.project_id = pbv.project_id;
8588: EXCEPTION
8589: WHEN NO_DATA_FOUND THEN
8590: IF p_pa_debug_mode = 'Y' THEN
8591: pa_debug.g_err_stage := 'Invalid budget version id';
8592: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8593: END IF;
8594: PA_UTILS.ADD_MESSAGE(p_app_short_name=> 'PA',
8595: p_msg_name => 'PA_FP_INV_PARAM_PASSED');

Line 8592: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);

8588: EXCEPTION
8589: WHEN NO_DATA_FOUND THEN
8590: IF p_pa_debug_mode = 'Y' THEN
8591: pa_debug.g_err_stage := 'Invalid budget version id';
8592: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8593: END IF;
8594: PA_UTILS.ADD_MESSAGE(p_app_short_name=> 'PA',
8595: p_msg_name => 'PA_FP_INV_PARAM_PASSED');
8596:

Line 8608: IF p_pa_debug_mode = 'Y' THEN

8604: ELSE
8605: -- create version flow: proceed with the usual currency defaulting logic
8606: IF l_ci_id IS NOT NULL THEN
8607: /* ci version context */
8608: IF p_pa_debug_mode = 'Y' THEN
8609: pa_debug.g_err_stage := 'Ci_id is not null';
8610: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8611: END IF;
8612: IF l_app_rev_flag = 'Y' THEN

Line 8609: pa_debug.g_err_stage := 'Ci_id is not null';

8605: -- create version flow: proceed with the usual currency defaulting logic
8606: IF l_ci_id IS NOT NULL THEN
8607: /* ci version context */
8608: IF p_pa_debug_mode = 'Y' THEN
8609: pa_debug.g_err_stage := 'Ci_id is not null';
8610: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8611: END IF;
8612: IF l_app_rev_flag = 'Y' THEN
8613: IF l_agreement_id IS NOT NULL THEN

Line 8610: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);

8606: IF l_ci_id IS NOT NULL THEN
8607: /* ci version context */
8608: IF p_pa_debug_mode = 'Y' THEN
8609: pa_debug.g_err_stage := 'Ci_id is not null';
8610: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8611: END IF;
8612: IF l_app_rev_flag = 'Y' THEN
8613: IF l_agreement_id IS NOT NULL THEN
8614: /* txn currency should be the agreement currency */

Line 8622: IF p_pa_debug_mode = 'Y' THEN

8618: FROM pa_agreements_all
8619: WHERE agreement_id = l_agreement_id;
8620: EXCEPTION
8621: WHEN NO_DATA_FOUND THEN
8622: IF p_pa_debug_mode = 'Y' THEN
8623: pa_debug.g_err_stage := 'Invalid agreement id';
8624: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8625: END IF;
8626: PA_UTILS.ADD_MESSAGE(p_app_short_name=> 'PA',

Line 8623: pa_debug.g_err_stage := 'Invalid agreement id';

8619: WHERE agreement_id = l_agreement_id;
8620: EXCEPTION
8621: WHEN NO_DATA_FOUND THEN
8622: IF p_pa_debug_mode = 'Y' THEN
8623: pa_debug.g_err_stage := 'Invalid agreement id';
8624: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8625: END IF;
8626: PA_UTILS.ADD_MESSAGE(p_app_short_name=> 'PA',
8627: p_msg_name => 'PA_FP_INV_PARAM_PASSED');

Line 8624: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);

8620: EXCEPTION
8621: WHEN NO_DATA_FOUND THEN
8622: IF p_pa_debug_mode = 'Y' THEN
8623: pa_debug.g_err_stage := 'Invalid agreement id';
8624: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8625: END IF;
8626: PA_UTILS.ADD_MESSAGE(p_app_short_name=> 'PA',
8627: p_msg_name => 'PA_FP_INV_PARAM_PASSED');
8628: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 8657: IF p_pa_debug_mode = 'Y' THEN

8653: END IF;
8654: END IF; -- if ci_id not null
8655: END IF; -- p_calling_module
8656:
8657: IF p_pa_debug_mode = 'Y' THEN
8658: pa_debug.g_err_stage := 'l_def_txn_curr_code: ' || l_def_txn_curr_code;
8659: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8660: END IF;
8661:

Line 8658: pa_debug.g_err_stage := 'l_def_txn_curr_code: ' || l_def_txn_curr_code;

8654: END IF; -- if ci_id not null
8655: END IF; -- p_calling_module
8656:
8657: IF p_pa_debug_mode = 'Y' THEN
8658: pa_debug.g_err_stage := 'l_def_txn_curr_code: ' || l_def_txn_curr_code;
8659: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8660: END IF;
8661:
8662: DELETE pa_resource_asgn_curr_tmp;

Line 8659: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);

8655: END IF; -- p_calling_module
8656:
8657: IF p_pa_debug_mode = 'Y' THEN
8658: pa_debug.g_err_stage := 'l_def_txn_curr_code: ' || l_def_txn_curr_code;
8659: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
8660: END IF;
8661:
8662: DELETE pa_resource_asgn_curr_tmp;
8663: /* bulk insert the left over resource assignments into the new table with default txn currency

Line 8687: IF P_PA_debug_mode = 'Y' THEN

8683: X_MSG_COUNT => l_msg_count,
8684: X_MSG_DATA => l_msg_data);
8685:
8686: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8687: IF P_PA_debug_mode = 'Y' THEN
8688: pa_debug.g_err_stage:= 'Error in TARGET PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DETAILS';
8689: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
8690: END IF;
8691: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 8688: pa_debug.g_err_stage:= 'Error in TARGET PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DETAILS';

8684: X_MSG_DATA => l_msg_data);
8685:
8686: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8687: IF P_PA_debug_mode = 'Y' THEN
8688: pa_debug.g_err_stage:= 'Error in TARGET PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DETAILS';
8689: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
8690: END IF;
8691: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
8692: END IF;

Line 8689: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);

8685:
8686: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8687: IF P_PA_debug_mode = 'Y' THEN
8688: pa_debug.g_err_stage:= 'Error in TARGET PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DETAILS';
8689: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
8690: END IF;
8691: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
8692: END IF;
8693:

Line 8723: IF p_pa_debug_mode = 'Y' THEN

8719: END IF; /* janani */
8720:
8721: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
8722: THEN
8723: IF p_pa_debug_mode = 'Y' THEN
8724: pa_debug.write_file('Failed due to error in PA_RES_ASG_CURRENCY_PUB.maintain_data',5);
8725: END IF;
8726: raise PA_FP_CONSTANTS_PKG.INVALID_ARG_EXC;
8727: END IF;

Line 8724: pa_debug.write_file('Failed due to error in PA_RES_ASG_CURRENCY_PUB.maintain_data',5);

8720:
8721: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
8722: THEN
8723: IF p_pa_debug_mode = 'Y' THEN
8724: pa_debug.write_file('Failed due to error in PA_RES_ASG_CURRENCY_PUB.maintain_data',5);
8725: END IF;
8726: raise PA_FP_CONSTANTS_PKG.INVALID_ARG_EXC;
8727: END IF;
8728: --IPM Arch Enhancement Bug 4865563 End

Line 8732: IF p_pa_debug_mode = 'Y' THEN

8728: --IPM Arch Enhancement Bug 4865563 End
8729:
8730:
8731: END IF; -- if there is ra_id to be inserted
8732: IF p_pa_debug_mode = 'Y' THEN
8733: pa_debug.reset_err_stack;
8734: END IF;
8735:
8736: EXCEPTION

Line 8733: pa_debug.reset_err_stack;

8729:
8730:
8731: END IF; -- if there is ra_id to be inserted
8732: IF p_pa_debug_mode = 'Y' THEN
8733: pa_debug.reset_err_stack;
8734: END IF;
8735:
8736: EXCEPTION
8737: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 8757: IF p_pa_debug_mode = 'Y' THEN

8753: ELSE
8754: x_msg_count := l_msg_count;
8755: x_msg_data := l_msg_data;
8756: END IF;
8757: IF p_pa_debug_mode = 'Y' THEN
8758: pa_debug.g_err_stage:='Invalid Arguments Passed';
8759: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
8760: pa_debug.write_file('create_default_plan_txn_rec ' || x_msg_data,5);
8761: END IF;

Line 8758: pa_debug.g_err_stage:='Invalid Arguments Passed';

8754: x_msg_count := l_msg_count;
8755: x_msg_data := l_msg_data;
8756: END IF;
8757: IF p_pa_debug_mode = 'Y' THEN
8758: pa_debug.g_err_stage:='Invalid Arguments Passed';
8759: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
8760: pa_debug.write_file('create_default_plan_txn_rec ' || x_msg_data,5);
8761: END IF;
8762:

Line 8759: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

8755: x_msg_data := l_msg_data;
8756: END IF;
8757: IF p_pa_debug_mode = 'Y' THEN
8758: pa_debug.g_err_stage:='Invalid Arguments Passed';
8759: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
8760: pa_debug.write_file('create_default_plan_txn_rec ' || x_msg_data,5);
8761: END IF;
8762:
8763: x_return_status:= FND_API.G_RET_STS_ERROR;

Line 8760: pa_debug.write_file('create_default_plan_txn_rec ' || x_msg_data,5);

8756: END IF;
8757: IF p_pa_debug_mode = 'Y' THEN
8758: pa_debug.g_err_stage:='Invalid Arguments Passed';
8759: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
8760: pa_debug.write_file('create_default_plan_txn_rec ' || x_msg_data,5);
8761: END IF;
8762:
8763: x_return_status:= FND_API.G_RET_STS_ERROR;
8764: IF p_pa_debug_mode = 'Y' THEN

Line 8764: IF p_pa_debug_mode = 'Y' THEN

8760: pa_debug.write_file('create_default_plan_txn_rec ' || x_msg_data,5);
8761: END IF;
8762:
8763: x_return_status:= FND_API.G_RET_STS_ERROR;
8764: IF p_pa_debug_mode = 'Y' THEN
8765: pa_debug.reset_err_stack;
8766: END IF;
8767: RAISE;
8768:

Line 8765: pa_debug.reset_err_stack;

8761: END IF;
8762:
8763: x_return_status:= FND_API.G_RET_STS_ERROR;
8764: IF p_pa_debug_mode = 'Y' THEN
8765: pa_debug.reset_err_stack;
8766: END IF;
8767: RAISE;
8768:
8769: WHEN Others THEN

Line 8779: IF p_pa_debug_mode = 'Y' THEN

8775: x_msg_count := 1;
8776: x_msg_data := SQLERRM;
8777: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PUB'
8778: ,p_procedure_name => 'create_default_plan_txn_rec');
8779: IF p_pa_debug_mode = 'Y' THEN
8780: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
8781: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
8782: pa_debug.write_file('create_default_plan_txn_rec ' || pa_debug.G_Err_Stack,5);
8783: END IF;

Line 8780: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;

8776: x_msg_data := SQLERRM;
8777: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PUB'
8778: ,p_procedure_name => 'create_default_plan_txn_rec');
8779: IF p_pa_debug_mode = 'Y' THEN
8780: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
8781: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
8782: pa_debug.write_file('create_default_plan_txn_rec ' || pa_debug.G_Err_Stack,5);
8783: END IF;
8784: IF p_pa_debug_mode = 'Y' THEN

Line 8781: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

8777: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PUB'
8778: ,p_procedure_name => 'create_default_plan_txn_rec');
8779: IF p_pa_debug_mode = 'Y' THEN
8780: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
8781: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
8782: pa_debug.write_file('create_default_plan_txn_rec ' || pa_debug.G_Err_Stack,5);
8783: END IF;
8784: IF p_pa_debug_mode = 'Y' THEN
8785: pa_debug.reset_err_stack;

Line 8782: pa_debug.write_file('create_default_plan_txn_rec ' || pa_debug.G_Err_Stack,5);

8778: ,p_procedure_name => 'create_default_plan_txn_rec');
8779: IF p_pa_debug_mode = 'Y' THEN
8780: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
8781: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
8782: pa_debug.write_file('create_default_plan_txn_rec ' || pa_debug.G_Err_Stack,5);
8783: END IF;
8784: IF p_pa_debug_mode = 'Y' THEN
8785: pa_debug.reset_err_stack;
8786: END IF;

Line 8784: IF p_pa_debug_mode = 'Y' THEN

8780: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
8781: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
8782: pa_debug.write_file('create_default_plan_txn_rec ' || pa_debug.G_Err_Stack,5);
8783: END IF;
8784: IF p_pa_debug_mode = 'Y' THEN
8785: pa_debug.reset_err_stack;
8786: END IF;
8787: RAISE;
8788: END create_default_plan_txn_rec;

Line 8785: pa_debug.reset_err_stack;

8781: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
8782: pa_debug.write_file('create_default_plan_txn_rec ' || pa_debug.G_Err_Stack,5);
8783: END IF;
8784: IF p_pa_debug_mode = 'Y' THEN
8785: pa_debug.reset_err_stack;
8786: END IF;
8787: RAISE;
8788: END create_default_plan_txn_rec;
8789: