Index: WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/BlumKenmerkNaarWinkelkarLijnInfoConverter.cls.xml =================================================================== diff -u -r71291 -r71300 --- WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/BlumKenmerkNaarWinkelkarLijnInfoConverter.cls.xml (.../BlumKenmerkNaarWinkelkarLijnInfoConverter.cls.xml) (revision 71291) +++ WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/BlumKenmerkNaarWinkelkarLijnInfoConverter.cls.xml (.../BlumKenmerkNaarWinkelkarLijnInfoConverter.cls.xml) (revision 71300) @@ -210,7 +210,6 @@ 1: ##class(DOM.PM.enu.RVGProductieWijze).LogicalToDisplay(##class(DOM.PM.enu.RVGProductieWijze).LosseComponenten())) #dim VertaaldeProductieWijze As %String = ..Vertaler.GeefVertaling(ProductieWijzePrefix, Taal) - Set:($$$Not($$$HasLength(VertaaldeProductieWijze))) VertaaldeProductieWijze = ..Vertaler.GeefVertaling(ProductieWijzePrefix, ##class(DOM.enu.Taal).Nederlands()) Set VertaaldeProductieWijze = ##class(TECH.StringUtils).ToUpper(VertaaldeProductieWijze) @@ -221,8 +220,8 @@ Do ##class(TECH.StringUtils).Replace(VariantEnToepassing, "links", ..Vertaler.GeefVertaling("Links", Taal)) } If (##class(TECH.StringUtils).Contains("rechts")) { - - } + Do ##class(TECH.StringUtils).Replace(VariantEnToepassing, "rechts", ..Vertaler.GeefVertaling("Rechts", Taal)) + } Set VariantEnToepassing = ##class(TECH.StringUtils).ToFirstCase(VariantEnToepassing) Set CorpusConstructie = ..Vertaler.GeefVertaling(##class(TECH.StringUtils).ToLower(GroeperingLijst.GetAt(2)), Taal) Index: vhUnitTest/WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/BlumKenmerkNaarWinkelkarLijnInfoConverter/GeefGroepering/Test.cls.xml =================================================================== diff -u -r69642 -r71300 --- vhUnitTest/WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/BlumKenmerkNaarWinkelkarLijnInfoConverter/GeefGroepering/Test.cls.xml (.../Test.cls.xml) (revision 69642) +++ vhUnitTest/WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/BlumKenmerkNaarWinkelkarLijnInfoConverter/GeefGroepering/Test.cls.xml (.../Test.cls.xml) (revision 71300) @@ -37,6 +37,8 @@ #dim VertalerMock As vhTest.Mock.DOM.common.Transl.Vertaler = ##class(vhTest.Mock.DOM.common.Transl.Vertaler).%New() Do VertalerMock.VerwachtMethodCall("GeefVertaling", "LosseComponenten", "N", 0).DanReturn("Losse Componenten") + Do VertalerMock.VerwachtMethodCall("GeefVertaling", "zonder sokkel", "N", 0).DanReturn("zonder sokkel") + Do VertalerMock.VerwachtMethodCall("GeefVertaling", "fronthoogte", "N", 0).DanReturn("zonder sokkel") Set Converter = ##class(WSimpl.Vhisie4.OPC.OPCService.OPCKenmerkenConverter.BlumKenmerkNaarWinkelkarLijnInfoConverter).%New(VertalerMock) #dim Resultaat As WS.Vhisie4.OCC.dto.Kenmerk = Converter.GeefGroepering(KenmerkenIterator, ..#Index, "N") @@ -48,29 +50,6 @@ ]]> - - - -