Imports System.Drawing
Imports System.Runtime.Serialization
Imports DevExpress.Utils.Svg
Imports DigitalData.Modules.Base
Imports EnvelopeGenerator.Common.Constants
Imports Newtonsoft.Json

Public Class EnvelopeReceiver
    Public Property Id As Integer = 0
    Public Property UserId As Integer
    Public Property Signature As String
    Public ReadOnly Property Color As Color
        Get
            Return Helpers.ColorTypeToColor(ColorType)
        End Get
    End Property

    <JsonIgnore>
    Public ReadOnly Property Image As SvgBitmap
        Get
            Try
                Return SvgBitmap.FromFile("Images/circle.svg")
            Catch ex As Exception
                Return Nothing
            End Try
        End Get
    End Property


    Public Property ColorType As ColorType

    Public Property Name As String

    Public Property Company As String = ""

    Public Property JobTitle As String = ""

    Public Property Email As String

    Public Property Status As ReceiverStatus

    Public ReadOnly Property StatusTranslated As String
        Get
            Dim oStatus = Status.ToString()
            Return My.Resources.Model.ResourceManager.GetString(oStatus)
        End Get
    End Property

    Public Property SignedDate As DateTime = DateTime.MinValue

    Public ReadOnly Property SignedDateDisplayValue As String
        Get
            If SignedDate = DateTime.MinValue Then
                Return "-"
            Else
                Return SignedDate.ToString("G")
            End If

        End Get
    End Property

    Public ReadOnly Property HasId As Boolean
        Get
            Return Id > 0
        End Get
    End Property

    Public Property Sequence As Integer = 0
    Public Property PrivateMessage As String = ""
    Public Property AccessCode As String = ""

    Public Function GetSignature() As String
        Return StringEx.GetChecksum(Email.ToUpper)
    End Function
End Class