5280: l_res_list_control_flag VARCHAR2(1);
5281: l_gl_start_period gl_periods.period_name%TYPE;
5282: l_gl_end_period gl_periods.period_name%TYPE;
5283: l_gl_start_Date VARCHAR2(100);
5284: l_pa_start_period pa_periods_all.period_name%TYPE;
5285: l_pa_end_period pa_periods_all.period_name%TYPE;
5286: l_pa_start_date VARCHAR2(100);
5287: l_plan_version_exists_flag VARCHAR2(1);
5288: l_prj_start_date VARCHAR2(100);
5281: l_gl_start_period gl_periods.period_name%TYPE;
5282: l_gl_end_period gl_periods.period_name%TYPE;
5283: l_gl_start_Date VARCHAR2(100);
5284: l_pa_start_period pa_periods_all.period_name%TYPE;
5285: l_pa_end_period pa_periods_all.period_name%TYPE;
5286: l_pa_start_date VARCHAR2(100);
5287: l_plan_version_exists_flag VARCHAR2(1);
5288: l_prj_start_date VARCHAR2(100);
5289: l_prj_end_date VARCHAR2(100);
6754:
6755: BEGIN
6756: SELECT start_date
6757: INTO x_start_period_start_date
6758: FROM PA_PERIODS
6759: WHERE p_profile_start_date BETWEEN start_date AND end_date;
6760: EXCEPTION
6761: WHEN NO_DATA_FOUND THEN
6762: SELECT MIN(START_DATE)
6760: EXCEPTION
6761: WHEN NO_DATA_FOUND THEN
6762: SELECT MIN(START_DATE)
6763: INTO x_start_period_start_date
6764: FROM PA_PERIODS;
6765: END;
6766:
6767: BEGIN
6768: SELECT end_date
6766:
6767: BEGIN
6768: SELECT end_date
6769: INTO x_end_period_end_date
6770: FROM PA_PERIODS
6771: WHERE p_profile_end_date BETWEEN start_date AND end_date;
6772: EXCEPTION
6773: WHEN NO_DATA_FOUND THEN
6774: SELECT MAX(end_date)
6772: EXCEPTION
6773: WHEN NO_DATA_FOUND THEN
6774: SELECT MAX(end_date)
6775: INTO x_end_period_end_date
6776: FROM PA_PERIODS;
6777: END;
6778:
6779: ELSIF P_PERIOD_TYPE = PA_FP_CONSTANTS_PKG.G_PERIOD_TYPE_GL THEN
6780:
6833: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
6834: ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
6835: ,x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
6836: AS
6837: l_profile_start_date pa_periods.start_date%TYPE;
6838: -- l_end_period_start_date pa_periods.end_date%TYPE;
6839:
6840: BEGIN
6841: /*
6834: ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
6835: ,x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
6836: AS
6837: l_profile_start_date pa_periods.start_date%TYPE;
6838: -- l_end_period_start_date pa_periods.end_date%TYPE;
6839:
6840: BEGIN
6841: /*
6842: pa_debug.g_err_stage := 'Entered get_profile_start_date';
6857: BEGIN
6858: --Select start date of period which is 51 periods before end period
6859: SELECT start_date
6860: INTO l_profile_start_date
6861: FROM pa_periods a
6862: WHERE 51= (SELECT COUNT(*) FROM pa_periods b
6863: WHERE a.start_date < b.start_date
6864: AND b.start_date <= p_profile_end_date );
6865: EXCEPTION
6858: --Select start date of period which is 51 periods before end period
6859: SELECT start_date
6860: INTO l_profile_start_date
6861: FROM pa_periods a
6862: WHERE 51= (SELECT COUNT(*) FROM pa_periods b
6863: WHERE a.start_date < b.start_date
6864: AND b.start_date <= p_profile_end_date );
6865: EXCEPTION
6866: WHEN NO_DATA_FOUND THEN
6872: END IF;
6873: */
6874: SELECT MIN(start_date)
6875: INTO l_profile_start_date
6876: FROM pa_periods;
6877: END;
6878:
6879: ELSIF p_period_type = PA_FP_CONSTANTS_PKG.G_PERIOD_TYPE_GL THEN
6880:
6948: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
6949: ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
6950: ,x_msg_data OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
6951: AS
6952: l_profile_end_date pa_periods.end_date%TYPE;
6953: BEGIN
6954: /*
6955: pa_debug.g_err_stage := 'Entered get_profile_end_date';
6956: IF P_PA_DEBUG_MODE = 'Y' THEN
7015: END IF;
7016:
7017: SELECT end_date
7018: INTO l_profile_end_date
7019: FROM pa_periods a
7020: WHERE 51= (SELECT COUNT(*) FROM pa_periods b
7021: WHERE a.start_date > b.start_date
7022: AND b.start_date >= p_profile_start_date );
7023:
7016:
7017: SELECT end_date
7018: INTO l_profile_end_date
7019: FROM pa_periods a
7020: WHERE 51= (SELECT COUNT(*) FROM pa_periods b
7021: WHERE a.start_date > b.start_date
7022: AND b.start_date >= p_profile_start_date );
7023:
7024: EXCEPTION
7032: END IF;
7033: */
7034: SELECT MAX(end_date)
7035: INTO l_profile_end_date
7036: FROM pa_periods;
7037: END;
7038: END IF;
7039:
7040: x_profile_end_date := l_profile_end_date;
7239: IF p_period_type = PA_FP_CONSTANTS_PKG.G_PERIOD_TYPE_PA THEN
7240:
7241: SELECT count(*)
7242: INTO l_number_of_periods
7243: FROM PA_PERIODS
7244: WHERE start_date BETWEEN TRUNC(SYSDATE) AND l_end_date; /*2690087*/
7245:
7246: ELSIF p_period_type = PA_FP_CONSTANTS_PKG.G_PERIOD_TYPE_GL THEN
7247:
7308: ELSIF p_period_type = PA_FP_CONSTANTS_PKG.G_PERIOD_TYPE_PA THEN
7309:
7310: SELECT start_date
7311: INTO l_profile_start_date
7312: FROM PA_PERIODS
7313: WHERE TRUNC(SYSDATE) BETWEEN start_date AND end_date; /* Bug:- 2690087 */
7314:
7315: END IF;
7316: