The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure insert_dml
(p_rec in out nocopy ghr_cah_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'insert_dml';
insert into ghr_compl_ca_headers
(compl_ca_header_id
,complaint_id
,ca_source
,last_compliance_report
,compliance_closed
,compl_docket_number
,appeal_docket_number
,pfe_docket_number
,pfe_received
,agency_brief_pfe_due
,agency_brief_pfe_date
,decision_pfe_date
,decision_pfe
,agency_recvd_pfe_decision
,agency_pfe_brief_forwd
,agency_notified_noncom
,comrep_noncom_req
,eeo_off_req_data_from_org
,org_forwd_data_to_eeo_off
,dec_implemented
,complaint_reinstated
,stage_complaint_reinstated
,object_version_number
)
Values
(p_rec.compl_ca_header_id
,p_rec.complaint_id
,p_rec.ca_source
,p_rec.last_compliance_report
,p_rec.compliance_closed
,p_rec.compl_docket_number
,p_rec.appeal_docket_number
,p_rec.pfe_docket_number
,p_rec.pfe_received
,p_rec.agency_brief_pfe_due
,p_rec.agency_brief_pfe_date
,p_rec.decision_pfe_date
,p_rec.decision_pfe
,p_rec.agency_recvd_pfe_decision
,p_rec.agency_pfe_brief_forwd
,p_rec.agency_notified_noncom
,p_rec.comrep_noncom_req
,p_rec.eeo_off_req_data_from_org
,p_rec.org_forwd_data_to_eeo_off
,p_rec.dec_implemented
,p_rec.complaint_reinstated
,p_rec.stage_complaint_reinstated
,p_rec.object_version_number
);
End insert_dml;
Procedure pre_insert
(p_rec in out nocopy ghr_cah_shd.g_rec_type
) is
--
Cursor C_Sel1 is select ghr_compl_ca_headers_s.nextval from sys.dual;
Select null
from ghr_compl_ca_headers
where compl_ca_header_id =
ghr_cah_ins.g_compl_ca_header_id_i;
l_proc varchar2(72) := g_package||'pre_insert';
End pre_insert;
Procedure post_insert
(p_effective_date in date
,p_rec in ghr_cah_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'post_insert';
ghr_cah_rki.after_insert
(p_effective_date => p_effective_date
,p_compl_ca_header_id => p_rec.compl_ca_header_id
,p_complaint_id => p_rec.complaint_id
,p_ca_source => p_rec.ca_source
,p_last_compliance_report => p_rec.last_compliance_report
,p_compliance_closed => p_rec.compliance_closed
,p_compl_docket_number => p_rec.compl_docket_number
,p_appeal_docket_number => p_rec.appeal_docket_number
,p_pfe_docket_number => p_rec.pfe_docket_number
,p_pfe_received => p_rec.pfe_received
,p_agency_brief_pfe_due => p_rec.agency_brief_pfe_due
,p_agency_brief_pfe_date => p_rec.agency_brief_pfe_date
,p_decision_pfe_date => p_rec.decision_pfe_date
,p_decision_pfe => p_rec.decision_pfe
,p_agency_recvd_pfe_decision => p_rec.agency_recvd_pfe_decision
,p_agency_pfe_brief_forwd => p_rec.agency_pfe_brief_forwd
,p_agency_notified_noncom => p_rec.agency_notified_noncom
,p_comrep_noncom_req => p_rec.comrep_noncom_req
,p_eeo_off_req_data_from_org => p_rec.eeo_off_req_data_from_org
,p_org_forwd_data_to_eeo_off => p_rec.org_forwd_data_to_eeo_off
,p_dec_implemented => p_rec.dec_implemented
,p_complaint_reinstated => p_rec.complaint_reinstated
,p_stage_complaint_reinstated => p_rec.stage_complaint_reinstated
,p_object_version_number => p_rec.object_version_number
);
End post_insert;
ghr_cah_bus.insert_validate
(p_effective_date
,p_rec
);
ghr_cah_ins.pre_insert(p_rec);
ghr_cah_ins.insert_dml(p_rec);
ghr_cah_ins.post_insert
(p_effective_date
,p_rec
);