[Home] [Help]
12: Purpose
13: -------
14: Insert, update, delete or lock tables belonging to view CSR_WIN_PROMIS_VL:
15: - base table CSR_WIN_PROMIS_ALL_B, and
16: - translation table CSR_WIN_PROMIS_ALL_TL.
17: Check uniqueness of columns NAME and START/END_TIME combinations. Restore
18: data integrity to a corrupted base/translation pair.
19:
20: History
36: is
37: cursor c_name
38: is
39: select ''
40: from csr_win_promis_all_tl
41: where ( p_win_promis_id is null
42: or win_promis_id <> p_win_promis_id )
43: and userenv('LANG') in (language, source_lang)
44: and upper(name) = upper(p_name);
200: , p_attribute_category
201: , p_org_id
202: );
203:
204: insert into csr_win_promis_all_tl
205: (
206: win_promis_id
207: , name
208: , description
227: from fnd_languages l
228: where l.installed_flag in ('I','B')
229: and not exists
230: ( select ''
231: from csr_win_promis_all_tl t
232: where t.win_promis_id = p_win_promis_id
233: and t.language = l.language_code );
234:
235: open c_prom ( p_win_promis_id );
385: then
386: raise NO_DATA_FOUND;
387: end if;
388:
389: update csr_win_promis_all_tl
390: set name = p_name
391: , description = p_description
392: , last_update_date = p_last_update_date
393: , last_updated_by = p_last_updated_by
407: p_win_promis_id IN number
408: )
409: is
410: begin
411: delete from csr_win_promis_all_tl
412: where win_promis_id = p_win_promis_id;
413:
414: if sql%notfound
415: then
427:
428: procedure add_language
429: is
430: begin
431: delete from csr_win_promis_all_tl t
432: where not exists
433: ( select ''
434: from csr_win_promis_all_b b
435: where b.win_promis_id = t.win_promis_id );
433: ( select ''
434: from csr_win_promis_all_b b
435: where b.win_promis_id = t.win_promis_id );
436:
437: update csr_win_promis_all_tl t
438: set ( name, description ) =
439: ( select b.name
440: , b.description
441: from csr_win_promis_all_tl b
437: update csr_win_promis_all_tl t
438: set ( name, description ) =
439: ( select b.name
440: , b.description
441: from csr_win_promis_all_tl b
442: where b.win_promis_id = t.win_promis_id
443: and b.language = t.source_lang )
444: where ( t.win_promis_id, t.language ) in
445: ( select subt.win_promis_id
443: and b.language = t.source_lang )
444: where ( t.win_promis_id, t.language ) in
445: ( select subt.win_promis_id
446: , subt.language
447: from csr_win_promis_all_tl subb
448: , csr_win_promis_all_tl subt
449: where subb.win_promis_id = subt.win_promis_id
450: and subb.language = subt.source_lang
451: and ( subb.name <> subt.name
444: where ( t.win_promis_id, t.language ) in
445: ( select subt.win_promis_id
446: , subt.language
447: from csr_win_promis_all_tl subb
448: , csr_win_promis_all_tl subt
449: where subb.win_promis_id = subt.win_promis_id
450: and subb.language = subt.source_lang
451: and ( subb.name <> subt.name
452: or subb.description <> subt.description
454: and subt.description is not null )
455: or ( subb.description is not null
456: and subt.description is null ) ) );
457:
458: insert into csr_win_promis_all_tl
459: ( win_promis_id
460: , name
461: , description
462: , created_by
476: , b.last_update_date
477: , b.last_update_login
478: , l.language_code
479: , b.source_lang
480: from csr_win_promis_all_tl b
481: , fnd_languages l
482: where l.installed_flag in ('I', 'B')
483: and b.language = userenv('LANG')
484: and not exists
482: where l.installed_flag in ('I', 'B')
483: and b.language = userenv('LANG')
484: and not exists
485: ( select null
486: from csr_win_promis_all_tl t
487: where t.win_promis_id = b.win_promis_id
488: and t.language = l.language_code );
489: end add_language;
490:
496: , p_owner IN varchar2
497: )
498: is
499: begin
500: update CSR_WIN_PROMIS_ALL_TL
501: set name = p_name,
502: description = p_description,
503: last_update_date = sysdate,
504: last_updated_by = decode(p_owner, 'SEED', 1, 0),