Index: vhUnitTest/AXimpl/Admin/DOM/PM/BouwsteenConverter/Test.cls.xml =================================================================== diff -u -r48976 -r51835 --- vhUnitTest/AXimpl/Admin/DOM/PM/BouwsteenConverter/Test.cls.xml (.../Test.cls.xml) (revision 48976) +++ vhUnitTest/AXimpl/Admin/DOM/PM/BouwsteenConverter/Test.cls.xml (.../Test.cls.xml) (revision 51835) @@ -78,6 +78,7 @@ #dim BewerkteProductBouwsteen As DOM.PM.Bouwstenen.BouwsteenHalfFabr1Dim = ##class(DOM.PM.Bouwstenen.BouwsteenHalfFabr1Dim).%New() Set BewerkteProductBouwsteen.DimensieMetUitval = RandomDimensieMetUitval + Set BewerkteProductBouwsteen.Aantal = 2 #dim ProductStub As vhTest.Mock.DOM.PM.Product = ##class(vhTest.Mock.DOM.PM.Product).%New() Do ProductStub.IndienMethodCall("GeefWerkvloerGrootteNetto").DanReturn(RandomWerkvloerGrootteNetto) @@ -86,7 +87,7 @@ Do ProductApiStub.IndienMethodCall("GeefProduct", "").DanReturn(ProductStub) #dim BouwsteenConverter As AXimpl.Admin.DOM.PM.BouwsteenConverter = ##class(AXimpl.Admin.DOM.PM.BouwsteenConverter).%New(ProductApiStub) - #dim VerwachtAantal As %Decimal = RandomDimensieMetUitval / RandomWerkvloerGrootteNetto + #dim VerwachtAantal As %Decimal = RandomDimensieMetUitval / RandomWerkvloerGrootteNetto * 2 Do $$$AssertEquals(BouwsteenConverter.Convert(BewerkteProductBouwsteen, "").Aantal, VerwachtAantal) ]]>