DBA Data[Home] [Help]

PACKAGE BODY: APPS.LNS_CONDITIONS_PKG

Source


1 PACKAGE BODY LNS_CONDITIONS_PKG AS
2 /* $Header: LNS_CONDITIONS_TBLH_B.pls 120.0.12010000.1 2008/11/26 07:53:43 mbolli noship $ */
3 
4     PROCEDURE ADD_LANGUAGE
5     IS
6     BEGIN
7       delete from LNS_CONDITIONS_TL T
8       where not exists
9         (select NULL
10         from LNS_CONDITIONS B
11         where B.CONDITION_ID = T.CONDITION_ID
12         );
13 
14       update LNS_CONDITIONS_TL T set (
15           CONDITION_NAME,
16           CONDITION_DESCRIPTION
17         ) = (select
18           B.CONDITION_NAME,
19           B.CONDITION_DESCRIPTION
20         from LNS_CONDITIONS_TL B
21         where B.CONDITION_ID = T.CONDITION_ID
22         and B.LANGUAGE = T.SOURCE_LANG)
23       where (
24           T.CONDITION_ID,
25           T.LANGUAGE
26       ) in (select
27           SUBT.CONDITION_ID,
28           SUBT.LANGUAGE
29         from LNS_CONDITIONS_TL SUBB, LNS_CONDITIONS_TL SUBT
30         where SUBB.CONDITION_ID = SUBT.CONDITION_ID
31         and SUBB.LANGUAGE = SUBT.SOURCE_LANG
32         and (SUBB.CONDITION_NAME <> SUBT.CONDITION_NAME
33           or (SUBB.CONDITION_NAME is null and SUBT.CONDITION_NAME is not null)
34           or (SUBB.CONDITION_NAME is not null and SUBT.CONDITION_NAME is null)
35           or SUBB.CONDITION_DESCRIPTION <> SUBT.CONDITION_DESCRIPTION
36           or (SUBB.CONDITION_DESCRIPTION is null and SUBT.CONDITION_DESCRIPTION is not null)
37           or (SUBB.CONDITION_DESCRIPTION is not null and SUBT.CONDITION_DESCRIPTION is null)
38       ));
39 
40       insert into LNS_CONDITIONS_TL (
41         CONDITION_ID,
42         CONDITION_NAME,
43         CONDITION_DESCRIPTION,
44         LAST_UPDATE_DATE,
45         LAST_UPDATED_BY,
46         CREATION_DATE,
47         CREATED_BY,
48         LAST_UPDATE_LOGIN,
49         LANGUAGE,
50         SOURCE_LANG
51       ) select
52         B.CONDITION_ID,
53         B.CONDITION_NAME,
54         B.CONDITION_DESCRIPTION,
55         B.LAST_UPDATE_DATE,
56         B.LAST_UPDATED_BY,
57         B.CREATION_DATE,
58         B.CREATED_BY,
59         B.LAST_UPDATE_LOGIN,
60         L.LANGUAGE_CODE,
61         B.SOURCE_LANG
62       from LNS_CONDITIONS_TL B, FND_LANGUAGES L
63       where L.INSTALLED_FLAG in ('I', 'B')
64       and B.LANGUAGE = userenv('LANG')
65       and not exists
66         (select NULL
67         from LNS_CONDITIONS_TL T
68         where T.CONDITION_ID = B.CONDITION_ID
69         and T.LANGUAGE = L.LANGUAGE_CODE);
70 
71     END ADD_LANGUAGE;
72 
73 END LNS_CONDITIONS_PKG;