Index: vhDeploy/Deploy20230821xToevoegenSpecLBXEncowayv001.cls.xml =================================================================== diff -u -r71555 -r71599 --- vhDeploy/Deploy20230821xToevoegenSpecLBXEncowayv001.cls.xml (.../Deploy20230821xToevoegenSpecLBXEncowayv001.cls.xml) (revision 71555) +++ vhDeploy/Deploy20230821xToevoegenSpecLBXEncowayv001.cls.xml (.../Deploy20230821xToevoegenSpecLBXEncowayv001.cls.xml) (revision 71599) @@ -23,7 +23,7 @@ #dim Query As %String = "INSERT INTO DOM_PM_Maatwerk_Calc_HF_impl.HalffabSpecInfo (Familie, Variant, BerekeningWijze, GeldigVan, GeldigTot, HalffabSpec, Tag) VALUES (?, ?, ?, ?, ?, ?, ?)" #dim CurrentDate As %Date = ##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentDate() #dim MaxDate As %Date = ##class(TECH.Context).Instance().GeefDateTimeAPI().MaxDate() - #dim Params As %List = $ListBuild(##class(DOM.PM.enu.Familie).Lade(), ##class(DOM.PM.enu.Variant).LegraboxPure(), ##class(DOM.PM.Maatwerk.Calc.Common.enu.BerekeningWijze).Encoway(), CurrentDate, MaxDate, "DummyHalffabSpecKlasse", "Encoway") + #dim Params As %List = $ListBuild(##class(DOM.PM.enu.Familie).Lade(), ##class(DOM.PM.enu.Variant).LegraboxPure(), ##class(DOM.PM.Maatwerk.Calc.Common.enu.BerekeningWijze).Encoway(), MaxDate, MaxDate, "DummyHalffabSpecKlasse", "Encoway") #dim ResultSet As TECH.ResultSet = ##class(TECH.Context).Instance().GeefQueryAPI().GetDynamicResultSet(Query, Params, ##class(TECH.enu.ResultSetRuntimeMode).Logical()) ]]> @@ -35,7 +35,7 @@ #dim Query As %String = "INSERT INTO DOM_PM_Maatwerk_Calc_Kost_impl.KostSpecInfo (Familie, Variant, GeldigVan, GeldigTot, KostSpec, Tag) VALUES (?, ?, ?, ?, ?, ?)" #dim CurrentDate As %Date = ##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentDate() #dim MaxDate As %Date = ##class(TECH.Context).Instance().GeefDateTimeAPI().MaxDate() - #dim Params As %List = $ListBuild(##class(DOM.PM.enu.Familie).Lade(), ##class(DOM.PM.enu.Variant).LegraboxPure(), CurrentDate, MaxDate, "DOM.PM.Maatwerk.Calc.Kost.impl.LBX.Builder.SpecKostEncowayv001", "Encoway") + #dim Params As %List = $ListBuild(##class(DOM.PM.enu.Familie).Lade(), ##class(DOM.PM.enu.Variant).LegraboxPure(), MaxDate, MaxDate, "DOM.PM.Maatwerk.Calc.Kost.impl.LBX.Builder.SpecKostEncowayv001", "Encoway") #dim ResultSet As TECH.ResultSet = ##class(TECH.Context).Instance().GeefQueryAPI().GetDynamicResultSet(Query, Params, ##class(TECH.enu.ResultSetRuntimeMode).Logical()) ]]>