troubleshooting Question

ExecProcedure in Lotus Script

Avatar of LYekelchik2007
LYekelchik2007Flag for United States of America asked on
Lotus IBMScripting Languages
5 Comments2 Solutions1161 ViewsLast Modified:
hi ..
I am using the foolwing script
Dim session As New NotesSession
      Dim db As NotesDatabase
      Dim con As New ODBCConnection
      Dim qry As New ODBCQuery
      Dim result As New ODBCResultSet
      Dim status As Variant
      
      Dim sqlString As String      
      Dim doc As NotesDocument
      
      Dim W As New NotesUIWorkspace    
      Dim UIDoc As NotesUIDocument
      
      Set UIDoc = W.CurrentDocument
      Set doc = UIDoc.Document    
      
      sLeadID = doc.LeadID(0)
      
      Set db = session.CurrentDatabase
      Set qry.Connection = con
      Set result.Query = qry
      Call  DbConnect(con)
      
      If con.DataSourceName <> "" Then status = True
      Set result.Connection = con
      Call  result.ExecProcedure("PROC_HOPGetApplicationNextNumber","'sLeadID'")
<<<>>>

      
      TT  = result.GetValue(1)
      TT2  = result.GetValue(2)
      Messagebox TT2,, "Value of first row"
      
      con.Disconnect        


question.. ?
Can we check result after ExecProcedure
Call  result.ExecProcedure("PROC_HOPGetApplicationNextNumber","'sLeadID'")
how script will be check result ?

 
ASKER CERTIFIED SOLUTION
Sjef Bosman
Groupware Consultant

Our community of experts have been thoroughly vetted for their expertise and industry experience.

Join our community to see this answer!
Unlock 2 Answers and 5 Comments.
Start Free Trial
Learn from the best

Network and collaborate with thousands of CTOs, CISOs, and IT Pros rooting for you and your success.

Andrew Hancock - VMware vExpert
See if this solution works for you by signing up for a 7 day free trial.
Unlock 2 Answers and 5 Comments.
Try for 7 days

”The time we save is the biggest benefit of E-E to our team. What could take multiple guys 2 hours or more each to find is accessed in around 15 minutes on Experts Exchange.

-Mike Kapnisakis, Warner Bros