50 lines
1.6 KiB
VB.net
50 lines
1.6 KiB
VB.net
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
|