[Openroad-users] Openroad-users Digest, Vol 17, Issue 9

[cpszallies at mmm.com]

Bodo,

many thanks for your help, this way reading the .ini-file does work 
properly.

By the way - I don't know who ate the characters, maybe a new kind of 
internet-worm?  ;-)

Regards
Christoph Szallies
3M Deutschland GmbH
Carl-Schurz-Str. 1
D-41453 Neuss
Information Technology, NADS
Tel:  +49 (0) 2131 14 2825       Triminet 444 2825
Fax:  +49 (0) 2131 14 12 2825



Message: 4
Date: Wed, 13 Feb 2008 10:59:57 -0500
From: "Bodo Bergmann" <Bodo.Bergmann at ingres.com>
Subject: Re: [Openroad-users] Using a Lotus NotesSession in OpenRaod
To: "International OpenROAD Users" <openroad-users at peerlessit.com>,
                 <openroad-users at sealion.peerlessit.com>
Message-ID:
 <21C3E073B82EFE4F8A76536D9066FE5601630BE6 at USINVMAILB01.ingres.prv>
Content-Type: text/plain; charset="iso-8859-1"

Hi Christoph,
 
something seemed to have eaten the first character following the equal 
sign, but I was able to read the code
Error '-2147352573' is 0x80020003 means "Member not found" - don't know if 
that is of any help.
 
As you try to get the values from the INI file, why aren't you just using 
the classes provided by OpenROAD for it (ProfileObject etc.)?
See chapter "Dedicated UserClasses for .INI File Support" in the Language 
Reference Manual.
 
Bodo
 
Bodo Bergmann
Senior Software Engineer
OpenROAD Worldwide Development
Ingres Corp.
 


________________________________

From: openroad-users-bounces at peerlessit.com 
[mailto:openroad-users-bounces at peerlessit.com] On Behalf Of 
cpszallies at mmm.com
Sent: Wednesday, February 13, 2008 4:03 PM
To: openroad-users at sealion.peerlessit.com
Subject: [Openroad-users] Using a Lotus NotesSession in OpenRaod



Hi all, 

I want to create a Lotus Notes Memo out of OpenRoad. Therefore I need to 
get the MailServer and MailFile from the Notes.ini. 
I tried using following script 

DECLARE 
        subject_line  =ARCHAR(200) NOT NULL, 
        email_address =ARCHAR(200) NOT NULL; 
        text          =ARCHAR(4000) NOT NULL; 

        MailServer    =ARCHAR(200) NOT NULL; 
        MailFile      =ARCHAR(200) NOT NULL; 

        notessession      =otus_notes!NotesSession; 
        notesuiworkspace  =otus_notes!NotesUiworkspace; 
        notesuidocument   =otus_notes!NotesUIDocument; 
 
ENDDECLARE 

BEGIN 

END; 

on click mail_bf =font> 
declare 

enddeclare 

begin 

  text =This will be the textbody'; 

  MailServer =otesSession.GetEnvironmentString( 'MailServer' ); 
  MailFile   =otesSession.GetEnvironmentString( 'MailFile' ); 

  subject_line =Test E-Mail'; 
  email_address =cpszallies at mmm.com'; 

  notesUIWorkspace.OpenDatabase( MailServer, MailFile, , , 0, 0 ); 

  notesuidocument =otesuiworkspace.composedocument(MailServer, MailFile, 
'Memo',,); 

  notesuidocument.fieldsettext('Entersendto',email_address); 
  notesuidocument.fieldsettext('subject', subject_line); 
  notesuidocument.fieldsettext('Body', text); 

end; 


But invoking the NotesSession.GetEnvironmentString method returns no value 
allthough these values are provided in the Notes.ini. 
And I am not even able to examine the attributes of the declared 
NotesSession while in debug mode. If I try so the following error appears 
in the OpenRoad Trace Window and w4gl.log 

E_WT0029 Error at line 1076 of scriptwin. 


E_WT006D The invocation of an external object method failed. 
    The method 'classname' for source '<missing>' returned an error code 
of 
    -2147352573 and the error message: 
 '<missing>' 

Any help would be very appreciated. 

Kind regards 
Christoph Szallies
3M Deutschland GmbH
Carl-Schurz-Str. 1
D-41453 Neuss
Information Technology, NADS
Tel:  +49 (0) 2131 14 2825       Triminet 444 2825
Fax:  +49 (0) 2131 14 12 2825 
3M Deutschland GmbH
Sitz: 41453 Neuss; Handelsregister: B 1878 Amtsgericht Neuss
Gesch?ftsf?hrer: J?rgen Jaworski; Josef Mrozek; Theo N?cker; Kurt-Henning 
Wiethoff
Managing Director: Kurt-Henning Wiethoff; Vorsitzender des Aufsichtsrates: 
Reinhold Hiersemann



3M Deutschland GmbH
Sitz: 41453 Neuss; Handelsregister: B 1878 Amtsgericht Neuss
Geschäftsführer: Jürgen Jaworski; Josef Mrozek; Theo Nöcker; Kurt-Henning
Wiethoff
Managing Director: Kurt-Henning Wiethoff; Vorsitzender des Aufsichtsrates:
Reinhold Hiersemann

-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://www.peerlessit.com/pipermail/openroad-users/attachments/20080218/5061ae69/attachment.html