Solved

Procedure 'usp_GetDatePeriodFromTo' expects parameter '@YEARMONTH', which was not supplied.

Posted on 2007-03-28
5
258 Views
Last Modified: 2013-11-25
I am using the enterpriselib 2.0

Public Function GetBusinessCalendarPeriod(ByVal DatePeriod As String) As DataTable
           ' DatePeriod is the YearMonth
            Dim retVal As New DataTable("BusinessCalendars")

            Dim cmd As DbCommand
            Dim tmpds As DataSet

            Try
                'We get the divisions
                cmd = dbManager.GetStoredProcCommand("SENZA.dbo.usp_GetDatePeriodFromTo")

                'Temporarilly put the results in a dataset so we can check for valid data
                tmpds = dbManager.ExecuteDataSet(cmd)

                'We must ensure that only one table was returned in the execution of the query
                If tmpds.Tables.Count.Equals(1) Then

                    'We also need to ensure that there is data
                    If tmpds.Tables(0).Rows.Count > 0 Then

                        retVal = tmpds.Tables(0)

                    Else
                        Return retVal
                    End If
                Else
                    Return retVal
                End If

            Catch ex As Exception
                Throw ex
            Finally
                'Cleaning up
                If Not tmpds Is Nothing Then
                    tmpds.Dispose()
                End If

                If Not cmd Is Nothing Then
                    cmd.Dispose()
                End If

            End Try

            Return retVal
        End Function
Procedure 'usp_GetDatePeriodFromTo' expects parameter '@YEARMONTH', which was not supplied.

Private Sub cmdProceed_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles cmdProceed.Click
        _calendar.GetBusinessCalendarPeriod(txtPeriod.Text)
        Response.Write("Calendar")
    End Sub
0
Comment
Question by:mathieu_cupryk
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 3
  • 2
5 Comments
 
LVL 16

Expert Comment

by:rboyd56
ID: 18810612
Basically the stored procedure you are calling requires the @YEARMONTH parameter and you are not passing it with this command:

 cmd = dbManager.GetStoredProcCommand("SENZA.dbo.usp_GetDatePeriodFromTo")

 'Temporarilly put the results in a dataset so we can check for valid data
  tmpds = dbManager.ExecuteDataSet(cmd)
0
 

Author Comment

by:mathieu_cupryk
ID: 18810685
I am new to this EL 2.0 how do I go about doing so?
0
 
LVL 16

Expert Comment

by:rboyd56
ID: 18810804
You can probably change your code to this. I believe this will do it.


cmd = dbManager.GetStoredProcCommand("SENZA.dbo.usp_GetDatePeriodFromTo")
dbmanager.AddInParameter(cmd, "Year and Month", DbType.DateTime, New DateTime(1997, 1, 1))
'Temporarilly put the results in a dataset so we can check for valid data
  tmpds = dbManager.ExecuteDataSet(cmd)


0
 

Author Comment

by:mathieu_cupryk
ID: 18810857
Dim retVal As New DataTable("BusinessCalendars")

            Dim cmd As DbCommand
            Dim tmpds As DataSet

            Try
                'We get the divisions
                cmd = dbManager.GetStoredProcCommand("SENZA.dbo.usp_GetDatePeriodFromTo")

                dbManager.AddInParameter(cmd, "@YEARMM", DatePeriod)
               
                'Temporarilly put the results in a dataset so we can check for valid data
                tmpds = dbManager.ExecuteDataSet(cmd)

                'We must ensure that only one table was returned in the execution of the query
                If tmpds.Tables.Count.Equals(1) Then

                    'We also need to ensure that there is data
                    If tmpds.Tables(0).Rows.Count > 0 Then

                        retVal = tmpds.Tables(0)

                    Else
                        Return retVal
                    End If
                Else
                    Return retVal
                End If

            Catch ex As Exception
                Throw ex
            Finally
                'Cleaning up
                If Not tmpds Is Nothing Then
                    tmpds.Dispose()
                End If

                If Not cmd Is Nothing Then
                    cmd.Dispose()
                End If

            End Try

            Return retVal
        End Function

    End Class
0
 
LVL 16

Accepted Solution

by:
rboyd56 earned 500 total points
ID: 18810896
Did that work?

If not, look at this URL for the proper syntax:

http://www.daveandal.net/articles/EntLibASPNET/EnterpriseLibraryInASPNET-2.htm
0

Featured Post

Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

If you need to start windows update installation remotely or as a scheduled task you will find this very helpful.
In this article we will learn how to fix  “Cannot install SQL Server 2014 Service Pack 2: Unable to install windows installer msi file” error ?
This video shows, step by step, how to configure Oracle Heterogeneous Services via the Generic Gateway Agent in order to make a connection from an Oracle session and access a remote SQL Server database table.
This lesson covers basic error handling code in Microsoft Excel using VBA. This is the first lesson in a 3-part series that uses code to loop through an Excel spreadsheet in VBA and then fix errors, taking advantage of error handling code. This l…

734 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question