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

email, fakt.

Browse Source
This commit is contained in:
d.breimaier
2025-03-17 11:31:57 +01:00
parent 27e384c711
commit 62e752823b
2 changed files with 29 additions and 23 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
SDL/Fakturierung/frmFaktEmail.vb
View File

@@ -325,10 +325,9 @@ Public Class frmFaktEmail
Dim spracheRechnung As String = "EN" 'Defaultsprache
Select Case RechnungsLandKz
Case "TR" : spracheRechnung = RechnungsLandKz
Case "A", "AT", "D", "DE", "CH" : spracheRechnung = "DE"
Case "RO" : spracheRechnung = "RO"
Case "HR", "SRB", "SLO" : spracheRechnung = "SRB"
Case "TR", "RO", "DE", "SRB" : spracheRechnung = RechnungsLandKz
Case "A", "AT", "D", "CH" : spracheRechnung = "DE"
Case "HR", "SLO", "BIH", "MNE", "MK", "MO" : spracheRechnung = "SRB"
End Select
If listOfTextconserven.LIST.Any(Function(c) c.txt_sprache = spracheRechnung) Then