104: l_luby, --LAST_UPDATED_BY,
105: 0, --LAST_UPDATE_LOGIN,
106: FND_GLOBAL.SECURITY_GROUP_ID);
107:
108: insert into WF_WL_REGIONS_TL (REGION_ID,
109: TITLE,
110: DESCRIPTION,
111: LANGUAGE,
112: SOURCE_LANG,
130: from FND_LANGUAGES L
131: where L.INSTALLED_FLAG in ('I', 'B')
132: and not exists
133: (select NULL
134: from WF_WL_REGIONS_TL TL, WF_WL_REGIONS B
135: where B.REGION_ID = TL.REGION_ID and
136: B.REGION_KEY = X_REGION_KEY and
137: TL.LANGUAGE = L.LANGUAGE_CODE);
138:
220: end UPDATE_REGION_BY_KEY;
221:
222: procedure ADD_LANGUAGE is
223: begin
224: insert into WF_WL_REGIONS_TL (REGION_ID,
225: TITLE,
226: DESCRIPTION,
227: LANGUAGE,
228: SOURCE_LANG,
242: B.LAST_UPDATE_DATE,
243: B.LAST_UPDATED_BY,
244: B.LAST_UPDATE_LOGIN,
245: B.SECURITY_GROUP_ID
246: from WF_WL_REGIONS_TL B, FND_LANGUAGES L
247: where L.INSTALLED_FLAG in ('I', 'B')
248: AND B.LANGUAGE = userenv('LANG')
249: and not exists
250: (select NULL
247: where L.INSTALLED_FLAG in ('I', 'B')
248: AND B.LANGUAGE = userenv('LANG')
249: and not exists
250: (select NULL
251: from WF_WL_REGIONS_TL TL
252: where B.REGION_ID = TL.REGION_ID and
253: TL.LANGUAGE = L.LANGUAGE_CODE);
254: exception
255: when others then
264: l_region_id number := FIND_REGION_ID(X_REGION_KEY);
265: l_luby number := FND_LOAD_UTIL.OWNER_ID(X_OWNER);
266: l_ludate date := nvl(to_date(X_LAST_UPDATE_DATE, 'YYYY/MM/DD'), sysdate);
267: BEGIN
268: UPDATE WF_WL_REGIONS_TL TL
269: SET TL.TITLE = X_TITLE,
270: TL.DESCRIPTION = X_DESCRIPTION,
271: TL.SOURCE_LANG = userenv('LANG'),
272: TL.LAST_UPDATE_DATE = l_ludate,