51: --
52: -- {End Of Comments}
53: -- ----------------------------------------------------------------------------
54: Procedure update_dml
55: (p_rec in out nocopy hr_fim_shd.g_rec_type
56: ) is
57: --
58: l_proc varchar2(72) := g_package||'update_dml';
59: --
90: Exception
91: When hr_api.check_integrity_violated Then
92: -- A check constraint has been violated
93: --
94: hr_fim_shd.constraint_error
95: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
96: When hr_api.parent_integrity_violated Then
97: -- Parent integrity has been violated
98: --
95: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
96: When hr_api.parent_integrity_violated Then
97: -- Parent integrity has been violated
98: --
99: hr_fim_shd.constraint_error
100: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
101: When hr_api.unique_integrity_violated Then
102: -- Unique integrity has been violated
103: --
100: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
101: When hr_api.unique_integrity_violated Then
102: -- Unique integrity has been violated
103: --
104: hr_fim_shd.constraint_error
105: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
106: When Others Then
107: --
108: Raise;
140: --
141: -- {End Of Comments}
142: -- ----------------------------------------------------------------------------
143: Procedure pre_update
144: (p_rec in hr_fim_shd.g_rec_type
145: ) is
146: --
147: l_proc varchar2(72) := g_package||'pre_update';
148: --
185: -- {End Of Comments}
186: -- ----------------------------------------------------------------------------
187: Procedure post_update
188: (p_effective_date in date
189: ,p_rec in hr_fim_shd.g_rec_type
190: ) is
191: --
192: l_proc varchar2(72) := g_package||'post_update';
193: --
221: => p_rec.form_tab_page_id_override
222: ,p_visible_override
223: => p_rec.visible_override
224: ,p_object_version_number_o
225: => hr_fim_shd.g_old_rec.object_version_number
226: ,p_application_id_o
227: => hr_fim_shd.g_old_rec.application_id
228: ,p_form_id_o
229: => hr_fim_shd.g_old_rec.form_id
223: => p_rec.visible_override
224: ,p_object_version_number_o
225: => hr_fim_shd.g_old_rec.object_version_number
226: ,p_application_id_o
227: => hr_fim_shd.g_old_rec.application_id
228: ,p_form_id_o
229: => hr_fim_shd.g_old_rec.form_id
230: ,p_form_canvas_id_o
231: => hr_fim_shd.g_old_rec.form_canvas_id
225: => hr_fim_shd.g_old_rec.object_version_number
226: ,p_application_id_o
227: => hr_fim_shd.g_old_rec.application_id
228: ,p_form_id_o
229: => hr_fim_shd.g_old_rec.form_id
230: ,p_form_canvas_id_o
231: => hr_fim_shd.g_old_rec.form_canvas_id
232: ,p_full_item_name_o
233: => hr_fim_shd.g_old_rec.full_item_name
227: => hr_fim_shd.g_old_rec.application_id
228: ,p_form_id_o
229: => hr_fim_shd.g_old_rec.form_id
230: ,p_form_canvas_id_o
231: => hr_fim_shd.g_old_rec.form_canvas_id
232: ,p_full_item_name_o
233: => hr_fim_shd.g_old_rec.full_item_name
234: ,p_item_type_o
235: => hr_fim_shd.g_old_rec.item_type
229: => hr_fim_shd.g_old_rec.form_id
230: ,p_form_canvas_id_o
231: => hr_fim_shd.g_old_rec.form_canvas_id
232: ,p_full_item_name_o
233: => hr_fim_shd.g_old_rec.full_item_name
234: ,p_item_type_o
235: => hr_fim_shd.g_old_rec.item_type
236: ,p_form_tab_page_id_o
237: => hr_fim_shd.g_old_rec.form_tab_page_id
231: => hr_fim_shd.g_old_rec.form_canvas_id
232: ,p_full_item_name_o
233: => hr_fim_shd.g_old_rec.full_item_name
234: ,p_item_type_o
235: => hr_fim_shd.g_old_rec.item_type
236: ,p_form_tab_page_id_o
237: => hr_fim_shd.g_old_rec.form_tab_page_id
238: ,p_radio_button_name_o
239: => hr_fim_shd.g_old_rec.radio_button_name
233: => hr_fim_shd.g_old_rec.full_item_name
234: ,p_item_type_o
235: => hr_fim_shd.g_old_rec.item_type
236: ,p_form_tab_page_id_o
237: => hr_fim_shd.g_old_rec.form_tab_page_id
238: ,p_radio_button_name_o
239: => hr_fim_shd.g_old_rec.radio_button_name
240: ,p_required_override_o
241: => hr_fim_shd.g_old_rec.required_override
235: => hr_fim_shd.g_old_rec.item_type
236: ,p_form_tab_page_id_o
237: => hr_fim_shd.g_old_rec.form_tab_page_id
238: ,p_radio_button_name_o
239: => hr_fim_shd.g_old_rec.radio_button_name
240: ,p_required_override_o
241: => hr_fim_shd.g_old_rec.required_override
242: ,p_form_tab_page_id_override_o
243: => hr_fim_shd.g_old_rec.form_tab_page_id_override
237: => hr_fim_shd.g_old_rec.form_tab_page_id
238: ,p_radio_button_name_o
239: => hr_fim_shd.g_old_rec.radio_button_name
240: ,p_required_override_o
241: => hr_fim_shd.g_old_rec.required_override
242: ,p_form_tab_page_id_override_o
243: => hr_fim_shd.g_old_rec.form_tab_page_id_override
244: ,p_visible_override_o
245: => hr_fim_shd.g_old_rec.visible_override
239: => hr_fim_shd.g_old_rec.radio_button_name
240: ,p_required_override_o
241: => hr_fim_shd.g_old_rec.required_override
242: ,p_form_tab_page_id_override_o
243: => hr_fim_shd.g_old_rec.form_tab_page_id_override
244: ,p_visible_override_o
245: => hr_fim_shd.g_old_rec.visible_override
246: );
247: --
241: => hr_fim_shd.g_old_rec.required_override
242: ,p_form_tab_page_id_override_o
243: => hr_fim_shd.g_old_rec.form_tab_page_id_override
244: ,p_visible_override_o
245: => hr_fim_shd.g_old_rec.visible_override
246: );
247: --
248: exception
249: --
301: --
302: -- {End Of Comments}
303: -- ----------------------------------------------------------------------------
304: Procedure convert_defs
305: (p_rec in out nocopy hr_fim_shd.g_rec_type
306: ) is
307: --
308: Begin
309: --
313: -- is being used then we must set to the 'current' argument value.
314: --
315: If (p_rec.application_id = hr_api.g_number) then
316: p_rec.application_id :=
317: hr_fim_shd.g_old_rec.application_id;
318: End If;
319: If (p_rec.form_id = hr_api.g_number) then
320: p_rec.form_id :=
321: hr_fim_shd.g_old_rec.form_id;
317: hr_fim_shd.g_old_rec.application_id;
318: End If;
319: If (p_rec.form_id = hr_api.g_number) then
320: p_rec.form_id :=
321: hr_fim_shd.g_old_rec.form_id;
322: End If;
323: If (p_rec.form_canvas_id = hr_api.g_number) then
324: p_rec.form_canvas_id :=
325: hr_fim_shd.g_old_rec.form_canvas_id;
321: hr_fim_shd.g_old_rec.form_id;
322: End If;
323: If (p_rec.form_canvas_id = hr_api.g_number) then
324: p_rec.form_canvas_id :=
325: hr_fim_shd.g_old_rec.form_canvas_id;
326: End If;
327: If (p_rec.full_item_name = hr_api.g_varchar2) then
328: p_rec.full_item_name :=
329: hr_fim_shd.g_old_rec.full_item_name;
325: hr_fim_shd.g_old_rec.form_canvas_id;
326: End If;
327: If (p_rec.full_item_name = hr_api.g_varchar2) then
328: p_rec.full_item_name :=
329: hr_fim_shd.g_old_rec.full_item_name;
330: End If;
331: If (p_rec.item_type = hr_api.g_varchar2) then
332: p_rec.item_type :=
333: hr_fim_shd.g_old_rec.item_type;
329: hr_fim_shd.g_old_rec.full_item_name;
330: End If;
331: If (p_rec.item_type = hr_api.g_varchar2) then
332: p_rec.item_type :=
333: hr_fim_shd.g_old_rec.item_type;
334: End If;
335: If (p_rec.form_tab_page_id = hr_api.g_number) then
336: p_rec.form_tab_page_id :=
337: hr_fim_shd.g_old_rec.form_tab_page_id;
333: hr_fim_shd.g_old_rec.item_type;
334: End If;
335: If (p_rec.form_tab_page_id = hr_api.g_number) then
336: p_rec.form_tab_page_id :=
337: hr_fim_shd.g_old_rec.form_tab_page_id;
338: End If;
339: If (p_rec.radio_button_name = hr_api.g_varchar2) then
340: p_rec.radio_button_name :=
341: hr_fim_shd.g_old_rec.radio_button_name;
337: hr_fim_shd.g_old_rec.form_tab_page_id;
338: End If;
339: If (p_rec.radio_button_name = hr_api.g_varchar2) then
340: p_rec.radio_button_name :=
341: hr_fim_shd.g_old_rec.radio_button_name;
342: End If;
343: If (p_rec.required_override = hr_api.g_number) then
344: p_rec.required_override :=
345: hr_fim_shd.g_old_rec.required_override;
341: hr_fim_shd.g_old_rec.radio_button_name;
342: End If;
343: If (p_rec.required_override = hr_api.g_number) then
344: p_rec.required_override :=
345: hr_fim_shd.g_old_rec.required_override;
346: End If;
347: If (p_rec.form_tab_page_id_override = hr_api.g_number) then
348: p_rec.form_tab_page_id_override :=
349: hr_fim_shd.g_old_rec.form_tab_page_id_override;
345: hr_fim_shd.g_old_rec.required_override;
346: End If;
347: If (p_rec.form_tab_page_id_override = hr_api.g_number) then
348: p_rec.form_tab_page_id_override :=
349: hr_fim_shd.g_old_rec.form_tab_page_id_override;
350: End If;
351: If (p_rec.visible_override = hr_api.g_number) then
352: p_rec.visible_override :=
353: hr_fim_shd.g_old_rec.visible_override;
349: hr_fim_shd.g_old_rec.form_tab_page_id_override;
350: End If;
351: If (p_rec.visible_override = hr_api.g_number) then
352: p_rec.visible_override :=
353: hr_fim_shd.g_old_rec.visible_override;
354: End If;
355: --
356: End convert_defs;
357: --
359: -- |---------------------------------< upd >----------------------------------|
360: -- ----------------------------------------------------------------------------
361: Procedure upd
362: (p_effective_date in date
363: ,p_rec in out nocopy hr_fim_shd.g_rec_type
364: ) is
365: --
366: l_proc varchar2(72) := g_package||'upd';
367: --
369: hr_utility.set_location('Entering:'||l_proc, 5);
370: --
371: -- We must lock the row which we need to update.
372: --
373: hr_fim_shd.lck
374: (p_rec.form_item_id
375: ,p_rec.object_version_number
376: );
377: --
421: ,p_form_tab_page_id_override in number default hr_api.g_number
422: ,p_visible_override in number default hr_api.g_number
423: ) is
424: --
425: l_rec hr_fim_shd.g_rec_type;
426: l_proc varchar2(72) := g_package||'upd';
427: --
428: Begin
429: hr_utility.set_location('Entering:'||l_proc, 5);
431: -- Call conversion function to turn arguments into the
432: -- l_rec structure.
433: --
434: l_rec :=
435: hr_fim_shd.convert_args
436: (p_form_item_id
437: ,p_object_version_number
438: ,p_application_id
439: ,p_form_id