Index: WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter.cls.xml =================================================================== diff -u -r59255 -r59260 --- WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter.cls.xml (.../OCCKenmerkenConverter.cls.xml) (revision 59255) +++ WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter.cls.xml (.../OCCKenmerkenConverter.cls.xml) (revision 59260) @@ -12,9 +12,16 @@ #dim Kenmerk As WS.Vhisie4.OCC.dto.Kenmerk Do KenmerkenIterator.Reset() - While (KenmerkenIterator.HasNext()) { - Set Kenmerk = KenmerkenIterator.Next() - Do EconConfiguratieArray.SetAt(Kenmerk.Value, "Data.Kenmerken."_Kenmerk.Name) + + #dim IsTestRequestVolgensBlumKenmerken As %Boolean = ..BevatKenmerkenIteratorKenmerk(KenmerkenIterator, "test") + + If IsTestRequestVolgensBlumKenmerken { + Set EconConfiguratieArray = ..GeefTestEconConfiguratieArray() + } Else { + While (KenmerkenIterator.HasNext()) { + Set Kenmerk = KenmerkenIterator.Next() + Do EconConfiguratieArray.SetAt(Kenmerk.Value, "Data.Kenmerken."_Kenmerk.Name) + } } Set NaarEconGeconverteerdeKenmerkenResponse = ##class(WS.Vhisie4.OCC.GeefNaarEconGeconverteerdeKenmerkenResponse).%New() @@ -76,6 +83,29 @@ Quit TestEconConfiguratieArray ]]> + + +KenmerkenIterator:TECH.Iterator,KenmerkName:%String +1 +%Boolean + +