Index: vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/Test.cls.xml =================================================================== diff -u -r60703 -r60744 --- vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/Test.cls.xml (.../Test.cls.xml) (revision 60703) +++ vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/Test.cls.xml (.../Test.cls.xml) (revision 60744) @@ -102,8 +102,8 @@ #dim Resultaat As WS.Vhisie4.OCC.GeefNaarEconGeconverteerdeKenmerkenResponse = ..OCCKenmerkenConverter.ConverteerBlumKenmerkenNaarEconKenmerken(OCCKenmerkenRequest) Do $$$AssertEquals(Resultaat.EconKenmerken.GetAt("Data.Kenmerken.Corpusbreedte"), "500") - Do $$$AssertEquals(Resultaat.EconKenmerken.GetAt("Data.Kenmerken.CorpusWanddikte"), "0") - Do $$$AssertEquals(Resultaat.EconKenmerken.GetAt("Data.Kenmerken.IsBinnenbreedte"), "true") + Do $$$AssertEquals(Resultaat.EconKenmerken.GetAt("Data.Kenmerken.Corpuswanddikte"), "0") + Do $$$AssertEquals(Resultaat.EconKenmerken.GetAt("Data.Kenmerken.Isbinnenbreedte"), "true") ]]> @@ -117,16 +117,16 @@ Set OCCKenmerkenRequest.BlumKenmerken = BlumKenmerken Set EconKenmerk = ##class(WS.Vhisie4.OCC.dto.Kenmerk).%New() - Set EconKenmerk.Name = "Data.Kenmerken.ZijwandVerhogingType" + Set EconKenmerk.Name = "Data.Kenmerken.Zijwandverhogingtype" Set EconKenmerk.Value = ##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingType).InschuifElement() Do ..BlumNaarEconKenmerkenConverterMock.IndienMethodCall("ConvertBlumNaarEconKenmerk", BlumKenmerk, "TBX").DanReturn(EconKenmerk) Set ..OCCKenmerkenConverter = ##class(WSimpl.Vhisie4.OCC.OCCService.OCCKenmerkenConverter).%New(..BlumNaarEconKenmerkenConverterMock) #dim Resultaat As WS.Vhisie4.OCC.GeefNaarEconGeconverteerdeKenmerkenResponse = ..OCCKenmerkenConverter.ConverteerBlumKenmerkenNaarEconKenmerken(OCCKenmerkenRequest) - Do $$$AssertEquals(Resultaat.EconKenmerken.GetAt("Data.Kenmerken.ZijwandVerhogingMateriaal"), ##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingInschuifelementMateriaal).ZonderVerhoging()) - Do $$$AssertEquals(Resultaat.EconKenmerken.GetAt("Data.Kenmerken.ZijwandVerhogingInschuifelementKleur"), "") + Do $$$AssertEquals(Resultaat.EconKenmerken.GetAt("Data.Kenmerken.Zijwandverhogingmateriaal"), ##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingInschuifelementMateriaal).ZonderVerhoging()) + Do $$$AssertEquals(Resultaat.EconKenmerken.GetAt("Data.Kenmerken.Zijwandverhoginginschuifelementkleur"), "") ]]> Index: WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter.cls.xml =================================================================== diff -u -r60703 -r60744 --- WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter.cls.xml (.../OCCKenmerkenConverter.cls.xml) (revision 60703) +++ WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter.cls.xml (.../OCCKenmerkenConverter.cls.xml) (revision 60744) @@ -272,8 +272,8 @@ 1 @@ -342,8 +342,8 @@ If ((LadeType = "TBX") && ..BevatKenmerkenIteratorKenmerk(KenmerkenIterator, "design elements")) { #dim BlumKenmerkDesignElements As WS.Vhisie4.OCC.dto.Kenmerk = ..GeefKenmerkUitKenmerkenIteratorVolgensName(KenmerkenIterator, "design elements") If (##class(TECH.StringUtils).ToLower(BlumKenmerkDesignElements.Value) = "individual fabrication") { - Do EconConfiguratieArray.SetAt(##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingInschuifelementMateriaal).ZonderVerhoging(), "Data.Kenmerken.ZijwandVerhogingMateriaal") - Do EconConfiguratieArray.SetAt("", "Data.Kenmerken.ZijwandVerhogingInschuifelementKleur") + Do EconConfiguratieArray.SetAt(##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingInschuifelementMateriaal).ZonderVerhoging(), "Data.Kenmerken.Zijwandverhogingmateriaal") + Do EconConfiguratieArray.SetAt("", "Data.Kenmerken.Zijwandverhoginginschuifelementkleur") } } ]]>