Imports ProcesosEIAC_V6
Partial Public Class estadossiniestros_eiac
    Public Shared Function ObtieneSituacionSiniestroV6(Clave As claves_situacionsiniestro) As Integer
        Try
            Select Case Clave
                Case claves_situacionsiniestro.AP
                    Return ClavesSituacionSiniestroEnum.ABIERTO
                Case claves_situacionsiniestro.CE
                    Return ClavesSituacionSiniestroEnum.CERRADO
                Case claves_situacionsiniestro.RA
                    Return ClavesSituacionSiniestroEnum.REABIERTO
                Case claves_situacionsiniestro.RC
                    Return ClavesSituacionSiniestroEnum.RECHAZADO
                Case Else
                    Return ClavesSituacionSiniestroEnum.DESCONOCIDA
            End Select
        Catch ex As Exception
            Return ClavesSituacionSiniestroEnum.DESCONOCIDA
        End Try
    End Function
    Public Enum ClavesSituacionSiniestroEnum As Integer
        ABIERTO = 1
        CERRADO = 2
        REABIERTO = 3
        RECHAZADO = 4
        DESCONOCIDA = 99
    End Enum
    Public ReadOnly Property DescripcionSituacionSiniestro As String
        Get
            If SituacionSiniestro.HasValue Then
                Return DirectCast(SituacionSiniestro.Value, ClavesSituacionSiniestroEnum).ToString.Replace("_", " ")
            Else
                Return ""
            End If
        End Get
    End Property
End Class