Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/Converter/DomRollenNaarObjective.cls.xml =================================================================== diff -u -r74382 -r74418 --- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/Converter/DomRollenNaarObjective.cls.xml (.../DomRollenNaarObjective.cls.xml) (revision 74382) +++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/Converter/DomRollenNaarObjective.cls.xml (.../DomRollenNaarObjective.cls.xml) (revision 74418) @@ -39,10 +39,10 @@ } } ElseIf (##class(TECH.StringUtils).StartsWith(..Waarde, "spacestep_spacestep")) { Set ..Waarde = $Piece(..Waarde, ".", 2) - } Else { - Set ..Waarde = ..VerwerkAlgemeneKenmerken(..Waarde) } + Set ..Waarde = ..VerwerkAlgemeneKenmerken(..Waarde) + Set ..Waarde = ##class(TECH.StringUtils).ToFirstCase(..Waarde) ]]> @@ -62,10 +62,10 @@ } } ElseIf (##class(TECH.StringUtils).StartsWith(..Waarde, "tussenstuk")) { Set ..Waarde = "Tussenstuk" - } Else { - Set ..Waarde = ..VerwerkAlgemeneKenmerken(..Waarde) } + Set ..Waarde = ..VerwerkAlgemeneKenmerken(..Waarde) + Set ..Waarde = ##class(TECH.StringUtils).ToFirstCase(..Waarde) ]]> @@ -89,8 +89,10 @@ Set ..Waarde = "Afdekkapbuiten" } ElseIf (##class(TECH.StringUtils).StartsWith(..Waarde, "bevestigingdwarsverdeling")) { Set ..Waarde = "Dwarsverdelinghouder" - } ElseIf (##class(TECH.StringUtils).StartsWith(..Waarde, "binnenrughouderspoelbak")) { - Set ..Waarde = "Spoelbakbinnenrugwandhouder" + } ElseIf (##class(TECH.StringUtils).StartsWith(..Waarde, "binnenrughouderspoelbak.links")) { + Set ..Waarde = "Spoelbakbinnenrugwandhoude.linksr" + } ElseIf (##class(TECH.StringUtils).StartsWith(..Waarde, "binnenrughouderspoelbak.rechts")) { + Set ..Waarde = "Spoelbakbinnenrugwandhouder.rechts" } ElseIf (##class(TECH.StringUtils).StartsWith(..Waarde, "bodemsteunbinnenlade")) { Set ..Waarde = "Bevestigingbodemfront" } ElseIf (##class(TECH.StringUtils).StartsWith(..Waarde, "bodemsteunfront")) { @@ -103,8 +105,10 @@ Set ..Waarde = "Bevestigingbodemfront" } ElseIf (##class(TECH.StringUtils).StartsWith(..Waarde, "houtschroef")) { Set ..Waarde = "Rugbodemschroef" - } ElseIf (##class(TECH.StringUtils).StartsWith(..Waarde, "rughouder")) { - Set ..Waarde = "Rugwandhouder" + } ElseIf (##class(TECH.StringUtils).StartsWith(..Waarde, "rughouder.links")) { + Set ..Waarde = "Rugwandhouder.links" + } ElseIf (##class(TECH.StringUtils).StartsWith(..Waarde, "rughouder.rechts")) { + Set ..Waarde = "Rugwandhouder.rechts" } ElseIf (##class(TECH.StringUtils).StartsWith(..Waarde, "spaanplaatschroef")) { Set ..Waarde = "Schroefmanuelemontage" } ElseIf (##class(TECH.StringUtils).StartsWith(..Waarde, "stabilisator")) { @@ -117,10 +121,10 @@ Set ..Waarde = "Tussenstuk" } ElseIf (##class(TECH.StringUtils).StartsWith(..Waarde, "tussenrughouder")) { Set ..Waarde = "Tussenstukrugwandhouder" - } Else { - Set ..Waarde = ..VerwerkAlgemeneKenmerken(..Waarde) } + Set ..Waarde = ..VerwerkAlgemeneKenmerken(..Waarde) + Set ..Waarde = ##class(TECH.StringUtils).ToFirstCase(..Waarde) ]]>