53: * c utl_smtp.connection;
54: *
55: * PROCEDURE send_header(name IN VARCHAR2, header IN VARCHAR2) AS
56: * BEGIN
57: * utl_smtp.write_data(c, name || ': ' || header || utl_tcp.CRLF);
58: * END;
59: *
60: * BEGIN
61: * c := utl_smtp.open_connection('smtp-server.acme.com');
65: * utl_smtp.open_data(c);
66: * send_header('From', '"Sender"
67: * send_header('To', '"Recipient"
68: * send_header('Subject', 'Hello');
69: * utl_smtp.write_data(c, utl_tcp.CRLF || 'Hello, world!');
70: * utl_smtp.close_data(c);
71: * utl_smtp.quit(c);
72: * EXCEPTION
73: * WHEN utl_smtp.transient_error OR utl_smtp.permanent_error THEN
90: TYPE connection IS RECORD (
91: host VARCHAR2(255), -- Host name of SMTP server
92: port PLS_INTEGER, -- Port number of SMTP server
93: tx_timeout PLS_INTEGER, -- Transfer time-out (in seconds)
94: private_tcp_con utl_tcp.connection, -- For internal use only
95: private_state PLS_INTEGER -- For internal use only
96: );
97:
98: /*