[Home] [Help]
PACKAGE BODY: APPS.AMV_MYCHANNEL_GRP
Source
1 PACKAGE BODY amv_mychannel_grp AS
2 /* $Header: amvgmycb.pls 120.1 2005/06/21 17:49:21 appldev ship $ */
3 --
4 --
5 -- NAME
6 -- AMV_MYCHANNEL_GRP
7 -- PURPOSE
8 --
9 -- HISTORY
10 -- 01/29/2000 SLKRISHN CREATED
11 --
12 G_PKG_NAME CONSTANT VARCHAR2(30) := 'AMV_MYCHANNEL_GRP';
13 G_FILE_NAME CONSTANT VARCHAR2(12) := 'amvgmycb.pls';
14 --
15 --
16 -- This package contains the following procedures
17 --
18 --------------------------------------------------------------------------------
19 --------------------------------------------------------------------------------
20 -- Start of comments
21 -- API name : Get_MyChannels
22 -- Type : Private
23 -- Pre-reqs : None
24 -- Function : Get all the channels for a given user (p_user_id)
25 -- Parameters :
26 -- IN p_api_version IN NUMBER Required
27 -- p_init_msg_list IN VARCHAR2 Optional
28 -- Default = FND_API.G_FALSE
29 -- p_validation_level IN NUMBER Optional
30 -- Default = FND_API.G_VALID_LEVEL_FULL
31 -- p_check_login_user IN VARCHAR2 Optional
32 -- Default = FND_API.G_TRUE
33 -- p_user_id IN NUMBER Required
34 -- the given user
35 -- OUT NOCOPY : x_return_status OUT NOCOPY VARCHAR2
36 -- x_msg_count OUT NOCOPY NUMBER
37 -- x_msg_data OUT NOCOPY VARCHAR2
38 -- x_mychannel_array OUT NOCOPY AMV_MY_CHANNEL_VARRAY_TYPE
39 -- Version : Current version 1.0
40 -- Previous version 1.0
41 -- Initial version 1.0
42 -- Notes :
43 --
44 -- End of comments
45 --
46 PROCEDURE Get_MyChannels
47 ( p_api_version IN NUMBER,
48 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
49 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
50 x_return_status OUT NOCOPY VARCHAR2,
51 x_msg_count OUT NOCOPY NUMBER,
52 x_msg_data OUT NOCOPY VARCHAR2,
53 p_check_login_user IN VARCHAR2 := FND_API.G_TRUE,
54 p_user_id IN NUMBER,
55 x_mychannel_array OUT NOCOPY AMV_MYCHANNEL_PVT.AMV_MY_CHANNEL_VARRAY_TYPE
56 )
57 IS
58 l_api_name varchar2(30) := 'Get_MyChannels';
59 BEGIN
60
61 AMV_MYCHANNEL_PVT.Get_MyChannels
62 (p_api_version => p_api_version,
63 p_init_msg_list => p_init_msg_list,
64 p_validation_level => p_validation_level,
65 x_return_status => x_return_status,
66 x_msg_count => x_msg_count,
67 x_msg_data => x_msg_data,
68 p_check_login_user => p_check_login_user,
69 p_user_id => p_user_id,
70 x_mychannel_array => x_mychannel_array );
71
72 EXCEPTION
73 WHEN OTHERS THEN
74 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
75 IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
76 THEN
77 FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
78 END IF;
79 -- Standard call to get message count and if count=1, get the message
80 FND_MSG_PUB.Count_And_Get (
81 p_encoded => FND_API.G_FALSE,
82 p_count => x_msg_count,
83 p_data => x_msg_data
84 );
85 END Get_MyChannels;
86 --------------------------------------------------------------------------------
87 --------------------------------------------------------------------------------
88 -- Start of comments
89 -- API name : Get_ItemsPerUser
90 -- Type : Private
91 -- Pre-reqs : None
92 -- Function : Return all items a user can access based channel/cat access
93 -- Parameters :
94 -- IN p_api_version IN NUMBER Required
95 -- p_init_msg_list IN VARCHAR2 Optional
96 -- Default = FND_API.G_FALSE
97 -- p_validation_level IN NUMBER Optional
98 -- Default = FND_API.G_VALID_LEVEL_FULL
99 -- p_category_id IN NUMBER Required
100 -- p_include_subcats IN VARCHAR2 Optional
101 -- Default = FND_API.G_FALSE
102 -- OUT NOCOPY : x_return_status OUT NOCOPY VARCHAR2
103 -- x_msg_count OUT NOCOPY NUMBER
104 -- x_msg_data OUT NOCOPY VARCHAR2
105 -- x_items_array OUT NOCOPY AMV_CAT_HIERARCHY_VARRAY_TYPE
106 -- Version : Current version 1.0
107 -- Previous version 1.0
108 -- Initial version 1.0
109 -- Notes :
110 --
111 -- End of comments
112 --
113 PROCEDURE Get_ItemsPerUser
114 ( p_api_version IN NUMBER,
115 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
116 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
117 x_return_status OUT NOCOPY VARCHAR2,
118 x_msg_count OUT NOCOPY NUMBER,
119 x_msg_data OUT NOCOPY VARCHAR2,
120 p_check_login_user IN VARCHAR2 := FND_API.G_TRUE,
121 p_user_id IN NUMBER,
122 p_request_obj IN AMV_MYCHANNEL_PVT.AMV_REQUEST_OBJ_TYPE,
123 x_return_obj OUT NOCOPY AMV_MYCHANNEL_PVT.AMV_RETURN_OBJ_TYPE,
124 x_items_array OUT NOCOPY AMV_MYCHANNEL_PVT.AMV_CAT_HIERARCHY_VARRAY_TYPE
125 )
126 IS
127 l_api_name varchar2(30) := 'Get_ItemsPerUser';
128 BEGIN
129
130 AMV_MYCHANNEL_PVT.Get_ItemsPerUser
131 (p_api_version => p_api_version,
132 p_init_msg_list => p_init_msg_list,
133 p_validation_level => p_validation_level,
134 x_return_status => x_return_status,
135 x_msg_count => x_msg_count,
136 x_msg_data => x_msg_data,
137 p_check_login_user => p_check_login_user,
138 p_user_id => p_user_id,
139 p_request_obj => p_request_obj,
140 x_return_obj => x_return_obj,
141 x_items_array => x_items_array);
142
143 EXCEPTION
144 WHEN OTHERS THEN
145 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
146 IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
147 THEN
148 FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
149 END IF;
150 -- Standard call to get message count and if count=1, get the message
151 FND_MSG_PUB.Count_And_Get (
152 p_encoded => FND_API.G_FALSE,
153 p_count => x_msg_count,
154 p_data => x_msg_data
155 );
156 END Get_ItemsPerUser;
157 --------------------------------------------------------------------------------
158 --------------------------------------------------------------------------------
159 --
160 END amv_mychannel_grp;