The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure update_dml
(p_rec in out nocopy per_ctk_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'update_dml';
update per_tasks_in_checklist
set
task_in_checklist_id = p_rec.task_in_checklist_id
,checklist_id = p_rec.checklist_id
,checklist_task_name = p_rec.checklist_task_name
,eligibility_object_id = p_rec.eligibility_object_id
,eligibility_profile_id = p_rec.eligibility_profile_id
,ame_attribute_identifier = p_rec.ame_attribute_identifier
,description = p_rec.description
,mandatory_flag = p_rec.mandatory_flag
,target_duration = p_rec.target_duration
,target_duration_uom = p_rec.target_duration_uom
,task_sequence = p_rec.task_sequence
,object_version_number = p_rec.object_version_number
,action_url = p_rec.action_url
,attribute_category = p_rec.attribute_category
,attribute1 = p_rec.attribute1
,attribute2 = p_rec.attribute2
,attribute3 = p_rec.attribute3
,attribute4 = p_rec.attribute4
,attribute5 = p_rec.attribute5
,attribute6 = p_rec.attribute6
,attribute7 = p_rec.attribute7
,attribute8 = p_rec.attribute8
,attribute9 = p_rec.attribute9
,attribute10 = p_rec.attribute10
,attribute11 = p_rec.attribute11
,attribute12 = p_rec.attribute12
,attribute13 = p_rec.attribute13
,attribute14 = p_rec.attribute14
,attribute15 = p_rec.attribute15
,attribute16 = p_rec.attribute16
,attribute17 = p_rec.attribute17
,attribute18 = p_rec.attribute18
,attribute19 = p_rec.attribute19
,attribute20 = p_rec.attribute20
,information_category = p_rec.information_category
,information1 = p_rec.information1
,information2 = p_rec.information2
,information3 = p_rec.information3
,information4 = p_rec.information4
,information5 = p_rec.information5
,information6 = p_rec.information6
,information7 = p_rec.information7
,information8 = p_rec.information8
,information9 = p_rec.information9
,information10 = p_rec.information10
,information11 = p_rec.information11
,information12 = p_rec.information12
,information13 = p_rec.information13
,information14 = p_rec.information14
,information15 = p_rec.information15
,information16 = p_rec.information16
,information17 = p_rec.information17
,information18 = p_rec.information18
,information19 = p_rec.information19
,information20 = p_rec.information20
where task_in_checklist_id = p_rec.task_in_checklist_id;
End update_dml;
Procedure pre_update
(p_rec in out nocopy per_ctk_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'pre_update';
select business_group_id
from per_checklists
where checklist_id = p_checklist_id;
select
effective_start_date,object_version_number
FROM
ben_eligy_prfl_f
WHERE
trunc(sysdate) between effective_start_date and effective_end_date
AND stat_cd = 'A'
AND bnft_cagr_prtn_cd = 'CHKLIST'
and ELIGY_PRFL_ID=cur_p_elig_prfl_id;
select object_version_number,effective_start_date
from ben_elig_obj_f
where elig_obj_id = p_elig_objid;
select
elig_obj_elig_prfl_id,
object_version_number,
effective_start_date
from
ben_elig_obj_elig_profl_f
where elig_obj_id = c_elig_obj_id and elig_prfl_id=c_elig_prfl_id;
ben_ELIG_OBJ_ELIG_PROFL_api.delete_elig_obj_elig_profl
(
p_validate=> false,
p_elig_obj_elig_prfl_id=>l_elig_obj_elig_prfl_id,
p_effective_start_date=>l_effective_start_date,
p_effective_end_date=>l_effective_end_date,
p_object_version_number=>l_prf_obj_ovn,
p_effective_date=>l_effective_date,
p_datetrack_mode =>'ZAP'
);
ben_elig_obj_api.delete_elig_obj
(
p_validate=>false,
p_elig_obj_id=>per_ctk_shd.g_old_rec.eligibility_object_id,
p_effective_start_date=>l_effective_start_date,
p_effective_end_date=>l_effective_end_date,
p_object_version_number=>l_obj_ovn,
p_effective_date=>l_effective_date,
p_datetrack_mode=>'ZAP'
);
OR -- in this case above we have deleted old records
(nvl(per_ctk_shd.g_old_rec.eligibility_profile_id, hr_api.g_number) <> hr_api.g_number AND
nvl(p_rec.eligibility_profile_id, hr_api.g_number) <> hr_api.g_number AND
nvl(per_ctk_shd.g_old_rec.eligibility_profile_id, hr_api.g_number) <> nvl(p_rec.eligibility_profile_id, hr_api.g_number))
then
open c_elig_prfl_dates(p_rec.eligibility_profile_id);
End pre_update;
Procedure post_update
(p_effective_date in date
,p_rec in per_ctk_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'post_update';
per_ctk_rku.after_update
(p_effective_date => p_effective_date
,p_task_in_checklist_id
=> p_rec.task_in_checklist_id
,p_checklist_id
=> p_rec.checklist_id
,p_checklist_task_name
=> p_rec.checklist_task_name
,p_eligibility_object_id
=> p_rec.eligibility_object_id
,p_eligibility_profile_id
=> p_rec.eligibility_profile_id
,p_ame_attribute_identifier
=> p_rec.ame_attribute_identifier
,p_description
=> p_rec.description
,p_mandatory_flag
=> p_rec.mandatory_flag
,p_target_duration
=> p_rec.target_duration
,p_target_duration_uom
=> p_rec.target_duration_uom
,p_task_sequence
=> p_rec.task_sequence
,p_object_version_number
=> p_rec.object_version_number
,p_action_url
=> p_rec.action_url
,p_attribute_category
=> p_rec.attribute_category
,p_attribute1
=> p_rec.attribute1
,p_attribute2
=> p_rec.attribute2
,p_attribute3
=> p_rec.attribute3
,p_attribute4
=> p_rec.attribute4
,p_attribute5
=> p_rec.attribute5
,p_attribute6
=> p_rec.attribute6
,p_attribute7
=> p_rec.attribute7
,p_attribute8
=> p_rec.attribute8
,p_attribute9
=> p_rec.attribute9
,p_attribute10
=> p_rec.attribute10
,p_attribute11
=> p_rec.attribute11
,p_attribute12
=> p_rec.attribute12
,p_attribute13
=> p_rec.attribute13
,p_attribute14
=> p_rec.attribute14
,p_attribute15
=> p_rec.attribute15
,p_attribute16
=> p_rec.attribute16
,p_attribute17
=> p_rec.attribute17
,p_attribute18
=> p_rec.attribute18
,p_attribute19
=> p_rec.attribute19
,p_attribute20
=> p_rec.attribute20
,p_information_category
=> p_rec.information_category
,p_information1
=> p_rec.information1
,p_information2
=> p_rec.information2
,p_information3
=> p_rec.information3
,p_information4
=> p_rec.information4
,p_information5
=> p_rec.information5
,p_information6
=> p_rec.information6
,p_information7
=> p_rec.information7
,p_information8
=> p_rec.information8
,p_information9
=> p_rec.information9
,p_information10
=> p_rec.information10
,p_information11
=> p_rec.information11
,p_information12
=> p_rec.information12
,p_information13
=> p_rec.information13
,p_information14
=> p_rec.information14
,p_information15
=> p_rec.information15
,p_information16
=> p_rec.information16
,p_information17
=> p_rec.information17
,p_information18
=> p_rec.information18
,p_information19
=> p_rec.information19
,p_information20
=> p_rec.information20
,p_checklist_id_o
=> per_ctk_shd.g_old_rec.checklist_id
,p_checklist_task_name_o
=> per_ctk_shd.g_old_rec.checklist_task_name
,p_eligibility_object_id_o
=> per_ctk_shd.g_old_rec.eligibility_object_id
,p_eligibility_profile_id_o
=> per_ctk_shd.g_old_rec.eligibility_profile_id
,p_ame_attribute_identifier_o
=> per_ctk_shd.g_old_rec.ame_attribute_identifier
,p_description_o
=> per_ctk_shd.g_old_rec.description
,p_mandatory_flag_o
=> per_ctk_shd.g_old_rec.mandatory_flag
,p_target_duration_o
=> per_ctk_shd.g_old_rec.target_duration
,p_target_duration_uom_o
=> per_ctk_shd.g_old_rec.target_duration_uom
,p_task_sequence_o
=> per_ctk_shd.g_old_rec.task_sequence
,p_object_version_number_o
=> per_ctk_shd.g_old_rec.object_version_number
,p_action_url_o
=> per_ctk_shd.g_old_rec.action_url
,p_attribute_category_o
=> per_ctk_shd.g_old_rec.attribute_category
,p_attribute1_o
=> per_ctk_shd.g_old_rec.attribute1
,p_attribute2_o
=> per_ctk_shd.g_old_rec.attribute2
,p_attribute3_o
=> per_ctk_shd.g_old_rec.attribute3
,p_attribute4_o
=> per_ctk_shd.g_old_rec.attribute4
,p_attribute5_o
=> per_ctk_shd.g_old_rec.attribute5
,p_attribute6_o
=> per_ctk_shd.g_old_rec.attribute6
,p_attribute7_o
=> per_ctk_shd.g_old_rec.attribute7
,p_attribute8_o
=> per_ctk_shd.g_old_rec.attribute8
,p_attribute9_o
=> per_ctk_shd.g_old_rec.attribute9
,p_attribute10_o
=> per_ctk_shd.g_old_rec.attribute10
,p_attribute11_o
=> per_ctk_shd.g_old_rec.attribute11
,p_attribute12_o
=> per_ctk_shd.g_old_rec.attribute12
,p_attribute13_o
=> per_ctk_shd.g_old_rec.attribute13
,p_attribute14_o
=> per_ctk_shd.g_old_rec.attribute14
,p_attribute15_o
=> per_ctk_shd.g_old_rec.attribute15
,p_attribute16_o
=> per_ctk_shd.g_old_rec.attribute16
,p_attribute17_o
=> per_ctk_shd.g_old_rec.attribute17
,p_attribute18_o
=> per_ctk_shd.g_old_rec.attribute18
,p_attribute19_o
=> per_ctk_shd.g_old_rec.attribute19
,p_attribute20_o
=> per_ctk_shd.g_old_rec.attribute20
,p_information_category_o
=> per_ctk_shd.g_old_rec.information_category
,p_information1_o
=> per_ctk_shd.g_old_rec.information1
,p_information2_o
=> per_ctk_shd.g_old_rec.information2
,p_information3_o
=> per_ctk_shd.g_old_rec.information3
,p_information4_o
=> per_ctk_shd.g_old_rec.information4
,p_information5_o
=> per_ctk_shd.g_old_rec.information5
,p_information6_o
=> per_ctk_shd.g_old_rec.information6
,p_information7_o
=> per_ctk_shd.g_old_rec.information7
,p_information8_o
=> per_ctk_shd.g_old_rec.information8
,p_information9_o
=> per_ctk_shd.g_old_rec.information9
,p_information10_o
=> per_ctk_shd.g_old_rec.information10
,p_information11_o
=> per_ctk_shd.g_old_rec.information11
,p_information12_o
=> per_ctk_shd.g_old_rec.information12
,p_information13_o
=> per_ctk_shd.g_old_rec.information13
,p_information14_o
=> per_ctk_shd.g_old_rec.information14
,p_information15_o
=> per_ctk_shd.g_old_rec.information15
,p_information16_o
=> per_ctk_shd.g_old_rec.information16
,p_information17_o
=> per_ctk_shd.g_old_rec.information17
,p_information18_o
=> per_ctk_shd.g_old_rec.information18
,p_information19_o
=> per_ctk_shd.g_old_rec.information19
,p_information20_o
=> per_ctk_shd.g_old_rec.information20
);
End post_update;
per_ctk_bus.update_validate
(p_effective_date
,p_rec
);
per_ctk_upd.pre_update(p_rec);
per_ctk_upd.update_dml(p_rec);
per_ctk_upd.post_update
(p_effective_date
,p_rec
);