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

MDM Auswertung, Fakt, etc.

Browse Source
This commit is contained in:
d.breimaier
2026-01-22 11:29:58 +01:00
parent 07c62b5d54
commit b58e047d2d
7 changed files with 47 additions and 96 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
SDL/Fakturierung/usrCntlFaktAbrechnung.vb
View File

@@ -1487,7 +1487,7 @@ Public Class usrCntlFaktAbrechnung
Dim isMWSTBearb As Boolean = False
Select Case r.Cells("LeistungsNr").Value
Case 124, 125, 126, 117, 118, 119, bearbNrRMC : isMWSTBearb = True
Case 123, 124, 125, 126, 117, 118, 119, bearbNrRMC : isMWSTBearb = True
End Select
@@ -2899,9 +2899,9 @@ Public Class usrCntlFaktAbrechnung
For Each row As DataGridViewRow In dgvOfferteDetailsUebersicht.Rows
If row.Cells("LeistungsNr").Value = BGebLeistungsNr And row.Cells("BerechnungsartNr").Value = 9 Then
Dim preisecChanged = row.Cells("Preis").Value
Dim preiseChanged = row.Cells("Preis").Value
If preisecChanged <> (sumOffertRMC + sumOffertFremd) * IIf(RECHNUNG.Vorzeichen = "-", -1, 1) Then
If preiseChanged <> (sumOffertRMC + sumOffertFremd) * IIf(RECHNUNG.Vorzeichen = "-", -1, 1) Then
' If row.Cells("Preis").Value = curBGebBetrag * 2 AndAlso minBetragRMCUsed Then 'wenn RMCPOS und MIND-BERTAG 2x verrechnet -> nur 1x berechnen v