PACKAGE BODY: APPS.HXC_GET_NAME

Source

1 PACKAGE BODY hxc_get_name AS
2 /* $Header: hxcgetnm.pkb 120.2 2005/10/04 06:20:27 nissharm noship $ */
3 --
4 -- ----------------------------------------------------------------------------+
5 -- |-----------------------------< get_name >---------------------------------|
6 -- ----------------------------------------------------------------------------+
7 FUNCTION get_name
8   (p_person_id             in number) Return varchar2 is
9 
10   l_full_name  per_people_x.full_name%type;
11 
12   Cursor c_person is
13    Select ppx.full_name
14    from per_people_x ppx
15    where person_id = p_person_id;
16 
17 BEGIN
18 
19   /* Select ppx.full_name into l_full_name
20    from per_people_x ppx
21    where ppx.person_id = p_person_id;*/
22 
23    if c_person%ISOPEN then
24    close c_person;
25    end if;
26 
27    open c_person;
28    fetch c_person into l_full_name;
29 
30    RETURN l_full_name;
31 
32    close c_person;
33 
34 END get_name;
35 
36 END hxc_get_name;