Index: vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test.cls.xml =================================================================== diff -u -r43361 -r43362 --- vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test.cls.xml (.../Test.cls.xml) (revision 43361) +++ vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test.cls.xml (.../Test.cls.xml) (revision 43362) @@ -114,6 +114,8 @@ #dim RequestConverter As WSimpl.AX.CalculatedProduct.RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductApiStub, InterneFirmaBepalerStub, "", BouwsteenConverterMock) #dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(..DummyRequest, RandomMessageId) + Do $$$AssertEquals(ConfigVariant.BOMLine.Count(), 3) + Do BouwsteenConverterMock.Verifieer() ]]> Index: WSimpl/AX/CalculatedProduct/RequestConverter.cls.xml =================================================================== diff -u -r43357 -r43362 --- WSimpl/AX/CalculatedProduct/RequestConverter.cls.xml (.../RequestConverter.cls.xml) (revision 43357) +++ WSimpl/AX/CalculatedProduct/RequestConverter.cls.xml (.../RequestConverter.cls.xml) (revision 43362) @@ -62,10 +62,12 @@ Set ConfigVariant.VariantDescription = ..VariantDescriptionBepaler.Bepaal(Product, ConfigVariant.ConfigVariantId) #dim HalffabricaatBouwstenenIterator As TECH.Iterator = Product.GeefHFBouwstenenIterator() - + While (HalffabricaatBouwstenenIterator.HasNext()) { #dim HalffabricaatBouwsteen As DOM.PM.Bouwstenen.BouwsteenHalfFabr = HalffabricaatBouwstenenIterator.Next() #dim BomLine As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityBOMLine = ..BouwsteenConverter.Convert(HalffabricaatBouwsteen) + + Do ConfigVariant.BOMLine.Insert(BomLine) } } Else { Set ConfigVariant.ErrorText = ##class(WSimpl.AX.CalculatedProduct.Converter.enu.ErrorText).NotFound()