14 lines
447 B
VB.net
14 lines
447 B
VB.net
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
|