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