Index: AXimpl/Formatter.cls.xml
===================================================================
diff -u -r46109 -r46118
--- AXimpl/Formatter.cls.xml (.../Formatter.cls.xml) (revision 46109)
+++ AXimpl/Formatter.cls.xml (.../Formatter.cls.xml) (revision 46118)
@@ -163,6 +163,12 @@
+
+
+Quantity:%String
+ 0,$this.FormatNumber(##class(TECH.Math).Floor(+Quantity,2),2), $this.FormatNumber(##class(TECH.Math).Floor(0,2),2))
+]]>
+
Index: vhUnitTest/AXimpl/Formatter/FormatInventSyncProductQuantity/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/AXimpl/Formatter/FormatInventSyncProductQuantity/Test.cls.xml (revision 0)
+++ vhUnitTest/AXimpl/Formatter/FormatInventSyncProductQuantity/Test.cls.xml (revision 46118)
@@ -0,0 +1,105 @@
+
+
+
+vhUnitTest.TestCase
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
Index: vhUnitTest/AXimpl/Dynamics/InventoryOut/Converter/AxInventSyncCreator/Test.cls.xml
===================================================================
diff -u -r46025 -r46118
--- vhUnitTest/AXimpl/Dynamics/InventoryOut/Converter/AxInventSyncCreator/Test.cls.xml (.../Test.cls.xml) (revision 46025)
+++ vhUnitTest/AXimpl/Dynamics/InventoryOut/Converter/AxInventSyncCreator/Test.cls.xml (.../Test.cls.xml) (revision 46118)
@@ -197,95 +197,10 @@
#dim InventSyncProduct As AXif.Dynamics.Inventory.MessageParts.AxdEntityInventSync = ..GeefAxInventSyncCreator().MaakInventSync(..#ProductId)
- Do $$$AssertEquals(InventSyncProduct.QtyBlockedVH,"0.00")
Do ReceptieStockNiveauServiceMock.Verifieer()
]]>
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
@@ -532,126 +327,6 @@
]]>
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
Index: AXimpl/Dynamics/InventoryOut/Converter/AxInventSyncCreator.cls.xml
===================================================================
diff -u -r46025 -r46118
--- AXimpl/Dynamics/InventoryOut/Converter/AxInventSyncCreator.cls.xml (.../AxInventSyncCreator.cls.xml) (revision 46025)
+++ AXimpl/Dynamics/InventoryOut/Converter/AxInventSyncCreator.cls.xml (.../AxInventSyncCreator.cls.xml) (revision 46118)
@@ -63,9 +63,9 @@
Set InventSyncProduct.ConfigId = ""
Set InventSyncProduct.ItemId = ..GeefIdentNummer(PRNr, PRNrSoprPrincipaal)
Set InventSyncProduct.QtyBlockedHLX = 0
- Set InventSyncProduct.QtyBlockedVH = ..AXimplFormatter.FormatNumber(##class(TECH.Math).Floor(..GeefQtyBlockedVH(PRNr,PRNrSoprPrincipaal,SOPRKindInCache),2),2)
- Set InventSyncProduct.QtyHLX = $$$If(+WVStock > 0,..AXimplFormatter.FormatNumber(##class(TECH.Math).Floor(+WVStock,2),2),0)
- Set InventSyncProduct.QtyVH = $$$If(+FysStock > 0,..AXimplFormatter.FormatNumber(##class(TECH.Math).Floor(+FysStock,2),2),0)
+ Set InventSyncProduct.QtyBlockedVH = ..AXimplFormatter.FormatInventSyncProductQuantity(..GeefQtyBlockedVH(PRNr,PRNrSoprPrincipaal,SOPRKindInCache))
+ Set InventSyncProduct.QtyHLX = ..AXimplFormatter.FormatInventSyncProductQuantity(WVStock)
+ Set InventSyncProduct.QtyVH = ..AXimplFormatter.FormatInventSyncProductQuantity(FysStock)
Set InventSyncProduct.SequenceNr = ..SequenceNrGenerator.GeefVolgendProductVoorraadSyncBerichtId()
Set InventSyncProduct.SOPRContractId = SoprContractId
@@ -96,7 +96,7 @@
#dim KPRNr As %String
Set KPRNr = $$$If(..ProductRepository.BestaatViaID(PRNrSoprPrincipaal),SOPRKindInCache,PRNr)
- Quit +..ReceptieStockNiveauService.GeefAantalInReceptieNietGeboekt(PRNr,KPRNr)
+ Quit ..ReceptieStockNiveauService.GeefAantalInReceptieNietGeboekt(PRNr,KPRNr)
]]>