[Home] [Help]
54: --
55: -- {End Of Comments}
56: -- ----------------------------------------------------------------------------
57: Procedure dt_update_dml
58: (p_rec in out nocopy ame_aty_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_aty_shd.get_object_version_number
78: (p_action_type_id => p_rec.action_type_id
79: );
80: --
81: --
109: Exception
110: When hr_api.check_integrity_violated Then
111: -- A check constraint has been violated
112: --
113: ame_aty_shd.constraint_error
114: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
115: When hr_api.unique_integrity_violated Then
116: -- Unique integrity has been violated
117: --
114: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
115: When hr_api.unique_integrity_violated Then
116: -- Unique integrity has been violated
117: --
118: ame_aty_shd.constraint_error
119: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
120: When Others Then
121: --
122: Raise;
153: --
154: -- {End Of Comments}
155: -- ----------------------------------------------------------------------------
156: Procedure update_dml
157: (p_rec in out nocopy ame_aty_shd.g_rec_type
158: ,p_effective_date in date
159: ,p_datetrack_mode in varchar2
160: ,p_validation_start_date in date
161: ,p_validation_end_date in date
220: --
221: -- {End Of Comments}
222: -- ----------------------------------------------------------------------------
223: Procedure dt_pre_update
224: (p_rec in out nocopy ame_aty_shd.g_rec_type
225: ,p_effective_date in date
226: ,p_datetrack_mode in varchar2
227: ,p_validation_start_date in date
228: ,p_validation_end_date in date
236: If (p_datetrack_mode <> hr_api.g_correction) then
237: --
238: -- Update the current effective end date
239: --
240: ame_aty_shd.upd_end_date
241: (p_effective_date => p_effective_date
242: ,p_action_type_id => p_rec.action_type_id
243: ,p_new_end_date => p_validation_start_date
244: ,p_validation_start_date => p_validation_start_date
305: --
306: -- {End Of Comments}
307: -- ----------------------------------------------------------------------------
308: Procedure pre_update
309: (p_rec in out nocopy ame_aty_shd.g_rec_type
310: ,p_effective_date in date
311: ,p_datetrack_mode in varchar2
312: ,p_validation_start_date in date
313: ,p_validation_end_date in date
363: --
364: -- {End Of Comments}
365: -- ----------------------------------------------------------------------------
366: Procedure post_update
367: (p_rec in ame_aty_shd.g_rec_type
368: ,p_effective_date in date
369: ,p_datetrack_mode in varchar2
370: ,p_validation_start_date in date
371: ,p_validation_end_date in date
406: => p_rec.description_query
407: ,p_object_version_number
408: => p_rec.object_version_number
409: ,p_name_o
410: => ame_aty_shd.g_old_rec.name
411: ,p_procedure_name_o
412: => ame_aty_shd.g_old_rec.procedure_name
413: ,p_start_date_o
414: => ame_aty_shd.g_old_rec.start_date
408: => p_rec.object_version_number
409: ,p_name_o
410: => ame_aty_shd.g_old_rec.name
411: ,p_procedure_name_o
412: => ame_aty_shd.g_old_rec.procedure_name
413: ,p_start_date_o
414: => ame_aty_shd.g_old_rec.start_date
415: ,p_end_date_o
416: => ame_aty_shd.g_old_rec.end_date
410: => ame_aty_shd.g_old_rec.name
411: ,p_procedure_name_o
412: => ame_aty_shd.g_old_rec.procedure_name
413: ,p_start_date_o
414: => ame_aty_shd.g_old_rec.start_date
415: ,p_end_date_o
416: => ame_aty_shd.g_old_rec.end_date
417: ,p_description_o
418: => ame_aty_shd.g_old_rec.description
412: => ame_aty_shd.g_old_rec.procedure_name
413: ,p_start_date_o
414: => ame_aty_shd.g_old_rec.start_date
415: ,p_end_date_o
416: => ame_aty_shd.g_old_rec.end_date
417: ,p_description_o
418: => ame_aty_shd.g_old_rec.description
419: ,p_security_group_id_o
420: => ame_aty_shd.g_old_rec.security_group_id
414: => ame_aty_shd.g_old_rec.start_date
415: ,p_end_date_o
416: => ame_aty_shd.g_old_rec.end_date
417: ,p_description_o
418: => ame_aty_shd.g_old_rec.description
419: ,p_security_group_id_o
420: => ame_aty_shd.g_old_rec.security_group_id
421: ,p_dynamic_description_o
422: => ame_aty_shd.g_old_rec.dynamic_description
416: => ame_aty_shd.g_old_rec.end_date
417: ,p_description_o
418: => ame_aty_shd.g_old_rec.description
419: ,p_security_group_id_o
420: => ame_aty_shd.g_old_rec.security_group_id
421: ,p_dynamic_description_o
422: => ame_aty_shd.g_old_rec.dynamic_description
423: ,p_description_query_o
424: => ame_aty_shd.g_old_rec.description_query
418: => ame_aty_shd.g_old_rec.description
419: ,p_security_group_id_o
420: => ame_aty_shd.g_old_rec.security_group_id
421: ,p_dynamic_description_o
422: => ame_aty_shd.g_old_rec.dynamic_description
423: ,p_description_query_o
424: => ame_aty_shd.g_old_rec.description_query
425: ,p_object_version_number_o
426: => ame_aty_shd.g_old_rec.object_version_number
420: => ame_aty_shd.g_old_rec.security_group_id
421: ,p_dynamic_description_o
422: => ame_aty_shd.g_old_rec.dynamic_description
423: ,p_description_query_o
424: => ame_aty_shd.g_old_rec.description_query
425: ,p_object_version_number_o
426: => ame_aty_shd.g_old_rec.object_version_number
427: );
428: --
422: => ame_aty_shd.g_old_rec.dynamic_description
423: ,p_description_query_o
424: => ame_aty_shd.g_old_rec.description_query
425: ,p_object_version_number_o
426: => ame_aty_shd.g_old_rec.object_version_number
427: );
428: --
429: exception
430: --
482: --
483: -- {End Of Comments}
484: -- ----------------------------------------------------------------------------
485: Procedure convert_defs
486: (p_rec in out nocopy ame_aty_shd.g_rec_type
487: ) is
488: --
489: Begin
490: --
494: -- is being used then we must set to the 'current' argument value.
495: --
496: If (p_rec.name = hr_api.g_varchar2) then
497: p_rec.name :=
498: ame_aty_shd.g_old_rec.name;
499: End If;
500: If (p_rec.procedure_name = hr_api.g_varchar2) then
501: p_rec.procedure_name :=
502: ame_aty_shd.g_old_rec.procedure_name;
498: ame_aty_shd.g_old_rec.name;
499: End If;
500: If (p_rec.procedure_name = hr_api.g_varchar2) then
501: p_rec.procedure_name :=
502: ame_aty_shd.g_old_rec.procedure_name;
503: End If;
504: If (p_rec.description = hr_api.g_varchar2) then
505: p_rec.description :=
506: ame_aty_shd.g_old_rec.description;
502: ame_aty_shd.g_old_rec.procedure_name;
503: End If;
504: If (p_rec.description = hr_api.g_varchar2) then
505: p_rec.description :=
506: ame_aty_shd.g_old_rec.description;
507: End If;
508: If (p_rec.security_group_id = hr_api.g_number) then
509: p_rec.security_group_id :=
510: ame_aty_shd.g_old_rec.security_group_id;
506: ame_aty_shd.g_old_rec.description;
507: End If;
508: If (p_rec.security_group_id = hr_api.g_number) then
509: p_rec.security_group_id :=
510: ame_aty_shd.g_old_rec.security_group_id;
511: End If;
512: If (p_rec.dynamic_description = hr_api.g_varchar2) then
513: p_rec.dynamic_description :=
514: ame_aty_shd.g_old_rec.dynamic_description;
510: ame_aty_shd.g_old_rec.security_group_id;
511: End If;
512: If (p_rec.dynamic_description = hr_api.g_varchar2) then
513: p_rec.dynamic_description :=
514: ame_aty_shd.g_old_rec.dynamic_description;
515: End If;
516: If (p_rec.description_query = hr_api.g_varchar2) then
517: p_rec.description_query :=
518: ame_aty_shd.g_old_rec.description_query;
514: ame_aty_shd.g_old_rec.dynamic_description;
515: End If;
516: If (p_rec.description_query = hr_api.g_varchar2) then
517: p_rec.description_query :=
518: ame_aty_shd.g_old_rec.description_query;
519: End If;
520: --
521: End convert_defs;
522: --
525: -- ----------------------------------------------------------------------------
526: Procedure upd
527: (p_effective_date in date
528: ,p_datetrack_mode in varchar2
529: ,p_rec in out nocopy ame_aty_shd.g_rec_type
530: ) is
531: --
532: l_proc varchar2(72) := g_package||'upd';
533: l_validation_start_date date;
541: dt_api.validate_dt_upd_mode(p_datetrack_mode => p_datetrack_mode);
542: --
543: -- We must lock the row which we need to update.
544: --
545: ame_aty_shd.lck
546: (p_effective_date => p_effective_date
547: ,p_datetrack_mode => p_datetrack_mode
548: ,p_action_type_id => p_rec.action_type_id
549: ,p_object_version_number => p_rec.object_version_number
621: ,p_start_date out nocopy date
622: ,p_end_date out nocopy date
623: ) is
624: --
625: l_rec ame_aty_shd.g_rec_type;
626: l_proc varchar2(72) := g_package||'upd';
627: --
628: Begin
629: hr_utility.set_location('Entering:'||l_proc, 5);
631: -- Call conversion function to turn arguments into the
632: -- l_rec structure.
633: --
634: l_rec :=
635: ame_aty_shd.convert_args
636: (p_action_type_id
637: ,p_name
638: ,p_procedure_name
639: ,p_start_date