From 133e16d7e5c6a00da76180849871c76d41bd6b94 Mon Sep 17 00:00:00 2001
From: Andreas Luxbauer <al@verag.ag>
Date: Thu, 15 Jun 2023 22:20:55 +0200
Subject: [PATCH] GebrWeiss Aviso Vorlage

---
 Aviso/frmSendungsdetailsNEU.vb | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/Aviso/frmSendungsdetailsNEU.vb b/Aviso/frmSendungsdetailsNEU.vb
index b5ff38e..1d8f814 100644
--- a/Aviso/frmSendungsdetailsNEU.vb
+++ b/Aviso/frmSendungsdetailsNEU.vb
@@ -1201,8 +1201,12 @@ Public Class frmSendungsdetailsNEU
             '  cboAufschub._value = loadValue(SENDUNG_LIST(CURRENT_INDEX).tblSnd_aufschub, "")
             cboZolltarif.changeItem(loadValue(SENDUNG_LIST(CURRENT_INDEX).tblSnd_AngabeZolltarif, 0))
 
+            If txtDyRef.Visible Then
+                txtDyRef.Text = If(SENDUNG_LIST(CURRENT_INDEX).tblSnd_DakosyRef, "")
+            Else
+                txtDyRef.Text = ""
+            End If
 
-            txtDyRef.Text = If(SENDUNG_LIST(CURRENT_INDEX).tblSnd_DakosyRef, "")
 
             If VERAG_PROG_ALLGEMEIN.cAllgemein.AUTO_ABF_NR Then btnNeueAbfertigungNrVergeben.Visible = (SENDUNG_LIST(CURRENT_INDEX).AbfertigungsNr <= 0)
             lblSendungen.Text = (CURRENT_INDEX + 1)
@@ -5182,7 +5186,7 @@ Public Class frmSendungsdetailsNEU
         VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge.LOAD_LIST_BySendung(ANH_LIST_SND, SENDUNG.tblSnd_SendungID) 'LÄDT alle Aviso-Anhänge
         For Each l In ANH_LIST_SND
             Select Case l.anh_Art.ToString.ToUpper
-                Case "RECHNUNG", "HANDELSRECHNUNG", "eFatura"
+                Case "RECHNUNG", "HANDELSRECHNUNG", "EFATURA"
                     VERAG_PROG_ALLGEMEIN.cFormularManager.PrintViaSpirePDF({VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(l.anh_docId)})
             End Select
         Next