Index: APPS/PM/Maatwerk/impl/BerekeningServiceProduct.cls.xml =================================================================== diff -u -r62130 -r62766 --- APPS/PM/Maatwerk/impl/BerekeningServiceProduct.cls.xml (.../BerekeningServiceProduct.cls.xml) (revision 62130) +++ APPS/PM/Maatwerk/impl/BerekeningServiceProduct.cls.xml (.../BerekeningServiceProduct.cls.xml) (revision 62766) @@ -111,9 +111,20 @@ Do ##class(TECH.Timing.TimerUtils).Start("MaakProductVanNietTbxKenmerken--tem Kostenboom") #dim ProductSpecificatie As DOM.PM.Maatwerk.Calc.Common.ProductSpecificatie = ..GeefProductSpecificatie(IngegevenKenmerken) #dim BerekeningsSpecificatie As DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie = ..GeefBerekeningsSpecificatie(KlantID, Aantal) - #dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..GeefHalffabItemsBoom(IngegevenKenmerken, BerekeningsSpecificatie) - #dim KostItem As DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItem = ..GeefKostItem(IngegevenKenmerken, BerekeningsSpecificatie, HalffabItemsBoom) + #dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom + #dim KostItem As DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItem + #dim MaatwerkDetails As APPS.PM.Maatwerk.dto.MaatwerkDetails + If (IngegevenKenmerken.%Extends(##class(DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken).%ClassName($$$True))) { + Set MaatwerkDetails = ##class(WSimpl.PM.Maatwerk.MaatwerkService.DotNet.GeefMaatwerkDetails).%New().GeefMaatwerkDetails(IngegevenKenmerken, KlantID, Aantal, ProductData) + + Set HalffabItemsBoom = MaatwerkDetails.Halffabrikaten + Set KostItem = MaatwerkDetails.Kosten + } Else { + Set HalffabItemsBoom = ..GeefHalffabItemsBoom(IngegevenKenmerken, BerekeningsSpecificatie) + Set KostItem = ..GeefKostItem(IngegevenKenmerken, BerekeningsSpecificatie, HalffabItemsBoom) + } + Do ##class(TECH.Timing.TimerUtils).Stop() Do ##class(TECH.Timing.TimerUtils).Start("MaakProductVanNietTbxKenmerken--MaakMaatwerkProductVanNietTbxKenmerken") Index: WSimpl/PM/Maatwerk/MaatwerkService/DotNet.cls.xml =================================================================== diff -u --- WSimpl/PM/Maatwerk/MaatwerkService/DotNet.cls.xml (revision 0) +++ WSimpl/PM/Maatwerk/MaatwerkService/DotNet.cls.xml (revision 62766) @@ -0,0 +1,50 @@ + + + +TECH.RegisteredObject + + +%String +1 + + + +1 +1 +%Status +1 + + + + +1 +%String + + + + +%String + + + + + + Index: WSimpl/PM/Maatwerk/MaatwerkService/DotNet/GeefMaatwerkDetails/ProductRestRequest.cls.xml =================================================================== diff -u --- WSimpl/PM/Maatwerk/MaatwerkService/DotNet/GeefMaatwerkDetails/ProductRestRequest.cls.xml (revision 0) +++ WSimpl/PM/Maatwerk/MaatwerkService/DotNet/GeefMaatwerkDetails/ProductRestRequest.cls.xml (revision 62766) @@ -0,0 +1,24 @@ + + + +TECH.RegisteredObject + + +DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken + + + +%String + + + +%Integer + + + +DOM.PM.dto.ProductData + + + + +