Index: AXimpl/Dynamics/InventoryOut/Converter/AxInventSyncCreator.cls.xml =================================================================== diff -u -r45927 -r46025 --- AXimpl/Dynamics/InventoryOut/Converter/AxInventSyncCreator.cls.xml (.../AxInventSyncCreator.cls.xml) (revision 45927) +++ AXimpl/Dynamics/InventoryOut/Converter/AxInventSyncCreator.cls.xml (.../AxInventSyncCreator.cls.xml) (revision 46025) @@ -3,6 +3,11 @@ TECH.RegisteredObject,TECH.Mockable + +AXimpl.Formatter +1 + + Prod.ProductRepository 1 @@ -34,6 +39,7 @@ Set ..StockReservatieRepository = $$$Inject(StockReservatieRepository, ##class(Prod.StockReservatieRepository).%New()) Set ..SequenceNrGenerator = $$$Inject(SequenceNrGenerator, ##class(AXimpl.ConfigId).%New()) Set ..ReceptieStockNiveauService = $$$Inject(ReceptieStockNiveauService,##class(AXimpl.Dynamics.InventoryOut.Converter.ReceptieStockNiveauService).%New()) + Set ..AXimplFormatter = ##class(AXimpl.Formatter).%New() Quit $$$OK ]]> @@ -57,9 +63,9 @@ Set InventSyncProduct.ConfigId = "" Set InventSyncProduct.ItemId = ..GeefIdentNummer(PRNr, PRNrSoprPrincipaal) Set InventSyncProduct.QtyBlockedHLX = 0 - Set InventSyncProduct.QtyBlockedVH = ##class(TECH.Math).Floor(..GeefQtyBlockedVH(PRNr,PRNrSoprPrincipaal,SOPRKindInCache),2) - Set InventSyncProduct.QtyHLX = $$$If(+WVStock > 0,##class(TECH.Math).Floor(+WVStock,2),0) - Set InventSyncProduct.QtyVH = $$$If(+FysStock > 0,##class(TECH.Math).Floor(+FysStock,2),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.SequenceNr = ..SequenceNrGenerator.GeefVolgendProductVoorraadSyncBerichtId() Set InventSyncProduct.SOPRContractId = SoprContractId