Index: WSimpl/PM/Maatwerk/Viewer/Viewer.cls.xml
===================================================================
diff -u -r63645 -r63879
--- WSimpl/PM/Maatwerk/Viewer/Viewer.cls.xml (.../Viewer.cls.xml) (revision 63645)
+++ WSimpl/PM/Maatwerk/Viewer/Viewer.cls.xml (.../Viewer.cls.xml) (revision 63879)
@@ -23,6 +23,11 @@
1
+
+DOM.PM.Maatwerk.Calc.Common.impl.OmleidingNaarDotNetBepaler
+1
+
+
WSimpl.PM.Maatwerk.MaatwerkService.DotNet.MaatwerkDetailsFromJsonNaarDomConverter
1
@@ -69,6 +74,7 @@
Set ..IKConverter = $$$Inject(IKConverter,##class(APPS.PM.Maatwerk.impl.IngegevenKenmerkenConverter).%New())
Set ..MaatwerkService = $$$Inject(MaatwerkService,##class(APPS.PM.Maatwerk.MaatwerkService).%New())
Set ..DotNetMaatwerkService = ##class(WSimpl.PM.Maatwerk.MaatwerkService.DotNet.GeefMaatwerkDetails).%New()
+ Set ..OmleidingNaarDotNetBepaler = ##class(DOM.PM.Maatwerk.Calc.Common.impl.OmleidingNaarDotNetBepaler).%New()
Set ..MaatwerkDetailsConvertor = ##class(WSimpl.PM.Maatwerk.MaatwerkService.DotNet.MaatwerkDetailsFromJsonNaarDomConverter).%New()
Set ..LegacyPartijAPI = $$$Inject(LegacyPartijAPI, ##class(DOM.DomeinContext).Instance().GeefLegacyPartijAPI())
set ..MaatwerkCalcAPI =$$$Inject(MaatwerkCalcAPI,##class(DOM.PM.impl.MaatwerkCalcAPI).%New())
@@ -112,10 +118,7 @@
#dim HFBoom as DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom
#dim KostenBoom as DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItem
- #dim IsBerekeningViaDotNetMaatwerkService As %Boolean = $$$False
- If (DOMIngegevenKenmerken.GeefVariant() = ##class(DOM.PM.enu.LadeVariant).MVX()) {
- Set IsBerekeningViaDotNetMaatwerkService = $$$True
- }
+ #dim IsBerekeningViaDotNetMaatwerkService As %Boolean = ..OmleidingNaarDotNetBepaler.IsMaatwerkCalculatieInDotNet(DOMIngegevenKenmerken.GeefVariant(), DOMIngegevenKenmerken.GeefVersieNr())
If IsBerekeningViaDotNetMaatwerkService {
#dim MaatwerkDetails As APPS.PM.Maatwerk.dto.DotNet.MaatwerkDetailsParsedFromJson = ..DotNetMaatwerkService.GeefMaatwerkDetails(DOMIngegevenKenmerken, KlantID, MaatwerkViewerRequest.Aantal, "")
Set HFBoom = ..MaatwerkDetailsConvertor.GeefHalffabItemsBoom(MaatwerkDetails)
@@ -126,7 +129,7 @@
}
#dim HFIterator as TECH.Iterator= HFBoom.GeefHalffabItemsIterator()
-
+
Do ..HalfFabVisitorWriter.ZetKostBoom(KostenBoom)
Do ..HalfFabVisitorWriter.ZetExcelWriter(..ExcelWriter)