Thanks for your reply Logor.
For the above mentioned system i'v created two classes -
1. CaseMemo
Public Class CaseMemo
#Region "Properties"
Private _CM_NO As Integer
Public Property CM_NO() As Integer
Get
Return _CM_NO
End Get
Set(ByVal value As Integer)
_CM_NO = value
End Set
End Property
Private _CUST_NAME As String
Public Property CUST_NAME() As String
Get
Return _CUST_NAME
End Get
Set(ByVal value As String)
_CUST_NAME = value
End Set
End Property
Private _CM_DATE As Date
Public Property CM_DATE() As Date
Get
Return _CM_DATE
End Get
Set(ByVal value As Date)
_CM_DATE = value
End Set
End Property
#End Region
#Region "Methods"
Public Function AddCaseMemo() As Boolean
End Function
Public Function DeleteCaseMemo() As Int16
End Function
Public Function UpdateCaseMemo() As Int16
End Function
#End Region
End Class
and
2. CaseMemoDetails
Public Class CaseMemoDetails
#Region "Properties"
Private _CM_NO As Integer
Public Property CM_NO() As Integer
Get
Return _CM_NO
End Get
Set(ByVal value As Integer)
_CM_NO = value
End Set
End Property
Private _ITEM_NO As Integer
Public Property ITEM_NO() As Integer
Get
Return _ITEM_NO
End Get
Set(ByVal value As Integer)
_ITEM_NO = value
End Set
End Property
Private _ITEM As String
Public Property ITEM() As String
Get
Return _ITEM
End Get
Set(ByVal value As String)
_ITEM = value
End Set
End Property
Private _QTY As Integer
Public Property QTY() As Integer
Get
Return _QTY
End Get
Set(ByVal value As Integer)
_QTY = value
End Set
End Property
Private _PRICE As Double
Public Property PRICE() As Double
Get
Return _PRICE
End Get
Set(ByVal value As Double)
_PRICE = value
End Set
End Property
#End Region
#Region "Methods"
Public Function AddCaseMemoDetail() As Boolean
End Function
Public Function DeleteCaseMemoDetail() As Int16
End Function
Public Function UpdateCaseMemoDetail() As Int16
End Function
#End Region
End Class
Now I'm confused whether a property/field of CaseMemoDetails will be needed inside the CaseMemo. I'l be very grateful if you enlighten me.