PACKAGE BODY: APPS.DOM_SECURITY_PVT

Source

1 PACKAGE BODY DOM_SECURITY_PVT AS
2 /* $Header: DOMVSECB.pls 120.5 2006/08/17 13:41:20 ysireesh noship $ */
3 /*---------------------------------------------------------------------------+
4  | This package contains APIs to reslove docuemnt security mappings          |
5  | based on fnd data security                                                |
6  +---------------------------------------------------------------------------*/
7 
8   G_PKG_NAME    CONSTANT VARCHAR2(30):= 'DOM_SECURITY_PVT';
9   G_LOG_HEAD    CONSTANT VARCHAR2(30):= 'fnd.plsql.DOM_SECURITY_PVT.';
10   G_TYPE_SET    CONSTANT VARCHAR2(30):= 'SET';
11   G_TYPE_INSTANCE CONSTANT VARCHAR2(30):= 'INSTANCE';
12   G_TYPE_UNIVERSAL CONSTANT VARCHAR2(30):= 'UNIVERSAL';
13 
14 
15   FUNCTION get_oid_user(p_user_name VARCHAR2) RETURN VARCHAR2
16   IS
17         l_apps_user_key fnd_oid_util.apps_user_key_type;
18         l_user_name fnd_user.user_name%type;
19         l_oid_user_name varchar2(256);
20   BEGIN
21 
22         l_user_name  := p_user_name;
23         l_apps_user_key := fnd_oid_util.get_fnd_user(p_user_name => l_user_name);
24         l_oid_user_name := fnd_oid_util.get_oid_nickname(p_user_guid=>
25         l_apps_user_key.USER_GUID);
26 
27         return l_oid_user_name;
28 
29 	EXCEPTION
30 	 WHEN OTHERS THEN
31 		RETURN NULL;
32 
33   END get_oid_user;
34 
35   PROCEDURE get_oid_users
36   (
37         l_user_names IN DOM_USER_NAMES_ARRAY,
38         x_oid_user_names OUT NOCOPY DOM_USER_NAMES_ARRAY
39   )
40   IS
41         l_apps_user_key fnd_oid_util.apps_user_key_type;
42         BEGIN
43 	        x_oid_user_names := DOM_USER_NAMES_ARRAY();
44                 IF (l_user_names.count>0) THEN
45 		    x_oid_user_names.extend(l_user_names.count);
46                     for i in l_user_names.first .. l_user_names.last
47                     LOOP
48                            l_apps_user_key := fnd_oid_util.get_fnd_user(p_user_name => l_user_names(i));
49                            x_oid_user_names(i) := fnd_oid_util.get_oid_nickname(p_user_guid=> l_apps_user_key.USER_GUID);
50                    END LOOP;
51                 END IF;
52         END;
53 
54 END DOM_SECURITY_PVT;