7: -------------------------------------------------------------------------------------------
8: --
9: -- Validate for one open version of grading schema
10: FUNCTION assp_val_gs_one_open(
11: p_grading_schema_cd IN IGS_AS_GRD_SCHEMA.grading_schema_cd%TYPE ,
12: p_version_number IN IGS_AS_GRD_SCHEMA.version_number%TYPE ,
13: p_message_name OUT NOCOPY varchar2 )
14: RETURN BOOLEAN IS
15: gv_other_detail VARCHAR2(255);
8: --
9: -- Validate for one open version of grading schema
10: FUNCTION assp_val_gs_one_open(
11: p_grading_schema_cd IN IGS_AS_GRD_SCHEMA.grading_schema_cd%TYPE ,
12: p_version_number IN IGS_AS_GRD_SCHEMA.version_number%TYPE ,
13: p_message_name OUT NOCOPY varchar2 )
14: RETURN BOOLEAN IS
15: gv_other_detail VARCHAR2(255);
16: BEGIN
15: gv_other_detail VARCHAR2(255);
16: BEGIN
17: DECLARE
18: CURSOR c_gs_count(
19: cp_grading_schema_cd IGS_AS_GRD_SCHEMA.grading_schema_cd%TYPE,
20: cp_version_number IGS_AS_GRD_SCHEMA.version_number%TYPE) IS
21: SELECT COUNT(*)
22: FROM IGS_AS_GRD_SCHEMA
23: WHERE grading_schema_cd = cp_grading_schema_cd AND
16: BEGIN
17: DECLARE
18: CURSOR c_gs_count(
19: cp_grading_schema_cd IGS_AS_GRD_SCHEMA.grading_schema_cd%TYPE,
20: cp_version_number IGS_AS_GRD_SCHEMA.version_number%TYPE) IS
21: SELECT COUNT(*)
22: FROM IGS_AS_GRD_SCHEMA
23: WHERE grading_schema_cd = cp_grading_schema_cd AND
24: version_number <> cp_version_number AND
18: CURSOR c_gs_count(
19: cp_grading_schema_cd IGS_AS_GRD_SCHEMA.grading_schema_cd%TYPE,
20: cp_version_number IGS_AS_GRD_SCHEMA.version_number%TYPE) IS
21: SELECT COUNT(*)
22: FROM IGS_AS_GRD_SCHEMA
23: WHERE grading_schema_cd = cp_grading_schema_cd AND
24: version_number <> cp_version_number AND
25: end_dt IS NULL;
26: v_gs_count NUMBER;
55: END assp_val_gs_one_open;
56: --
57: -- Validate for overlapping dates for grading schemas
58: FUNCTION assp_val_gs_ovrlp(
59: p_grading_schema_cd IN IGS_AS_GRD_SCHEMA.grading_schema_cd%TYPE ,
60: p_version_number IN IGS_AS_GRD_SCHEMA.version_number%TYPE ,
61: p_start_dt IN IGS_AS_GRD_SCHEMA.start_dt%TYPE ,
62: p_end_dt IN IGS_AS_GRD_SCHEMA.end_dt%TYPE ,
63: p_message_name OUT NOCOPY varchar2 )
56: --
57: -- Validate for overlapping dates for grading schemas
58: FUNCTION assp_val_gs_ovrlp(
59: p_grading_schema_cd IN IGS_AS_GRD_SCHEMA.grading_schema_cd%TYPE ,
60: p_version_number IN IGS_AS_GRD_SCHEMA.version_number%TYPE ,
61: p_start_dt IN IGS_AS_GRD_SCHEMA.start_dt%TYPE ,
62: p_end_dt IN IGS_AS_GRD_SCHEMA.end_dt%TYPE ,
63: p_message_name OUT NOCOPY varchar2 )
64: RETURN BOOLEAN IS
57: -- Validate for overlapping dates for grading schemas
58: FUNCTION assp_val_gs_ovrlp(
59: p_grading_schema_cd IN IGS_AS_GRD_SCHEMA.grading_schema_cd%TYPE ,
60: p_version_number IN IGS_AS_GRD_SCHEMA.version_number%TYPE ,
61: p_start_dt IN IGS_AS_GRD_SCHEMA.start_dt%TYPE ,
62: p_end_dt IN IGS_AS_GRD_SCHEMA.end_dt%TYPE ,
63: p_message_name OUT NOCOPY varchar2 )
64: RETURN BOOLEAN IS
65: gv_other_detail VARCHAR2(255);
58: FUNCTION assp_val_gs_ovrlp(
59: p_grading_schema_cd IN IGS_AS_GRD_SCHEMA.grading_schema_cd%TYPE ,
60: p_version_number IN IGS_AS_GRD_SCHEMA.version_number%TYPE ,
61: p_start_dt IN IGS_AS_GRD_SCHEMA.start_dt%TYPE ,
62: p_end_dt IN IGS_AS_GRD_SCHEMA.end_dt%TYPE ,
63: p_message_name OUT NOCOPY varchar2 )
64: RETURN BOOLEAN IS
65: gv_other_detail VARCHAR2(255);
66: BEGIN
67: DECLARE
68: CURSOR c_gs IS
69: SELECT start_dt,
70: NVL(end_dt, IGS_GE_DATE.IGSDATE('9999/01/01'))
71: FROM IGS_AS_GRD_SCHEMA
72: WHERE grading_schema_cd = p_grading_schema_cd AND
73: version_number <> p_version_number;
74: v_gs_rec c_gs%ROWTYPE;
75: v_error_flag BOOLEAN;
72: WHERE grading_schema_cd = p_grading_schema_cd AND
73: version_number <> p_version_number;
74: v_gs_rec c_gs%ROWTYPE;
75: v_error_flag BOOLEAN;
76: v_start_dt IGS_AS_GRD_SCHEMA.start_dt%TYPE;
77: v_end_dt IGS_AS_GRD_SCHEMA.end_dt%TYPE;
78: v_p_end_dt IGS_AS_GRD_SCHEMA.end_dt%TYPE;
79: BEGIN
80: p_message_name := null;
73: version_number <> p_version_number;
74: v_gs_rec c_gs%ROWTYPE;
75: v_error_flag BOOLEAN;
76: v_start_dt IGS_AS_GRD_SCHEMA.start_dt%TYPE;
77: v_end_dt IGS_AS_GRD_SCHEMA.end_dt%TYPE;
78: v_p_end_dt IGS_AS_GRD_SCHEMA.end_dt%TYPE;
79: BEGIN
80: p_message_name := null;
81: -- set p_end_dt to a high date if null
74: v_gs_rec c_gs%ROWTYPE;
75: v_error_flag BOOLEAN;
76: v_start_dt IGS_AS_GRD_SCHEMA.start_dt%TYPE;
77: v_end_dt IGS_AS_GRD_SCHEMA.end_dt%TYPE;
78: v_p_end_dt IGS_AS_GRD_SCHEMA.end_dt%TYPE;
79: BEGIN
80: p_message_name := null;
81: -- set p_end_dt to a high date if null
82: v_p_end_dt := NVL(p_end_dt, IGS_GE_DATE.IGSDATE('9999/01/01'));