[Home] [Help]
50: --
51: -- {End Of Comments}
52: -- ----------------------------------------------------------------------------
53: Procedure dt_delete_dml
54: (p_rec in out nocopy pay_ivl_shd.g_rec_type
55: ,p_effective_date in date
56: ,p_datetrack_mode in varchar2
57: ,p_validation_start_date in date
58: ,p_validation_end_date in date
62: --
63: Begin
64: hr_utility.set_location('Entering:'||l_proc, 5);
65: If (p_datetrack_mode = hr_api.g_delete_next_change) then
66: pay_ivl_shd.g_api_dml := true; -- Set the api dml status
67: --
68: -- Delete the where the effective start date is equal
69: -- to the validation end date.
70: --
71: delete from pay_input_values_f
72: where input_value_id = p_rec.input_value_id
73: and effective_start_date = p_validation_start_date;
74: --
75: pay_ivl_shd.g_api_dml := false; -- Unset the api dml status
76: Else
77: pay_ivl_shd.g_api_dml := true; -- Set the api dml status
78: --
79: -- Delete the row(s) where the effective start date is greater than
73: and effective_start_date = p_validation_start_date;
74: --
75: pay_ivl_shd.g_api_dml := false; -- Unset the api dml status
76: Else
77: pay_ivl_shd.g_api_dml := true; -- Set the api dml status
78: --
79: -- Delete the row(s) where the effective start date is greater than
80: -- or equal to the validation start date.
81: --
82: delete from pay_input_values_f
83: where input_value_id = p_rec.input_value_id
84: and effective_start_date >= p_validation_start_date;
85: --
86: pay_ivl_shd.g_api_dml := false; -- Unset the api dml status
87: End If;
88: --
89: hr_utility.set_location(' Leaving:'||l_proc, 20);
90: --
89: hr_utility.set_location(' Leaving:'||l_proc, 20);
90: --
91: Exception
92: When Others Then
93: pay_ivl_shd.g_api_dml := false; -- Unset the api dml status
94: Raise;
95: --
96: End dt_delete_dml;
97: --
135: -- ----------------------------------------------------------------------------
136: -- |------------------------------< delete_dml >------------------------------|
137: -- ----------------------------------------------------------------------------
138: Procedure delete_dml
139: (p_rec in out nocopy pay_ivl_shd.g_rec_type
140: ,p_effective_date in date
141: ,p_datetrack_mode in varchar2
142: ,p_validation_start_date in date
143: ,p_validation_end_date in date
192: --
193: -- {End Of Comments}
194: -- ----------------------------------------------------------------------------
195: Procedure dt_pre_delete
196: (p_rec in out nocopy pay_ivl_shd.g_rec_type
197: ,p_effective_date in date
198: ,p_datetrack_mode in varchar2
199: ,p_validation_start_date in date
200: ,p_validation_end_date in date
207: --
208: If (p_datetrack_mode <> hr_api.g_zap) then
209: --
210: p_rec.effective_start_date
211: := pay_ivl_shd.g_old_rec.effective_start_date;
212: --
213: If (p_datetrack_mode = hr_api.g_delete) then
214: p_rec.effective_end_date := p_validation_start_date - 1;
215: Else
217: End If;
218: --
219: -- Update the current effective end date record
220: --
221: pay_ivl_shd.upd_effective_end_date
222: (p_effective_date => p_effective_date
223: ,p_base_key_value => p_rec.input_value_id
224: ,p_new_effective_end_date => p_rec.effective_end_date
225: ,p_validation_start_date => p_validation_start_date
266: --
267: -- {End Of Comments}
268: -- ----------------------------------------------------------------------------
269: Procedure pre_delete
270: (p_rec in out nocopy pay_ivl_shd.g_rec_type
271: ,p_effective_date in date
272: ,p_datetrack_mode in varchar2
273: ,p_validation_start_date in date
274: ,p_validation_end_date in date
326: --
327: -- {End Of Comments}
328: -- ----------------------------------------------------------------------------
329: Procedure post_delete
330: (p_rec in pay_ivl_shd.g_rec_type
331: ,p_effective_date in date
332: ,p_datetrack_mode in varchar2
333: ,p_validation_start_date in date
334: ,p_validation_end_date in date
362: => p_rec.effective_start_date
363: ,p_effective_end_date
364: => p_rec.effective_end_date
365: ,p_effective_start_date_o
366: => pay_ivl_shd.g_old_rec.effective_start_date
367: ,p_effective_end_date_o
368: => pay_ivl_shd.g_old_rec.effective_end_date
369: ,p_element_type_id_o
370: => pay_ivl_shd.g_old_rec.element_type_id
364: => p_rec.effective_end_date
365: ,p_effective_start_date_o
366: => pay_ivl_shd.g_old_rec.effective_start_date
367: ,p_effective_end_date_o
368: => pay_ivl_shd.g_old_rec.effective_end_date
369: ,p_element_type_id_o
370: => pay_ivl_shd.g_old_rec.element_type_id
371: ,p_lookup_type_o
372: => pay_ivl_shd.g_old_rec.lookup_type
366: => pay_ivl_shd.g_old_rec.effective_start_date
367: ,p_effective_end_date_o
368: => pay_ivl_shd.g_old_rec.effective_end_date
369: ,p_element_type_id_o
370: => pay_ivl_shd.g_old_rec.element_type_id
371: ,p_lookup_type_o
372: => pay_ivl_shd.g_old_rec.lookup_type
373: ,p_business_group_id_o
374: => pay_ivl_shd.g_old_rec.business_group_id
368: => pay_ivl_shd.g_old_rec.effective_end_date
369: ,p_element_type_id_o
370: => pay_ivl_shd.g_old_rec.element_type_id
371: ,p_lookup_type_o
372: => pay_ivl_shd.g_old_rec.lookup_type
373: ,p_business_group_id_o
374: => pay_ivl_shd.g_old_rec.business_group_id
375: ,p_legislation_code_o
376: => pay_ivl_shd.g_old_rec.legislation_code
370: => pay_ivl_shd.g_old_rec.element_type_id
371: ,p_lookup_type_o
372: => pay_ivl_shd.g_old_rec.lookup_type
373: ,p_business_group_id_o
374: => pay_ivl_shd.g_old_rec.business_group_id
375: ,p_legislation_code_o
376: => pay_ivl_shd.g_old_rec.legislation_code
377: ,p_formula_id_o
378: => pay_ivl_shd.g_old_rec.formula_id
372: => pay_ivl_shd.g_old_rec.lookup_type
373: ,p_business_group_id_o
374: => pay_ivl_shd.g_old_rec.business_group_id
375: ,p_legislation_code_o
376: => pay_ivl_shd.g_old_rec.legislation_code
377: ,p_formula_id_o
378: => pay_ivl_shd.g_old_rec.formula_id
379: ,p_value_set_id_o
380: => pay_ivl_shd.g_old_rec.value_set_id
374: => pay_ivl_shd.g_old_rec.business_group_id
375: ,p_legislation_code_o
376: => pay_ivl_shd.g_old_rec.legislation_code
377: ,p_formula_id_o
378: => pay_ivl_shd.g_old_rec.formula_id
379: ,p_value_set_id_o
380: => pay_ivl_shd.g_old_rec.value_set_id
381: ,p_display_sequence_o
382: => pay_ivl_shd.g_old_rec.display_sequence
376: => pay_ivl_shd.g_old_rec.legislation_code
377: ,p_formula_id_o
378: => pay_ivl_shd.g_old_rec.formula_id
379: ,p_value_set_id_o
380: => pay_ivl_shd.g_old_rec.value_set_id
381: ,p_display_sequence_o
382: => pay_ivl_shd.g_old_rec.display_sequence
383: ,p_generate_db_items_flag_o
384: => pay_ivl_shd.g_old_rec.generate_db_items_flag
378: => pay_ivl_shd.g_old_rec.formula_id
379: ,p_value_set_id_o
380: => pay_ivl_shd.g_old_rec.value_set_id
381: ,p_display_sequence_o
382: => pay_ivl_shd.g_old_rec.display_sequence
383: ,p_generate_db_items_flag_o
384: => pay_ivl_shd.g_old_rec.generate_db_items_flag
385: ,p_hot_default_flag_o
386: => pay_ivl_shd.g_old_rec.hot_default_flag
380: => pay_ivl_shd.g_old_rec.value_set_id
381: ,p_display_sequence_o
382: => pay_ivl_shd.g_old_rec.display_sequence
383: ,p_generate_db_items_flag_o
384: => pay_ivl_shd.g_old_rec.generate_db_items_flag
385: ,p_hot_default_flag_o
386: => pay_ivl_shd.g_old_rec.hot_default_flag
387: ,p_mandatory_flag_o
388: => pay_ivl_shd.g_old_rec.mandatory_flag
382: => pay_ivl_shd.g_old_rec.display_sequence
383: ,p_generate_db_items_flag_o
384: => pay_ivl_shd.g_old_rec.generate_db_items_flag
385: ,p_hot_default_flag_o
386: => pay_ivl_shd.g_old_rec.hot_default_flag
387: ,p_mandatory_flag_o
388: => pay_ivl_shd.g_old_rec.mandatory_flag
389: ,p_name_o
390: => pay_ivl_shd.g_old_rec.name
384: => pay_ivl_shd.g_old_rec.generate_db_items_flag
385: ,p_hot_default_flag_o
386: => pay_ivl_shd.g_old_rec.hot_default_flag
387: ,p_mandatory_flag_o
388: => pay_ivl_shd.g_old_rec.mandatory_flag
389: ,p_name_o
390: => pay_ivl_shd.g_old_rec.name
391: ,p_uom_o
392: => pay_ivl_shd.g_old_rec.uom
386: => pay_ivl_shd.g_old_rec.hot_default_flag
387: ,p_mandatory_flag_o
388: => pay_ivl_shd.g_old_rec.mandatory_flag
389: ,p_name_o
390: => pay_ivl_shd.g_old_rec.name
391: ,p_uom_o
392: => pay_ivl_shd.g_old_rec.uom
393: ,p_default_value_o
394: => pay_ivl_shd.g_old_rec.default_value
388: => pay_ivl_shd.g_old_rec.mandatory_flag
389: ,p_name_o
390: => pay_ivl_shd.g_old_rec.name
391: ,p_uom_o
392: => pay_ivl_shd.g_old_rec.uom
393: ,p_default_value_o
394: => pay_ivl_shd.g_old_rec.default_value
395: ,p_legislation_subgroup_o
396: => pay_ivl_shd.g_old_rec.legislation_subgroup
390: => pay_ivl_shd.g_old_rec.name
391: ,p_uom_o
392: => pay_ivl_shd.g_old_rec.uom
393: ,p_default_value_o
394: => pay_ivl_shd.g_old_rec.default_value
395: ,p_legislation_subgroup_o
396: => pay_ivl_shd.g_old_rec.legislation_subgroup
397: ,p_max_value_o
398: => pay_ivl_shd.g_old_rec.max_value
392: => pay_ivl_shd.g_old_rec.uom
393: ,p_default_value_o
394: => pay_ivl_shd.g_old_rec.default_value
395: ,p_legislation_subgroup_o
396: => pay_ivl_shd.g_old_rec.legislation_subgroup
397: ,p_max_value_o
398: => pay_ivl_shd.g_old_rec.max_value
399: ,p_min_value_o
400: => pay_ivl_shd.g_old_rec.min_value
394: => pay_ivl_shd.g_old_rec.default_value
395: ,p_legislation_subgroup_o
396: => pay_ivl_shd.g_old_rec.legislation_subgroup
397: ,p_max_value_o
398: => pay_ivl_shd.g_old_rec.max_value
399: ,p_min_value_o
400: => pay_ivl_shd.g_old_rec.min_value
401: ,p_warning_or_error_o
402: => pay_ivl_shd.g_old_rec.warning_or_error
396: => pay_ivl_shd.g_old_rec.legislation_subgroup
397: ,p_max_value_o
398: => pay_ivl_shd.g_old_rec.max_value
399: ,p_min_value_o
400: => pay_ivl_shd.g_old_rec.min_value
401: ,p_warning_or_error_o
402: => pay_ivl_shd.g_old_rec.warning_or_error
403: ,p_object_version_number_o
404: => pay_ivl_shd.g_old_rec.object_version_number
398: => pay_ivl_shd.g_old_rec.max_value
399: ,p_min_value_o
400: => pay_ivl_shd.g_old_rec.min_value
401: ,p_warning_or_error_o
402: => pay_ivl_shd.g_old_rec.warning_or_error
403: ,p_object_version_number_o
404: => pay_ivl_shd.g_old_rec.object_version_number
405: );
406: --
400: => pay_ivl_shd.g_old_rec.min_value
401: ,p_warning_or_error_o
402: => pay_ivl_shd.g_old_rec.warning_or_error
403: ,p_object_version_number_o
404: => pay_ivl_shd.g_old_rec.object_version_number
405: );
406: --
407: exception
408: --
422: -- ----------------------------------------------------------------------------
423: Procedure del
424: (p_effective_date in date
425: ,p_datetrack_mode in varchar2
426: ,p_rec in out nocopy pay_ivl_shd.g_rec_type
427: ,p_balance_feeds_warning out nocopy boolean
428: ) is
429: --
430: l_proc varchar2(72) := g_package||'del';
446: ,p_base_key_column => 'input_value_id'
447: ,p_base_key_value => p_rec.input_value_id
448: ,p_parent_table_name1 => 'pay_element_types_f'
449: ,p_parent_key_column1 => 'element_type_id'
450: ,p_parent_key_value1 => pay_ivl_shd.g_old_rec.element_type_id
451: ,p_enforce_foreign_locking => false
452: ,p_validation_start_date => l_validation_start_date
453: ,p_validation_end_date => l_validation_end_date
454: );
486:
487: --
488: -- We must lock the row which we need to delete.
489: --
490: pay_ivl_shd.lck
491: (p_effective_date => p_effective_date
492: ,p_datetrack_mode => p_datetrack_mode
493: ,p_input_value_id => p_rec.input_value_id
494: ,p_object_version_number => p_rec.object_version_number
560: ,p_effective_end_date out nocopy date
561: ,p_balance_feeds_warning out nocopy boolean
562: ) is
563: --
564: l_rec pay_ivl_shd.g_rec_type;
565: l_proc varchar2(72) := g_package||'del';
566: --
567: Begin
568: hr_utility.set_location('Entering:'||l_proc, 5);