AppStd/Modules
8
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Modules.Jobs: Keine Hochkomma-Ersetzung mehr bei Bulk-Insert

Browse Source
This commit is contained in:
PitzM 2025-07-01 10:09:32 +02:00
parent 390a524736
commit fa2c2a6417
3 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
Interfaces/ZUGFeRDInterface/Enums/Item_Types.vb
View File

@ -3,5 +3,6 @@
DateType '1 DateType '1
MoneyType '2 MoneyType '2
FileType '3 FileType '3
ListType '4
End Enum End Enum

1
Interfaces/ZUGFeRDInterface/Validator.vb
View File

@ -14,6 +14,7 @@ Public Class Validator
ValidateDecimalNodes(pResult) ValidateDecimalNodes(pResult)
ValidateCurrencyNodes(pResult) ValidateCurrencyNodes(pResult)
'TODO Validate Datumsfelder
Return pResult Return pResult
End Function End Function

5
Jobs/ZUGFeRD/ImportZUGFeRDFiles.vb
View File

@ -1177,12 +1177,13 @@ Public Class ImportZUGFeRDFiles
Dim oNewRow As DataRow = oDataTable.NewRow() Dim oNewRow As DataRow = oDataTable.NewRow()
oNewRow("REFERENCE_GUID") = pMessageId oNewRow("REFERENCE_GUID") = pMessageId
oNewRow("ITEM_DESCRIPTION") = oProperty.Description oNewRow("ITEM_DESCRIPTION") = oProperty.Description
oNewRow("ITEM_VALUE") = oProperty.Value.Truncate(900).Replace("'", "''") 'oNewRow("ITEM_VALUE") = oProperty.Value.Truncate(900).Replace("'", "''")
oNewRow("ITEM_VALUE") = oProperty.Value.Truncate(900)
oNewRow("GROUP_COUNTER") = oGroupCounterValue oNewRow("GROUP_COUNTER") = oGroupCounterValue
oNewRow("SPEC_NAME") = oProperty.TableColumn oNewRow("SPEC_NAME") = oProperty.TableColumn
oNewRow("IS_REQUIRED") = oProperty.IsRequired oNewRow("IS_REQUIRED") = oProperty.IsRequired
_logger.Debug("Mapping Property [{0}] with value [{1}]", oProperty.TableColumn, oProperty.Value.Replace("'", "''")) _logger.Debug("Mapping Property [{0}] with value [{1}]", oProperty.TableColumn, oProperty.Value)
oDataTable.Rows.Add(oNewRow) oDataTable.Rows.Add(oNewRow)
Next Next