Index: WSimpl/AX/CalculatedProduct/RequestConverter.cls.xml
===================================================================
diff -u -r49662 -r50293
--- WSimpl/AX/CalculatedProduct/RequestConverter.cls.xml (.../RequestConverter.cls.xml) (revision 49662)
+++ WSimpl/AX/CalculatedProduct/RequestConverter.cls.xml (.../RequestConverter.cls.xml) (revision 50293)
@@ -79,6 +79,11 @@
Try {
Set Product = ..ProductService.GeefProduct(ProductId, Request.ItemId)
+
+ If $$$Not($IsObject(Product)) {
+ ;Set Product = ..ProductService.GeefProductGemaaktVolgensKenmerken(Request)
+ }
+
} Catch {
#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
Index: vhTest/Mock/WSimpl/AX/CalculatedProduct/Converter/AxProductKenmerkenConverter.cls.xml
===================================================================
diff -u
--- vhTest/Mock/WSimpl/AX/CalculatedProduct/Converter/AxProductKenmerkenConverter.cls.xml (revision 0)
+++ vhTest/Mock/WSimpl/AX/CalculatedProduct/Converter/AxProductKenmerkenConverter.cls.xml (revision 50293)
@@ -0,0 +1,20 @@
+
+
+
+
+Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
+1
+WSimpl.AX.CalculatedProduct.Converter.AxProductKenmerkenConverter,Tools.Mock.MockClassBase
+right
+
+
+Attributes:AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute
+DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken
+
+
+
+
+
+
Index: WSimpl/AX/CalculatedProduct/Converter/AxProductKenmerkenConverter.cls.xml
===================================================================
diff -u
--- WSimpl/AX/CalculatedProduct/Converter/AxProductKenmerkenConverter.cls.xml (revision 0)
+++ WSimpl/AX/CalculatedProduct/Converter/AxProductKenmerkenConverter.cls.xml (revision 50293)
@@ -0,0 +1,20 @@
+
+
+
+TECH.RegisteredObject,TECH.Mockable
+
+
+Attributes:AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute
+DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken
+
+
+
+
+
+
Index: vhUnitTest/WSimpl/AX/CalculatedProduct/ProductService/Test.cls.xml
===================================================================
diff -u -r47603 -r50293
--- vhUnitTest/WSimpl/AX/CalculatedProduct/ProductService/Test.cls.xml (.../Test.cls.xml) (revision 47603)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/ProductService/Test.cls.xml (.../Test.cls.xml) (revision 50293)
@@ -38,6 +38,37 @@
Do ProductApiMock.Verifieer()
]]>
+
+
+
+
Index: vhTest/Mock/WSimpl/AX/CalculatedProduct/ProductService.cls.xml
===================================================================
diff -u -r47603 -r50293
--- vhTest/Mock/WSimpl/AX/CalculatedProduct/ProductService.cls.xml (.../ProductService.cls.xml) (revision 47603)
+++ vhTest/Mock/WSimpl/AX/CalculatedProduct/ProductService.cls.xml (.../ProductService.cls.xml) (revision 50293)
@@ -14,6 +14,13 @@
+
+
+Request:AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest
+DOM.PM.Product
+
+
Index: vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test.cls.xml
===================================================================
diff -u -r49662 -r50293
--- vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test.cls.xml (.../Test.cls.xml) (revision 49662)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test.cls.xml (.../Test.cls.xml) (revision 50293)
@@ -58,6 +58,12 @@
Do ProductServiceStub.IndienMethodCall("GeefProduct", $$$ElkeWaarde, $$$ElkeWaarde).DanException(##class(TECH.Exceptions.GeneralErrorException).%New(RandomExceptionMessage))
#dim DummyRequest As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest).%New()
+ Set AxdEntityAttribute = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New()
+ Set AxdEntityAttribute.Name = "AdminProductNummer"
+ Set AxdEntityAttribute.ValueTxt = "1000"
+ Set AttributeLijst = ##class(%ListOfDataTypes).%New()
+ Do AttributeLijst.Insert(AxdEntityAttribute)
+ Set DummyRequest.Attribute = AttributeLijst
#dim RequestConverter As WSimpl.AX.CalculatedProduct.RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductServiceStub)
#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(DummyRequest, "RandomMessageId")
Index: WSimpl/AX/CalculatedProduct/ProductService.cls.xml
===================================================================
diff -u -r47603 -r50293
--- WSimpl/AX/CalculatedProduct/ProductService.cls.xml (.../ProductService.cls.xml) (revision 47603)
+++ WSimpl/AX/CalculatedProduct/ProductService.cls.xml (.../ProductService.cls.xml) (revision 50293)
@@ -3,19 +3,37 @@
TECH.Mockable
+
+WSimpl.AX.CalculatedProduct.Converter.AxProductKenmerkenConverter
+1
+
+
+
+AXimpl.AxToAdminUtils
+1
+
+
DOM.PM.ProductAPI
1
+
+APPS.PM.Maatwerk.impl.BerekeningServiceProduct
+1
+
+
-ProductApi:DOM.PM.ProductAPI=""
+ProductApi:DOM.PM.ProductAPI="",BerekeningService:APPS.PM.Maatwerk.impl.BerekeningServiceProduct="",AxProductKenmerkenConverter:WSimpl.AX.CalculatedProduct.Converter.AxProductKenmerkenConverter=""
1
1
%Status
1
@@ -32,6 +50,15 @@
Quit ..ProductApi.GeefProduct(ProductId)
]]>
+
+
+Request:AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest
+DOM.PM.Product
+
+
Index: vhTest/Fake/WSimpl/AX/CalculatedProduct/Converter/AxProductKenmerkenConverter.cls.xml
===================================================================
diff -u
--- vhTest/Fake/WSimpl/AX/CalculatedProduct/Converter/AxProductKenmerkenConverter.cls.xml (revision 0)
+++ vhTest/Fake/WSimpl/AX/CalculatedProduct/Converter/AxProductKenmerkenConverter.cls.xml (revision 50293)
@@ -0,0 +1,19 @@
+
+
+
+
+Deze klasse werd automatisch gegenereerd en onderhouden, nieuwe methodes worden automatisch bijgevoegd, bestaande blijven zoals ze zijn.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
+1
+WSimpl.AX.CalculatedProduct.Converter.AxProductKenmerkenConverter
+
+
+Attributes:AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute
+DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken
+
+
+
+
+
+
Index: vhTest/Fake/WSimpl/AX/CalculatedProduct/ProductService.cls.xml
===================================================================
diff -u -r47603 -r50293
--- vhTest/Fake/WSimpl/AX/CalculatedProduct/ProductService.cls.xml (.../ProductService.cls.xml) (revision 47603)
+++ vhTest/Fake/WSimpl/AX/CalculatedProduct/ProductService.cls.xml (.../ProductService.cls.xml) (revision 50293)
@@ -13,6 +13,13 @@
+
+
+Request:AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest
+DOM.PM.Product
+
+