14: l_LAST_UPDATE_LOGIN NUMBER:=-1 ;
15:
16: BEGIN
17: x_return_status := 'S';
18: select iem_account_intent_docs_s1.nextval into l_seq_id
19: from dual;
20: INSERT INTO IEM_ACCOUNT_INTENT_DOCS (
21: ACCOUNT_INTENT_DOC_ID,
22: CLASSIFICATION_ID ,
16: BEGIN
17: x_return_status := 'S';
18: select iem_account_intent_docs_s1.nextval into l_seq_id
19: from dual;
20: INSERT INTO IEM_ACCOUNT_INTENT_DOCS (
21: ACCOUNT_INTENT_DOC_ID,
22: CLASSIFICATION_ID ,
23: EMAIL_ACCOUNT_ID ,
24: QUERY_RESPONSE ,
53:
54: BEGIN
55: x_return_status := 'E';
56:
57: delete from IEM_ACCOUNT_INTENT_DOCS
58: where account_intent_doc_id=p_account_intent_doc_id;
59:
60: EXCEPTION
61: WHEN OTHERS THEN