The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure update_dml
(p_rec in out nocopy ghr_cah_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'update_dml';
update ghr_compl_ca_headers
set
compl_ca_header_id = p_rec.compl_ca_header_id
,complaint_id = p_rec.complaint_id
,ca_source = p_rec.ca_source
,last_compliance_report = p_rec.last_compliance_report
,compliance_closed = p_rec.compliance_closed
,compl_docket_number = p_rec.compl_docket_number
,appeal_docket_number = p_rec.appeal_docket_number
,pfe_docket_number = p_rec.pfe_docket_number
,pfe_received = p_rec.pfe_received
,agency_brief_pfe_due = p_rec.agency_brief_pfe_due
,agency_brief_pfe_date = p_rec.agency_brief_pfe_date
,decision_pfe_date = p_rec.decision_pfe_date
,decision_pfe = p_rec.decision_pfe
,agency_recvd_pfe_decision = p_rec.agency_recvd_pfe_decision
,agency_pfe_brief_forwd = p_rec.agency_pfe_brief_forwd
,agency_notified_noncom = p_rec.agency_notified_noncom
,comrep_noncom_req = p_rec.comrep_noncom_req
,eeo_off_req_data_from_org = p_rec.eeo_off_req_data_from_org
,org_forwd_data_to_eeo_off = p_rec.org_forwd_data_to_eeo_off
,dec_implemented = p_rec.dec_implemented
,complaint_reinstated = p_rec.complaint_reinstated
,stage_complaint_reinstated = p_rec.stage_complaint_reinstated
,object_version_number = p_rec.object_version_number
where compl_ca_header_id = p_rec.compl_ca_header_id;
End update_dml;
Procedure pre_update
(p_rec in ghr_cah_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'pre_update';
End pre_update;
Procedure post_update
(p_effective_date in date
,p_rec in ghr_cah_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'post_update';
ghr_cah_rku.after_update
(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
,p_complaint_id_o => ghr_cah_shd.g_old_rec.complaint_id
,p_ca_source_o => ghr_cah_shd.g_old_rec.ca_source
,p_last_compliance_report_o => ghr_cah_shd.g_old_rec.last_compliance_report
,p_compliance_closed_o => ghr_cah_shd.g_old_rec.compliance_closed
,p_compl_docket_number_o => ghr_cah_shd.g_old_rec.compl_docket_number
,p_appeal_docket_number_o => ghr_cah_shd.g_old_rec.appeal_docket_number
,p_pfe_docket_number_o => ghr_cah_shd.g_old_rec.pfe_docket_number
,p_pfe_received_o => ghr_cah_shd.g_old_rec.pfe_received
,p_agency_brief_pfe_due_o => ghr_cah_shd.g_old_rec.agency_brief_pfe_due
,p_agency_brief_pfe_date_o => ghr_cah_shd.g_old_rec.agency_brief_pfe_date
,p_decision_pfe_date_o => ghr_cah_shd.g_old_rec.decision_pfe_date
,p_decision_pfe_o => ghr_cah_shd.g_old_rec.decision_pfe
,p_agency_recvd_pfe_decision_o => ghr_cah_shd.g_old_rec.agency_recvd_pfe_decision
,p_agency_pfe_brief_forwd_o => ghr_cah_shd.g_old_rec.agency_pfe_brief_forwd
,p_agency_notified_noncom_o => ghr_cah_shd.g_old_rec.agency_notified_noncom
,p_comrep_noncom_req_o => ghr_cah_shd.g_old_rec.comrep_noncom_req
,p_eeo_off_req_data_from_org_o => ghr_cah_shd.g_old_rec.eeo_off_req_data_from_org
,p_org_forwd_data_to_eeo_off_o => ghr_cah_shd.g_old_rec.org_forwd_data_to_eeo_off
,p_dec_implemented_o => ghr_cah_shd.g_old_rec.dec_implemented
,p_complaint_reinstated_o => ghr_cah_shd.g_old_rec.complaint_reinstated
,p_stage_complaint_reinstated_o => ghr_cah_shd.g_old_rec.stage_complaint_reinstated
,p_object_version_number_o => ghr_cah_shd.g_old_rec.object_version_number
);
End post_update;
ghr_cah_bus.update_validate
(p_effective_date
,p_rec
);
ghr_cah_upd.pre_update(p_rec);
ghr_cah_upd.update_dml(p_rec);
ghr_cah_upd.post_update
(p_effective_date
,p_rec
);