[Home] [Help]
7: PROCEDURE add_language IS
8:
9: BEGIN
10:
11: DELETE FROM OKL_ASSET_COMPONENTS_TL T
12: WHERE NOT EXISTS (SELECT NULL FROM OKL_ASSET_COMPONENTS_B B WHERE B.ID =T.ID);
13:
14: UPDATE OKL_ASSET_COMPONENTS_TL T
15: SET (SHORT_DESCRIPTION,
10:
11: DELETE FROM OKL_ASSET_COMPONENTS_TL T
12: WHERE NOT EXISTS (SELECT NULL FROM OKL_ASSET_COMPONENTS_B B WHERE B.ID =T.ID);
13:
14: UPDATE OKL_ASSET_COMPONENTS_TL T
15: SET (SHORT_DESCRIPTION,
16: DESCRIPTION,
17: COMMENTS) =
18: (SELECT
19: B.SHORT_DESCRIPTION,
20: B.DESCRIPTION,
21: B.COMMENTS
22: FROM
23: OKL_ASSET_COMPONENTS_TL B
24: WHERE
25: B.ID = T.ID
26: AND B.LANGUAGE = T.SOURCE_LANG)
27: WHERE (T.ID, T.LANGUAGE) IN (SELECT
27: WHERE (T.ID, T.LANGUAGE) IN (SELECT
28: SUBT.ID,
29: SUBT.LANGUAGE
30: FROM
31: OKL_ASSET_COMPONENTS_TL SUBB,
32: OKL_ASSET_COMPONENTS_TL SUBT
33: WHERE
34: SUBB.ID = SUBT.ID
35: AND SUBB.LANGUAGE = SUBT.SOURCE_LANG
28: SUBT.ID,
29: SUBT.LANGUAGE
30: FROM
31: OKL_ASSET_COMPONENTS_TL SUBB,
32: OKL_ASSET_COMPONENTS_TL SUBT
33: WHERE
34: SUBB.ID = SUBT.ID
35: AND SUBB.LANGUAGE = SUBT.SOURCE_LANG
36: AND (SUBB.SHORT_DESCRIPTION <> SUBT.SHORT_DESCRIPTION
41: OR (SUBB.COMMENTS IS NULL AND SUBT.COMMENTS IS NOT NULL)
42: )
43: );
44:
45: INSERT INTO OKL_ASSET_COMPONENTS_TL (
46: ID,
47: LANGUAGE,
48: SOURCE_LANG,
49: SFWT_FLAG,
67: B.LAST_UPDATE_LOGIN,
68: B.SHORT_DESCRIPTION,
69: B.DESCRIPTION,
70: B.COMMENTS
71: FROM OKL_ASSET_COMPONENTS_TL B, FND_LANGUAGES L
72: WHERE L.INSTALLED_FLAG IN ('I', 'B')
73: AND B.LANGUAGE = USERENV('LANG')
74: AND NOT EXISTS (
75: SELECT NULL
72: WHERE L.INSTALLED_FLAG IN ('I', 'B')
73: AND B.LANGUAGE = USERENV('LANG')
74: AND NOT EXISTS (
75: SELECT NULL
76: FROM OKL_ASSET_COMPONENTS_TL T
77: WHERE T.ID = B.ID
78: AND T.LANGUAGE = L.LANGUAGE_CODE
79: );
80:
578: ELSE
579: l_sfwt_flag := 'Y';
580: END IF;
581:
582: INSERT INTO OKL_ASSET_COMPONENTS_TL (
583: id
584: ,language
585: ,source_lang
586: ,sfwt_flag
1048: BEGIN
1049:
1050: l_prog_name := G_PKG_NAME||'.update_row (TL)';
1051:
1052: UPDATE OKL_ASSET_COMPONENTS_TL
1053: SET
1054: source_lang = USERENV('LANG')
1055: ,sfwt_flag = 'Y'
1056: ,last_updated_by = G_USER_ID
1060: ,description = p_asotl_rec.description
1061: ,comments = p_asotl_rec.comments
1062: WHERE ID = p_asotl_rec.id;
1063:
1064: UPDATE OKL_ASSET_COMPONENTS_TL
1065: SET SFWT_FLAG = 'N'
1066: WHERE ID = p_asotl_rec.id
1067: AND SOURCE_LANG = LANGUAGE;
1068:
1471:
1472: l_prog_name := G_PKG_NAME||'.delete_row (V)';
1473:
1474: DELETE FROM OKL_ASSET_COMPONENTS_B WHERE id = p_id;
1475: DELETE FROM OKL_ASSET_COMPONENTS_TL WHERE id = p_id;
1476:
1477: x_return_status := G_RET_STS_SUCCESS;
1478:
1479: EXCEPTION