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

neu

Browse Source
This commit is contained in:
Andreas Luxbauer
2021-02-02 21:15:31 +01:00
parent fddd4b5794
commit 8431ce57eb
2 changed files with 8 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
DAKOSY_Worker/DAKOSY/ATLAS/EZA/cDakosyEZA.vb
View File

@@ -1192,8 +1192,10 @@ Public Class cDakosyEZA
Try Try
Dim ANM As New DAKOSY_Worker.cDakosy_Zollanmeldungen(DY.aes_dyaAnmID) Dim ANM As New DAKOSY_Worker.cDakosy_Zollanmeldungen(DY.aes_dyaAnmID)
SPEDITIONSBUCH.DokumentId_Steuerbeleg = ANM.dy_Steuerbescheid_dsId 'SPEDITIONSBUCH.DokumentId_Steuerbeleg = ANM.dy_Steuerbescheid_dsId
SPEDITIONSBUCH.DokumentId_VBD = ANM.dy_VBD_dsId 'SPEDITIONSBUCH.DokumentId_VBD = ANM.dy_VBD_dsId
SPEDITIONSBUCH.DokumentId_ABD = ANM.dy_ABD_dsId
SPEDITIONSBUCH.DokumentId_AVM = ANM.dy_AVM_dsId
Catch ex As Exception Catch ex As Exception
MsgBox("ERR: " & ex.Message & ex.StackTrace) MsgBox("ERR: " & ex.Message & ex.StackTrace)

4
DAKOSY_Worker/DAKOSY/cDakosy_Zollanmeldungen.vb
View File

@@ -16,6 +16,8 @@ Public Class cDakosy_Zollanmeldungen
Property dy_LetzteBearbeitung_SB As Object = Nothing Property dy_LetzteBearbeitung_SB As Object = Nothing
Property dy_Steuerbescheid_dsId As Object = Nothing Property dy_Steuerbescheid_dsId As Object = Nothing
Property dy_VBD_dsId As Object = Nothing Property dy_VBD_dsId As Object = Nothing
Property dy_ABD_dsId As Object = Nothing
Property dy_AVM_dsId As Object = Nothing
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
@@ -57,6 +59,8 @@ Public Class cDakosy_Zollanmeldungen
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("dy_Steuerbescheid_dsId", dy_Steuerbescheid_dsId)) list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("dy_Steuerbescheid_dsId", dy_Steuerbescheid_dsId))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("dy_VBD_dsId", dy_VBD_dsId)) list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("dy_VBD_dsId", dy_VBD_dsId))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("dy_ABD_dsId", dy_ABD_dsId))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("dy_AVM_dsId", dy_AVM_dsId))
Return list Return list
End Function End Function