DBA Data[Home] [Help]

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:

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:
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:

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

2254:
2255:
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:
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 2269: pa_debug.g_err_stage:='Entering of validation for resource list';

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

Line 2270: IF P_PA_DEBUG_MODE = 'Y' THEN

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

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

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

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

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

Line 2293: IF P_PA_DEBUG_MODE = 'Y' THEN

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

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

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

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

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

Line 2309: IF P_PA_DEBUG_MODE = 'Y' THEN

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

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

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

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

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

Line 2315: IF P_PA_DEBUG_MODE = 'Y' THEN

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

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

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

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

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

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

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

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

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

Line 2373: IF P_PA_DEBUG_MODE = 'Y' THEN

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

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

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

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

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

Line 2379: IF P_PA_DEBUG_MODE = 'Y' THEN

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

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

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

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

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

Line 2389: IF P_PA_DEBUG_MODE = 'Y' THEN

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

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

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

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

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

Line 2404: IF P_PA_DEBUG_MODE = 'Y' THEN

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

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

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

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

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

Line 2443: IF P_PA_DEBUG_MODE = 'Y' THEN

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

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

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

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

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

Line 2479: IF P_PA_DEBUG_MODE = 'Y' THEN

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

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

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

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

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

Line 2489: IF P_PA_DEBUG_MODE = 'Y' THEN

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

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

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

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

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

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

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

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

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

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

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

Line 2568: IF P_PA_DEBUG_MODE = 'Y' THEN

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

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

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

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

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

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

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

Line 2658: IF P_PA_DEBUG_MODE = 'Y' THEN

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

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

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

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

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

Line 2681: IF P_PA_DEBUG_MODE = 'Y' THEN

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

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

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

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

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

Line 2702: IF P_PA_DEBUG_MODE = 'Y' THEN

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

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

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

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

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

Line 2721: IF P_PA_DEBUG_MODE = 'Y' THEN

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

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

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

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

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

Line 2749: IF P_PA_DEBUG_MODE = 'Y' THEN

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

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

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

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

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

Line 2772: IF P_PA_DEBUG_MODE = 'Y' THEN

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

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

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

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

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

Line 2802: IF P_PA_DEBUG_MODE = 'Y' THEN

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

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

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

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

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

Line 2821: IF P_PA_DEBUG_MODE = 'Y' THEN

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

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

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

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

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

Line 2829: IF P_PA_DEBUG_MODE = 'Y' THEN

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

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

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

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

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

Line 2847: IF P_PA_DEBUG_MODE = 'Y' THEN

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

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

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

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

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

Line 2858: IF P_PA_DEBUG_MODE = 'Y' THEN

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

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

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

Line 2860: pa_debug.reset_err_stack;

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

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

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

Line 2884: IF P_PA_DEBUG_MODE = 'Y' THEN

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

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

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

Line 2886: pa_debug.reset_err_stack;

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

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

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

Line 2898: IF P_PA_DEBUG_MODE = 'Y' THEN

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

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

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

Line 2900: pa_debug.reset_err_stack;

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

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

3002:
3003: x_msg_count := 0;
3004: x_return_status := FND_API.G_RET_STS_SUCCESS;
3005:
3006: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
3007: l_debug_mode := NVL(l_debug_mode, 'Y');
3008: IF p_pa_debug_mode = 'Y' THEN
3009: pa_debug.set_err_stack('pa_fin_plan_pvt.CREATE_FINPLAN_LINES');
3010: END IF;

Line 3008: IF p_pa_debug_mode = 'Y' THEN

3004: x_return_status := FND_API.G_RET_STS_SUCCESS;
3005:
3006: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
3007: l_debug_mode := NVL(l_debug_mode, 'Y');
3008: IF p_pa_debug_mode = 'Y' THEN
3009: pa_debug.set_err_stack('pa_fin_plan_pvt.CREATE_FINPLAN_LINES');
3010: END IF;
3011: IF P_PA_DEBUG_MODE = 'Y' THEN
3012: pa_debug.set_process('CREATE_FINPLAN_LINES: ' || 'PLSQL','LOG',l_debug_mode);

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

3005:
3006: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
3007: l_debug_mode := NVL(l_debug_mode, 'Y');
3008: IF p_pa_debug_mode = 'Y' THEN
3009: pa_debug.set_err_stack('pa_fin_plan_pvt.CREATE_FINPLAN_LINES');
3010: END IF;
3011: IF P_PA_DEBUG_MODE = 'Y' THEN
3012: pa_debug.set_process('CREATE_FINPLAN_LINES: ' || 'PLSQL','LOG',l_debug_mode);
3013: END IF;

Line 3011: IF P_PA_DEBUG_MODE = 'Y' THEN

3007: l_debug_mode := NVL(l_debug_mode, 'Y');
3008: IF p_pa_debug_mode = 'Y' THEN
3009: pa_debug.set_err_stack('pa_fin_plan_pvt.CREATE_FINPLAN_LINES');
3010: END IF;
3011: IF P_PA_DEBUG_MODE = 'Y' THEN
3012: pa_debug.set_process('CREATE_FINPLAN_LINES: ' || 'PLSQL','LOG',l_debug_mode);
3013: END IF;
3014:
3015:

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

3008: IF p_pa_debug_mode = 'Y' THEN
3009: pa_debug.set_err_stack('pa_fin_plan_pvt.CREATE_FINPLAN_LINES');
3010: END IF;
3011: IF P_PA_DEBUG_MODE = 'Y' THEN
3012: pa_debug.set_process('CREATE_FINPLAN_LINES: ' || 'PLSQL','LOG',l_debug_mode);
3013: END IF;
3014:
3015:
3016: -- Check for business rules violations

Line 3018: IF P_PA_DEBUG_MODE = 'Y' THEN

3014:
3015:
3016: -- Check for business rules violations
3017:
3018: IF P_PA_DEBUG_MODE = 'Y' THEN
3019: pa_debug.g_err_stage:= 'Validating input parameters - CREATE_FINPLAN_LINES';
3020: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3021: END IF;
3022:

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

3015:
3016: -- Check for business rules violations
3017:
3018: IF P_PA_DEBUG_MODE = 'Y' THEN
3019: pa_debug.g_err_stage:= 'Validating input parameters - CREATE_FINPLAN_LINES';
3020: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3021: END IF;
3022:
3023: --Validate plan version id

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

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

Line 3027: IF P_PA_DEBUG_MODE = 'Y' THEN

3023: --Validate plan version id
3024:
3025: IF (p_fin_plan_version_id IS NULL)
3026: THEN
3027: IF P_PA_DEBUG_MODE = 'Y' THEN
3028: pa_debug.g_err_stage:= 'fin_plan_version_id = '|| p_fin_plan_version_id;
3029: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3030: END IF;
3031:

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

3024:
3025: IF (p_fin_plan_version_id IS NULL)
3026: THEN
3027: IF P_PA_DEBUG_MODE = 'Y' THEN
3028: pa_debug.g_err_stage:= 'fin_plan_version_id = '|| p_fin_plan_version_id;
3029: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3030: END IF;
3031:
3032: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',

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

3025: IF (p_fin_plan_version_id IS NULL)
3026: THEN
3027: IF P_PA_DEBUG_MODE = 'Y' THEN
3028: pa_debug.g_err_stage:= 'fin_plan_version_id = '|| p_fin_plan_version_id;
3029: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3030: END IF;
3031:
3032: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
3033: p_msg_name => 'PA_FP_INV_PARAM_PASSED');

Line 3109: IF P_PA_DEBUG_MODE = 'Y' THEN

3105:
3106: END LOOP;
3107: END IF;
3108:
3109: IF P_PA_DEBUG_MODE = 'Y' THEN
3110: pa_debug.g_err_stage:= 'populated the plsql tables';
3111: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3112:
3113: pa_debug.g_err_stage:= 'Delete records if any from the rollup tmp';

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

3106: END LOOP;
3107: END IF;
3108:
3109: IF P_PA_DEBUG_MODE = 'Y' THEN
3110: pa_debug.g_err_stage:= 'populated the plsql tables';
3111: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3112:
3113: pa_debug.g_err_stage:= 'Delete records if any from the rollup tmp';
3114: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

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

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

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

3109: IF P_PA_DEBUG_MODE = 'Y' THEN
3110: pa_debug.g_err_stage:= 'populated the plsql tables';
3111: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3112:
3113: pa_debug.g_err_stage:= 'Delete records if any from the rollup tmp';
3114: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3115: END IF;
3116:
3117: delete from pa_fp_rollup_tmp; /* Included after UT */

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

3110: pa_debug.g_err_stage:= 'populated the plsql tables';
3111: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3112:
3113: pa_debug.g_err_stage:= 'Delete records if any from the rollup tmp';
3114: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3115: END IF;
3116:
3117: delete from pa_fp_rollup_tmp; /* Included after UT */
3118:

Line 3123: IF P_PA_DEBUG_MODE = 'Y' THEN

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

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

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

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

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

Line 3272: IF P_PA_DEBUG_MODE = 'Y' THEN

3268: ,p_fin_plan_version_id
3269: );
3270: END IF;
3271:
3272: IF P_PA_DEBUG_MODE = 'Y' THEN
3273: pa_debug.g_err_stage:= 'number of records inserted -> ' || sql%ROWCOUNT;
3274: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3275: END IF;
3276:

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

3269: );
3270: END IF;
3271:
3272: IF P_PA_DEBUG_MODE = 'Y' THEN
3273: pa_debug.g_err_stage:= 'number of records inserted -> ' || sql%ROWCOUNT;
3274: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3275: END IF;
3276:
3277: --Call procedure pa_fp_elements_pub.CREATE_ASSGMT_FROM_ROLLUPTMP to create

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

3270: END IF;
3271:
3272: IF P_PA_DEBUG_MODE = 'Y' THEN
3273: pa_debug.g_err_stage:= 'number of records inserted -> ' || sql%ROWCOUNT;
3274: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3275: END IF;
3276:
3277: --Call procedure pa_fp_elements_pub.CREATE_ASSGMT_FROM_ROLLUPTMP to create
3278: --resource assignments and elements.

Line 3280: IF P_PA_DEBUG_MODE = 'Y' THEN

3276:
3277: --Call procedure pa_fp_elements_pub.CREATE_ASSGMT_FROM_ROLLUPTMP to create
3278: --resource assignments and elements.
3279:
3280: IF P_PA_DEBUG_MODE = 'Y' THEN
3281: pa_debug.g_err_stage:= 'calling create_assgmt_from_rolluptmp';
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:= 'calling create_assgmt_from_rolluptmp';

3277: --Call procedure pa_fp_elements_pub.CREATE_ASSGMT_FROM_ROLLUPTMP to create
3278: --resource assignments and elements.
3279:
3280: IF P_PA_DEBUG_MODE = 'Y' THEN
3281: pa_debug.g_err_stage:= 'calling create_assgmt_from_rolluptmp';
3282: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3283: END IF;
3284:
3285: pa_fp_elements_pub.create_assgmt_from_rolluptmp

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

3278: --resource assignments and elements.
3279:
3280: IF P_PA_DEBUG_MODE = 'Y' THEN
3281: pa_debug.g_err_stage:= 'calling create_assgmt_from_rolluptmp';
3282: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3283: END IF;
3284:
3285: pa_fp_elements_pub.create_assgmt_from_rolluptmp
3286: ( p_fin_plan_version_id => p_fin_plan_version_id

Line 3292: IF P_PA_DEBUG_MODE = 'Y' THEN

3288: ,x_msg_count => x_msg_count
3289: ,x_msg_data => x_msg_data );
3290:
3291: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3292: IF P_PA_DEBUG_MODE = 'Y' THEN
3293: pa_debug.g_err_stage:= 'Error Calling create_assgmt_from_rolluptmp';
3294: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3295: END IF;
3296: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

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

3289: ,x_msg_data => x_msg_data );
3290:
3291: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3292: IF P_PA_DEBUG_MODE = 'Y' THEN
3293: pa_debug.g_err_stage:= 'Error Calling create_assgmt_from_rolluptmp';
3294: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3295: END IF;
3296: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3297: END IF;

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

3290:
3291: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3292: IF P_PA_DEBUG_MODE = 'Y' THEN
3293: pa_debug.g_err_stage:= 'Error Calling create_assgmt_from_rolluptmp';
3294: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3295: END IF;
3296: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3297: END IF;
3298:

Line 3303: IF P_PA_DEBUG_MODE = 'Y' THEN

3299: --Bug # 3507156-
3300: --Commented the api PROCESS_MODIFIED_LINES
3301: --Comment START
3302: /*
3303: IF P_PA_DEBUG_MODE = 'Y' THEN
3304: pa_debug.g_err_stage:= 'calling PROCESS_MODIFIED_LINES';
3305: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3306: END IF;
3307:

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

3300: --Commented the api PROCESS_MODIFIED_LINES
3301: --Comment START
3302: /*
3303: IF P_PA_DEBUG_MODE = 'Y' THEN
3304: pa_debug.g_err_stage:= 'calling PROCESS_MODIFIED_LINES';
3305: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3306: END IF;
3307:
3308: --Call process_modified_lines in edit line package.

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

3301: --Comment START
3302: /*
3303: IF P_PA_DEBUG_MODE = 'Y' THEN
3304: pa_debug.g_err_stage:= 'calling PROCESS_MODIFIED_LINES';
3305: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3306: END IF;
3307:
3308: --Call process_modified_lines in edit line package.
3309: PA_FP_EDIT_LINE_PKG.PROCESS_MODIFIED_LINES

Line 3319: IF P_PA_DEBUG_MODE = 'Y' THEN

3315: ,x_msg_data => x_msg_data );
3316:
3317: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3318:
3319: IF P_PA_DEBUG_MODE = 'Y' THEN
3320: pa_debug.g_err_stage:= 'Error Calling PROCESS_MODIFIED_LINES';
3321: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3322: END IF;
3323: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

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

3316:
3317: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3318:
3319: IF P_PA_DEBUG_MODE = 'Y' THEN
3320: pa_debug.g_err_stage:= 'Error Calling PROCESS_MODIFIED_LINES';
3321: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3322: END IF;
3323: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3324: END IF;

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

3317: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3318:
3319: IF P_PA_DEBUG_MODE = 'Y' THEN
3320: pa_debug.g_err_stage:= 'Error Calling PROCESS_MODIFIED_LINES';
3321: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3322: END IF;
3323: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3324: END IF;
3325:

Line 3326: IF P_PA_DEBUG_MODE = 'Y' THEN

3322: END IF;
3323: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3324: END IF;
3325:
3326: IF P_PA_DEBUG_MODE = 'Y' THEN
3327: pa_debug.g_err_stage:= 'Exiting CREATE_FINPLAN_LINES';
3328: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3329: END IF;
3330:

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

3323: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3324: END IF;
3325:
3326: IF P_PA_DEBUG_MODE = 'Y' THEN
3327: pa_debug.g_err_stage:= 'Exiting CREATE_FINPLAN_LINES';
3328: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3329: END IF;
3330:
3331: */

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

3324: END IF;
3325:
3326: IF P_PA_DEBUG_MODE = 'Y' THEN
3327: pa_debug.g_err_stage:= 'Exiting CREATE_FINPLAN_LINES';
3328: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3329: END IF;
3330:
3331: */
3332: --Bug # 3507156-

Line 3499: IF P_PA_DEBUG_MODE = 'Y' THEN

3495: or tmp.txn_burdened_cost IS NOT NULL
3496: or tmp.quantity IS NOT NULL
3497: or tmp.txn_revenue IS NOT NULL));
3498:
3499: IF P_PA_DEBUG_MODE = 'Y' THEN
3500: pa_debug.g_err_stage:= 'number of records inserted -> ' || sql%ROWCOUNT;
3501: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3502: END IF;
3503: ---------------------------------------------------------------------------------------------*/

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

3496: or tmp.quantity IS NOT NULL
3497: or tmp.txn_revenue IS NOT NULL));
3498:
3499: IF P_PA_DEBUG_MODE = 'Y' THEN
3500: pa_debug.g_err_stage:= 'number of records inserted -> ' || sql%ROWCOUNT;
3501: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3502: END IF;
3503: ---------------------------------------------------------------------------------------------*/
3504:

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

3497: or tmp.txn_revenue IS NOT NULL));
3498:
3499: IF P_PA_DEBUG_MODE = 'Y' THEN
3500: pa_debug.g_err_stage:= 'number of records inserted -> ' || sql%ROWCOUNT;
3501: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3502: END IF;
3503: ---------------------------------------------------------------------------------------------*/
3504:
3505: /* Bug 4221590:inserting into PA_FP_SPREAD_CALC_TMP1 */

Line 3508: IF P_PA_DEBUG_MODE = 'Y' THEN

3504:
3505: /* Bug 4221590:inserting into PA_FP_SPREAD_CALC_TMP1 */
3506: DELETE FROM PA_FP_SPREAD_CALC_TMP1;
3507:
3508: IF P_PA_DEBUG_MODE = 'Y' THEN
3509: pa_debug.g_err_stage:= 'inserting into pa_fp_spread_calc_tmp1 -> ' || sql%ROWCOUNT;
3510: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3511: END IF;
3512:

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

3505: /* Bug 4221590:inserting into PA_FP_SPREAD_CALC_TMP1 */
3506: DELETE FROM PA_FP_SPREAD_CALC_TMP1;
3507:
3508: IF P_PA_DEBUG_MODE = 'Y' THEN
3509: pa_debug.g_err_stage:= 'inserting into pa_fp_spread_calc_tmp1 -> ' || sql%ROWCOUNT;
3510: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3511: END IF;
3512:
3513: INSERT INTO PA_FP_SPREAD_CALC_TMP1(

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

3506: DELETE FROM PA_FP_SPREAD_CALC_TMP1;
3507:
3508: IF P_PA_DEBUG_MODE = 'Y' THEN
3509: pa_debug.g_err_stage:= 'inserting into pa_fp_spread_calc_tmp1 -> ' || sql%ROWCOUNT;
3510: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3511: END IF;
3512:
3513: INSERT INTO PA_FP_SPREAD_CALC_TMP1(
3514: RESOURCE_ASSIGNMENT_ID

Line 3638: IF P_PA_DEBUG_MODE = 'Y' THEN

3634: or tmp.txn_burdened_cost IS NOT NULL
3635: or tmp.quantity IS NOT NULL
3636: or tmp.txn_revenue IS NOT NULL));*/
3637:
3638: IF P_PA_DEBUG_MODE = 'Y' THEN
3639: pa_debug.g_err_stage:= 'number of records inserted -> ' || sql%ROWCOUNT;
3640: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3641: END IF;
3642:

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

3635: or tmp.quantity IS NOT NULL
3636: or tmp.txn_revenue IS NOT NULL));*/
3637:
3638: IF P_PA_DEBUG_MODE = 'Y' THEN
3639: pa_debug.g_err_stage:= 'number of records inserted -> ' || sql%ROWCOUNT;
3640: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3641: END IF;
3642:
3643: -- Bug 3861261 Update resource assignments planning start and end date

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

3636: or tmp.txn_revenue IS NOT NULL));*/
3637:
3638: IF P_PA_DEBUG_MODE = 'Y' THEN
3639: pa_debug.g_err_stage:= 'number of records inserted -> ' || sql%ROWCOUNT;
3640: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
3641: END IF;
3642:
3643: -- Bug 3861261 Update resource assignments planning start and end date
3644: -- as the min(start_date) and max(end_date) of the corresponding budget lines

Line 3677: IF p_pa_debug_mode = 'Y' THEN

3673: where pra.budget_version_id = p_fin_plan_version_id;
3674: END IF;
3675: --End changes for Bug 6432606
3676:
3677: IF p_pa_debug_mode = 'Y' THEN
3678: pa_debug.reset_err_stack;
3679: END IF;
3680: EXCEPTION
3681: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 3678: pa_debug.reset_err_stack;

3674: END IF;
3675: --End changes for Bug 6432606
3676:
3677: IF p_pa_debug_mode = 'Y' THEN
3678: pa_debug.reset_err_stack;
3679: END IF;
3680: EXCEPTION
3681: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
3682:

Line 3699: IF P_PA_DEBUG_MODE = 'Y' THEN

3695: ELSE
3696: x_msg_count := l_msg_count;
3697: END IF;
3698:
3699: IF P_PA_DEBUG_MODE = 'Y' THEN
3700: pa_debug.g_err_stage:= 'Invalid Arguments Passed';
3701: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3702: pa_debug.reset_err_stack;
3703: END IF;

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

3696: x_msg_count := l_msg_count;
3697: END IF;
3698:
3699: IF P_PA_DEBUG_MODE = 'Y' THEN
3700: pa_debug.g_err_stage:= 'Invalid Arguments Passed';
3701: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3702: pa_debug.reset_err_stack;
3703: END IF;
3704: RAISE;

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

3697: END IF;
3698:
3699: IF P_PA_DEBUG_MODE = 'Y' THEN
3700: pa_debug.g_err_stage:= 'Invalid Arguments Passed';
3701: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3702: pa_debug.reset_err_stack;
3703: END IF;
3704: RAISE;
3705:

Line 3702: pa_debug.reset_err_stack;

3698:
3699: IF P_PA_DEBUG_MODE = 'Y' THEN
3700: pa_debug.g_err_stage:= 'Invalid Arguments Passed';
3701: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3702: pa_debug.reset_err_stack;
3703: END IF;
3704: RAISE;
3705:
3706: WHEN others THEN

Line 3713: IF P_PA_DEBUG_MODE = 'Y' THEN

3709: x_msg_count := 1;
3710: x_msg_data := SQLERRM;
3711: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_pvt'
3712: ,p_procedure_name => 'CREATE_FINPLAN_LINES');
3713: IF P_PA_DEBUG_MODE = 'Y' THEN
3714: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
3715: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3716: pa_debug.reset_err_stack;
3717: END IF;

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

3710: x_msg_data := SQLERRM;
3711: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_pvt'
3712: ,p_procedure_name => 'CREATE_FINPLAN_LINES');
3713: IF P_PA_DEBUG_MODE = 'Y' THEN
3714: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
3715: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3716: pa_debug.reset_err_stack;
3717: END IF;
3718: RAISE;

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

3711: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_pvt'
3712: ,p_procedure_name => 'CREATE_FINPLAN_LINES');
3713: IF P_PA_DEBUG_MODE = 'Y' THEN
3714: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
3715: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3716: pa_debug.reset_err_stack;
3717: END IF;
3718: RAISE;
3719:

Line 3716: pa_debug.reset_err_stack;

3712: ,p_procedure_name => 'CREATE_FINPLAN_LINES');
3713: IF P_PA_DEBUG_MODE = 'Y' THEN
3714: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
3715: pa_debug.write('CREATE_FINPLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,5);
3716: pa_debug.reset_err_stack;
3717: END IF;
3718: RAISE;
3719:
3720: END CREATE_FINPLAN_LINES;

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

3791: BEGIN
3792:
3793: x_msg_count := 0;
3794: x_return_status := FND_API.G_RET_STS_SUCCESS;
3795: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
3796:
3797: IF p_pa_debug_mode = 'Y' THEN
3798: pa_debug.set_curr_function( p_function => 'convert_plan_type_name_to_id',
3799: p_debug_mode => l_debug_mode );

Line 3797: IF p_pa_debug_mode = 'Y' THEN

3793: x_msg_count := 0;
3794: x_return_status := FND_API.G_RET_STS_SUCCESS;
3795: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
3796:
3797: IF p_pa_debug_mode = 'Y' THEN
3798: pa_debug.set_curr_function( p_function => 'convert_plan_type_name_to_id',
3799: p_debug_mode => l_debug_mode );
3800: END IF;
3801: -- If fin plan type id is passed. validate the fin plan type id. If it is not passed

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

3794: x_return_status := FND_API.G_RET_STS_SUCCESS;
3795: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
3796:
3797: IF p_pa_debug_mode = 'Y' THEN
3798: pa_debug.set_curr_function( p_function => 'convert_plan_type_name_to_id',
3799: p_debug_mode => l_debug_mode );
3800: END IF;
3801: -- If fin plan type id is passed. validate the fin plan type id. If it is not passed
3802: -- then convert name to fin plan type id

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

3816: x_return_status := FND_API.G_RET_STS_ERROR;
3817: x_fin_plan_type_id:=NULL;
3818: CLOSE l_fin_plan_type_id_csr;
3819: IF l_debug_mode='Y' THEN
3820: pa_debug.g_err_stage := 'p_fin_plan_type_id is '||p_fin_plan_type_id ;
3821: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name
3822: ,pa_debug.g_err_stage,l_debug_level5);
3823: END IF;
3824: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

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

3817: x_fin_plan_type_id:=NULL;
3818: CLOSE l_fin_plan_type_id_csr;
3819: IF l_debug_mode='Y' THEN
3820: pa_debug.g_err_stage := 'p_fin_plan_type_id is '||p_fin_plan_type_id ;
3821: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name
3822: ,pa_debug.g_err_stage,l_debug_level5);
3823: END IF;
3824: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3825:

Line 3822: ,pa_debug.g_err_stage,l_debug_level5);

3818: CLOSE l_fin_plan_type_id_csr;
3819: IF l_debug_mode='Y' THEN
3820: pa_debug.g_err_stage := 'p_fin_plan_type_id is '||p_fin_plan_type_id ;
3821: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name
3822: ,pa_debug.g_err_stage,l_debug_level5);
3823: END IF;
3824: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3825:
3826: ELSE

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

3842: p_value1 => p_fin_plan_type_name);
3843:
3844: x_return_status := FND_API.G_RET_STS_ERROR;
3845: IF l_debug_mode='Y' THEN
3846: pa_debug.g_err_stage := 'p_fin_plan_type_name is '||p_fin_plan_type_name ;
3847: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name
3848: ,pa_debug.g_err_stage,l_debug_level5);
3849: END IF;
3850: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

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

3843:
3844: x_return_status := FND_API.G_RET_STS_ERROR;
3845: IF l_debug_mode='Y' THEN
3846: pa_debug.g_err_stage := 'p_fin_plan_type_name is '||p_fin_plan_type_name ;
3847: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name
3848: ,pa_debug.g_err_stage,l_debug_level5);
3849: END IF;
3850: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3851:

Line 3848: ,pa_debug.g_err_stage,l_debug_level5);

3844: x_return_status := FND_API.G_RET_STS_ERROR;
3845: IF l_debug_mode='Y' THEN
3846: pa_debug.g_err_stage := 'p_fin_plan_type_name is '||p_fin_plan_type_name ;
3847: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name
3848: ,pa_debug.g_err_stage,l_debug_level5);
3849: END IF;
3850: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3851:
3852: END IF;

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

3850: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3851:
3852: END IF;
3853: IF l_debug_mode='Y' THEN
3854: pa_debug.g_err_stage := 'x_fin_plan_type_id derived is '||x_fin_plan_type_id ;
3855: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name
3856: ,pa_debug.g_err_stage,l_debug_level5);
3857: END IF;
3858:

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

3851:
3852: END IF;
3853: IF l_debug_mode='Y' THEN
3854: pa_debug.g_err_stage := 'x_fin_plan_type_id derived is '||x_fin_plan_type_id ;
3855: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name
3856: ,pa_debug.g_err_stage,l_debug_level5);
3857: END IF;
3858:
3859:

Line 3856: ,pa_debug.g_err_stage,l_debug_level5);

3852: END IF;
3853: IF l_debug_mode='Y' THEN
3854: pa_debug.g_err_stage := 'x_fin_plan_type_id derived is '||x_fin_plan_type_id ;
3855: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name
3856: ,pa_debug.g_err_stage,l_debug_level5);
3857: END IF;
3858:
3859:
3860: ELSE

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

3867: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3868: END IF;
3869:
3870: IF l_debug_mode='Y' THEN
3871: pa_debug.g_err_stage := 'p_fin_plan_type_name is '||p_fin_plan_type_name ;
3872: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name
3873: ,pa_debug.g_err_stage,l_debug_level5);
3874: pa_debug.reset_curr_function;
3875: END IF;

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

3868: END IF;
3869:
3870: IF l_debug_mode='Y' THEN
3871: pa_debug.g_err_stage := 'p_fin_plan_type_name is '||p_fin_plan_type_name ;
3872: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name
3873: ,pa_debug.g_err_stage,l_debug_level5);
3874: pa_debug.reset_curr_function;
3875: END IF;
3876: EXCEPTION

Line 3873: ,pa_debug.g_err_stage,l_debug_level5);

3869:
3870: IF l_debug_mode='Y' THEN
3871: pa_debug.g_err_stage := 'p_fin_plan_type_name is '||p_fin_plan_type_name ;
3872: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name
3873: ,pa_debug.g_err_stage,l_debug_level5);
3874: pa_debug.reset_curr_function;
3875: END IF;
3876: EXCEPTION
3877: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 3874: pa_debug.reset_curr_function;

3870: IF l_debug_mode='Y' THEN
3871: pa_debug.g_err_stage := 'p_fin_plan_type_name is '||p_fin_plan_type_name ;
3872: pa_debug.write('convert_plan_type_name_to_id: ' || g_module_name
3873: ,pa_debug.g_err_stage,l_debug_level5);
3874: pa_debug.reset_curr_function;
3875: END IF;
3876: EXCEPTION
3877: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
3878:

Line 3899: pa_debug.reset_curr_function;

3895: ELSE
3896: x_msg_count := l_msg_count;
3897: END IF;
3898: IF l_debug_mode='Y' THEN
3899: pa_debug.reset_curr_function;
3900: END IF;
3901: RETURN;
3902:
3903: WHEN OTHERS THEN

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

3912: ,p_procedure_name => 'convert_plan_type_name_to_id'
3913: ,p_error_text => x_msg_data);
3914:
3915: IF l_debug_mode = 'Y' THEN
3916: pa_debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
3917: pa_debug.write(g_module_name,pa_debug.g_err_stage,
3918: l_debug_level5);
3919: pa_debug.reset_curr_function;
3920: END IF;

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

3913: ,p_error_text => x_msg_data);
3914:
3915: IF l_debug_mode = 'Y' THEN
3916: pa_debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
3917: pa_debug.write(g_module_name,pa_debug.g_err_stage,
3918: l_debug_level5);
3919: pa_debug.reset_curr_function;
3920: END IF;
3921: RAISE;

Line 3919: pa_debug.reset_curr_function;

3915: IF l_debug_mode = 'Y' THEN
3916: pa_debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
3917: pa_debug.write(g_module_name,pa_debug.g_err_stage,
3918: l_debug_level5);
3919: pa_debug.reset_curr_function;
3920: END IF;
3921: RAISE;
3922:
3923: END convert_plan_type_name_to_id;

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

3972: BEGIN
3973:
3974: SAVEPOINT DELETE_WP_OPTION_SAVE;
3975:
3976: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
3977: l_debug_mode := NVL(l_debug_mode, 'N');
3978: x_msg_count := 0;
3979: x_return_status := FND_API.G_RET_STS_SUCCESS;
3980: IF p_pa_debug_mode = 'Y' THEN

Line 3980: IF p_pa_debug_mode = 'Y' THEN

3976: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
3977: l_debug_mode := NVL(l_debug_mode, 'N');
3978: x_msg_count := 0;
3979: x_return_status := FND_API.G_RET_STS_SUCCESS;
3980: IF p_pa_debug_mode = 'Y' THEN
3981: PA_DEBUG.Set_Curr_Function( p_function => 'PA_FIN_PLAN_PVT.Delete_wp_option',
3982: p_debug_mode => l_debug_mode );
3983: END IF;
3984: ---------------------------------------------------------------

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

3977: l_debug_mode := NVL(l_debug_mode, 'N');
3978: x_msg_count := 0;
3979: x_return_status := FND_API.G_RET_STS_SUCCESS;
3980: IF p_pa_debug_mode = 'Y' THEN
3981: PA_DEBUG.Set_Curr_Function( p_function => 'PA_FIN_PLAN_PVT.Delete_wp_option',
3982: p_debug_mode => l_debug_mode );
3983: END IF;
3984: ---------------------------------------------------------------
3985: -- validating input parameter p_project_id.

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

3985: -- validating input parameter p_project_id.
3986: -- p_project_id cannot be passed as null.
3987: ---------------------------------------------------------------
3988: IF l_debug_mode = 'Y' THEN
3989: pa_debug.g_err_stage:='Validating input parameters';
3990: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);
3991: END IF;
3992:
3993: IF (p_project_id IS NULL)

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

3986: -- p_project_id cannot be passed as null.
3987: ---------------------------------------------------------------
3988: IF l_debug_mode = 'Y' THEN
3989: pa_debug.g_err_stage:='Validating input parameters';
3990: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);
3991: END IF;
3992:
3993: IF (p_project_id IS NULL)
3994: THEN

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

3993: IF (p_project_id IS NULL)
3994: THEN
3995:
3996: IF l_debug_mode = 'Y' THEN
3997: pa_debug.write('Delete_wp_options Project Id is null: ' || g_module_name,pa_debug.g_err_stage,5);
3998: END IF;
3999:
4000: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
4001: p_msg_name => 'PA_FP_INV_PARAM_PASSED');

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

4008: --Fetch proj_fp_options_id
4009: ---------------------------------------------------------------
4010:
4011: IF l_debug_mode = 'Y' THEN
4012: pa_debug.g_err_stage:='Fetching proj_fp_options_id ';
4013: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);
4014: END IF;
4015:
4016: SELECT pfo.proj_fp_options_id

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

4009: ---------------------------------------------------------------
4010:
4011: IF l_debug_mode = 'Y' THEN
4012: pa_debug.g_err_stage:='Fetching proj_fp_options_id ';
4013: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);
4014: END IF;
4015:
4016: SELECT pfo.proj_fp_options_id
4017: INTO l_proj_fp_options_id

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

4028: -- Delete_wp_budget_versions
4029: -----------------------------------------------------------------
4030:
4031: IF l_debug_mode = 'Y' THEN
4032: pa_debug.g_err_stage:='Fetching the workplan structure ids for the project id';
4033: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);
4034: END IF;
4035:
4036: OPEN c_struct_ver(p_project_id);

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

4029: -----------------------------------------------------------------
4030:
4031: IF l_debug_mode = 'Y' THEN
4032: pa_debug.g_err_stage:='Fetching the workplan structure ids for the project id';
4033: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);
4034: END IF;
4035:
4036: OPEN c_struct_ver(p_project_id);
4037:

Line 4040: IF p_pa_debug_mode = 'Y' THEN

4036: OPEN c_struct_ver(p_project_id);
4037:
4038: FETCH c_struct_ver BULK COLLECT INTO l_sv_id_tbl;
4039: IF c_struct_ver%NOTFOUND THEN
4040: IF p_pa_debug_mode = 'Y' THEN
4041: pa_debug.g_err_stage:= 'No Structure versions for the project_id passed - project_id: '||p_project_id;
4042: pa_debug.write(g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4043: END IF;
4044: END IF;

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

4037:
4038: FETCH c_struct_ver BULK COLLECT INTO l_sv_id_tbl;
4039: IF c_struct_ver%NOTFOUND THEN
4040: IF p_pa_debug_mode = 'Y' THEN
4041: pa_debug.g_err_stage:= 'No Structure versions for the project_id passed - project_id: '||p_project_id;
4042: pa_debug.write(g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4043: END IF;
4044: END IF;
4045: CLOSE c_struct_ver;

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

4038: FETCH c_struct_ver BULK COLLECT INTO l_sv_id_tbl;
4039: IF c_struct_ver%NOTFOUND THEN
4040: IF p_pa_debug_mode = 'Y' THEN
4041: pa_debug.g_err_stage:= 'No Structure versions for the project_id passed - project_id: '||p_project_id;
4042: pa_debug.write(g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4043: END IF;
4044: END IF;
4045: CLOSE c_struct_ver;
4046:

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

4048:
4049: IF l_sv_id_count > 0 THEN
4050:
4051: IF l_debug_mode = 'Y' THEN
4052: pa_debug.g_err_stage:='Deleting all version data for the wp structure version ids pertaining to project_id:'||p_project_id;
4053: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);
4054: END IF;
4055:
4056: Delete_wp_budget_versions

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

4049: IF l_sv_id_count > 0 THEN
4050:
4051: IF l_debug_mode = 'Y' THEN
4052: pa_debug.g_err_stage:='Deleting all version data for the wp structure version ids pertaining to project_id:'||p_project_id;
4053: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);
4054: END IF;
4055:
4056: Delete_wp_budget_versions
4057: (p_struct_elem_version_id_tbl => l_sv_id_tbl

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

4061:
4062: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4063:
4064: IF l_debug_mode = 'Y' THEN
4065: pa_debug.g_err_stage:='Call to Delete_wp_budget_versions is returning error status';
4066: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);
4067: END IF;
4068: RAISE Delete_Ver_Exc_PVT;
4069: END IF;

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

4062: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4063:
4064: IF l_debug_mode = 'Y' THEN
4065: pa_debug.g_err_stage:='Call to Delete_wp_budget_versions is returning error status';
4066: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);
4067: END IF;
4068: RAISE Delete_Ver_Exc_PVT;
4069: END IF;
4070:

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

4076: --Deleting data from respective tables
4077: ---------------------------------------------------------------
4078:
4079: IF l_debug_mode = 'Y' THEN
4080: pa_debug.g_err_stage:='Deleting data from respective tables';
4081: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);
4082: END IF;
4083:
4084: -- delete from pa_proj_fp_options table

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

4077: ---------------------------------------------------------------
4078:
4079: IF l_debug_mode = 'Y' THEN
4080: pa_debug.g_err_stage:='Deleting data from respective tables';
4081: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,3);
4082: END IF;
4083:
4084: -- delete from pa_proj_fp_options table
4085: DELETE FROM pa_proj_fp_options WHERE proj_fp_options_id = l_proj_fp_options_id;

Line 4094: pa_debug.reset_curr_function;

4090: -- delete from pa_fp_upgrade_audit
4091: DELETE FROM pa_fp_upgrade_audit WHERE proj_fp_options_id = l_proj_fp_options_id;
4092:
4093: IF l_debug_mode = 'Y' THEN
4094: pa_debug.reset_curr_function;
4095: END IF;
4096: EXCEPTION
4097: WHEN NO_DATA_FOUND THEN
4098: IF l_debug_mode = 'Y' THEN

Line 4099: pa_debug.reset_curr_function;

4095: END IF;
4096: EXCEPTION
4097: WHEN NO_DATA_FOUND THEN
4098: IF l_debug_mode = 'Y' THEN
4099: pa_debug.reset_curr_function;
4100: END IF;
4101: WHEN Delete_Ver_Exc_PVT THEN
4102: ROLLBACK TO SAVEPOINT PA_FP_PUB_DELETE_VER;
4103: l_msg_count := FND_MSG_PUB.count_msg;

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

4117:
4118: x_return_status := FND_API.G_RET_STS_ERROR;
4119:
4120: IF l_debug_mode = 'Y' THEN
4121: pa_debug.g_err_stage:='Delete_wp_budget_versions returned error';
4122: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,5);
4123: pa_debug.reset_curr_function;
4124: END IF;
4125:

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

4118: x_return_status := FND_API.G_RET_STS_ERROR;
4119:
4120: IF l_debug_mode = 'Y' THEN
4121: pa_debug.g_err_stage:='Delete_wp_budget_versions returned error';
4122: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,5);
4123: pa_debug.reset_curr_function;
4124: END IF;
4125:
4126: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 4123: pa_debug.reset_curr_function;

4119:
4120: IF l_debug_mode = 'Y' THEN
4121: pa_debug.g_err_stage:='Delete_wp_budget_versions returned error';
4122: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,5);
4123: pa_debug.reset_curr_function;
4124: END IF;
4125:
4126: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
4127: l_msg_count := FND_MSG_PUB.count_msg;

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

4141:
4142: x_return_status := FND_API.G_RET_STS_ERROR;
4143:
4144: IF l_debug_mode = 'Y' THEN
4145: pa_debug.g_err_stage:='Invalid Arguments Passed';
4146: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,5);
4147: pa_debug.reset_curr_function;
4148: END IF;
4149:

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

4142: x_return_status := FND_API.G_RET_STS_ERROR;
4143:
4144: IF l_debug_mode = 'Y' THEN
4145: pa_debug.g_err_stage:='Invalid Arguments Passed';
4146: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,5);
4147: pa_debug.reset_curr_function;
4148: END IF;
4149:
4150: WHEN Others THEN

Line 4147: pa_debug.reset_curr_function;

4143:
4144: IF l_debug_mode = 'Y' THEN
4145: pa_debug.g_err_stage:='Invalid Arguments Passed';
4146: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,5);
4147: pa_debug.reset_curr_function;
4148: END IF;
4149:
4150: WHEN Others THEN
4151: ROLLBACK TO SAVEPOINT DELETE_WP_OPTION_SAVE;

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

4155: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PVT'
4156: ,p_procedure_name => 'Delete_wp_option');
4157:
4158: IF l_debug_mode = 'Y' THEN
4159: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
4160: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,5);
4161: pa_debug.reset_curr_function;
4162: END IF;
4163: RAISE;

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

4156: ,p_procedure_name => 'Delete_wp_option');
4157:
4158: IF l_debug_mode = 'Y' THEN
4159: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
4160: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,5);
4161: pa_debug.reset_curr_function;
4162: END IF;
4163: RAISE;
4164:

Line 4161: pa_debug.reset_curr_function;

4157:
4158: IF l_debug_mode = 'Y' THEN
4159: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
4160: pa_debug.write('Delete_wp_option: ' || g_module_name,pa_debug.g_err_stage,5);
4161: pa_debug.reset_curr_function;
4162: END IF;
4163: RAISE;
4164:
4165: END Delete_wp_option;

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

4198:
4199: BEGIN
4200: SAVEPOINT PA_FP_PUB_DELETE_VER;
4201:
4202: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4203: l_debug_mode := NVL(l_debug_mode, 'N');
4204: x_msg_count := 0;
4205: x_return_status := FND_API.G_RET_STS_SUCCESS;
4206: IF p_pa_debug_mode = 'Y' THEN

Line 4206: IF p_pa_debug_mode = 'Y' THEN

4202: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4203: l_debug_mode := NVL(l_debug_mode, 'N');
4204: x_msg_count := 0;
4205: x_return_status := FND_API.G_RET_STS_SUCCESS;
4206: IF p_pa_debug_mode = 'Y' THEN
4207: PA_DEBUG.Set_Curr_Function( p_function => 'PA_FIN_PLAN_PVT.Delete_wp_bugdet_versions',
4208: p_debug_mode => l_debug_mode );
4209: END IF;
4210:

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

4203: l_debug_mode := NVL(l_debug_mode, 'N');
4204: x_msg_count := 0;
4205: x_return_status := FND_API.G_RET_STS_SUCCESS;
4206: IF p_pa_debug_mode = 'Y' THEN
4207: PA_DEBUG.Set_Curr_Function( p_function => 'PA_FIN_PLAN_PVT.Delete_wp_bugdet_versions',
4208: p_debug_mode => l_debug_mode );
4209: END IF;
4210:
4211: ------------------------------------------------------------------------

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

4212: -- Check if the PLSql Table p_struct_elem_version_id_tbl has no records.
4213: ------------------------------------------------------------------------
4214:
4215: IF l_debug_mode = 'Y' THEN
4216: pa_debug.g_err_stage:='Checking for existence of data in PLsql table p_struct_elem_version_id_tbl';
4217: pa_debug.write('Delete_wp_bugdet_versions: ' || g_module_name,pa_debug.g_err_stage,3);
4218: END IF;
4219:
4220: l_sv_id_tbl_count := p_struct_elem_version_id_tbl.COUNT;

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

4213: ------------------------------------------------------------------------
4214:
4215: IF l_debug_mode = 'Y' THEN
4216: pa_debug.g_err_stage:='Checking for existence of data in PLsql table p_struct_elem_version_id_tbl';
4217: pa_debug.write('Delete_wp_bugdet_versions: ' || g_module_name,pa_debug.g_err_stage,3);
4218: END IF;
4219:
4220: l_sv_id_tbl_count := p_struct_elem_version_id_tbl.COUNT;
4221:

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

4233: --------------------------------------------------
4234: FOR i in p_struct_elem_version_id_tbl.first .. p_struct_elem_version_id_tbl.last LOOP --LoopA
4235:
4236: IF l_debug_mode = 'Y' THEN
4237: pa_debug.g_err_stage:='Outer loop : '||i;
4238: pa_debug.write('Delete_wp_bugdet_versions: ' || g_module_name,pa_debug.g_err_stage,3);
4239: END IF;
4240:
4241: -----------------------------------------------------------

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

4234: FOR i in p_struct_elem_version_id_tbl.first .. p_struct_elem_version_id_tbl.last LOOP --LoopA
4235:
4236: IF l_debug_mode = 'Y' THEN
4237: pa_debug.g_err_stage:='Outer loop : '||i;
4238: pa_debug.write('Delete_wp_bugdet_versions: ' || g_module_name,pa_debug.g_err_stage,3);
4239: END IF;
4240:
4241: -----------------------------------------------------------
4242: -- For each stucture_version_id fetch the budget_version_id

Line 4252: IF p_pa_debug_mode = 'Y' THEN

4248: -- iterate through the out loop LoopA
4249: ------------------------------------------------------------------
4250:
4251: IF c_budget_ver%NOTFOUND THEN
4252: IF p_pa_debug_mode = 'Y' THEN
4253: pa_debug.g_err_stage:= 'Could not fetch budget_version_id !!!...';
4254: pa_debug.write(g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4255: END IF;
4256: EXIT; -- Come out of LoopB, Jump to next iteration of LoopA

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

4249: ------------------------------------------------------------------
4250:
4251: IF c_budget_ver%NOTFOUND THEN
4252: IF p_pa_debug_mode = 'Y' THEN
4253: pa_debug.g_err_stage:= 'Could not fetch budget_version_id !!!...';
4254: pa_debug.write(g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4255: END IF;
4256: EXIT; -- Come out of LoopB, Jump to next iteration of LoopA
4257: END IF;

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

4250:
4251: IF c_budget_ver%NOTFOUND THEN
4252: IF p_pa_debug_mode = 'Y' THEN
4253: pa_debug.g_err_stage:= 'Could not fetch budget_version_id !!!...';
4254: pa_debug.write(g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4255: END IF;
4256: EXIT; -- Come out of LoopB, Jump to next iteration of LoopA
4257: END IF;
4258:

Line 4278: IF p_pa_debug_mode = 'Y' THEN

4274: END IF;
4275:
4276: END LOOP; -- LoopB Closed
4277: END LOOP; -- LoopA Closed
4278: IF p_pa_debug_mode = 'Y' THEN
4279: pa_debug.reset_curr_function;
4280: END IF;
4281: EXCEPTION
4282:

Line 4279: pa_debug.reset_curr_function;

4275:
4276: END LOOP; -- LoopB Closed
4277: END LOOP; -- LoopA Closed
4278: IF p_pa_debug_mode = 'Y' THEN
4279: pa_debug.reset_curr_function;
4280: END IF;
4281: EXCEPTION
4282:
4283: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

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

4298:
4299: x_return_status := FND_API.G_RET_STS_ERROR;
4300:
4301: IF l_debug_mode = 'Y' THEN
4302: pa_debug.g_err_stage:='Invalid Arguments Passed';
4303: pa_debug.write('Delete_wp_budget_version: ' || g_module_name,pa_debug.g_err_stage,5);
4304: pa_debug.reset_curr_function;
4305: END IF;
4306:

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

4299: x_return_status := FND_API.G_RET_STS_ERROR;
4300:
4301: IF l_debug_mode = 'Y' THEN
4302: pa_debug.g_err_stage:='Invalid Arguments Passed';
4303: pa_debug.write('Delete_wp_budget_version: ' || g_module_name,pa_debug.g_err_stage,5);
4304: pa_debug.reset_curr_function;
4305: END IF;
4306:
4307: WHEN Delete_Ver_Exc_PVT THEN

Line 4304: pa_debug.reset_curr_function;

4300:
4301: IF l_debug_mode = 'Y' THEN
4302: pa_debug.g_err_stage:='Invalid Arguments Passed';
4303: pa_debug.write('Delete_wp_budget_version: ' || g_module_name,pa_debug.g_err_stage,5);
4304: pa_debug.reset_curr_function;
4305: END IF;
4306:
4307: WHEN Delete_Ver_Exc_PVT THEN
4308: ROLLBACK TO SAVEPOINT PA_FP_PUB_DELETE_VER;

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

4322: END IF;
4323: x_return_status := FND_API.G_RET_STS_ERROR;
4324:
4325: IF l_debug_mode = 'Y' THEN
4326: pa_debug.g_err_stage:='Delete_version_helper returned error';
4327: pa_debug.write('Delete_wp_options: ' || g_module_name,pa_debug.g_err_stage,5);
4328: pa_debug.reset_curr_function;
4329: END IF;
4330:

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

4323: x_return_status := FND_API.G_RET_STS_ERROR;
4324:
4325: IF l_debug_mode = 'Y' THEN
4326: pa_debug.g_err_stage:='Delete_version_helper returned error';
4327: pa_debug.write('Delete_wp_options: ' || g_module_name,pa_debug.g_err_stage,5);
4328: pa_debug.reset_curr_function;
4329: END IF;
4330:
4331: WHEN Others THEN

Line 4328: pa_debug.reset_curr_function;

4324:
4325: IF l_debug_mode = 'Y' THEN
4326: pa_debug.g_err_stage:='Delete_version_helper returned error';
4327: pa_debug.write('Delete_wp_options: ' || g_module_name,pa_debug.g_err_stage,5);
4328: pa_debug.reset_curr_function;
4329: END IF;
4330:
4331: WHEN Others THEN
4332: ROLLBACK TO SAVEPOINT DELETE_WP_OPTION_SAVE;

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

4336: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FIN_PLAN_PVT'
4337: ,p_procedure_name => 'Delete_wp_budget_versions');
4338:
4339: IF l_debug_mode = 'Y' THEN
4340: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
4341: pa_debug.write('Delete_wp_budget_versions: ' || g_module_name,pa_debug.g_err_stage,5);
4342: pa_debug.reset_curr_function;
4343: END IF;
4344: RAISE;

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

4337: ,p_procedure_name => 'Delete_wp_budget_versions');
4338:
4339: IF l_debug_mode = 'Y' THEN
4340: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
4341: pa_debug.write('Delete_wp_budget_versions: ' || g_module_name,pa_debug.g_err_stage,5);
4342: pa_debug.reset_curr_function;
4343: END IF;
4344: RAISE;
4345:

Line 4342: pa_debug.reset_curr_function;

4338:
4339: IF l_debug_mode = 'Y' THEN
4340: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
4341: pa_debug.write('Delete_wp_budget_versions: ' || g_module_name,pa_debug.g_err_stage,5);
4342: pa_debug.reset_curr_function;
4343: END IF;
4344: RAISE;
4345:
4346: END Delete_wp_budget_versions;

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

4396: BEGIN
4397:
4398: x_msg_count := 0;
4399: x_return_status := FND_API.G_RET_STS_SUCCESS;
4400: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4401: l_debug_mode := NVL(l_debug_mode, 'Y');
4402:
4403: IF p_pa_debug_mode = 'Y' THEN
4404: PA_DEBUG.Set_Curr_Function( p_function => 'PA_FIN_PLAN_PVT.ADD_FIN_PLAN_LINES',

Line 4403: IF p_pa_debug_mode = 'Y' THEN

4399: x_return_status := FND_API.G_RET_STS_SUCCESS;
4400: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4401: l_debug_mode := NVL(l_debug_mode, 'Y');
4402:
4403: IF p_pa_debug_mode = 'Y' THEN
4404: PA_DEBUG.Set_Curr_Function( p_function => 'PA_FIN_PLAN_PVT.ADD_FIN_PLAN_LINES',
4405: p_debug_mode => l_debug_mode );
4406: END IF;
4407: l_lines_count := p_finplan_lines_tab.COUNT;

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

4400: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
4401: l_debug_mode := NVL(l_debug_mode, 'Y');
4402:
4403: IF p_pa_debug_mode = 'Y' THEN
4404: PA_DEBUG.Set_Curr_Function( p_function => 'PA_FIN_PLAN_PVT.ADD_FIN_PLAN_LINES',
4405: p_debug_mode => l_debug_mode );
4406: END IF;
4407: l_lines_count := p_finplan_lines_tab.COUNT;
4408: IF l_debug_mode = 'Y' THEN

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

4405: p_debug_mode => l_debug_mode );
4406: END IF;
4407: l_lines_count := p_finplan_lines_tab.COUNT;
4408: IF l_debug_mode = 'Y' THEN
4409: pa_debug.g_err_stage:='Validating input parameter - plan lines count cannot be 0';
4410: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4411: END IF;
4412:
4413: -- Change of Code for Bug 3639983 Starts Here

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

4406: END IF;
4407: l_lines_count := p_finplan_lines_tab.COUNT;
4408: IF l_debug_mode = 'Y' THEN
4409: pa_debug.g_err_stage:='Validating input parameter - plan lines count cannot be 0';
4410: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4411: END IF;
4412:
4413: -- Change of Code for Bug 3639983 Starts Here
4414: IF l_lines_count = 0 THEN

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

4412:
4413: -- Change of Code for Bug 3639983 Starts Here
4414: IF l_lines_count = 0 THEN
4415: IF l_debug_mode = 'Y' THEN
4416: pa_debug.g_err_stage:='No Lines to be added - Returning';
4417: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4418: pa_debug.reset_curr_function;
4419: END IF;
4420: RETURN;

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

4413: -- Change of Code for Bug 3639983 Starts Here
4414: IF l_lines_count = 0 THEN
4415: IF l_debug_mode = 'Y' THEN
4416: pa_debug.g_err_stage:='No Lines to be added - Returning';
4417: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4418: pa_debug.reset_curr_function;
4419: END IF;
4420: RETURN;
4421: END IF;

Line 4418: pa_debug.reset_curr_function;

4414: IF l_lines_count = 0 THEN
4415: IF l_debug_mode = 'Y' THEN
4416: pa_debug.g_err_stage:='No Lines to be added - Returning';
4417: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4418: pa_debug.reset_curr_function;
4419: END IF;
4420: RETURN;
4421: END IF;
4422: -- Change of Code for Bug 3639983 Ends Here

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

4421: END IF;
4422: -- Change of Code for Bug 3639983 Ends Here
4423:
4424: IF l_debug_mode = 'Y' THEN
4425: pa_debug.g_err_stage:='Calling CREATE_FINPLAN_LINES';
4426: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4427: END IF;
4428:
4429: --Call to api PA_FIN_PLAN_PVT.CREATE_FINPLAN_LINES

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

4422: -- Change of Code for Bug 3639983 Ends Here
4423:
4424: IF l_debug_mode = 'Y' THEN
4425: pa_debug.g_err_stage:='Calling CREATE_FINPLAN_LINES';
4426: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4427: END IF;
4428:
4429: --Call to api PA_FIN_PLAN_PVT.CREATE_FINPLAN_LINES
4430:

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

4438: ,x_msg_count => x_msg_count
4439: ,x_msg_data => x_msg_data );
4440:
4441: IF l_debug_mode = 'Y' THEN
4442: pa_debug.g_err_stage:='Return Status After CREATE_FINPLAN_LINES :'||x_return_status;
4443: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4444: END IF;
4445:
4446: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

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

4439: ,x_msg_data => x_msg_data );
4440:
4441: IF l_debug_mode = 'Y' THEN
4442: pa_debug.g_err_stage:='Return Status After CREATE_FINPLAN_LINES :'||x_return_status;
4443: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4444: END IF;
4445:
4446: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
4447:

Line 4448: IF P_PA_DEBUG_MODE = 'Y' THEN

4444: END IF;
4445:
4446: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
4447:
4448: IF P_PA_DEBUG_MODE = 'Y' THEN
4449: pa_debug.g_err_stage:= 'Error Calling CREATE_FINPLAN_LINES';
4450: pa_debug.write('CREATE_DRAFT: '||g_module_name,pa_debug.g_err_stage,5);
4451: END IF;
4452:

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

4445:
4446: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
4447:
4448: IF P_PA_DEBUG_MODE = 'Y' THEN
4449: pa_debug.g_err_stage:= 'Error Calling CREATE_FINPLAN_LINES';
4450: pa_debug.write('CREATE_DRAFT: '||g_module_name,pa_debug.g_err_stage,5);
4451: END IF;
4452:
4453: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

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

4446: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
4447:
4448: IF P_PA_DEBUG_MODE = 'Y' THEN
4449: pa_debug.g_err_stage:= 'Error Calling CREATE_FINPLAN_LINES';
4450: pa_debug.write('CREATE_DRAFT: '||g_module_name,pa_debug.g_err_stage,5);
4451: END IF;
4452:
4453: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
4454:

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

4457: END IF;
4458:
4459: -- Change of Code for Bug 3639983 Starts Here
4460: IF l_debug_mode = 'Y' THEN
4461: pa_debug.g_err_stage:='Extending lenght of all local empty table to l_lines_count';
4462: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4463: END IF;
4464:
4465: l_line_start_date_tab.extend(l_lines_count);

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

4458:
4459: -- Change of Code for Bug 3639983 Starts Here
4460: IF l_debug_mode = 'Y' THEN
4461: pa_debug.g_err_stage:='Extending lenght of all local empty table to l_lines_count';
4462: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4463: END IF;
4464:
4465: l_line_start_date_tab.extend(l_lines_count);
4466: l_line_end_date_tab.extend(l_lines_count);

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

4503:
4504: -- Change of Code for Bug 3732414 Ends Here
4505:
4506: IF l_debug_mode = 'Y' THEN
4507: pa_debug.g_err_stage:='Fetching project Id from get_proj_id_csr';
4508: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4509: END IF;
4510:
4511: OPEN get_proj_id_csr ;

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

4504: -- Change of Code for Bug 3732414 Ends Here
4505:
4506: IF l_debug_mode = 'Y' THEN
4507: pa_debug.g_err_stage:='Fetching project Id from get_proj_id_csr';
4508: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4509: END IF;
4510:
4511: OPEN get_proj_id_csr ;
4512: FETCH get_proj_id_csr into l_project_id ;

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

4513: CLOSE get_proj_id_csr;
4514:
4515: -- Calling PA_FP_CALC_PLAN_PKG.calculate api
4516: IF l_debug_mode = 'Y' THEN
4517: pa_debug.g_err_stage:='Calling Calculate API';
4518: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4519:
4520: pa_debug.g_err_stage:='Calling Calculate API l_project_id'||l_project_id;
4521: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

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

4514:
4515: -- Calling PA_FP_CALC_PLAN_PKG.calculate api
4516: IF l_debug_mode = 'Y' THEN
4517: pa_debug.g_err_stage:='Calling Calculate API';
4518: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4519:
4520: pa_debug.g_err_stage:='Calling Calculate API l_project_id'||l_project_id;
4521: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4522:

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

4516: IF l_debug_mode = 'Y' THEN
4517: pa_debug.g_err_stage:='Calling Calculate API';
4518: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4519:
4520: pa_debug.g_err_stage:='Calling Calculate API l_project_id'||l_project_id;
4521: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4522:
4523: pa_debug.g_err_stage:='Calling Calculate API p_fin_plan_version_id'||p_fin_plan_version_id;
4524: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

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

4517: pa_debug.g_err_stage:='Calling Calculate API';
4518: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4519:
4520: pa_debug.g_err_stage:='Calling Calculate API l_project_id'||l_project_id;
4521: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4522:
4523: pa_debug.g_err_stage:='Calling Calculate API p_fin_plan_version_id'||p_fin_plan_version_id;
4524: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4525:

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

4519:
4520: pa_debug.g_err_stage:='Calling Calculate API l_project_id'||l_project_id;
4521: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4522:
4523: pa_debug.g_err_stage:='Calling Calculate API p_fin_plan_version_id'||p_fin_plan_version_id;
4524: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4525:
4526: pa_debug.g_err_stage:='Calling Calculate API l_resource_assignment_tab'||l_resource_assignment_tab.COUNT;
4527: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

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

4520: pa_debug.g_err_stage:='Calling Calculate API l_project_id'||l_project_id;
4521: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4522:
4523: pa_debug.g_err_stage:='Calling Calculate API p_fin_plan_version_id'||p_fin_plan_version_id;
4524: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4525:
4526: pa_debug.g_err_stage:='Calling Calculate API l_resource_assignment_tab'||l_resource_assignment_tab.COUNT;
4527: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4528:

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

4522:
4523: pa_debug.g_err_stage:='Calling Calculate API p_fin_plan_version_id'||p_fin_plan_version_id;
4524: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4525:
4526: pa_debug.g_err_stage:='Calling Calculate API l_resource_assignment_tab'||l_resource_assignment_tab.COUNT;
4527: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4528:
4529: pa_debug.g_err_stage:='Calling Calculate API l_delete_budget_lines_tab'||l_delete_budget_lines_tab.COUNT;
4530: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

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

4523: pa_debug.g_err_stage:='Calling Calculate API p_fin_plan_version_id'||p_fin_plan_version_id;
4524: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4525:
4526: pa_debug.g_err_stage:='Calling Calculate API l_resource_assignment_tab'||l_resource_assignment_tab.COUNT;
4527: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4528:
4529: pa_debug.g_err_stage:='Calling Calculate API l_delete_budget_lines_tab'||l_delete_budget_lines_tab.COUNT;
4530: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4531:

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

4525:
4526: pa_debug.g_err_stage:='Calling Calculate API l_resource_assignment_tab'||l_resource_assignment_tab.COUNT;
4527: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4528:
4529: pa_debug.g_err_stage:='Calling Calculate API l_delete_budget_lines_tab'||l_delete_budget_lines_tab.COUNT;
4530: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4531:
4532: pa_debug.g_err_stage:='Calling Calculate API l_spread_amts_flag_tab'||l_spread_amts_flag_tab.COUNT;
4533: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

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

4526: pa_debug.g_err_stage:='Calling Calculate API l_resource_assignment_tab'||l_resource_assignment_tab.COUNT;
4527: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4528:
4529: pa_debug.g_err_stage:='Calling Calculate API l_delete_budget_lines_tab'||l_delete_budget_lines_tab.COUNT;
4530: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4531:
4532: pa_debug.g_err_stage:='Calling Calculate API l_spread_amts_flag_tab'||l_spread_amts_flag_tab.COUNT;
4533: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4534:

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

4528:
4529: pa_debug.g_err_stage:='Calling Calculate API l_delete_budget_lines_tab'||l_delete_budget_lines_tab.COUNT;
4530: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4531:
4532: pa_debug.g_err_stage:='Calling Calculate API l_spread_amts_flag_tab'||l_spread_amts_flag_tab.COUNT;
4533: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4534:
4535: pa_debug.g_err_stage:='Calling Calculate API l_txn_currency_code_tab'||l_txn_currency_code_tab.COUNT;
4536: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);

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

4529: pa_debug.g_err_stage:='Calling Calculate API l_delete_budget_lines_tab'||l_delete_budget_lines_tab.COUNT;
4530: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4531:
4532: pa_debug.g_err_stage:='Calling Calculate API l_spread_amts_flag_tab'||l_spread_amts_flag_tab.COUNT;
4533: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4534:
4535: pa_debug.g_err_stage:='Calling Calculate API l_txn_currency_code_tab'||l_txn_currency_code_tab.COUNT;
4536: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4537:

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

4531:
4532: pa_debug.g_err_stage:='Calling Calculate API l_spread_amts_flag_tab'||l_spread_amts_flag_tab.COUNT;
4533: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4534:
4535: pa_debug.g_err_stage:='Calling Calculate API l_txn_currency_code_tab'||l_txn_currency_code_tab.COUNT;
4536: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4537:
4538: END IF;
4539:

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

4532: pa_debug.g_err_stage:='Calling Calculate API l_spread_amts_flag_tab'||l_spread_amts_flag_tab.COUNT;
4533: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4534:
4535: pa_debug.g_err_stage:='Calling Calculate API l_txn_currency_code_tab'||l_txn_currency_code_tab.COUNT;
4536: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4537:
4538: END IF;
4539:
4540: -- bug 4221650: checking for the time phased code of the version to call

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

4544:
4545: IF NOT l_ver_time_phased_code = 'N' THEN
4546:
4547: IF l_debug_mode = 'Y' THEN
4548: pa_debug.g_err_stage:=' Calling Calculate in BUDGET_LINE mode';
4549: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4550: END IF;
4551:
4552: -- bug 3825873 17-JUL-2004 Corrected the input parameters

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

4545: IF NOT l_ver_time_phased_code = 'N' THEN
4546:
4547: IF l_debug_mode = 'Y' THEN
4548: pa_debug.g_err_stage:=' Calling Calculate in BUDGET_LINE mode';
4549: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4550: END IF;
4551:
4552: -- bug 3825873 17-JUL-2004 Corrected the input parameters
4553: /*Bug 4224464 Added the if condition to ditinguish the call to calculate API in AMG flow from other flows.

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

4633: END IF;
4634: ELSE
4635: -- bug 4221650:
4636: IF l_debug_mode = 'Y' THEN
4637: pa_debug.g_err_stage:=' Calling Calculate in RESOURCE_ASSIGNMENT mode';
4638: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4639: END IF;
4640:
4641: /*Bug 4224464 Added the if condition to ditinguish the call to calculate API in AMG flow from other flows.

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

4634: ELSE
4635: -- bug 4221650:
4636: IF l_debug_mode = 'Y' THEN
4637: pa_debug.g_err_stage:=' Calling Calculate in RESOURCE_ASSIGNMENT mode';
4638: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4639: END IF;
4640:
4641: /*Bug 4224464 Added the if condition to ditinguish the call to calculate API in AMG flow from other flows.
4642: 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 4689: pa_debug.g_err_stage:='Return Status After CALCULATE :'||x_return_status;

4685:
4686: END IF;
4687:
4688: IF l_debug_mode = 'Y' THEN
4689: pa_debug.g_err_stage:='Return Status After CALCULATE :'||x_return_status;
4690: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4691: END IF;
4692:
4693: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

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

4686: END IF;
4687:
4688: IF l_debug_mode = 'Y' THEN
4689: pa_debug.g_err_stage:='Return Status After CALCULATE :'||x_return_status;
4690: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4691: END IF;
4692:
4693: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4694:

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

4692:
4693: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4694:
4695: IF l_debug_mode = 'Y' THEN
4696: pa_debug.g_err_stage:='Called API PA_FP_CALC_PLAN_PKG.calculate returned error';
4697: pa_debug.write(l_module_name,pa_debug.g_err_stage, l_debug_level3);
4698: END IF;
4699:
4700: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;

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

4693: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4694:
4695: IF l_debug_mode = 'Y' THEN
4696: pa_debug.g_err_stage:='Called API PA_FP_CALC_PLAN_PKG.calculate returned error';
4697: pa_debug.write(l_module_name,pa_debug.g_err_stage, l_debug_level3);
4698: END IF;
4699:
4700: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
4701:

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

4700: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
4701:
4702: END IF;
4703: IF l_debug_mode = 'Y' THEN
4704: pa_debug.g_err_stage:='Exiting ADD FIN PLAN LINES x_return_status: '||x_return_status;
4705: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4706: pa_debug.reset_curr_function;
4707: END IF;
4708: EXCEPTION

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

4701:
4702: END IF;
4703: IF l_debug_mode = 'Y' THEN
4704: pa_debug.g_err_stage:='Exiting ADD FIN PLAN LINES x_return_status: '||x_return_status;
4705: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4706: pa_debug.reset_curr_function;
4707: END IF;
4708: EXCEPTION
4709:

Line 4706: pa_debug.reset_curr_function;

4702: END IF;
4703: IF l_debug_mode = 'Y' THEN
4704: pa_debug.g_err_stage:='Exiting ADD FIN PLAN LINES x_return_status: '||x_return_status;
4705: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,3);
4706: pa_debug.reset_curr_function;
4707: END IF;
4708: EXCEPTION
4709:
4710: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

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

4725: ELSE
4726: x_msg_count := l_msg_count;
4727: END IF;
4728:
4729: pa_debug.g_err_stage:= 'Invalid Arguments Passed';
4730:
4731: IF P_PA_DEBUG_MODE = 'Y' THEN
4732: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4733: pa_debug.reset_curr_function;

Line 4731: IF P_PA_DEBUG_MODE = 'Y' THEN

4727: END IF;
4728:
4729: pa_debug.g_err_stage:= 'Invalid Arguments Passed';
4730:
4731: IF P_PA_DEBUG_MODE = 'Y' THEN
4732: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4733: pa_debug.reset_curr_function;
4734: END IF;
4735: RETURN;

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

4728:
4729: pa_debug.g_err_stage:= 'Invalid Arguments Passed';
4730:
4731: IF P_PA_DEBUG_MODE = 'Y' THEN
4732: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4733: pa_debug.reset_curr_function;
4734: END IF;
4735: RETURN;
4736:

Line 4733: pa_debug.reset_curr_function;

4729: pa_debug.g_err_stage:= 'Invalid Arguments Passed';
4730:
4731: IF P_PA_DEBUG_MODE = 'Y' THEN
4732: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4733: pa_debug.reset_curr_function;
4734: END IF;
4735: RETURN;
4736:
4737: WHEN others THEN

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

4741: x_msg_data := SQLERRM;
4742:
4743: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_pvt'
4744: ,p_procedure_name => 'ADD_FIN_PLAN_LINES');
4745: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
4746:
4747: IF P_PA_DEBUG_MODE = 'Y' THEN
4748: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4749: pa_debug.reset_curr_function;

Line 4747: IF P_PA_DEBUG_MODE = 'Y' THEN

4743: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fin_plan_pvt'
4744: ,p_procedure_name => 'ADD_FIN_PLAN_LINES');
4745: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
4746:
4747: IF P_PA_DEBUG_MODE = 'Y' THEN
4748: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4749: pa_debug.reset_curr_function;
4750: END IF;
4751: RAISE;

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

4744: ,p_procedure_name => 'ADD_FIN_PLAN_LINES');
4745: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
4746:
4747: IF P_PA_DEBUG_MODE = 'Y' THEN
4748: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4749: pa_debug.reset_curr_function;
4750: END IF;
4751: RAISE;
4752:

Line 4749: pa_debug.reset_curr_function;

4745: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;
4746:
4747: IF P_PA_DEBUG_MODE = 'Y' THEN
4748: pa_debug.write('ADD_FIN_PLAN_LINES: ' || g_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);
4749: pa_debug.reset_curr_function;
4750: END IF;
4751: RAISE;
4752:
4753: END ADD_FIN_PLAN_LINES;