fakt, PloseMautreport

SDL/Fakturierung/cFakturierung.vb

@@ -940,7 +940,7 @@ Public Class cFakturierung
 
         If FIRMA.Firma_ID = 1 Then rpt.lblFirma.Text &= vbNewLine & "D-94152 Neuhaus/Inn, Hartham 6"
 
-        If FIRMA.Firma_ID = 19 Then rpt.lblFirma.Text &= vbNewLine & "VERAG Spedition GmbH, Hartham 6, D-94152 Neuhaus/Inn"
+        'If FIRMA.Firma_ID = 19 Then rpt.lblFirma.Text &= vbNewLine & "VERAG Spedition GmbH, Hartham 6, D-94152 Neuhaus/Inn"
 
 
         rpt.lblFirmenbuch.Text = If(FIRMA.Firma_Firmenbuch, "").ToString.Replace("Firmenbuch:", "").Trim
@@ -3573,10 +3573,14 @@ Public Class cFakturierung
                     Case Else : rpt.lblUeberschriftRG_GS.Text &= " - KOPIE" : imageForWatermark = My.Resources.ungueltig_de
                 End Select
 
-                If Rechnugnsdruck = 7 Then 'nur bei "Vorschaudruck"
-                    rpt.Watermark = imageForWatermark
-                    rpt.WatermarkSizeMode = GrapeCity.ActiveReports.SectionReportModel.SizeModes.Zoom
+                If False Then 'deaktiviert weil nun doch nicht benötigt
+                    If Rechnugnsdruck = 7 Then 'nur bei "Vorschaudruck"
+                        rpt.Watermark = imageForWatermark
+                        rpt.WatermarkSizeMode = GrapeCity.ActiveReports.SectionReportModel.SizeModes.Zoom
+                    End If
+
                 End If
+
             End If
 
 

SDL/mdm/PLOSE/rptPLOSE_Anhang.Designer.vb

@@ -316,8 +316,8 @@ Partial Public Class rptPLOSE_Anhang
         Me.txtKunde.HyperLink = Nothing
         Me.txtKunde.Left = 5.111811!
         Me.txtKunde.Name = "txtKunde"
-        Me.txtKunde.Style = "font-size: 8pt; font-weight: bold; text-align: left; vertical-align: middle; ddo-" &
-    "char-set: 1"
+        Me.txtKunde.Style = "font-size: 8pt; font-weight: bold; text-align: right; vertical-align: middle; ddo" &
+    "-char-set: 1"
         Me.txtKunde.Text = "1000000 TEST"
         Me.txtKunde.Top = 0.8291339!
         Me.txtKunde.Width = 2.354331!