PACKAGE BODY: APPS.FND_USER_AP_PKG

Source

1 PACKAGE BODY FND_USER_AP_PKG AS
2 /* $Header: fnduserb.pls 115.0 99/07/17 07:47:22 porting ship $ */
3 
4      -----------------------------------------------------------------------
5      -- Function get_user_name returns the user_name stored in FND_USER
6      -- when passed a user_id
7      --
8      FUNCTION get_user_name(l_user_id IN NUMBER)
9          RETURN VARCHAR2
10      IS
11          l_user_name fnd_user.user_name%TYPE := '';
12 
13          cursor l_user_cursor is
14 	   select user_name
15 	   from   fnd_user
16 	   where  user_id = l_user_id;
17 
18      BEGIN
19 
20          open l_user_cursor;
21          fetch l_user_cursor into l_user_name;
22 	 close l_user_cursor;
23 
24          RETURN(l_user_name);
25 
26      END get_user_name;
27 
28 
29 END FND_USER_AP_PKG;