That code is present , but when the Me._entity.setdatarow line fires Me.DataRow is nothing.

GET
If Me._entity Is Nothing Then
	Me._entity = New CUSTOMEREntity()
End If
Me._entity.SetDataRow(Me.DataRow)
Return Me._entity
End Get
Set
 Me._entity = value
End Set