diff --git a/app/BrainpoolXmlParser/Main.vb b/app/BrainpoolXmlParser/Main.vb
index fa8e9b3..ecc3644 100644
--- a/app/BrainpoolXmlParser/Main.vb
+++ b/app/BrainpoolXmlParser/Main.vb
@@ -65,7 +65,7 @@ Module Main
Dim akz As String = mark.ApplicationNumber
Dim file As String = String.Format("Importer-RegisterData-{0}.xml", akz)
- logger.Info("Getting Register Info for {0}", akz)
+ logger.Debug("Getting Register Info for {0}", akz)
markDoc = dpma.GetRegisterInfo(akz)
markDoc.Save(file)
@@ -75,7 +75,7 @@ Module Main
Next
logger.Info("{0} Marks imported", marks.Count)
- logger.Info("=================== DPMA END ===================")
+ logger.Debug("=================== DPMA END ===================")
' =========================================================================================
@@ -100,7 +100,7 @@ Module Main
logger.Info("New record created with GUID: " & recordId)
' Den Leit-Wert einfügen für mainControlId
Dim valueId = db.InsertValue(mainControlId, recordId, m.ApplicationNumber)
- logger.Info("Value inserted - Property: {0}, Value: {1}, ControlId: {2}", "ApplicationNumber", m.ApplicationNumber, mainControlId)
+ logger.Debug("Value inserted - Property: {0}, Value: {1}, ControlId: {2}", "ApplicationNumber", m.ApplicationNumber, mainControlId)
' alle anderen properties zu dieser marke einfügen einfügen
For Each prop As String In props
@@ -110,12 +110,14 @@ Module Main
Dim value = db.GetProperty(m, prop)
' Wert einfügen
db.InsertValue(controlId, recordId, value)
- logger.Info("Value inserted - Property: {0}, Value: {1}, ControlId: {2}", prop, value, controlId)
+ logger.Debug("Value inserted - Property: {0}, Value: {1}, ControlId: {2}", prop, value, controlId)
Next
Else
' Marke aktualisieren
Dim recordId As Integer = markExists
+ logger.Info("Existing Record updated with GUID: {0}", recordId)
+
For Each prop As String In props
' ControlID für die aktuelle property holen
Dim controlId = db.GetControlId(formId, prop)
@@ -128,16 +130,15 @@ Module Main
If hasChanged Then
db.UpdateValue(controlId, recordId, value)
- logger.Info("Value updated - Property: {0}, NewValue: {1}, ControlId: {2}", prop, value, controlId)
+ logger.Debug("Value updated - Property: {0}, NewValue: {1}, ControlId: {2}", prop, value, controlId)
End If
Next
End If
- logger.Info("=================== DATABASE END ===================")
+ logger.Debug("=================== DATABASE END ===================")
Next
Catch ex As Exception
- logger.Error("================================")
logger.Error("An Error occurred: " & ex.Message)
Environment.Exit(1)
End Try
diff --git a/app/BrainpoolXmlParser/NLog.config b/app/BrainpoolXmlParser/NLog.config
index 5cfaf00..e03c33a 100644
--- a/app/BrainpoolXmlParser/NLog.config
+++ b/app/BrainpoolXmlParser/NLog.config
@@ -35,8 +35,8 @@
Write all events with minimal level of Debug (So Debug, Info, Warn, Error and Fatal, but not Trace) to "f"
-->
-
-
+
+
\ No newline at end of file