Index: APPS/PM/BulkActie/Acties/WijzigLangtekst.cls.xml
===================================================================
diff -u -r46557 -r47804
--- APPS/PM/BulkActie/Acties/WijzigLangtekst.cls.xml	(.../WijzigLangtekst.cls.xml)	(revision 46557)
+++ APPS/PM/BulkActie/Acties/WijzigLangtekst.cls.xml	(.../WijzigLangtekst.cls.xml)	(revision 47804)
@@ -3,6 +3,24 @@
 <Class name="APPS.PM.BulkActie.Acties.WijzigLangtekst">
 <Super>APPS.PM.BulkActie.ProductBulkActie</Super>
 
+<Property name="LangtekstBewaarder">
+<Type>DOM.PM.LangtekstBewaarder</Type>
+<Private>1</Private>
+<Transient>1</Transient>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>BulkFactor:%String,Omschrijving:%String,LangtekstBewaarder:DOM.PM.LangtekstBewaarder</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..LangtekstBewaarder = $$$Inject(LangtekstBewaarder,##class(DOM.PM.LangtekstBewaarder).%New())
+	Quit ##super(BulkFactor,Omschrijving)
+]]></Implementation>
+</Method>
+
 <Method name="Valideer">
 <FormalSpec>ProductID:%String,ActieParameters:%ListOfDataTypes</FormalSpec>
 <ReturnType>APPS.PM.BulkActie.dto.ActieResultaat</ReturnType>
@@ -78,8 +96,7 @@
 	#dim NieuwLangtekst As %String = ..GeefNieuweLangtekst(OorspronkelijkeLangtekst,TeVervangen,Door)
 	set ActieResultaat.Opmerking2 = ..GeefWeerTeGevenLangtekst(NieuwLangtekst,Taal)
 	
-	Set LangtekstBewaarder = ##class(DOM.PM.LangtekstBewaarder).%New()
-	Do LangtekstBewaarder.BewaarVoorTaal(ProductID,NieuwLangtekst,Taal)
+	Do ..LangtekstBewaarder.BewaarVoorTaal(ProductID,NieuwLangtekst,Taal)
 	quit ActieResultaat
 ]]></Implementation>
 </Method>