Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/Converter/DomRollenNaarObjective.cls.xml =================================================================== diff -u -r71484 -r71515 --- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/Converter/DomRollenNaarObjective.cls.xml (.../DomRollenNaarObjective.cls.xml) (revision 71484) +++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/Converter/DomRollenNaarObjective.cls.xml (.../DomRollenNaarObjective.cls.xml) (revision 71515) @@ -35,20 +35,12 @@ } ElseIf (LBXKenmerken.RugWandMateriaal = ##class(DOM.PM.enu.LBXRugWandMateriaal).Staal()) { Set ..Waarde = "RugStaal" } - } ElseIf ((..Waarde = "Sifonkap.Z1") || (..Waarde = "Sifonkap.Z1")) { + } ElseIf ((..Waarde = "Sifonkap.Z1") || (..Waarde = "Sifonkap.Z2")) { Set ..Waarde = "Sifonkap" - } ElseIf ((..Waarde = "Geleider.Links") || (..Waarde = "Geleider.Rechts")) { - Set ..Waarde = "Geleider" - } ElseIf ((..Waarde = "RugWandHouder.Links") || (..Waarde = "RugWandHouder.Rechts")) { - Set ..Waarde = "RugWandHouder" - } ElseIf ((..Waarde = "FrontHouder.Links") || (..Waarde = "FrontHouder.Rechts")) { - Set ..Waarde = "FrontHouder" - } ElseIf ((..Waarde = "Boxcap.Links") || (..Waarde = "Boxcap.Rechts")) { - Set ..Waarde = "Boxcap" - } ElseIf ((..Waarde = "AfdekkapRugWandHouder.Links") || (..Waarde = "AfdekkapRugWandHouder.Rechts")) { - Set ..Waarde = "AfdekkapRugWandHouder" - } ElseIf ((..Waarde = "AfdekkapFrontHouderBinnen.Links") || (..Waarde = "AfdekkapFrontHouderBinnen.Rechts")) { - Set ..Waarde = "AfdekkapFrontHouderBinnen" + } ElseIf ((##class(TECH.StringUtils).EndsWith(..Waarde, "Links")) || ##class(TECH.StringUtils).EndsWith(..Waarde, "Rechts")) { + If ($$$Not(##class(TECH.StringUtils).StartsWith(..Waarde, "LadeZijkant"))) { + Set ..Waarde = ##class(TECH.StringUtils).GetFirstPart(..Waarde, ".") + } } ]]>