[Home] [Help]
PACKAGE BODY: APPS.CCT_CUSTOM_LOOKUP_PUB
Source
1 PACKAGE BODY CCT_CUSTOM_LOOKUP_PUB as
2 /* $Header: cctcuslb.pls 120.0 2005/06/02 09:53:17 appldev noship $ */
3
4 FUNCTION GetData(
5 x_key_value_varr IN OUT NOCOPY cct_keyvalue_varr
6 ) return varchar2 IS
7
8 x_oper_succeeded varchar2(1) := cct_collection_util_pub.G_FALSE;
9 l_key_value_varr cct_keyvalue_varr;
10 l_value varchar2(32767) ;
11 i BINARY_INTEGER;
12 begin
13 l_value := cct_collection_util_pub.Get(x_key_value_varr,'occtCustomLookup', x_oper_succeeded);
14 return cct_collection_util_pub.G_TRUE;
15 EXCEPTION
16 WHEN OTHERS THEN
17 return x_oper_succeeded ;
18 END GetData;
19
20 END CCT_CUSTOM_LOOKUP_PUB;
21