[Home] [Help]
531: -- Internal Development Use Only.
532: -- ---------------------------------------------------------------------------
533: Function get_information_type(p_noa_id in number) return varchar2
534: is
535: l_information_type ghr_pa_request_info_types.information_type%type;
536: l_proc varchar2(72) := 'get_information_type';
537: Cursor cur_info_type IS
538: Select pit.information_type
539: from ghr_pa_request_info_types pit,
535: l_information_type ghr_pa_request_info_types.information_type%type;
536: l_proc varchar2(72) := 'get_information_type';
537: Cursor cur_info_type IS
538: Select pit.information_type
539: from ghr_pa_request_info_types pit,
540: ghr_noa_families nfa,
541: ghr_families fam
542: where nfa.nature_of_action_id = p_noa_id
543: and nfa.noa_family_code = fam.noa_family_code
579: p_noa_id in number,
580: p_agency_ei in boolean default False,
581: p_sf52_ei_data out nocopy ghr_pa_request_extra_info%rowtype,
582: p_result out nocopy varchar2) is
583: l_info_type ghr_pa_request_info_types.information_type%type;
584: -- this cursor fetches the extra info data given the information_type and pa_request_id
585: cursor c_req_ei ( cp_pa_request_id number,
586: cp_info_type ghr_pa_request_info_types.information_type%type) is
587: select *
582: p_result out nocopy varchar2) is
583: l_info_type ghr_pa_request_info_types.information_type%type;
584: -- this cursor fetches the extra info data given the information_type and pa_request_id
585: cursor c_req_ei ( cp_pa_request_id number,
586: cp_info_type ghr_pa_request_info_types.information_type%type) is
587: select *
588: from ghr_pa_request_extra_info
589: where pa_request_id = cp_pa_request_id and
590: information_type = cp_info_type;