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

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
mathieu_cuprykAsked:
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

rboyd56Commented:
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
mathieu_cuprykAuthor Commented:
I am new to this EL 2.0 how do I go about doing so?
0
rboyd56Commented:
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
mathieu_cuprykAuthor Commented:
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
rboyd56Commented:
Did that work?

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

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

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Visual Basic Classic

From novice to tech pro — start learning today.

Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.