MDM ustva rundung bei verag-re auf 2 nachkommastellen.

This commit is contained in:
2025-02-05 08:45:55 +01:00
parent 113884f27a
commit dee985e7f3
2 changed files with 4 additions and 2 deletions

View File

@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("1.3.5.6")>
<Assembly: AssemblyFileVersion("1.3.5.6")>
<Assembly: AssemblyVersion("1.3.5.7")>
<Assembly: AssemblyFileVersion("1.3.5.7")>

View File

@@ -756,6 +756,8 @@ Public Class frmMDM_USTVAntrag
Dim umrechKurs As Double = 1
Dim UST_EUR = CDbl(r.Item("SteuerbetragLokal"))
UST_EUR = Math.Round(UST_EUR, 2)
USTV_POS.UStVPo_USteuerbetragEUR = UST_EUR
USTV_POS.UStVPo_Umrechnungskurs = umrechKurs
USTV_POS.UStVPo_USteuerbetrag = UST_EUR