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

Datev_Schnittstelle

Browse Source
This commit is contained in:
d.breimaier
2023-02-13 15:52:11 +01:00
parent 068fd4e669
commit 48658340b8
3 changed files with 100 additions and 82 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
SDL/kunden/usrcntlKundeBearbeitenFull.vb
View File

@@ -1079,10 +1079,12 @@ Public Class usrcntlKundeBearbeitenFull
cboFiliale.changeItem(Filiale)
End If
If VERAG_PROG_ALLGEMEIN.cAllgemein.USRKURZNAME = "DANIEL" Then
Button5.Visible = True
If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("DATEV_EXPORT", "SDL") Then
Label98.Visible = True
btnDatevExport.Visible = True
Else
Button5.Visible = False
Label98.Visible = False
btnDatevExport.Visible = False
End If
End Sub
@@ -1447,8 +1449,10 @@ Public Class usrcntlKundeBearbeitenFull
End Sub
Private Sub Button5_Click_2(sender As Object, e As EventArgs) Handles Button5.Click
VERAG_PROG_ALLGEMEIN.cDatev_Interface.genDatensatzCSV_ALL(False, True, True)
Private Sub btnDatevExport_Click(sender As Object, e As EventArgs) Handles btnDatevExport.Click
If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("DATEV_EXPORT", "SDL") Then
VERAG_PROG_ALLGEMEIN.cDatev_Interface.genDatensatzCSV_ALL(False, True, False)
End If
End Sub
End Class