835: --------------------------------------------------------------------------------
836: FUNCTION person_type_rec(
837: p_user_person_type IN VARCHAR2,
838: p_business_group_id IN NUMBER,
839: p_error_when_not_exist IN VARCHAR2 DEFAULT 'TRUE') RETURN PER_PERSON_TYPES%ROWTYPE
840: --------------------------------------------------------------------------------
841: IS
842: l_csr RefCsr;
843: l_rec PER_PERSON_TYPES%ROWTYPE;
839: p_error_when_not_exist IN VARCHAR2 DEFAULT 'TRUE') RETURN PER_PERSON_TYPES%ROWTYPE
840: --------------------------------------------------------------------------------
841: IS
842: l_csr RefCsr;
843: l_rec PER_PERSON_TYPES%ROWTYPE;
844: BEGIN
845: l_csr := csr_with_bus('PER_PERSON_TYPES','USER_PERSON_TYPE','T',p_user_person_type,p_business_group_id);
846: fetch l_csr into l_rec;
847: if not csr_found_and_close(l_csr,p_error_when_not_exist) then
841: IS
842: l_csr RefCsr;
843: l_rec PER_PERSON_TYPES%ROWTYPE;
844: BEGIN
845: l_csr := csr_with_bus('PER_PERSON_TYPES','USER_PERSON_TYPE','T',p_user_person_type,p_business_group_id);
846: fetch l_csr into l_rec;
847: if not csr_found_and_close(l_csr,p_error_when_not_exist) then
848: l_rec := NULL;
849: end if;