The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure delete
(p_fin_plan_type_id IN pa_fin_plan_types_b.fin_plan_type_id%type,
p_record_version_number IN pa_fin_plan_types_b.record_version_number%type,
x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
x_msg_data OUT NOCOPY VARCHAR2) is --File.Sql.39 bug 4440895
l_msg_count NUMBER;
p_procedure_name => 'delete');
pa_fin_plan_types_utils.delete_val
( P_FIN_PLAN_TYPE_ID => p_fin_plan_type_id,
X_RETURN_STATUS => x_return_status,
X_MSG_COUNT => x_msg_count,
X_MSG_DATA => x_msg_data);
pa_fin_plan_types_pkg.delete_row
( X_FIN_PLAN_TYPE_ID => p_fin_plan_type_id);
DELETE
FROM pa_pt_co_impl_statuses
WHERE fin_plan_type_id=p_fin_plan_type_id;
p_procedure_name => 'delete');
end delete;