The application specified size of record xbillableHours (105) does not match the database declared size(101).

CREATE TABLE [dbo].[XBillableHours](
	[custID] [char](15) NOT NULL,
	[Descr] [char](60) NOT NULL,
	[Hours] [float] NOT NULL,
	[LineNbr] [smallint] NOT NULL,
	[NoteId] [smallint] NULL,
	[SlsperID] [char](10) NOT NULL,
	[WorkDate] [smalldatetime] NOT NULL,
	[tstamp] [timestamp] NOT NULL,
 CONSTRAINT [XBillableHours0] PRIMARY KEY CLUSTERED 
(
	[custID] ASC,
	[LineNbr] ASC
)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
) ON [PRIMARY]

Public Class XBillableHours
        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 bXBillableHours As XBillableHours = New XBillableHours, nXBillableHours As XBillableHours = New XBillableHours

    Public CSR_XBillableHours As Short
    Public Sub Init_XBillableHours(ByRef x_Level As Short, ByRef x_Cursor As Boolean)
        Call SetAddr(x_Level, "bXBillableHours", bXBillableHours, nXBillableHours)
        If x_Cursor = True Then
            Call SqlCursorEx(CSR_XBillableHours, x_Level, "CSR_XBillableHours", "XBillableHours", "XBillableHours")
        End If
    End Sub