Überstundenauszahlung, FaktAbrechnung, etc.

This commit is contained in:
2025-11-25 14:23:08 +01:00
parent 010ff0cf18
commit 978edb3499
13 changed files with 465 additions and 324 deletions

View File

@@ -84,10 +84,7 @@ Public Class cKunde
Property Höchstkredit As Object = Nothing
Property DakosyExport As Object = Nothing
Property FiBuSchnittstelleNr As Object = Nothing
Property Vorlageprovision_Mindestbetrag As Object = Nothing
Public hasEntry As Boolean = False
@@ -191,6 +188,7 @@ Public Class cKunde
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("UStV_SummeVorschaubetragEUR_MSE", UStV_SummeVorschaubetragEUR_MSE))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("UStV_SummeVorschaubetragEUR_UTA", UStV_SummeVorschaubetragEUR_UTA))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("UStV_SummeVorschaubetragEUR_IT", UStV_SummeVorschaubetragEUR_IT))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("Vorlageprovision_Mindestbetrag", Vorlageprovision_Mindestbetrag))
Return list
End Function

View File

@@ -122,6 +122,9 @@ Public Class cRechnungsausgang
Property Rechnungsart As String = "RG" ' RG=Rechnung; RU=Rechnung Unvollständig; RK=RechnungKopf -> bei unvollständiger Rechnung ein Kopf benötigt (zB Staffelabrechnung)
Property Vorlageprovision_Mindestbetrag As Object = Nothing
' FROM [VERAG as object=nothing.[dbo as object=nothing.[Rechnungsausgang as object=nothing
Public POSITIONEN As New List(Of cRechnungsausgangPositionen)
@@ -365,6 +368,7 @@ Public Class cRechnungsausgang
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ForceSteuerschlüssel", ForceSteuerschlüssel))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("Automailversand", Automailversand))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("Rechnungsart", Rechnungsart))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("Vorlageprovision_Mindestbetrag", Vorlageprovision_Mindestbetrag))
Return list
End Function

View File

@@ -408,14 +408,14 @@ Public Class frmUeberstundenauszahlen
Next
If (stunden100bereitsausbezahl + stunden50bereitsausbezahlt + stunden25bereitsausbezahlt) > 0 Then
If MA.mit_firma = "ATILLA" Then GoTo sonderRegelungAtilla :
' If MA.mit_firma = "ATILLA" Then GoTo sonderRegelungAtilla : Laut ANDREAS mit 25.11.2025 wieder deaktiviert!!!!!!!!!!!! -> VILDAN soll hier direkt mit Andreas sprechen
picDel.Visible = True
Button1.Enabled = False
txtAusz.Enabled = False
picShow.Visible = True
Else
sonderRegelungAtilla:
Button1.Enabled = True
'sonderRegelungAtilla: Laut ANDREAS mit 25.11.2025 wieder deaktiviert!!!!!!!!!!!! -> VILDAN soll hier direkt mit Andreas sprechen
Button1.Enabled = True
txtAusz.Enabled = True
picShow.Visible = False