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

eza

Browse Source
This commit is contained in:
Andreas Luxbauer
2026-02-25 11:11:01 +01:00
parent cca43545e5
commit 368697ae45
1 changed files with 6 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
Aviso/ATEZ/frmATEZ_EZA.vb
View File

@@ -186,9 +186,12 @@ Public Class frmATEZ_EZA
}
If If(AVISO.Zollstelle, "").Length >= 4 Then
ATEZ_RH_EZA.additionalData.declaration(0).headerData.addressedCustomsOffice = AVISO.Zollstelle.ToString.Substring(AVISO.Zollstelle.ToString.Length - 4)
'MsgBox(ATEZ_RH_EZA.additionalData.declaration(0).headerData.addressedCustomsOffice)
'If If(AVISO.Zollstelle, "").Length >= 4 Then
'ATEZ_RH_EZA.additionalData.declaration(0).headerData.addressedCustomsOffice = AVISO.Zollstelle.ToString.Substring(AVISO.Zollstelle.ToString.Length - 4)
' 'MsgBox(ATEZ_RH_EZA.additionalData.declaration(0).headerData.addressedCustomsOffice)
'End If
If If(sbAdressierteZollstelle._value, "").Length >= 4 Then
ATEZ_RH_EZA.additionalData.declaration(0).headerData.addressedCustomsOffice = sbAdressierteZollstelle._value
End If
ATEZ_RH_EZA.additionalData.declaration(0).objectIdentification.username = If(VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_DAKOSY_SB, "ANDREAS")