The following lines contain the word 'select', 'insert', 'update' or 'delete':
select
enrt_prem_id,
val,
uom,
elig_per_elctbl_chc_id,
enrt_bnft_id,
actl_prem_id,
business_group_id,
epr_attribute_category,
epr_attribute1,
epr_attribute2,
epr_attribute3,
epr_attribute4,
epr_attribute5,
epr_attribute6,
epr_attribute7,
epr_attribute8,
epr_attribute9,
epr_attribute10,
epr_attribute11,
epr_attribute12,
epr_attribute13,
epr_attribute14,
epr_attribute15,
epr_attribute16,
epr_attribute17,
epr_attribute18,
epr_attribute19,
epr_attribute20,
epr_attribute21,
epr_attribute22,
epr_attribute23,
epr_attribute24,
epr_attribute25,
epr_attribute26,
epr_attribute27,
epr_attribute28,
epr_attribute29,
epr_attribute30,
object_version_number,
request_id,
program_application_id,
program_id,
program_update_date
from ben_enrt_prem
where enrt_prem_id = p_enrt_prem_id;
select enrt_prem_id,
val,
uom,
elig_per_elctbl_chc_id,
enrt_bnft_id,
actl_prem_id,
business_group_id,
epr_attribute_category,
epr_attribute1,
epr_attribute2,
epr_attribute3,
epr_attribute4,
epr_attribute5,
epr_attribute6,
epr_attribute7,
epr_attribute8,
epr_attribute9,
epr_attribute10,
epr_attribute11,
epr_attribute12,
epr_attribute13,
epr_attribute14,
epr_attribute15,
epr_attribute16,
epr_attribute17,
epr_attribute18,
epr_attribute19,
epr_attribute20,
epr_attribute21,
epr_attribute22,
epr_attribute23,
epr_attribute24,
epr_attribute25,
epr_attribute26,
epr_attribute27,
epr_attribute28,
epr_attribute29,
epr_attribute30,
object_version_number,
request_id,
program_application_id,
program_id,
program_update_date
from ben_enrt_prem
where enrt_prem_id = p_enrt_prem_id
for update nowait;
p_program_update_date in date
)
Return g_rec_type is
--
l_rec g_rec_type;
l_rec.program_update_date := p_program_update_date;