Index: vhTest/Fake/AXimpl/Dynamics/InventoryOut/Converter/AxInventSyncCreator/StockFirmaBepaler.cls.xml
===================================================================
diff -u -r48760 -r48789
--- vhTest/Fake/AXimpl/Dynamics/InventoryOut/Converter/AxInventSyncCreator/StockFirmaBepaler.cls.xml (.../StockFirmaBepaler.cls.xml) (revision 48760)
+++ vhTest/Fake/AXimpl/Dynamics/InventoryOut/Converter/AxInventSyncCreator/StockFirmaBepaler.cls.xml (.../StockFirmaBepaler.cls.xml) (revision 48789)
@@ -12,6 +12,13 @@
DOM.common.enu.InterneFirma
+
+
+Product:DOM.PM.Product
+DOM.common.enu.InterneFirma
+
+
Index: AXimpl/Dynamics/InventoryOut/Converter/AxInventSyncCreator.cls.xml
===================================================================
diff -u -r48760 -r48789
--- AXimpl/Dynamics/InventoryOut/Converter/AxInventSyncCreator.cls.xml (.../AxInventSyncCreator.cls.xml) (revision 48760)
+++ AXimpl/Dynamics/InventoryOut/Converter/AxInventSyncCreator.cls.xml (.../AxInventSyncCreator.cls.xml) (revision 48789)
@@ -71,7 +71,7 @@
If ..ProductRepository.BestaatViaID(PRNr) {
#dim Product As DOM.PM.Product = ..ProductRepository.GeefViaID(PRNr)
- If (..StockFirmaBepaler.Bepaal(Product)=##class(DOM.common.enu.InterneFirma).VanHoeckeNv()) {
+ If (..StockFirmaBepaler.BepaalVoorGewoneStock(Product)=##class(DOM.common.enu.InterneFirma).VanHoeckeNv()) {
Set FysStock = +FysStock + +WVStock
Set WVStock = ""
}
@@ -82,13 +82,19 @@
Set InventSyncProduct.class = "entity"
Set InventSyncProduct.ConfigId = AxConfigId
Set InventSyncProduct.ItemId = ..GeefIdentNummer(PRNr, PRNrSoprPrincipaal)
+
+ //lijn + 2 moet ofwel bij hlx ofwel bij vh enkel naar linkstype kijken HH en HHZ naar halux rest naar vh
+
Set InventSyncProduct.QtyBlockedHLX = 0
Set InventSyncProduct.QtyBlockedVH = ..AXimplFormatter.FormatInventSyncProductQuantity($$$If(IsStockOverKinderen,0,..GeefQtyBlockedVH(PRNr,PRNrSoprPrincipaal,SOPRKindInCache)))
Set InventSyncProduct.QtyHLX = ..AXimplFormatter.FormatInventSyncProductQuantity(+WVStock + +InventSyncProduct.QtyBlockedHLX)
Set InventSyncProduct.QtyVH = ..AXimplFormatter.FormatInventSyncProductQuantity(+FysStock + +InventSyncProduct.QtyBlockedVH)
Set InventSyncProduct.SequenceNr = ..SequenceNrGenerator.GeefVolgendProductVoorraadSyncBerichtId()
Set InventSyncProduct.SOPRContractId = SoprContractId
+ //alle qtyies altijd 0 indien linktype S
+
+
Quit InventSyncProduct
]]>
Index: vhUnitTest/AXimpl/Dynamics/InventoryOut/Converter/AxInventSyncCreator/StockFirmaBepaler/Bepaal/Test.cls.xml
===================================================================
diff -u -r48787 -r48789
--- vhUnitTest/AXimpl/Dynamics/InventoryOut/Converter/AxInventSyncCreator/StockFirmaBepaler/Bepaal/Test.cls.xml (.../Test.cls.xml) (revision 48787)
+++ vhUnitTest/AXimpl/Dynamics/InventoryOut/Converter/AxInventSyncCreator/StockFirmaBepaler/Bepaal/Test.cls.xml (.../Test.cls.xml) (revision 48789)
@@ -15,7 +15,7 @@
#dim Product As Prod.Product = ..GeefTeConverterenProduct()
Set Product.LinkType = ##class(DOM.PM.enu.LinkType).Standaard()
- Do $$$AssertEquals(Bepaler.Bepaal(Product),##class(DOM.common.enu.InterneFirma).HaluxNv())
+ Do $$$AssertEquals(Bepaler.BepaalVoorGewoneStock(Product),##class(DOM.common.enu.InterneFirma).HaluxNv())
]]>
@@ -26,7 +26,7 @@
#dim Product As Prod.Product = ..GeefTeConverterenProduct()
Set Product.LinkType = ##class(DOM.PM.enu.LinkType).HalffabrikaatVH()
- Do $$$AssertEquals(Bepaler.Bepaal(Product),##class(DOM.common.enu.InterneFirma).VanHoeckeNv())
+ Do $$$AssertEquals(Bepaler.BepaalVoorGewoneStock(Product),##class(DOM.common.enu.InterneFirma).VanHoeckeNv())
]]>
@@ -37,7 +37,7 @@
#dim Product As Prod.Product = ..GeefTeConverterenProduct()
Set Product.LinkType = ##class(DOM.PM.enu.LinkType).HalffabrikaatVHZonderStock()
- Do $$$AssertEquals(Bepaler.Bepaal(Product),##class(DOM.common.enu.InterneFirma).VanHoeckeNv())
+ Do $$$AssertEquals(Bepaler.BepaalVoorGewoneStock(Product),##class(DOM.common.enu.InterneFirma).VanHoeckeNv())
]]>
@@ -48,7 +48,7 @@
#dim Product As Prod.Product = ..GeefTeConverterenProduct()
Set Product.LinkType = ""
- Do $$$AssertEquals(Bepaler.Bepaal(Product),##class(DOM.common.enu.InterneFirma).HaluxNv())
+ Do $$$AssertEquals(Bepaler.BepaalVoorGewoneStock(Product),##class(DOM.common.enu.InterneFirma).HaluxNv())
]]>
Index: AXimpl/Dynamics/InventoryOut/Converter/AxInventSyncCreator/StockFirmaBepaler.cls.xml
===================================================================
diff -u -r48787 -r48789
--- AXimpl/Dynamics/InventoryOut/Converter/AxInventSyncCreator/StockFirmaBepaler.cls.xml (.../StockFirmaBepaler.cls.xml) (revision 48787)
+++ AXimpl/Dynamics/InventoryOut/Converter/AxInventSyncCreator/StockFirmaBepaler.cls.xml (.../StockFirmaBepaler.cls.xml) (revision 48789)
@@ -3,7 +3,7 @@
TECH.Mockable
-
+
Product:DOM.PM.Product
DOM.common.enu.InterneFirma
AXimpl.Dynamics.InventoryOut.Converter.AxInventSyncCreator.StockFirmaBepaler,Tools.Mock.MockClassBase
right
-
+
Product:DOM.PM.Product
DOM.common.enu.InterneFirma
-