Error en UTL_SMTP
Publicado por EdaurdoC (75 intervenciones) el 21/10/2009 18:09:59
Estimados,
Tengo un Procedure que me ejecuta correctamente en Oracle10g desde PBuider. pero cuando lo he copio para Oracle 8i al mandarlo a ejecutar tambien desde Power Builder 10.5, me da el siguiente error:
ORACLE - ODBC - "Syntax error or access violation " .
este es el procedimeiento si alguien le puede dar una revision o indicarme alguna pista:
OJO: si ejecuto el procedeminito desde el TOAD en Oracle8i si funciona.
CREATE OR REPLACE PROCEDURE "SENDY_MAIL"
( p_sender in varchar2,
p_recipient in varchar2,
p_message in varchar2,
p_cc in varchar2 ,
p_subject in varchar2
) as
l_mailhost Varchar2(255) :='100.134.1.6';
l_mail_conn utl_smtp.connection;
PROCEDURE send_header(name IN VARCHAR2, header IN VARCHAR2) AS
BEGIN
utl_smtp.write_data(l_mail_conn, name || ': ' || header || utl_tcp.CRLF);
END;
begin
l_mail_conn := utl_smtp.open_connection(l_mailhost, 25);
utl_smtp.helo(l_mail_conn, l_mailhost);
utl_smtp.mail(l_mail_conn, p_sender);
utl_smtp.rcpt(l_mail_conn, p_recipient);
utl_smtp.rcpt(l_mail_conn, p_cc);
utl_smtp.open_data(l_mail_conn );
send_header('Subject', p_subject);
utl_smtp.write_data(l_mail_conn, p_message);
utl_smtp.close_data(l_mail_conn );
utl_smtp.quit(l_mail_conn);
null;
end sendy_mail;
/
Tengo un Procedure que me ejecuta correctamente en Oracle10g desde PBuider. pero cuando lo he copio para Oracle 8i al mandarlo a ejecutar tambien desde Power Builder 10.5, me da el siguiente error:
ORACLE - ODBC - "Syntax error or access violation " .
este es el procedimeiento si alguien le puede dar una revision o indicarme alguna pista:
OJO: si ejecuto el procedeminito desde el TOAD en Oracle8i si funciona.
CREATE OR REPLACE PROCEDURE "SENDY_MAIL"
( p_sender in varchar2,
p_recipient in varchar2,
p_message in varchar2,
p_cc in varchar2 ,
p_subject in varchar2
) as
l_mailhost Varchar2(255) :='100.134.1.6';
l_mail_conn utl_smtp.connection;
PROCEDURE send_header(name IN VARCHAR2, header IN VARCHAR2) AS
BEGIN
utl_smtp.write_data(l_mail_conn, name || ': ' || header || utl_tcp.CRLF);
END;
begin
l_mail_conn := utl_smtp.open_connection(l_mailhost, 25);
utl_smtp.helo(l_mail_conn, l_mailhost);
utl_smtp.mail(l_mail_conn, p_sender);
utl_smtp.rcpt(l_mail_conn, p_recipient);
utl_smtp.rcpt(l_mail_conn, p_cc);
utl_smtp.open_data(l_mail_conn );
send_header('Subject', p_subject);
utl_smtp.write_data(l_mail_conn, p_message);
utl_smtp.close_data(l_mail_conn );
utl_smtp.quit(l_mail_conn);
null;
end sendy_mail;
/
Valora esta pregunta


0