PACKAGE BODY: APPS.CS_KB_PROFILES_PKG

Source

1 PACKAGE BODY CS_KB_PROFILES_PKG AS
2 /* $Header: cskbprob.pls 115.4 2003/12/18 23:17:31 mkettle noship $ */
3 
4 FUNCTION isCategorymember(
5   m_user_id  	IN  NUMBER,
6   m_category_id IN  NUMBER
7   ) RETURN NUMBER IS
8 
9   x_profile_name VARCHAR2(60);
10   x_temp number;
11 BEGIN
12 	x_profile_name := 'CS_KB_PERZ_WF_' || to_char(m_user_id);
13 
14 	select 1
15 	into x_temp
16 	from JTF_PERZ_PROFILE profile,
17 	     JTF_PERZ_DATA data,
18 	     JTF_PERZ_DATA_ATTRIB attrib
19 	where profile.profile_name = x_profile_name
20 	and   profile.profile_id = data.profile_id
21 	and   data.application_id = 170
22 	and   data.perz_data_name = 'CS_KB_WF_CATEGORY'
23 	and   data.perz_data_id = attrib.perz_data_id
24 	and   attrib.attribute_name = to_char(m_category_id);
25 
26         return x_temp;
27 
28 EXCEPTION
29         WHEN NO_DATA_FOUND THEN
30              return 0;
31 
32 END isCategorymember;
33 
34 FUNCTION isProductmember(
35   m_user_id  	   IN  NUMBER,
36   m_product_id 	   IN  NUMBER,
37   m_product_org_id IN NUMBER
38   ) RETURN NUMBER IS
39 
40   x_profile_name VARCHAR2(60);
41   x_temp	 number;
42 BEGIN
43         x_profile_name := 'CS_KB_PERZ_WF_' || to_char(m_user_id);
44 
45         select 1
46 	    into x_temp
47         from JTF_PERZ_PROFILE profile,
48              JTF_PERZ_DATA data,
49              JTF_PERZ_DATA_ATTRIB attrib
50         where profile.profile_name = x_profile_name
51         and   profile.profile_id = data.profile_id
52         and   data.application_id = 170
53         and   data.perz_data_name = 'CS_KB_WF_PRODUCT'
54         and   data.perz_data_id = attrib.perz_data_id
55         and   attrib.attribute_name = to_char(m_product_id)
56         and   decode(substr(attrib.attribute_value,1,4),
57              'org_', to_number(replace(attrib.attribute_value, 'org_','')) ,
58              cs_std.get_item_valdn_orgzn_id) = m_product_org_id;
59 
60         return x_temp;
61 
62 EXCEPTION
63         WHEN NO_DATA_FOUND THEN
64              return 0;
65 
66 END isProductmember;
67 
68  -- Package Body CS_KB_PROFILES_PKG
69 END;