The following lines contain the word 'select', 'insert', 'update' or 'delete':
G_created_updated_by NUMBER:=TO_NUMBER (FND_PROFILE.VALUE('USER_ID')) ;
G_LAST_UPDATE_LOGIN NUMBER:=TO_NUMBER (FND_PROFILE.VALUE('LOGIN_ID') ) ;
--SELECT iem_ms_mimemsgs_s1.nextval
if ( p_message_id = -1 ) then
SELECT iem_ms_base_headers_s1.nextval
INTO l_seq_id
FROM dual;
INSERT INTO IEM_MS_BASE_HEADERS
(
MESSAGE_ID,
EMAIL_ACCOUNT_ID,
SUBJECT,
SENT_DATE,
RECEIVED_DATE,
FROM_STR,
TO_STR,
CC_STR,
REPLY_TO_STR,
PRIORITY,
RFC822_MESSAGE_ID,
MESSAGE_UID,
MAILER,
LANGUAGE,
CONTENT_TYPE,
ORGANIZATION,
MESSAGE_SIZE,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN
)
VALUES
(
l_seq_id,
p_email_account,
l_subject,
l_sent_date,
sysdate,
l_from,
l_to,
l_cc ,
l_reply_to,
l_priority,
l_rfcmsg_id,
p_uid,
l_x_mailer,
l_language,
l_content_type,
l_organization,
p_message_size,
decode(G_created_updated_by,null,-1,G_created_updated_by),
sysdate,
decode(G_created_updated_by,null,-1,G_created_updated_by),
sysdate,
decode(G_LAST_UPDATE_LOGIN,null,-1,G_LAST_UPDATE_LOGIN)
);
SELECT iem_ms_EXTHDRS_s1.nextval
INTO l_seq_id
FROM dual;
INSERT INTO IEM_MS_EXTHDRS
(
EXT_HEADER_ID,
MESSAGE_ID,
NAME,
value,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN
)
VALUES
(
l_seq_id,
l_msg_meta_id,
l_name,
l_value,
decode(G_created_updated_by,null,-1,G_created_updated_by),
sysdate,
decode(G_created_updated_by,null,-1,G_created_updated_by),
sysdate,
decode(G_LAST_UPDATE_LOGIN,null,-1,G_LAST_UPDATE_LOGIN)
);
INSERT INTO IEM_MS_MSGBODYS
(
MESSAGE_ID,
ORDER_ID,
VALUE,
TYPE,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN
)
VALUES
(
p_message_id,
i,
l_value,
p_part_type,
decode(G_created_updated_by,null,-1,G_created_updated_by),
sysdate,
decode(G_created_updated_by,null,-1,G_created_updated_by),
sysdate,
decode(G_LAST_UPDATE_LOGIN,null,-1,G_LAST_UPDATE_LOGIN)
);
PROCEDURE insert_preproc_wrapper (
p_api_version_number IN NUMBER,
p_init_msg_list IN VARCHAR2 := null,
p_commit IN VARCHAR2 := null,
p_msg_id IN NUMBER,
p_acct_id IN NUMBER,
p_priority IN NUMBER,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
) is
l_api_name VARCHAR2(255):='insert_preproc_wrapper';
SAVEPOINT insert_preproc_wrapper_PVT;
ROLLBACK TO insert_preproc_wrapper_PVT;
ROLLBACK TO insert_preproc_wrapper_PVT;
ROLLBACK TO insert_preproc_wrapper_PVT;
END insert_preproc_wrapper;
l_api_name VARCHAR2(255):='insert_preproc_wrapper';
SAVEPOINT insert_preproc_wrapper_PVT;
INSERT INTO IEM_MS_MSGPARTS
(MESSAGE_ID, PART_ID, PART_TYPE, PART_NAME, PART_DATA, PART_CHARSET,
CREATED_BY , CREATION_DATE, LAST_UPDATED_BY, LAST_UPDATE_DATE, LAST_UPDATE_LOGIN)
VALUES ( p_msg_id, p_part_id, p_part_type, p_part_name, EMPTY_BLOB(), p_part_charset,
-1, SYSDATE, -1, SYSDATE, -1);
SELECT PART_DATA FROM IEM_MS_MSGPARTS
WHERE MESSAGE_ID=p_msg_id and PART_ID=p_part_id and PART_TYPE=p_part_type
and PART_NAME=p_part_name FOR UPDATE;
UPDATE IEM_MS_MSGPARTS SET PART_DATA = p_part_data, LAST_UPDATE_DATE = SYSDATE
WHERE MESSAGE_ID=p_msg_id AND PART_ID=p_part_id AND PART_TYPE =p_part_type
AND PART_NAME = p_part_name;
ROLLBACK TO insert_preproc_wrapper_PVT;
ROLLBACK TO insert_preproc_wrapper_PVT;
ROLLBACK TO insert_preproc_wrapper_PVT;