57: X_LAST_UPDATE_DATE,
58: X_LAST_UPDATE_LOGIN
59: );
60:
61: insert into AR_CASH_AUTOMATCHES_TL (
62: AUTOMATCH_ID,
63: AUTOMATCH_NAME,
64: DESCRIPTION,
65: CREATED_BY,
83: from FND_LANGUAGES L
84: where L.INSTALLED_FLAG in ('I', 'B')
85: and not exists
86: (select NULL
87: from AR_CASH_AUTOMATCHES_TL T
88: where T.AUTOMATCH_ID = X_AUTOMATCH_ID
89: and T.LANGUAGE = L.LANGUAGE_CODE);
90:
91: open c;
130: cursor c1 is select
131: AUTOMATCH_NAME,
132: DESCRIPTION,
133: decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
134: from AR_CASH_AUTOMATCHES_TL
135: where AUTOMATCH_ID = X_AUTOMATCH_ID
136: and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
137: for update of AUTOMATCH_ID nowait;
138: begin
217: if (sql%notfound) then
218: raise no_data_found;
219: end if;
220:
221: update AR_CASH_AUTOMATCHES_TL set
222: AUTOMATCH_NAME = X_AUTOMATCH_NAME,
223: DESCRIPTION = X_DESCRIPTION,
224: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
225: LAST_UPDATED_BY = X_LAST_UPDATED_BY,
236: procedure DELETE_ROW (
237: X_AUTOMATCH_ID in NUMBER
238: ) is
239: begin
240: delete from AR_CASH_AUTOMATCHES_TL
241: where AUTOMATCH_ID = X_AUTOMATCH_ID;
242:
243: if (sql%notfound) then
244: raise no_data_found;
254:
255: procedure ADD_LANGUAGE
256: is
257: begin
258: delete from AR_CASH_AUTOMATCHES_TL T
259: where not exists
260: (select NULL
261: from AR_CASH_AUTOMATCHES B
262: where B.AUTOMATCH_ID = T.AUTOMATCH_ID
261: from AR_CASH_AUTOMATCHES B
262: where B.AUTOMATCH_ID = T.AUTOMATCH_ID
263: );
264:
265: update AR_CASH_AUTOMATCHES_TL T set (
266: AUTOMATCH_NAME,
267: DESCRIPTION
268: ) = (select
269: B.AUTOMATCH_NAME,
267: DESCRIPTION
268: ) = (select
269: B.AUTOMATCH_NAME,
270: B.DESCRIPTION
271: from AR_CASH_AUTOMATCHES_TL B
272: where B.AUTOMATCH_ID = T.AUTOMATCH_ID
273: and B.LANGUAGE = T.SOURCE_LANG)
274: where (
275: T.AUTOMATCH_ID,
276: T.LANGUAGE
277: ) in (select
278: SUBT.AUTOMATCH_ID,
279: SUBT.LANGUAGE
280: from AR_CASH_AUTOMATCHES_TL SUBB, AR_CASH_AUTOMATCHES_TL SUBT
281: where SUBB.AUTOMATCH_ID = SUBT.AUTOMATCH_ID
282: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
283: and (SUBB.AUTOMATCH_NAME <> SUBT.AUTOMATCH_NAME
284: or SUBB.DESCRIPTION <> SUBT.DESCRIPTION
285: or (SUBB.DESCRIPTION is null and SUBT.DESCRIPTION is not null)
286: or (SUBB.DESCRIPTION is not null and SUBT.DESCRIPTION is null)
287: ));
288:
289: insert into AR_CASH_AUTOMATCHES_TL (
290: AUTOMATCH_ID,
291: AUTOMATCH_NAME,
292: DESCRIPTION,
293: CREATED_BY,
307: B.LAST_UPDATE_DATE,
308: B.LAST_UPDATE_LOGIN,
309: B.LANGUAGE,
310: B.SOURCE_LANG
311: from AR_CASH_AUTOMATCHES_TL B, FND_LANGUAGES L
312: where L.INSTALLED_FLAG in ('I', 'B')
313: and B.LANGUAGE = userenv('LANG')
314: and not exists
315: (select NULL
312: where L.INSTALLED_FLAG in ('I', 'B')
313: and B.LANGUAGE = userenv('LANG')
314: and not exists
315: (select NULL
316: from AR_CASH_AUTOMATCHES_TL T
317: where T.AUTOMATCH_ID = B.AUTOMATCH_ID
318: and T.LANGUAGE = L.LANGUAGE_CODE);
319: end ADD_LANGUAGE;
320:
324: X_DESCRIPTION in VARCHAR2,
325: X_OWNER in VARCHAR2) IS
326: begin
327:
328: update AR_CASH_AUTOMATCHES_TL
329: set AUTOMATCH_NAME = X_AUTOMATCH_NAME,
330: DESCRIPTION = X_DESCRIPTION,
331: source_lang = userenv('LANG'),
332: last_update_date = sysdate,