TC Einarbeitung + DB Telo/SpedBuch

This commit is contained in:
2025-08-12 11:33:32 +02:00
parent c677846f7b
commit ede8b3a4f0
7 changed files with 1307 additions and 918 deletions

View File

@@ -772,7 +772,7 @@ Public Class cDakosyAES
'End Function
Public Shared Sub DakosyAESDatenbereitstellung(ByVal SPEDITIONSBUCH As VERAG_PROG_ALLGEMEIN.cSpeditionsbuch, AES_Nr As String, ByVal notFound As Boolean)
Public Shared Sub DakosyAESDatenbereitstellung(ByVal SPEDITIONSBUCH As VERAG_PROG_ALLGEMEIN.cSpeditionsbuch, AES_Nr As String, Byref notFound As Boolean)
Dim DY As DAKOSY_Worker.cDakosyAES = DAKOSY_Worker.cDakosyAES.LOADByBezugsNr(AES_Nr, True)
If DY Is Nothing Then
notFound = True
@@ -781,7 +781,7 @@ Public Class cDakosyAES
DakosyAESDatenbereitstellung(SPEDITIONSBUCH, DY, notFound)
End Sub
Public Shared Sub DakosyAESDatenbereitstellung(ByVal SPEDITIONSBUCH As VERAG_PROG_ALLGEMEIN.cSpeditionsbuch, DY As DAKOSY_Worker.cDakosyAES, ByVal notFound As Boolean)
Public Shared Sub DakosyAESDatenbereitstellung(ByVal SPEDITIONSBUCH As VERAG_PROG_ALLGEMEIN.cSpeditionsbuch, DY As DAKOSY_Worker.cDakosyAES, Byref notFound As Boolean)
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
notFound = False