From dee5bf2ba7cfce14178afe4ebd8c8f1d9b12516a Mon Sep 17 00:00:00 2001 From: "d.breimaier" Date: Thu, 5 Jun 2025 15:16:04 +0200 Subject: [PATCH] =?UTF-8?q?fakt=20RO=20=C3=9Cbersetzung=20bei=20Zahlungszi?= =?UTF-8?q?el?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- SDL/Fakturierung/cFakturierung.vb | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/SDL/Fakturierung/cFakturierung.vb b/SDL/Fakturierung/cFakturierung.vb index f9bb0499..4da4247c 100644 --- a/SDL/Fakturierung/cFakturierung.vb +++ b/SDL/Fakturierung/cFakturierung.vb @@ -332,7 +332,7 @@ Public Class cFakturierung If RECHNUNG.Lastschrift Then Select Case RECHNUNG.RechnungSprache Case "EN" : strText = strText & "The invoice amount was collected by direct debit order." & vbCrLf - Case "RO" : strText = strText & "The invoice amount was collected by direct debit order." & vbCrLf + Case "RO" : strText = strText & "Suma facturii a fost incasata prin ordin de debitare directa." & vbCrLf Case Else : strText = strText & "Der Rechnungsbetrag wurde durch erteilten Abbuchungsauftrag eingezogen." & vbCrLf End Select Else @@ -348,7 +348,7 @@ Public Class cFakturierung 'Zahlungsziel allgemein. Select Case RECHNUNG.RechnungSprache Case "EN" : strZahlbar = "Payment term: " & ZZTage & " days from invoice date" - Case "RO" : strZahlbar = "Payment term: " & ZZTage & " days from invoice date" + Case "RO" : strZahlbar = "Termen de plata: " & ZZTage & " zile de la data emiterii facturii" Case Else : strZahlbar = "Zahlungsziel: " & ZZTage & " Tage ab Rechnungsdatum" 'Case "EN" : strZahlbar = "Payable within " & ZZTage & " days from date of invoice." 'Case Else : strZahlbar = "Zahlbar innerhalb " & ZZTage & " Tagen ab Rechnungsdatum." @@ -395,7 +395,7 @@ Public Class cFakturierung If diff < 0.5 And diff > 0.5 Then ' If diff = 0 Then --> 50ct spielraum ok für diff Select Case RECHNUNG.RechnungSprache Case "EN" : strText = strText & "The invoice amount has already been paid in advance." & vbCrLf - Case "RO" : strText = strText & "The invoice amount has already been paid in advance." & vbCrLf + Case "RO" : strText = strText & "Suma facturii a fost stinsa prin plata in avans." & vbCrLf Case Else : strText = strText & "Der Rechnungsbetrag wurde bereits per Vorauszahlung beglichen." & vbCrLf End Select Else @@ -406,13 +406,13 @@ Public Class cFakturierung 'End Select Select Case RECHNUNG.RechnungSprache Case "EN" : strText = strText & "An advance payment has already been made for this invoice." & vbCrLf - Case "RO" : strText = strText & "An advance payment has already been made for this invoice." & vbCrLf + Case "RO" : strText = strText & "Pentru aceasta factura a fost efectuata deja o plata in avans." & vbCrLf Case Else : strText = strText & "Zu dieser Rechnung wurde bereits eine Vorauszahlung geleistet." & vbCrLf End Select Else 'Nachzahlung Select Case RECHNUNG.RechnungSprache Case "EN" : strText = strText & "An advance payment has already been made for this invoice, please transfer the difference." & vbCrLf - Case "RO" : strText = strText & "An advance payment has already been made for this invoice, please transfer the difference." & vbCrLf + Case "RO" : strText = strText & "Pentru aceasta factura a fost efectuata deja o plata in avans. Va rugam achitati diferenta." & vbCrLf Case Else : strText = strText & "Zu dieser Rechnung wurde bereits eine Vorauszahlung geleistet, bitte überweisen Sie ggf. den Differenzbetrag." & vbCrLf End Select End If @@ -424,14 +424,14 @@ Public Class cFakturierung If RECHNUNG.Lastschrift Then Select Case RECHNUNG.RechnungSprache Case "EN" : strText = strText & "The credit amount was offset against the debit order issued." & vbCrLf - Case "RO" : strText = strText & "The credit amount was offset against the debit order issued." & vbCrLf + Case "RO" : strText = strText & "Creditul a fost compensat cu ordinul de debitare emis." & vbCrLf Case Else : strText = strText & "Der Gutschriftsbetrag wurde mit erteilten Abbuchungsauftrag verrechnet." & vbCrLf End Select Else If RECHNUNG.Firma_ID = 19 Then Select Case RECHNUNG.RechnungSprache Case "EN" : strZahlbar = "Payment term: " & ZZTage & " days" - Case "RO" : strZahlbar = "Payment term: " & ZZTage & " days" + Case "RO" : strZahlbar = "Termen de plata: " & ZZTage & " zile" Case Else : strZahlbar = "Zahlungsziel: " & ZZTage & " Tage" End Select End If