Re: DB2 LSX

It would be Uselsx "*LSXDB2". (DB2 Connection).

Also a few questions:

1.   Why do you not autocommit?
2.   Is the QIWS/QCUSTCDT a library and file from your AS/400 system?  If
so, why are you quering a AS/400 file?
3.   Why do I need a qry & SQL Parameters?  I have a field(s) whose values
I have stored in my scripted agent and want to update a file on the AS/400
file.

Thanks,

Dave Bednarcik
Email: DaveBednarcik@WesternUnion.com
Work #: (201)263-5186
Fax # : (201)263-5455


                                                                                
                
                    "Walter Scanlan"                                            
                
                    <wscanlan@us.ibm.c        To:     DOMINO400@midrange.com    
                
                    om>                       cc:                               
                
                    Sent by:                  Fax to:                           
                
                    owner-domino400@mi        Subject:     Re: DB2 LSX          
                
                    drange.com                                                  
                
                                                                                
                
                                                                                
                
                    06/22/01 09:49 AM                                           
                
                    Please respond to                                           
                
                    DOMINO400                                                   
                
                                                                                
                
                                                                                
                





Dave,
     You didn't say if you wanted LSXLC or LSXODBC.

This is the sample I recommend to verify the connection if available.

Event Options:
  Option Public
  Uselsx "*lsxodbc"
Sub Initialize
     Dim con As New ODBCConnection
     Dim qry As New ODBCQuery
     Dim res As New ODBCResultSet

     con.autocommit=False
     If (con.connectto("remotesystem","user","password")) Then
          qry.sql ="select * from QIWS/QCUSTCDT"
          Set res.Query = qry
          Res.Execute
          Call Res.FirstRow
          Res.Close(Db_Close)
          Call con.disconnect
     End If
End Sub

Walter Scanlan
Advisory Software Engineer
Domino for AS/400 Team Leader
Internet wscanlan@us.ibm.com



                    DaveBednarcik@Wester

                    nUnion.com                 To:
DOMINO400@midrange.com
                    Sent by:                   cc:

                    owner-domino400@midr       Subject:     DB2 LSX

                    ange.com



                    06/21/2001 04:54 PM

                    Please respond to

                    DOMINO400






I am trying to write to a DB2 file on the AS/400 using Lotus Script (DB2
LSX classes) but I am having no results.  Does anyone have any examples
that I could look at?

Thanks,

Dave Bednarcik
Email: DaveBednarcik@WesternUnion.com
Work #: (201)263-5186
Fax # : (201)263-5455

+---
| This is the Domino/400 Mailing List!
| To submit a new message, send your mail to DOMINO400@midrange.com.
| To subscribe to this list send email to DOMINO400-SUB@midrange.com.
| To unsubscribe from this list send email to DOMINO400-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: meechamw@ptd.net
+---




+---
| This is the Domino/400 Mailing List!
| To submit a new message, send your mail to DOMINO400@midrange.com.
| To subscribe to this list send email to DOMINO400-SUB@midrange.com.
| To unsubscribe from this list send email to DOMINO400-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: meechamw@ptd.net
+---




+---
| This is the Domino/400 Mailing List!
| To submit a new message, send your mail to DOMINO400@midrange.com.
| To subscribe to this list send email to DOMINO400-SUB@midrange.com.
| To unsubscribe from this list send email to DOMINO400-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: meechamw@ptd.net
+---