DBA Data[Home] [Help]

PACKAGE BODY: APPS.CZ_APC_GRP

Source


1 PACKAGE BODY CZ_APC_GRP AS
2 /*	$Header: czapcgb.pls 120.0 2005/06/28 14:01:33 appldev noship $		*/
3 
4   CZ_APPLICATION_ID    CONSTANT NUMBER := 708;
5   EGO_APPLICATION_ID   CONSTANT NUMBER := 431;
6 
7   DECIMAL_TYPE         CONSTANT NUMBER := 2;
8   TEXT_TYPE            CONSTANT NUMBER := 4;
9   TL_TEXT_TYPE         CONSTANT NUMBER := 8;
10 
11   l_Batch_Size         NUMBER := 10000;
12 
13   TYPE number_tbl_type IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
14   TYPE varchar_tbl_type IS TABLE OF VARCHAR2(255) INDEX BY BINARY_INTEGER;
15   TYPE long_varchar_tbl_type IS TABLE OF VARCHAR2(4000) INDEX BY BINARY_INTEGER;
16 
17   TYPE varchar_arr_tbl_type IS TABLE OF long_varchar_tbl_type INDEX BY BINARY_INTEGER;
18   TYPE number_arr_tbl_type IS TABLE OF number_tbl_type INDEX BY BINARY_INTEGER;
19 
20   FUNCTION Is_Supported_By_CZ (
21    p_attr IN EGO_EXT_FWK_PUB.EGO_ATTR_USG_METADATA
22   ) RETURN BOOLEAN IS
23 
24   BEGIN
25    IF (p_attr.application_id <> 431) THEN  --only allow item attributes
26      RETURN FALSE;
27    ELSIF (p_attr.is_multi_row = 'Y') THEN  --disallow multi row attribute groups
28      RETURN FALSE;
29    ELSIF (p_attr.attr_grp_type <> 'EGO_ITEMMGMT_GROUP') THEN  --only allow USER-defined ATTRIBUTE -- groups
30      RETURN FALSE;
31    ELSIF (p_attr.data_type = EGO_EXT_FWK_PUB.G_DATE_DATA_TYPE OR
32           p_attr.data_type = EGO_EXT_FWK_PUB.G_DATE_TIME_DATA_TYPE) THEN  --disallow DATE AND DATE/TIME -- attributes
33      RETURN FALSE;
34    ELSE
35      RETURN TRUE;
36    END IF;
37   END is_Supported_By_CZ;
38 
39 END CZ_APC_GRP;