[Home] [Help]
43: X_ORG_ID
44: --R12 MOAC Changes--End
45: );
46:
47: insert into CN_HEAD_HIERARCHIES_ALL_TL (
48: HEAD_HIERARCHY_ID,
49: DIMENSION_ID,
50: NAME,
51: CREATION_DATE,
75: from FND_LANGUAGES L
76: where L.INSTALLED_FLAG in ('I', 'B')
77: and not exists
78: (select NULL
79: from CN_HEAD_HIERARCHIES_ALL_TL T
80: where T.HEAD_HIERARCHY_ID = X_HEAD_HIERARCHY_ID
81: and T.LANGUAGE = L.language_code AND
82: --R12 MOAC Changes--Start
83: ORG_ID = X_ORG_ID
116: if (sql%notfound) then
117: raise no_data_found;
118: end if;
119:
120: update CN_HEAD_HIERARCHIES_ALL_TL set
121: NAME = X_NAME,
122: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
123: LAST_UPDATED_BY = X_LAST_UPDATED_BY,
124: LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
166: AND org_id = X_ORG_ID;
167: --R12 MOAC Changes--End
168:
169: -- finally delete head hierarchy - handle MLS delete
170: delete from CN_HEAD_HIERARCHIES_ALL_TL
171: where HEAD_HIERARCHY_ID = X_HEAD_HIERARCHY_ID
172: and org_id = X_ORG_ID;
173:
174: delete from CN_HEAD_HIERARCHIES_ALL_B
184:
185: procedure ADD_LANGUAGE
186: is
187: begin
188: delete from CN_HEAD_HIERARCHIES_ALL_TL T
189: where not exists
190: (select NULL
191: from CN_HEAD_HIERARCHIES_ALL_B B
192: where B.HEAD_HIERARCHY_ID = T.head_hierarchy_id
192: where B.HEAD_HIERARCHY_ID = T.head_hierarchy_id
193: and B.ORG_ID = T.ORG_ID
194: );
195:
196: update CN_HEAD_HIERARCHIES_ALL_TL T set (
197: NAME
198: ) = (select
199: B.NAME
200: from CN_HEAD_HIERARCHIES_ALL_TL B
196: update CN_HEAD_HIERARCHIES_ALL_TL T set (
197: NAME
198: ) = (select
199: B.NAME
200: from CN_HEAD_HIERARCHIES_ALL_TL B
201: where B.HEAD_HIERARCHY_ID = T.HEAD_HIERARCHY_ID
202: and B.LANGUAGE = T.source_lang
203: and B.ORG_ID = T.ORG_ID )
204: where (
206: T.LANGUAGE
207: ) in (select
208: SUBT.HEAD_HIERARCHY_ID,
209: SUBT.LANGUAGE
210: from CN_HEAD_HIERARCHIES_ALL_TL SUBB, CN_HEAD_HIERARCHIES_ALL_TL SUBT
211: where SUBB.HEAD_HIERARCHY_ID = SUBT.HEAD_HIERARCHY_ID
212: and SUBB.LANGUAGE = SUBT.source_lang
213: and SUBB.ORG_ID = SUBT.ORG_ID
214: and (SUBB.NAME <> SUBT.NAME
215: or (SUBB.NAME is null and SUBT.NAME is not null)
216: or (SUBB.NAME is not null and SUBT.NAME is null)
217: ));
218:
219: insert into CN_HEAD_HIERARCHIES_ALL_TL (
220: ORG_ID,
221: HEAD_HIERARCHY_ID,
222: DIMENSION_ID,
223: NAME,
239: B.LAST_UPDATED_BY,
240: B.LAST_UPDATE_LOGIN,
241: L.LANGUAGE_CODE,
242: B.SOURCE_LANG
243: from CN_HEAD_HIERARCHIES_ALL_TL B, FND_LANGUAGES L
244: where L.INSTALLED_FLAG in ('I', 'B')
245: and B.LANGUAGE = userenv('LANG')
246: and not exists
247: (select NULL
244: where L.INSTALLED_FLAG in ('I', 'B')
245: and B.LANGUAGE = userenv('LANG')
246: and not exists
247: (select NULL
248: from CN_HEAD_HIERARCHIES_ALL_TL T
249: where T.HEAD_HIERARCHY_ID = B.HEAD_HIERARCHY_ID
250: and T.LANGUAGE = L.language_code
251: and T.ORG_ID = B.ORG_ID );
252: end ADD_LANGUAGE;
311: 0
312: );
313: END IF;
314: -- Load The record to _TL table
315: UPDATE cn_head_hierarchies_all_tl SET
316: dimension_id = x_dimension_id,
317: name = x_name,
318: last_update_date = sysdate,
319: last_updated_by = user_id,
324: AND userenv('LANG') IN (LANGUAGE, SOURCE_LANG);
325:
326: IF (SQL%NOTFOUND) THEN
327: -- Insert new record to _TL table
328: INSERT INTO cn_head_hierarchies_all_tl
329: (head_hierarchy_id,
330: dimension_id,
331: org_id, --R12 change
332: name,
352: FROM fnd_languages l
353: WHERE l.installed_flag IN ('I', 'B')
354: AND NOT EXISTS
355: (SELECT NULL
356: FROM cn_head_hierarchies_all_tl t
357: WHERE t.head_hierarchy_id = x_head_hierarchy_id
358: AND t.org_id = x_org_id -- R12 change
359: AND t.language = l.language_code);
360: END IF;
385: ELSE
386: user_id := 0;
387: END IF;
388: -- Update the translation
389: UPDATE cn_head_hierarchies_all_tl SET
390: name = x_name,
391: last_update_date = sysdate,
392: last_updated_by = user_id,
393: last_update_login = 0,