Compare commits
2 Commits
5bd3719e02
...
9cf52e7f2c
| Author | SHA1 | Date | |
|---|---|---|---|
| 9cf52e7f2c | |||
| d5a530f32e |
@@ -703,8 +703,27 @@ Public Class frmMain
|
|||||||
POS.BGebMinBetrag = Nothing
|
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.SteuerfreierGesamtbetrag = POS.SteuerfreierBetrag
|
||||||
|
|
||||||
RG.POSITIONEN.Add(POS)
|
RG.POSITIONEN.Add(POS)
|
||||||
|
|||||||
Reference in New Issue
Block a user