Hello Community,
I am learning dynamics sl development and going through tutorials i got from the internet.
Set up two levels ;Customer and Billable hours.
Here is the sql create table.
Create Table XBillable
(
custID char(15),
Descr char(60),
Hours float,
LineNbr smallint,
NoteId smallint,
SlsperID char(10),
WorkDate smalldatetime
)
go
Create unique index xBillable0
on dbo.XBillable(Custid,LineNbr)
go
Create proc xBillable_p1
@parml varchar(15),
@parm2min smallint,
@parm2max smallint
as
select * from XBillable
where custID=@parml
and LineNbr between @parm2min and @parm2max
order by custID,LineNbr
go
I also created DH file
Option Explicit On
Imports Solomon.Kernel
Module sdoXBillable
Public Class XBillable
Inherits SolomonDataObject
< _
DataBinding(PropertyIndex:=0, StringSize:=15) _
> _
Public Property CustID() As String
Get
Return Me.GetPropertyValue("CustID")
End Get
Set(ByVal setval As String)
Me.SetPropertyValue("CustID", setval)
End Set
End Property
< _
DataBinding(PropertyIndex:=1, StringSize:=60) _
> _
Public Property Descr() As String
Get
Return Me.GetPropertyValue("Descr")
End Get
Set(ByVal setval As String)
Me.SetPropertyValue("Descr", setval)
End Set
End Property
< _
DataBinding(PropertyIndex:=2) _
> _
Public Property Hours() As Double
Get
Return Me.GetPropertyValue("Hours")
End Get
Set(ByVal setval As Double)
Me.SetPropertyValue("Hours", setval)
End Set
End Property
< _
DataBinding(PropertyIndex:=3) _
> _
Public Property LineNbr() As Integer
Get
Return Me.GetPropertyValue("LineNbr")
End Get
Set(ByVal setval As Integer)
Me.SetPropertyValue("LineNbr", setval)
End Set
End Property
< _
DataBinding(PropertyIndex:=4) _
> _
Public Property NoteId() As Integer
Get
Return Me.GetPropertyValue("NoteId")
End Get
Set(ByVal setval As Integer)
Me.SetPropertyValue("NoteId", setval)
End Set
End Property
< _
DataBinding(PropertyIndex:=5, StringSize:=10) _
> _
Public Property SlsperID() As String
Get
Return Me.GetPropertyValue("SlsperID")
End Get
Set(ByVal setval As String)
Me.SetPropertyValue("SlsperID", setval)
End Set
End Property
< _
DataBinding(PropertyIndex:=6) _
> _
Public Property WorkDate() As Integer
Get
Return Me.GetPropertyValue("WorkDate")
End Get
Set(ByVal setval As Integer)
Me.SetPropertyValue("WorkDate", setval)
End Set
End Property
End Class
Public bXBillable As XBillable = New XBillable, nXBillable As XBillable = New XBillable
End Module
On form1 Udate1 control i added two levels: Customer;N,XBillable ;D
I added all controls...and their levels.
why getting the above error?
I have attached my project .
Please kindly review and assist.
ST26000.zip
Ronald.
