refactor(Envelope): rename Receivers property as EnvelopeReceivers
This commit is contained in:
@@ -75,7 +75,7 @@ Public MustInherit Class BaseController
|
||||
Throw New ApplicationException("could not delete documents")
|
||||
End If
|
||||
|
||||
Dim oResult2 = pEnvelope.Receivers.
|
||||
Dim oResult2 = pEnvelope.EnvelopeReceivers.
|
||||
Select(Function(r) ReceiverModel.Delete(r.Receiver.Id, pEnvelope.Id, oTransaction)).
|
||||
All(Function(r) r = True)
|
||||
|
||||
|
||||
@@ -30,7 +30,7 @@ Public Class EnvelopeEditorController
|
||||
|
||||
Envelope = pEnvelope
|
||||
Envelope.Documents = DocumentModel.List(pEnvelope.Id).ToList()
|
||||
Envelope.Receivers = ReceiverModel.ListEnvelopeReceivers(pEnvelope.Id).Cast(Of EnvelopeReceiver)().ToList()
|
||||
Envelope.EnvelopeReceivers = ReceiverModel.ListEnvelopeReceivers(pEnvelope.Id).Cast(Of EnvelopeReceiver)().ToList()
|
||||
|
||||
Thumbnail = New Thumbnail(pState.LogConfig)
|
||||
ActionService = New ActionService(pState, Nothing)
|
||||
@@ -56,7 +56,7 @@ Public Class EnvelopeEditorController
|
||||
|
||||
If ElementModel.OneElementPerReceiverExist(Envelope.Id) = False Then
|
||||
|
||||
For Each receiverItem As EnvelopeReceiver In Envelope.Receivers
|
||||
For Each receiverItem As EnvelopeReceiver In Envelope.EnvelopeReceivers
|
||||
If ElementModel.ElementsExist(Envelope.Id, receiverItem.Envelope.Id) = False Then
|
||||
oEnvelopeErrors.Add(String.Format(Resources.Envelope.Missing_Elements_for_Receiver, receiverItem.Name))
|
||||
End If
|
||||
@@ -106,7 +106,7 @@ Public Class EnvelopeEditorController
|
||||
|
||||
Dim oAllReceivers As List(Of Receiver) = ReceiverModel.ListReceivers(pReceiversFromGrid).ToList()
|
||||
|
||||
pEnvelope.Receivers.Clear()
|
||||
pEnvelope.EnvelopeReceivers.Clear()
|
||||
|
||||
For Each oReceiver In pReceiversFromGrid
|
||||
If oReceiver.EmailAddress Is Nothing Then Continue For
|
||||
@@ -118,7 +118,7 @@ Public Class EnvelopeEditorController
|
||||
oReceiver.Signature = oDbReceiver.Signature
|
||||
End If
|
||||
|
||||
pEnvelope.Receivers.Add(oReceiver)
|
||||
pEnvelope.EnvelopeReceivers.Add(oReceiver)
|
||||
Next
|
||||
|
||||
Return True
|
||||
@@ -395,7 +395,7 @@ Public Class EnvelopeEditorController
|
||||
Return False
|
||||
End If
|
||||
|
||||
Return pEnvelope.Receivers.
|
||||
Return pEnvelope.EnvelopeReceivers.
|
||||
Select(Function(r) ReceiverModel.Assign(pEnvelope, r, pTransaction)).
|
||||
All(Function(pResult) pResult = True)
|
||||
|
||||
|
||||
@@ -486,7 +486,7 @@ Partial Public Class frmEnvelopeEditor
|
||||
'
|
||||
'EnvelopeReceiverBindingSource
|
||||
'
|
||||
Me.EnvelopeReceiverBindingSource.DataMember = "Receivers"
|
||||
Me.EnvelopeReceiverBindingSource.DataMember = "EnvelopeReceivers"
|
||||
Me.EnvelopeReceiverBindingSource.DataSource = GetType(EnvelopeGenerator.Form.frmEnvelopeEditor)
|
||||
'
|
||||
'ViewReceivers
|
||||
|
||||
@@ -105,7 +105,7 @@ Partial Public Class frmEnvelopeEditor
|
||||
Else
|
||||
Controller = New EnvelopeEditorController(State, Envelope)
|
||||
Documents = New BindingList(Of EnvelopeDocument)(Controller.Envelope.Documents)
|
||||
Receivers = New BindingList(Of ReceiverVM)(Controller.Envelope.Receivers.Select(Function(r) ReceiverVM.From(r)).ToList())
|
||||
Receivers = New BindingList(Of ReceiverVM)(Controller.Envelope.EnvelopeReceivers.Select(Function(r) ReceiverVM.From(r)).ToList())
|
||||
|
||||
For Each docItem As EnvelopeDocument In Documents
|
||||
If Not File.Exists(docItem.Filepath) Then
|
||||
@@ -233,7 +233,7 @@ Partial Public Class frmEnvelopeEditor
|
||||
.Document = Controller.Envelope.Documents.
|
||||
Where(Function(d) d.Filename = oDocument.Filename).
|
||||
SingleOrDefault(),
|
||||
.Receivers = Controller.Envelope.Receivers.Select(Function(r) ReceiverVM.From(r)).ToList()
|
||||
.Receivers = Controller.Envelope.EnvelopeReceivers.Select(Function(r) ReceiverVM.From(r)).ToList()
|
||||
}
|
||||
oForm.ShowDialog()
|
||||
|
||||
@@ -549,7 +549,7 @@ Partial Public Class frmEnvelopeEditor
|
||||
ViewReceivers.DeleteRow(ViewReceivers.FocusedRowHandle)
|
||||
Else
|
||||
' Doppelte E-Mail-Adresse? TODO
|
||||
'Dim oReceivers = Controller.Envelope.Receivers
|
||||
'Dim oReceivers = Controller.Envelope.EnvelopeReceivers
|
||||
CellValueChanged = True
|
||||
Dim oNameCellValue = ViewReceivers.GetRowCellValue(e.RowHandle, COL_NAME)
|
||||
If oNameCellValue Is Nothing Then
|
||||
|
||||
4
EnvelopeGenerator.Form/frmMain.Designer.vb
generated
4
EnvelopeGenerator.Form/frmMain.Designer.vb
generated
@@ -194,7 +194,7 @@ Partial Class frmMain
|
||||
Me.GridEnvelopes.EmbeddedNavigator.TextLocation = CType(resources.GetObject("GridEnvelopes.EmbeddedNavigator.TextLocation"), DevExpress.XtraEditors.NavigatorButtonsTextLocation)
|
||||
Me.GridEnvelopes.EmbeddedNavigator.ToolTipIconType = CType(resources.GetObject("GridEnvelopes.EmbeddedNavigator.ToolTipIconType"), DevExpress.Utils.ToolTipIconType)
|
||||
GridLevelNode1.LevelTemplate = Me.ViewReceivers
|
||||
GridLevelNode1.RelationName = "Receivers"
|
||||
GridLevelNode1.RelationName = "EnvelopeReceivers"
|
||||
GridLevelNode2.LevelTemplate = Me.ViewHistory
|
||||
GridLevelNode2.RelationName = "History"
|
||||
Me.GridEnvelopes.LevelTree.Nodes.AddRange(New DevExpress.XtraGrid.GridLevelNode() {GridLevelNode1, GridLevelNode2})
|
||||
@@ -580,7 +580,7 @@ Partial Class frmMain
|
||||
Me.GridCompleted.EmbeddedNavigator.TextLocation = CType(resources.GetObject("GridCompleted.EmbeddedNavigator.TextLocation"), DevExpress.XtraEditors.NavigatorButtonsTextLocation)
|
||||
Me.GridCompleted.EmbeddedNavigator.ToolTipIconType = CType(resources.GetObject("GridCompleted.EmbeddedNavigator.ToolTipIconType"), DevExpress.Utils.ToolTipIconType)
|
||||
GridLevelNode3.LevelTemplate = Me.ViewReceiversCompleted
|
||||
GridLevelNode3.RelationName = "Receivers"
|
||||
GridLevelNode3.RelationName = "EnvelopeReceivers"
|
||||
GridLevelNode4.LevelTemplate = Me.ViewHistoryCompleted
|
||||
GridLevelNode4.RelationName = "History"
|
||||
Me.GridCompleted.LevelTree.Nodes.AddRange(New DevExpress.XtraGrid.GridLevelNode() {GridLevelNode3, GridLevelNode4})
|
||||
|
||||
@@ -624,7 +624,7 @@ Public Class frmMain
|
||||
|
||||
Dim oController = New EnvelopeEditorController(State, oEnvelope)
|
||||
Dim Documents As New BindingList(Of EnvelopeDocument)
|
||||
Dim Receivers = New BindingList(Of ReceiverVM)(oController.Envelope.Receivers.Select(Function(r) ReceiverVM.From(r)).ToList())
|
||||
Dim Receivers = New BindingList(Of ReceiverVM)(oController.Envelope.EnvelopeReceivers.Select(Function(r) ReceiverVM.From(r)).ToList())
|
||||
For Each oReceiver As ReceiverVM In Receivers
|
||||
If oReceiver.EmailAddress = selReceiver.EmailAddress Then
|
||||
If oController.ActionService.ResendReceiver(oEnvelope, oReceiver) = True Then
|
||||
@@ -872,7 +872,7 @@ Public Class frmMain
|
||||
If oEnvelope.UseAccessCode = True Then
|
||||
Dim oController = New EnvelopeEditorController(State, oEnvelope)
|
||||
Dim Documents As New BindingList(Of EnvelopeDocument)
|
||||
Dim Receivers = New BindingList(Of ReceiverVM)(oController.Envelope.Receivers.Select(Function(r) ReceiverVM.From(r)).ToList())
|
||||
Dim Receivers = New BindingList(Of ReceiverVM)(oController.Envelope.EnvelopeReceivers.Select(Function(r) ReceiverVM.From(r)).ToList())
|
||||
For Each oReceiver As ReceiverVM In Receivers
|
||||
If oReceiver.EmailAddress = selReceiver.EmailAddress Then
|
||||
If oController.ActionService.ManuallySendAccessCode(oEnvelope, oReceiver) = True Then
|
||||
|
||||
Reference in New Issue
Block a user