Index: AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml
===================================================================
diff -u -r48316 -r48319
--- AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml (.../SalesOrderConverter.cls.xml) (revision 48316)
+++ AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml (.../SalesOrderConverter.cls.xml) (revision 48319)
@@ -124,7 +124,7 @@
#dim OrderLine As AXif.Dynamics.SalesOrderIn.MessageParts.AxdEntityOrderLine = OrderLineIterator.Next()
If $$$Not(..MagOrderLijnUpdaten(OrderLine)) {
- Do ..Logger.Debug("Aanmaken Order", "OrderLijn met InventTransId '" _OrderLine.InventTransId _"' is in verwerking. Er wordt geen update uitgevoerd.")
+ Do ..Logger.Debug("SalesOrderIn - Orderlijn is geblokkeerd", "OrderLijn met InventTransId '" _OrderLine.InventTransId _"' is in verwerking. Er wordt geen update uitgevoerd.")
Continue
}
@@ -158,6 +158,7 @@
Set MagOrderVerwijderen = MagOrderVerwijderen && $$$Not(Order.GeefTypeOrderLijnIterator(##class(DOM.VKP.enu.OrderLijnType).Product()).HasNext())
Set MagOrderVerwijderen = MagOrderVerwijderen && $$$Not(Order.GeefTypeOrderLijnIterator(##class(DOM.VKP.enu.OrderLijnType).Manueel()).HasNext())
If MagOrderVerwijderen {
+ Do ..Logger.Debug("SalesOrderIn - Order verwijderen", "Order met OrderID '" _Order.GeefID() _"' is leeg en wordt verwijderd")
Do ..OrderAPI.VerwijderOrder(Order.GeefID())
Set Order = ""
}
@@ -169,7 +170,7 @@
1
@@ -182,7 +183,7 @@
Do Order.HerlaadLijnen()
If (##class(TECH.Config.ConfigMgr).Instance().GeefBoolean("BevestigdAXOrderSluitenActief")) {
Do ..OrderSluiter.Sluit(Order.GeefID())
- Do ..Logger.Debug("Aanmaken Order", "Toeleveringen aangemaakt en order met OrderID '" _Order.GeefID() _"' is gesloten.")
+ Do ..Logger.Debug("SalesOrderIn - Order sluiten", "Toeleveringen aangemaakt en order met OrderID '" _Order.GeefID() _"' is gesloten.")
}
]]>
@@ -207,7 +208,7 @@
Do:..IsReedsVerwerkteOrderlijn(OrderLine) OrderLijn.ZetToeleveringID("")
Do OrderLijn.ZetTekstVoorAfdrukDocumentType(..VerwijderKOMLinkIdentificatie(OrderLine.PackingSlipBody), ##class(DOM.VKP.enu.TekstAfdrukDocumentType).LeverBon())
- Do ..Logger.Debug("Aanmaken Order", "OrderLijn properties zijn gezet voor PrijsOrderLijn " _OrderLijn.GeefID() )
+ Do ..Logger.Debug("SalesOrderIn - Orderlijn updaten", "OrderLijn properties zijn gezet voor OrderLijnID '" _OrderLijn.GeefID() _"'")
]]>
@@ -233,7 +234,7 @@
@@ -255,11 +256,11 @@
If ..OrderAPI.BestaatOrder(OrderID) {
- Do ..Logger.Debug("Aanmaken Order", "Bestaand order met OrderID " _OrderID _" wordt geupdatet." )
+ Do ..Logger.Debug("SalesOrderIn - Update bestaand order", "Bestaand order met OrderID '" _OrderID _"' wordt geupdatet." )
#dim Order As DOM.VKP.Order = ..OrderAPI.GeefOrder(OrderID)
Do Order.HerlaadLijnen()
- Do ..Logger.Debug("Aanmaken Order", "Toeleveringen voor order met OrderID " _OrderID _" worden verwijderd." )
+ Do ..Logger.Debug("SalesOrderIn - Toeleveringen verwijderen", "Toeleveringen voor order met OrderID '" _OrderID _"' worden verwijderd." )
Do ..ToeleveringService.VerwijderToeleveringenViaOrder(Order)
Do Order.HerlaadLijnen()
@@ -270,7 +271,7 @@
Do ..OrderAPI.VerwijderOverbodigeIndexen(OrderID)
- Do ..Logger.Debug("Aanmaken Order", "Nieuw order met OrderID " _OrderID _" wordt aangemaakt." )
+ Do ..Logger.Debug("SalesOrderIn - Aanmaken Order", "Nieuw order met OrderID '" _OrderID _"' wordt aangemaakt." )
Quit ..OrderLevenCyclusService.MaakOrderMetKlantGegevens(KlantID, OrderID)
}
@@ -344,7 +345,7 @@
}
}
- Do ..Logger.Debug("Aanmaken Order", "Hoofding op order gezet voor Order " _Order.GeefID())
+ Do ..Logger.Debug("SalesOrderIn - Zet order hoofding", "Hoofding op order gezet voor Order '" _Order.GeefID() _"'")
]]>
@@ -357,7 +358,7 @@
Do ..ValideerOrderID(OrderID)
- Do ..Logger.Debug("Aanmaken Order", "Geldig OrderID is " _OrderID)
+ Do ..Logger.Debug("SalesOrderIn - Aanmaken OrderID", "Geldig OrderID is '" _OrderID _"'")
Quit OrderID
]]>
@@ -369,7 +370,7 @@
@@ -408,7 +409,7 @@
#dim ProductLijn As DOM.VKP.ProductOrderlijn = ..OrderLevenCyclusService.VoegToeProductVoorKlant(Order, Order.GeefKlantID(), ProductId, OrderLine.RemainSalesPhysical)
- Do ..Logger.Debug("Aanmaken Order", "Product toegevoegd met ProductID " _ProductId)
+ Do ..Logger.Debug("SalesOrderIn - Productlijn toevoegen", "Product toegevoegd met ProductID '" _ProductId _"'")
Quit ProductLijn
]]>
@@ -426,7 +427,7 @@
#dim MaatwerkLijn As DOM.VKP.ProductOrderlijn = ..OrderLevenCyclusService.VoegToeProductVoorKlant(Order, Order.GeefKlantID(), ProductNummer, OrderLine.RemainSalesPhysical)
Do MaatwerkLijn.ZetAxMaatwerkGenerischItemId(OrderLine.ItemId)
- Do ..Logger.Debug("Aanmaken Order", "Maatwerk toegevoegd met productnummer " _ProductNummer _ " met MaatwerkGenerischItemId " _OrderLine.ItemId)
+ Do ..Logger.Debug("SalesOrderIn - Toevoegen maatwerklijn", "Maatwerk toegevoegd met productnummer '" _ProductNummer _ "' met MaatwerkGenerischItemId '" _OrderLine.ItemId _"'")
Quit MaatwerkLijn
]]>
@@ -489,7 +490,7 @@
Do Order.ZetDocumentReferenties(DocumentReferenties)
- Do ..Logger.Debug("Aanmaken Order", "Documentreferenties gezet voor OrderID " _Order.GeefID() _ " DocumentReferentieID " _DocumentReferenties.GeefID() )
+ Do ..Logger.Debug("SalesOrderIn - Zet document referentie", "Documentreferenties gezet voor OrderID '" _Order.GeefID() _ "' DocumentReferentieID '" _DocumentReferenties.GeefID() _"'")
]]>
@@ -498,6 +499,7 @@
1
DOM.VKP.impl.LeverAdres
Index: vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Test.cls.xml
===================================================================
diff -u -r48316 -r48319
--- vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Test.cls.xml (.../Test.cls.xml) (revision 48316)
+++ vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Test.cls.xml (.../Test.cls.xml) (revision 48319)
@@ -191,7 +191,7 @@
Index: AXimpl/Dynamics/SalesOrderIn/Converter/ToeleveringService.cls.xml
===================================================================
diff -u -r48287 -r48319
--- AXimpl/Dynamics/SalesOrderIn/Converter/ToeleveringService.cls.xml (.../ToeleveringService.cls.xml) (revision 48287)
+++ AXimpl/Dynamics/SalesOrderIn/Converter/ToeleveringService.cls.xml (.../ToeleveringService.cls.xml) (revision 48319)
@@ -8,6 +8,11 @@
1
+
+vhLib.Logger
+1
+
+
SalesOrderLineStatusRepository:AXdata.Dynamics.SalesLineStatus.SalesOrderLineStatusRepository
1
@@ -16,6 +21,8 @@
1
@@ -76,6 +83,7 @@
ToeleveringID:%String
1