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")
}
}
]]>