USTVA-Antrag, etc.

This commit is contained in:
2025-05-27 17:02:52 +02:00
parent 05fed2d357
commit 747835170f
2 changed files with 49 additions and 6 deletions

View File

@@ -1100,7 +1100,10 @@ Public Class cMDMFunctionsAllgemein
Else
For Each row In dtNew.Rows
row("Name of supplier") = row("Name of supplier").ToString.Replace(" " & row("VAT").ToString.Substring(0, 2), "")
If Not IsDBNull(row("VAT")) AndAlso row("VAT") <> "" AndAlso Not IsDBNull(row("Name of supplier")) AndAlso row("Name of supplier") <> "" Then
row("Name of supplier") = row("Name of supplier").ToString.Replace(" " & row("VAT").ToString.Substring(0, 2), "")
End If
Next
If dtNew.Columns.Contains("Number") Then