Is this Procedure is OK [message #215863] |
Wed, 24 January 2007 02:06 |
sponguru_dba
Messages: 51 Registered: May 2005 Location: Bangalore
|
Member |
|
|
Please help me while i'm this proc i'm getting comapil error
Create or replace procedure mail1(text varchar2) is
--mailhost VARCHAR2(64) := 'visdy.ssds.slead.com';
sender VARCHAR2(64) := 'abc@abc.com';
recipient VARCHAR2(64) := 'xyz@xyz.com';
mail_conn utl_smtp.connection;
begin
--mail_conn := utl_smtp.open_connection(mailhost, 25);
mail_conn := utl_smtp.open_connection(usage_rec.'111.11.11.11',usage_rec.25);
utl_smtp.helo(mail_conn, usage_rec.'111.11.11.11');
utl_smtp.mail(mail_conn, sender);
utl_smtp.rcpt(mail_conn, recipient);
utl_smtp.open_data(mail_conn);
utl_smtp.write_data(mail_conn, 'Subject: test'utl_tcp.CRLF);
utl_smtp.write_data(mail_conn, text|| chr(13));
utl_smtp.close_data(mail_conn);
utl_smtp.quit(mail_conn);
end
|
|
|
|