Index: vhUnitTest/DOM/PM/Maatwerk/Calc/HF/HalffabSpec/BepaalHFItemBuilderSequence/TestAllHFSpecs.cls.xml =================================================================== diff -u -r63880 -r71711 --- vhUnitTest/DOM/PM/Maatwerk/Calc/HF/HalffabSpec/BepaalHFItemBuilderSequence/TestAllHFSpecs.cls.xml (.../TestAllHFSpecs.cls.xml) (revision 63880) +++ vhUnitTest/DOM/PM/Maatwerk/Calc/HF/HalffabSpec/BepaalHFItemBuilderSequence/TestAllHFSpecs.cls.xml (.../TestAllHFSpecs.cls.xml) (revision 71711) @@ -22,12 +22,15 @@ Set HalffabSpecInfoIterator = ##class(TECH.ListIterator).%New(HalffabSpecInfoList) While (HalffabSpecInfoIterator.HasNext()) { #dim HalffabSpecInfo As DOM.PM.Maatwerk.Calc.HF.impl.HalffabSpecInfo = HalffabSpecInfoIterator.Next() - #dim HalffabSpec As DOM.PM.Maatwerk.Calc.HF.HalffabSpec = HalffabSpecInfo.GeefHalffabSpec() ; Bij de %New() wordt de BepaalHFItemBuilderSequence() opgeroepen - If $$$AssertTrue($IsObject(HalffabSpec),"Object verwacht voor klasse '"_HalffabSpecInfo.HalffabSpec_"'") { - - #dim IsMaatwerkMetBuildersInCache As %Boolean = ..IsMaatwerkMetBuildersInCache(HalffabSpec) - #dim AssertMsg As %String = "HalffabSpec '"_HalffabSpec.%ClassName($$$true)_"' ("_HalffabSpecInfo.BerekeningWijze_"), IsMaatwerkMetBuildersInCache="_IsMaatwerkMetBuildersInCache_" " - Do $$$AssertEquals(HalffabSpec.GeefHFItemBuilderSeqIterator().HasNext(), IsMaatwerkMetBuildersInCache, AssertMsg) + + If $$$Not(HalffabSpecInfo.BerekeningWijze = ##class(DOM.PM.Maatwerk.Calc.Common.enu.BerekeningWijze).Encoway()) { + #dim HalffabSpec As DOM.PM.Maatwerk.Calc.HF.HalffabSpec = HalffabSpecInfo.GeefHalffabSpec() ; Bij de %New() wordt de BepaalHFItemBuilderSequence() opgeroepen + If $$$AssertTrue($IsObject(HalffabSpec),"Object verwacht voor klasse '"_HalffabSpecInfo.HalffabSpec_"'") { + + #dim IsMaatwerkMetBuildersInCache As %Boolean = ..IsMaatwerkMetBuildersInCache(HalffabSpec) + #dim AssertMsg As %String = "HalffabSpec '"_HalffabSpec.%ClassName($$$true)_"' ("_HalffabSpecInfo.BerekeningWijze_"), IsMaatwerkMetBuildersInCache="_IsMaatwerkMetBuildersInCache_" " + Do $$$AssertEquals(HalffabSpec.GeefHFItemBuilderSeqIterator().HasNext(), IsMaatwerkMetBuildersInCache, AssertMsg) + } } } }