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

StartOpt Einarbeitung InvoicesToCustomer, fix von tc_anmeldung, etc.

Browse Source
This commit is contained in:
d.breimaier
2026-03-26 08:53:39 +01:00
parent c6d3fea004
commit acba79c48d
4 changed files with 281 additions and 155 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
DAKOSY_Worker/cImporter_TelotecToVERAG.vb
View File

@@ -169,13 +169,13 @@ Public Class cImporter_TelotecToVERAG
For Each doc In p.DOC_CERTS
Try
Dim dd As New cVERAG_CustomsDeclarations_Document With {
Dim dd As New cVERAG_CustomsDeclarations_Document With {
.zaDoc_ItemId = Nothing,
.zaDoc_Code = ToStringSafe(doc.DocCerts_DocCd),
.zaDoc_Reference = ToStringSafe(doc.DocCerts_DRef),
.zaDoc_Date = ToNullableDate(doc.DocCerts_IssD)
.zaDoc_Date = If(doc.DocCerts_IssD IsNot Nothing, ToNullableDate(doc.DocCerts_IssD), Nothing)'ToNullableDate(doc.DocCerts_IssD)
}
it.Documents.Add(dd)
it.Documents.Add(dd)
Catch ex As Exception
cErrorHandler.ERR(ex.Message, ex.StackTrace, MethodInfo.GetCurrentMethod.Name)
End Try