DBA Data[Home] [Help]

PACKAGE: APPS.IEU_PVT

Source


1 PACKAGE IEU_PVT AUTHID CURRENT_USER AS
2 /* $Header: IEU_VS.pls 120.7 2011/09/15 17:37:05 spamujul ship $ */
3 
4 
5 TYPE ClientClasses IS TABLE OF IEU_UWQ_CLI_MED_PLUGINS.CLI_PLUGIN_CLASS%TYPE
6 INDEX BY BINARY_INTEGER;
7 
8 TYPE EligibleMediaInfo IS RECORD (
9   media_type_id     IEU_UWQ_MEDIA_TYPES_B.MEDIA_TYPE_ID%TYPE,
10   media_type_uuid   IEU_UWQ_MEDIA_TYPES_B.MEDIA_TYPE_UUID%TYPE
11   );
12 
13 TYPE EligibleMediaList IS TABLE OF EligibleMediaInfo
14 INDEX BY BINARY_INTEGER;
15 
16 TYPE BindValInfo IS RECORD (
17  sel_rt_node_id     IEU_UWQ_RTNODE_BIND_VALS.SEL_RT_NODE_ID%TYPE,
18  node_id            IEU_UWQ_RTNODE_BIND_VALS.NODE_ID%TYPE,
19  bind_var_name      IEU_UWQ_RTNODE_BIND_VALS.BIND_VAR_NAME%TYPE,
20  bind_var_value     IEU_UWQ_RTNODE_BIND_VALS.BIND_VAR_VALUE%TYPE
21   );
22 
23 TYPE BindValList IS TABLE OF BindValInfo
24 INDEX BY BINARY_INTEGER;
25 
26 /*Bug 6399243 Commented the code
27 TYPE IEU_UWQ_SEL_RT_NODES_REC IS RECORD (
28  SEL_RT_NODE_ID         NUMBER,
29  CREATED_BY             NUMBER,
30  CREATION_DATE          DATE,
31  LAST_UPDATED_BY        NUMBER,
32  LAST_UPDATE_DATE       DATE,
33  LAST_UPDATE_LOGIN      NUMBER,
34  RESOURCE_ID            NUMBER,
35  SEL_ENUM_ID            NUMBER,
36  NODE_ID                NUMBER,
37  NODE_TYPE              NUMBER,
38  NODE_LABEL             IEU_UWQ_SEL_RT_NODES.NODE_LABEL%TYPE,
39  COUNT                  NUMBER,
40  DATA_SOURCE            IEU_UWQ_SEL_RT_NODES.DATA_SOURCE%TYPE,
41  VIEW_NAME              IEU_UWQ_SEL_RT_NODES.VIEW_NAME%TYPE,
42  MEDIA_TYPE_ID          NUMBER,
43  SEL_ENUM_PID           NUMBER,
44  NODE_PID               NUMBER,
45  NODE_WEIGHT            NUMBER,
46  WHERE_CLAUSE           IEU_UWQ_SEL_RT_NODES.WHERE_CLAUSE%TYPE,
47  HIDE_IF_EMPTY          IEU_UWQ_SEL_RT_NODES.HIDE_IF_EMPTY%TYPE,
48  NOT_VALID              IEU_UWQ_SEL_RT_NODES.NOT_VALID%TYPE,
49  SECURITY_GROUP_ID      NUMBER,
50  OBJECT_VERSION_NUMBER  NUMBER,
51  REFRESH_VIEW_NAME      IEU_UWQ_SEL_RT_NODES.REFRESH_VIEW_NAME%TYPE,
52  RES_CAT_ENUM_FLAG      IEU_UWQ_SEL_RT_NODES.RES_CAT_ENUM_FLAG%TYPE,
53  REFRESH_VIEW_SUM_COL   IEU_UWQ_SEL_RT_NODES.REFRESH_VIEW_SUM_COL%TYPE,
54  NODE_DEPTH             NUMBER
55 );
56 
57 TYPE IEU_UWQ_SEL_RT_NODES_TAB IS TABLE OF IEU_UWQ_SEL_RT_NODES_REC
58  INDEX BY BINARY_INTEGER;
59  */
60 
61 TYPE IEU_UWQ_SEL_RT_NODES_TAB IS TABLE OF IEU_UWQ_SEL_RT_NODES%ROWTYPE
62  INDEX BY BINARY_INTEGER;
63 
64 
65 /*Bug 6399243 Commented the code
66 TYPE IEU_UWQ_RTNODE_BIND_VALS_REC IS RECORD (
67  RTNODE_BIND_VAR_ID     NUMBER,
68  OBJECT_VERSION_NUMBER  NUMBER,
69  CREATED_BY             NUMBER,
70  CREATION_DATE          DATE,
71  LAST_UPDATED_BY        NUMBER,
72  LAST_UPDATE_DATE       DATE,
73  LAST_UPDATE_LOGIN      NUMBER,
74  SECURITY_GROUP_ID      NUMBER,
75  SEL_RT_NODE_ID         NUMBER,
76  RESOURCE_ID            NUMBER,
77  NODE_ID                NUMBER,
78  BIND_VAR_NAME          IEU_UWQ_RTNODE_BIND_VALS.BIND_VAR_NAME%TYPE,
79  BIND_VAR_VALUE         IEU_UWQ_RTNODE_BIND_VALS.BIND_VAR_VALUE%TYPE,
80  BIND_VAR_DATATYPE      IEU_UWQ_RTNODE_BIND_VALS.BIND_VAR_DATATYPE%TYPE,
81  NOT_VALID_FLAG         IEU_UWQ_RTNODE_BIND_VALS.NOT_VALID_FLAG%TYPE
82 );
83 
84 TYPE IEU_UWQ_RTNODE_BIND_VALS_TAB IS TABLE OF IEU_UWQ_RTNODE_BIND_VALS_REC
85  INDEX BY BINARY_INTEGER;
86 */
87 
88 TYPE IEU_UWQ_RTNODE_BIND_VALS_TAB IS TABLE OF IEU_UWQ_RTNODE_BIND_VALS%ROWTYPE
89  INDEX BY BINARY_INTEGER;
90 
91 TYPE NUMBER_TAB                IS TABLE OF NUMBER                                          INDEX BY BINARY_INTEGER;
92 TYPE DATE_TAB                  IS TABLE OF DATE                                            INDEX BY BINARY_INTEGER;
93 
94 TYPE NODE_LABEL_TAB            IS TABLE OF IEU_UWQ_SEL_RT_NODES.NODE_LABEL%TYPE            INDEX BY BINARY_INTEGER;
95 TYPE DATA_SOURCE_TAB           IS TABLE OF IEU_UWQ_SEL_RT_NODES.DATA_SOURCE%TYPE           INDEX BY BINARY_INTEGER;
96 TYPE VIEW_NAME_TAB             IS TABLE OF IEU_UWQ_SEL_RT_NODES.VIEW_NAME%TYPE             INDEX BY BINARY_INTEGER;
97 TYPE WHERE_CLAUSE_TAB          IS TABLE OF IEU_UWQ_SEL_RT_NODES.WHERE_CLAUSE%TYPE          INDEX BY BINARY_INTEGER;
98 TYPE HIDE_IF_EMPTY_TAB         IS TABLE OF IEU_UWQ_SEL_RT_NODES.HIDE_IF_EMPTY%TYPE         INDEX BY BINARY_INTEGER;
99 TYPE NOT_VALID_TAB             IS TABLE OF IEU_UWQ_SEL_RT_NODES.NOT_VALID%TYPE             INDEX BY BINARY_INTEGER;
100 TYPE REFRESH_VIEW_NAME_TAB     IS TABLE OF IEU_UWQ_SEL_RT_NODES.REFRESH_VIEW_NAME%TYPE     INDEX BY BINARY_INTEGER;
101 TYPE RES_CAT_ENUM_FLAG_TAB     IS TABLE OF IEU_UWQ_SEL_RT_NODES.RES_CAT_ENUM_FLAG%TYPE     INDEX BY BINARY_INTEGER;
102 TYPE REFRESH_VIEW_SUM_COL_TAB  IS TABLE OF IEU_UWQ_SEL_RT_NODES.REFRESH_VIEW_SUM_COL%TYPE  INDEX BY BINARY_INTEGER;
103 
104 TYPE BIND_VAR_NAME_TAB         IS TABLE OF IEU_UWQ_RTNODE_BIND_VALS.BIND_VAR_NAME%TYPE     INDEX BY BINARY_INTEGER;
105 TYPE BIND_VAR_VALUE_TAB        IS TABLE OF IEU_UWQ_RTNODE_BIND_VALS.BIND_VAR_VALUE%TYPE    INDEX BY BINARY_INTEGER;
106 TYPE BIND_VAR_DATATYPE_TAB     IS TABLE OF IEU_UWQ_RTNODE_BIND_VALS.BIND_VAR_DATATYPE%TYPE INDEX BY BINARY_INTEGER;
107 TYPE NOT_VALID_FLAG_TAB        IS TABLE OF IEU_UWQ_RTNODE_BIND_VALS.NOT_VALID_FLAG%TYPE    INDEX BY BINARY_INTEGER;
108 
109 /* Used to determine classes to load by the client plugin loader */
110 PROCEDURE DETERMINE_CLI_PLUGINS
111   (P_RESOURCE_ID  IN  NUMBER
112   ,X_CLASSES      OUT NOCOPY ClientClasses
113   );
114 
115 
116 /* Used to determine the eligible media types the resource can work on */
117 PROCEDURE DETERMINE_ELIGIBLE_MEDIA_TYPES
118   (P_RESOURCE_ID  IN  NUMBER
119   ,X_PLUGINS      OUT NOCOPY EligibleMediaList
120   );
121 
122 
123 /* Used to determine what style of WB is set for an agent */
124 FUNCTION DETERMINE_WB_STYLE ( RESOURCE_ID IN NUMBER ) RETURN VARCHAR2;
125 
126 
127 /* Used to determine if a particular media is eligible */
128 FUNCTION IS_MEDIA_TYPE_ELIGIBLE
129   (P_RESOURCE_ID      IN  NUMBER
130   ,P_MEDIA_TYPE_UUID  IN  VARCHAR2
131   ) RETURN VARCHAR2;
132 
133 
134 /* Used to determine if a particular media is eligible */
135 FUNCTION IS_MEDIA_TYPE_ELIGIBLE
136   (P_RESOURCE_ID    IN  NUMBER
137   ,P_MEDIA_TYPE_ID  IN  NUMBER
138   ) RETURN BOOLEAN;
139 
140 
141 /* Used to build nodes table for Forms tree view. */
142 PROCEDURE ENUMERATE_WORK_NODES
143   (P_RESOURCE_ID IN NUMBER
144   ,P_LANGUAGE    IN VARCHAR2
145   ,P_SOURCE_LANG IN VARCHAR2
146   );
147 
148 
149 /* Used to refresh nodes table for Forms tree view. */
150 PROCEDURE REFRESH_WORK_NODE_COUNTS( P_RESOURCE_ID IN NUMBER );
151 
152 PROCEDURE REFRESH_NODE(p_node_id in number,
153        p_node_pid in number,
154        p_sel_enum_id in number,
155        p_where_clause in varchar2,
156        p_res_cat_enum_flag in varchar2,
157        p_refresh_view_name in varchar2,
158        p_refresh_view_sum_col in varchar2,
159        p_sel_rt_node_id in number,
160        p_count in number,
161        p_resource_id in number,
162        p_view_name in varchar2,
163        p_bindvallist in BindValList,
164        x_count out NOCOPY number);
165 
166 /* Returns information needed to connect UWQ Client to a UWQ Server. */
167 PROCEDURE UWQ_CLIENT_LOCATE_UWQ_SERVER
168   (P_RESOURCE_ID            IN     NUMBER
169   ,P_WIRE_PROTOCOL          IN     VARCHAR2
170   ,P_COMP_DEF_NAME          IN     VARCHAR2
171   ,P_COMP_DEF_VERSION       IN     NUMBER
172   ,P_COMP_DEF_IMPL          IN     VARCHAR2
173   ,P_COMP_NAME              IN     VARCHAR2
174   ,X_COMP_NAME              OUT NOCOPY   VARCHAR2
175   ,X_SVR_USER_ADDRESS       OUT NOCOPY   VARCHAR2
176   ,X_SVR_IP_ADDRESS         OUT NOCOPY   VARCHAR2
177   ,X_SVR_DNS_NAME           OUT NOCOPY   VARCHAR2
178   ,X_SVR_PORT               OUT NOCOPY   NUMBER
179   ,X_USE_PROXY              OUT NOCOPY   VARCHAR2
180   ,X_SESSION_TIMEOUT        OUT NOCOPY   NUMBER
181   ,X_SYNC_TIMEOUT           OUT NOCOPY   NUMBER
182   ,X_RESPONSE_TIMEOUT       OUT NOCOPY   NUMBER
183   ,X_RECONNECT_RETRY_DELAY  OUT NOCOPY   NUMBER
184   ,X_HEART_RATE             OUT NOCOPY   NUMBER
185   );
186 
187 
188 /* Used by UWQ Server to set an agent binding to a server. */
189 PROCEDURE BIND_AGENT( P_RESOURCE_ID IN NUMBER, P_SERVER_ID IN NUMBER );
190 
191 
192 /* Used by UWQ Server to unset an agent binding to a server. */
193 PROCEDURE UNBIND_AGENT( P_RESOURCE_ID IN NUMBER, P_SERVER_ID IN NUMBER );
194 
195 /* Used by UWQ Server to unset an agent binding to all servers
196    and update uwq server load*/
197 PROCEDURE CLEAR_ALL_AGENT_BINDINGS( P_RESOURCE_ID IN NUMBER
198                                    ,P_SERVER_ID IN NUMBER
199                                    ,P_MAJOR_LOAD_FACTOR IN NUMBER
200                                    ,P_MINOR_LOAD_FACTOR IN NUMBER );
201 
202 /* Used by servers to clear agent bindings of a particular server */
203 TYPE BINDING_CURSOR  is REF CURSOR;
204 
205 PROCEDURE BIND_AGENT_AND_UPDATE_LOAD( P_RESOURCE_ID IN NUMBER
206                                      ,P_SERVER_ID IN NUMBER
207                                      ,P_MAJOR_LOAD_FACTOR IN NUMBER
208                                      ,P_MINOR_LOAD_FACTOR IN NUMBER
209                                      ,X_EXISTING_BINDINGS OUT NOCOPY BINDING_CURSOR );
210 
211 
212 PROCEDURE UPDATE_SERVER_STARTUP_INFO( P_SERVER_ID IN NUMBER
213                                      ,P_IP_ADDRESS IN VARCHAR2
214                                      ,P_DNS_NAME IN VARCHAR2
215                                      ,P_USER_ADDRESS IN VARCHAR2 );
216 
217 
218 /* Used by UWQ Server to communicate Queue information to client. */
219 PROCEDURE FORCE_UPDATE_MRT_DATA
220   (P_RESOURCE_ID      IN IEU_UWQ_SEL_MRT_DATA.RESOURCE_ID%TYPE
221   ,P_SERVER_TYPE_ID   IN IEU_UWQ_SEL_MRT_DATA.SVR_TYPE_ID%TYPE
222   ,P_MEDIA_TYPE_ID    IN IEU_UWQ_SEL_MRT_DATA.MEDIA_TYPE_ID%TYPE
223   ,P_QUEUE_LIST       IN SYSTEM.IEU_UWQ_SEL_MRT_QUEUES_NST
224   );
225 
226 
227 /* Used to determine if agent is eligible for ANY media */
228 FUNCTION IS_AGENT_ELIGIBLE_FOR_MEDIA( P_RESOURCE_ID IN NUMBER )
229   RETURN BOOLEAN;
230 
231 
232 /* Used to determine if a connection to the UWQ server is required */
233 FUNCTION IS_UWQ_SERVER_REQUIRED( P_RESOURCE_ID IN NUMBER )
234   RETURN BOOLEAN;
235 
236 
237 /* Used to enumerate while setting FND_GLOBAL session variables */
238 PROCEDURE ENUMERATE_WORK_NODES_FOR_SVR
239   (P_RESOURCE_ID   IN NUMBER
240   ,P_USER_ID       IN NUMBER
241   ,P_RESP_ID       IN NUMBER
242   ,P_RESP_APPL_ID  IN NUMBER
243   ,P_LANGUAGE    IN VARCHAR2
244   ,P_SOURCE_LANG IN VARCHAR2
245   );
246 
247 
248 /* Used to refresh while setting FND_GLOBAL session variables */
249 PROCEDURE REFRESH_WORK_NODE_FOR_SVR
250   (P_RESOURCE_ID   IN NUMBER
251   ,P_USER_ID       IN NUMBER
252   ,P_RESP_ID       IN NUMBER
253   ,P_RESP_APPL_ID  IN NUMBER
254   );
255 
256 /* Used to add data to the UWQ nodes table */
257 PROCEDURE ADD_UWQ_NODE_DATA
258   (P_RESOURCE_ID             IN NUMBER,
259    P_SEL_ENUM_ID             IN NUMBER,
260    P_ENUMERATOR_DATAREC_LIST IN IEU_PUB.EnumeratorDataRecordList
261   );
262 PROCEDURE WALK_TREE_ADD( P_ENUM_REC_LIST          IN   IEU_PUB.EnumeratorDataRecordList,
263 		  				 P_PID                    IN   PLS_INTEGER,
264 						 P_CURR_NODE_ID           IN   PLS_INTEGER,
265 						 P_REC_LIST_ITERATOR      IN   PLS_INTEGER,
266 						 P_S_ENUM_ID			  IN   NUMBER,
267 						 P_RESOURCE_ID			  IN   NUMBER,
268 						 X_NEW_REC_LIST_ITERATOR  IN OUT NOCOPY  PLS_INTEGER,
269 						 X_NEW_CURR_NODE_ID      IN  OUT NOCOPY PLS_INTEGER) ;
270 
271 PROCEDURE CHECK_AO_MANUAL_MODE(l_resource_id IN NUMBER,
272                                l_ret_val OUT NOCOPY BOOLEAN);
273 
274 -- Niraj, 26-May-2005, Added for Bug 4389449
275 PROCEDURE REFRESH_CUR_NODE_CNTS_FOR_SVR (
276 	P_RESOURCE_ID	IN NUMBER
277 	,P_USER_ID 	IN NUMBER
278 	,P_RESP_ID	IN NUMBER
279 	,P_RESP_APPL_ID IN NUMBER
280 	,p_node_id 	IN NUMBER
281 	,x_node_id_list OUT NOCOPY varchar2);
282 
283 PROCEDURE REFRESH_CUR_NODE_COUNTS(p_resource_id in number, p_node_id in number, x_node_id_list OUT NOCOPY varchar2);
284 
285 TYPE EligibleAllMediaInfo IS RECORD (
286   media_type_id         IEU_UWQ_MEDIA_TYPES_B.MEDIA_TYPE_ID%TYPE,
287   media_type_uuid       IEU_UWQ_MEDIA_TYPES_B.MEDIA_TYPE_UUID%TYPE,
288   tel_reqd_flag         IEU_UWQ_MEDIA_TYPES_B.tel_reqd_flag%TYPE,
289   svr_connect_rule      IEU_UWQ_LOGIN_RULES_B.login_rule%TYPE,
290   tel_media_type        IEU_UWQ_LOGIN_RULES_B.login_rule%TYPE,
291   origin_flag           VARCHAR2(1)
292   );
293 
294 TYPE EligibleAllMediaList IS TABLE OF EligibleAllMediaInfo
295 INDEX BY BINARY_INTEGER;
296 
297 PROCEDURE DETERMINE_ALL_MEDIA_TYPES_EXTN
298   (P_RESOURCE_ID    IN  NUMBER,
299    X_ALL_MEDIA_LIST OUT NOCOPY EligibleAllMediaList,
300    X_EXTN_FLAG      OUT NOCOPY VARCHAR2);
301 
302 PROCEDURE DETERMINE_ALL_MEDIA_TYPES
303   (P_RESOURCE_ID   IN  NUMBER,
304    X_ALL_MEDIA_LIST OUT NOCOPY EligibleAllMediaList);
305 
306 FUNCTION IS_TEL_EXTN_REQUIRED
307    (p_eligibleallmedialist IN EligibleAllMediaList)
308     RETURN VARCHAR2;
309 
310 PROCEDURE NEW_AO_TEL_CONNECT_RULE(
311  p_resource_id IN NUMBER,
312  p_elig_media_uuid  IN VARCHAR2,
313  x_login_media_uuid OUT NOCOPY varchar2);
314 
315 -- Niraj, 26-May-2005, Added for Bug 4389449
316 PROCEDURE REFRESH_SEL_NODE_CNTS_FOR_SVR (
317 	P_RESOURCE_ID		IN NUMBER
318 	,P_USER_ID 		IN NUMBER
319 	,P_RESP_ID      	IN NUMBER
320 	,P_RESP_APPL_ID 	IN NUMBER
321 	,p_node_id_string 	in varchar2
322 	,x_node_id_list 	OUT NOCOPY varchar2);
323 
324 PROCEDURE REFRESH_SELECTIVE_NODE_COUNTS(
325 p_resource_id in number,
326 p_node_id_string in varchar2,
327 x_node_id_list out NOCOPY varchar2 );
328 
329 
330 PROCEDURE GET_WB_MEDIA_LOGIN_MEDIA_TYPES(
331    P_RESOURCE_ID  IN NUMBER
332   ,P_USER_ID      IN NUMBER
333   ,P_RESP_ID      IN NUMBER
334   ,P_RESP_APPL_ID IN NUMBER
335   ,X_MEDIA_TYPE_NST OUT NOCOPY SYSTEM.IEU_UWQ_MEDIA_TYPE_NST
336 );
337 
338 
339 END IEU_PVT;
340