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

Grundlegender Programmaufbau

Browse Source
This commit is contained in:
Andreas Luxbauer
2025-01-22 09:13:57 +01:00
parent 627f48826e
commit 809ce03a15
9 changed files with 1017 additions and 280 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
SDL/Classes/cEORIWebService.vb
View File

@@ -146,7 +146,7 @@ Public Class cEORIWebService
setEORIEntry(KdNr, SendungsId, AvisoId, EORI_ERG, tmp_SESSION_ID, EORI_ERG.Result(0).Eori, VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA_ID)
Dim PdfTmp = SDL.FormularManagerNEU.EORI_PRUEFUNG(msgErgebnis, Firma, tmp_SESSION_ID, txtEORI, AvisoId, SendungsId)
Dim PdfTmp = SDL.FormularManagerNEU.EORI_PRUEFUNG(msgErgebnis, Firma, tmp_SESSION_ID, txtEORI, AvisoId, SendungsId, EORI_ERG.RequestDate)
If PdfTmp <> "" Then
Dim fileName = "EORI_Prüfung_" & txtEORI & ".pdf"
@@ -211,7 +211,7 @@ Public Class cEORIWebService
setEORIEntry(kdnr, SendungsId, AvisoId, EORI_ERG, tmp_SESSION_ID, txtEORI, VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA_ID)
Dim PdfTmp = SDL.FormularManagerNEU.EORI_PRUEFUNG(msgErgebnis, Firma, tmp_SESSION_ID, txtEORI, AvisoId, SendungsId)
Dim PdfTmp = SDL.FormularManagerNEU.EORI_PRUEFUNG(msgErgebnis, Firma, tmp_SESSION_ID, txtEORI, AvisoId, SendungsId, EORI_ERG.RequestDate)
Return PdfTmp