100:
101: --get next sequential number for msg_meta_id
102: --SELECT iem_ms_mimemsgs_s1.nextval
103: if ( p_message_id = -1 ) then
104: SELECT iem_ms_base_headers_s1.nextval
105: INTO l_seq_id
106: FROM dual;
107: else
108: l_seq_id := p_message_id;
121: l_x_mailer := substr(p_x_mailer, 1, 256);
122: l_LANGUAGE := substr(p_language, 1, 256);
123:
124:
125: INSERT INTO IEM_MS_BASE_HEADERS
126: (
127: MESSAGE_ID,
128: EMAIL_ACCOUNT_ID,
129: SUBJECT,