64: RETURN BOOLEAN AS
65: BEGIN -- resp_val_cafos_fos
66: -- This module validate IGS_RE_CDT_FLD_OF_SY.IGS_PS_FLD_OF_STUDY. Validations are:
67: -- . IGS_PS_FLD_OF_STUDY is not closed.
68: -- . IGS_RE_GV_FLD_OF_SDY.res_fcd_class_ind is the same for all
69: -- IGS_RE_CDT_FLD_OF_SY for a research IGS_RE_CANDIDATURE.
70: DECLARE
71: v_dummy VARCHAR2(1);
72: v_message_name VARCHAR2(30);
69: -- IGS_RE_CDT_FLD_OF_SY for a research IGS_RE_CANDIDATURE.
70: DECLARE
71: v_dummy VARCHAR2(1);
72: v_message_name VARCHAR2(30);
73: v_res_fcd_class_ind IGS_RE_GV_FLD_OF_SDY.res_fcd_class_ind%TYPE;
74: CURSOR c_get_rfci IS
75: SELECT gfos.res_fcd_class_ind
76: FROM IGS_PS_FLD_OF_STUDY fos,
77: IGS_RE_GV_FLD_OF_SDY gfos
73: v_res_fcd_class_ind IGS_RE_GV_FLD_OF_SDY.res_fcd_class_ind%TYPE;
74: CURSOR c_get_rfci IS
75: SELECT gfos.res_fcd_class_ind
76: FROM IGS_PS_FLD_OF_STUDY fos,
77: IGS_RE_GV_FLD_OF_SDY gfos
78: WHERE fos.field_of_study = p_field_of_study AND
79: Fos.govt_field_of_study = gfos.govt_field_of_study;
80: CURSOR c_not_same(
81: cp_res_fcd_class_ind IGS_RE_GV_FLD_OF_SDY.res_fcd_class_ind%TYPE) IS
77: IGS_RE_GV_FLD_OF_SDY gfos
78: WHERE fos.field_of_study = p_field_of_study AND
79: Fos.govt_field_of_study = gfos.govt_field_of_study;
80: CURSOR c_not_same(
81: cp_res_fcd_class_ind IGS_RE_GV_FLD_OF_SDY.res_fcd_class_ind%TYPE) IS
82: SELECT 'x'
83: FROM IGS_RE_CDT_FLD_OF_SY cafos,
84: IGS_PS_FLD_OF_STUDY fos,
85: IGS_RE_GV_FLD_OF_SDY gfos
81: cp_res_fcd_class_ind IGS_RE_GV_FLD_OF_SDY.res_fcd_class_ind%TYPE) IS
82: SELECT 'x'
83: FROM IGS_RE_CDT_FLD_OF_SY cafos,
84: IGS_PS_FLD_OF_STUDY fos,
85: IGS_RE_GV_FLD_OF_SDY gfos
86: WHERE cafos.person_id = p_person_id AND
87: cafos.ca_sequence_number = p_ca_sequence_number AND
88: cafos.field_of_study <> p_field_of_study AND
89: cafos.field_of_study = fos.field_of_study AND