Index: vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter/Lbx/Test.cls.xml
===================================================================
diff -u -r59888 -r59932
--- vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter/Lbx/Test.cls.xml (.../Test.cls.xml) (revision 59888)
+++ vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter/Lbx/Test.cls.xml (.../Test.cls.xml) (revision 59932)
@@ -40,6 +40,11 @@
]]>
+
+
+
+
Wordt opgevangen (kan enkel daar) in bovenliggende WSimpl.Vhisie4.OCC.OCCService.OCCKenmerkenConverter
Index: WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter.cls.xml
===================================================================
diff -u -r59888 -r59932
--- WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter.cls.xml (.../OCCKenmerkenConverter.cls.xml) (revision 59888)
+++ WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter.cls.xml (.../OCCKenmerkenConverter.cls.xml) (revision 59932)
@@ -136,6 +136,7 @@
1
-
-
-
-
@@ -103,39 +88,55 @@
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(), 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")
Do $$$AssertEquals(Resultaat.EconKenmerken.GetAt("Data.Kenmerken.IsBinnenbreedte"), "true")
]]>
-
+
+
+
+
+
+
+
+
+
-
+
@@ -323,7 +324,6 @@
0) {
- Set Kenmerk = ##class(WS.Vhisie4.OCC.dto.Kenmerk).%New()
- Set Kenmerk.Name = "Programme"
- Set Kenmerk.Value = ValueKenmerkProgramme
- Do BlumKenmerken.Insert(Kenmerk)
- Do ..BlumNaarEconKenmerkenConverterMock.IndienMethodCall("ConvertBlumNaarEconKenmerk", Kenmerk, "LBX").DanReturn(Kenmerk)
- Do ..BlumNaarEconKenmerkenConverterMock.IndienMethodCall("ConvertBlumNaarEconKenmerk", Kenmerk, "TBX").DanReturn(Kenmerk)
+ Do ..SluitInVariantKenmerk(BlumKenmerken, ValueKenmerkProgramme)
For Aantal=2:1:AantalKenmerken {
Set Kenmerk = ##class(WS.Vhisie4.OCC.dto.Kenmerk).%New()
@@ -357,6 +352,28 @@
]]>
+
+BlumKenmerken:%ListOfObjects,ValueKenmerkProgramme:%String
+1
+
+
+
OCCKenmerkenRequest:WS.Vhisie4.OCC.GeefNaarEconGeconverteerdeKenmerkenRequest,LadeType:%String="LBX"
1
Index: vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter/Tbx/Test.cls.xml
===================================================================
diff -u -r59888 -r59932
--- vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter/Tbx/Test.cls.xml (.../Test.cls.xml) (revision 59888)
+++ vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter/Tbx/Test.cls.xml (.../Test.cls.xml) (revision 59932)
@@ -45,7 +45,7 @@
Do ..AssertConversieBlumKenmerkenNaarEconKenmerken("Lateral divider", "3", "Data.Kenmerken.Dwarsverdelingaantal", ##class(DOM.PM.enu.TBXDwarsverdeling).Drie())
Do ..AssertConversieBlumKenmerkenNaarEconKenmerken("Lateral divider", "4", "Data.Kenmerken.Dwarsverdelingaantal", ##class(DOM.PM.enu.TBXDwarsverdeling).Vier())
Do ..AssertConversieBlumKenmerkenNaarEconKenmerken("Lateral divider", "2x2", "Data.Kenmerken.Dwarsverdelingaantal", ##class(DOM.PM.enu.TBXDwarsverdeling).TweeMaalTwee())
- Do ..AssertConversieBlumKenmerkenNaarEconKenmerken("Lateral divider", "RandomWaarde", "Data.Kenmerken.Dwarsverdelingaantal", "", "Onbekende waarde resultaart in leeg")
+ Do ..AssertConversieBlumKenmerkenNaarEconKenmerken("Lateral divider", "RandomWaarde", "Data.Kenmerken.Dwarsverdelingaantal", "", "Onbekende waarde resulteert in leeg")
]]>
@@ -56,6 +56,11 @@
]]>
+
+
+
+
Wordt opgevangen (kan enkel daar) in bovenliggende WSimpl.Vhisie4.OCC.OCCService.OCCKenmerkenConverter
Index: WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter.cls.xml
===================================================================
diff -u -r59888 -r59932
--- WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter.cls.xml (.../BlumNaarEconKenmerkenConverter.cls.xml) (revision 59888)
+++ WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter.cls.xml (.../BlumNaarEconKenmerkenConverter.cls.xml) (revision 59932)
@@ -83,6 +83,7 @@
1
%String
1
%String
1
%String