Index: APPS/PM/Maatwerk/MaatwerkService.cls.xml =================================================================== diff -u -r57055 -r57061 --- APPS/PM/Maatwerk/MaatwerkService.cls.xml (.../MaatwerkService.cls.xml) (revision 57055) +++ APPS/PM/Maatwerk/MaatwerkService.cls.xml (.../MaatwerkService.cls.xml) (revision 57061) @@ -101,9 +101,9 @@ Set IngegevenKenmerkenDomain = IngegevenKenmerkenAPI.GeefIngegevenKenmerkenVersie(IngegevenKenmerkenDomain, HalffabSpec.GeefVersieNrIngegevenKenmerken()) Try { - Set %GlobaleVariabeleBerekenDatum = Datum + Set %GlobaleVariabeleBerekeningsSpecificatie = BerekeningSpecificatie Do HalffabSpec.BerekenHalffabDetails(HalffabContext, IngegevenKenmerkenDomain, MaatwerkAanpassing) - Kill %GlobaleVariabeleBerekenDatum + Kill %GlobaleVariabeleBerekeningsSpecificatie Do Problemen.Insert(..MaakStringVanMaatwerkProblemen(HalffabContext.GeefBerekeningProblemen())) #dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = HalffabContext.HalffabItemsBoom @@ -121,7 +121,7 @@ } Catch { Do ##class(TECH.ExceptionHandler).Catch("DOM.PM.Maatwerk.Calc.HF.impl.HFItemBerekenException") Do Problemen.Insert(..MaakStringVanMaatwerkProblemen(HalffabContext.GeefBerekeningProblemen())) - Kill %GlobaleVariabeleBerekenDatum + Kill %GlobaleVariabeleBerekeningsSpecificatie } Set MaatwerkDetails.ProbleemRapport = ##class(TECH.ListUtils).ListToPieces(Problemen, $C(13,10))