mdmAntrag, KI, etc.

This commit is contained in:
2025-05-14 14:46:33 +02:00
parent a53cd730d3
commit c86f82483a
6 changed files with 135 additions and 106 deletions

View File

@@ -644,25 +644,7 @@ Public Class ustCntlUSTV_AntragPosition
Dim dt As New DataTable
If dt IsNot Nothing And Not dt.Columns.Contains("currency") Then
dt.Columns.Add("count", GetType(Integer))
dt.Columns.Add("currency", GetType(String))
dt.Columns.Add("seller_VAT_id", GetType(String))
dt.Columns.Add("seller_address_city", GetType(String))
dt.Columns.Add("seller_address_country", GetType(String))
dt.Columns.Add("seller_address_postcode", GetType(String))
dt.Columns.Add("seller_address_street", GetType(String))
dt.Columns.Add("seller_name", GetType(String))
dt.Columns.Add("total_VAT_amount", GetType(Double))
dt.Columns.Add("invoice_id", GetType(String))
dt.Columns.Add("invoice_date", GetType(String))
dt.Columns.Add("status", GetType(String))
dt.Columns.Add("document_count", GetType(Integer))
dt.Columns.Add("page_count", GetType(Integer))
dt.Columns.Add("doc_index", GetType(Integer))
dt.Columns.Add("total_pages", GetType(Integer))
End If
dt = API.createVATDatatable(item.Name)
Dim failreDesc As String
Dim authResp = API.authenticate("VAT", "client1", "password", item.Name)