Index: WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/BlumKenmerkNaarWinkelkarLijnInfoConverter.cls.xml =================================================================== diff -u -r70143 -r70558 --- WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/BlumKenmerkNaarWinkelkarLijnInfoConverter.cls.xml (.../BlumKenmerkNaarWinkelkarLijnInfoConverter.cls.xml) (revision 70143) +++ WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/BlumKenmerkNaarWinkelkarLijnInfoConverter.cls.xml (.../BlumKenmerkNaarWinkelkarLijnInfoConverter.cls.xml) (revision 70558) @@ -75,6 +75,7 @@ Set KleurFront = ##class(WS.Vhisie4.OPC.dto.Kenmerk).%New() #dim ProductieWijze As %String = ##class(TECH.StringUtils).ToLower(..GeefBlumKenmerk(KenmerkenIterator, "service levels").Value) #dim Optie As %String = ##class(TECH.StringUtils).ToLower(..GeefBlumKenmerk(KenmerkenIterator, "options").Value) + #dim MateriaalOpties As %String = ##class(TECH.StringUtils).ToLower(..GeefBlumKenmerk(KenmerkenIterator, "options").Value) If ProductieWijze = "assembled" { Set KleurFront = ##class(WS.Vhisie4.OPC.dto.Kenmerk).%New() @@ -86,7 +87,13 @@ } Else { #dim DikteFront As %String = ..GeefBlumKenmerk(KenmerkenIterator, "front thickness").Value #dim TypeMateriaal As %String = ..GeefBlumKenmerk(KenmerkenIterator, "type of material surface").Value - #dim DecorNaam As %String = ..GeefBlumKenmerk(KenmerkenIterator, "decor name").Value + #dim DecorNaam As %String + + If (MateriaalOpties = "wooden components with fronts ? two colors") { + Set DecorNaam = ..GeefBlumKenmerk(KenmerkenIterator, "decor name (material b)").Value + } Else { + Set DecorNaam = ..GeefBlumKenmerk(KenmerkenIterator, "decor name").Value + } Set KleurFront.Value = ..BepaalKleur(DecorNaam, DikteFront, "DikteFront", TypeMateriaal) } Index: WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/BlumNaarAXKenmerkenConverter.cls.xml =================================================================== diff -u -r70030 -r70558 --- WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/BlumNaarAXKenmerkenConverter.cls.xml (.../BlumNaarAXKenmerkenConverter.cls.xml) (revision 70030) +++ WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/BlumNaarAXKenmerkenConverter.cls.xml (.../BlumNaarAXKenmerkenConverter.cls.xml) (revision 70558) @@ -217,7 +217,9 @@ Quit:(KenmerkNameBlum="nominal length trimmed, right") GeconverteerdeKenmerkName_"Nominalelengtegetrimdrechts" Quit:(KenmerkNameBlum="partition side thickness") GeconverteerdeKenmerkName_"Diktescheidingswand" - Do ..Logger.ErrorMail("Onbekende BlumKenmerkName", "Kon RVG BlumKenmerk '"_ KenmerkNameBlum _"' niet vertalen.") + If $$$Not(##class(TECH.StringUtils).Equals(KenmerkNameBlum, "selection of the decor via decor number")) { + Do ..Logger.ErrorMail("Onbekende BlumKenmerkName", "Kon RVG BlumKenmerk '"_ KenmerkNameBlum _"' niet vertalen.") + } Quit ..#OnvertaalbaarKenmerk_" '" _ KenmerkNameBlum _ "'" ]]>