[Home] [Help]
PACKAGE BODY: APPS.CCT_PLGN_FUNC_PVT
Source
1 PACKAGE BODY CCT_PLGN_FUNC_PVT AS
2 /* $Header: cctvplgb.pls 115.0 2002/09/18 01:37:45 edwang noship $ */
3
4 FUNCTION DO_LAUNCH_CLIENT_SDK
5 (
6 P_RESOURCE_ID NUMBER
7 ,P_USER_ID NUMBER
8 ,P_RESP_ID NUMBER
9 ,P_RESP_APPL_ID NUMBER
10 ,P_USER_LANG VARCHAR2
11 ) RETURN VARCHAR2
12 IS
13 l_retval VARCHAR2(1);
14 l_classes IEU_PVT.ClientClasses;
15 l_media_types IEU_PVT.EligibleAllMediaList;
16 l_tel_eligible_flag VARCHAR2(1) := 'N';
17 l_ao_man_mode BOOLEAN := False;
18
19 BEGIN
20
21 l_retval := 'N';
22
23 IEU_PVT.DETERMINE_ALL_MEDIA_TYPES_EXTN(P_RESOURCE_ID, l_media_types, l_tel_eligible_flag);
24
25 IEU_PVT.DETERMINE_CLI_PLUGINS(
26 P_RESOURCE_ID,
27 l_classes );
28
29 IF (l_classes is not null and l_classes.COUNT > 0) THEN
30 FOR i IN l_classes.FIRST..l_classes.LAST LOOP
31 IF ( (l_tel_eligible_flag = 'Y') AND
32 (l_classes(i) =
33 'oracle.apps.cct.ccc.clientsdk.gui.MediaControllerPlugginImpl')
34 )
35 THEN
36 l_retval := 'Y';
37 EXIT;
38 END IF;
39 END LOOP;
40 END IF;
41
42 RETURN l_retval;
43
44 EXCEPTION
45 WHEN OTHERS THEN
46 RETURN null;
47
48 END DO_LAUNCH_CLIENT_SDK;
49
50 END CCT_PLGN_FUNC_PVT;
51