kundeblatt, etc.

This commit is contained in:
2025-12-18 15:45:26 +01:00
parent 4bf0bee25e
commit 3aead83940
7 changed files with 81 additions and 45 deletions

View File

@@ -2106,20 +2106,37 @@ Public Class cFakturierung
Select Case RECHNUNG.BelegartenKz
Case "AR"
rpt.lblUeberschriftRG_GS.Text = "FACTURA"
rpt.lblSummeUeberschrift.Text = "Total"
rpt.lblSummeUeberschrift.Text = "Total:"
rpt.lblRgNrUeberschrift.Text = "Nr. factura:"
rpt.lblRgDatumUeberschrift.Text = "Data factura:"
Case "AG"
rpt.lblUeberschriftRG_GS.Text = "NOTA DE CREDIT"
rpt.lblSummeUeberschrift.Text = "Total"
rpt.lblSummeUeberschrift.Text = "Total:"
rpt.lblRgNrUeberschrift.Text = "Nr. nota credit:"
rpt.lblRgDatumUeberschrift.Text = "Data nota credit:"
End Select
Case "TR" 'Todo: bekomme noch die Übersetzungen dazu: 2025-12-18
Select Case RECHNUNG.BelegartenKz
Case "AR"
rpt.lblUeberschriftRG_GS.Text = "INVOICE"
rpt.lblSummeUeberschrift.Text = "Invoice Amount:"
rpt.lblRgNrUeberschrift.Text = "Invoice No.:"
rpt.lblRgDatumUeberschrift.Text = "Invoice Date:"
Case "AG"
rpt.lblUeberschriftRG_GS.Text = "CREDIT NOTE"
rpt.lblSummeUeberschrift.Text = "Credit Amount:"
rpt.lblRgNrUeberschrift.Text = "Credit Note No.:"
rpt.lblRgDatumUeberschrift.Text = "Credit Note Date:"
End Select
Case Else
Select Case RECHNUNG.BelegartenKz
Case "AR"
rpt.lblUeberschriftRG_GS.Text = "RECHNUNG"
rpt.lblSummeUeberschrift.Text = "Rechnungsbetrag"
rpt.lblRgNrUeberschrift.Text = "Rechnungs-Nr.:"
rpt.lblRgDatumUeberschrift.Text = "Rechnungs-Datum:"
Case "AG"
rpt.lblUeberschriftRG_GS.Text = "GUTSCHRIFT"
rpt.lblSummeUeberschrift.Text = "Gutschriftsbetrag:"
@@ -2353,7 +2370,7 @@ Public Class cFakturierung
Case Else
rpt.lblLeistungUeberschrift.Text = "RENR"
rpt.lblLeistungUeberschrift.Text = "RE Datum"
rpt.lbl_onlyZR_ReDatUeberschrift.Text = "RE Datum"
rpt.lblAnzahlUeberschrift.Text = "VZ Tage"
rpt.lblSteuerpflichtigUeberschrift.Text = "RE Betrag"
rpt.lblSteuerfreiUeberschrift.Text = "Verzugszinsen"