ExecProcedure in Lotus Script

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 ?