DBA Data[Home] [Help]

PACKAGE BODY: APPS.CTO_CUSTOM_CATEGORY_PK

Source


1 package body CTO_CUSTOM_CATEGORY_PK as
2 /* $Header: CTOCUCTB.pls 115.0 2002/10/09 23:46:11 sbhaskar noship $ */
3 
4 /*---------------------------------------------------------------------------+
5     This function is used to determine if a particular category set needs
6     to be copied to the configuration item or not.
7     If the function returns
8        0, it means that the category set SHOULD NOT be copied to the config item.
9        1, it means that the category set SHOULD be copied to the config item.
10 
11 +----------------------------------------------------------------------------*/
12 
13 function Copy_Category(
14         pCategory_Set_Id    in      Number,
15         pOrganization_id    in      Number)
16 Return Number IS
17 
18 begin
19 	/*----------------------------------------------------------------+
20 	   This function can be replaced by custom code that will return
21            either 1 or 0 if a particular category set needs to be copied
22 	   or not.
23            1 means you WANT the category set to be copied.
24            0 means you DO NOT WANT the category set to be copied.
25 
26 	   By default : Category Set "Sales and Marketing" will NOT be copied.
27 
28 	   If a value other than 1 is returned (incl null), the category set
29 	   will not be copied.
30 
31 
32 	   -- Seeded Category Sets --
33 
34 	   INVENTORY   			CONSTANT NUMBER := 1;
35 	   PURCHASING   		CONSTANT NUMBER := 2;
36 	   PRODUCT_FAMILY		CONSTANT NUMBER := 3;
37 	   SALES_AND_MARKETING   	CONSTANT NUMBER := 5;
38 	   CONTAINED_ITEM        	CONSTANT NUMBER := 11;
39 	   CONTAINER_ITEM        	CONSTANT NUMBER := 12;
40 	   ENTERPRISE_ASSET_MGMT   	CONSTANT NUMBER := 1000000014;
41 	   CONTRACTS        		CONSTANT NUMBER := 1000000015;
42 
43         +-----------------------------------------------------------------*/
44 
45 	if pCategory_Set_Id = CTO_CUSTOM_CATEGORY_PK.SALES_AND_MARKETING then
46 	   return 0;
47 	else
48 	   return 1;
49 	end if;
50 
51 end Copy_Category;
52 
53 end CTO_CUSTOM_CATEGORY_PK;