Public Class EmailData
    Public Property EmailAdress As String
    Public Property EmailSubject As String
    Public Property EmailBody As String
    Public Property EmailType As Constants.EnvelopeStatus
    Public Property ReferenceID As Integer
    Public Property ReferenceString As String

    Public Property ReceiverAccessCode As String
    Public Property ReceiverName As String
    Public Property SenderName As String
    Public Property SenderAdress As String

    Public Property SignatureLink As String
    Public Property Message As String
    Public Property EnvelopeTitle As String

    Public Property EmailAttachment As String = ""

    ''' <summary>
    ''' Constructor for sending email to receiver
    ''' </summary>
    ''' <param name="pEnvelope"></param>
    ''' <param name="pReceiver"></param>
    ''' <param name="pStatus"></param>
    Public Sub New(pEnvelope As Envelope, pReceiver As EnvelopeReceiver, pStatus As Constants.EnvelopeStatus)
        EmailAdress = pReceiver.Email
        EmailSubject = String.Empty
        EmailType = pStatus

        Message = pEnvelope.Message
        ReferenceID = pEnvelope.Id
        ReferenceString = pEnvelope.Uuid
        ReceiverName = pReceiver.Name
        ReceiverAccessCode = pReceiver.AccessCode
        SenderAdress = pEnvelope.User.Email
        SenderName = pEnvelope.User.FullName
        EnvelopeTitle = pEnvelope.Title
    End Sub

    ''' <summary>
    ''' Constructor for sending email to creator
    ''' </summary>
    ''' <param name="pEnvelope"></param>
    ''' <param name="pStatus"></param>
    Public Sub New(pEnvelope As Envelope, pStatus As Constants.EnvelopeStatus)
        EmailAdress = pEnvelope.User.Email
        EmailSubject = String.Empty
        EmailType = pStatus

        Message = pEnvelope.Message
        ReferenceID = pEnvelope.Id
        ReferenceString = pEnvelope.Uuid
        ReceiverName = pEnvelope.User.FullName
        ReceiverAccessCode = String.Empty
        SenderAdress = pEnvelope.User.Email
        SenderName = pEnvelope.User.FullName
        EnvelopeTitle = pEnvelope.Title
    End Sub

End Class