67: --
68: hr_utility.set_location(' Leaving:'||l_proc, 10);
69: --
70: Exception
71: When hr_api.check_integrity_violated Then
72: -- A check constraint has been violated
73: hr_lot_shd.constraint_error
74: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
75: When hr_api.parent_integrity_violated Then
70: Exception
71: When hr_api.check_integrity_violated Then
72: -- A check constraint has been violated
73: hr_lot_shd.constraint_error
74: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
75: When hr_api.parent_integrity_violated Then
76: -- Parent integrity has been violated
77: hr_lot_shd.constraint_error
78: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
71: When hr_api.check_integrity_violated Then
72: -- A check constraint has been violated
73: hr_lot_shd.constraint_error
74: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
75: When hr_api.parent_integrity_violated Then
76: -- Parent integrity has been violated
77: hr_lot_shd.constraint_error
78: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
79: When hr_api.unique_integrity_violated Then
74: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
75: When hr_api.parent_integrity_violated Then
76: -- Parent integrity has been violated
77: hr_lot_shd.constraint_error
78: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
79: When hr_api.unique_integrity_violated Then
80: -- Unique integrity has been violated
81: hr_lot_shd.constraint_error
82: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
75: When hr_api.parent_integrity_violated Then
76: -- Parent integrity has been violated
77: hr_lot_shd.constraint_error
78: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
79: When hr_api.unique_integrity_violated Then
80: -- Unique integrity has been violated
81: hr_lot_shd.constraint_error
82: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
83: When Others Then
78: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
79: When hr_api.unique_integrity_violated Then
80: -- Unique integrity has been violated
81: hr_lot_shd.constraint_error
82: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
83: When Others Then
84: Raise;
85: End update_dml;
86: --
183: );
184: --
185: exception
186: --
187: when hr_api.cannot_find_prog_unit then
188: --
189: hr_api.cannot_find_prog_unit_error
190: (p_module_name => 'HR_LOCATIONS_ALL_TL'
191: ,p_hook_type => 'AU');
185: exception
186: --
187: when hr_api.cannot_find_prog_unit then
188: --
189: hr_api.cannot_find_prog_unit_error
190: (p_module_name => 'HR_LOCATIONS_ALL_TL'
191: ,p_hook_type => 'AU');
192: --
193: end;
253: -- p_rec plsql record structure
254: -- to see if a system default is being used. If a system default
255: -- is being used then we must set to the 'current' argument value.
256: --
257: If (p_rec.source_lang = hr_api.g_varchar2) then
258: p_rec.source_lang :=
259: hr_lot_shd.g_old_rec.source_lang;
260: End If;
261: If (p_rec.location_code = hr_api.g_varchar2) then
257: If (p_rec.source_lang = hr_api.g_varchar2) then
258: p_rec.source_lang :=
259: hr_lot_shd.g_old_rec.source_lang;
260: End If;
261: If (p_rec.location_code = hr_api.g_varchar2) then
262: p_rec.location_code :=
263: hr_lot_shd.g_old_rec.location_code;
264: End If;
265: If (p_rec.description = hr_api.g_varchar2) then
261: If (p_rec.location_code = hr_api.g_varchar2) then
262: p_rec.location_code :=
263: hr_lot_shd.g_old_rec.location_code;
264: End If;
265: If (p_rec.description = hr_api.g_varchar2) then
266: p_rec.description :=
267: hr_lot_shd.g_old_rec.description;
268: End If;
269: --
321: Procedure upd
322: (
323: p_location_id in number,
324: p_language in varchar2,
325: p_source_lang in varchar2 default hr_api.g_varchar2,
326: p_location_code in varchar2 default hr_api.g_varchar2,
327: p_description in varchar2 default hr_api.g_varchar2,
328: p_business_group_id in number
329: ) is
322: (
323: p_location_id in number,
324: p_language in varchar2,
325: p_source_lang in varchar2 default hr_api.g_varchar2,
326: p_location_code in varchar2 default hr_api.g_varchar2,
327: p_description in varchar2 default hr_api.g_varchar2,
328: p_business_group_id in number
329: ) is
330: --
323: p_location_id in number,
324: p_language in varchar2,
325: p_source_lang in varchar2 default hr_api.g_varchar2,
326: p_location_code in varchar2 default hr_api.g_varchar2,
327: p_description in varchar2 default hr_api.g_varchar2,
328: p_business_group_id in number
329: ) is
330: --
331: l_rec hr_lot_shd.g_rec_type;
364: Procedure upd_tl
365: (
366: p_language_code in varchar2,
367: p_location_id in number,
368: p_location_code in varchar2 default hr_api.g_varchar2,
369: p_description in varchar2 default hr_api.g_varchar2
370: )
371: is
372: --
365: (
366: p_language_code in varchar2,
367: p_location_id in number,
368: p_location_code in varchar2 default hr_api.g_varchar2,
369: p_description in varchar2 default hr_api.g_varchar2
370: )
371: is
372: --
373: -- Cursor to obtain the translation rows where the language or