SQL & PL/SQL

Hi All,

BANNER
----------------------------------------------------------------
Oracle Database 10g Enterprise Edition Release 10.2.0.4.0 - 64bi
PL/SQL Release 10.2.0.4.0 - Production
CORE    10.2.0.4.0      Production
TNS for 64-bit Windows: Version 10.2.0.4.0 - Production
NLSRTL Version 10.2.0.4.0 - Production

I have Query--
I am using oracle plsql procedure for sending mail and its working fine but the time of send, it's showing wrong.
Suppose i am sending mail now so it's showing send time in my inbox 5 hour More.

DECLARE
   v_From       VARCHAR2(80) := 'EMAIL_ID';
   v_Recipient  VARCHAR2(80) := 'EMAIL_ID'; 
  v_Subject    VARCHAR2(80) := 'MAIL FOR TESET ';
   v_Mail_Host  VARCHAR2(30) := 'SMTP_IP';
   v_Mail_Conn  utl_smtp.Connection;
   crlf         VARCHAR2(2)  := chr(13)||chr(10);
   v_date varchar2(50);

BEGIN

select to_char(sysdate,'DD-MON-YYYY HH24:MI:SS AM') INTO V_DATE FROM DUAL;

 v_Mail_Conn := utl_smtp.Open_Connection(v_Mail_Host);
  utl_smtp.Helo(v_Mail_Conn, v_Mail_Host);
  utl_smtp.Mail(v_Mail_Conn, v_From);
  utl_smtp.Rcpt(v_Mail_Conn, v_Recipient);
--OPEN DATA CONNNECTION
  UTL_SMTP.OPEN_DATA(v_mail_conn);


--MAIL HEADER
  utl_smtp.write_DATA(v_Mail_Conn,'Date: '   || V_dATE || crlf);
  utl_smtp.write_DATA(v_Mail_Conn,'From: '   || v_From || crlf );
  utl_smtp.write_DATA(v_Mail_Conn,'Subject: '|| v_Subject ||sysdate||crlf);
  utl_smtp.write_DATA(v_Mail_Conn,'To: '     || v_Recipient || crlf);

--MAIL BODY
  utl_smtp.write_DATA(v_Mail_Conn,'MIME-Version: 1.0'|| crlf );
  utl_smtp.write_DATA(v_Mail_Conn,'Content-Type: multipart/mixed;'|| crlf );
  utl_smtp.write_DATA(v_Mail_Conn,' boundary="-----SECBOUND"'|| crlf ||crlf );
  utl_smtp.write_DATA(v_Mail_Conn,'-------SECBOUND'|| crlf );
  utl_smtp.write_DATA(v_Mail_Conn,'Content-Type: text/plain;'|| crlf);
  utl_smtp.write_DATA(v_Mail_Conn,'Content-Transfer_Encoding: 7bit'|| crlf);
  utl_smtp.write_DATA(v_Mail_Conn,null|| crlf);
  utl_smtp.write_DATA(v_Mail_Conn,null|| crlf);
  utl_smtp.write_DATA(v_Mail_Conn,null|| crlf);

  utl_smtp.write_DATA(v_Mail_Conn,'Dear All'|| crlf);
  utl_smtp.write_DATA(v_Mail_Conn,'THIS IS A TEST MAIL.' || crlf);
  utl_smtp.write_DATA(v_Mail_Conn,null|| crlf);
  
--MAIL BODY
      utl_smtp.write_data(v_Mail_Conn, utl_tcp.CRLF ||'This mail is auto generated.');

--CLOSE CONNECTION
  UTL_SMTP.CLOSE_DATA(v_mail_conn);
  utl_smtp.Quit(v_mail_conn);
EXCEPTION
  WHEN utl_smtp.Transient_Error OR utl_smtp.Permanent_Error then
    raise_application_error(-20000, 'Unable to send mail: '||sqlerrm);
END;

I have declare a verible for storing date and initialize it with current date.

I have also tried by providing below but not working.

  utl_smtp.write_DATA(v_Mail_Conn,'Date: '   || to_char(sysdate,'DD-MON-YYYY HH24:MI:SS AM') || crlf);

can anybody pleaes help me to get the correct received time.