[Home] [Help]
882: DECLARE
883: E_NO_RESEARCH_CAL_CONFIG EXCEPTION;
884: v_effective_strt_dt_alias IGS_RE_S_RES_CAL_CON.effective_strt_dt_alias%TYPE;
885: v_effective_end_dt_alias IGS_RE_S_RES_CAL_CON.effective_end_dt_alias%TYPE;
886: v_start_alias_val IGS_CA_DA_INST.absolute_val%TYPE DEFAULT NULL;
887: v_end_alias_val IGS_CA_DA_INST.absolute_val%TYPE DEFAULT NULL;
888: CURSOR c_srcc IS
889: SELECT srcc.effective_strt_dt_alias,
890: srcc.effective_end_dt_alias
883: E_NO_RESEARCH_CAL_CONFIG EXCEPTION;
884: v_effective_strt_dt_alias IGS_RE_S_RES_CAL_CON.effective_strt_dt_alias%TYPE;
885: v_effective_end_dt_alias IGS_RE_S_RES_CAL_CON.effective_end_dt_alias%TYPE;
886: v_start_alias_val IGS_CA_DA_INST.absolute_val%TYPE DEFAULT NULL;
887: v_end_alias_val IGS_CA_DA_INST.absolute_val%TYPE DEFAULT NULL;
888: CURSOR c_srcc IS
889: SELECT srcc.effective_strt_dt_alias,
890: srcc.effective_end_dt_alias
891: FROM IGS_RE_S_RES_CAL_CON srcc
892: WHERE srcc.s_control_num = 1;
893: FUNCTION resp_get_alias_val(
894: p_cal_type IGS_CA_INST.cal_type%TYPE,
895: p_ci_sequence_number IGS_CA_INST.sequence_number%TYPE,
896: p_effective_dt_alias IGS_CA_DA_INST.dt_alias%TYPE)
897: RETURN DATE aS
898: BEGIN
899: DECLARE
900: v_num_recs_flag BOOLEAN DEFAULT FALSE;
897: RETURN DATE aS
898: BEGIN
899: DECLARE
900: v_num_recs_flag BOOLEAN DEFAULT FALSE;
901: v_alias_val IGS_CA_DA_INST.absolute_val%TYPE;
902: CURSOR c_dai IS
903: SELECT NVL(
904: dai.absolute_val,
905: IGS_CA_GEN_001.calp_get_alias_val(
906: dai.dt_alias,
907: dai.sequence_number,
908: dai.cal_type,
909: dai.ci_sequence_number)) AS v_absolute_val
910: FROM IGS_CA_DA_INST dai
911: WHERE dai.cal_type = p_cal_type AND
912: dai.ci_sequence_number = p_ci_sequence_number AND
913: dai.dt_alias = p_effective_dt_alias;
914: BEGIN