7: PROCEDURE add_language IS
8:
9: BEGIN
10:
11: DELETE FROM OKL_LEASEAPP_TEMPL_VERSIONS_TL T
12: WHERE NOT EXISTS (SELECT NULL FROM OKL_LEASEAPP_TEMPL_VERSIONS_B B WHERE B.ID =T.ID);
13:
14: UPDATE OKL_LEASEAPP_TEMPL_VERSIONS_TL T
15: SET (SHORT_DESCRIPTION) =
10:
11: DELETE FROM OKL_LEASEAPP_TEMPL_VERSIONS_TL T
12: WHERE NOT EXISTS (SELECT NULL FROM OKL_LEASEAPP_TEMPL_VERSIONS_B B WHERE B.ID =T.ID);
13:
14: UPDATE OKL_LEASEAPP_TEMPL_VERSIONS_TL T
15: SET (SHORT_DESCRIPTION) =
16: (SELECT
17: B.SHORT_DESCRIPTION
18: FROM
15: SET (SHORT_DESCRIPTION) =
16: (SELECT
17: B.SHORT_DESCRIPTION
18: FROM
19: OKL_LEASEAPP_TEMPL_VERSIONS_TL B
20: WHERE
21: B.ID = T.ID
22: AND B.LANGUAGE = T.SOURCE_LANG)
23: WHERE (T.ID, T.LANGUAGE) IN (SELECT
23: WHERE (T.ID, T.LANGUAGE) IN (SELECT
24: SUBT.ID,
25: SUBT.LANGUAGE
26: FROM
27: OKL_LEASEAPP_TEMPL_VERSIONS_TL SUBB,
28: OKL_LEASEAPP_TEMPL_VERSIONS_TL SUBT
29: WHERE
30: SUBB.ID = SUBT.ID
31: AND SUBB.LANGUAGE = SUBT.SOURCE_LANG
24: SUBT.ID,
25: SUBT.LANGUAGE
26: FROM
27: OKL_LEASEAPP_TEMPL_VERSIONS_TL SUBB,
28: OKL_LEASEAPP_TEMPL_VERSIONS_TL SUBT
29: WHERE
30: SUBB.ID = SUBT.ID
31: AND SUBB.LANGUAGE = SUBT.SOURCE_LANG
32: AND (SUBB.SHORT_DESCRIPTION <> SUBT.SHORT_DESCRIPTION)
32: AND (SUBB.SHORT_DESCRIPTION <> SUBT.SHORT_DESCRIPTION)
33: OR (SUBB.SHORT_DESCRIPTION IS NULL AND SUBT.SHORT_DESCRIPTION IS NOT NULL)
34: );
35:
36: INSERT INTO OKL_LEASEAPP_TEMPL_VERSIONS_TL (
37: ID,
38: LANGUAGE,
39: SOURCE_LANG,
40: SFWT_FLAG,
54: B.LAST_UPDATED_BY,
55: B.LAST_UPDATE_DATE,
56: B.LAST_UPDATE_LOGIN,
57: B.SHORT_DESCRIPTION
58: FROM OKL_LEASEAPP_TEMPL_VERSIONS_TL B, FND_LANGUAGES L
59: WHERE L.INSTALLED_FLAG IN ('I', 'B')
60: AND B.LANGUAGE = USERENV('LANG')
61: AND NOT EXISTS (
62: SELECT NULL
59: WHERE L.INSTALLED_FLAG IN ('I', 'B')
60: AND B.LANGUAGE = USERENV('LANG')
61: AND NOT EXISTS (
62: SELECT NULL
63: FROM OKL_LEASEAPP_TEMPL_VERSIONS_TL T
64: WHERE T.ID = B.ID
65: AND T.LANGUAGE = L.LANGUAGE_CODE
66: );
67:
572: ELSE
573: l_sfwt_flag := 'Y';
574: END IF;
575:
576: INSERT INTO OKL_LEASEAPP_TEMPL_VERSIONS_TL (
577: id
578: ,language
579: ,source_lang
580: ,sfwt_flag
1030: BEGIN
1031:
1032: l_prog_name := G_PKG_NAME||'.update_row (TL)';
1033:
1034: UPDATE OKL_LEASEAPP_TEMPL_VERSIONS_TL
1035: SET
1036: source_lang = USERENV('LANG')
1037: ,sfwt_flag = 'Y'
1038: ,last_updated_by = G_USER_ID
1040: ,last_update_login = G_LOGIN_ID
1041: ,short_description = p_lavtl_rec.short_description
1042: WHERE ID = p_lavtl_rec.id;
1043:
1044: UPDATE OKL_LEASEAPP_TEMPL_VERSIONS_TL
1045: SET SFWT_FLAG = 'N'
1046: WHERE ID = p_lavtl_rec.id
1047: AND SOURCE_LANG = LANGUAGE;
1048:
1433:
1434: l_prog_name := G_PKG_NAME||'.delete_row (V)';
1435:
1436: DELETE FROM OKL_LEASEAPP_TEMPL_VERSIONS_B WHERE id = p_id;
1437: DELETE FROM OKL_LEASEAPP_TEMPL_VERSIONS_TL WHERE id = p_id;
1438:
1439: x_return_status := G_RET_STS_SUCCESS;
1440:
1441: EXCEPTION