Index: vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter/Test.cls.xml
===================================================================
diff -u -r59638 -r59672
--- vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter/Test.cls.xml (.../Test.cls.xml) (revision 59638)
+++ vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter/Test.cls.xml (.../Test.cls.xml) (revision 59672)
@@ -19,18 +19,24 @@
+
+
+
+
+
+ Wordt opgevangen (kan enkel daar) in bovenliggende WSimpl.Vhisie4.OCC.OCCService.OCCKenmerkenConverter
+ Do ..AssertConversieBlumKenmerkenNaarEconKenmerken("Pull-out type", "Inner drawer", "Data.Kenmerken.Isbinnenlade", "true")
+]]>
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
BlumKenmerkName:%String,BlumKenmerkValue:%String,VerwachteEconKenmerkName:%String,VerwachteKenmerkValue:%String
1
Index: WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter.cls.xml
===================================================================
diff -u -r59665 -r59672
--- WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter.cls.xml (.../BlumNaarEconKenmerkenConverter.cls.xml) (revision 59665)
+++ WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter.cls.xml (.../BlumNaarEconKenmerkenConverter.cls.xml) (revision 59672)
@@ -26,15 +26,19 @@
Set EconKenmerk = ##class(WS.Vhisie4.OCC.dto.Kenmerk).%New()
- // TODO: LADETYPE-CONFORME INVULLING VAN VALUES (volgens LadeType-enumeraties)
+ // TODO: LADETYPE-CONFORME INVULLING VAN VALUES (volgens LadeType-enumeraties) => TBX !!!
Do ..ConvertMeervoudigBlumKenmerkValueGebruik(BlumKenmerk, EconKenmerk, LadeType)
+ Do ..ConvertUitzonderingen(BlumKenmerk, EconKenmerk, LadeType)
+
If ($$$Not($$$HasLength(EconKenmerk.Value))) {
Set EconKenmerk.Value = ..ConvertKenmerkValueBlumNaarEconKenmerk(BlumKenmerk.Value, LadeType)
}
- Set EconKenmerk.Name = ..ConvertKenmerkNameBlumNaarEconKenmerk(BlumKenmerk.Name)
+ If ($$$Not($$$HasLength(EconKenmerk.Name))) {
+ Set EconKenmerk.Name = ..ConvertKenmerkNameBlumNaarEconKenmerk(BlumKenmerk.Name)
+ }
Quit EconKenmerk
]]>
@@ -52,6 +56,17 @@
]]>
+
+BlumKenmerk:WS.Vhisie4.OCC.dto.Kenmerk,EconKenmerk:WS.Vhisie4.OCC.dto.Kenmerk,LadeType:%String
+1
+
+
+
KenmerkNameBlumKenmerk:%String
1
@@ -91,15 +106,26 @@
1
%String
@@ -123,7 +149,7 @@
1
%Boolean
+
+EconConfiguratieArray:%ArrayOfDataTypes
+1
+
+
+
KenmerkenIterator:TECH.Iterator
1
Index: vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/Test.cls.xml
===================================================================
diff -u -r59665 -r59672
--- vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/Test.cls.xml (.../Test.cls.xml) (revision 59665)
+++ vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/Test.cls.xml (.../Test.cls.xml) (revision 59672)
@@ -47,16 +47,26 @@
#dim OCCKenmerkenRequest As WS.Vhisie4.OCC.GeefNaarEconGeconverteerdeKenmerkenRequest = ..GeefRequestMetKenmerken(1)
#dim Resultaat As WS.Vhisie4.OCC.GeefNaarEconGeconverteerdeKenmerkenResponse = ..OCCKenmerkenConverter.ConverteerBlumKenmerkenNaarEconKenmerken(OCCKenmerkenRequest)
- Do $$$AssertEquals(Resultaat.EconKenmerken.Count(), 1)
+ Do $$$AssertEquals(Resultaat.EconKenmerken.Count(), 2)
]]>
+
+
+
+
@@ -170,7 +180,7 @@
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(), 12)
+ Do $$$AssertEquals(Resultaat.EconKenmerken.Count(), 13)
Do ..BlumNaarEconKenmerkenConverterMock.Verifieer()
]]>