Index: vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/Test.cls.xml
===================================================================
diff -u -r59869 -r59877
--- vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/Test.cls.xml (.../Test.cls.xml) (revision 59869)
+++ vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/Test.cls.xml (.../Test.cls.xml) (revision 59877)
@@ -47,8 +47,9 @@
#dim OCCKenmerkenRequest As WS.Vhisie4.OCC.GeefNaarEconGeconverteerdeKenmerkenRequest = ..GeefRequestMetKenmerken(1)
#dim Resultaat As WS.Vhisie4.OCC.GeefNaarEconGeconverteerdeKenmerkenResponse = ..OCCKenmerkenConverter.ConverteerBlumKenmerkenNaarEconKenmerken(OCCKenmerkenRequest)
- Do $$$AssertEquals(Resultaat.EconKenmerken.Count(), 2)
+ Do $$$AssertEquals(Resultaat.EconKenmerken.Count(), 3)
Do $$$AssertEquals(Resultaat.EconKenmerken.GetAt("Programme"), "LEGRABOX")
+ Do $$$AssertEquals(Resultaat.EconKenmerken.GetAt("Data.Lijn.Aantal"), "1")
Do $$$AssertEquals(Resultaat.EconKenmerken.GetAt("Data.Kenmerken.Isbinnenlade"), "false")
]]>
@@ -71,8 +72,9 @@
Set ..OCCKenmerkenConverter = ##class(WSimpl.Vhisie4.OCC.OCCService.OCCKenmerkenConverter).%New(..BlumNaarEconKenmerkenConverterMock)
#dim Resultaat As WS.Vhisie4.OCC.GeefNaarEconGeconverteerdeKenmerkenResponse = ..OCCKenmerkenConverter.ConverteerBlumKenmerkenNaarEconKenmerken(OCCKenmerkenRequest)
- Do $$$AssertEquals(Resultaat.EconKenmerken.Count(), 5)
+ Do $$$AssertEquals(Resultaat.EconKenmerken.Count(), 6)
Do $$$AssertEquals(Resultaat.EconKenmerken.GetAt("Programme"), "LEGRABOX")
+ Do $$$AssertEquals(Resultaat.EconKenmerken.GetAt("Data.Lijn.Aantal"), "1")
Do $$$AssertEquals(Resultaat.EconKenmerken.GetAt("Data.Kenmerken.Isbinnenlade"), "false")
Do $$$AssertEquals(Resultaat.EconKenmerken.GetAt("Data.Kenmerken.Corpusbreedte"), "500")
Do $$$AssertEquals(Resultaat.EconKenmerken.GetAt("Data.Kenmerken.CorpusWanddikte"), "0")
@@ -85,8 +87,9 @@
#dim OCCKenmerkenRequest As WS.Vhisie4.OCC.GeefNaarEconGeconverteerdeKenmerkenRequest = ..GeefRequestMetKenmerken(1)
#dim Resultaat As WS.Vhisie4.OCC.GeefNaarEconGeconverteerdeKenmerkenResponse = ..OCCKenmerkenConverter.ConverteerBlumKenmerkenNaarEconKenmerken(OCCKenmerkenRequest)
- Do $$$AssertEquals(Resultaat.EconKenmerken.Count(), 2)
+ Do $$$AssertEquals(Resultaat.EconKenmerken.Count(), 3)
Do $$$AssertEquals(Resultaat.EconKenmerken.GetAt("Programme"), "LEGRABOX")
+ Do $$$AssertEquals(Resultaat.EconKenmerken.GetAt("Data.Lijn.Aantal"), "1")
Do $$$AssertEquals(Resultaat.EconKenmerken.GetAt("Data.Kenmerken.Isbinnenlade"), "false")
]]>
@@ -96,8 +99,9 @@
#dim OCCKenmerkenRequest As WS.Vhisie4.OCC.GeefNaarEconGeconverteerdeKenmerkenRequest = ..GeefRequestMetKenmerken(3)
#dim Resultaat As WS.Vhisie4.OCC.GeefNaarEconGeconverteerdeKenmerkenResponse = ..OCCKenmerkenConverter.ConverteerBlumKenmerkenNaarEconKenmerken(OCCKenmerkenRequest)
- Do $$$AssertEquals(Resultaat.EconKenmerken.Count(), 4)
+ Do $$$AssertEquals(Resultaat.EconKenmerken.Count(), 5)
Do $$$AssertEquals(Resultaat.EconKenmerken.GetAt("Programme"), "LEGRABOX")
+ Do $$$AssertEquals(Resultaat.EconKenmerken.GetAt("Data.Lijn.Aantal"), "1")
Do $$$AssertEquals(Resultaat.EconKenmerken.GetAt(..#RandomKenmerkName_2), ..#RandomKenmerkValue_2)
Do $$$AssertEquals(Resultaat.EconKenmerken.GetAt(..#RandomKenmerkName_3), ..#RandomKenmerkValue_3)
Do $$$AssertEquals(Resultaat.EconKenmerken.GetAt("Data.Kenmerken.Isbinnenlade"), "false")
Index: WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter.cls.xml
===================================================================
diff -u -r59722 -r59877
--- WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter.cls.xml (.../OCCKenmerkenConverter.cls.xml) (revision 59722)
+++ WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter.cls.xml (.../OCCKenmerkenConverter.cls.xml) (revision 59877)
@@ -127,6 +127,7 @@
EconConfiguratieArray:%ArrayOfDataTypes
1