Partial Public Class tiposgestionsiniestros
    Public ReadOnly Property DescripcionDetallada As String
        Get
            Dim sDescripcion
            sDescripcion = Me.Descripcion & " *" & Me.Codigo & " * "
            If Me.idDestinatario.HasValue Then
                sDescripcion &= "(DESTINATARIO: " & Me.enumeraciones1.Descripcion & ")"
            End If
            Return sDescripcion
        End Get
    End Property

End Class