[Home] [Help]
3594: p_progression_rule_cd IGS_PR_RU_APPL.progression_rule_cd%TYPE,
3595: p_reference_cd IGS_PR_RU_APPL.reference_cd%TYPE,
3596: p_progression_outcome_type
3597: IGS_PR_OU_TYPE.progression_outcome_type%TYPE,
3598: p_unit_cd IGS_PS_UNIT_VER.unit_cd%TYPE)
3599: IS
3600: BEGIN -- prgpl_ins_log_entry
3601: -- create a log entry
3602: DECLARE
3775: pra.pro_pra_sequence_number = p_original_pra_sequence_number AND
3776: pra.pro_sequence_number = p_pro_sequence_number AND
3777: pra.logical_delete_dt IS NULL;
3778: CURSOR c_uv (
3779: cp_unit_cd IGS_PS_UNIT_VER.unit_cd%TYPE) IS
3780: SELECT 'X'
3781: FROM IGS_PS_UNIT_VER uv,
3782: IGS_PS_UNIT_STAT us
3783: WHERE uv.unit_cd = cp_unit_cd AND
3777: pra.logical_delete_dt IS NULL;
3778: CURSOR c_uv (
3779: cp_unit_cd IGS_PS_UNIT_VER.unit_cd%TYPE) IS
3780: SELECT 'X'
3781: FROM IGS_PS_UNIT_VER uv,
3782: IGS_PS_UNIT_STAT us
3783: WHERE uv.unit_cd = cp_unit_cd AND
3784: uv.expiry_dt IS NULL AND
3785: us.unit_status = uv.unit_status AND