This commit is contained in:
2021-11-18 14:59:04 +01:00
parent 05280436a4
commit 98378dd496
51 changed files with 4647 additions and 763 deletions

View File

@@ -1059,10 +1059,16 @@ Public Class cDakosyEZA
SPEDITIONSBUCH.DokumentId_VBD = ANM.dy_VBD_dsId
Catch ex As Exception
MsgBox("ERR: " & ex.Message & ex.StackTrace)
End Try
'Falls DocId nicht gefunden wird.. warum auch immer..
If SPEDITIONSBUCH.DokumentId_Steuerbeleg Is Nothing Then
SPEDITIONSBUCH.DokumentId_Steuerbeleg = SQL.getValueTxtBySql("SELECT [da_id] FROM tblDatenarchiv where da_kategorie='ZOLLDATEN' and [da_ordner]='STEUERBESCHEID' and da_name='" & SPEDITIONSBUCH.AtlasBezNrEZA.Replace("/", "-") & "' ", "FMZOLL",,, Nothing)
End If
SPEDITIONSBUCH.Versendungsland = DY.eza_VersendungsLandCode
SPEDITIONSBUCH.Bestimmungsland = DY.eza_Bestimmungsland