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_PVT dependencies on PA_DEBUG

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

17: -- If p_action = null, then this procedure acts as a lock toggle (if the version was
18: -- originally locked, it would unlock the version)
19: -- If p_person_id is null, then it will find the person id based on p_user_id.
20: -- This procedure assumes that a person can only unlock the versions he/she has locked.
21: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
22:
23: PROCEDURE lock_unlock_version
24: (p_budget_version_id IN pa_budget_versions.budget_version_id%TYPE,
25: p_record_version_number IN pa_budget_versions.record_version_number%TYPE,

Line 65: IF P_PA_DEBUG_MODE = 'Y' THEN

61: BEGIN
62: --FND_MSG_PUB.initialize;
63: l_initial_msg_count := FND_MSG_PUB.count_msg;
64:
65: IF P_PA_DEBUG_MODE = 'Y' THEN
66: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.lock_unlock_version');
67: END IF;
68: x_msg_count := 0;
69: SAVEPOINT PA_FP_LOCK_UNLOCK; --bug#10639908

Line 66: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.lock_unlock_version');

62: --FND_MSG_PUB.initialize;
63: l_initial_msg_count := FND_MSG_PUB.count_msg;
64:
65: IF P_PA_DEBUG_MODE = 'Y' THEN
66: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.lock_unlock_version');
67: END IF;
68: x_msg_count := 0;
69: SAVEPOINT PA_FP_LOCK_UNLOCK; --bug#10639908
70: /* CHECK FOR BUSINESS RULES VIOLATIONS */

Line 86: IF P_PA_DEBUG_MODE = 'Y' THEN

82: x_valid_flag => l_valid_flag,
83: x_return_status => l_return_status,
84: x_error_msg_code => l_error_msg_code);
85: if x_return_status = FND_API.G_RET_STS_ERROR then
86: IF P_PA_DEBUG_MODE = 'Y' THEN
87: pa_debug.write_file('lock_unlock_version: ' || 'record version number error ');
88: END IF;
89: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
90: p_msg_name => l_error_msg_code);

Line 87: pa_debug.write_file('lock_unlock_version: ' || 'record version number error ');

83: x_return_status => l_return_status,
84: x_error_msg_code => l_error_msg_code);
85: if x_return_status = FND_API.G_RET_STS_ERROR then
86: IF P_PA_DEBUG_MODE = 'Y' THEN
87: pa_debug.write_file('lock_unlock_version: ' || 'record version number error ');
88: END IF;
89: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
90: p_msg_name => l_error_msg_code);
91: end if;

Line 155: IF p_pa_debug_mode = 'Y' THEN

151: x_msg_count := l_msg_count;
152: else
153: x_msg_count := l_msg_count;
154: end if;
155: IF p_pa_debug_mode = 'Y' THEN
156: pa_debug.reset_err_stack;
157: END IF;
158: return;
159: end if;

Line 156: pa_debug.reset_err_stack;

152: else
153: x_msg_count := l_msg_count;
154: end if;
155: IF p_pa_debug_mode = 'Y' THEN
156: pa_debug.reset_err_stack;
157: END IF;
158: return;
159: end if;
160:

Line 162: IF P_PA_DEBUG_MODE = 'Y' THEN

158: return;
159: end if;
160:
161: /* IF NO BUSINESS RULES VIOLATIONS, PROCEED WITH LOCK/UNLOCK */
162: IF P_PA_DEBUG_MODE = 'Y' THEN
163: pa_debug.write_file('lock_unlock_version: ' || 'no business rules violations');
164: END IF;
165: x_return_status := FND_API.G_RET_STS_SUCCESS;
166: --if l_msg_count = 0 then

Line 163: pa_debug.write_file('lock_unlock_version: ' || 'no business rules violations');

159: end if;
160:
161: /* IF NO BUSINESS RULES VIOLATIONS, PROCEED WITH LOCK/UNLOCK */
162: IF P_PA_DEBUG_MODE = 'Y' THEN
163: pa_debug.write_file('lock_unlock_version: ' || 'no business rules violations');
164: END IF;
165: x_return_status := FND_API.G_RET_STS_SUCCESS;
166: --if l_msg_count = 0 then
167: if l_msg_count = l_initial_msg_count then

Line 224: IF p_pa_debug_mode = 'Y' THEN

220: x_msg_count := 1;
221: x_msg_data := SQLERRM;
222: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PUB',
223: p_procedure_name => 'lock_unlock_version');
224: IF p_pa_debug_mode = 'Y' THEN
225: pa_debug.reset_err_stack;
226: END IF;
227: raise FND_API.G_EXC_UNEXPECTED_ERROR;
228: END lock_unlock_version;

Line 225: pa_debug.reset_err_stack;

221: x_msg_data := SQLERRM;
222: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PUB',
223: p_procedure_name => 'lock_unlock_version');
224: IF p_pa_debug_mode = 'Y' THEN
225: pa_debug.reset_err_stack;
226: END IF;
227: raise FND_API.G_EXC_UNEXPECTED_ERROR;
228: END lock_unlock_version;
229:

Line 357: IF p_pa_debug_mode = 'Y' THEN

353: OR pbl.pfc_cur_conv_rejection_code IS NOT NULL));
354:
355: BEGIN
356: FND_MSG_PUB.initialize;
357: IF p_pa_debug_mode = 'Y' THEN
358: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Baseline_FinPlan');
359: END IF;
360: l_created_by:=FND_GLOBAL.user_id;
361: l_msg_count := 0;

Line 358: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Baseline_FinPlan');

354:
355: BEGIN
356: FND_MSG_PUB.initialize;
357: IF p_pa_debug_mode = 'Y' THEN
358: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Baseline_FinPlan');
359: END IF;
360: l_created_by:=FND_GLOBAL.user_id;
361: l_msg_count := 0;
362:

Line 378: IF P_PA_DEBUG_MODE = 'Y' THEN

374: x_valid_flag => l_valid2_flag,
375: x_return_status => x_return_status, --l_return_status, Bug 2691822
376: x_error_msg_code => l_error_msg_code);
377: if not((l_valid1_flag='Y') and (l_valid2_flag='Y')) then
378: IF P_PA_DEBUG_MODE = 'Y' THEN
379: pa_debug.write_file('Baseline_FinPlan: ' || 'BUSINESS RULE VIOLATION: Check_Record_Version_Number failed');
380: END IF;
381: x_return_status := FND_API.G_RET_STS_ERROR;
382: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 379: pa_debug.write_file('Baseline_FinPlan: ' || 'BUSINESS RULE VIOLATION: Check_Record_Version_Number failed');

375: x_return_status => x_return_status, --l_return_status, Bug 2691822
376: x_error_msg_code => l_error_msg_code);
377: if not((l_valid1_flag='Y') and (l_valid2_flag='Y')) then
378: IF P_PA_DEBUG_MODE = 'Y' THEN
379: pa_debug.write_file('Baseline_FinPlan: ' || 'BUSINESS RULE VIOLATION: Check_Record_Version_Number failed');
380: END IF;
381: x_return_status := FND_API.G_RET_STS_ERROR;
382: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
383: p_msg_name => l_error_msg_code);

Line 403: IF p_pa_debug_mode = 'Y' THEN

399: x_msg_count := l_msg_count;
400: else
401: x_msg_count := l_msg_count;
402: end if;
403: IF p_pa_debug_mode = 'Y' THEN
404: pa_debug.reset_err_stack;
405: END IF;
406: return;
407: end if;

Line 404: pa_debug.reset_err_stack;

400: else
401: x_msg_count := l_msg_count;
402: end if;
403: IF p_pa_debug_mode = 'Y' THEN
404: pa_debug.reset_err_stack;
405: END IF;
406: return;
407: end if;
408:

Line 479: IF P_PA_DEBUG_MODE = 'Y' THEN

475: OPEN c_chk_rej_codes;
476: FETCH c_chk_rej_codes INTO l_dummy;
477: IF c_chk_rej_codes%FOUND THEN
478:
479: IF P_PA_DEBUG_MODE = 'Y' THEN
480: pa_debug.g_err_stage:= 'budget lines with rejection codes EXIST in ar version';
481: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
482: END IF;
483:

Line 480: pa_debug.g_err_stage:= 'budget lines with rejection codes EXIST in ar version';

476: FETCH c_chk_rej_codes INTO l_dummy;
477: IF c_chk_rej_codes%FOUND THEN
478:
479: IF P_PA_DEBUG_MODE = 'Y' THEN
480: pa_debug.g_err_stage:= 'budget lines with rejection codes EXIST in ar version';
481: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
482: END IF;
483:
484: PA_UTILS.ADD_MESSAGE

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

477: IF c_chk_rej_codes%FOUND THEN
478:
479: IF P_PA_DEBUG_MODE = 'Y' THEN
480: pa_debug.g_err_stage:= 'budget lines with rejection codes EXIST in ar version';
481: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
482: END IF;
483:
484: PA_UTILS.ADD_MESSAGE
485: (p_app_short_name => 'PA',

Line 671: IF P_PA_DEBUG_MODE = 'Y' THEN

667: --and hence partial implementation of change orders should be supported even after baselining.
668: IF l_ar_flag ='Y' AND
669: NVL(l_auto_baseline_project,'N')='N' THEN
670:
671: IF P_PA_DEBUG_MODE = 'Y' THEN
672: pa_debug.g_err_stage := 'Updating the rev_partially_impl_flag in partially implemented CIs';
673: pa_debug.write('pa_fin_plan_pvt: ' || l_module_name,pa_debug.g_err_stage,5);
674: END IF;
675:

Line 672: pa_debug.g_err_stage := 'Updating the rev_partially_impl_flag in partially implemented CIs';

668: IF l_ar_flag ='Y' AND
669: NVL(l_auto_baseline_project,'N')='N' THEN
670:
671: IF P_PA_DEBUG_MODE = 'Y' THEN
672: pa_debug.g_err_stage := 'Updating the rev_partially_impl_flag in partially implemented CIs';
673: pa_debug.write('pa_fin_plan_pvt: ' || l_module_name,pa_debug.g_err_stage,5);
674: END IF;
675:
676: UPDATE pa_budget_versions

Line 673: pa_debug.write('pa_fin_plan_pvt: ' || l_module_name,pa_debug.g_err_stage,5);

669: NVL(l_auto_baseline_project,'N')='N' THEN
670:
671: IF P_PA_DEBUG_MODE = 'Y' THEN
672: pa_debug.g_err_stage := 'Updating the rev_partially_impl_flag in partially implemented CIs';
673: pa_debug.write('pa_fin_plan_pvt: ' || l_module_name,pa_debug.g_err_stage,5);
674: END IF;
675:
676: UPDATE pa_budget_versions
677: SET last_update_date = SYSDATE,

Line 686: IF P_PA_DEBUG_MODE = 'Y' THEN

682: WHERE project_id = p_project_id
683: AND ci_id IS NOT NULL
684: AND rev_partially_impl_flag='Y';
685:
686: IF P_PA_DEBUG_MODE = 'Y' THEN
687: pa_debug.g_err_stage := 'No of records updated '||SQL%ROWCOUNT;
688: pa_debug.write('pa_fin_plan_pvt: ' || l_module_name,pa_debug.g_err_stage,5);
689: END IF;
690:

Line 687: pa_debug.g_err_stage := 'No of records updated '||SQL%ROWCOUNT;

683: AND ci_id IS NOT NULL
684: AND rev_partially_impl_flag='Y';
685:
686: IF P_PA_DEBUG_MODE = 'Y' THEN
687: pa_debug.g_err_stage := 'No of records updated '||SQL%ROWCOUNT;
688: pa_debug.write('pa_fin_plan_pvt: ' || l_module_name,pa_debug.g_err_stage,5);
689: END IF;
690:
691: END IF;

Line 688: pa_debug.write('pa_fin_plan_pvt: ' || l_module_name,pa_debug.g_err_stage,5);

684: AND rev_partially_impl_flag='Y';
685:
686: IF P_PA_DEBUG_MODE = 'Y' THEN
687: pa_debug.g_err_stage := 'No of records updated '||SQL%ROWCOUNT;
688: pa_debug.write('pa_fin_plan_pvt: ' || l_module_name,pa_debug.g_err_stage,5);
689: END IF;
690:
691: END IF;
692:

Line 833: IF P_PA_DEBUG_MODE = 'Y' THEN

829: * working version and the newly created baselined version as this value
830: * would be used in the view included change document page to show various
831: * change documents included in that version
832: */
833: IF P_PA_DEBUG_MODE = 'Y' THEN
834: pa_debug.g_err_stage := 'After Copy Version-- Firing Select';
835: pa_debug.write('pa_fin_plan_pvt: ' || l_module_name,pa_debug.g_err_stage,5);
836: END IF;
837:

Line 834: pa_debug.g_err_stage := 'After Copy Version-- Firing Select';

830: * would be used in the view included change document page to show various
831: * change documents included in that version
832: */
833: IF P_PA_DEBUG_MODE = 'Y' THEN
834: pa_debug.g_err_stage := 'After Copy Version-- Firing Select';
835: pa_debug.write('pa_fin_plan_pvt: ' || l_module_name,pa_debug.g_err_stage,5);
836: END IF;
837:
838: SELECT ci_id, inclusion_method_code, version_type, creation_date

Line 835: pa_debug.write('pa_fin_plan_pvt: ' || l_module_name,pa_debug.g_err_stage,5);

831: * change documents included in that version
832: */
833: IF P_PA_DEBUG_MODE = 'Y' THEN
834: pa_debug.g_err_stage := 'After Copy Version-- Firing Select';
835: pa_debug.write('pa_fin_plan_pvt: ' || l_module_name,pa_debug.g_err_stage,5);
836: END IF;
837:
838: SELECT ci_id, inclusion_method_code, version_type, creation_date
839: BULK COLLECT INTO l_temp_ci_id_tbl, l_tmp_incl_method_code_tbl, l_version_type_tbl, l_cw_creation_date_tbl

Line 851: IF P_PA_DEBUG_MODE = 'Y' THEN

847: FROM pa_fp_merged_ctrl_items
848: WHERE plan_version_id = l_target_version_id
849: AND project_id = p_project_id;
850:
851: IF P_PA_DEBUG_MODE = 'Y' THEN
852: pa_debug.g_err_stage := 'Rows returned in ci_id tbl: ' || l_temp_ci_id_tbl.COUNT;
853: pa_debug.write('pa_fin_plan_pvt: ' || l_module_name,pa_debug.g_err_stage,5);
854: END IF;
855: -- Flipping inclusion_method_code, creation_date, Updating the WHO columns for the baselined version

Line 852: pa_debug.g_err_stage := 'Rows returned in ci_id tbl: ' || l_temp_ci_id_tbl.COUNT;

848: WHERE plan_version_id = l_target_version_id
849: AND project_id = p_project_id;
850:
851: IF P_PA_DEBUG_MODE = 'Y' THEN
852: pa_debug.g_err_stage := 'Rows returned in ci_id tbl: ' || l_temp_ci_id_tbl.COUNT;
853: pa_debug.write('pa_fin_plan_pvt: ' || l_module_name,pa_debug.g_err_stage,5);
854: END IF;
855: -- Flipping inclusion_method_code, creation_date, Updating the WHO columns for the baselined version
856: IF l_temp_ci_id_tbl.COUNT > 0 THEN

Line 853: pa_debug.write('pa_fin_plan_pvt: ' || l_module_name,pa_debug.g_err_stage,5);

849: AND project_id = p_project_id;
850:
851: IF P_PA_DEBUG_MODE = 'Y' THEN
852: pa_debug.g_err_stage := 'Rows returned in ci_id tbl: ' || l_temp_ci_id_tbl.COUNT;
853: pa_debug.write('pa_fin_plan_pvt: ' || l_module_name,pa_debug.g_err_stage,5);
854: END IF;
855: -- Flipping inclusion_method_code, creation_date, Updating the WHO columns for the baselined version
856: IF l_temp_ci_id_tbl.COUNT > 0 THEN
857: FORALL i in l_temp_ci_id_tbl.FIRST..l_temp_ci_id_tbl.LAST

Line 975: IF p_pa_debug_mode = 'Y' THEN

971: --Bug 4094762. Code that creates the intial forecast version (its there below the PJI API call) assumes that the pji
972: --data exists for the baselined version. Hence the PJI API call should be made before that code gets executed.
973: /* FP M - Reporting lines integration */
974: BEGIN
975: IF p_pa_debug_mode = 'Y' THEN
976: pa_debug.write('Baseline_Finplan','Calling PJI_FM_XBS_ACCUM_MAINT.PLAN_BASELINE ' ,5);
977: pa_debug.write('Baseline_Finplan','p_baseline_version_id '|| p_budget_version_id,5);
978: pa_debug.write('Baseline_Finplan', 'p_new_version_id '|| l_target_version_id,5);
979: END IF;

Line 976: pa_debug.write('Baseline_Finplan','Calling PJI_FM_XBS_ACCUM_MAINT.PLAN_BASELINE ' ,5);

972: --data exists for the baselined version. Hence the PJI API call should be made before that code gets executed.
973: /* FP M - Reporting lines integration */
974: BEGIN
975: IF p_pa_debug_mode = 'Y' THEN
976: pa_debug.write('Baseline_Finplan','Calling PJI_FM_XBS_ACCUM_MAINT.PLAN_BASELINE ' ,5);
977: pa_debug.write('Baseline_Finplan','p_baseline_version_id '|| p_budget_version_id,5);
978: pa_debug.write('Baseline_Finplan', 'p_new_version_id '|| l_target_version_id,5);
979: END IF;
980: PJI_FM_XBS_ACCUM_MAINT.PLAN_BASELINE (

Line 977: pa_debug.write('Baseline_Finplan','p_baseline_version_id '|| p_budget_version_id,5);

973: /* FP M - Reporting lines integration */
974: BEGIN
975: IF p_pa_debug_mode = 'Y' THEN
976: pa_debug.write('Baseline_Finplan','Calling PJI_FM_XBS_ACCUM_MAINT.PLAN_BASELINE ' ,5);
977: pa_debug.write('Baseline_Finplan','p_baseline_version_id '|| p_budget_version_id,5);
978: pa_debug.write('Baseline_Finplan', 'p_new_version_id '|| l_target_version_id,5);
979: END IF;
980: PJI_FM_XBS_ACCUM_MAINT.PLAN_BASELINE (
981: p_baseline_version_id => p_budget_version_id,

Line 978: pa_debug.write('Baseline_Finplan', 'p_new_version_id '|| l_target_version_id,5);

974: BEGIN
975: IF p_pa_debug_mode = 'Y' THEN
976: pa_debug.write('Baseline_Finplan','Calling PJI_FM_XBS_ACCUM_MAINT.PLAN_BASELINE ' ,5);
977: pa_debug.write('Baseline_Finplan','p_baseline_version_id '|| p_budget_version_id,5);
978: pa_debug.write('Baseline_Finplan', 'p_new_version_id '|| l_target_version_id,5);
979: END IF;
980: PJI_FM_XBS_ACCUM_MAINT.PLAN_BASELINE (
981: p_baseline_version_id => p_budget_version_id,
982: p_new_version_id => l_target_version_id,

Line 1014: IF P_PA_DEBUG_MODE = 'Y' THEN

1010: IF l_fin_plan_class_code = 'BUDGET' and
1011: (l_ar_flag = 'Y' or
1012: l_ac_flag = 'Y') THEN /* Only if the version that is being baselined is an AR or AC BUDGET version */
1013:
1014: IF P_PA_DEBUG_MODE = 'Y' THEN
1015: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN','BUDGET plan class and ac flag is ' || l_ar_flag || ' and ac flag is ' || l_ac_flag,3);
1016: END IF;
1017:
1018: Begin

Line 1015: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN','BUDGET plan class and ac flag is ' || l_ar_flag || ' and ac flag is ' || l_ac_flag,3);

1011: (l_ar_flag = 'Y' or
1012: l_ac_flag = 'Y') THEN /* Only if the version that is being baselined is an AR or AC BUDGET version */
1013:
1014: IF P_PA_DEBUG_MODE = 'Y' THEN
1015: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN','BUDGET plan class and ac flag is ' || l_ar_flag || ' and ac flag is ' || l_ac_flag,3);
1016: END IF;
1017:
1018: Begin
1019: Select 'Y'

Line 1035: IF P_PA_DEBUG_MODE = 'Y' THEN

1031: When No_Data_Found Then
1032: l_base_line_ver_exists := 'N';
1033: End;
1034:
1035: IF P_PA_DEBUG_MODE = 'Y' THEN
1036: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN','l_base_line_ver_exists ' || l_base_line_ver_exists || ' l_version_type ' || l_version_type,3);
1037: END IF;
1038:
1039: If l_base_line_ver_exists = 'N' THEN /* No further processing for creation of forecast version is required if an appr baseline version already exists */

Line 1036: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN','l_base_line_ver_exists ' || l_base_line_ver_exists || ' l_version_type ' || l_version_type,3);

1032: l_base_line_ver_exists := 'N';
1033: End;
1034:
1035: IF P_PA_DEBUG_MODE = 'Y' THEN
1036: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN','l_base_line_ver_exists ' || l_base_line_ver_exists || ' l_version_type ' || l_version_type,3);
1037: END IF;
1038:
1039: If l_base_line_ver_exists = 'N' THEN /* No further processing for creation of forecast version is required if an appr baseline version already exists */
1040:

Line 1054: IF P_PA_DEBUG_MODE = 'Y' THEN

1050: If l_fc_plan_type_ids_tbl.count > 0 Then /* Only if forecast plan types have been added to the project */
1051:
1052: FOR i IN l_fc_plan_type_ids_tbl.FIRST .. l_fc_plan_type_ids_tbl.LAST LOOP
1053:
1054: IF P_PA_DEBUG_MODE = 'Y' THEN
1055: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN','l_fc_plan_type_ids_tbl ' || l_fc_plan_type_ids_tbl(i) ||
1056: ' l_fc_pt_pref_code_tbl ' || l_fc_pt_pref_code_tbl(i),3);
1057: END IF;
1058:

Line 1055: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN','l_fc_plan_type_ids_tbl ' || l_fc_plan_type_ids_tbl(i) ||

1051:
1052: FOR i IN l_fc_plan_type_ids_tbl.FIRST .. l_fc_plan_type_ids_tbl.LAST LOOP
1053:
1054: IF P_PA_DEBUG_MODE = 'Y' THEN
1055: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN','l_fc_plan_type_ids_tbl ' || l_fc_plan_type_ids_tbl(i) ||
1056: ' l_fc_pt_pref_code_tbl ' || l_fc_pt_pref_code_tbl(i),3);
1057: END IF;
1058:
1059: l_curr_work_ver_id := Null;

Line 1089: IF P_PA_DEBUG_MODE = 'Y' THEN

1085: ,x_msg_data => x_msg_data);
1086:
1087: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1088:
1089: IF P_PA_DEBUG_MODE = 'Y' THEN
1090: pa_debug.g_err_stage:='Pa_Fin_Plan_Utils.Get_Curr_Working_Version_Info errored: project_id : ' ||
1091: p_project_id || ' : plan type id : ' || l_fc_plan_type_ids_tbl(i) ||
1092: ' : version_type : ' || l_fc_version_type;
1093: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN',pa_debug.g_err_stage,5);

Line 1090: pa_debug.g_err_stage:='Pa_Fin_Plan_Utils.Get_Curr_Working_Version_Info errored: project_id : ' ||

1086:
1087: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1088:
1089: IF P_PA_DEBUG_MODE = 'Y' THEN
1090: pa_debug.g_err_stage:='Pa_Fin_Plan_Utils.Get_Curr_Working_Version_Info errored: project_id : ' ||
1091: p_project_id || ' : plan type id : ' || l_fc_plan_type_ids_tbl(i) ||
1092: ' : version_type : ' || l_fc_version_type;
1093: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN',pa_debug.g_err_stage,5);
1094: END IF;

Line 1093: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN',pa_debug.g_err_stage,5);

1089: IF P_PA_DEBUG_MODE = 'Y' THEN
1090: pa_debug.g_err_stage:='Pa_Fin_Plan_Utils.Get_Curr_Working_Version_Info errored: project_id : ' ||
1091: p_project_id || ' : plan type id : ' || l_fc_plan_type_ids_tbl(i) ||
1092: ' : version_type : ' || l_fc_version_type;
1093: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN',pa_debug.g_err_stage,5);
1094: END IF;
1095:
1096: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
1097:

Line 1118: IF P_PA_DEBUG_MODE = 'Y' THEN

1114: ,x_msg_data => x_msg_data);
1115:
1116: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1117:
1118: IF P_PA_DEBUG_MODE = 'Y' THEN
1119: pa_debug.g_err_stage:='Pa_fin_plan_pub.Create_Version errored. p_project_id ' ||
1120: p_project_id || ' : plan type id : ' || l_fc_plan_type_ids_tbl(i) ||
1121: ' : version_type : ' || l_fc_version_type;
1122: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN',pa_debug.g_err_stage,5);

Line 1119: pa_debug.g_err_stage:='Pa_fin_plan_pub.Create_Version errored. p_project_id ' ||

1115:
1116: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1117:
1118: IF P_PA_DEBUG_MODE = 'Y' THEN
1119: pa_debug.g_err_stage:='Pa_fin_plan_pub.Create_Version errored. p_project_id ' ||
1120: p_project_id || ' : plan type id : ' || l_fc_plan_type_ids_tbl(i) ||
1121: ' : version_type : ' || l_fc_version_type;
1122: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN',pa_debug.g_err_stage,5);
1123: END IF;

Line 1122: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN',pa_debug.g_err_stage,5);

1118: IF P_PA_DEBUG_MODE = 'Y' THEN
1119: pa_debug.g_err_stage:='Pa_fin_plan_pub.Create_Version errored. p_project_id ' ||
1120: p_project_id || ' : plan type id : ' || l_fc_plan_type_ids_tbl(i) ||
1121: ' : version_type : ' || l_fc_version_type;
1122: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN',pa_debug.g_err_stage,5);
1123: END IF;
1124:
1125: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
1126:

Line 1142: IF P_PA_DEBUG_MODE = 'Y' THEN

1138:
1139:
1140: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1141:
1142: IF P_PA_DEBUG_MODE = 'Y' THEN
1143: pa_debug.g_err_stage:='PA_FIN_PLAN_PUB.Copy_Version errored: project_id : ' ||
1144: p_project_id || ' : l_target_version_id : ' ||
1145: l_target_version_id || ' : l_fc_plan_type_ids_tbl(i) : ' ||
1146: l_fc_plan_type_ids_tbl(i);

Line 1143: pa_debug.g_err_stage:='PA_FIN_PLAN_PUB.Copy_Version errored: project_id : ' ||

1139:
1140: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1141:
1142: IF P_PA_DEBUG_MODE = 'Y' THEN
1143: pa_debug.g_err_stage:='PA_FIN_PLAN_PUB.Copy_Version errored: project_id : ' ||
1144: p_project_id || ' : l_target_version_id : ' ||
1145: l_target_version_id || ' : l_fc_plan_type_ids_tbl(i) : ' ||
1146: l_fc_plan_type_ids_tbl(i);
1147: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN',pa_debug.g_err_stage,5);

Line 1147: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN',pa_debug.g_err_stage,5);

1143: pa_debug.g_err_stage:='PA_FIN_PLAN_PUB.Copy_Version errored: project_id : ' ||
1144: p_project_id || ' : l_target_version_id : ' ||
1145: l_target_version_id || ' : l_fc_plan_type_ids_tbl(i) : ' ||
1146: l_fc_plan_type_ids_tbl(i);
1147: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN',pa_debug.g_err_stage,5);
1148: END IF;
1149:
1150: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
1151:

Line 1154: IF P_PA_DEBUG_MODE = 'Y' THEN

1150: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
1151:
1152: END IF;
1153:
1154: IF P_PA_DEBUG_MODE = 'Y' THEN
1155: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN','l_curr_work_ver_id ' || l_curr_work_ver_id,3);
1156: END IF;
1157:
1158: x_fc_version_created_flag := 'Y';

Line 1155: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN','l_curr_work_ver_id ' || l_curr_work_ver_id,3);

1151:
1152: END IF;
1153:
1154: IF P_PA_DEBUG_MODE = 'Y' THEN
1155: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN','l_curr_work_ver_id ' || l_curr_work_ver_id,3);
1156: END IF;
1157:
1158: x_fc_version_created_flag := 'Y';
1159:

Line 1197: IF P_PA_DEBUG_MODE = 'Y' THEN

1193: ,x_msg_data => x_msg_data);
1194:
1195: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1196:
1197: IF P_PA_DEBUG_MODE = 'Y' THEN
1198: pa_debug.g_err_stage:='Pa_Fin_Plan_Utils.Get_Curr_Working_Version_Info errored: project_id : ' ||
1199: p_project_id || ' : plan type id : ' || l_fc_plan_type_ids_tbl(i) ||
1200: ' : version_type : ' || l_fc_version_type;
1201: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN',pa_debug.g_err_stage,5);

Line 1198: pa_debug.g_err_stage:='Pa_Fin_Plan_Utils.Get_Curr_Working_Version_Info errored: project_id : ' ||

1194:
1195: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1196:
1197: IF P_PA_DEBUG_MODE = 'Y' THEN
1198: pa_debug.g_err_stage:='Pa_Fin_Plan_Utils.Get_Curr_Working_Version_Info errored: project_id : ' ||
1199: p_project_id || ' : plan type id : ' || l_fc_plan_type_ids_tbl(i) ||
1200: ' : version_type : ' || l_fc_version_type;
1201: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN',pa_debug.g_err_stage,5);
1202: END IF;

Line 1201: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN',pa_debug.g_err_stage,5);

1197: IF P_PA_DEBUG_MODE = 'Y' THEN
1198: pa_debug.g_err_stage:='Pa_Fin_Plan_Utils.Get_Curr_Working_Version_Info errored: project_id : ' ||
1199: p_project_id || ' : plan type id : ' || l_fc_plan_type_ids_tbl(i) ||
1200: ' : version_type : ' || l_fc_version_type;
1201: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN',pa_debug.g_err_stage,5);
1202: END IF;
1203:
1204: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
1205:

Line 1226: IF P_PA_DEBUG_MODE = 'Y' THEN

1222: ,x_msg_data => x_msg_data);
1223:
1224: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1225:
1226: IF P_PA_DEBUG_MODE = 'Y' THEN
1227: pa_debug.g_err_stage:='Pa_fin_plan_pub.Create_Version errored. p_project_id ' ||
1228: p_project_id || ' : plan type id : ' || l_fc_plan_type_ids_tbl(i) ||
1229: ' : version_type : ' || l_fc_version_type;
1230: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN',pa_debug.g_err_stage,5);

Line 1227: pa_debug.g_err_stage:='Pa_fin_plan_pub.Create_Version errored. p_project_id ' ||

1223:
1224: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1225:
1226: IF P_PA_DEBUG_MODE = 'Y' THEN
1227: pa_debug.g_err_stage:='Pa_fin_plan_pub.Create_Version errored. p_project_id ' ||
1228: p_project_id || ' : plan type id : ' || l_fc_plan_type_ids_tbl(i) ||
1229: ' : version_type : ' || l_fc_version_type;
1230: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN',pa_debug.g_err_stage,5);
1231: END IF;

Line 1230: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN',pa_debug.g_err_stage,5);

1226: IF P_PA_DEBUG_MODE = 'Y' THEN
1227: pa_debug.g_err_stage:='Pa_fin_plan_pub.Create_Version errored. p_project_id ' ||
1228: p_project_id || ' : plan type id : ' || l_fc_plan_type_ids_tbl(i) ||
1229: ' : version_type : ' || l_fc_version_type;
1230: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN',pa_debug.g_err_stage,5);
1231: END IF;
1232:
1233: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
1234:

Line 1250: IF P_PA_DEBUG_MODE = 'Y' THEN

1246:
1247:
1248: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1249:
1250: IF P_PA_DEBUG_MODE = 'Y' THEN
1251: pa_debug.g_err_stage:='PA_FIN_PLAN_PUB.Copy_Version errored: project_id : ' ||
1252: p_project_id || ' : l_target_version_id : ' ||
1253: l_target_version_id || ' : l_fc_plan_type_ids_tbl(i) : ' ||
1254: l_fc_plan_type_ids_tbl(i);

Line 1251: pa_debug.g_err_stage:='PA_FIN_PLAN_PUB.Copy_Version errored: project_id : ' ||

1247:
1248: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1249:
1250: IF P_PA_DEBUG_MODE = 'Y' THEN
1251: pa_debug.g_err_stage:='PA_FIN_PLAN_PUB.Copy_Version errored: project_id : ' ||
1252: p_project_id || ' : l_target_version_id : ' ||
1253: l_target_version_id || ' : l_fc_plan_type_ids_tbl(i) : ' ||
1254: l_fc_plan_type_ids_tbl(i);
1255: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN',pa_debug.g_err_stage,5);

Line 1255: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN',pa_debug.g_err_stage,5);

1251: pa_debug.g_err_stage:='PA_FIN_PLAN_PUB.Copy_Version errored: project_id : ' ||
1252: p_project_id || ' : l_target_version_id : ' ||
1253: l_target_version_id || ' : l_fc_plan_type_ids_tbl(i) : ' ||
1254: l_fc_plan_type_ids_tbl(i);
1255: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN',pa_debug.g_err_stage,5);
1256: END IF;
1257:
1258: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
1259:

Line 1262: IF P_PA_DEBUG_MODE = 'Y' THEN

1258: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
1259:
1260: END IF;
1261:
1262: IF P_PA_DEBUG_MODE = 'Y' THEN
1263: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN','l_curr_work_ver_id ' || l_curr_work_ver_id,3);
1264: END IF;
1265:
1266: x_fc_version_created_flag := 'Y';

Line 1263: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN','l_curr_work_ver_id ' || l_curr_work_ver_id,3);

1259:
1260: END IF;
1261:
1262: IF P_PA_DEBUG_MODE = 'Y' THEN
1263: pa_debug.write('PAFPPVTB.BASELINE_FINPLAN','l_curr_work_ver_id ' || l_curr_work_ver_id,3);
1264: END IF;
1265:
1266: x_fc_version_created_flag := 'Y';
1267:

Line 1280: IF p_pa_debug_mode = 'Y' THEN

1276: END IF; /* If l_base_line_ver_exists = 'N' THEN */
1277:
1278: END IF; /* IF l_fin_plan_class_code = 'BUDGET' and (l_ar_flag = 'Y' or l_ac_flag = 'Y') THEN */
1279:
1280: IF p_pa_debug_mode = 'Y' THEN
1281: pa_debug.reset_err_stack;
1282: END IF;
1283: EXCEPTION
1284:

Line 1281: pa_debug.reset_err_stack;

1277:
1278: END IF; /* IF l_fin_plan_class_code = 'BUDGET' and (l_ar_flag = 'Y' or l_ac_flag = 'Y') THEN */
1279:
1280: IF p_pa_debug_mode = 'Y' THEN
1281: pa_debug.reset_err_stack;
1282: END IF;
1283: EXCEPTION
1284:
1285: when pa_fin_plan_pvt.baseline_finplan_error then

Line 1307: IF p_pa_debug_mode = 'Y' THEN

1303: x_msg_count := l_msg_count;
1304: ELSE
1305: x_msg_count := l_msg_count;
1306: END IF;
1307: IF p_pa_debug_mode = 'Y' THEN
1308: pa_debug.reset_err_stack;
1309: END IF;
1310: --Bug 4044009
1311: RETURN;

Line 1308: pa_debug.reset_err_stack;

1304: ELSE
1305: x_msg_count := l_msg_count;
1306: END IF;
1307: IF p_pa_debug_mode = 'Y' THEN
1308: pa_debug.reset_err_stack;
1309: END IF;
1310: --Bug 4044009
1311: RETURN;
1312: when others then

Line 1319: IF p_pa_debug_mode = 'Y' THEN

1315: x_msg_count := 1;
1316: x_msg_data := SQLERRM;
1317: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_PVT',
1318: p_procedure_name => 'Baseline_FinPlan');
1319: IF p_pa_debug_mode = 'Y' THEN
1320: pa_debug.reset_err_stack;
1321: END IF;
1322: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1323:

Line 1320: pa_debug.reset_err_stack;

1316: x_msg_data := SQLERRM;
1317: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_PVT',
1318: p_procedure_name => 'Baseline_FinPlan');
1319: IF p_pa_debug_mode = 'Y' THEN
1320: pa_debug.reset_err_stack;
1321: END IF;
1322: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1323:
1324: END Baseline_FinPlan;

Line 1373: IF P_PA_DEBUG_MODE = 'Y' THEN

1369: v_emp_id NUMBER; -- employee id
1370:
1371: BEGIN
1372: FND_MSG_PUB.initialize;
1373: IF P_PA_DEBUG_MODE = 'Y' THEN
1374: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Submit_Current_Working_FinPlan');
1375: END IF;
1376: x_msg_count := 0;
1377:

Line 1374: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Submit_Current_Working_FinPlan');

1370:
1371: BEGIN
1372: FND_MSG_PUB.initialize;
1373: IF P_PA_DEBUG_MODE = 'Y' THEN
1374: pa_debug.init_err_stack('PA_FIN_PLAN_PUB.Submit_Current_Working_FinPlan');
1375: END IF;
1376: x_msg_count := 0;
1377:
1378: /* Added for bug 6176649 */

Line 1392: IF P_PA_DEBUG_MODE = 'Y' THEN

1388: x_valid_flag => l_valid_flag,
1389: x_return_status => l_return_status,
1390: x_error_msg_code => l_error_msg_code);
1391: if x_return_status = FND_API.G_RET_STS_ERROR then
1392: IF P_PA_DEBUG_MODE = 'Y' THEN
1393: pa_debug.write_file('Submit_Current_Working_FinPlan: ' || 'record version number error ');
1394: END IF;
1395: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
1396: p_msg_name => l_error_msg_code);

Line 1393: pa_debug.write_file('Submit_Current_Working_FinPlan: ' || 'record version number error ');

1389: x_return_status => l_return_status,
1390: x_error_msg_code => l_error_msg_code);
1391: if x_return_status = FND_API.G_RET_STS_ERROR then
1392: IF P_PA_DEBUG_MODE = 'Y' THEN
1393: pa_debug.write_file('Submit_Current_Working_FinPlan: ' || 'record version number error ');
1394: END IF;
1395: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
1396: p_msg_name => l_error_msg_code);
1397: end if;

Line 1415: IF p_pa_debug_mode = 'Y' THEN

1411: x_msg_count := l_msg_count;
1412: else
1413: x_msg_count := l_msg_count;
1414: end if;
1415: IF p_pa_debug_mode = 'Y' THEN
1416: pa_debug.reset_err_stack;
1417: END IF;
1418: return;
1419: end if;

Line 1416: pa_debug.reset_err_stack;

1412: else
1413: x_msg_count := l_msg_count;
1414: end if;
1415: IF p_pa_debug_mode = 'Y' THEN
1416: pa_debug.reset_err_stack;
1417: END IF;
1418: return;
1419: end if;
1420:

Line 1606: IF p_pa_debug_mode = 'Y' THEN

1602: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1603: x_msg_count := 1;
1604: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_PVT',
1605: p_procedure_name => 'Submit_Current_Working_FinPlan');
1606: IF p_pa_debug_mode = 'Y' THEN
1607: pa_debug.reset_err_stack;
1608: END IF;
1609: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1610:

Line 1607: pa_debug.reset_err_stack;

1603: x_msg_count := 1;
1604: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FIN_PLAN_PVT',
1605: p_procedure_name => 'Submit_Current_Working_FinPlan');
1606: IF p_pa_debug_mode = 'Y' THEN
1607: pa_debug.reset_err_stack;
1608: END IF;
1609: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1610:
1611: END Submit_Current_Working_FinPlan;

Line 2204: IF p_pa_debug_mode = 'Y' THEN

2200: BEGIN
2201:
2202: x_msg_count := 0;
2203: x_return_status := FND_API.G_RET_STS_SUCCESS;
2204: IF p_pa_debug_mode = 'Y' THEN
2205: pa_debug.set_err_stack('PA_FIN_PLAN_PVT.CREATE_DRAFT');
2206: END IF;
2207: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
2208: l_debug_mode := NVL(l_debug_mode, 'Y');

Line 2205: pa_debug.set_err_stack('PA_FIN_PLAN_PVT.CREATE_DRAFT');

2201:
2202: x_msg_count := 0;
2203: x_return_status := FND_API.G_RET_STS_SUCCESS;
2204: IF p_pa_debug_mode = 'Y' THEN
2205: pa_debug.set_err_stack('PA_FIN_PLAN_PVT.CREATE_DRAFT');
2206: END IF;
2207: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
2208: l_debug_mode := NVL(l_debug_mode, 'Y');
2209: IF P_PA_DEBUG_MODE = 'Y' THEN

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

2203: x_return_status := FND_API.G_RET_STS_SUCCESS;
2204: IF p_pa_debug_mode = 'Y' THEN
2205: pa_debug.set_err_stack('PA_FIN_PLAN_PVT.CREATE_DRAFT');
2206: END IF;
2207: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
2208: l_debug_mode := NVL(l_debug_mode, 'Y');
2209: IF P_PA_DEBUG_MODE = 'Y' THEN
2210: pa_debug.set_process('CREATE_DRAFT: ' || 'PLSQL','LOG',l_debug_mode);
2211: END IF;

Line 2209: IF P_PA_DEBUG_MODE = 'Y' THEN

2205: pa_debug.set_err_stack('PA_FIN_PLAN_PVT.CREATE_DRAFT');
2206: END IF;
2207: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
2208: l_debug_mode := NVL(l_debug_mode, 'Y');
2209: IF P_PA_DEBUG_MODE = 'Y' THEN
2210: pa_debug.set_process('CREATE_DRAFT: ' || 'PLSQL','LOG',l_debug_mode);
2211: END IF;
2212:
2213:

Line 2210: pa_debug.set_process('CREATE_DRAFT: ' || 'PLSQL','LOG',l_debug_mode);

2206: END IF;
2207: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
2208: l_debug_mode := NVL(l_debug_mode, 'Y');
2209: IF P_PA_DEBUG_MODE = 'Y' THEN
2210: pa_debug.set_process('CREATE_DRAFT: ' || 'PLSQL','LOG',l_debug_mode);
2211: END IF;
2212:
2213:
2214: pa_debug.g_err_stage:='Entering Create_draft';

Line 2214: pa_debug.g_err_stage:='Entering Create_draft';

2210: pa_debug.set_process('CREATE_DRAFT: ' || 'PLSQL','LOG',l_debug_mode);
2211: END IF;
2212:
2213:
2214: pa_debug.g_err_stage:='Entering Create_draft';
2215: IF P_PA_DEBUG_MODE = 'Y' THEN
2216: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,2);
2217: END IF;
2218:

Line 2215: IF P_PA_DEBUG_MODE = 'Y' THEN

2211: END IF;
2212:
2213:
2214: pa_debug.g_err_stage:='Entering Create_draft';
2215: IF P_PA_DEBUG_MODE = 'Y' THEN
2216: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,2);
2217: END IF;
2218:
2219: l_calling_context := nvl(p_calling_context,PA_FP_CONSTANTS_PKG.G_CREATE_DRAFT); /* Bug# 2674353 */

Line 2216: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,2);

2212:
2213:
2214: pa_debug.g_err_stage:='Entering Create_draft';
2215: IF P_PA_DEBUG_MODE = 'Y' THEN
2216: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,2);
2217: END IF;
2218:
2219: l_calling_context := nvl(p_calling_context,PA_FP_CONSTANTS_PKG.G_CREATE_DRAFT); /* Bug# 2674353 */
2220: l_resource_list_id := p_resource_list_id; --bug#2831968

Line 2224: pa_debug.g_err_stage:='Control item id is null';

2220: l_resource_list_id := p_resource_list_id; --bug#2831968
2221:
2222: IF p_ci_id is NULL THEN -- Bug # 2672654
2223:
2224: pa_debug.g_err_stage:='Control item id is null';
2225: IF P_PA_DEBUG_MODE = 'Y' THEN
2226: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);
2227: END IF;
2228:

Line 2225: IF P_PA_DEBUG_MODE = 'Y' THEN

2221:
2222: IF p_ci_id is NULL THEN -- Bug # 2672654
2223:
2224: pa_debug.g_err_stage:='Control item id is null';
2225: IF P_PA_DEBUG_MODE = 'Y' THEN
2226: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);
2227: END IF;
2228:
2229: /* Validation for the resource list */

Line 2226: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);

2222: IF p_ci_id is NULL THEN -- Bug # 2672654
2223:
2224: pa_debug.g_err_stage:='Control item id is null';
2225: IF P_PA_DEBUG_MODE = 'Y' THEN
2226: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);
2227: END IF;
2228:
2229: /* Validation for the resource list */
2230: /* Get the currently baselined version id */

Line 2242: pa_debug.g_err_stage:= 'Error Calling Get_Baselined_Version_Info';

2238: ,x_msg_count => x_msg_count
2239: ,x_msg_data => x_msg_data );
2240:
2241: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2242: pa_debug.g_err_stage:= 'Error Calling Get_Baselined_Version_Info';
2243: IF P_PA_DEBUG_MODE = 'Y' THEN
2244: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2245: END IF;
2246: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 2243: IF P_PA_DEBUG_MODE = 'Y' THEN

2239: ,x_msg_data => x_msg_data );
2240:
2241: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2242: pa_debug.g_err_stage:= 'Error Calling Get_Baselined_Version_Info';
2243: IF P_PA_DEBUG_MODE = 'Y' THEN
2244: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2245: END IF;
2246: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2247: END IF;

Line 2244: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

2240:
2241: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2242: pa_debug.g_err_stage:= 'Error Calling Get_Baselined_Version_Info';
2243: IF P_PA_DEBUG_MODE = 'Y' THEN
2244: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2245: END IF;
2246: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2247: END IF;
2248:

Line 2249: pa_debug.g_err_stage:= 'current Baselined Version id ->' || l_baselined_version_id;

2245: END IF;
2246: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2247: END IF;
2248:
2249: pa_debug.g_err_stage:= 'current Baselined Version id ->' || l_baselined_version_id;
2250: IF P_PA_DEBUG_MODE = 'Y' THEN
2251: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2252: END IF;
2253: -- bug#2831968 l_resource_list_id := p_resource_list_id;

Line 2250: IF P_PA_DEBUG_MODE = 'Y' THEN

2246: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2247: END IF;
2248:
2249: pa_debug.g_err_stage:= 'current Baselined Version id ->' || l_baselined_version_id;
2250: IF P_PA_DEBUG_MODE = 'Y' THEN
2251: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2252: END IF;
2253: -- bug#2831968 l_resource_list_id := p_resource_list_id;
2254:

Line 2251: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

2247: END IF;
2248:
2249: pa_debug.g_err_stage:= 'current Baselined Version id ->' || l_baselined_version_id;
2250: IF P_PA_DEBUG_MODE = 'Y' THEN
2251: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2252: END IF;
2253: -- bug#2831968 l_resource_list_id := p_resource_list_id;
2254:
2255: /* Commenting for bug 8367755

Line 2258: pa_debug.g_err_stage:='Current baselined versions and passed resource list id are not same';

2254:
2255: /* Commenting for bug 8367755
2256: IF (l_baselined_version_id IS NOT NULL) THEN
2257: IF (pa_fin_plan_utils.Get_Resource_List_Id(l_baselined_version_id) <> l_resource_list_id) THEN
2258: pa_debug.g_err_stage:='Current baselined versions and passed resource list id are not same';
2259: IF P_PA_DEBUG_MODE = 'Y' THEN
2260: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,5);
2261: END IF;
2262:

Line 2259: IF P_PA_DEBUG_MODE = 'Y' THEN

2255: /* Commenting for bug 8367755
2256: IF (l_baselined_version_id IS NOT NULL) THEN
2257: IF (pa_fin_plan_utils.Get_Resource_List_Id(l_baselined_version_id) <> l_resource_list_id) THEN
2258: pa_debug.g_err_stage:='Current baselined versions and passed resource list id are not same';
2259: IF P_PA_DEBUG_MODE = 'Y' THEN
2260: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,5);
2261: END IF;
2262:
2263: PA_UTILS.ADD_MESSAGE(p_app_short_name=> 'PA',

Line 2260: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,5);

2256: IF (l_baselined_version_id IS NOT NULL) THEN
2257: IF (pa_fin_plan_utils.Get_Resource_List_Id(l_baselined_version_id) <> l_resource_list_id) THEN
2258: pa_debug.g_err_stage:='Current baselined versions and passed resource list id are not same';
2259: IF P_PA_DEBUG_MODE = 'Y' THEN
2260: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,5);
2261: END IF;
2262:
2263: PA_UTILS.ADD_MESSAGE(p_app_short_name=> 'PA',
2264: p_msg_name => 'PA_BU_BASE_RES_LIST_EXISTS');

Line 2270: pa_debug.g_err_stage:='Entering of validation for resource list';

2266: END IF;
2267: END IF;
2268: */
2269:
2270: pa_debug.g_err_stage:='Entering of validation for resource list';
2271: IF P_PA_DEBUG_MODE = 'Y' THEN
2272: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);
2273: END IF;
2274:

Line 2271: IF P_PA_DEBUG_MODE = 'Y' THEN

2267: END IF;
2268: */
2269:
2270: pa_debug.g_err_stage:='Entering of validation for resource list';
2271: IF P_PA_DEBUG_MODE = 'Y' THEN
2272: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);
2273: END IF;
2274:
2275: /* End of validation for resource list */

Line 2272: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);

2268: */
2269:
2270: pa_debug.g_err_stage:='Entering of validation for resource list';
2271: IF P_PA_DEBUG_MODE = 'Y' THEN
2272: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);
2273: END IF;
2274:
2275: /* End of validation for resource list */
2276:

Line 2293: pa_debug.g_err_stage:='Current working version id -> ' || l_curr_work_version_id;

2289: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2290: Raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2291: END IF;
2292:
2293: pa_debug.g_err_stage:='Current working version id -> ' || l_curr_work_version_id;
2294: IF P_PA_DEBUG_MODE = 'Y' THEN
2295: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);
2296: END IF;
2297:

Line 2294: IF P_PA_DEBUG_MODE = 'Y' THEN

2290: Raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2291: END IF;
2292:
2293: pa_debug.g_err_stage:='Current working version id -> ' || l_curr_work_version_id;
2294: IF P_PA_DEBUG_MODE = 'Y' THEN
2295: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);
2296: END IF;
2297:
2298: IF (l_curr_work_version_id is not null) THEN /* Bug 2672654 */

Line 2295: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);

2291: END IF;
2292:
2293: pa_debug.g_err_stage:='Current working version id -> ' || l_curr_work_version_id;
2294: IF P_PA_DEBUG_MODE = 'Y' THEN
2295: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);
2296: END IF;
2297:
2298: IF (l_curr_work_version_id is not null) THEN /* Bug 2672654 */
2299: pa_fin_plan_pvt.Get_Included_Ci(

Line 2309: pa_debug.g_err_stage:= 'Could not obtain the CI information for the version';

2305: ,x_msg_count => x_msg_count
2306: ,x_msg_data => x_msg_data );
2307:
2308: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2309: pa_debug.g_err_stage:= 'Could not obtain the CI information for the version';
2310: IF P_PA_DEBUG_MODE = 'Y' THEN
2311: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2312: END IF;
2313: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 2310: IF P_PA_DEBUG_MODE = 'Y' THEN

2306: ,x_msg_data => x_msg_data );
2307:
2308: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2309: pa_debug.g_err_stage:= 'Could not obtain the CI information for the version';
2310: IF P_PA_DEBUG_MODE = 'Y' THEN
2311: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2312: END IF;
2313: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2314: ELSE

Line 2311: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

2307:
2308: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2309: pa_debug.g_err_stage:= 'Could not obtain the CI information for the version';
2310: IF P_PA_DEBUG_MODE = 'Y' THEN
2311: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2312: END IF;
2313: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2314: ELSE
2315: pa_debug.g_err_stage:= 'obtained the CI information for the version';

Line 2315: pa_debug.g_err_stage:= 'obtained the CI information for the version';

2311: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2312: END IF;
2313: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2314: ELSE
2315: pa_debug.g_err_stage:= 'obtained the CI information for the version';
2316: IF P_PA_DEBUG_MODE = 'Y' THEN
2317: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
2318: END IF;
2319: END IF;

Line 2316: IF P_PA_DEBUG_MODE = 'Y' THEN

2312: END IF;
2313: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2314: ELSE
2315: pa_debug.g_err_stage:= 'obtained the CI information for the version';
2316: IF P_PA_DEBUG_MODE = 'Y' THEN
2317: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
2318: END IF;
2319: END IF;
2320:

Line 2317: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);

2313: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2314: ELSE
2315: pa_debug.g_err_stage:= 'obtained the CI information for the version';
2316: IF P_PA_DEBUG_MODE = 'Y' THEN
2317: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
2318: END IF;
2319: END IF;
2320:
2321: /* Bug 2688610 - should call delete_version rather than delete_version_helper.

Line 2352: pa_debug.g_err_stage := 'Error in lock unlock version - cannot delete working version';

2348:
2349: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2350:
2351: IF l_debug_mode = 'Y' THEN
2352: pa_debug.g_err_stage := 'Error in lock unlock version - cannot delete working version';
2353: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,5);
2354: END IF;
2355:
2356: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 2353: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,5);

2349: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2350:
2351: IF l_debug_mode = 'Y' THEN
2352: pa_debug.g_err_stage := 'Error in lock unlock version - cannot delete working version';
2353: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,5);
2354: END IF;
2355:
2356: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2357:

Line 2373: pa_debug.g_err_stage:= 'Could not delete the current working version';

2369: ,x_msg_data => x_msg_data
2370: );
2371:
2372: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2373: pa_debug.g_err_stage:= 'Could not delete the current working version';
2374: IF P_PA_DEBUG_MODE = 'Y' THEN
2375: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2376: END IF;
2377: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 2374: IF P_PA_DEBUG_MODE = 'Y' THEN

2370: );
2371:
2372: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2373: pa_debug.g_err_stage:= 'Could not delete the current working version';
2374: IF P_PA_DEBUG_MODE = 'Y' THEN
2375: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2376: END IF;
2377: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2378: ELSE

Line 2375: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

2371:
2372: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2373: pa_debug.g_err_stage:= 'Could not delete the current working version';
2374: IF P_PA_DEBUG_MODE = 'Y' THEN
2375: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2376: END IF;
2377: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2378: ELSE
2379: pa_debug.g_err_stage:= 'Deleted the current working version';

Line 2379: pa_debug.g_err_stage:= 'Deleted the current working version';

2375: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2376: END IF;
2377: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2378: ELSE
2379: pa_debug.g_err_stage:= 'Deleted the current working version';
2380: IF P_PA_DEBUG_MODE = 'Y' THEN
2381: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
2382: END IF;
2383: END IF;

Line 2380: IF P_PA_DEBUG_MODE = 'Y' THEN

2376: END IF;
2377: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2378: ELSE
2379: pa_debug.g_err_stage:= 'Deleted the current working version';
2380: IF P_PA_DEBUG_MODE = 'Y' THEN
2381: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
2382: END IF;
2383: END IF;
2384:

Line 2381: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);

2377: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2378: ELSE
2379: pa_debug.g_err_stage:= 'Deleted the current working version';
2380: IF P_PA_DEBUG_MODE = 'Y' THEN
2381: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
2382: END IF;
2383: END IF;
2384:
2385: END IF;--IF l_calling_context <> PA_FP_CONSTANTS_PKG.G_CREATE_DRAFT THEN

Line 2389: pa_debug.g_err_stage:= 'p_ci_id is not null - control item version';

2385: END IF;--IF l_calling_context <> PA_FP_CONSTANTS_PKG.G_CREATE_DRAFT THEN
2386:
2387: END IF; --l_curr_work_version_id is not null
2388: ELSE
2389: pa_debug.g_err_stage:= 'p_ci_id is not null - control item version';
2390: IF P_PA_DEBUG_MODE = 'Y' THEN
2391: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
2392: END IF;
2393: END IF; -- p_ci_id is NULL. Bug 2672654

Line 2390: IF P_PA_DEBUG_MODE = 'Y' THEN

2386:
2387: END IF; --l_curr_work_version_id is not null
2388: ELSE
2389: pa_debug.g_err_stage:= 'p_ci_id is not null - control item version';
2390: IF P_PA_DEBUG_MODE = 'Y' THEN
2391: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
2392: END IF;
2393: END IF; -- p_ci_id is NULL. Bug 2672654
2394:

Line 2391: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);

2387: END IF; --l_curr_work_version_id is not null
2388: ELSE
2389: pa_debug.g_err_stage:= 'p_ci_id is not null - control item version';
2390: IF P_PA_DEBUG_MODE = 'Y' THEN
2391: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
2392: END IF;
2393: END IF; -- p_ci_id is NULL. Bug 2672654
2394:
2395: --Get the preference code

Line 2404: pa_debug.g_err_stage:= 'Preference code is -> ' || l_plan_pref_code;

2400: ELSIF(p_version_type = PA_FP_CONSTANTS_PKG.G_ELEMENT_TYPE_ALL) THEN
2401: l_plan_pref_code := PA_FP_CONSTANTS_PKG.G_PREF_COST_AND_REV_SAME;
2402: END IF;
2403:
2404: pa_debug.g_err_stage:= 'Preference code is -> ' || l_plan_pref_code;
2405: IF P_PA_DEBUG_MODE = 'Y' THEN
2406: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
2407: END IF;
2408:

Line 2405: IF P_PA_DEBUG_MODE = 'Y' THEN

2401: l_plan_pref_code := PA_FP_CONSTANTS_PKG.G_PREF_COST_AND_REV_SAME;
2402: END IF;
2403:
2404: pa_debug.g_err_stage:= 'Preference code is -> ' || l_plan_pref_code;
2405: IF P_PA_DEBUG_MODE = 'Y' THEN
2406: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
2407: END IF;
2408:
2409: --Get the amount set id.

Line 2406: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);

2402: END IF;
2403:
2404: pa_debug.g_err_stage:= 'Preference code is -> ' || l_plan_pref_code;
2405: IF P_PA_DEBUG_MODE = 'Y' THEN
2406: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
2407: END IF;
2408:
2409: --Get the amount set id.
2410: pa_fin_plan_utils.GET_OR_CREATE_AMOUNT_SET_ID

Line 2443: pa_debug.g_err_stage:= 'amount set id is -> ' || l_amount_set_id;

2439: ELSIF(p_version_type = PA_FP_CONSTANTS_PKG.G_ELEMENT_TYPE_ALL) THEN
2440: l_amount_set_id := l_all_amount_set_id;
2441: END IF;
2442:
2443: pa_debug.g_err_stage:= 'amount set id is -> ' || l_amount_set_id;
2444: IF P_PA_DEBUG_MODE = 'Y' THEN
2445: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
2446: END IF;
2447:

Line 2444: IF P_PA_DEBUG_MODE = 'Y' THEN

2440: l_amount_set_id := l_all_amount_set_id;
2441: END IF;
2442:
2443: pa_debug.g_err_stage:= 'amount set id is -> ' || l_amount_set_id;
2444: IF P_PA_DEBUG_MODE = 'Y' THEN
2445: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
2446: END IF;
2447:
2448: l_created_version_id := NULL;

Line 2445: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);

2441: END IF;
2442:
2443: pa_debug.g_err_stage:= 'amount set id is -> ' || l_amount_set_id;
2444: IF P_PA_DEBUG_MODE = 'Y' THEN
2445: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
2446: END IF;
2447:
2448: l_created_version_id := NULL;
2449: /* Create the plan version */

Line 2479: pa_debug.g_err_stage:= 'Error in calling Create_Version';

2475: ,x_msg_count => x_msg_count
2476: ,x_msg_data => x_msg_data );
2477:
2478: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2479: pa_debug.g_err_stage:= 'Error in calling Create_Version';
2480: IF P_PA_DEBUG_MODE = 'Y' THEN
2481: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2482: END IF;
2483: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 2480: IF P_PA_DEBUG_MODE = 'Y' THEN

2476: ,x_msg_data => x_msg_data );
2477:
2478: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2479: pa_debug.g_err_stage:= 'Error in calling Create_Version';
2480: IF P_PA_DEBUG_MODE = 'Y' THEN
2481: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2482: END IF;
2483: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2484: END IF;

Line 2481: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

2477:
2478: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2479: pa_debug.g_err_stage:= 'Error in calling Create_Version';
2480: IF P_PA_DEBUG_MODE = 'Y' THEN
2481: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2482: END IF;
2483: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2484: END IF;
2485:

Line 2489: pa_debug.g_err_stage:= 'Created budget version id is : '||l_created_version_id;

2485:
2486: x_budget_version_id := l_created_version_id;
2487:
2488:
2489: pa_debug.g_err_stage:= 'Created budget version id is : '||l_created_version_id;
2490: IF P_PA_DEBUG_MODE = 'Y' THEN
2491: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
2492: END IF;
2493:

Line 2490: IF P_PA_DEBUG_MODE = 'Y' THEN

2486: x_budget_version_id := l_created_version_id;
2487:
2488:
2489: pa_debug.g_err_stage:= 'Created budget version id is : '||l_created_version_id;
2490: IF P_PA_DEBUG_MODE = 'Y' THEN
2491: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
2492: END IF;
2493:
2494: -- If the created version is a NON-CI version "AND" --- added this condition for bug 2881681

Line 2491: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);

2487:
2488:
2489: pa_debug.g_err_stage:= 'Created budget version id is : '||l_created_version_id;
2490: IF P_PA_DEBUG_MODE = 'Y' THEN
2491: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
2492: END IF;
2493:
2494: -- If the created version is a NON-CI version "AND" --- added this condition for bug 2881681
2495: -- If either of the replace current working or Create working version flags is Y then make

Line 2542: pa_debug.g_err_stage := 'Error executing lock unlock version';

2538:
2539: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2540:
2541: IF l_debug_mode = 'Y' THEN
2542: pa_debug.g_err_stage := 'Error executing lock unlock version';
2543: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);
2544: END IF;
2545:
2546: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 2543: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);

2539: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2540:
2541: IF l_debug_mode = 'Y' THEN
2542: pa_debug.g_err_stage := 'Error executing lock unlock version';
2543: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);
2544: END IF;
2545:
2546: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2547:

Line 2551: pa_debug.g_err_stage := 'About to call set current working version';

2547:
2548: END IF;
2549:
2550: IF l_debug_mode = 'Y' THEN
2551: pa_debug.g_err_stage := 'About to call set current working version';
2552: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);
2553: END IF;
2554:
2555: -- Getting the rec ver number again as it will be incremented by the api lock_unlock_version

Line 2552: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);

2548: END IF;
2549:
2550: IF l_debug_mode = 'Y' THEN
2551: pa_debug.g_err_stage := 'About to call set current working version';
2552: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);
2553: END IF;
2554:
2555: -- Getting the rec ver number again as it will be incremented by the api lock_unlock_version
2556: l_CW_record_version_number := pa_fin_plan_utils.Retrieve_Record_Version_Number(l_CW_version_id);

Line 2569: IF P_PA_DEBUG_MODE = 'Y' THEN

2565: x_msg_count => x_msg_count,
2566: x_msg_data => x_msg_data);
2567:
2568: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2569: IF P_PA_DEBUG_MODE = 'Y' THEN
2570: pa_debug.g_err_stage:= 'Error executing Set_Current_Working ';
2571: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2572: END IF;
2573: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 2570: pa_debug.g_err_stage:= 'Error executing Set_Current_Working ';

2566: x_msg_data => x_msg_data);
2567:
2568: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2569: IF P_PA_DEBUG_MODE = 'Y' THEN
2570: pa_debug.g_err_stage:= 'Error executing Set_Current_Working ';
2571: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2572: END IF;
2573: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2574: END IF;

Line 2571: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

2567:
2568: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2569: IF P_PA_DEBUG_MODE = 'Y' THEN
2570: pa_debug.g_err_stage:= 'Error executing Set_Current_Working ';
2571: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2572: END IF;
2573: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2574: END IF;
2575:

Line 2658: pa_debug.g_err_stage:='Calling pa_fp_elements_pub.insert_default...';

2654: -- Comment START.
2655: /*
2656: -- Create fp elements and resource assignments for the budget version and the impacted task id
2657:
2658: pa_debug.g_err_stage:='Calling pa_fp_elements_pub.insert_default...';
2659: IF P_PA_DEBUG_MODE = 'Y' THEN
2660: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);
2661: END IF;
2662:

Line 2659: IF P_PA_DEBUG_MODE = 'Y' THEN

2655: /*
2656: -- Create fp elements and resource assignments for the budget version and the impacted task id
2657:
2658: pa_debug.g_err_stage:='Calling pa_fp_elements_pub.insert_default...';
2659: IF P_PA_DEBUG_MODE = 'Y' THEN
2660: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);
2661: END IF;
2662:
2663: Pa_Fp_Elements_Pub.Insert_Default (

Line 2660: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);

2656: -- Create fp elements and resource assignments for the budget version and the impacted task id
2657:
2658: pa_debug.g_err_stage:='Calling pa_fp_elements_pub.insert_default...';
2659: IF P_PA_DEBUG_MODE = 'Y' THEN
2660: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);
2661: END IF;
2662:
2663: Pa_Fp_Elements_Pub.Insert_Default (
2664: p_proj_fp_options_id => l_fp_options_id

Line 2681: pa_debug.g_err_stage:='Calling pa_fp_elements_pub.create_enterable_resources...';

2677: Raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2678: END IF;
2679:
2680:
2681: pa_debug.g_err_stage:='Calling pa_fp_elements_pub.create_enterable_resources...';
2682: IF P_PA_DEBUG_MODE = 'Y' THEN
2683: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);
2684: END IF;
2685:

Line 2682: IF P_PA_DEBUG_MODE = 'Y' THEN

2678: END IF;
2679:
2680:
2681: pa_debug.g_err_stage:='Calling pa_fp_elements_pub.create_enterable_resources...';
2682: IF P_PA_DEBUG_MODE = 'Y' THEN
2683: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);
2684: END IF;
2685:
2686: Pa_Fp_Elements_Pub.Create_Enterable_Resources (

Line 2683: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);

2679:
2680:
2681: pa_debug.g_err_stage:='Calling pa_fp_elements_pub.create_enterable_resources...';
2682: IF P_PA_DEBUG_MODE = 'Y' THEN
2683: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);
2684: END IF;
2685:
2686: Pa_Fp_Elements_Pub.Create_Enterable_Resources (
2687: p_plan_version_id => l_created_version_id

Line 2701: pa_debug.g_err_stage:='Calling pa_fp_planning_transaction_pub.create_default_task_plan_txns...';

2697: ---- Bug # 3507156
2698: -- Comment END
2699: -- Added a call to pa_fp_planning_transaction_pub.create_default_task_plan_txns
2700:
2701: pa_debug.g_err_stage:='Calling pa_fp_planning_transaction_pub.create_default_task_plan_txns...';
2702:
2703: IF P_PA_DEBUG_MODE = 'Y' THEN
2704: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);
2705: END IF;

Line 2703: IF P_PA_DEBUG_MODE = 'Y' THEN

2699: -- Added a call to pa_fp_planning_transaction_pub.create_default_task_plan_txns
2700:
2701: pa_debug.g_err_stage:='Calling pa_fp_planning_transaction_pub.create_default_task_plan_txns...';
2702:
2703: IF P_PA_DEBUG_MODE = 'Y' THEN
2704: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);
2705: END IF;
2706: pa_fp_planning_transaction_pub.create_default_task_plan_txns(
2707: P_budget_version_id => l_created_version_id

Line 2704: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);

2700:
2701: pa_debug.g_err_stage:='Calling pa_fp_planning_transaction_pub.create_default_task_plan_txns...';
2702:
2703: IF P_PA_DEBUG_MODE = 'Y' THEN
2704: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,3);
2705: END IF;
2706: pa_fp_planning_transaction_pub.create_default_task_plan_txns(
2707: P_budget_version_id => l_created_version_id
2708: ,P_version_plan_level_code => p_fin_plan_level_code

Line 2721: pa_debug.g_err_stage:= 'Fetching impacted task details';

2717: ELSE
2718:
2719: -- Fetching top task id and parent task id of impacted task id
2720:
2721: pa_debug.g_err_stage:= 'Fetching impacted task details';
2722: IF P_PA_DEBUG_MODE = 'Y' THEN
2723: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
2724: END IF;
2725:

Line 2722: IF P_PA_DEBUG_MODE = 'Y' THEN

2718:
2719: -- Fetching top task id and parent task id of impacted task id
2720:
2721: pa_debug.g_err_stage:= 'Fetching impacted task details';
2722: IF P_PA_DEBUG_MODE = 'Y' THEN
2723: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
2724: END IF;
2725:
2726: OPEN impacted_task_cur(p_impacted_task_id);

Line 2723: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);

2719: -- Fetching top task id and parent task id of impacted task id
2720:
2721: pa_debug.g_err_stage:= 'Fetching impacted task details';
2722: IF P_PA_DEBUG_MODE = 'Y' THEN
2723: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
2724: END IF;
2725:
2726: OPEN impacted_task_cur(p_impacted_task_id);
2727: FETCH impacted_task_cur INTO impacted_task_rec;

Line 2749: pa_debug.g_err_stage := 'Error while fetching uncat res list id info ...';

2745: ,x_msg_count => x_msg_count
2746: ,x_msg_data => x_msg_data);
2747:
2748: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2749: pa_debug.g_err_stage := 'Error while fetching uncat res list id info ...';
2750: IF P_PA_DEBUG_MODE = 'Y' THEN
2751: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,5);
2752: END IF;
2753: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 2750: IF P_PA_DEBUG_MODE = 'Y' THEN

2746: ,x_msg_data => x_msg_data);
2747:
2748: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2749: pa_debug.g_err_stage := 'Error while fetching uncat res list id info ...';
2750: IF P_PA_DEBUG_MODE = 'Y' THEN
2751: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,5);
2752: END IF;
2753: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2754: END IF;

Line 2751: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,5);

2747:
2748: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2749: pa_debug.g_err_stage := 'Error while fetching uncat res list id info ...';
2750: IF P_PA_DEBUG_MODE = 'Y' THEN
2751: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,5);
2752: END IF;
2753: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2754: END IF;
2755:

Line 2772: pa_debug.g_err_stage:= 'Exception while inserting a row into pa_resource_assignments;';

2768: x_msg_count => x_msg_count,
2769: x_msg_data => x_msg_data);
2770:
2771: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2772: pa_debug.g_err_stage:= 'Exception while inserting a row into pa_resource_assignments;';
2773: IF P_PA_DEBUG_MODE = 'Y' THEN
2774: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2775: END IF;
2776: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 2773: IF P_PA_DEBUG_MODE = 'Y' THEN

2769: x_msg_data => x_msg_data);
2770:
2771: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2772: pa_debug.g_err_stage:= 'Exception while inserting a row into pa_resource_assignments;';
2773: IF P_PA_DEBUG_MODE = 'Y' THEN
2774: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2775: END IF;
2776: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2777: END IF;

Line 2774: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

2770:
2771: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2772: pa_debug.g_err_stage:= 'Exception while inserting a row into pa_resource_assignments;';
2773: IF P_PA_DEBUG_MODE = 'Y' THEN
2774: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2775: END IF;
2776: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2777: END IF;
2778:

Line 2802: pa_debug.g_err_stage:= 'Error Calling CREATE_FINPLAN_LINES';

2798: ,x_msg_count => x_msg_count
2799: ,x_msg_data => x_msg_data );
2800:
2801: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2802: pa_debug.g_err_stage:= 'Error Calling CREATE_FINPLAN_LINES';
2803: IF P_PA_DEBUG_MODE = 'Y' THEN
2804: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2805: END IF;
2806: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 2803: IF P_PA_DEBUG_MODE = 'Y' THEN

2799: ,x_msg_data => x_msg_data );
2800:
2801: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2802: pa_debug.g_err_stage:= 'Error Calling CREATE_FINPLAN_LINES';
2803: IF P_PA_DEBUG_MODE = 'Y' THEN
2804: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2805: END IF;
2806: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2807: END IF;

Line 2804: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

2800:
2801: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2802: pa_debug.g_err_stage:= 'Error Calling CREATE_FINPLAN_LINES';
2803: IF P_PA_DEBUG_MODE = 'Y' THEN
2804: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2805: END IF;
2806: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2807: END IF;
2808: */

Line 2821: pa_debug.g_err_stage:= 'Error Calling ADD_FIN_PLAN_LINES';

2817: ,x_msg_count => x_msg_count
2818: ,x_msg_data => x_msg_data );
2819:
2820: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2821: pa_debug.g_err_stage:= 'Error Calling ADD_FIN_PLAN_LINES';
2822: IF P_PA_DEBUG_MODE = 'Y' THEN
2823: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2824: END IF;
2825: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 2822: IF P_PA_DEBUG_MODE = 'Y' THEN

2818: ,x_msg_data => x_msg_data );
2819:
2820: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2821: pa_debug.g_err_stage:= 'Error Calling ADD_FIN_PLAN_LINES';
2822: IF P_PA_DEBUG_MODE = 'Y' THEN
2823: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2824: END IF;
2825: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2826: END IF;

Line 2823: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

2819:
2820: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2821: pa_debug.g_err_stage:= 'Error Calling ADD_FIN_PLAN_LINES';
2822: IF P_PA_DEBUG_MODE = 'Y' THEN
2823: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2824: END IF;
2825: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2826: END IF;
2827: END IF;

Line 2829: pa_debug.g_err_stage:= 'Restoring the Control Item links if any';

2825: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2826: END IF;
2827: END IF;
2828:
2829: pa_debug.g_err_stage:= 'Restoring the Control Item links if any';
2830: IF P_PA_DEBUG_MODE = 'Y' THEN
2831: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
2832: END IF;
2833:

Line 2830: IF P_PA_DEBUG_MODE = 'Y' THEN

2826: END IF;
2827: END IF;
2828:
2829: pa_debug.g_err_stage:= 'Restoring the Control Item links if any';
2830: IF P_PA_DEBUG_MODE = 'Y' THEN
2831: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
2832: END IF;
2833:
2834: /* Commented out for bug 3550073

Line 2831: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);

2827: END IF;
2828:
2829: pa_debug.g_err_stage:= 'Restoring the Control Item links if any';
2830: IF P_PA_DEBUG_MODE = 'Y' THEN
2831: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
2832: END IF;
2833:
2834: /* Commented out for bug 3550073
2835: IF ( nvl(l_ci_rec_tab.last,0) > 0 ) THEN

Line 2847: pa_debug.g_err_stage:= 'Error Calling FP_CI_LINK_CONTROL_ITEMS';

2843: ,x_msg_count => x_msg_count
2844: ,x_msg_data => x_msg_data);
2845:
2846: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2847: pa_debug.g_err_stage:= 'Error Calling FP_CI_LINK_CONTROL_ITEMS';
2848: IF P_PA_DEBUG_MODE = 'Y' THEN
2849: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2850: END IF;
2851: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 2848: IF P_PA_DEBUG_MODE = 'Y' THEN

2844: ,x_msg_data => x_msg_data);
2845:
2846: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2847: pa_debug.g_err_stage:= 'Error Calling FP_CI_LINK_CONTROL_ITEMS';
2848: IF P_PA_DEBUG_MODE = 'Y' THEN
2849: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2850: END IF;
2851: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2852: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS

Line 2849: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

2845:
2846: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2847: pa_debug.g_err_stage:= 'Error Calling FP_CI_LINK_CONTROL_ITEMS';
2848: IF P_PA_DEBUG_MODE = 'Y' THEN
2849: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2850: END IF;
2851: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2852: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS
2853:

Line 2858: pa_debug.g_err_stage:= 'Exiting CREATE_DRAFT';

2854: END LOOP; --first..last
2855: END IF; -- l_ci_rec_tab is not null */
2856:
2857:
2858: pa_debug.g_err_stage:= 'Exiting CREATE_DRAFT';
2859: IF P_PA_DEBUG_MODE = 'Y' THEN
2860: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL2);
2861: pa_debug.reset_err_stack;
2862: END IF;

Line 2859: IF P_PA_DEBUG_MODE = 'Y' THEN

2855: END IF; -- l_ci_rec_tab is not null */
2856:
2857:
2858: pa_debug.g_err_stage:= 'Exiting CREATE_DRAFT';
2859: IF P_PA_DEBUG_MODE = 'Y' THEN
2860: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL2);
2861: pa_debug.reset_err_stack;
2862: END IF;
2863:

Line 2860: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL2);

2856:
2857:
2858: pa_debug.g_err_stage:= 'Exiting CREATE_DRAFT';
2859: IF P_PA_DEBUG_MODE = 'Y' THEN
2860: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL2);
2861: pa_debug.reset_err_stack;
2862: END IF;
2863:
2864: EXCEPTION

Line 2861: pa_debug.reset_err_stack;

2857:
2858: pa_debug.g_err_stage:= 'Exiting CREATE_DRAFT';
2859: IF P_PA_DEBUG_MODE = 'Y' THEN
2860: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL2);
2861: pa_debug.reset_err_stack;
2862: END IF;
2863:
2864: EXCEPTION
2865:

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

2880: ELSE
2881: x_msg_count := l_msg_count;
2882: END IF;
2883:
2884: pa_debug.g_err_stage:= 'Invalid Arguments Passed';
2885: IF P_PA_DEBUG_MODE = 'Y' THEN
2886: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2887: pa_debug.reset_err_stack;
2888: END IF;

Line 2885: IF P_PA_DEBUG_MODE = 'Y' THEN

2881: x_msg_count := l_msg_count;
2882: END IF;
2883:
2884: pa_debug.g_err_stage:= 'Invalid Arguments Passed';
2885: IF P_PA_DEBUG_MODE = 'Y' THEN
2886: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2887: pa_debug.reset_err_stack;
2888: END IF;
2889: RAISE;

Line 2886: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

2882: END IF;
2883:
2884: pa_debug.g_err_stage:= 'Invalid Arguments Passed';
2885: IF P_PA_DEBUG_MODE = 'Y' THEN
2886: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2887: pa_debug.reset_err_stack;
2888: END IF;
2889: RAISE;
2890:

Line 2887: pa_debug.reset_err_stack;

2883:
2884: pa_debug.g_err_stage:= 'Invalid Arguments Passed';
2885: IF P_PA_DEBUG_MODE = 'Y' THEN
2886: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2887: pa_debug.reset_err_stack;
2888: END IF;
2889: RAISE;
2890:
2891: WHEN others THEN

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

2894: x_msg_count := 1;
2895: x_msg_data := SQLERRM;
2896: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_pvt'
2897: ,p_procedure_name => 'CREATE_DRAFT');
2898: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
2899: IF P_PA_DEBUG_MODE = 'Y' THEN
2900: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2901: pa_debug.reset_err_stack;
2902: END IF;

Line 2899: IF P_PA_DEBUG_MODE = 'Y' THEN

2895: x_msg_data := SQLERRM;
2896: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_pvt'
2897: ,p_procedure_name => 'CREATE_DRAFT');
2898: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
2899: IF P_PA_DEBUG_MODE = 'Y' THEN
2900: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2901: pa_debug.reset_err_stack;
2902: END IF;
2903: RAISE;

Line 2900: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

2896: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_pvt'
2897: ,p_procedure_name => 'CREATE_DRAFT');
2898: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
2899: IF P_PA_DEBUG_MODE = 'Y' THEN
2900: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2901: pa_debug.reset_err_stack;
2902: END IF;
2903: RAISE;
2904:

Line 2901: pa_debug.reset_err_stack;

2897: ,p_procedure_name => 'CREATE_DRAFT');
2898: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
2899: IF P_PA_DEBUG_MODE = 'Y' THEN
2900: pa_debug.write('CREATE_DRAFT: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
2901: pa_debug.reset_err_stack;
2902: END IF;
2903: RAISE;
2904:
2905: END CREATE_DRAFT;

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

3007:
3008: x_msg_count := 0;
3009: x_return_status := FND_API.G_RET_STS_SUCCESS;
3010:
3011: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
3012: l_debug_mode := NVL(l_debug_mode, 'Y');
3013: IF p_pa_debug_mode = 'Y' THEN
3014: pa_debug.set_err_stack('pa_fin_plan_pvt.CREATE_FINPLAN_LINES');
3015: END IF;

Line 3013: IF p_pa_debug_mode = 'Y' THEN

3009: x_return_status := FND_API.G_RET_STS_SUCCESS;
3010:
3011: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
3012: l_debug_mode := NVL(l_debug_mode, 'Y');
3013: IF p_pa_debug_mode = 'Y' THEN
3014: pa_debug.set_err_stack('pa_fin_plan_pvt.CREATE_FINPLAN_LINES');
3015: END IF;
3016: IF P_PA_DEBUG_MODE = 'Y' THEN
3017: pa_debug.set_process('CREATE_FINPLAN_LINES: ' || 'PLSQL','LOG',l_debug_mode);

Line 3014: pa_debug.set_err_stack('pa_fin_plan_pvt.CREATE_FINPLAN_LINES');

3010:
3011: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
3012: l_debug_mode := NVL(l_debug_mode, 'Y');
3013: IF p_pa_debug_mode = 'Y' THEN
3014: pa_debug.set_err_stack('pa_fin_plan_pvt.CREATE_FINPLAN_LINES');
3015: END IF;
3016: IF P_PA_DEBUG_MODE = 'Y' THEN
3017: pa_debug.set_process('CREATE_FINPLAN_LINES: ' || 'PLSQL','LOG',l_debug_mode);
3018: END IF;

Line 3016: IF P_PA_DEBUG_MODE = 'Y' THEN

3012: l_debug_mode := NVL(l_debug_mode, 'Y');
3013: IF p_pa_debug_mode = 'Y' THEN
3014: pa_debug.set_err_stack('pa_fin_plan_pvt.CREATE_FINPLAN_LINES');
3015: END IF;
3016: IF P_PA_DEBUG_MODE = 'Y' THEN
3017: pa_debug.set_process('CREATE_FINPLAN_LINES: ' || 'PLSQL','LOG',l_debug_mode);
3018: END IF;
3019:
3020:

Line 3017: pa_debug.set_process('CREATE_FINPLAN_LINES: ' || 'PLSQL','LOG',l_debug_mode);

3013: IF p_pa_debug_mode = 'Y' THEN
3014: pa_debug.set_err_stack('pa_fin_plan_pvt.CREATE_FINPLAN_LINES');
3015: END IF;
3016: IF P_PA_DEBUG_MODE = 'Y' THEN
3017: pa_debug.set_process('CREATE_FINPLAN_LINES: ' || 'PLSQL','LOG',l_debug_mode);
3018: END IF;
3019:
3020:
3021: -- Check for business rules violations

Line 3023: IF P_PA_DEBUG_MODE = 'Y' THEN

3019:
3020:
3021: -- Check for business rules violations
3022:
3023: IF P_PA_DEBUG_MODE = 'Y' THEN
3024: pa_debug.g_err_stage:= 'Validating input parameters - CREATE_FINPLAN_LINES';
3025: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3026: END IF;
3027:

Line 3024: pa_debug.g_err_stage:= 'Validating input parameters - CREATE_FINPLAN_LINES';

3020:
3021: -- Check for business rules violations
3022:
3023: IF P_PA_DEBUG_MODE = 'Y' THEN
3024: pa_debug.g_err_stage:= 'Validating input parameters - CREATE_FINPLAN_LINES';
3025: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3026: END IF;
3027:
3028: --Validate plan version id

Line 3025: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

3021: -- Check for business rules violations
3022:
3023: IF P_PA_DEBUG_MODE = 'Y' THEN
3024: pa_debug.g_err_stage:= 'Validating input parameters - CREATE_FINPLAN_LINES';
3025: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3026: END IF;
3027:
3028: --Validate plan version id
3029:

Line 3032: IF P_PA_DEBUG_MODE = 'Y' THEN

3028: --Validate plan version id
3029:
3030: IF (p_fin_plan_version_id IS NULL)
3031: THEN
3032: IF P_PA_DEBUG_MODE = 'Y' THEN
3033: pa_debug.g_err_stage:= 'fin_plan_version_id = '|| p_fin_plan_version_id;
3034: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3035: END IF;
3036:

Line 3033: pa_debug.g_err_stage:= 'fin_plan_version_id = '|| p_fin_plan_version_id;

3029:
3030: IF (p_fin_plan_version_id IS NULL)
3031: THEN
3032: IF P_PA_DEBUG_MODE = 'Y' THEN
3033: pa_debug.g_err_stage:= 'fin_plan_version_id = '|| p_fin_plan_version_id;
3034: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3035: END IF;
3036:
3037: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

Line 3034: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);

3030: IF (p_fin_plan_version_id IS NULL)
3031: THEN
3032: IF P_PA_DEBUG_MODE = 'Y' THEN
3033: pa_debug.g_err_stage:= 'fin_plan_version_id = '|| p_fin_plan_version_id;
3034: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3035: END IF;
3036:
3037: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
3038: p_msg_name => 'PA_FP_INV_PARAM_PASSED');

Line 3115: IF P_PA_DEBUG_MODE = 'Y' THEN

3111:
3112: END LOOP;
3113: END IF;
3114:
3115: IF P_PA_DEBUG_MODE = 'Y' THEN
3116: pa_debug.g_err_stage:= 'populated the plsql tables';
3117: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3118:
3119: pa_debug.g_err_stage:= 'Delete records if any from the rollup tmp';

Line 3116: pa_debug.g_err_stage:= 'populated the plsql tables';

3112: END LOOP;
3113: END IF;
3114:
3115: IF P_PA_DEBUG_MODE = 'Y' THEN
3116: pa_debug.g_err_stage:= 'populated the plsql tables';
3117: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3118:
3119: pa_debug.g_err_stage:= 'Delete records if any from the rollup tmp';
3120: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

Line 3117: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

3113: END IF;
3114:
3115: IF P_PA_DEBUG_MODE = 'Y' THEN
3116: pa_debug.g_err_stage:= 'populated the plsql tables';
3117: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3118:
3119: pa_debug.g_err_stage:= 'Delete records if any from the rollup tmp';
3120: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3121: END IF;

Line 3119: pa_debug.g_err_stage:= 'Delete records if any from the rollup tmp';

3115: IF P_PA_DEBUG_MODE = 'Y' THEN
3116: pa_debug.g_err_stage:= 'populated the plsql tables';
3117: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3118:
3119: pa_debug.g_err_stage:= 'Delete records if any from the rollup tmp';
3120: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3121: END IF;
3122:
3123: delete from pa_fp_rollup_tmp; /* Included after UT */

Line 3120: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

3116: pa_debug.g_err_stage:= 'populated the plsql tables';
3117: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3118:
3119: pa_debug.g_err_stage:= 'Delete records if any from the rollup tmp';
3120: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3121: END IF;
3122:
3123: delete from pa_fp_rollup_tmp; /* Included after UT */
3124:

Line 3129: IF P_PA_DEBUG_MODE = 'Y' THEN

3125: /* 2727304: Getting the Proj and Proj Func Currencies of the Fin Plan version's project.
3126: These will be used to populate the Proj and Projfunc currency codes in the
3127: pa_fp_rollup_tmp table in case they are not being passed to this API. */
3128:
3129: IF P_PA_DEBUG_MODE = 'Y' THEN
3130: pa_debug.g_err_stage:= 'Getting the proj and projfunc currency codes';
3131: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
3132: END IF;
3133:

Line 3130: pa_debug.g_err_stage:= 'Getting the proj and projfunc currency codes';

3126: These will be used to populate the Proj and Projfunc currency codes in the
3127: pa_fp_rollup_tmp table in case they are not being passed to this API. */
3128:
3129: IF P_PA_DEBUG_MODE = 'Y' THEN
3130: pa_debug.g_err_stage:= 'Getting the proj and projfunc currency codes';
3131: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
3132: END IF;
3133:
3134: SELECT project_currency_code

Line 3131: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);

3127: pa_fp_rollup_tmp table in case they are not being passed to this API. */
3128:
3129: IF P_PA_DEBUG_MODE = 'Y' THEN
3130: pa_debug.g_err_stage:= 'Getting the proj and projfunc currency codes';
3131: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL3);
3132: END IF;
3133:
3134: SELECT project_currency_code
3135: ,projfunc_currency_code

Line 3280: IF P_PA_DEBUG_MODE = 'Y' THEN

3276: ,p_fin_plan_version_id
3277: );
3278: END IF;
3279:
3280: IF P_PA_DEBUG_MODE = 'Y' THEN
3281: pa_debug.g_err_stage:= 'number of records inserted -> ' || sql%ROWCOUNT;
3282: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3283: END IF;
3284:

Line 3281: pa_debug.g_err_stage:= 'number of records inserted -> ' || sql%ROWCOUNT;

3277: );
3278: END IF;
3279:
3280: IF P_PA_DEBUG_MODE = 'Y' THEN
3281: pa_debug.g_err_stage:= 'number of records inserted -> ' || sql%ROWCOUNT;
3282: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3283: END IF;
3284:
3285: --Call procedure pa_fp_elements_pub.CREATE_ASSGMT_FROM_ROLLUPTMP to create

Line 3282: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

3278: END IF;
3279:
3280: IF P_PA_DEBUG_MODE = 'Y' THEN
3281: pa_debug.g_err_stage:= 'number of records inserted -> ' || sql%ROWCOUNT;
3282: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3283: END IF;
3284:
3285: --Call procedure pa_fp_elements_pub.CREATE_ASSGMT_FROM_ROLLUPTMP to create
3286: --resource assignments and elements.

Line 3288: IF P_PA_DEBUG_MODE = 'Y' THEN

3284:
3285: --Call procedure pa_fp_elements_pub.CREATE_ASSGMT_FROM_ROLLUPTMP to create
3286: --resource assignments and elements.
3287:
3288: IF P_PA_DEBUG_MODE = 'Y' THEN
3289: pa_debug.g_err_stage:= 'calling create_assgmt_from_rolluptmp';
3290: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3291: END IF;
3292:

Line 3289: pa_debug.g_err_stage:= 'calling create_assgmt_from_rolluptmp';

3285: --Call procedure pa_fp_elements_pub.CREATE_ASSGMT_FROM_ROLLUPTMP to create
3286: --resource assignments and elements.
3287:
3288: IF P_PA_DEBUG_MODE = 'Y' THEN
3289: pa_debug.g_err_stage:= 'calling create_assgmt_from_rolluptmp';
3290: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3291: END IF;
3292:
3293: pa_fp_elements_pub.create_assgmt_from_rolluptmp

Line 3290: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

3286: --resource assignments and elements.
3287:
3288: IF P_PA_DEBUG_MODE = 'Y' THEN
3289: pa_debug.g_err_stage:= 'calling create_assgmt_from_rolluptmp';
3290: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3291: END IF;
3292:
3293: pa_fp_elements_pub.create_assgmt_from_rolluptmp
3294: ( p_fin_plan_version_id => p_fin_plan_version_id

Line 3300: IF P_PA_DEBUG_MODE = 'Y' THEN

3296: ,x_msg_count => x_msg_count
3297: ,x_msg_data => x_msg_data );
3298:
3299: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3300: IF P_PA_DEBUG_MODE = 'Y' THEN
3301: pa_debug.g_err_stage:= 'Error Calling create_assgmt_from_rolluptmp';
3302: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3303: END IF;
3304: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 3301: pa_debug.g_err_stage:= 'Error Calling create_assgmt_from_rolluptmp';

3297: ,x_msg_data => x_msg_data );
3298:
3299: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3300: IF P_PA_DEBUG_MODE = 'Y' THEN
3301: pa_debug.g_err_stage:= 'Error Calling create_assgmt_from_rolluptmp';
3302: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3303: END IF;
3304: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3305: END IF;

Line 3302: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);

3298:
3299: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3300: IF P_PA_DEBUG_MODE = 'Y' THEN
3301: pa_debug.g_err_stage:= 'Error Calling create_assgmt_from_rolluptmp';
3302: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3303: END IF;
3304: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3305: END IF;
3306:

Line 3311: IF P_PA_DEBUG_MODE = 'Y' THEN

3307: --Bug # 3507156-
3308: --Commented the api PROCESS_MODIFIED_LINES
3309: --Comment START
3310: /*
3311: IF P_PA_DEBUG_MODE = 'Y' THEN
3312: pa_debug.g_err_stage:= 'calling PROCESS_MODIFIED_LINES';
3313: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3314: END IF;
3315:

Line 3312: pa_debug.g_err_stage:= 'calling PROCESS_MODIFIED_LINES';

3308: --Commented the api PROCESS_MODIFIED_LINES
3309: --Comment START
3310: /*
3311: IF P_PA_DEBUG_MODE = 'Y' THEN
3312: pa_debug.g_err_stage:= 'calling PROCESS_MODIFIED_LINES';
3313: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3314: END IF;
3315:
3316: --Call process_modified_lines in edit line package.

Line 3313: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

3309: --Comment START
3310: /*
3311: IF P_PA_DEBUG_MODE = 'Y' THEN
3312: pa_debug.g_err_stage:= 'calling PROCESS_MODIFIED_LINES';
3313: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3314: END IF;
3315:
3316: --Call process_modified_lines in edit line package.
3317: PA_FP_EDIT_LINE_PKG.PROCESS_MODIFIED_LINES

Line 3327: IF P_PA_DEBUG_MODE = 'Y' THEN

3323: ,x_msg_data => x_msg_data );
3324:
3325: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3326:
3327: IF P_PA_DEBUG_MODE = 'Y' THEN
3328: pa_debug.g_err_stage:= 'Error Calling PROCESS_MODIFIED_LINES';
3329: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3330: END IF;
3331: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 3328: pa_debug.g_err_stage:= 'Error Calling PROCESS_MODIFIED_LINES';

3324:
3325: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3326:
3327: IF P_PA_DEBUG_MODE = 'Y' THEN
3328: pa_debug.g_err_stage:= 'Error Calling PROCESS_MODIFIED_LINES';
3329: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3330: END IF;
3331: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3332: END IF;

Line 3329: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);

3325: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3326:
3327: IF P_PA_DEBUG_MODE = 'Y' THEN
3328: pa_debug.g_err_stage:= 'Error Calling PROCESS_MODIFIED_LINES';
3329: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3330: END IF;
3331: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3332: END IF;
3333:

Line 3334: IF P_PA_DEBUG_MODE = 'Y' THEN

3330: END IF;
3331: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3332: END IF;
3333:
3334: IF P_PA_DEBUG_MODE = 'Y' THEN
3335: pa_debug.g_err_stage:= 'Exiting CREATE_FINPLAN_LINES';
3336: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3337: END IF;
3338:

Line 3335: pa_debug.g_err_stage:= 'Exiting CREATE_FINPLAN_LINES';

3331: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3332: END IF;
3333:
3334: IF P_PA_DEBUG_MODE = 'Y' THEN
3335: pa_debug.g_err_stage:= 'Exiting CREATE_FINPLAN_LINES';
3336: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3337: END IF;
3338:
3339: */

Line 3336: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

3332: END IF;
3333:
3334: IF P_PA_DEBUG_MODE = 'Y' THEN
3335: pa_debug.g_err_stage:= 'Exiting CREATE_FINPLAN_LINES';
3336: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3337: END IF;
3338:
3339: */
3340: --Bug # 3507156-

Line 3507: IF P_PA_DEBUG_MODE = 'Y' THEN

3503: or tmp.txn_burdened_cost IS NOT NULL
3504: or tmp.quantity IS NOT NULL
3505: or tmp.txn_revenue IS NOT NULL));
3506:
3507: IF P_PA_DEBUG_MODE = 'Y' THEN
3508: pa_debug.g_err_stage:= 'number of records inserted -> ' || sql%ROWCOUNT;
3509: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3510: END IF;
3511: ---------------------------------------------------------------------------------------------*/

Line 3508: pa_debug.g_err_stage:= 'number of records inserted -> ' || sql%ROWCOUNT;

3504: or tmp.quantity IS NOT NULL
3505: or tmp.txn_revenue IS NOT NULL));
3506:
3507: IF P_PA_DEBUG_MODE = 'Y' THEN
3508: pa_debug.g_err_stage:= 'number of records inserted -> ' || sql%ROWCOUNT;
3509: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3510: END IF;
3511: ---------------------------------------------------------------------------------------------*/
3512:

Line 3509: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

3505: or tmp.txn_revenue IS NOT NULL));
3506:
3507: IF P_PA_DEBUG_MODE = 'Y' THEN
3508: pa_debug.g_err_stage:= 'number of records inserted -> ' || sql%ROWCOUNT;
3509: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3510: END IF;
3511: ---------------------------------------------------------------------------------------------*/
3512:
3513: /* Bug 4221590:inserting into PA_FP_SPREAD_CALC_TMP1 */

Line 3516: IF P_PA_DEBUG_MODE = 'Y' THEN

3512:
3513: /* Bug 4221590:inserting into PA_FP_SPREAD_CALC_TMP1 */
3514: DELETE FROM PA_FP_SPREAD_CALC_TMP1;
3515:
3516: IF P_PA_DEBUG_MODE = 'Y' THEN
3517: pa_debug.g_err_stage:= 'inserting into pa_fp_spread_calc_tmp1 -> ' || sql%ROWCOUNT;
3518: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3519: END IF;
3520:

Line 3517: pa_debug.g_err_stage:= 'inserting into pa_fp_spread_calc_tmp1 -> ' || sql%ROWCOUNT;

3513: /* Bug 4221590:inserting into PA_FP_SPREAD_CALC_TMP1 */
3514: DELETE FROM PA_FP_SPREAD_CALC_TMP1;
3515:
3516: IF P_PA_DEBUG_MODE = 'Y' THEN
3517: pa_debug.g_err_stage:= 'inserting into pa_fp_spread_calc_tmp1 -> ' || sql%ROWCOUNT;
3518: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3519: END IF;
3520:
3521: INSERT INTO PA_FP_SPREAD_CALC_TMP1(

Line 3518: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

3514: DELETE FROM PA_FP_SPREAD_CALC_TMP1;
3515:
3516: IF P_PA_DEBUG_MODE = 'Y' THEN
3517: pa_debug.g_err_stage:= 'inserting into pa_fp_spread_calc_tmp1 -> ' || sql%ROWCOUNT;
3518: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3519: END IF;
3520:
3521: INSERT INTO PA_FP_SPREAD_CALC_TMP1(
3522: RESOURCE_ASSIGNMENT_ID

Line 3646: IF P_PA_DEBUG_MODE = 'Y' THEN

3642: or tmp.txn_burdened_cost IS NOT NULL
3643: or tmp.quantity IS NOT NULL
3644: or tmp.txn_revenue IS NOT NULL));*/
3645:
3646: IF P_PA_DEBUG_MODE = 'Y' THEN
3647: pa_debug.g_err_stage:= 'number of records inserted -> ' || sql%ROWCOUNT;
3648: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3649: END IF;
3650:

Line 3647: pa_debug.g_err_stage:= 'number of records inserted -> ' || sql%ROWCOUNT;

3643: or tmp.quantity IS NOT NULL
3644: or tmp.txn_revenue IS NOT NULL));*/
3645:
3646: IF P_PA_DEBUG_MODE = 'Y' THEN
3647: pa_debug.g_err_stage:= 'number of records inserted -> ' || sql%ROWCOUNT;
3648: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3649: END IF;
3650:
3651: -- Bug 3861261 Update resource assignments planning start and end date

Line 3648: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

3644: or tmp.txn_revenue IS NOT NULL));*/
3645:
3646: IF P_PA_DEBUG_MODE = 'Y' THEN
3647: pa_debug.g_err_stage:= 'number of records inserted -> ' || sql%ROWCOUNT;
3648: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3649: END IF;
3650:
3651: -- Bug 3861261 Update resource assignments planning start and end date
3652: -- as the min(start_date) and max(end_date) of the corresponding budget lines

Line 3716: IF p_pa_debug_mode = 'Y' THEN

3712: where pra.budget_version_id = p_fin_plan_version_id;
3713: END IF;
3714: --End changes for Bug 6432606
3715:
3716: IF p_pa_debug_mode = 'Y' THEN
3717: pa_debug.reset_err_stack;
3718: END IF;
3719: EXCEPTION
3720: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 3717: pa_debug.reset_err_stack;

3713: END IF;
3714: --End changes for Bug 6432606
3715:
3716: IF p_pa_debug_mode = 'Y' THEN
3717: pa_debug.reset_err_stack;
3718: END IF;
3719: EXCEPTION
3720: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
3721:

Line 3738: IF P_PA_DEBUG_MODE = 'Y' THEN

3734: ELSE
3735: x_msg_count := l_msg_count;
3736: END IF;
3737:
3738: IF P_PA_DEBUG_MODE = 'Y' THEN
3739: pa_debug.g_err_stage:= 'Invalid Arguments Passed';
3740: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3741: pa_debug.reset_err_stack;
3742: END IF;

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

3735: x_msg_count := l_msg_count;
3736: END IF;
3737:
3738: IF P_PA_DEBUG_MODE = 'Y' THEN
3739: pa_debug.g_err_stage:= 'Invalid Arguments Passed';
3740: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3741: pa_debug.reset_err_stack;
3742: END IF;
3743: RAISE;

Line 3740: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);

3736: END IF;
3737:
3738: IF P_PA_DEBUG_MODE = 'Y' THEN
3739: pa_debug.g_err_stage:= 'Invalid Arguments Passed';
3740: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3741: pa_debug.reset_err_stack;
3742: END IF;
3743: RAISE;
3744:

Line 3741: pa_debug.reset_err_stack;

3737:
3738: IF P_PA_DEBUG_MODE = 'Y' THEN
3739: pa_debug.g_err_stage:= 'Invalid Arguments Passed';
3740: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3741: pa_debug.reset_err_stack;
3742: END IF;
3743: RAISE;
3744:
3745: WHEN others THEN

Line 3752: IF P_PA_DEBUG_MODE = 'Y' THEN

3748: x_msg_count := 1;
3749: x_msg_data := SQLERRM;
3750: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_pvt'
3751: ,p_procedure_name => 'CREATE_FINPLAN_LINES');
3752: IF P_PA_DEBUG_MODE = 'Y' THEN
3753: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
3754: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3755: pa_debug.reset_err_stack;
3756: END IF;

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

3749: x_msg_data := SQLERRM;
3750: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_pvt'
3751: ,p_procedure_name => 'CREATE_FINPLAN_LINES');
3752: IF P_PA_DEBUG_MODE = 'Y' THEN
3753: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
3754: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3755: pa_debug.reset_err_stack;
3756: END IF;
3757: RAISE;

Line 3754: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);

3750: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_pvt'
3751: ,p_procedure_name => 'CREATE_FINPLAN_LINES');
3752: IF P_PA_DEBUG_MODE = 'Y' THEN
3753: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
3754: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3755: pa_debug.reset_err_stack;
3756: END IF;
3757: RAISE;
3758:

Line 3755: pa_debug.reset_err_stack;

3751: ,p_procedure_name => 'CREATE_FINPLAN_LINES');
3752: IF P_PA_DEBUG_MODE = 'Y' THEN
3753: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
3754: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3755: pa_debug.reset_err_stack;
3756: END IF;
3757: RAISE;
3758:
3759: END CREATE_FINPLAN_LINES;

Line 3834: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');

3830: BEGIN
3831:
3832: x_msg_count := 0;
3833: x_return_status := FND_API.G_RET_STS_SUCCESS;
3834: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
3835:
3836: IF p_pa_debug_mode = 'Y' THEN
3837: pa_debug.set_curr_function( p_function => 'convert_plan_type_name_to_id',
3838: p_debug_mode => l_debug_mode );

Line 3836: IF p_pa_debug_mode = 'Y' THEN

3832: x_msg_count := 0;
3833: x_return_status := FND_API.G_RET_STS_SUCCESS;
3834: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
3835:
3836: IF p_pa_debug_mode = 'Y' THEN
3837: pa_debug.set_curr_function( p_function => 'convert_plan_type_name_to_id',
3838: p_debug_mode => l_debug_mode );
3839: END IF;
3840: -- If fin plan type id is passed. validate the fin plan type id. If it is not passed

Line 3837: pa_debug.set_curr_function( p_function => 'convert_plan_type_name_to_id',

3833: x_return_status := FND_API.G_RET_STS_SUCCESS;
3834: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
3835:
3836: IF p_pa_debug_mode = 'Y' THEN
3837: pa_debug.set_curr_function( p_function => 'convert_plan_type_name_to_id',
3838: p_debug_mode => l_debug_mode );
3839: END IF;
3840: -- If fin plan type id is passed. validate the fin plan type id. If it is not passed
3841: -- then convert name to fin plan type id

Line 3859: pa_debug.g_err_stage := 'p_fin_plan_type_id is '||p_fin_plan_type_id ;

3855: x_return_status := FND_API.G_RET_STS_ERROR;
3856: x_fin_plan_type_id:=NULL;
3857: CLOSE l_fin_plan_type_id_csr;
3858: IF l_debug_mode='Y' THEN
3859: pa_debug.g_err_stage := 'p_fin_plan_type_id is '||p_fin_plan_type_id ;
3860: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name
3861: ,pa_debug.g_err_stage,l_debug_level5);
3862: END IF;
3863: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 3860: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name

3856: x_fin_plan_type_id:=NULL;
3857: CLOSE l_fin_plan_type_id_csr;
3858: IF l_debug_mode='Y' THEN
3859: pa_debug.g_err_stage := 'p_fin_plan_type_id is '||p_fin_plan_type_id ;
3860: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name
3861: ,pa_debug.g_err_stage,l_debug_level5);
3862: END IF;
3863: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3864:

Line 3861: ,pa_debug.g_err_stage,l_debug_level5);

3857: CLOSE l_fin_plan_type_id_csr;
3858: IF l_debug_mode='Y' THEN
3859: pa_debug.g_err_stage := 'p_fin_plan_type_id is '||p_fin_plan_type_id ;
3860: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name
3861: ,pa_debug.g_err_stage,l_debug_level5);
3862: END IF;
3863: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3864:
3865: ELSE

Line 3885: pa_debug.g_err_stage := 'p_fin_plan_type_name is '||p_fin_plan_type_name ;

3881: p_value1 => p_fin_plan_type_name);
3882:
3883: x_return_status := FND_API.G_RET_STS_ERROR;
3884: IF l_debug_mode='Y' THEN
3885: pa_debug.g_err_stage := 'p_fin_plan_type_name is '||p_fin_plan_type_name ;
3886: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name
3887: ,pa_debug.g_err_stage,l_debug_level5);
3888: END IF;
3889: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 3886: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name

3882:
3883: x_return_status := FND_API.G_RET_STS_ERROR;
3884: IF l_debug_mode='Y' THEN
3885: pa_debug.g_err_stage := 'p_fin_plan_type_name is '||p_fin_plan_type_name ;
3886: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name
3887: ,pa_debug.g_err_stage,l_debug_level5);
3888: END IF;
3889: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3890:

Line 3887: ,pa_debug.g_err_stage,l_debug_level5);

3883: x_return_status := FND_API.G_RET_STS_ERROR;
3884: IF l_debug_mode='Y' THEN
3885: pa_debug.g_err_stage := 'p_fin_plan_type_name is '||p_fin_plan_type_name ;
3886: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name
3887: ,pa_debug.g_err_stage,l_debug_level5);
3888: END IF;
3889: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3890:
3891: END IF;

Line 3893: pa_debug.g_err_stage := 'x_fin_plan_type_id derived is '||x_fin_plan_type_id ;

3889: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3890:
3891: END IF;
3892: IF l_debug_mode='Y' THEN
3893: pa_debug.g_err_stage := 'x_fin_plan_type_id derived is '||x_fin_plan_type_id ;
3894: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name
3895: ,pa_debug.g_err_stage,l_debug_level5);
3896: END IF;
3897:

Line 3894: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name

3890:
3891: END IF;
3892: IF l_debug_mode='Y' THEN
3893: pa_debug.g_err_stage := 'x_fin_plan_type_id derived is '||x_fin_plan_type_id ;
3894: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name
3895: ,pa_debug.g_err_stage,l_debug_level5);
3896: END IF;
3897:
3898:

Line 3895: ,pa_debug.g_err_stage,l_debug_level5);

3891: END IF;
3892: IF l_debug_mode='Y' THEN
3893: pa_debug.g_err_stage := 'x_fin_plan_type_id derived is '||x_fin_plan_type_id ;
3894: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name
3895: ,pa_debug.g_err_stage,l_debug_level5);
3896: END IF;
3897:
3898:
3899: ELSE

Line 3910: pa_debug.g_err_stage := 'p_fin_plan_type_name is '||p_fin_plan_type_name ;

3906: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3907: END IF;
3908:
3909: IF l_debug_mode='Y' THEN
3910: pa_debug.g_err_stage := 'p_fin_plan_type_name is '||p_fin_plan_type_name ;
3911: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name
3912: ,pa_debug.g_err_stage,l_debug_level5);
3913: pa_debug.reset_curr_function;
3914: END IF;

Line 3911: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name

3907: END IF;
3908:
3909: IF l_debug_mode='Y' THEN
3910: pa_debug.g_err_stage := 'p_fin_plan_type_name is '||p_fin_plan_type_name ;
3911: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name
3912: ,pa_debug.g_err_stage,l_debug_level5);
3913: pa_debug.reset_curr_function;
3914: END IF;
3915: EXCEPTION

Line 3912: ,pa_debug.g_err_stage,l_debug_level5);

3908:
3909: IF l_debug_mode='Y' THEN
3910: pa_debug.g_err_stage := 'p_fin_plan_type_name is '||p_fin_plan_type_name ;
3911: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name
3912: ,pa_debug.g_err_stage,l_debug_level5);
3913: pa_debug.reset_curr_function;
3914: END IF;
3915: EXCEPTION
3916: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 3913: pa_debug.reset_curr_function;

3909: IF l_debug_mode='Y' THEN
3910: pa_debug.g_err_stage := 'p_fin_plan_type_name is '||p_fin_plan_type_name ;
3911: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name
3912: ,pa_debug.g_err_stage,l_debug_level5);
3913: pa_debug.reset_curr_function;
3914: END IF;
3915: EXCEPTION
3916: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
3917:

Line 3938: pa_debug.reset_curr_function;

3934: ELSE
3935: x_msg_count := l_msg_count;
3936: END IF;
3937: IF l_debug_mode='Y' THEN
3938: pa_debug.reset_curr_function;
3939: END IF;
3940: RETURN;
3941:
3942: WHEN OTHERS THEN

Line 3955: pa_debug.g_err_stage:= 'Unexpected Error'||x_msg_data;

3951: ,p_procedure_name => 'convert_plan_type_name_to_id'
3952: ,p_error_text => x_msg_data);
3953:
3954: IF l_debug_mode = 'Y' THEN
3955: pa_debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
3956: pa_debug.write(g_module_name,pa_debug.g_err_stage,
3957: l_debug_level5);
3958: pa_debug.reset_curr_function;
3959: END IF;

Line 3956: pa_debug.write(g_module_name,pa_debug.g_err_stage,

3952: ,p_error_text => x_msg_data);
3953:
3954: IF l_debug_mode = 'Y' THEN
3955: pa_debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
3956: pa_debug.write(g_module_name,pa_debug.g_err_stage,
3957: l_debug_level5);
3958: pa_debug.reset_curr_function;
3959: END IF;
3960: RAISE;

Line 3958: pa_debug.reset_curr_function;

3954: IF l_debug_mode = 'Y' THEN
3955: pa_debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
3956: pa_debug.write(g_module_name,pa_debug.g_err_stage,
3957: l_debug_level5);
3958: pa_debug.reset_curr_function;
3959: END IF;
3960: RAISE;
3961:
3962: END convert_plan_type_name_to_id;

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

4011: BEGIN
4012:
4013: SAVEPOINT DELETE_WP_OPTION_SAVE;
4014:
4015: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4016: l_debug_mode := NVL(l_debug_mode, 'N');
4017: x_msg_count := 0;
4018: x_return_status := FND_API.G_RET_STS_SUCCESS;
4019: IF p_pa_debug_mode = 'Y' THEN

Line 4019: IF p_pa_debug_mode = 'Y' THEN

4015: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4016: l_debug_mode := NVL(l_debug_mode, 'N');
4017: x_msg_count := 0;
4018: x_return_status := FND_API.G_RET_STS_SUCCESS;
4019: IF p_pa_debug_mode = 'Y' THEN
4020: PA_DEBUG.Set_Curr_Function( p_function => 'PA_FIN_PLAN_PVT.Delete_wp_option',
4021: p_debug_mode => l_debug_mode );
4022: END IF;
4023: ---------------------------------------------------------------

Line 4020: PA_DEBUG.Set_Curr_Function( p_function => 'PA_FIN_PLAN_PVT.Delete_wp_option',

4016: l_debug_mode := NVL(l_debug_mode, 'N');
4017: x_msg_count := 0;
4018: x_return_status := FND_API.G_RET_STS_SUCCESS;
4019: IF p_pa_debug_mode = 'Y' THEN
4020: PA_DEBUG.Set_Curr_Function( p_function => 'PA_FIN_PLAN_PVT.Delete_wp_option',
4021: p_debug_mode => l_debug_mode );
4022: END IF;
4023: ---------------------------------------------------------------
4024: -- validating input parameter p_project_id.

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

4024: -- validating input parameter p_project_id.
4025: -- p_project_id cannot be passed as null.
4026: ---------------------------------------------------------------
4027: IF l_debug_mode = 'Y' THEN
4028: pa_debug.g_err_stage:='Validating input parameters';
4029: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);
4030: END IF;
4031:
4032: IF (p_project_id IS NULL)

Line 4029: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);

4025: -- p_project_id cannot be passed as null.
4026: ---------------------------------------------------------------
4027: IF l_debug_mode = 'Y' THEN
4028: pa_debug.g_err_stage:='Validating input parameters';
4029: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);
4030: END IF;
4031:
4032: IF (p_project_id IS NULL)
4033: THEN

Line 4036: pa_debug.write('Delete_wp_options Project Id is null: ' || g_module_name,pa_debug.g_err_stage,5);

4032: IF (p_project_id IS NULL)
4033: THEN
4034:
4035: IF l_debug_mode = 'Y' THEN
4036: pa_debug.write('Delete_wp_options Project Id is null: ' || g_module_name,pa_debug.g_err_stage,5);
4037: END IF;
4038:
4039: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
4040: p_msg_name => 'PA_FP_INV_PARAM_PASSED');

Line 4051: pa_debug.g_err_stage:='Fetching proj_fp_options_id ';

4047: --Fetch proj_fp_options_id
4048: ---------------------------------------------------------------
4049:
4050: IF l_debug_mode = 'Y' THEN
4051: pa_debug.g_err_stage:='Fetching proj_fp_options_id ';
4052: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);
4053: END IF;
4054:
4055: SELECT pfo.proj_fp_options_id

Line 4052: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);

4048: ---------------------------------------------------------------
4049:
4050: IF l_debug_mode = 'Y' THEN
4051: pa_debug.g_err_stage:='Fetching proj_fp_options_id ';
4052: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);
4053: END IF;
4054:
4055: SELECT pfo.proj_fp_options_id
4056: INTO l_proj_fp_options_id

Line 4071: pa_debug.g_err_stage:='Fetching the workplan structure ids for the project id';

4067: -- Delete_wp_budget_versions
4068: -----------------------------------------------------------------
4069:
4070: IF l_debug_mode = 'Y' THEN
4071: pa_debug.g_err_stage:='Fetching the workplan structure ids for the project id';
4072: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);
4073: END IF;
4074:
4075: OPEN c_struct_ver(p_project_id);

Line 4072: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);

4068: -----------------------------------------------------------------
4069:
4070: IF l_debug_mode = 'Y' THEN
4071: pa_debug.g_err_stage:='Fetching the workplan structure ids for the project id';
4072: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);
4073: END IF;
4074:
4075: OPEN c_struct_ver(p_project_id);
4076:

Line 4079: IF p_pa_debug_mode = 'Y' THEN

4075: OPEN c_struct_ver(p_project_id);
4076:
4077: FETCH c_struct_ver BULK COLLECT INTO l_sv_id_tbl;
4078: IF c_struct_ver%NOTFOUND THEN
4079: IF p_pa_debug_mode = 'Y' THEN
4080: pa_debug.g_err_stage:= 'No Structure versions for the project_id passed - project_id: '||p_project_id;
4081: pa_debug.write(g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4082: END IF;
4083: END IF;

Line 4080: pa_debug.g_err_stage:= 'No Structure versions for the project_id passed - project_id: '||p_project_id;

4076:
4077: FETCH c_struct_ver BULK COLLECT INTO l_sv_id_tbl;
4078: IF c_struct_ver%NOTFOUND THEN
4079: IF p_pa_debug_mode = 'Y' THEN
4080: pa_debug.g_err_stage:= 'No Structure versions for the project_id passed - project_id: '||p_project_id;
4081: pa_debug.write(g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4082: END IF;
4083: END IF;
4084: CLOSE c_struct_ver;

Line 4081: pa_debug.write(g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

4077: FETCH c_struct_ver BULK COLLECT INTO l_sv_id_tbl;
4078: IF c_struct_ver%NOTFOUND THEN
4079: IF p_pa_debug_mode = 'Y' THEN
4080: pa_debug.g_err_stage:= 'No Structure versions for the project_id passed - project_id: '||p_project_id;
4081: pa_debug.write(g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4082: END IF;
4083: END IF;
4084: CLOSE c_struct_ver;
4085:

Line 4091: pa_debug.g_err_stage:='Deleting all version data for the wp structure version ids pertaining to project_id:'||p_project_id;

4087:
4088: IF l_sv_id_count > 0 THEN
4089:
4090: IF l_debug_mode = 'Y' THEN
4091: pa_debug.g_err_stage:='Deleting all version data for the wp structure version ids pertaining to project_id:'||p_project_id;
4092: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);
4093: END IF;
4094:
4095: Delete_wp_budget_versions

Line 4092: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);

4088: IF l_sv_id_count > 0 THEN
4089:
4090: IF l_debug_mode = 'Y' THEN
4091: pa_debug.g_err_stage:='Deleting all version data for the wp structure version ids pertaining to project_id:'||p_project_id;
4092: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);
4093: END IF;
4094:
4095: Delete_wp_budget_versions
4096: (p_struct_elem_version_id_tbl => l_sv_id_tbl

Line 4104: pa_debug.g_err_stage:='Call to Delete_wp_budget_versions is returning error status';

4100:
4101: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4102:
4103: IF l_debug_mode = 'Y' THEN
4104: pa_debug.g_err_stage:='Call to Delete_wp_budget_versions is returning error status';
4105: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);
4106: END IF;
4107: RAISE Delete_Ver_Exc_PVT;
4108: END IF;

Line 4105: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);

4101: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4102:
4103: IF l_debug_mode = 'Y' THEN
4104: pa_debug.g_err_stage:='Call to Delete_wp_budget_versions is returning error status';
4105: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);
4106: END IF;
4107: RAISE Delete_Ver_Exc_PVT;
4108: END IF;
4109:

Line 4119: pa_debug.g_err_stage:='Deleting data from respective tables';

4115: --Deleting data from respective tables
4116: ---------------------------------------------------------------
4117:
4118: IF l_debug_mode = 'Y' THEN
4119: pa_debug.g_err_stage:='Deleting data from respective tables';
4120: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);
4121: END IF;
4122:
4123: -- delete from pa_proj_fp_options table

Line 4120: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);

4116: ---------------------------------------------------------------
4117:
4118: IF l_debug_mode = 'Y' THEN
4119: pa_debug.g_err_stage:='Deleting data from respective tables';
4120: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);
4121: END IF;
4122:
4123: -- delete from pa_proj_fp_options table
4124: DELETE FROM pa_proj_fp_options WHERE proj_fp_options_id = l_proj_fp_options_id;

Line 4133: pa_debug.reset_curr_function;

4129: -- delete from pa_fp_upgrade_audit
4130: DELETE FROM pa_fp_upgrade_audit WHERE proj_fp_options_id = l_proj_fp_options_id;
4131:
4132: IF l_debug_mode = 'Y' THEN
4133: pa_debug.reset_curr_function;
4134: END IF;
4135: EXCEPTION
4136: WHEN NO_DATA_FOUND THEN
4137: IF l_debug_mode = 'Y' THEN

Line 4138: pa_debug.reset_curr_function;

4134: END IF;
4135: EXCEPTION
4136: WHEN NO_DATA_FOUND THEN
4137: IF l_debug_mode = 'Y' THEN
4138: pa_debug.reset_curr_function;
4139: END IF;
4140: WHEN Delete_Ver_Exc_PVT THEN
4141: ROLLBACK TO SAVEPOINT PA_FP_PUB_DELETE_VER;
4142: l_msg_count := FND_MSG_PUB.count_msg;

Line 4160: pa_debug.g_err_stage:='Delete_wp_budget_versions returned error';

4156:
4157: x_return_status := FND_API.G_RET_STS_ERROR;
4158:
4159: IF l_debug_mode = 'Y' THEN
4160: pa_debug.g_err_stage:='Delete_wp_budget_versions returned error';
4161: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,5);
4162: pa_debug.reset_curr_function;
4163: END IF;
4164:

Line 4161: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,5);

4157: x_return_status := FND_API.G_RET_STS_ERROR;
4158:
4159: IF l_debug_mode = 'Y' THEN
4160: pa_debug.g_err_stage:='Delete_wp_budget_versions returned error';
4161: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,5);
4162: pa_debug.reset_curr_function;
4163: END IF;
4164:
4165: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 4162: pa_debug.reset_curr_function;

4158:
4159: IF l_debug_mode = 'Y' THEN
4160: pa_debug.g_err_stage:='Delete_wp_budget_versions returned error';
4161: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,5);
4162: pa_debug.reset_curr_function;
4163: END IF;
4164:
4165: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
4166: l_msg_count := FND_MSG_PUB.count_msg;

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

4180:
4181: x_return_status := FND_API.G_RET_STS_ERROR;
4182:
4183: IF l_debug_mode = 'Y' THEN
4184: pa_debug.g_err_stage:='Invalid Arguments Passed';
4185: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,5);
4186: pa_debug.reset_curr_function;
4187: END IF;
4188:

Line 4185: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,5);

4181: x_return_status := FND_API.G_RET_STS_ERROR;
4182:
4183: IF l_debug_mode = 'Y' THEN
4184: pa_debug.g_err_stage:='Invalid Arguments Passed';
4185: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,5);
4186: pa_debug.reset_curr_function;
4187: END IF;
4188:
4189: WHEN Others THEN

Line 4186: pa_debug.reset_curr_function;

4182:
4183: IF l_debug_mode = 'Y' THEN
4184: pa_debug.g_err_stage:='Invalid Arguments Passed';
4185: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,5);
4186: pa_debug.reset_curr_function;
4187: END IF;
4188:
4189: WHEN Others THEN
4190: ROLLBACK TO SAVEPOINT DELETE_WP_OPTION_SAVE;

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

4194: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PVT'
4195: ,p_procedure_name => 'Delete_wp_option');
4196:
4197: IF l_debug_mode = 'Y' THEN
4198: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
4199: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,5);
4200: pa_debug.reset_curr_function;
4201: END IF;
4202: RAISE;

Line 4199: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,5);

4195: ,p_procedure_name => 'Delete_wp_option');
4196:
4197: IF l_debug_mode = 'Y' THEN
4198: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
4199: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,5);
4200: pa_debug.reset_curr_function;
4201: END IF;
4202: RAISE;
4203:

Line 4200: pa_debug.reset_curr_function;

4196:
4197: IF l_debug_mode = 'Y' THEN
4198: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
4199: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,5);
4200: pa_debug.reset_curr_function;
4201: END IF;
4202: RAISE;
4203:
4204: END Delete_wp_option;

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

4237:
4238: BEGIN
4239: SAVEPOINT PA_FP_PUB_DELETE_VER;
4240:
4241: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4242: l_debug_mode := NVL(l_debug_mode, 'N');
4243: x_msg_count := 0;
4244: x_return_status := FND_API.G_RET_STS_SUCCESS;
4245: IF p_pa_debug_mode = 'Y' THEN

Line 4245: IF p_pa_debug_mode = 'Y' THEN

4241: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4242: l_debug_mode := NVL(l_debug_mode, 'N');
4243: x_msg_count := 0;
4244: x_return_status := FND_API.G_RET_STS_SUCCESS;
4245: IF p_pa_debug_mode = 'Y' THEN
4246: PA_DEBUG.Set_Curr_Function( p_function => 'PA_FIN_PLAN_PVT.Delete_wp_bugdet_versions',
4247: p_debug_mode => l_debug_mode );
4248: END IF;
4249:

Line 4246: PA_DEBUG.Set_Curr_Function( p_function => 'PA_FIN_PLAN_PVT.Delete_wp_bugdet_versions',

4242: l_debug_mode := NVL(l_debug_mode, 'N');
4243: x_msg_count := 0;
4244: x_return_status := FND_API.G_RET_STS_SUCCESS;
4245: IF p_pa_debug_mode = 'Y' THEN
4246: PA_DEBUG.Set_Curr_Function( p_function => 'PA_FIN_PLAN_PVT.Delete_wp_bugdet_versions',
4247: p_debug_mode => l_debug_mode );
4248: END IF;
4249:
4250: ------------------------------------------------------------------------

Line 4255: pa_debug.g_err_stage:='Checking for existence of data in PLsql table p_struct_elem_version_id_tbl';

4251: -- Check if the PLSql Table p_struct_elem_version_id_tbl has no records.
4252: ------------------------------------------------------------------------
4253:
4254: IF l_debug_mode = 'Y' THEN
4255: pa_debug.g_err_stage:='Checking for existence of data in PLsql table p_struct_elem_version_id_tbl';
4256: pa_debug.write('Delete_wp_bugdet_versions: ' || g_module_name,pa_debug.g_err_stage,3);
4257: END IF;
4258:
4259: l_sv_id_tbl_count := p_struct_elem_version_id_tbl.COUNT;

Line 4256: pa_debug.write('Delete_wp_bugdet_versions: ' || g_module_name,pa_debug.g_err_stage,3);

4252: ------------------------------------------------------------------------
4253:
4254: IF l_debug_mode = 'Y' THEN
4255: pa_debug.g_err_stage:='Checking for existence of data in PLsql table p_struct_elem_version_id_tbl';
4256: pa_debug.write('Delete_wp_bugdet_versions: ' || g_module_name,pa_debug.g_err_stage,3);
4257: END IF;
4258:
4259: l_sv_id_tbl_count := p_struct_elem_version_id_tbl.COUNT;
4260:

Line 4276: pa_debug.g_err_stage:='Outer loop : '||i;

4272: --------------------------------------------------
4273: FOR i in p_struct_elem_version_id_tbl.first .. p_struct_elem_version_id_tbl.last LOOP --LoopA
4274:
4275: IF l_debug_mode = 'Y' THEN
4276: pa_debug.g_err_stage:='Outer loop : '||i;
4277: pa_debug.write('Delete_wp_bugdet_versions: ' || g_module_name,pa_debug.g_err_stage,3);
4278: END IF;
4279:
4280: -----------------------------------------------------------

Line 4277: pa_debug.write('Delete_wp_bugdet_versions: ' || g_module_name,pa_debug.g_err_stage,3);

4273: FOR i in p_struct_elem_version_id_tbl.first .. p_struct_elem_version_id_tbl.last LOOP --LoopA
4274:
4275: IF l_debug_mode = 'Y' THEN
4276: pa_debug.g_err_stage:='Outer loop : '||i;
4277: pa_debug.write('Delete_wp_bugdet_versions: ' || g_module_name,pa_debug.g_err_stage,3);
4278: END IF;
4279:
4280: -----------------------------------------------------------
4281: -- For each stucture_version_id fetch the budget_version_id

Line 4291: IF p_pa_debug_mode = 'Y' THEN

4287: -- iterate through the out loop LoopA
4288: ------------------------------------------------------------------
4289:
4290: IF c_budget_ver%NOTFOUND THEN
4291: IF p_pa_debug_mode = 'Y' THEN
4292: pa_debug.g_err_stage:= 'Could not fetch budget_version_id !!!...';
4293: pa_debug.write(g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4294: END IF;
4295: EXIT; -- Come out of LoopB, Jump to next iteration of LoopA

Line 4292: pa_debug.g_err_stage:= 'Could not fetch budget_version_id !!!...';

4288: ------------------------------------------------------------------
4289:
4290: IF c_budget_ver%NOTFOUND THEN
4291: IF p_pa_debug_mode = 'Y' THEN
4292: pa_debug.g_err_stage:= 'Could not fetch budget_version_id !!!...';
4293: pa_debug.write(g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4294: END IF;
4295: EXIT; -- Come out of LoopB, Jump to next iteration of LoopA
4296: END IF;

Line 4293: pa_debug.write(g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

4289:
4290: IF c_budget_ver%NOTFOUND THEN
4291: IF p_pa_debug_mode = 'Y' THEN
4292: pa_debug.g_err_stage:= 'Could not fetch budget_version_id !!!...';
4293: pa_debug.write(g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4294: END IF;
4295: EXIT; -- Come out of LoopB, Jump to next iteration of LoopA
4296: END IF;
4297:

Line 4317: IF p_pa_debug_mode = 'Y' THEN

4313: END IF;
4314:
4315: END LOOP; -- LoopB Closed
4316: END LOOP; -- LoopA Closed
4317: IF p_pa_debug_mode = 'Y' THEN
4318: pa_debug.reset_curr_function;
4319: END IF;
4320: EXCEPTION
4321:

Line 4318: pa_debug.reset_curr_function;

4314:
4315: END LOOP; -- LoopB Closed
4316: END LOOP; -- LoopA Closed
4317: IF p_pa_debug_mode = 'Y' THEN
4318: pa_debug.reset_curr_function;
4319: END IF;
4320: EXCEPTION
4321:
4322: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

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

4337:
4338: x_return_status := FND_API.G_RET_STS_ERROR;
4339:
4340: IF l_debug_mode = 'Y' THEN
4341: pa_debug.g_err_stage:='Invalid Arguments Passed';
4342: pa_debug.write('Delete_wp_budget_version: ' || g_module_name,pa_debug.g_err_stage,5);
4343: pa_debug.reset_curr_function;
4344: END IF;
4345:

Line 4342: pa_debug.write('Delete_wp_budget_version: ' || g_module_name,pa_debug.g_err_stage,5);

4338: x_return_status := FND_API.G_RET_STS_ERROR;
4339:
4340: IF l_debug_mode = 'Y' THEN
4341: pa_debug.g_err_stage:='Invalid Arguments Passed';
4342: pa_debug.write('Delete_wp_budget_version: ' || g_module_name,pa_debug.g_err_stage,5);
4343: pa_debug.reset_curr_function;
4344: END IF;
4345:
4346: WHEN Delete_Ver_Exc_PVT THEN

Line 4343: pa_debug.reset_curr_function;

4339:
4340: IF l_debug_mode = 'Y' THEN
4341: pa_debug.g_err_stage:='Invalid Arguments Passed';
4342: pa_debug.write('Delete_wp_budget_version: ' || g_module_name,pa_debug.g_err_stage,5);
4343: pa_debug.reset_curr_function;
4344: END IF;
4345:
4346: WHEN Delete_Ver_Exc_PVT THEN
4347: ROLLBACK TO SAVEPOINT PA_FP_PUB_DELETE_VER;

Line 4365: pa_debug.g_err_stage:='Delete_version_helper returned error';

4361: END IF;
4362: x_return_status := FND_API.G_RET_STS_ERROR;
4363:
4364: IF l_debug_mode = 'Y' THEN
4365: pa_debug.g_err_stage:='Delete_version_helper returned error';
4366: pa_debug.write('Delete_wp_options: ' || g_module_name,pa_debug.g_err_stage,5);
4367: pa_debug.reset_curr_function;
4368: END IF;
4369:

Line 4366: pa_debug.write('Delete_wp_options: ' || g_module_name,pa_debug.g_err_stage,5);

4362: x_return_status := FND_API.G_RET_STS_ERROR;
4363:
4364: IF l_debug_mode = 'Y' THEN
4365: pa_debug.g_err_stage:='Delete_version_helper returned error';
4366: pa_debug.write('Delete_wp_options: ' || g_module_name,pa_debug.g_err_stage,5);
4367: pa_debug.reset_curr_function;
4368: END IF;
4369:
4370: WHEN Others THEN

Line 4367: pa_debug.reset_curr_function;

4363:
4364: IF l_debug_mode = 'Y' THEN
4365: pa_debug.g_err_stage:='Delete_version_helper returned error';
4366: pa_debug.write('Delete_wp_options: ' || g_module_name,pa_debug.g_err_stage,5);
4367: pa_debug.reset_curr_function;
4368: END IF;
4369:
4370: WHEN Others THEN
4371: ROLLBACK TO SAVEPOINT DELETE_WP_OPTION_SAVE;

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

4375: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PVT'
4376: ,p_procedure_name => 'Delete_wp_budget_versions');
4377:
4378: IF l_debug_mode = 'Y' THEN
4379: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
4380: pa_debug.write('Delete_wp_budget_versions: ' || g_module_name,pa_debug.g_err_stage,5);
4381: pa_debug.reset_curr_function;
4382: END IF;
4383: RAISE;

Line 4380: pa_debug.write('Delete_wp_budget_versions: ' || g_module_name,pa_debug.g_err_stage,5);

4376: ,p_procedure_name => 'Delete_wp_budget_versions');
4377:
4378: IF l_debug_mode = 'Y' THEN
4379: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
4380: pa_debug.write('Delete_wp_budget_versions: ' || g_module_name,pa_debug.g_err_stage,5);
4381: pa_debug.reset_curr_function;
4382: END IF;
4383: RAISE;
4384:

Line 4381: pa_debug.reset_curr_function;

4377:
4378: IF l_debug_mode = 'Y' THEN
4379: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
4380: pa_debug.write('Delete_wp_budget_versions: ' || g_module_name,pa_debug.g_err_stage,5);
4381: pa_debug.reset_curr_function;
4382: END IF;
4383: RAISE;
4384:
4385: END Delete_wp_budget_versions;

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

4435: BEGIN
4436:
4437: x_msg_count := 0;
4438: x_return_status := FND_API.G_RET_STS_SUCCESS;
4439: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4440: l_debug_mode := NVL(l_debug_mode, 'Y');
4441:
4442: IF p_pa_debug_mode = 'Y' THEN
4443: PA_DEBUG.Set_Curr_Function( p_function => 'PA_FIN_PLAN_PVT.ADD_FIN_PLAN_LINES',

Line 4442: IF p_pa_debug_mode = 'Y' THEN

4438: x_return_status := FND_API.G_RET_STS_SUCCESS;
4439: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4440: l_debug_mode := NVL(l_debug_mode, 'Y');
4441:
4442: IF p_pa_debug_mode = 'Y' THEN
4443: PA_DEBUG.Set_Curr_Function( p_function => 'PA_FIN_PLAN_PVT.ADD_FIN_PLAN_LINES',
4444: p_debug_mode => l_debug_mode );
4445: END IF;
4446: l_lines_count := p_finplan_lines_tab.COUNT;

Line 4443: PA_DEBUG.Set_Curr_Function( p_function => 'PA_FIN_PLAN_PVT.ADD_FIN_PLAN_LINES',

4439: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4440: l_debug_mode := NVL(l_debug_mode, 'Y');
4441:
4442: IF p_pa_debug_mode = 'Y' THEN
4443: PA_DEBUG.Set_Curr_Function( p_function => 'PA_FIN_PLAN_PVT.ADD_FIN_PLAN_LINES',
4444: p_debug_mode => l_debug_mode );
4445: END IF;
4446: l_lines_count := p_finplan_lines_tab.COUNT;
4447: IF l_debug_mode = 'Y' THEN

Line 4448: pa_debug.g_err_stage:='Validating input parameter - plan lines count cannot be 0';

4444: p_debug_mode => l_debug_mode );
4445: END IF;
4446: l_lines_count := p_finplan_lines_tab.COUNT;
4447: IF l_debug_mode = 'Y' THEN
4448: pa_debug.g_err_stage:='Validating input parameter - plan lines count cannot be 0';
4449: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4450: END IF;
4451:
4452: -- Change of Code for Bug 3639983 Starts Here

Line 4449: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

4445: END IF;
4446: l_lines_count := p_finplan_lines_tab.COUNT;
4447: IF l_debug_mode = 'Y' THEN
4448: pa_debug.g_err_stage:='Validating input parameter - plan lines count cannot be 0';
4449: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4450: END IF;
4451:
4452: -- Change of Code for Bug 3639983 Starts Here
4453: IF l_lines_count = 0 THEN

Line 4455: pa_debug.g_err_stage:='No Lines to be added - Returning';

4451:
4452: -- Change of Code for Bug 3639983 Starts Here
4453: IF l_lines_count = 0 THEN
4454: IF l_debug_mode = 'Y' THEN
4455: pa_debug.g_err_stage:='No Lines to be added - Returning';
4456: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4457: pa_debug.reset_curr_function;
4458: END IF;
4459: RETURN;

Line 4456: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

4452: -- Change of Code for Bug 3639983 Starts Here
4453: IF l_lines_count = 0 THEN
4454: IF l_debug_mode = 'Y' THEN
4455: pa_debug.g_err_stage:='No Lines to be added - Returning';
4456: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4457: pa_debug.reset_curr_function;
4458: END IF;
4459: RETURN;
4460: END IF;

Line 4457: pa_debug.reset_curr_function;

4453: IF l_lines_count = 0 THEN
4454: IF l_debug_mode = 'Y' THEN
4455: pa_debug.g_err_stage:='No Lines to be added - Returning';
4456: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4457: pa_debug.reset_curr_function;
4458: END IF;
4459: RETURN;
4460: END IF;
4461: -- Change of Code for Bug 3639983 Ends Here

Line 4464: pa_debug.g_err_stage:='Calling CREATE_FINPLAN_LINES';

4460: END IF;
4461: -- Change of Code for Bug 3639983 Ends Here
4462:
4463: IF l_debug_mode = 'Y' THEN
4464: pa_debug.g_err_stage:='Calling CREATE_FINPLAN_LINES';
4465: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4466: END IF;
4467:
4468: --Call to api PA_FIN_PLAN_PVT.CREATE_FINPLAN_LINES

Line 4465: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

4461: -- Change of Code for Bug 3639983 Ends Here
4462:
4463: IF l_debug_mode = 'Y' THEN
4464: pa_debug.g_err_stage:='Calling CREATE_FINPLAN_LINES';
4465: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4466: END IF;
4467:
4468: --Call to api PA_FIN_PLAN_PVT.CREATE_FINPLAN_LINES
4469:

Line 4481: pa_debug.g_err_stage:='Return Status After CREATE_FINPLAN_LINES :'||x_return_status;

4477: ,x_msg_count => x_msg_count
4478: ,x_msg_data => x_msg_data );
4479:
4480: IF l_debug_mode = 'Y' THEN
4481: pa_debug.g_err_stage:='Return Status After CREATE_FINPLAN_LINES :'||x_return_status;
4482: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4483: END IF;
4484:
4485: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

Line 4482: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

4478: ,x_msg_data => x_msg_data );
4479:
4480: IF l_debug_mode = 'Y' THEN
4481: pa_debug.g_err_stage:='Return Status After CREATE_FINPLAN_LINES :'||x_return_status;
4482: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4483: END IF;
4484:
4485: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
4486:

Line 4487: IF P_PA_DEBUG_MODE = 'Y' THEN

4483: END IF;
4484:
4485: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
4486:
4487: IF P_PA_DEBUG_MODE = 'Y' THEN
4488: pa_debug.g_err_stage:= 'Error Calling CREATE_FINPLAN_LINES';
4489: pa_debug.write('CREATE_DRAFT: '||g_module_name,pa_debug.g_err_stage,5);
4490: END IF;
4491:

Line 4488: pa_debug.g_err_stage:= 'Error Calling CREATE_FINPLAN_LINES';

4484:
4485: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
4486:
4487: IF P_PA_DEBUG_MODE = 'Y' THEN
4488: pa_debug.g_err_stage:= 'Error Calling CREATE_FINPLAN_LINES';
4489: pa_debug.write('CREATE_DRAFT: '||g_module_name,pa_debug.g_err_stage,5);
4490: END IF;
4491:
4492: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 4489: pa_debug.write('CREATE_DRAFT: '||g_module_name,pa_debug.g_err_stage,5);

4485: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
4486:
4487: IF P_PA_DEBUG_MODE = 'Y' THEN
4488: pa_debug.g_err_stage:= 'Error Calling CREATE_FINPLAN_LINES';
4489: pa_debug.write('CREATE_DRAFT: '||g_module_name,pa_debug.g_err_stage,5);
4490: END IF;
4491:
4492: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
4493:

Line 4500: pa_debug.g_err_stage:='Extending lenght of all local empty table to l_lines_count';

4496: END IF;
4497:
4498: -- Change of Code for Bug 3639983 Starts Here
4499: IF l_debug_mode = 'Y' THEN
4500: pa_debug.g_err_stage:='Extending lenght of all local empty table to l_lines_count';
4501: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4502: END IF;
4503:
4504: l_line_start_date_tab.extend(l_lines_count);

Line 4501: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

4497:
4498: -- Change of Code for Bug 3639983 Starts Here
4499: IF l_debug_mode = 'Y' THEN
4500: pa_debug.g_err_stage:='Extending lenght of all local empty table to l_lines_count';
4501: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4502: END IF;
4503:
4504: l_line_start_date_tab.extend(l_lines_count);
4505: l_line_end_date_tab.extend(l_lines_count);

Line 4546: pa_debug.g_err_stage:='Fetching project Id from get_proj_id_csr';

4542:
4543: -- Change of Code for Bug 3732414 Ends Here
4544:
4545: IF l_debug_mode = 'Y' THEN
4546: pa_debug.g_err_stage:='Fetching project Id from get_proj_id_csr';
4547: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4548: END IF;
4549:
4550: OPEN get_proj_id_csr ;

Line 4547: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

4543: -- Change of Code for Bug 3732414 Ends Here
4544:
4545: IF l_debug_mode = 'Y' THEN
4546: pa_debug.g_err_stage:='Fetching project Id from get_proj_id_csr';
4547: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4548: END IF;
4549:
4550: OPEN get_proj_id_csr ;
4551: FETCH get_proj_id_csr into l_project_id ;

Line 4556: pa_debug.g_err_stage:='Calling Calculate API';

4552: CLOSE get_proj_id_csr;
4553:
4554: -- Calling PA_FP_CALC_PLAN_PKG.calculate api
4555: IF l_debug_mode = 'Y' THEN
4556: pa_debug.g_err_stage:='Calling Calculate API';
4557: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4558:
4559: pa_debug.g_err_stage:='Calling Calculate API l_project_id'||l_project_id;
4560: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

Line 4557: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

4553:
4554: -- Calling PA_FP_CALC_PLAN_PKG.calculate api
4555: IF l_debug_mode = 'Y' THEN
4556: pa_debug.g_err_stage:='Calling Calculate API';
4557: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4558:
4559: pa_debug.g_err_stage:='Calling Calculate API l_project_id'||l_project_id;
4560: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4561:

Line 4559: pa_debug.g_err_stage:='Calling Calculate API l_project_id'||l_project_id;

4555: IF l_debug_mode = 'Y' THEN
4556: pa_debug.g_err_stage:='Calling Calculate API';
4557: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4558:
4559: pa_debug.g_err_stage:='Calling Calculate API l_project_id'||l_project_id;
4560: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4561:
4562: pa_debug.g_err_stage:='Calling Calculate API p_fin_plan_version_id'||p_fin_plan_version_id;
4563: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

Line 4560: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

4556: pa_debug.g_err_stage:='Calling Calculate API';
4557: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4558:
4559: pa_debug.g_err_stage:='Calling Calculate API l_project_id'||l_project_id;
4560: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4561:
4562: pa_debug.g_err_stage:='Calling Calculate API p_fin_plan_version_id'||p_fin_plan_version_id;
4563: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4564:

Line 4562: pa_debug.g_err_stage:='Calling Calculate API p_fin_plan_version_id'||p_fin_plan_version_id;

4558:
4559: pa_debug.g_err_stage:='Calling Calculate API l_project_id'||l_project_id;
4560: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4561:
4562: pa_debug.g_err_stage:='Calling Calculate API p_fin_plan_version_id'||p_fin_plan_version_id;
4563: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4564:
4565: pa_debug.g_err_stage:='Calling Calculate API l_resource_assignment_tab'||l_resource_assignment_tab.COUNT;
4566: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

Line 4563: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

4559: pa_debug.g_err_stage:='Calling Calculate API l_project_id'||l_project_id;
4560: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4561:
4562: pa_debug.g_err_stage:='Calling Calculate API p_fin_plan_version_id'||p_fin_plan_version_id;
4563: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4564:
4565: pa_debug.g_err_stage:='Calling Calculate API l_resource_assignment_tab'||l_resource_assignment_tab.COUNT;
4566: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4567:

Line 4565: pa_debug.g_err_stage:='Calling Calculate API l_resource_assignment_tab'||l_resource_assignment_tab.COUNT;

4561:
4562: pa_debug.g_err_stage:='Calling Calculate API p_fin_plan_version_id'||p_fin_plan_version_id;
4563: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4564:
4565: pa_debug.g_err_stage:='Calling Calculate API l_resource_assignment_tab'||l_resource_assignment_tab.COUNT;
4566: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4567:
4568: pa_debug.g_err_stage:='Calling Calculate API l_delete_budget_lines_tab'||l_delete_budget_lines_tab.COUNT;
4569: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

Line 4566: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

4562: pa_debug.g_err_stage:='Calling Calculate API p_fin_plan_version_id'||p_fin_plan_version_id;
4563: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4564:
4565: pa_debug.g_err_stage:='Calling Calculate API l_resource_assignment_tab'||l_resource_assignment_tab.COUNT;
4566: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4567:
4568: pa_debug.g_err_stage:='Calling Calculate API l_delete_budget_lines_tab'||l_delete_budget_lines_tab.COUNT;
4569: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4570:

Line 4568: pa_debug.g_err_stage:='Calling Calculate API l_delete_budget_lines_tab'||l_delete_budget_lines_tab.COUNT;

4564:
4565: pa_debug.g_err_stage:='Calling Calculate API l_resource_assignment_tab'||l_resource_assignment_tab.COUNT;
4566: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4567:
4568: pa_debug.g_err_stage:='Calling Calculate API l_delete_budget_lines_tab'||l_delete_budget_lines_tab.COUNT;
4569: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4570:
4571: pa_debug.g_err_stage:='Calling Calculate API l_spread_amts_flag_tab'||l_spread_amts_flag_tab.COUNT;
4572: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

Line 4569: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

4565: pa_debug.g_err_stage:='Calling Calculate API l_resource_assignment_tab'||l_resource_assignment_tab.COUNT;
4566: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4567:
4568: pa_debug.g_err_stage:='Calling Calculate API l_delete_budget_lines_tab'||l_delete_budget_lines_tab.COUNT;
4569: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4570:
4571: pa_debug.g_err_stage:='Calling Calculate API l_spread_amts_flag_tab'||l_spread_amts_flag_tab.COUNT;
4572: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4573:

Line 4571: pa_debug.g_err_stage:='Calling Calculate API l_spread_amts_flag_tab'||l_spread_amts_flag_tab.COUNT;

4567:
4568: pa_debug.g_err_stage:='Calling Calculate API l_delete_budget_lines_tab'||l_delete_budget_lines_tab.COUNT;
4569: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4570:
4571: pa_debug.g_err_stage:='Calling Calculate API l_spread_amts_flag_tab'||l_spread_amts_flag_tab.COUNT;
4572: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4573:
4574: pa_debug.g_err_stage:='Calling Calculate API l_txn_currency_code_tab'||l_txn_currency_code_tab.COUNT;
4575: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

Line 4572: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

4568: pa_debug.g_err_stage:='Calling Calculate API l_delete_budget_lines_tab'||l_delete_budget_lines_tab.COUNT;
4569: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4570:
4571: pa_debug.g_err_stage:='Calling Calculate API l_spread_amts_flag_tab'||l_spread_amts_flag_tab.COUNT;
4572: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4573:
4574: pa_debug.g_err_stage:='Calling Calculate API l_txn_currency_code_tab'||l_txn_currency_code_tab.COUNT;
4575: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4576:

Line 4574: pa_debug.g_err_stage:='Calling Calculate API l_txn_currency_code_tab'||l_txn_currency_code_tab.COUNT;

4570:
4571: pa_debug.g_err_stage:='Calling Calculate API l_spread_amts_flag_tab'||l_spread_amts_flag_tab.COUNT;
4572: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4573:
4574: pa_debug.g_err_stage:='Calling Calculate API l_txn_currency_code_tab'||l_txn_currency_code_tab.COUNT;
4575: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4576:
4577: END IF;
4578:

Line 4575: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

4571: pa_debug.g_err_stage:='Calling Calculate API l_spread_amts_flag_tab'||l_spread_amts_flag_tab.COUNT;
4572: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4573:
4574: pa_debug.g_err_stage:='Calling Calculate API l_txn_currency_code_tab'||l_txn_currency_code_tab.COUNT;
4575: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4576:
4577: END IF;
4578:
4579: -- bug 4221650: checking for the time phased code of the version to call

Line 4587: pa_debug.g_err_stage:=' Calling Calculate in BUDGET_LINE mode';

4583:
4584: IF NOT l_ver_time_phased_code = 'N' THEN
4585:
4586: IF l_debug_mode = 'Y' THEN
4587: pa_debug.g_err_stage:=' Calling Calculate in BUDGET_LINE mode';
4588: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4589: END IF;
4590:
4591: -- bug 3825873 17-JUL-2004 Corrected the input parameters

Line 4588: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

4584: IF NOT l_ver_time_phased_code = 'N' THEN
4585:
4586: IF l_debug_mode = 'Y' THEN
4587: pa_debug.g_err_stage:=' Calling Calculate in BUDGET_LINE mode';
4588: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4589: END IF;
4590:
4591: -- bug 3825873 17-JUL-2004 Corrected the input parameters
4592: /*Bug 4224464 Added the if condition to ditinguish the call to calculate API in AMG flow from other flows.

Line 4676: pa_debug.g_err_stage:=' Calling Calculate in RESOURCE_ASSIGNMENT mode';

4672: END IF;
4673: ELSE
4674: -- bug 4221650:
4675: IF l_debug_mode = 'Y' THEN
4676: pa_debug.g_err_stage:=' Calling Calculate in RESOURCE_ASSIGNMENT mode';
4677: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4678: END IF;
4679:
4680: /*Bug 4224464 Added the if condition to ditinguish the call to calculate API in AMG flow from other flows.

Line 4677: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

4673: ELSE
4674: -- bug 4221650:
4675: IF l_debug_mode = 'Y' THEN
4676: pa_debug.g_err_stage:=' Calling Calculate in RESOURCE_ASSIGNMENT mode';
4677: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4678: END IF;
4679:
4680: /*Bug 4224464 Added the if condition to ditinguish the call to calculate API in AMG flow from other flows.
4681: We are passing the parameter p_calling_module as G_AMG_API if its a AMG flow. This parameter would be internally used by

Line 4728: pa_debug.g_err_stage:='Return Status After CALCULATE :'||x_return_status;

4724:
4725: END IF;
4726:
4727: IF l_debug_mode = 'Y' THEN
4728: pa_debug.g_err_stage:='Return Status After CALCULATE :'||x_return_status;
4729: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4730: END IF;
4731:
4732: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

Line 4729: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

4725: END IF;
4726:
4727: IF l_debug_mode = 'Y' THEN
4728: pa_debug.g_err_stage:='Return Status After CALCULATE :'||x_return_status;
4729: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4730: END IF;
4731:
4732: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4733:

Line 4735: pa_debug.g_err_stage:='Called API PA_FP_CALC_PLAN_PKG.calculate returned error';

4731:
4732: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4733:
4734: IF l_debug_mode = 'Y' THEN
4735: pa_debug.g_err_stage:='Called API PA_FP_CALC_PLAN_PKG.calculate returned error';
4736: pa_debug.write(l_module_name,pa_debug.g_err_stage, l_debug_level3);
4737: END IF;
4738:
4739: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

Line 4736: pa_debug.write(l_module_name,pa_debug.g_err_stage, l_debug_level3);

4732: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4733:
4734: IF l_debug_mode = 'Y' THEN
4735: pa_debug.g_err_stage:='Called API PA_FP_CALC_PLAN_PKG.calculate returned error';
4736: pa_debug.write(l_module_name,pa_debug.g_err_stage, l_debug_level3);
4737: END IF;
4738:
4739: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
4740:

Line 4743: pa_debug.g_err_stage:='Exiting ADD FIN PLAN LINES x_return_status: '||x_return_status;

4739: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
4740:
4741: END IF;
4742: IF l_debug_mode = 'Y' THEN
4743: pa_debug.g_err_stage:='Exiting ADD FIN PLAN LINES x_return_status: '||x_return_status;
4744: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4745: pa_debug.reset_curr_function;
4746: END IF;
4747: EXCEPTION

Line 4744: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

4740:
4741: END IF;
4742: IF l_debug_mode = 'Y' THEN
4743: pa_debug.g_err_stage:='Exiting ADD FIN PLAN LINES x_return_status: '||x_return_status;
4744: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4745: pa_debug.reset_curr_function;
4746: END IF;
4747: EXCEPTION
4748:

Line 4745: pa_debug.reset_curr_function;

4741: END IF;
4742: IF l_debug_mode = 'Y' THEN
4743: pa_debug.g_err_stage:='Exiting ADD FIN PLAN LINES x_return_status: '||x_return_status;
4744: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4745: pa_debug.reset_curr_function;
4746: END IF;
4747: EXCEPTION
4748:
4749: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

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

4764: ELSE
4765: x_msg_count := l_msg_count;
4766: END IF;
4767:
4768: pa_debug.g_err_stage:= 'Invalid Arguments Passed';
4769:
4770: IF P_PA_DEBUG_MODE = 'Y' THEN
4771: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4772: pa_debug.reset_curr_function;

Line 4770: IF P_PA_DEBUG_MODE = 'Y' THEN

4766: END IF;
4767:
4768: pa_debug.g_err_stage:= 'Invalid Arguments Passed';
4769:
4770: IF P_PA_DEBUG_MODE = 'Y' THEN
4771: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4772: pa_debug.reset_curr_function;
4773: END IF;
4774: RETURN;

Line 4771: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

4767:
4768: pa_debug.g_err_stage:= 'Invalid Arguments Passed';
4769:
4770: IF P_PA_DEBUG_MODE = 'Y' THEN
4771: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4772: pa_debug.reset_curr_function;
4773: END IF;
4774: RETURN;
4775:

Line 4772: pa_debug.reset_curr_function;

4768: pa_debug.g_err_stage:= 'Invalid Arguments Passed';
4769:
4770: IF P_PA_DEBUG_MODE = 'Y' THEN
4771: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4772: pa_debug.reset_curr_function;
4773: END IF;
4774: RETURN;
4775:
4776: WHEN others THEN

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

4780: x_msg_data := SQLERRM;
4781:
4782: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_pvt'
4783: ,p_procedure_name => 'ADD_FIN_PLAN_LINES');
4784: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
4785:
4786: IF P_PA_DEBUG_MODE = 'Y' THEN
4787: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4788: pa_debug.reset_curr_function;

Line 4786: IF P_PA_DEBUG_MODE = 'Y' THEN

4782: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_pvt'
4783: ,p_procedure_name => 'ADD_FIN_PLAN_LINES');
4784: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
4785:
4786: IF P_PA_DEBUG_MODE = 'Y' THEN
4787: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4788: pa_debug.reset_curr_function;
4789: END IF;
4790: RAISE;

Line 4787: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

4783: ,p_procedure_name => 'ADD_FIN_PLAN_LINES');
4784: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
4785:
4786: IF P_PA_DEBUG_MODE = 'Y' THEN
4787: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4788: pa_debug.reset_curr_function;
4789: END IF;
4790: RAISE;
4791:

Line 4788: pa_debug.reset_curr_function;

4784: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
4785:
4786: IF P_PA_DEBUG_MODE = 'Y' THEN
4787: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4788: pa_debug.reset_curr_function;
4789: END IF;
4790: RAISE;
4791:
4792: END ADD_FIN_PLAN_LINES;