Index: vhTest/Mock/WSimpl/AX/CalculatedProduct/RequestConverter.cls.xml
===================================================================
diff -u -r56315 -r57254
--- vhTest/Mock/WSimpl/AX/CalculatedProduct/RequestConverter.cls.xml (.../RequestConverter.cls.xml) (revision 56315)
+++ vhTest/Mock/WSimpl/AX/CalculatedProduct/RequestConverter.cls.xml (.../RequestConverter.cls.xml) (revision 57254)
@@ -9,7 +9,7 @@
right
-ProductService:WSimpl.AX.CalculatedProduct.ProductService="",VariantDescriptionBepaler:WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler="",BouwstenenConverter:WSimpl.AX.CalculatedProduct.BouwstenenConverter="",SourcingDataAreaIdBepaler:WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler="",Formatter:AXimpl.Formatter="",AfbeeldingService:WSimpl.AX.CalculatedProduct.AfbeeldingService=""
+ProductService:WSimpl.AX.CalculatedProduct.ProductService="",VariantDescriptionBepaler:WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler="",BouwstenenConverter:WSimpl.AX.CalculatedProduct.BouwstenenConverter="",SourcingDataAreaIdBepaler:WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler="",Formatter:AXimpl.Formatter="",AfbeeldingService:WSimpl.AX.CalculatedProduct.AfbeeldingService="",ProductDataFactory:DOM.PM.dto.ProductDataFactory=""
%Status
Index: WSimpl/AX/CalculatedProduct/RequestConverter.cls.xml
===================================================================
diff -u -r57244 -r57254
--- WSimpl/AX/CalculatedProduct/RequestConverter.cls.xml (.../RequestConverter.cls.xml) (revision 57244)
+++ WSimpl/AX/CalculatedProduct/RequestConverter.cls.xml (.../RequestConverter.cls.xml) (revision 57254)
@@ -33,8 +33,13 @@
1
+
+DOM.PM.dto.ProductDataFactory
+1
+
+
-ProductService:WSimpl.AX.CalculatedProduct.ProductService="",VariantDescriptionBepaler:WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler="",BouwstenenConverter:WSimpl.AX.CalculatedProduct.BouwstenenConverter="",SourcingDataAreaIdBepaler:WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler="",Formatter:AXimpl.Formatter="",AfbeeldingService:WSimpl.AX.CalculatedProduct.AfbeeldingService=""
+ProductService:WSimpl.AX.CalculatedProduct.ProductService="",VariantDescriptionBepaler:WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler="",BouwstenenConverter:WSimpl.AX.CalculatedProduct.BouwstenenConverter="",SourcingDataAreaIdBepaler:WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler="",Formatter:AXimpl.Formatter="",AfbeeldingService:WSimpl.AX.CalculatedProduct.AfbeeldingService="",ProductDataFactory:DOM.PM.dto.ProductDataFactory=""
1
1
%Status
@@ -46,6 +51,7 @@
Set ..SourcingDataAreaIdBepaler = $$$Inject(SourcingDataAreaIdBepaler, ##class(WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler).%New())
Set ..Formatter = $$$Inject(Formatter, ##class(AXimpl.Formatter).%New())
Set ..AfbeeldingService = $$$Inject(AfbeeldingService, ##class(WSimpl.AX.CalculatedProduct.AfbeeldingService).%New())
+ Set ..ProductDataFactory = $$$Inject(ProductDataFactory, ##class(DOM.PM.dto.ProductDataFactory).%New())
Quit $$$OK
]]>
@@ -138,7 +144,15 @@
#dim ProductId As %String = ..GeefAttributeValueTxtVolgensAttributeName(Request.Attribute, "AdminProductNummer")
If (($$$HasLength(ProductId)) && ($$$Not(..ProductService.HeeftBezwaarVoorProductDelete(ProductId)))) {
- // Product-Update-logica
+ Set Product = ..ProductService.GeefProduct(ProductId, Request.ItemId)
+ If ($$$Not($IsObject(Product))) {
+ Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("Voor het in BOMBOL door AX aangeleverde AdminProductNummer '"_ProductId_"' is in Cache geen product gevonden."))
+ } ElseIf (Product.IsGenerischProduct()) {
+ Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("Voor het in BOMBOL door AX aangeleverde AdminProductNummer '"_ProductId_"' is in Cache een generisch product gevonden, dat daarom niet geüpdatet wordt."))
+ } Else {
+ // PRODUCT EERST NOG DELETEN !!!!!
+ Set Product = ..ProductService.GeefProductGemaaktVolgensAxKenmerken(Request, ..ProductDataFactory.MaakProductData(ProductId, Product.GeefDossierNr()))
+ }
} Else {
Set Product = ..ProductService.GeefProductGemaaktVolgensAxKenmerken(Request)
}
Index: vhTest/Fake/DOM/PM/dto/ProductDataFactory.cls.xml
===================================================================
diff -u
--- vhTest/Fake/DOM/PM/dto/ProductDataFactory.cls.xml (revision 0)
+++ vhTest/Fake/DOM/PM/dto/ProductDataFactory.cls.xml (revision 57254)
@@ -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
+DOM.PM.dto.ProductDataFactory
+
+
+PRNr:%String,DossierNummer:%String
+DOM.PM.dto.ProductData
+
+
+
+
+
+
Index: vhTest/Mock/DOM/PM/dto/ProductDataFactory.cls.xml
===================================================================
diff -u
--- vhTest/Mock/DOM/PM/dto/ProductDataFactory.cls.xml (revision 0)
+++ vhTest/Mock/DOM/PM/dto/ProductDataFactory.cls.xml (revision 57254)
@@ -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
+DOM.PM.dto.ProductDataFactory,Tools.Mock.MockClassBase
+right
+
+
+PRNr:%String,DossierNummer:%String
+DOM.PM.dto.ProductData
+
+
+
+
+
+
Index: DOM/PM/dto/ProductDataFactory.cls.xml
===================================================================
diff -u
--- DOM/PM/dto/ProductDataFactory.cls.xml (revision 0)
+++ DOM/PM/dto/ProductDataFactory.cls.xml (revision 57254)
@@ -0,0 +1,20 @@
+
+
+
+TECH.Mockable
+
+
+PRNr:%String,DossierNummer:%String
+DOM.PM.dto.ProductData
+
+
+
+
+
+
Index: vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test.cls.xml
===================================================================
diff -u -r57230 -r57254
--- vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test.cls.xml (.../Test.cls.xml) (revision 57230)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test.cls.xml (.../Test.cls.xml) (revision 57254)
@@ -439,6 +439,171 @@
]]>
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
ProductId:%String
1