Partial Public Class gestionesrecibos
    Public ReadOnly Property DetalleCorreo As String
        Get
            If Me.correos IsNot Nothing Then
                If Me.correos.FechaAnulacion.HasValue Then
                    Return "Correo a " & Me.correos.Destinatario & " Anulado el " & Me.correos.FechaAnulacion.Value.ToString("dd/MM/yyyy hh:mm")
                Else
                    If Me.correos.FechaEnvio.HasValue Then
                        Return "Correo a " & Me.correos.Destinatario & " Enviado el " & Me.correos.FechaEnvio.Value.ToString("dd/MM/yyyy hh:mm")
                    Else
                        Return "Correo a " & Me.correos.Destinatario & " pendiente de envio"
                    End If
                End If
            Else
                Return "Sin correo"
            End If
        End Get
    End Property

    Public ReadOnly Property DetalleMensaje As String
        Get
            If Me.mensajes IsNot Nothing Then
                If Me.mensajes.FechaAnulacion.HasValue Then
                    Return "Mensaje a " & Me.mensajes.Destinatario & " Anulado el " & Me.mensajes.FechaAnulacion.Value.ToString("dd/MM/yyyy hh:mm")
                Else
                    If Me.mensajes.FechaEnvio.HasValue Then
                        Return "Mensaje a " & Me.mensajes.Destinatario & " Enviado el " & Me.mensajes.FechaEnvio.Value.ToString("dd/MM/yyyy hh:mm")
                    Else
                        Return "Mensaje a " & Me.mensajes.Destinatario & " pendiente de envio"
                    End If
                End If
            Else
                Return "Sin Mensaje"
            End If
        End Get
    End Property

End Class

Public Enum TipoGestionEnum As Integer
    AVISO_REMESA_O_COBRO_DIRECTO = 1
    AVISO_POLIZA_DE_BAJA = 2
    AVISO_RECIBO_DEVUELTO_BANCO = 3
    AVISO_IMPERATIVO_LEGAL = 4
    SOLICITUD_DATOS_DEL_ASEGURADO_AL_AGENTE = 5
    COMUNICACIÓN_DEVOLUCIÓN_AL_AGENTE = 6
    COMUNICACIÓN_BAJA_AL_AGENTE = 7
    CAMBIO_CARTERA_AGENTE = 8
    AVISO_DEFENSA_CARTERA = 9
    DESCARGA_RECIBO_DE_CIA = 10
    OTROS_HP = 100
    OTROS = 101
    COMUNICACIÓN_EMISION_RECIBO_A_LA_COMPAÑÍA = 200
    IMPRESION_RECIBO_CIA = 300
    IMPRESION_RECIBO_GENERICO = 301
    AVISO_ERRONEO = 1000
End Enum
Public Enum FormaComunicacionEnum
    NINGUNA = 0
    POR_SMS = 1
    POR_CARTA = 2
    SIN_DOMICILIO_NI_TLF_VALIDO = 3
    POR_EMAIL = 4

    'AVISO_REMESA_O_COBRO_DIRECTO_POR_SMS = 1
    'AVISO_REMESA_O_COBRO_DIRECTO_POR_CARTA = 2
    'AVISO_REMESA_O_COBRO_DIRECTO_SIN_DOMICILIO_NI_TLF_VALIDO = 3

    'AVISO_POLIZA_DE_BAJA_POR_SMS = 4
    'AVISO_POLIZA_DE_BAJA_POR_CARTA = 5
    'AVISO_POLIZA_DE_BAJA_SIN_DOMICILIO_NI_TLF_VALIDO = 6

    'AVISO_RECIBO_DEVUELTO_BANCO_POR_SMS = 7
    'AVISO_RECIBO_DEVUELTO_BANCO_POR_CARTA = 8
    'AVISO_RECIBO_DEVUELTO_BANCO_SIN_DOMICILIO_NI_TLF_VALIDO = 9
End Enum