Mitarbeiter-Logik, Abrechnung AMBAR

This commit is contained in:
2024-06-20 13:30:06 +02:00
parent ffd45e15a7
commit 93fcc43346
3 changed files with 96 additions and 85 deletions

View File

@@ -101,7 +101,8 @@ Public Class frmFaktSammelRgDrucken
FirmaTmp = "VERAGIMEX"
End If
FirmaTmp = "AMBAR"
Label5.Visible = True
cboFaktGrp.Visible = True
Select Case FirmaTmp
Case "VERAG"
@@ -127,6 +128,8 @@ Public Class frmFaktSammelRgDrucken
cboFirma.fillWithSQL("SELECT [Firma_ID],[Firma_Bez] FROM [tblFirma] WHERE FIRMENGRUPPE IN ('AMBAR') ", False, "FMZOLL")
cboFirma.changeItem("24")
cboSB.fillWithSQL("SELECT [mit_username] FROM [tblMitarbeiter] where mit_firma='AMBAR' and mit_gekuendigt=0 AND (mit_abteilung IN ('VRR','BH') OR (SELECT COUNT(*) FROM [tblBerechtigungsObjekteZuordnung] where [beroz_beroId]=90 AND [beroz_bergrId]=[mit_id] AND beroz_art='B')>0) order by mit_username", False, "ADMIN", True)
Label5.Visible = False
cboFaktGrp.Visible = False
End Select
' cboFirma.fillWithSQL("SELECT [Firma_ID],[Firma_Bez] FROM [tblFirma] WHERE Firma_ID NOT IN(3) ORDER BY Firma_ID ", True, "FMZOLL")
cboFirma.changeItem(Firma)