18: l_proc varchar2(72) := g_package||'constraint_error';
19: --
20: Begin
21: --
22: If (p_constraint_name = 'HXC_ALIAS_VALUES_TL_PK') Then
23: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
24: fnd_message.set_token('PROCEDURE', l_proc);
25: fnd_message.set_token('STEP','5');
26: fnd_message.raise_error;
49: alias_value_id
50: ,alias_value_name
51: ,language
52: ,source_lang
53: from hxc_alias_values_tl
54: where alias_value_id = p_alias_value_id
55: and language = p_language;
56: --
57: l_fct_ret boolean;
115: alias_value_id
116: ,alias_value_name
117: ,language
118: ,source_lang
119: from hxc_alias_values_tl
120: where alias_value_id = p_alias_value_id
121: and language = p_language
122: for update nowait;
123: --
169: -- The object is locked therefore we need to supply a meaningful
170: -- error message.
171: --
172: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
173: fnd_message.set_token('TABLE_NAME', 'hxc_alias_values_tl');
174: fnd_message.raise_error;
175: End lck;
176: --
177: -- ----------------------------------------------------------------------------
186: -- ----------------------------------------------------------------------------
187: PROCEDURE add_language IS
188: Begin
189: --
190: delete from hxc_alias_values_tl t
191: where not exists
192: (select null
193: from hxc_alias_values_tl b
194: where b.alias_value_id = t.alias_value_id
189: --
190: delete from hxc_alias_values_tl t
191: where not exists
192: (select null
193: from hxc_alias_values_tl b
194: where b.alias_value_id = t.alias_value_id
195: );
196: --
197: update hxc_alias_values_tl t
193: from hxc_alias_values_tl b
194: where b.alias_value_id = t.alias_value_id
195: );
196: --
197: update hxc_alias_values_tl t
198: set (alias_value_name) =
199: (select b.alias_value_name
200: from hxc_alias_values_tl b
201: where b.alias_value_id = t.alias_value_id
196: --
197: update hxc_alias_values_tl t
198: set (alias_value_name) =
199: (select b.alias_value_name
200: from hxc_alias_values_tl b
201: where b.alias_value_id = t.alias_value_id
202: and b.language = t.source_lang)
203: where (t.alias_value_id
204: ,t.language)
203: where (t.alias_value_id
204: ,t.language)
205: in (select subt.alias_value_id
206: ,subt.language
207: from hxc_alias_values_tl subb
208: ,hxc_alias_values_tl subt
209: where subb.alias_value_id = subt.alias_value_id
210: and subb.language = subt.source_lang
211: and subb.alias_value_name <> subt.alias_value_name
204: ,t.language)
205: in (select subt.alias_value_id
206: ,subt.language
207: from hxc_alias_values_tl subb
208: ,hxc_alias_values_tl subt
209: where subb.alias_value_id = subt.alias_value_id
210: and subb.language = subt.source_lang
211: and subb.alias_value_name <> subt.alias_value_name
212: );
210: and subb.language = subt.source_lang
211: and subb.alias_value_name <> subt.alias_value_name
212: );
213: --
214: insert into hxc_alias_values_tl
215: (alias_value_id
216: ,alias_value_name
217: ,language
218: ,source_lang
230: ,b.last_updated_by
231: ,b.last_update_login
232: ,b.created_by
233: ,b.creation_date
234: from hxc_alias_values_tl b
235: ,fnd_languages l
236: where l.installed_flag in ('I', 'B')
237: and b.language = userenv('LANG')
238: and not exists
236: where l.installed_flag in ('I', 'B')
237: and b.language = userenv('LANG')
238: and not exists
239: (select null
240: from hxc_alias_values_tl t
241: where t.alias_value_id = b.alias_value_id
242: and t.language = l.language_code
243: );
244: --