Partial Public Class detallesamortizacionrecibos
    Public ReadOnly Property MesFecha As String
        Get
            Dim Mes = Me.Mes.ToString
            Return Mes.Substring(0, 4) + "/" + Mes.Substring(4, 2)
        End Get
    End Property




    'Public Property AEliminar_tmp As Boolean
End Class
Public Class ve_detallesamortizacionrecibos
    Public Property idDetalle As Integer
    Public Property idAmortizacion As Integer
    Public Property idRecibo As Integer?

    Public Property FechaInicioAmortizacion As Date
    Public Property FechaFinAmortizacion As Date
    Public Property PorcentajeAnual As Integer?
    Public Property FechaBaja As Date?
    Public Property idMotivoBaja As Integer?
    Public Property idEmpresa As Integer
    Public Property NumeroCuenta As String
    Public Property Observaciones As String
    Public Property FechaAlta As Date?
    Public Property CodigoRecibo As String
    Public Property FechaEfecto As Date
    Public Property TotalRecibo As Double
    Public Property Ramo As String
    Public Property Compañía As String
    Public Property Tomador As String
    Public Property CIFTomador As String
    Public Property CausaBaja As String
    Public Property Empresa As String

    Public Property ValorAmortizado As Double
    Public Property ValorAcumulado As Double
    Public Property ValorResidual As Double
    Public Property Mes As Integer
    Public Property FechaAplicacion As DateTime?
    Public ReadOnly Property MesFecha As String
        Get
            Dim Mes = Me.Mes.ToString
            Return Mes.Substring(0, 4) + "/" + Mes.Substring(4, 2)
        End Get
    End Property
End Class