From fa8d2f5f622baed79f1b529ef84d7e34090088ad Mon Sep 17 00:00:00 2001 From: TekH Date: Fri, 5 Sep 2025 11:26:09 +0200 Subject: [PATCH] =?UTF-8?q?feat(pdfburner):=20Berechnung=20f=C3=BCr=20Anme?= =?UTF-8?q?rkungsindex=20innerhalb=20der=20Signaturgruppe=20hinzuf=C3=BCge?= =?UTF-8?q?n?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- .../Jobs/FinalizeDocument/PDFBurner.vb | 2 ++ 1 file changed, 2 insertions(+) diff --git a/EnvelopeGenerator.CommonServices/Jobs/FinalizeDocument/PDFBurner.vb b/EnvelopeGenerator.CommonServices/Jobs/FinalizeDocument/PDFBurner.vb index 413a73d7..21ac1629 100644 --- a/EnvelopeGenerator.CommonServices/Jobs/FinalizeDocument/PDFBurner.vb +++ b/EnvelopeGenerator.CommonServices/Jobs/FinalizeDocument/PDFBurner.vb @@ -73,12 +73,14 @@ Namespace Jobs.FinalizeDocument Dim annotCountPerSign = 5 Dim annotIndex = 1 Dim calcSignIndex = Function() CInt(Math.Ceiling(CDbl(annotIndex) / CDbl(annotCountPerSign))) + Dim calcAnnotIndexInSign = Function() (annotIndex - 1) Mod annotCountPerSign + 1 Dim formFieldIndex = 0 For Each oAnnotation In oAnnotationData.annotations Logger.Debug("Adding AnnotationID: " + oAnnotation.id) Dim signIndex = calcSignIndex() + Dim annotIndexInSign = calcAnnotIndexInSign() Select Case oAnnotation.type Case ANNOTATION_TYPE_IMAGE