This commit is contained in:
2020-08-04 16:34:47 +02:00
parent 40295a2819
commit 89d8e0a3a8
95 changed files with 3655 additions and 697 deletions

View File

@@ -6,7 +6,7 @@ Public Class usrcntlKundeBearbeitenFull
Dim KUNDE_ERW As VERAG_PROG_ALLGEMEIN.cKundenErweitert = Nothing
Dim ADRESSE As VERAG_PROG_ALLGEMEIN.cAdressen = Nothing
Dim FISKAL As cFiskal_Daten = Nothing
Dim USRCNTL_FISK As usrCntlKundeFiskaldaten
' Dim USRCNTL_FISK As usrCntlKundeFiskaldaten
Dim EMAIL_ANKUNFT As cEmailBenachrichtigungList = Nothing
Dim EMAIL_FREIGABE As cEmailBenachrichtigungList = Nothing
Dim sql As New SQL
@@ -111,10 +111,10 @@ Public Class usrcntlKundeBearbeitenFull
Me.Cursor = Cursors.WaitCursor
tbFiskal.Controls.Clear()
USRCNTL_FISK = New usrCntlKundeFiskaldaten(FISKAL, KUNDE_ERW)
USRCNTL_FISK.Dock = DockStyle.Fill
tbFiskal.Controls.Add(USRCNTL_FISK)
' tbFiskal.Controls.Clear()
UsrCntlKundeFiskaldaten1.initFiskal(FISKAL, KUNDE_ERW)
'USRCNTL_FISK.Dock = DockStyle.Fill
'tbFiskal.Controls.Add(USRCNTL_FISK)
checkEORI_Aufschub()
@@ -565,7 +565,7 @@ Public Class usrcntlKundeBearbeitenFull
USRCNTL_FISK.loadinClass(FISKAL, KUNDE_ERW)
UsrCntlKundeFiskaldaten1.loadinClass(FISKAL, KUNDE_ERW)
Return True
End Function