[Home] [Help]
131: X_LAST_UPDATED_BY,
132: X_LAST_UPDATE_LOGIN
133: );
134:
135: insert into XDO_TEMPLATES_TL (
136: APPLICATION_SHORT_NAME,
137: TEMPLATE_CODE,
138: TEMPLATE_NAME,
139: DESCRIPTION,
159: from FND_LANGUAGES L
160: where L.INSTALLED_FLAG in ('I', 'B')
161: and not exists
162: (select NULL
163: from XDO_TEMPLATES_TL T
164: where T.APPLICATION_SHORT_NAME = X_APPLICATION_SHORT_NAME
165: and T.TEMPLATE_CODE = X_TEMPLATE_CODE
166: and T.LANGUAGE = L.LANGUAGE_CODE);
167:
350: cursor c1 is select
351: TEMPLATE_NAME,
352: DESCRIPTION,
353: decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
354: from XDO_TEMPLATES_TL
355: where APPLICATION_SHORT_NAME = X_APPLICATION_SHORT_NAME
356: and TEMPLATE_CODE = X_TEMPLATE_CODE
357: and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
358: for update of APPLICATION_SHORT_NAME nowait;
527: if (sql%notfound) then
528: raise no_data_found;
529: end if;
530:
531: update XDO_TEMPLATES_TL set
532: TEMPLATE_NAME = X_TEMPLATE_NAME,
533: DESCRIPTION = X_DESCRIPTION,
534: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
535: LAST_UPDATED_BY = X_LAST_UPDATED_BY,
548: X_APPLICATION_SHORT_NAME in VARCHAR2,
549: X_TEMPLATE_CODE in VARCHAR2
550: ) is
551: begin
552: delete from XDO_TEMPLATES_TL
553: where APPLICATION_SHORT_NAME = X_APPLICATION_SHORT_NAME
554: and TEMPLATE_CODE = X_TEMPLATE_CODE;
555:
556: if (sql%notfound) then
568:
569: procedure ADD_LANGUAGE
570: is
571: begin
572: delete from XDO_TEMPLATES_TL T
573: where not exists
574: (select NULL
575: from XDO_TEMPLATES_B B
576: where B.APPLICATION_SHORT_NAME = T.APPLICATION_SHORT_NAME
576: where B.APPLICATION_SHORT_NAME = T.APPLICATION_SHORT_NAME
577: and B.TEMPLATE_CODE = T.TEMPLATE_CODE
578: );
579:
580: update XDO_TEMPLATES_TL T set (
581: TEMPLATE_NAME,
582: DESCRIPTION
583: ) = (select
584: B.TEMPLATE_NAME,
582: DESCRIPTION
583: ) = (select
584: B.TEMPLATE_NAME,
585: B.DESCRIPTION
586: from XDO_TEMPLATES_TL B
587: where B.APPLICATION_SHORT_NAME = T.APPLICATION_SHORT_NAME
588: and B.TEMPLATE_CODE = T.TEMPLATE_CODE
589: and B.LANGUAGE = T.SOURCE_LANG)
590: where (
594: ) in (select
595: SUBT.APPLICATION_SHORT_NAME,
596: SUBT.TEMPLATE_CODE,
597: SUBT.LANGUAGE
598: from XDO_TEMPLATES_TL SUBB, XDO_TEMPLATES_TL SUBT
599: where SUBB.APPLICATION_SHORT_NAME = SUBT.APPLICATION_SHORT_NAME
600: and SUBB.TEMPLATE_CODE = SUBT.TEMPLATE_CODE
601: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
602: and (SUBB.TEMPLATE_NAME <> SUBT.TEMPLATE_NAME
604: or (SUBB.DESCRIPTION is null and SUBT.DESCRIPTION is not null)
605: or (SUBB.DESCRIPTION is not null and SUBT.DESCRIPTION is null)
606: ));
607:
608: insert into XDO_TEMPLATES_TL (
609: APPLICATION_SHORT_NAME,
610: TEMPLATE_CODE,
611: TEMPLATE_NAME,
612: DESCRIPTION,
628: B.LAST_UPDATE_DATE,
629: B.LAST_UPDATE_LOGIN,
630: L.LANGUAGE_CODE,
631: B.SOURCE_LANG
632: from XDO_TEMPLATES_TL B, FND_LANGUAGES L
633: where L.INSTALLED_FLAG in ('I', 'B')
634: and B.LANGUAGE = userenv('LANG')
635: and not exists
636: (select NULL
633: where L.INSTALLED_FLAG in ('I', 'B')
634: and B.LANGUAGE = userenv('LANG')
635: and not exists
636: (select NULL
637: from XDO_TEMPLATES_TL T
638: where T.APPLICATION_SHORT_NAME = B.APPLICATION_SHORT_NAME
639: and T.TEMPLATE_CODE = B.TEMPLATE_CODE
640: and T.LANGUAGE = L.LANGUAGE_CODE);
641: end ADD_LANGUAGE;
663:
664: begin
665: select LAST_UPDATED_BY, LAST_UPDATE_DATE
666: into db_luby, db_ludate
667: from XDO_TEMPLATES_TL
668: where APPLICATION_SHORT_NAME = X_APPLICATION_SHORT_NAME
669: and TEMPLATE_CODE = X_TEMPLATE_CODE
670: and LANGUAGE = userenv('LANG');
671:
680: p_db_id => db_luby,
681: p_db_lud => db_ludate,
682: p_custom_mode => x_custom_mode))
683: then
684: update XDO_TEMPLATES_TL set
685: TEMPLATE_NAME =
686: nvl(x_template_name, template_name),
687: DESCRIPTION = nvl(x_description, DESCRIPTION),
688: SOURCE_LANG = userenv('LANG'),