Public Class pagosliquidacionescias
    Public ReadOnly Property ImportePago As Double
        Get
            Return Math.Round(Me.ImporteLiquidaciones + Me.ImporteRegularizacion, 2, MidpointRounding.AwayFromZero)
        End Get
    End Property
    Public ReadOnly Property ImporteCobros As Double
        Get
            Return Math.Round(Me.liquidacionescompanias.Where(Function(x) x.enumeraciones.Codigo <> "TIPLIQ.DESCOBRO").Sum(Function(x) x.Importe), 2, MidpointRounding.AwayFromZero)
        End Get
    End Property
    Public ReadOnly Property ImporteDesCobros As Double
        Get
            Return Math.Round(Me.liquidacionescompanias.Where(Function(x) x.enumeraciones.Codigo = "TIPLIQ.DESCOBRO").Sum(Function(x) x.Importe), 2, MidpointRounding.AwayFromZero)
        End Get
    End Property
    Public Sub ActualizaImportePago()
        Me.OnPropertyChanged("ImportePago")
    End Sub

End Class