Can any one help me
The values from the fields are not getting to my constraints in my RDS report
What am I doing wrong the field I am working with is datetime

Code:
{ WebProperty=True }
Property DateTime psDTEF //String
{ WebProperty=True }
Property DateTime psDTET //String
Code:
Procedure OnConstrain
            Forward Send OnConstrain
                    DateTime dtStart dtStop //String
                    WebGet psDTEF of oCall_StatBasic to dtStart
                    WebGet psDTET of oCall_StatBasic to dtStop
                        Showln "Constrain Value Start = " dtStart
                        Showln "Constrain Value Finish = " dtStop
                   
                    Case Begin
                        Case (not(IsNullDatetime(dtStart)) and not(IsNullDatetime(dtStop)))
                        Constrain Cntnotes.Notedte Between dtStart and dtStop
                        Case Break
                        Case (not(IsNullDatetime(dtStart)))
                        Constrain Cntnotes.Notedte GE dtStart
                        Case Break
                        Case (not(IsNullDatetime(dtStop)))
                        Constrain Cntnotes.Notedte LE dtStop
                    Case End            
        End_Procedure
Code:
            Object oSelDStart is a cWebDateForm
                Set piColumnSpan to 6
                Set psLabel to "Date From:"
                Set piLabelOffset to 80
                Set peLabelAlign to alignRight
                Set peDataType to typeDateTime
            End_Object

            Object oSelDStop is a cWebDateForm
                Set piColumnSpan to 6
                Set peDataType to typeDateTime
                Set psLabel to "Date To:"
                Set piLabelOffset to 80
                Set piColumnSpan to 6
                Set piColumnIndex to 6
                Set peLabelAlign to alignRight
            End_Object
Code:
            Procedure OnClick
                Forward Send OnClick
                DateTime dtVal dtVal1
               WebGet psValue of oSelDStart to dtVal
                WebSet psDTEF of oCall_StatBasic to dtVal
                Showln dtVal
                //---------------------------------------
                WebGet psValue of oSelDStop to dtVal1
                WebSet psDTET of oCall_StatBasic to dtVal1
                Showln dtVal1
                //----------------------------------------
                Send RunReport
            End_Procedure