Timas, Kundensicherheiten fix, cbam fix, fakt (IBAN Zugferd), etc.

VERAG_PROG_ALLGEMEIN/Classes/cDY_Zollanmeldungen_Import.vb

@@ -309,7 +309,7 @@ Public Class cDY_Zollanmeldungen_Import
 
 
 
-    Public Function SAVE() As Boolean
+    Public Function SAVE(Optional ShowErrer As Boolean = True) As Boolean
         Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
 
         Dim sqlstr = " BEGIN TRAN IF EXISTS(SELECT * FROM tbl_DY_Zollmeldungen_Import  WHERE Id=@Id) " &
@@ -318,7 +318,7 @@ Public Class cDY_Zollanmeldungen_Import
                        " BEGIN " & getInsertCmd() & " END " &
                        " commit tran "
 
-        Return SQL.doSQLVarList(sqlstr, "AVISO", , list)
+        Return SQL.doSQLVarList(sqlstr, "AVISO", ShowErrer, list)
     End Function
 
     Public Sub LOAD()