PACKAGE BODY: APPS.FND_DM_PRODUCTS_PKG

Source

1 PACKAGE BODY fnd_dm_products_pkg AS
2 /* $Header: FNDDMPDB.pls 115.0 2004/04/23 23:34:01 shvanga noship $ */
3 
4 
5 procedure ADD_LANGUAGE
6 is
7 begin
8 
9   insert into FND_DM_PRODUCTS_TL (
10     PRODUCT_ID,
11     DISPLAY_NAME,
12     PRODUCT_DESCRIPTION,
13     LANGUAGE,
14     SOURCE_LANG
15   ) select
16     M.PRODUCT_ID,
17     M.DISPLAY_NAME,
18     M.PRODUCT_DESCRIPTION,
19     L.LANGUAGE_CODE,
20     M.SOURCE_LANG
21   from FND_DM_PRODUCTS_TL M, FND_LANGUAGES B, FND_LANGUAGES L
22   where B.INSTALLED_FLAG = 'B'
23   and L.INSTALLED_FLAG in ('I', 'B')
24   and M.LANGUAGE = userenv('LANG')
25   and not exists
26     (select NULL
27     from FND_DM_PRODUCTS_TL T
28     where T.PRODUCT_ID = M.PRODUCT_ID
29     and T.LANGUAGE = L.LANGUAGE_CODE);
30 end ADD_LANGUAGE;
31 
32 end FND_DM_PRODUCTS_PKG;