CBAMatez, Hauptfenster, etc.

This commit is contained in:
2026-02-10 10:02:21 +01:00
parent 8b9b806959
commit b20660dba1
8 changed files with 62 additions and 45 deletions

View File

@@ -25,7 +25,7 @@ Public Class frmATEZ_NCTS
Dim id As Integer = -1
Dim dgv As DataGridView = Nothing
Dim atez_data As cATEZ_NCTS_DATA
Dim atez = New cATEZ_NCTS_IN("atez_ncts")
Dim atez As cATEZ_NCTS_IN = New cATEZ_NCTS_IN("ATEZ")
Dim allSelected As Boolean = False
Property BezugsNr As String = ""
@@ -77,7 +77,7 @@ Public Class frmATEZ_NCTS
If Button1.Text = "JSON" Then
If Not atez.setJson(atez_data) Then MsgBox("Fehler beim Erstellen der Daten")
If Not atez.setJsonNCTS(atez_data) Then MsgBox("Fehler beim Erstellen der Daten")
atez.setJsonPDF(atez_data, dgvAnhaenge)
Dim data As New DataObject()