The following lines contain the word 'select', 'insert', 'update' or 'delete':
Line: 38
PROCEDURE delete_document
(p_delete_document IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2,
x_oracle_error OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2)
IS
/* Alpha Variables */
L_CODE_BLOCK VARCHAR2(2000);