AppStd/EnvelopeGenerator
8
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

feat(PDFBurner): add AnnotationsByReceiver method to AnnotationData

Browse Source
This commit is contained in:
tekh 2025-10-07 21:54:18 +02:00
parent b67f26cc21
commit 74f444a8d6
1 changed files with 4 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
EnvelopeGenerator.CommonServices/Jobs/FinalizeDocument/PDFBurner.vb
View File

@ -173,18 +173,11 @@ Namespace Jobs.FinalizeDocument
Friend Class AnnotationData Friend Class AnnotationData
Public Property annotations As List(Of Annotation) Public Property annotations As List(Of Annotation)
Public ReadOnly Property SignatureAnnotations As List(Of List(Of Annotation)) Public ReadOnly Property AnnotationsByReceiver As IEnumerable(Of List(Of Annotation))
Get Get
Dim result As New List(Of List(Of Annotation))() Return annotations _
.GroupBy(Function(a) a.receiverId) _
If annotations IsNot Nothing AndAlso annotations.Count > 0 Then .Select(Function(g) g.ToList())
For i As Integer = 0 To annotations.Count - 1 Step 6
Dim group As List(Of Annotation) = annotations.Skip(i).Take(6).ToList()
result.Add(group)
Next
End If
Return result
End Get End Get
End Property End Property