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