165: X_LAST_UPDATE_LOGIN,
166: X_MFG_CALENDAR_ID
167: );
168:
169: insert into SY_ORGN_MST_TL (
170: LAST_UPDATE_DATE,
171: LAST_UPDATED_BY,
172: LAST_UPDATE_LOGIN,
173: ORGN_CODE,
189: from FND_LANGUAGES L
190: where L.INSTALLED_FLAG in ('I', 'B')
191: and not exists
192: (select NULL
193: from SY_ORGN_MST_TL T
194: where T.ORGN_CODE = X_ORGN_CODE
195: and T.LANGUAGE = L.LANGUAGE_CODE);
196:
197: open c;
306:
307: cursor c1 is select
308: ORGN_NAME,
309: decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
310: from SY_ORGN_MST_TL
311: where ORGN_CODE = X_ORGN_CODE
312: and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
313: for update of ORGN_CODE nowait;
314: begin
532: if (sql%notfound) then
533: raise no_data_found;
534: end if;
535:
536: update SY_ORGN_MST_TL set
537: ORGN_NAME = X_ORGN_NAME,
538: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
539: LAST_UPDATED_BY = X_LAST_UPDATED_BY,
540: LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
551: X_ORGN_CODE in VARCHAR2
552: ) is
553: begin
554: /*****************
555: delete from SY_ORGN_MST_TL
556: where ORGN_CODE = X_ORGN_CODE;
557:
558: if (sql%notfound) then
559: raise no_data_found;
571:
572: procedure ADD_LANGUAGE
573: is
574: begin
575: delete from SY_ORGN_MST_TL T
576: where not exists
577: (select NULL
578: from SY_ORGN_MST_B B
579: where B.ORGN_CODE = T.ORGN_CODE
578: from SY_ORGN_MST_B B
579: where B.ORGN_CODE = T.ORGN_CODE
580: );
581:
582: update SY_ORGN_MST_TL T set (
583: ORGN_NAME
584: ) = (select
585: B.ORGN_NAME
586: from SY_ORGN_MST_TL B
582: update SY_ORGN_MST_TL T set (
583: ORGN_NAME
584: ) = (select
585: B.ORGN_NAME
586: from SY_ORGN_MST_TL B
587: where B.ORGN_CODE = T.ORGN_CODE
588: and B.LANGUAGE = T.SOURCE_LANG)
589: where (
590: T.ORGN_CODE,
591: T.LANGUAGE
592: ) in (select
593: SUBT.ORGN_CODE,
594: SUBT.LANGUAGE
595: from SY_ORGN_MST_TL SUBB, SY_ORGN_MST_TL SUBT
596: where SUBB.ORGN_CODE = SUBT.ORGN_CODE
597: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
598: and (SUBB.ORGN_NAME <> SUBT.ORGN_NAME
599: ));
597: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
598: and (SUBB.ORGN_NAME <> SUBT.ORGN_NAME
599: ));
600:
601: insert into SY_ORGN_MST_TL (
602: LAST_UPDATE_DATE,
603: LAST_UPDATED_BY,
604: LAST_UPDATE_LOGIN,
605: ORGN_CODE,
617: B.CREATION_DATE,
618: B.ORGN_NAME,
619: L.LANGUAGE_CODE,
620: B.SOURCE_LANG
621: from SY_ORGN_MST_TL B, FND_LANGUAGES L
622: where L.INSTALLED_FLAG in ('I', 'B')
623: and B.LANGUAGE = userenv('LANG')
624: and not exists
625: (select NULL
622: where L.INSTALLED_FLAG in ('I', 'B')
623: and B.LANGUAGE = userenv('LANG')
624: and not exists
625: (select NULL
626: from SY_ORGN_MST_TL T
627: where T.ORGN_CODE = B.ORGN_CODE
628: and T.LANGUAGE = L.LANGUAGE_CODE);
629: end ADD_LANGUAGE;
630: