Sending Email using PL/SQL UTL_SMTP

1. UTL_SMTP

CREATE OR REPLACE PROCEDURE erpschools_send_email
 
IS
 
mailhost varchar2 (30) := 'smtp.email.hbc.com';
 
crlf varchar2(2)Â := CHR (13) || CHR (10);
 
v_email varchar2(16000);
 
message_1 LONG;
 
mail_conn utl_smtp.connection;
 
BEGIN
 
mail_conn := utl_smtp.open_connection (mailhost, 25);
 
utl_smtp.helo (mail_conn, mailhost);
 
utl_smtp.mail (mail_conn, 'hbcisservicedesk@hbc.com.com');
 
utl_smtp.rcpt (mail_conn, 'chandra.kadali@partners.hbc.ca');
 
message_1 := 'From: Mr Sender < sender@hbc.com >' || crlf ||
 
'Subject: Testing Hyperlink' || crlf ||
 
'To: Mrs Receiver ' || crlf ||
 
'' || crlf || crlf ;
 
utl_smtp.data(mail_conn, 'MIME-Version: 1.0' ||CHR(13)||CHR(10)||'Content-type: text/html' || CHR(13)||CHR(10)||message_1);
 
utl_smtp.quit (mail_conn);
 
END;