Index: vhTestFiles/IntegratieTests/WSimpl.AX.CalculatedProduct/TestLbx/1014463.xml
===================================================================
diff -u -r46905 -r47151
--- vhTestFiles/IntegratieTests/WSimpl.AX.CalculatedProduct/TestLbx/1014463.xml (.../1014463.xml) (revision 46905)
+++ vhTestFiles/IntegratieTests/WSimpl.AX.CalculatedProduct/TestLbx/1014463.xml (.../1014463.xml) (revision 47151)
@@ -41,7 +41,7 @@
5
- 1.00
+ 0.22
1
DummyInventTransId
9.988.294.15
@@ -111,7 +111,7 @@
15
- 1.00
+ 0.21
1
DummyInventTransId
9.988.367.15
Index: AXimpl/Admin/DOM/PM/BouwsteenConverter.cls.xml
===================================================================
diff -u -r47058 -r47151
--- AXimpl/Admin/DOM/PM/BouwsteenConverter.cls.xml (.../BouwsteenConverter.cls.xml) (revision 47058)
+++ AXimpl/Admin/DOM/PM/BouwsteenConverter.cls.xml (.../BouwsteenConverter.cls.xml) (revision 47151)
@@ -3,6 +3,24 @@
TECH.Mockable
+
+DOM.PM.ProductAPI
+1
+
+
+
+ProductApi:DOM.PM.ProductAPI=""
+1
+1
+%Status
+1
+
+
+
ProductBouwsteen:DOM.PM.Bouwstenen.Bouwsteen,Id:%Integer,ParentId:%Integer=""
AXimpl.Admin.DOM.PM.Bouwsteen
@@ -12,7 +30,7 @@
Set Bouwsteen.Id = Id
Set Bouwsteen.IdentNummer = ProductBouwsteen.KindProduct.IdentNummer
Set Bouwsteen.ProductId = ProductBouwsteen.KindProduct.ProductNr
- Set Bouwsteen.Aantal = ProductBouwsteen.Aantal
+ Set Bouwsteen.Aantal = ..GeefAantal(ProductBouwsteen)
Set Bouwsteen.ParentId = ParentId
Set Bouwsteen.IsMeeTeRekenenVoorVoorraad = ..IsMeeTeRekenenVoorVoorraad(ProductBouwsteen)
@@ -34,6 +52,24 @@
Quit IsMeeTeRekenenVoorVoorraad
]]>
+
+
+ProductBouwsteen:DOM.PM.Bouwstenen.Bouwsteen
+1
+%Decimal
+
+
Index: DOM/PM/impl/DataM/DataMProduct.cls.xml
===================================================================
diff -u -r47079 -r47151
--- DOM/PM/impl/DataM/DataMProduct.cls.xml (.../DataMProduct.cls.xml) (revision 47079)
+++ DOM/PM/impl/DataM/DataMProduct.cls.xml (.../DataMProduct.cls.xml) (revision 47151)
@@ -644,6 +644,12 @@
]]>
+
+%String
+
+
+
IdentNr:%String
VHBE
1
- 1.00
+ 0.63
1
DummyInventTransId
9.490.814.16
Index: vhTestFiles/IntegratieTests/WSimpl.AX.CalculatedProduct/TestSopr/1765622.xml
===================================================================
diff -u -r47139 -r47151
--- vhTestFiles/IntegratieTests/WSimpl.AX.CalculatedProduct/TestSopr/1765622.xml (.../1765622.xml) (revision 47139)
+++ vhTestFiles/IntegratieTests/WSimpl.AX.CalculatedProduct/TestSopr/1765622.xml (.../1765622.xml) (revision 47151)
@@ -13,7 +13,7 @@
HLX
1
- 1.00
+ 0.49
1
DummyInventTransId
9.191.469.9
@@ -34,7 +34,7 @@
4
- 1.00
+ 0.45
1
DummyInventTransId
8.681.164.5
Index: vhTestFiles/IntegratieTests/WSimpl.AX.CalculatedProduct/TestTax/1648504.xml
===================================================================
diff -u -r46905 -r47151
--- vhTestFiles/IntegratieTests/WSimpl.AX.CalculatedProduct/TestTax/1648504.xml (.../1648504.xml) (revision 46905)
+++ vhTestFiles/IntegratieTests/WSimpl.AX.CalculatedProduct/TestTax/1648504.xml (.../1648504.xml) (revision 47151)
@@ -27,7 +27,7 @@
3
- 1.00
+ 0.11
1
DummyInventTransId
9.090.263.16
@@ -48,14 +48,14 @@
6
- 1.00
+ 0.01
1
DummyInventTransId
9.090.361.16
7
- 2.00
+ 0.01
1
DummyInventTransId
9.090.361.16
@@ -104,7 +104,7 @@
14
- 1.00
+ 0.02
1
DummyInventTransId
9.090.336.16
@@ -125,14 +125,14 @@
17
- 1.00
+ 0.98
1
DummyInventTransId
9.537.438.3
18
- 1.00
+ 0.43
1
DummyInventTransId
9.605.085.3
@@ -153,7 +153,7 @@
21
- 4.00
+ 0.02
1
DummyInventTransId
9.090.263.16
Index: AXimpl/Admin/DOM/PM/Bouwsteen.cls.xml
===================================================================
diff -u -r47058 -r47151
--- AXimpl/Admin/DOM/PM/Bouwsteen.cls.xml (.../Bouwsteen.cls.xml) (revision 47058)
+++ AXimpl/Admin/DOM/PM/Bouwsteen.cls.xml (.../Bouwsteen.cls.xml) (revision 47151)
@@ -8,7 +8,7 @@
-%Integer
+%Decimal
Index: vhUnitTest/AXimpl/Admin/DOM/PM/BouwsteenConverter/Test.cls.xml
===================================================================
diff -u -r47058 -r47151
--- vhUnitTest/AXimpl/Admin/DOM/PM/BouwsteenConverter/Test.cls.xml (.../Test.cls.xml) (revision 47058)
+++ vhUnitTest/AXimpl/Admin/DOM/PM/BouwsteenConverter/Test.cls.xml (.../Test.cls.xml) (revision 47151)
@@ -19,7 +19,7 @@
-
+
+
+
+
+
+
+
+
+
1
DOM.PM.Bouwstenen.Bouwsteen
%Integer
+
+%String
+
+
+
%String
WerkvloerEenheid:%String
-
+
Index: DOM/PM/Product.cls.xml
===================================================================
diff -u -r46998 -r47151
--- DOM/PM/Product.cls.xml (.../Product.cls.xml) (revision 46998)
+++ DOM/PM/Product.cls.xml (.../Product.cls.xml) (revision 47151)
@@ -376,6 +376,11 @@
%String
+
+1
+%String
+
+
1
AnderProductID:%String
Index: vhTest/Mock/DOM/PM/Product.cls.xml
===================================================================
diff -u -r46998 -r47151
--- vhTest/Mock/DOM/PM/Product.cls.xml (.../Product.cls.xml) (revision 46998)
+++ vhTest/Mock/DOM/PM/Product.cls.xml (.../Product.cls.xml) (revision 47151)
@@ -400,6 +400,12 @@
]]>
+
+%String
+
+
+
%Boolean
+
+%String
+
+
+
IdentNr:%String
+
+%String
+
+
+
%Boolean
2
- 1.00
+ 0.20
1
DummyInventTransId
8.681.245.5
@@ -55,7 +55,7 @@
7
- 1.00
+ 0.20
1
DummyInventTransId
8.681.326.5
@@ -90,14 +90,14 @@
12
- 1.00
+ 0.88
1
DummyInventTransId
9.537.438.3
13
- 1.00
+ 0.53
1
DummyInventTransId
9.605.085.3
Index: AXimpl/Admin/DOM/PM/BouwsteenIterator.cls.xml
===================================================================
diff -u -r47068 -r47151
--- AXimpl/Admin/DOM/PM/BouwsteenIterator.cls.xml (.../BouwsteenIterator.cls.xml) (revision 47068)
+++ AXimpl/Admin/DOM/PM/BouwsteenIterator.cls.xml (.../BouwsteenIterator.cls.xml) (revision 47151)
@@ -38,7 +38,7 @@
Set ..Product = Product
Set ..Filter = Filter
Set ..BouwsteenConverter = $$$Inject(BouwsteenConverter, ##class(AXimpl.Admin.DOM.PM.BouwsteenConverter).%New())
- Set ..ProductApi = $$$Inject(ProductApi, ##class(DOM.DomeinContext).Instance().GeefProductAPI())
+ Set ..ProductApi = $$$Inject(ProductApi, ##class(DOM.PM.impl.ProductAPI).%New())
Do ..Reset()