Introduction:
This Post illustrates the steps required to Send the Email in Autonomous Data Warehouse.
Script to Send Email
CREATE OR REPLACE PROCEDURE xx_sample_send_mail (
p_to IN VARCHAR2,
p_from IN VARCHAR2,
p_subject IN VARCHAR2,
p_message IN VARCHAR2,
p_smtp_host IN VARCHAR2,
p_smtp_port IN NUMBER
)
AS
l_mail_conn UTL_SMTP.connection;
BEGIN
l_mail_conn :=
UTL_SMTP.open_connection (‘smtp.us-ashburn-1.oraclecloud.com’, 587);
UTL_SMTP.starttls (l_mail_conn);
UTL_SMTP.helo (l_mail_conn, p_smtp_host);
UTL_SMTP.auth
(l_mail_conn,
username => ‘ocid1.user.oc1..******************’,–User Name
PASSWORD => ‘*****************’,–Password
schemes => ‘PLAIN’
);
UTL_SMTP.mail (l_mail_conn, p_from);
UTL_SMTP.rcpt (l_mail_conn, p_to);
UTL_SMTP.open_data (l_mail_conn);
UTL_SMTP.write_data (l_mail_conn,
‘Date: ‘
|| TO_CHAR (SYSDATE, ‘DD-MON-YYYY HH24:MI:SS’)
|| UTL_TCP.crlf
);
UTL_SMTP.write_data (l_mail_conn, ‘To: ‘ || p_to || UTL_TCP.crlf);
UTL_SMTP.write_data (l_mail_conn, ‘From: ‘ || p_from || UTL_TCP.crlf);
UTL_SMTP.write_data (l_mail_conn, ‘Subject: ‘ || p_subject || UTL_TCP.crlf);
UTL_SMTP.write_data (l_mail_conn,
‘Reply-To: ‘ || p_from || UTL_TCP.crlf || UTL_TCP.crlf
);
UTL_SMTP.write_data (l_mail_conn,
p_message || UTL_TCP.crlf || UTL_TCP.crlf);
UTL_SMTP.close_data (l_mail_conn);
UTL_SMTP.quit (l_mail_conn);
END;
—————————————————————————————————————————————
BEGIN
xx_sample_send_mail
(p_to => ‘user1@company.com’,
p_from => ‘user@company.com’,
p_subject => ‘Test Mail’,
p_message => ‘test’,
p_smtp_host => ‘smtp.us-ashburn-1.oraclecloud.com’,
p_smtp_port => ‘587’
);
END;
Got any queries?
Do drop a note by writing us at venkatesh.b@staging.doyensys.com or use the comment section below to ask your questions
