fakt, PloseMautreport
This commit is contained in:
@@ -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 = 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
|
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
|
Case Else : rpt.lblUeberschriftRG_GS.Text &= " - KOPIE" : imageForWatermark = My.Resources.ungueltig_de
|
||||||
End Select
|
End Select
|
||||||
|
|
||||||
If Rechnugnsdruck = 7 Then 'nur bei "Vorschaudruck"
|
If False Then 'deaktiviert weil nun doch nicht benötigt
|
||||||
rpt.Watermark = imageForWatermark
|
If Rechnugnsdruck = 7 Then 'nur bei "Vorschaudruck"
|
||||||
rpt.WatermarkSizeMode = GrapeCity.ActiveReports.SectionReportModel.SizeModes.Zoom
|
rpt.Watermark = imageForWatermark
|
||||||
|
rpt.WatermarkSizeMode = GrapeCity.ActiveReports.SectionReportModel.SizeModes.Zoom
|
||||||
|
End If
|
||||||
|
|
||||||
End If
|
End If
|
||||||
|
|
||||||
End If
|
End If
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
4
SDL/mdm/PLOSE/rptPLOSE_Anhang.Designer.vb
generated
4
SDL/mdm/PLOSE/rptPLOSE_Anhang.Designer.vb
generated
@@ -316,8 +316,8 @@ Partial Public Class rptPLOSE_Anhang
|
|||||||
Me.txtKunde.HyperLink = Nothing
|
Me.txtKunde.HyperLink = Nothing
|
||||||
Me.txtKunde.Left = 5.111811!
|
Me.txtKunde.Left = 5.111811!
|
||||||
Me.txtKunde.Name = "txtKunde"
|
Me.txtKunde.Name = "txtKunde"
|
||||||
Me.txtKunde.Style = "font-size: 8pt; font-weight: bold; text-align: left; vertical-align: middle; ddo-" &
|
Me.txtKunde.Style = "font-size: 8pt; font-weight: bold; text-align: right; vertical-align: middle; ddo" &
|
||||||
"char-set: 1"
|
"-char-set: 1"
|
||||||
Me.txtKunde.Text = "1000000 TEST"
|
Me.txtKunde.Text = "1000000 TEST"
|
||||||
Me.txtKunde.Top = 0.8291339!
|
Me.txtKunde.Top = 0.8291339!
|
||||||
Me.txtKunde.Width = 2.354331!
|
Me.txtKunde.Width = 2.354331!
|
||||||
|
|||||||
File diff suppressed because one or more lines are too long
Reference in New Issue
Block a user