Creating a Lotus Notes Document with oracle forms

From: jagigo <member25537_at_dbforums.com>
Date: Tue, 25 Feb 2003 14:25:05 +0000
Message-ID: <2571931.1046183105_at_dbforums.com>


Hi,
I need to create a NotoesDocument with Oracle forms and send an email with a link to this new document. I've seen an example that send an automatic mail I try this example and it works ok but I canīt create a notes document.

I try with this code (I donīt have errors but it doesnīt create any document):

PROCEDURE fr_CreaDocumento (l_session ole2.obj_type) IS

  l_args    ole2.list_type;
  l_db      ole2.obj_type;
  l_doccoti  ole2.obj_type;

BEGIN   l_args := ole2.Create_Arglist;

  • then Document that I want to create must be in the database
  • prueba.nsf, this database is the server_out server

  ole2.Add_Arg(l_args, 'SERVER_OUT');
  ole2.Add_Arg(l_args, 'epps_desarrollo\prueba.nsf');

  l_db := ole2.Invoke_Obj(l_session, 'GetDatabase', l_args);

  ole2.Destroy_Arglist(l_args);

  l_doccoti:= ole2.Invoke_obj(l_db, 'CreateDocument');

  ole2.Set_Property(l_doCCOTI, 'form', 'form1'); --this is the name of   the notes form

  ole2.Set_Property(l_doCCOTI, 'autor', 'desconocido'); --autor is an   item in the form1 Notesform

  l_args := ole2.Create_Arglist;
  ole2.Add_Arg(l_args, 'False');
  ole2.Add_Arg(l_args, 'True');

  ole2.Invoke(l_doccoti, 'Save',l_args);

  ole2.Destroy_Arglist(l_args);

  ole2.Release_Obj(l_db);
  ole2.Release_Obj(l_doccoti);

END;

--
Jagigo


Posted via http://dbforums.com
Received on Tue Feb 25 2003 - 15:25:05 CET

Original text of this message