The following lines contain the word 'select', 'insert', 'update' or 'delete':
select system_document_type from hr_document_types
where document_type_id = p_document_type_id;
select null from hr_document_extra_info
where person_id = p_person_id
and document_type_id = p_document_type_id
and (date_from between p_date_from and p_date_to or
date_to between p_date_from and p_date_to or
p_date_from between date_from and date_to);
PROCEDURE UPDATE_PL_DEI_INFO(P_DOCUMENT_EXTRA_INFO_ID NUMBER,
P_DOCUMENT_TYPE_ID NUMBER,
P_DOCUMENT_NUMBER VARCHAR2,
P_PERSON_ID NUMBER,
P_DATE_FROM DATE,
P_DATE_TO DATE,
P_ISSUED_DATE DATE) IS
cursor csr_document_type is
select system_document_type from hr_document_types
where document_type_id = p_document_type_id;
select null from hr_document_extra_info
where person_id = p_person_id
and document_type_id = p_document_type_id
and (date_from between p_date_from and p_date_to or
date_to between p_date_from and p_date_to or
p_date_from between date_from and date_to)
and document_extra_info_id <> p_document_extra_info_id;
l_proc:='UPDATE_PL_DEI_INFO';
END UPDATE_PL_DEI_INFO;