This commit is contained in:
Jonathan Jenne
2023-11-13 10:32:15 +01:00
parent 3874bc742d
commit 623cf43520
9 changed files with 221 additions and 28 deletions

View File

@@ -11,14 +11,15 @@ Public Class ReceiverModel
MyBase.New(pState)
End Sub
Private Function ToReceiver(pRow As DataRow) As EnvelopeReceiver
Private Function ToReceiver(pRow As DataRow, pColorIndex As Integer) As EnvelopeReceiver
Return New EnvelopeReceiver() With {
.Id = pRow.ItemEx("GUID", 0),
.Email = pRow.ItemEx("EMAIL_ADDRESS", ""),
.Name = pRow.ItemEx("NAME", ""),
.Sequence = pRow.ItemEx("SEQUENCE", 0),
.Signature = pRow.ItemEx("SIGNATURE", ""),
.Status = ReceiverStatus.Unsigned
.Status = ReceiverStatus.Unsigned,
.ColorType = DirectCast(pColorIndex + 1, ColorType)
}
End Function