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

VerwahrungTmstmp

Browse Source
This commit is contained in:
Andreas Luxbauer
2024-11-07 08:42:01 +01:00
parent 37f8f58a1b
commit a1dfb2ad85
5 changed files with 72 additions and 66 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
Aviso/Classes/cSendungsoptions.vb
View File

@@ -245,6 +245,10 @@ Public Class SendungOptions
VALUES.Tarifposanzahl = SENDUNG.tblSnd_anzahlHandling
End If
If SENDUNG.tblSnd_Abfertigungsart_ID = 67 Or SENDUNG.tblSnd_Abfertigungsart_ID = 68 Then
VALUES.Tarifposanzahl = SENDUNG.tblSnd_anzahlHandling
End If
VALUES.NCTS_VZAdr = If(SENDUNG.tblSnd_NCTSVerzollungsadresse, "")
VALUES.NCTS_VZAdr &= vbNewLine & If(SENDUNG.NCTS_Verzollungsadresse_Strasse, "")
VALUES.NCTS_VZAdr &= vbNewLine & If(SENDUNG.NCTS_Verzollungsadresse_Land, "") & " " & If(SENDUNG.NCTS_Verzollungsadresse_PLZ, "") & " " & If(SENDUNG.NCTS_Verzollungsadresse_Ort, "")