Index: vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test/ProductData.cls.xml
===================================================================
diff -u -r43294 -r43303
--- vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test/ProductData.cls.xml (.../ProductData.cls.xml) (revision 43294)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test/ProductData.cls.xml (.../ProductData.cls.xml) (revision 43303)
@@ -38,6 +38,7 @@
Set ..ProductStub = ##class(vhTest.Mock.DOM.PM.Product).%New()
Do ..ProductStub.IndienMethodCall("GeefEANCode")
Do ..ProductStub.IndienMethodCall("GeefPRNr").DanReturn(..RandomItemId)
+ Do ..ProductStub.IndienMethodCall("GeefKorttekst")
Set ..DummyRequest = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest).%New()
Set ..DummyRequest.ItemId = ..RandomItemId
@@ -65,6 +66,13 @@
]]>
+
+
+
+
EanCode:%String
1
@@ -86,6 +94,18 @@
Do $$$AssertEquals(ConfigVariant.SourcingDataAreaId, Firma)
]]>
+
+
+Korttekst:%String
+1
+
+
Index: vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test.cls.xml
===================================================================
diff -u -r43294 -r43303
--- vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test.cls.xml (.../Test.cls.xml) (revision 43294)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test.cls.xml (.../Test.cls.xml) (revision 43303)
@@ -27,6 +27,7 @@
#dim ProductStub As vhTest.Mock.DOM.PM.Product = ##class(vhTest.Mock.DOM.PM.Product).%New()
Do ProductStub.IndienMethodCall("GeefEANCode")
Do ProductStub.IndienMethodCall("GeefPRNr").DanReturn(RandomItemId)
+ Do ProductStub.IndienMethodCall("GeefKorttekst")
#dim ProductApiMock As vhTest.Mock.DOM.PM.ProductAPI = ##class(vhTest.Mock.DOM.PM.ProductAPI).%New()
Do ProductApiMock.VerwachtMethodCall("BestaatProduct", RandomItemId).DanReturn($$$True)
Index: WSimpl/AX/CalculatedProduct/RequestConverter.cls.xml
===================================================================
diff -u -r43294 -r43303
--- WSimpl/AX/CalculatedProduct/RequestConverter.cls.xml (.../RequestConverter.cls.xml) (revision 43294)
+++ WSimpl/AX/CalculatedProduct/RequestConverter.cls.xml (.../RequestConverter.cls.xml) (revision 43303)
@@ -44,6 +44,7 @@
Set ConfigVariant.GTIN = Product.GeefEANCode()
Set ConfigVariant.SourcingDataAreaId = ..InterneFirmaBepaler.Bepaal(Product.GeefPRNr())
+ Set ConfigVariant.ProductName = Product.GeefKorttekst()
} Else {
Set ConfigVariant.ErrorText = ##class(WSimpl.AX.CalculatedProduct.Converter.enu.ErrorText).NotFound()
}