The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE DELETE_TEMP_PARAMS
(
P_ERECORD_ID IN NUMBER
)
IS
PRAGMA AUTONOMOUS_TRANSACTION;
DELETE FROM EDR_ERESPARAMETERS_T
WHERE PARENT_ID = P_ERECORD_ID
AND PARENT_TYPE = 'EDR_XDOC_PARAMS';
FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','DELETE_TEMP_PARAMS');
'edr.plsql.EDR_XDOC_UTIL_PKG.DELETE_TEMP_PARAMS',
FALSE
);
END DELETE_TEMP_PARAMS;
INSERT INTO EDR_ERESPARAMETERS_T(PARAM_ID,
PARENT_ID,
PARENT_TYPE,
PARAM_NAME,
PARAM_VALUE)
VALUES(EDR_ERESPARAMETERS_T_S.NEXTVAL,
P_ERECORD_ID,
'EDR_XDOC_PARAMS',
'NLS_DATE_FORMAT',
L_NLS_DATE_FORMAT);
INSERT INTO EDR_ERESPARAMETERS_T(PARAM_ID,
PARENT_ID,
PARENT_TYPE,
PARAM_NAME,
PARAM_VALUE)
VALUES(EDR_ERESPARAMETERS_T_S.NEXTVAL,
P_ERECORD_ID,
'EDR_XDOC_PARAMS',
'NLS_DATE_LANGUAGE',
L_NLS_DATE_LANGUAGE);
INSERT INTO EDR_ERESPARAMETERS_T(PARAM_ID,
PARENT_ID,
PARENT_TYPE,
PARAM_NAME,
PARAM_VALUE)
VALUES(EDR_ERESPARAMETERS_T_S.NEXTVAL,
P_ERECORD_ID,
'EDR_XDOC_PARAMS',
'NLS_LANGUAGE',
L_NLS_LANGUAGE);
INSERT INTO EDR_ERESPARAMETERS_T(PARAM_ID,
PARENT_ID,
PARENT_TYPE,
PARAM_NAME,
PARAM_VALUE)
VALUES(EDR_ERESPARAMETERS_T_S.NEXTVAL,
P_ERECORD_ID,
'EDR_XDOC_PARAMS',
'NLS_NUMERIC_CHARACTERS',
L_NLS_NUMERIC_CHARACTERS);
INSERT INTO EDR_ERESPARAMETERS_T(PARAM_ID,
PARENT_ID,
PARENT_TYPE,
PARAM_NAME,
PARAM_VALUE)
VALUES(EDR_ERESPARAMETERS_T_S.NEXTVAL,
P_ERECORD_ID,
'EDR_XDOC_PARAMS',
'NLS_SORT',
L_NLS_SORT);
INSERT INTO EDR_ERESPARAMETERS_T(PARAM_ID,
PARENT_ID,
PARENT_TYPE,
PARAM_NAME,
PARAM_VALUE)
VALUES(EDR_ERESPARAMETERS_T_S.NEXTVAL,
P_ERECORD_ID,
'EDR_XDOC_PARAMS',
'NLS_TERRITORY',
L_NLS_TERRITORY);
INSERT INTO EDR_ERESPARAMETERS_T(PARAM_ID,
PARENT_ID,
PARENT_TYPE,
PARAM_NAME,
PARAM_VALUE)
VALUES(EDR_ERESPARAMETERS_T_S.NEXTVAL,
P_ERECORD_ID,
'EDR_XDOC_PARAMS',
'CURRENT_LANG',
L_CURRENT_LANG);
INSERT INTO EDR_ERESPARAMETERS_T(PARAM_ID,
PARENT_ID,
PARENT_TYPE,
PARAM_NAME,
PARAM_VALUE)
VALUES(EDR_ERESPARAMETERS_T_S.NEXTVAL,
P_ERECORD_ID,
'EDR_XDOC_PARAMS',
'USER_ID',
TO_CHAR(L_USER_ID));
INSERT INTO EDR_ERESPARAMETERS_T(PARAM_ID,
PARENT_ID,
PARENT_TYPE,
PARAM_NAME,
PARAM_VALUE)
VALUES(EDR_ERESPARAMETERS_T_S.NEXTVAL,
P_ERECORD_ID,
'EDR_XDOC_PARAMS',
'RESP_ID',
TO_CHAR(L_RESP_ID));
INSERT INTO EDR_ERESPARAMETERS_T(PARAM_ID,
PARENT_ID,
PARENT_TYPE,
PARAM_NAME,
PARAM_VALUE)
VALUES(EDR_ERESPARAMETERS_T_S.NEXTVAL,
P_ERECORD_ID,
'EDR_XDOC_PARAMS',
'RESP_APPL_ID',
TO_CHAR(L_RESP_APPL_ID));
INSERT INTO EDR_ERESPARAMETERS_T(PARAM_ID,
PARENT_ID,
PARENT_TYPE,
PARAM_NAME,
PARAM_VALUE)
VALUES(EDR_ERESPARAMETERS_T_S.NEXTVAL,
P_ERECORD_ID,
'EDR_XDOC_PARAMS',
'SECURITY_GROUP_ID',
TO_CHAR(L_SECURITY_GROUP_ID));
DELETE_TEMP_PARAMS(P_ERECORD_ID);
SELECT category_id
FROM fnd_document_categories
WHERE name = 'ERES';
SELECT fnd_attached_documents_s.nextval
FROM dual;
/* Select the category id */
OPEN c_get_category;
select document_requester into l_user_name
from edr_psig_documents where document_id = p_eRecord_Id;
/* Get the requestors user-id for Last Updated by field in Attachments */
select user_id into l_user_id
from fnd_user where user_name = l_user_name;
FND_ATTACHED_DOCUMENTS_PKG.Insert_Row(X_Rowid=>l_row_id,
X_attached_document_id=>l_attached_document_id,
X_document_id=>l_fnd_document_id,
X_creation_date=>SYSDATE,
X_created_by=> L_USER_ID,
X_last_update_date=>SYSDATE,
X_last_updated_by=>L_USER_ID,
X_last_update_login=>L_USER_ID,
X_seq_num=>1,
X_entity_name=>'ERECORD',
X_column1=>NULL,
X_pk1_value=>p_eRecord_ID,
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 want to set the security type to 4.
X_security_type=>4,
--Security ID should be set to null
X_security_id=>null,
--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=>p_file_name,
X_media_id=>x_file_id,
X_doc_attribute_category=>null,
X_doc_attribute1=>null,
X_doc_attribute2=>null,
X_doc_attribute3=>null,
X_doc_attribute4=>null,
X_doc_attribute5=>null,
X_doc_attribute6=>null,
X_doc_attribute7=>null,
X_doc_attribute8=>null,
X_doc_attribute9=>null,
X_doc_attribute10=>null,
X_create_doc=>'N');
INSERT into FND_LOBS
(file_id,
file_name,
file_data,
file_content_type,
file_format)
VALUES
(x_file_id,
p_file_name,
empty_blob(),
p_content_type,
p_file_format);
delete from FND_HTTP_SERVICE_TICKETS where SERVICE = p_request_service_name;
insert into FND_HTTP_SERVICE_TICKETS
(SERVICE, TICKET, OLD_TICKET,END_DATE) values (p_request_service_name, X, X,sysdate);