57:
58: /* Used to get the document information */
59: CURSOR c_doc_info IS
60: SELECT *
61: FROM fnd_documents_vl
62: WHERE document_id = l_document_id;
63: l_doc c_doc_info%ROWTYPE;
64:
65: /* Used to see if this attachment already exists */
340: CLOSE c_get_category_id;
341:
342: /* Change the document category to the REJECTED category to segregate it out from
343: the approved documents. There is no ther way to determine that is has been rejected */
344: UPDATE fnd_documents
345: SET category_id = l_category_id
346: WHERE document_id = l_document_id;
347:
348: END IF; /* If this is an MSDS document */