The following lines contain the word 'select', 'insert', 'update' or 'delete':
l_LAST_UPDATED_BY NUMBER:=-1 ;
l_LAST_UPDATE_LOGIN NUMBER:=-1 ;
select iem_account_intent_docs_s1.nextval into l_seq_id
from dual;
INSERT INTO IEM_ACCOUNT_INTENT_DOCS (
ACCOUNT_INTENT_DOC_ID,
CLASSIFICATION_ID ,
EMAIL_ACCOUNT_ID ,
QUERY_RESPONSE ,
CREATED_BY ,
CREATION_DATE ,
LAST_UPDATED_BY ,
LAST_UPDATE_DATE ,
LAST_UPDATE_LOGIN
)
VALUES
(
l_seq_id ,
p_classification_id,
p_EMAIL_ACCOUNT_ID ,
p_query_response ,
decode(l_CREATED_BY,null,-1,l_CREATED_BY),
sysdate,
decode(l_LAST_UPDATED_BY,null,-1,l_LAST_UPDATED_BY),
sysdate,
decode(l_LAST_UPDATE_LOGIN,null,-1,l_LAST_UPDATE_LOGIN)
);
PROCEDURE delete_item (p_account_intent_doc_id in number,
x_return_status OUT NOCOPY VARCHAR2
) is
BEGIN
x_return_status := 'E';
delete from IEM_ACCOUNT_INTENT_DOCS
where account_intent_doc_id=p_account_intent_doc_id;
END delete_item;