The following lines contain the word 'select', 'insert', 'update' or 'delete':
p_last_updated_by IN NUMBER,
p_last_update_login IN NUMBER,
p_last_update_date IN DATE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_data OUT NOCOPY VARCHAR2)
AS
-- Alpha Variables
L_API_NAME CONSTANT VARCHAR2(30) := 'UPLOAD_FILE';
EDR_FILES_INSERT_ERROR EXCEPTION;
SELECT category_id
FROM fnd_document_categories
WHERE name = p_category;
SELECT version_number, status
FROM edr_files_b
WHERE original_file_name = p_file_name
AND category_id = LocalCatRecord.category_id;
SELECT edr_files_b_s.nextval
FROM dual;
SELECT a.file_name, b.name
FROM edr_files_b a, fnd_document_categories b
WHERE a.category_id = b.category_id
AND a.file_id = l_file_id;
SELECT fnd_attached_documents_s.nextval
FROM dual;
SELECT count(*)
FROM fnd_descr_flex_column_usages
WHERE application_id = '709'
AND descriptive_flexfield_name = 'EDR_FILE_ATTRIBUTES'
AND descriptive_flex_context_code = p_category;
SELECT edr_files_b_s.nextval INTO l_file_id FROM dual;
EDR_FILES_PKG.Insert_Row (
X_ROWID =>l_row_id,
X_FILE_ID =>l_file_id,
X_FILE_NAME =>l_file_name,
X_ORIGINAL_FILE_NAME =>p_file_name,
X_VERSION_LABEL =>p_version_label,
X_CATEGORY_ID =>l_category_id,
X_CONTENT_TYPE =>p_content_type,
X_FILE_FORMAT =>p_file_format,
X_STATUS =>l_status,
X_VERSION_NUMBER =>l_version,
X_FND_DOCUMENT_ID => NULL,
X_ATTRIBUTE_CATEGORY =>p_category,
X_ATTRIBUTE1=>p_attribute1,
X_ATTRIBUTE2=>p_attribute2,
X_ATTRIBUTE3=>p_attribute3,
X_ATTRIBUTE4=>p_attribute4,
X_ATTRIBUTE5 =>p_attribute5,
X_ATTRIBUTE6=>p_attribute6,
X_ATTRIBUTE7=>p_attribute7,
X_ATTRIBUTE8=>p_attribute8,
X_ATTRIBUTE9=>p_attribute9,
X_ATTRIBUTE10=>p_attribute10,
X_ATTRIBUTE11=>NULL,
X_ATTRIBUTE12=>NULL,
X_ATTRIBUTE13=>NULL,
X_ATTRIBUTE14=>NULL,
X_ATTRIBUTE15=>NULL,
X_DESCRIPTION =>p_description,
X_CREATION_DATE=>p_creation_date,
X_CREATED_BY =>p_created_by,
X_LAST_UPDATE_DATE=>p_last_update_date,
X_LAST_UPDATED_BY=>p_last_updated_by,
X_LAST_UPDATE_LOGIN =>p_last_update_login);
FND_ATTACHED_DOCUMENTS_PKG.Insert_Row(X_Rowid=>l_row_id,
X_attached_document_id=>l_attached_document_id,
X_document_id=>x_document_id,
X_creation_date=>p_creation_date,
X_created_by=>p_created_by,
X_last_update_date=>p_last_update_date,
X_last_updated_by=>p_last_updated_by,
X_last_update_login=>p_last_update_login,
X_seq_num=>1,
X_entity_name=>'EDR_FILES_B',
X_column1=>NULL,
X_pk1_value=>NULL,
X_pk2_value=>NULL,
X_pk3_value=>NULL,
X_pk4_value=>NULL,
X_pk5_value=>NULL,
X_automatically_added_flag=>'N',
X_datatype_id=>6,
X_category_id=>l_category_id,
--Bug 4381237: Start
--We dont want any attachment security in the file
--X_security_type=>1,
--X_security_id=>-1,
X_security_type=>4,
X_security_id=> null,
--Bug Bug 4381237: End
X_publish_flag=>'N',
X_storage_type=>1,
X_usage_type=>'S',
X_language=>p_source_lang,
X_description=>p_description,
X_file_name=>l_file_name,
X_media_id=>l_media_id,
X_doc_attribute_category=>p_category,
X_doc_attribute1=>p_attribute1,
X_doc_attribute2=>p_attribute2,
X_doc_attribute3=>p_attribute3,
X_doc_attribute4=>p_attribute4,
X_doc_attribute5=>p_attribute5,
X_doc_attribute6=>p_attribute6,
X_doc_attribute7=>p_attribute7,
X_doc_attribute8=>p_attribute8,
X_doc_attribute9=>p_attribute9,
X_doc_attribute10=>p_attribute10,
X_create_doc=>'N');
INSERT into FND_LOBS
(file_id,
file_name,
file_data,
file_content_type,
file_format)
VALUES
(l_media_id,
l_file_name,
--Bug 3265035: Start
p_file_data,
--l_file_data,
--Bug 3265035: End
p_content_type,
p_file_format);
UPDATE EDR_FILES_B
SET fnd_document_id = x_document_id
WHERE file_id = l_file_id;
--update the file status and put the erecord
--id in attribute 14
UPDATE edr_files_b
SET status = 'P',
attribute14 = l_erecord_id
WHERE file_id = l_file_id
AND file_name = LocalEventRecord.file_name;
UPDATE edr_files_b
SET status = 'S',
attribute14 = l_erecord_id
WHERE file_id = l_file_id
AND file_name = LocalEventRecord.file_name;
update fnd_documents set
security_type = G_SECURITY_OFF,
publish_flag = G_PUBLISH_FLAG_Y
where document_id = x_document_id;
WHEN EDR_FILES_INSERT_ERROR THEN
x_return_status := FND_API.G_RET_STS_ERROR;
FND_MESSAGE.SET_NAME('EDR','EDR_FILES_INSERT_ERROR');