The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure insert_dml
(p_rec in out nocopy pay_txr_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'insert_dml';
insert into pay_taxability_rules
(jurisdiction_code
,tax_type
,tax_category
,classification_id
,taxability_rules_date_id
,legislation_code
,status
,secondary_classification_id
)
Values
(p_rec.jurisdiction_code
,p_rec.tax_type
,p_rec.tax_category
,p_rec.classification_id
,p_rec.taxability_rules_date_id
,p_rec.legislation_code
,p_rec.status
,p_rec.secondary_classification_id
);
select count(*)
into num
from pay_taxability_rules
where jurisdiction_code = p_rec.jurisdiction_code;
End insert_dml;
Procedure pre_insert
(p_rec in out nocopy pay_txr_shd.g_rec_type
) is
--
Cursor C_Sel1 is
select taxability_rules_date_id
from pay_taxability_rules_dates
where legislation_code = p_rec.legislation_code
and sysdate between valid_date_from and
valid_date_to;
Select null
from pay_taxability_rules
where jurisdiction_code =
pay_txr_ins.g_jurisdiction_code_i
or tax_type =
pay_txr_ins.g_tax_type_i
or tax_category =
pay_txr_ins.g_tax_category_i
or classification_id =
pay_txr_ins.g_classification_id_i
or secondary_classification_id =
pay_txr_ins.g_secondary_class_id_i
or taxability_rules_date_id =
pay_txr_ins.g_taxability_rules_date_id_i;
l_proc varchar2(72) := g_package||'pre_insert';
select PAY_TAXABILITY_RULES_DATES_S.nextval
into ln_rules_nextval
from sys.dual;
insert into pay_taxability_rules_dates
(taxability_rules_date_id, valid_date_from, valid_date_to,
legislation_code
--last_update_date, last_updated_by, last_update_login, created_by, creation_date, object_version_number
) values
(ln_rules_nextval,
to_date('0001/01/01', 'YYYY/MM/DD HH24:MI:SS'),
to_date('4712/12/31', 'YYYY/MM/DD HH24:MI:SS'),
p_rec.legislation_code
-- to_date(:last_update_date, 'YYYY/MM/DD HH24:MI:SS'),
-- ln_last_updated_by, ln_last_updated_by, ln_last_updated_by,
-- to_date(:last_update_date, 'YYYY/MM/DD HH24:MI:SS'), ln_object_version_number
);
End pre_insert;
Procedure post_insert
(p_effective_date in date
,p_rec in pay_txr_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'post_insert';
pay_txr_rki.after_insert
(p_effective_date => p_effective_date
,p_jurisdiction_code
=> p_rec.jurisdiction_code
,p_tax_type
=> p_rec.tax_type
,p_tax_category
=> p_rec.tax_category
,p_classification_id
=> p_rec.classification_id
,p_taxability_rules_date_id
=> p_rec.taxability_rules_date_id
,p_legislation_code
=> p_rec.legislation_code
,p_status
=> p_rec.status
,p_secondary_classification_id
=> p_rec.secondary_classification_id
);
End post_insert;
pay_txr_bus.insert_validate
(p_effective_date
,p_rec
);
pay_txr_ins.pre_insert(p_rec);
pay_txr_ins.insert_dml(p_rec);
pay_txr_ins.post_insert
(p_effective_date
,p_rec
);