einfach alles

This commit is contained in:
Jonathan Jenne
2023-12-05 15:40:16 +01:00
parent 763ac96f4e
commit 6f91ecac83
14 changed files with 522 additions and 247 deletions

View File

@@ -14,6 +14,13 @@
Public Property Documents As New List(Of EnvelopeDocument)
Public Property Receivers As New List(Of EnvelopeReceiver)
Public Property History As New List(Of EnvelopeHistoryEntry)
Public ReadOnly Property IsAlreadySent As Boolean
Get
Return Status > Constants.EnvelopeStatus.EnvelopeSaved
End Get
End Property
Public ReadOnly Property StatusTranslated As String
Get

View File

@@ -1,6 +1,12 @@
Public Class EnvelopeHistoryEntry
Public EnvelopeId As Integer
Public UserReference As String
Public Status As Constants.EnvelopeStatus
Public ActionDate As Date = Now()
Public Property EnvelopeId As Integer
Public Property UserReference As String
Public Property Status As Constants.EnvelopeStatus
Public ReadOnly Property StatusTranslated As String
Get
Dim oStatus = Status.ToString()
Return My.Resources.Model.ResourceManager.GetString(oStatus)
End Get
End Property
Public Property ActionDate As Date = Now()
End Class