[Home] [Help]
623: -- Internal Development Use Only.
624: -- ---------------------------------------------------------------------------
625: Function get_information_type(p_noa_id in number) return varchar2
626: is
627: l_information_type ghr_pa_request_info_types.information_type%type;
628: l_proc varchar2(72) := 'get_information_type';
629: Cursor cur_info_type IS
630: Select pit.information_type
631: from ghr_pa_request_info_types pit,
627: l_information_type ghr_pa_request_info_types.information_type%type;
628: l_proc varchar2(72) := 'get_information_type';
629: Cursor cur_info_type IS
630: Select pit.information_type
631: from ghr_pa_request_info_types pit,
632: ghr_noa_families nfa,
633: ghr_families fam
634: where nfa.nature_of_action_id = p_noa_id
635: and nfa.noa_family_code = fam.noa_family_code
671: p_noa_id in number,
672: p_agency_ei in boolean default False,
673: p_sf52_ei_data out nocopy ghr_pa_request_extra_info%rowtype,
674: p_result out nocopy varchar2) is
675: l_info_type ghr_pa_request_info_types.information_type%type;
676: -- this cursor fetches the extra info data given the information_type and pa_request_id
677: cursor c_req_ei ( cp_pa_request_id number,
678: cp_info_type ghr_pa_request_info_types.information_type%type) is
679: select *
674: p_result out nocopy varchar2) is
675: l_info_type ghr_pa_request_info_types.information_type%type;
676: -- this cursor fetches the extra info data given the information_type and pa_request_id
677: cursor c_req_ei ( cp_pa_request_id number,
678: cp_info_type ghr_pa_request_info_types.information_type%type) is
679: select *
680: from ghr_pa_request_extra_info
681: where pa_request_id = cp_pa_request_id and
682: information_type = cp_info_type;