Compare commits
2 Commits
5bd3719e02
...
9cf52e7f2c
| Author | SHA1 | Date | |
|---|---|---|---|
| 9cf52e7f2c | |||
| d5a530f32e |
@@ -703,8 +703,27 @@ Public Class frmMain
|
||||
POS.BGebMinBetrag = Nothing
|
||||
|
||||
|
||||
|
||||
'steuerFreierBetrag *= vorzeichen
|
||||
'steuerPflichtigerBetrag *= vorzeichen
|
||||
'steuerFreierBetrag *= vorzeichen
|
||||
|
||||
'Dim steuerBetrag As Double = 0
|
||||
'If RECHNUNG.Steuersatz_Proz <> 0 Then
|
||||
' steuerBetrag = steuerPflichtigerBetrag * RECHNUNG.Steuersatz_Proz
|
||||
' RECHNUNG.SteuerpflichtigerGesamtbetrag = steuerPflichtigerBetrag + IIf(Not useNettogesatbetrag, steuerBetrag, 0) '+ steuerBetrag
|
||||
' RECHNUNG.SteuerfreierGesamtbetrag = steuerFreierBetrag
|
||||
'Else
|
||||
' RECHNUNG.SteuerpflichtigerGesamtbetrag = 0
|
||||
' RECHNUNG.SteuerfreierGesamtbetrag = steuerFreierBetrag + steuerPflichtigerBetrag
|
||||
'End If
|
||||
|
||||
|
||||
'==================================================
|
||||
RG.SteuerpflichtigerGesamtbetrag = POS.SteuerpflichtigerBetrag
|
||||
Dim steuerBetrag As Double = 0
|
||||
steuerBetrag = POS.SteuerpflichtigerBetrag * RG.Steuersatz_Proz
|
||||
|
||||
RG.SteuerpflichtigerGesamtbetrag = CDec(POS.SteuerpflichtigerBetrag + steuerBetrag)
|
||||
RG.SteuerfreierGesamtbetrag = POS.SteuerfreierBetrag
|
||||
|
||||
RG.POSITIONEN.Add(POS)
|
||||
|
||||
Reference in New Issue
Block a user