edv/SDL
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fakt.

Browse Source
This commit is contained in:
d.breimaier
2025-10-30 13:19:56 +01:00
parent 52e0041754
commit fbbe752605
2 changed files with 92 additions and 32 deletions
Download Patch File Download Diff File Expand all files Collapse all files

60
SDL/Fakturierung/cFakturierung.vb
View File

@@ -2154,6 +2154,7 @@ Public Class cFakturierung
Select Case RECHNUNG.RechnungSprache
Case "EN" : rpt.Label2.Text = ZZTage & " Days" : rpt.Label1.Text = "Payment target:" : rpt.lblSendungsdatenUeberschrift.Text = "Service:"
Case "TR" : rpt.Label2.Text = ZZTage & " gün" ': rpt.Label1.Text = "Payment target:" : rpt.lblSendungsdatenUeberschrift.Text = "Service:"
Case "RO" : rpt.Label2.Text = ZZTage & " Zile" : rpt.Label1.Text = "Termen de plată:" : rpt.lblSendungsdatenUeberschrift.Text = "Descriere:"
Case Else : rpt.Label2.Text = ZZTage & " Tage" : rpt.lblSendungsdatenUeberschrift.Text = "Bezeichnung:"
End Select
@@ -2318,22 +2319,65 @@ Public Class cFakturierung
rpt.lblSteuerpflichtig.Visible = False
rpt.lblLeistungUeberschrift.Alignment = GrapeCity.ActiveReports.Document.Section.TextAlignment.Left
rpt.lblLeistungUeberschrift.Text = "RechnungsNr"
rpt.lblAnzahlUeberschrift.Text = "Tage"
Select Case RECHNUNG.RechnungSprache
Case "EN"
rpt.lblLeistungUeberschrift.Text = "Inv. No."
rpt.lblAnzahlUeberschrift.Text = "Tage"
rpt.lblSteuerpflichtigUeberschrift.Text = "Payment Amount"
rpt.lblSteuerfreiUeberschrift.Text = "Default Interest"
'rpt.lbl_onlyZR_ZinsenUeberschrift.Text = "Interest p.a."
Case "TR"
rpt.lblLeistungUeberschrift.Text = "Belge"
rpt.lblAnzahlUeberschrift.Text = "Tage"
rpt.lblSteuerpflichtigUeberschrift.Text = "Ödeme tutarı"
rpt.lblSteuerfreiUeberschrift.Text = "Geç ödeme faizi"
' rpt.lbl_onlyZR_ZinsenUeberschrift.Text = "Zinsen p.a."
Case "RO"
rpt.lblLeistungUeberschrift.Text = "Nr. fact."
rpt.lblAnzahlUeberschrift.Text = "Tage"
rpt.lblSteuerpflichtigUeberschrift.Text = "Suma de plata"
rpt.lblSteuerfreiUeberschrift.Text = "Penalitati"
'rpt.lbl_onlyZR_ZinsenUeberschrift.Text = "Dobândă p.a."
Case Else
rpt.lblLeistungUeberschrift.Text = "RENR"
rpt.lblAnzahlUeberschrift.Text = "VZ Tage"
rpt.lblSteuerpflichtigUeberschrift.Text = "Zahlungsbetrag"
rpt.lblSteuerfreiUeberschrift.Text = "Verzugszinsen"
'rpt.lbl_onlyZR_ZinsenUeberschrift.Text = "Zinsen p.a."
End Select
rpt.lblSteuerpflichtigUeberschrift.Alignment = GrapeCity.ActiveReports.Document.Section.TextAlignment.Center
rpt.lblSteuerpflichtigUeberschrift.Text = "Zahlungsbetrag"
rpt.lbl_onlyZR_VZUeberschrift.Text = "Zinsen p.a."
rpt.lbl_onlyZR_VZUeberschrift.Alignment = GrapeCity.ActiveReports.Document.Section.TextAlignment.Left
rpt.lblSteuerfreiUeberschrift.Text = "Verzugszinsen"
rpt.lblSteuerfreiUeberschrift.Alignment = GrapeCity.ActiveReports.Document.Section.TextAlignment.Right
rpt.lbl_onlyZR_ZinsenUeberschrift.Alignment = GrapeCity.ActiveReports.Document.Section.TextAlignment.Left
rpt.lbl_onlyZR_ReDatUeberschrift.Visible = True
rpt.lbl_onlyZR_FaelligUeberschrift.Visible = True
rpt.lbl_onlyZR_VZUeberschrift.Visible = True
rpt.lbl_onlyZR_ZinsenUeberschrift.Visible = True
rpt.lbl_onlyZR_ZahlungsDatUeberschrift.Visible = True
rpt.txtLeistung.Visible = False
Else
'rpt.lblLeistungUeberschrift.Text = "Leistung"
'rpt.lblAnzahlUeberschrift.Text = "Anzahl"
'rpt.lblSteuerfreiUeberschrift.Text = "Steuerfrei"
'rpt.lblSteuerpflichtigUeberschrift.Text = "Steuerpflichtig"
rpt.lblSteuerpflichtigUeberschrift.Alignment = GrapeCity.ActiveReports.Document.Section.TextAlignment.Right
rpt.lbl_onlyZR_ReDatUeberschrift.Visible = False
rpt.lbl_onlyZR_FaelligUeberschrift.Visible = False
rpt.lbl_onlyZR_ZinsenUeberschrift.Visible = False
rpt.lbl_onlyZR_ZahlungsDatUeberschrift.Visible = False
rpt.txtLeistung.Visible = True
End If