Index: vhUnitTest/APPS/PM/BulkActie/TestWijzigLangtekst.cls.xml
===================================================================
diff -u -r29059 -r33581
--- vhUnitTest/APPS/PM/BulkActie/TestWijzigLangtekst.cls.xml	(.../TestWijzigLangtekst.cls.xml)	(revision 29059)
+++ vhUnitTest/APPS/PM/BulkActie/TestWijzigLangtekst.cls.xml	(.../TestWijzigLangtekst.cls.xml)	(revision 33581)
@@ -11,6 +11,12 @@
 	Do ..Valideer("UT lange","UT~lange",OorspronkelijkeLangtekst,
 		"UT"_$C(13,10)_"lange tekst voor een"_$C(13,10)_"product")
 		
+	Do ..Valideer("UT lange","UT"_$C(13,10)_"lange",OorspronkelijkeLangtekst,
+		"UT"_$C(13,10)_"lange tekst voor een"_$C(13,10)_"product")
+
+	Do ..Valideer("UT lange","UT"_$C(10)_"lange",OorspronkelijkeLangtekst,
+		"UT"_$C(13,10)_"lange tekst voor een"_$C(13,10)_"product")
+
 	Do ..Valideer("UT lange","UT korte",OorspronkelijkeLangtekst,
 		"UT korte tekst voor een"_$C(13,10)_"product")
 		
Index: APPS/PM/BulkActie/Acties/WijzigLangtekst.cls.xml
===================================================================
diff -u -r29059 -r33581
--- APPS/PM/BulkActie/Acties/WijzigLangtekst.cls.xml	(.../WijzigLangtekst.cls.xml)	(revision 29059)
+++ APPS/PM/BulkActie/Acties/WijzigLangtekst.cls.xml	(.../WijzigLangtekst.cls.xml)	(revision 33581)
@@ -40,6 +40,9 @@
 <Implementation><![CDATA[
 	#dim Nieuwe As %String = ""
 	
+	Set VervangenDoor = ##class(TECH.StringUtils).Replace(VervangenDoor,$C(13,10),"~")
+	Set VervangenDoor = ##class(TECH.StringUtils).Replace(VervangenDoor,$C(10),"~")
+	
 	If (TeVervangen = "^") { Set Nieuwe = VervangenDoor_Originele }
 	ElseIf (TeVervangen = "$") { Set Nieuwe = Originele_VervangenDoor }
 	Else { Set Nieuwe = ##class(TECH.StringUtils).Replace(Originele, TeVervangen, VervangenDoor)}