[Home] [Help]
The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure insert_dml
(p_rec in out nocopy per_mea_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'insert_dml';
l_last_update_date per_medical_assessments.last_update_date%TYPE;
l_last_updated_by per_medical_assessments.last_updated_by%TYPE;
l_last_update_login per_medical_assessments.last_update_login%TYPE;
l_last_update_date := sysdate;
l_last_updated_by := fnd_global.user_id;
l_last_update_login := fnd_global.login_id;
insert into per_medical_assessments
(medical_assessment_id
,person_id
,examiner_name
,organization_id
,consultation_date
,consultation_type
,incident_id
,consultation_result
,disability_id
,next_consultation_date
,description
,attribute_category
,attribute1
,attribute2
,attribute3
,attribute4
,attribute5
,attribute6
,attribute7
,attribute8
,attribute9
,attribute10
,attribute11
,attribute12
,attribute13
,attribute14
,attribute15
,attribute16
,attribute17
,attribute18
,attribute19
,attribute20
,attribute21
,attribute22
,attribute23
,attribute24
,attribute25
,attribute26
,attribute27
,attribute28
,attribute29
,attribute30
,mea_information_category
,mea_information1
,mea_information2
,mea_information3
,mea_information4
,mea_information5
,mea_information6
,mea_information7
,mea_information8
,mea_information9
,mea_information10
,mea_information11
,mea_information12
,mea_information13
,mea_information14
,mea_information15
,mea_information16
,mea_information17
,mea_information18
,mea_information19
,mea_information20
,mea_information21
,mea_information22
,mea_information23
,mea_information24
,mea_information25
,mea_information26
,mea_information27
,mea_information28
,mea_information29
,mea_information30
,object_version_number
,creation_date
,created_by
,last_update_date
,last_updated_by
,last_update_login)
Values
(p_rec.medical_assessment_id
,p_rec.person_id
,p_rec.examiner_name
,p_rec.organization_id
,p_rec.consultation_date
,p_rec.consultation_type
,p_rec.incident_id
,p_rec.consultation_result
,p_rec.disability_id
,p_rec.next_consultation_date
,p_rec.description
,p_rec.attribute_category
,p_rec.attribute1
,p_rec.attribute2
,p_rec.attribute3
,p_rec.attribute4
,p_rec.attribute5
,p_rec.attribute6
,p_rec.attribute7
,p_rec.attribute8
,p_rec.attribute9
,p_rec.attribute10
,p_rec.attribute11
,p_rec.attribute12
,p_rec.attribute13
,p_rec.attribute14
,p_rec.attribute15
,p_rec.attribute16
,p_rec.attribute17
,p_rec.attribute18
,p_rec.attribute19
,p_rec.attribute20
,p_rec.attribute21
,p_rec.attribute22
,p_rec.attribute23
,p_rec.attribute24
,p_rec.attribute25
,p_rec.attribute26
,p_rec.attribute27
,p_rec.attribute28
,p_rec.attribute29
,p_rec.attribute30
,p_rec.mea_information_category
,p_rec.mea_information1
,p_rec.mea_information2
,p_rec.mea_information3
,p_rec.mea_information4
,p_rec.mea_information5
,p_rec.mea_information6
,p_rec.mea_information7
,p_rec.mea_information8
,p_rec.mea_information9
,p_rec.mea_information10
,p_rec.mea_information11
,p_rec.mea_information12
,p_rec.mea_information13
,p_rec.mea_information14
,p_rec.mea_information15
,p_rec.mea_information16
,p_rec.mea_information17
,p_rec.mea_information18
,p_rec.mea_information19
,p_rec.mea_information20
,p_rec.mea_information21
,p_rec.mea_information22
,p_rec.mea_information23
,p_rec.mea_information24
,p_rec.mea_information25
,p_rec.mea_information26
,p_rec.mea_information27
,p_rec.mea_information28
,p_rec.mea_information29
,p_rec.mea_information30
,p_rec.object_version_number
,l_creation_date
,l_created_by
,l_last_update_date
,l_last_updated_by
,l_last_update_login);
End insert_dml;
Procedure pre_insert
(p_rec in out nocopy per_mea_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'pre_insert';
select per_medical_assessments_s.nextval
from sys.dual;
End pre_insert;
Procedure post_insert
(p_effective_date in date
,p_rec in per_mea_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'post_insert';
per_mea_rki.after_insert
(p_effective_date => p_effective_date
,p_medical_assessment_id => p_rec.medical_assessment_id
,p_person_id => p_rec.person_id
,p_examiner_name => p_rec.examiner_name
,p_organization_id => p_rec.organization_id
,p_consultation_date => p_rec.consultation_date
,p_consultation_type => p_rec.consultation_type
,p_incident_id => p_rec.incident_id
,p_consultation_result => p_rec.consultation_result
,p_disability_id => p_rec.disability_id
,p_next_consultation_date => p_rec.next_consultation_date
,p_description => p_rec.description
,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_attribute21 => p_rec.attribute21
,p_attribute22 => p_rec.attribute22
,p_attribute23 => p_rec.attribute23
,p_attribute24 => p_rec.attribute24
,p_attribute25 => p_rec.attribute25
,p_attribute26 => p_rec.attribute26
,p_attribute27 => p_rec.attribute27
,p_attribute28 => p_rec.attribute28
,p_attribute29 => p_rec.attribute29
,p_attribute30 => p_rec.attribute30
,p_mea_information_category => p_rec.mea_information_category
,p_mea_information1 => p_rec.mea_information1
,p_mea_information2 => p_rec.mea_information2
,p_mea_information3 => p_rec.mea_information3
,p_mea_information4 => p_rec.mea_information4
,p_mea_information5 => p_rec.mea_information5
,p_mea_information6 => p_rec.mea_information6
,p_mea_information7 => p_rec.mea_information7
,p_mea_information8 => p_rec.mea_information8
,p_mea_information9 => p_rec.mea_information9
,p_mea_information10 => p_rec.mea_information10
,p_mea_information11 => p_rec.mea_information11
,p_mea_information12 => p_rec.mea_information12
,p_mea_information13 => p_rec.mea_information13
,p_mea_information14 => p_rec.mea_information14
,p_mea_information15 => p_rec.mea_information15
,p_mea_information16 => p_rec.mea_information16
,p_mea_information17 => p_rec.mea_information17
,p_mea_information18 => p_rec.mea_information18
,p_mea_information19 => p_rec.mea_information19
,p_mea_information20 => p_rec.mea_information20
,p_mea_information21 => p_rec.mea_information21
,p_mea_information22 => p_rec.mea_information22
,p_mea_information23 => p_rec.mea_information23
,p_mea_information24 => p_rec.mea_information24
,p_mea_information25 => p_rec.mea_information25
,p_mea_information26 => p_rec.mea_information26
,p_mea_information27 => p_rec.mea_information27
,p_mea_information28 => p_rec.mea_information28
,p_mea_information29 => p_rec.mea_information29
,p_mea_information30 => p_rec.mea_information30
,p_object_version_number => p_rec.object_version_number
);
End post_insert;
per_mea_bus.insert_validate
(p_effective_date
,p_rec
);
per_mea_ins.pre_insert(p_rec);
per_mea_ins.insert_dml(p_rec);
per_mea_ins.post_insert
(p_effective_date
,p_rec
);