I need to call DB2 stored procedure from my VB application using ADO.
I want to call it directly without using parameter object.
ie by using "Call proc_name param1, param2, ....."
Also the stored procedure has output parameters.
Can anyone suggest how to make this call and how to retrieve the values from the output parameters?

Thanks in advance,
sangsri

Here is the code. The procedure executes perfectly but, it does not return the result set!!!!
I'm working on it. Let me know if I'm doing any thing wrong!!!

Vineet


Private Sub StorProcExecu()
        Dim PROD_ID_CODE As String
        Dim ALT_INV_C As Char
        Dim ELIG_CODE As Char
        Dim CLS_PRC_AMT As Decimal
        Dim DESCRIPTION As String
        Dim OleDbReader As OleDb.OleDbDataReader
        Dim OleDBStr As String = "Provider=""IBMDADB2.1"";Mode=ReadWrite;User ID=XXXXXXX;Data Source=XXXXXXX;Persist " & _
        "Security Info=True;Password=""XXXXXXX"""
        Dim OleDbConn As New OleDb.OleDbConnection(OleDBStr)
        Dim mySelectQuery As String = "call sydb2ft.fbspsm02('042991109',' ',' ','0001-01-01','0001-01-01','0001-01-01',' ',' ','A',' ');"
        'Dim mySelectQuery As String = "SELECT EMPNO FROM A004859.EMP"
        Dim OleDbCmd As New OleDb.OleDbCommand(mySelectQuery, OleDbConn)
        OleDbCmd.CommandType = CommandType.Text
        Try

            OleDbConn.Open()
            OleDbReader = OleDbCmd.ExecuteReader(CommandBehavior.CloseConnec tion)
            While OleDbReader.Read()
                PROD_ID_CODE = OleDbReader.Item("PROD_ID_CODE")
                ALT_INV_C = OleDbReader.Item("ALT_INV_C")
                ELIG_CODE = OleDbReader.Item("ELIG_CODE")
                CLS_PRC_AMT = OleDbReader.Item("CLS_PRC_AMT")
                DESCRIPTION = OleDbReader.Item("DESCRIPTION")
            End While
        Catch ex As Exception
            ex.Message.ToString()
        Finally
            OleDbReader.Close()
            OleDbConn.Close()
        End Try
    End Sub