Index: WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter.cls.xml =================================================================== diff -u -r60261 -r60263 --- WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter.cls.xml (.../OCCKenmerkenConverter.cls.xml) (revision 60261) +++ WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter.cls.xml (.../OCCKenmerkenConverter.cls.xml) (revision 60263) @@ -61,7 +61,7 @@ Do EconConfiguratieArray.SetAt(EconKenmerk.Value, EconKenmerk.Name) } } - Do ..VoegToeDefaults(EconConfiguratieArray, LadeType) + Do ..VoegToeDefaults(EconConfiguratieArray, LadeType, KenmerkenIterator) } Else { #dim OCCKenmerkenRequestHeader As WS.Vhisie4.RequestHeader = OCCKenmerkenRequest.Header #dim Logging As %String = "Onvoorzien LadeType: '"_LadeType_"'. Binnenkomend OCC-request voor klant: '"_OCCKenmerkenRequestHeader.KlantId_"' en Personality: '"_OCCKenmerkenRequestHeader.PersonalityId_"'. " @@ -133,7 +133,7 @@ -EconConfiguratieArray:%ArrayOfDataTypes,LadeType:%String +EconConfiguratieArray:%ArrayOfDataTypes,LadeType:%String,KenmerkenIterator:TECH.Iterator 1 @@ -264,9 +265,16 @@ ]]> - -EconConfiguratieArray:%ArrayOfDataTypes,LadeHoogte:%String + +EconConfiguratieArray:%ArrayOfDataTypes,LadeType:%String,KenmerkenIterator:TECH.Iterator 1 + @@ -307,6 +315,43 @@ ]]> + +LadeType:%String,KenmerkenIterator:TECH.Iterator +1 +%String + + + KenmerkenIterator:TECH.Iterator,KenmerkName:%String 1 Index: vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/Test.cls.xml =================================================================== diff -u -r60262 -r60263 --- vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/Test.cls.xml (.../Test.cls.xml) (revision 60262) +++ vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/Test.cls.xml (.../Test.cls.xml) (revision 60263) @@ -216,8 +216,9 @@ #dim Resultaat As WS.Vhisie4.OCC.GeefNaarEconGeconverteerdeKenmerkenResponse = ..OCCKenmerkenConverter.ConverteerBlumKenmerkenNaarEconKenmerken(OCCKenmerkenRequest) - Do $$$AssertEquals(Resultaat.MeldingenAanGebruiker.Count(), 1) + Do $$$AssertEquals(Resultaat.MeldingenAanGebruiker.Count(), 2) Do $$$AssertEquals(Resultaat.MeldingenAanGebruiker.GetAt(1), "Omdat Ladehoogte niet kon geconverteerd worden kan ook de Rughoogte niet bepaald worden bij de vertaling van BlumKenmerken naar EconKenmerken. ") + Do $$$AssertEquals(Resultaat.MeldingenAanGebruiker.GetAt(2), "ZijWandType kon niet worden vastgesteld volgens het kenmerk Construction Type. ") ]]> @@ -256,8 +257,9 @@ Set ..OCCKenmerkenConverter = ##class(WSimpl.Vhisie4.OCC.OCCService.OCCKenmerkenConverter).%New(..BlumNaarEconKenmerkenConverterMock) #dim Resultaat As WS.Vhisie4.OCC.GeefNaarEconGeconverteerdeKenmerkenResponse = ..OCCKenmerkenConverter.ConverteerBlumKenmerkenNaarEconKenmerken(OCCKenmerkenRequest) - Do $$$AssertEquals(Resultaat.MeldingenAanGebruiker.Count(), 1) + Do $$$AssertEquals(Resultaat.MeldingenAanGebruiker.Count(), 2) Do $$$AssertEquals(Resultaat.MeldingenAanGebruiker.GetAt(1), "De Rughoogte kon niet gevonden worden volgens Ladehoogte 'Voor Rughoogteconversie onbekende Ladehoogte'. ") + Do $$$AssertEquals(Resultaat.MeldingenAanGebruiker.GetAt(2), "ZijWandType kon niet worden vastgesteld volgens het kenmerk Construction Type. ") ]]>