Index: vhUnitTest/DOM/VKP/impl/KlantDataFactory/Test.cls.xml =================================================================== diff -u -r35990 -r72286 --- vhUnitTest/DOM/VKP/impl/KlantDataFactory/Test.cls.xml (.../Test.cls.xml) (revision 35990) +++ vhUnitTest/DOM/VKP/impl/KlantDataFactory/Test.cls.xml (.../Test.cls.xml) (revision 72286) @@ -30,7 +30,15 @@ Do Uitzonderingen.Insert(##class(DOM.common.enu.Personality).VanHoecke()) Do Uitzonderingen.Insert(##class(DOM.common.enu.Personality).VanHoeckeVoorHalux()) Do Uitzonderingen.Insert(##class(DOM.common.enu.Personality).Noteborn()) - + Do Uitzonderingen.Insert(##class(DOM.common.enu.Personality).BlumPLCMeube()) + Do Uitzonderingen.Insert(##class(DOM.common.enu.Personality).BlumPLDemo()) + Do Uitzonderingen.Insert(##class(DOM.common.enu.Personality).BlumPLMeble()) + Do Uitzonderingen.Insert(##class(DOM.common.enu.Personality).BlumPLMebloa()) + Do Uitzonderingen.Insert(##class(DOM.common.enu.Personality).BlumPLMerkur()) + Do Uitzonderingen.Insert(##class(DOM.common.enu.Personality).BlumPLPakdrew()) + Do Uitzonderingen.Insert(##class(DOM.common.enu.Personality).BlumPLSAS()) + Do Uitzonderingen.Insert(##class(DOM.common.enu.Personality).BlumPLSchach()) + #dim Filter As TECH.Filter = ##class(TECH.Filter.ValueBasedFilter).%New(Uitzonderingen) #dim Iterator As TECH.Iterator = ##class(TECH.DynamicIterator).%New(##class(DOM.common.enu.Personality).ValueListIterator(),, Filter)