Merge branch 'master' of https://verag.visualstudio.com/SDL/_git/SDL

VERAG_PROG_ALLGEMEIN/DATENSERVER/cDATENSERVER.vb

@@ -953,9 +953,9 @@ Public Class cFormularManager
                 Dim stamper = New PdfStamper(pdf, fw)
                 If True Then
                     If listToWrite IsNot Nothing Then
-                        Dim overStr As PdfContentByte = stamper.GetOverContent(1)
                         For Each i In listToWrite
-                            If i.Text <> "" Then write(overStr, i, pdf.GetPageSize(1).Height)
+                            Dim overStr As PdfContentByte = stamper.GetOverContent(i.getPage)
+                            If i.Text <> "" Then write(overStr, i, pdf.GetPageSize(i.getPage).Height)
                         Next
                     End If
                 End If