Imports bdGestionAsegasa.documentospolizassg

Public Class vf_documentospolizassgextendidas
    Public Property FicheroModificado_TMP As Boolean
    Public Property Fichero_TMP As Byte()
    Public Property DocumentoComprobado As Boolean
        Get
            Return Me.FechaComprobacion.HasValue
        End Get
        Set(value As Boolean)
            If value Then
                Me.FechaComprobacion = Now
                Me.idUsuarioComprueba = Utilidades.dsc.idUsuario
                Me.UsuarioComprueba = Utilidades.NombreUsuario
            Else
                Me.FechaComprobacion = Nothing
                Me.idUsuarioComprueba = Nothing
                Me.UsuarioComprueba = ""
            End If
            Me.OnPropertyChanged("idUsuarioComprueba")
            Me.OnPropertyChanged("FechaComprobacion")
            Me.OnPropertyChanged("UsuarioComprueba")
        End Set
    End Property
    Public ReadOnly Property DescripcionTipo
        Get
            Return DirectCast(Tipo, TipoDocumentoEnum).ToString.Replace("_", " ")
        End Get
    End Property
End Class