857: RETURN VARCHAR2 IS
858: --
859: CURSOR csr_contract(p_contract_id NUMBER) IS
860: SELECT reference
861: FROM per_contracts_f
862: WHERE contract_id = p_contract_id
863: AND g_effective_date between effective_start_date and effective_end_date;
864: --
865: l_reference per_contracts_f.reference%TYPE := null;
861: FROM per_contracts_f
862: WHERE contract_id = p_contract_id
863: AND g_effective_date between effective_start_date and effective_end_date;
864: --
865: l_reference per_contracts_f.reference%TYPE := null;
866: --
867: BEGIN
868: --
869: IF p_contract_id IS NOT NULL THEN