The following lines contain the word 'select', 'insert', 'update' or 'delete':
p_LAST_UPDATED_BY IN NUMBER ,
p_LAST_UPDATE_DATE IN DATE,
p_LAST_UPDATE_LOGIN IN NUMBER ,
x_folder_id OUT NOCOPY 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):='create_item';
select iem_archived_folders_s1.nextval into l_seq_id from dual;
select nvl(max(FOLDER_SEQ_NUM),0)+1
INTO l_fld_id
FROM IEM_ARCHIVED_FOLDERS
where email_account_id=p_email_account_id
and FOLDER_NAME=p_folder;
INSERT INTO IEM_ARCHIVED_FOLDERS
(ARCH_FOLDER_ID,
ARCH_FOLDER_NAME,
FOLDER_NAME,
FOLDER_SEQ_NUM,
EMAIL_ACCOUNT_ID,
ARCH_FOLDER_STATUS,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN)
VALUES
(l_seq_id,
l_arch_folder,
p_folder,
l_fld_id,
p_email_account_id,
'I', -- In used
decode(p_CREATED_BY,null,-1,p_CREATED_BY),
sysdate,
decode(p_LAST_UPDATED_BY,null,-1,p_LAST_UPDATED_BY),
sysdate,
decode(p_LAST_UPDATE_LOGIN,null,-1,p_LAST_UPDATE_LOGIN));