The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure update_dml(p_rec in out nocopy pay_sbt_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'update_dml';
update pay_shadow_balance_types
set
assignment_remuneration_flag = p_rec.assignment_remuneration_flag,
balance_name = p_rec.balance_name,
balance_uom = p_rec.balance_uom,
currency_code = p_rec.currency_code,
comments = p_rec.comments,
reporting_name = p_rec.reporting_name,
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,
jurisdiction_level = p_rec.jurisdiction_level,
tax_type = p_rec.tax_type,
exclusion_rule_id = p_rec.exclusion_rule_id,
category_name = p_rec.category_name,
base_balance_type_id = p_rec.base_balance_type_id,
base_balance_name = p_rec.base_balance_name,
input_value_id = p_rec.input_value_id,
object_version_number = p_rec.object_version_number
where balance_type_id = p_rec.balance_type_id;
End update_dml;
Procedure pre_update(p_rec in pay_sbt_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'pre_update';
End pre_update;
Procedure post_update(p_rec in pay_sbt_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'post_update';
End post_update;
pay_sbt_bus.update_validate(p_effective_date, p_rec);
pre_update(p_rec);
update_dml(p_rec);
post_update(p_rec);