[Home] [Help]
54: --
55: -- {End Of Comments}
56: -- ----------------------------------------------------------------------------
57: Procedure dt_update_dml
58: (p_rec in out nocopy ame_atr_shd.g_rec_type
59: ,p_effective_date in date
60: ,p_datetrack_mode in varchar2
61: ,p_validation_start_date in date
62: ,p_validation_end_date in date
73: -- Because we are updating a row we must get the next object
74: -- version number.
75: --
76: p_rec.object_version_number :=
77: ame_atr_shd.get_object_version_number
78: (p_attribute_id => p_rec.attribute_id
79: );
80: --
81: --
110: Exception
111: When hr_api.check_integrity_violated Then
112: -- A check constraint has been violated
113: --
114: ame_atr_shd.constraint_error
115: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
116: When hr_api.unique_integrity_violated Then
117: -- Unique integrity has been violated
118: --
115: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
116: When hr_api.unique_integrity_violated Then
117: -- Unique integrity has been violated
118: --
119: ame_atr_shd.constraint_error
120: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
121: When Others Then
122: --
123: Raise;
154: --
155: -- {End Of Comments}
156: -- ----------------------------------------------------------------------------
157: Procedure update_dml
158: (p_rec in out nocopy ame_atr_shd.g_rec_type
159: ,p_effective_date in date
160: ,p_datetrack_mode in varchar2
161: ,p_validation_start_date in date
162: ,p_validation_end_date in date
221: --
222: -- {End Of Comments}
223: -- ----------------------------------------------------------------------------
224: Procedure dt_pre_update
225: (p_rec in out nocopy ame_atr_shd.g_rec_type
226: ,p_effective_date in date
227: ,p_datetrack_mode in varchar2
228: ,p_validation_start_date in date
229: ,p_validation_end_date in date
237: If (p_datetrack_mode <> hr_api.g_correction) then
238: --
239: -- Update the current effective end date
240: --
241: ame_atr_shd.upd_end_date
242: (p_effective_date => p_effective_date
243: ,p_attribute_id => p_rec.attribute_id
244: ,p_new_end_date => p_validation_start_date
245: ,p_object_version_number => l_dummy_version_number
304: --
305: -- {End Of Comments}
306: -- ----------------------------------------------------------------------------
307: Procedure pre_update
308: (p_rec in out nocopy ame_atr_shd.g_rec_type
309: ,p_effective_date in date
310: ,p_datetrack_mode in varchar2
311: ,p_validation_start_date in date
312: ,p_validation_end_date in date
362: --
363: -- {End Of Comments}
364: -- ----------------------------------------------------------------------------
365: Procedure post_update
366: (p_rec in ame_atr_shd.g_rec_type
367: ,p_effective_date in date
368: ,p_datetrack_mode in varchar2
369: ,p_validation_start_date in date
370: ,p_validation_end_date in date
407: => p_rec.item_class_id
408: ,p_object_version_number
409: => p_rec.object_version_number
410: ,p_name_o
411: => ame_atr_shd.g_old_rec.name
412: ,p_attribute_type_o
413: => ame_atr_shd.g_old_rec.attribute_type
414: ,p_line_item_o
415: => ame_atr_shd.g_old_rec.line_item
409: => p_rec.object_version_number
410: ,p_name_o
411: => ame_atr_shd.g_old_rec.name
412: ,p_attribute_type_o
413: => ame_atr_shd.g_old_rec.attribute_type
414: ,p_line_item_o
415: => ame_atr_shd.g_old_rec.line_item
416: ,p_start_date_o
417: => ame_atr_shd.g_old_rec.start_date
411: => ame_atr_shd.g_old_rec.name
412: ,p_attribute_type_o
413: => ame_atr_shd.g_old_rec.attribute_type
414: ,p_line_item_o
415: => ame_atr_shd.g_old_rec.line_item
416: ,p_start_date_o
417: => ame_atr_shd.g_old_rec.start_date
418: ,p_end_date_o
419: => ame_atr_shd.g_old_rec.end_date
413: => ame_atr_shd.g_old_rec.attribute_type
414: ,p_line_item_o
415: => ame_atr_shd.g_old_rec.line_item
416: ,p_start_date_o
417: => ame_atr_shd.g_old_rec.start_date
418: ,p_end_date_o
419: => ame_atr_shd.g_old_rec.end_date
420: ,p_description_o
421: => ame_atr_shd.g_old_rec.description
415: => ame_atr_shd.g_old_rec.line_item
416: ,p_start_date_o
417: => ame_atr_shd.g_old_rec.start_date
418: ,p_end_date_o
419: => ame_atr_shd.g_old_rec.end_date
420: ,p_description_o
421: => ame_atr_shd.g_old_rec.description
422: ,p_security_group_id_o
423: => ame_atr_shd.g_old_rec.security_group_id
417: => ame_atr_shd.g_old_rec.start_date
418: ,p_end_date_o
419: => ame_atr_shd.g_old_rec.end_date
420: ,p_description_o
421: => ame_atr_shd.g_old_rec.description
422: ,p_security_group_id_o
423: => ame_atr_shd.g_old_rec.security_group_id
424: ,p_approver_type_id_o
425: => ame_atr_shd.g_old_rec.approver_type_id
419: => ame_atr_shd.g_old_rec.end_date
420: ,p_description_o
421: => ame_atr_shd.g_old_rec.description
422: ,p_security_group_id_o
423: => ame_atr_shd.g_old_rec.security_group_id
424: ,p_approver_type_id_o
425: => ame_atr_shd.g_old_rec.approver_type_id
426: ,p_item_class_id_o
427: => ame_atr_shd.g_old_rec.item_class_id
421: => ame_atr_shd.g_old_rec.description
422: ,p_security_group_id_o
423: => ame_atr_shd.g_old_rec.security_group_id
424: ,p_approver_type_id_o
425: => ame_atr_shd.g_old_rec.approver_type_id
426: ,p_item_class_id_o
427: => ame_atr_shd.g_old_rec.item_class_id
428: ,p_object_version_number_o
429: => ame_atr_shd.g_old_rec.object_version_number
423: => ame_atr_shd.g_old_rec.security_group_id
424: ,p_approver_type_id_o
425: => ame_atr_shd.g_old_rec.approver_type_id
426: ,p_item_class_id_o
427: => ame_atr_shd.g_old_rec.item_class_id
428: ,p_object_version_number_o
429: => ame_atr_shd.g_old_rec.object_version_number
430: );
431: --
425: => ame_atr_shd.g_old_rec.approver_type_id
426: ,p_item_class_id_o
427: => ame_atr_shd.g_old_rec.item_class_id
428: ,p_object_version_number_o
429: => ame_atr_shd.g_old_rec.object_version_number
430: );
431: --
432: exception
433: --
485: --
486: -- {End Of Comments}
487: -- ----------------------------------------------------------------------------
488: Procedure convert_defs
489: (p_rec in out nocopy ame_atr_shd.g_rec_type
490: ) is
491: --
492: Begin
493: --
497: -- is being used then we must set to the 'current' argument value.
498: --
499: If (p_rec.name = hr_api.g_varchar2) then
500: p_rec.name :=
501: ame_atr_shd.g_old_rec.name;
502: End If;
503: If (p_rec.attribute_type = hr_api.g_varchar2) then
504: p_rec.attribute_type :=
505: ame_atr_shd.g_old_rec.attribute_type;
501: ame_atr_shd.g_old_rec.name;
502: End If;
503: If (p_rec.attribute_type = hr_api.g_varchar2) then
504: p_rec.attribute_type :=
505: ame_atr_shd.g_old_rec.attribute_type;
506: End If;
507: If (p_rec.line_item = hr_api.g_varchar2) then
508: p_rec.line_item :=
509: ame_atr_shd.g_old_rec.line_item;
505: ame_atr_shd.g_old_rec.attribute_type;
506: End If;
507: If (p_rec.line_item = hr_api.g_varchar2) then
508: p_rec.line_item :=
509: ame_atr_shd.g_old_rec.line_item;
510: End If;
511: If (p_rec.description = hr_api.g_varchar2) then
512: p_rec.description :=
513: ame_atr_shd.g_old_rec.description;
509: ame_atr_shd.g_old_rec.line_item;
510: End If;
511: If (p_rec.description = hr_api.g_varchar2) then
512: p_rec.description :=
513: ame_atr_shd.g_old_rec.description;
514: End If;
515: If (p_rec.security_group_id = hr_api.g_number) then
516: p_rec.security_group_id :=
517: ame_atr_shd.g_old_rec.security_group_id;
513: ame_atr_shd.g_old_rec.description;
514: End If;
515: If (p_rec.security_group_id = hr_api.g_number) then
516: p_rec.security_group_id :=
517: ame_atr_shd.g_old_rec.security_group_id;
518: End If;
519: If (p_rec.approver_type_id = hr_api.g_number) then
520: p_rec.approver_type_id :=
521: ame_atr_shd.g_old_rec.approver_type_id;
517: ame_atr_shd.g_old_rec.security_group_id;
518: End If;
519: If (p_rec.approver_type_id = hr_api.g_number) then
520: p_rec.approver_type_id :=
521: ame_atr_shd.g_old_rec.approver_type_id;
522: End If;
523: If (p_rec.item_class_id = hr_api.g_number) then
524: p_rec.item_class_id :=
525: ame_atr_shd.g_old_rec.item_class_id;
521: ame_atr_shd.g_old_rec.approver_type_id;
522: End If;
523: If (p_rec.item_class_id = hr_api.g_number) then
524: p_rec.item_class_id :=
525: ame_atr_shd.g_old_rec.item_class_id;
526: End If;
527: --
528: End convert_defs;
529: --
532: -- ----------------------------------------------------------------------------
533: Procedure upd
534: (p_effective_date in date
535: ,p_datetrack_mode in varchar2
536: ,p_rec in out nocopy ame_atr_shd.g_rec_type
537: ) is
538: --
539: l_proc varchar2(72) := g_package||'upd';
540: l_validation_start_date date;
548: dt_api.validate_dt_upd_mode(p_datetrack_mode => p_datetrack_mode);
549: --
550: -- We must lock the row which we need to update.
551: --
552: ame_atr_shd.lck
553: (p_effective_date => p_effective_date
554: ,p_datetrack_mode => p_datetrack_mode
555: ,p_attribute_id => p_rec.attribute_id
556: ,p_object_version_number => p_rec.object_version_number
629: ,p_start_date out nocopy date
630: ,p_end_date out nocopy date
631: ) is
632: --
633: l_rec ame_atr_shd.g_rec_type;
634: l_proc varchar2(72) := g_package||'upd';
635: --
636: Begin
637: hr_utility.set_location('Entering:'||l_proc, 5);
639: -- Call conversion function to turn arguments into the
640: -- l_rec structure.
641: --
642: l_rec :=
643: ame_atr_shd.convert_args
644: (p_attribute_id
645: ,p_name
646: ,p_attribute_type
647: ,p_line_item