Oracle - Correo desde ORACLE a traves de Lotus

Ya tengo un procedimiento que envía un correo, pero no consigo adjuntar un fichero. ¿Sabeís cómo hacerlo?

Hola Roque, si estás utilizando objetos OLE, debes crear un objecto de body con texto enriquecido, de esta forma

l_args := ole2.Create_Arglist;
ole2.Add_Arg(l_args, 'Body');
l_att := ole2.Invoke_Obj(l_doc, 'CreateRichTextItem', l_args);
ole2.Destroy_Arglist(l_args);
l_args := ole2.Create_Arglist;
ole2.Add_Arg(l_args, 1454);
ole2.Add_Arg(l_args, '');
ole2.Add_Arg(l_args, m_fich); -- OJO ! m_fich es el fichero a adjuntar
l_fin := ole2.Invoke_Obj(l_att, 'embedobject', l_args);

Tengo un código completo con de envío de un report, creando la sesión notes, poniendo remite, destinatario, etc.. etc... si con el trozo de código que te puse con el texto enriquecido no te es suficiente, pásame un mail y te lo envío completo.

Un saludo,
Eärendel