Index: DOM/VKP/impl/DataM/DataMBon/NaleveringDataAanvuller.cls.xml
===================================================================
diff -u -r64141 -r64144
--- DOM/VKP/impl/DataM/DataMBon/NaleveringDataAanvuller.cls.xml	(.../NaleveringDataAanvuller.cls.xml)	(revision 64141)
+++ DOM/VKP/impl/DataM/DataMBon/NaleveringDataAanvuller.cls.xml	(.../NaleveringDataAanvuller.cls.xml)	(revision 64144)
@@ -13,31 +13,37 @@
 <Private>1</Private>
 </Property>
 
+<Property name="VertaalApi">
+<Type>DOM.common.Transl.VertaalAPI</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="NaleveringDataArray">
 <Type>%ArrayOfDataTypes</Type>
 <Private>1</Private>
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>OrderApi:DOM.VKP.OrderAPI="",ProductApi:DOM.PM.ProductAPI=""</FormalSpec>
+<FormalSpec>OrderApi:DOM.VKP.OrderAPI="",ProductApi:DOM.PM.ProductAPI="",VertaalApi:DOM.common.Transl.VertaalAPI=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..OrderApi = $$$Inject(OrderApi, ##class(DOM.VKP.impl.DataM.DataMOrderAPI).%New())
 	Set ..ProductApi = $$$Inject(ProductApi, ##class(DOM.PM.impl.ProductAPI).%New())
+	Set ..VertaalApi = $$$Inject(VertaalApi, ##class(DOM.common.Transl.impl.VertaalAPI).%New())
 	
 	Quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="VulNaleveringDataAanIndienNodig">
-<FormalSpec>Bon:DOM.VKP.Bon,pxLevOrd:BL.Flow.Proxy.pxLevOrd</FormalSpec>
+<FormalSpec>Bon:DOM.VKP.Bon,pxLevOrd:BL.Flow.Proxy.pxLevOrd,Taal:DOM.enu.Taal</FormalSpec>
 <Implementation><![CDATA[
 	Do ..VulNaleveringDataArrayMetRelevanteOrderLijnenData(Bon)
 	
-	Do ..VulPxLevOrdAanMetNaleveringDataTekstLijnen(pxLevOrd)
+	Do ..VulPxLevOrdAanMetNaleveringDataTekstLijnen(pxLevOrd, Taal)
 ]]></Implementation>
 </Method>
 
@@ -98,9 +104,10 @@
 </Method>
 
 <Method name="VulPxLevOrdAanMetNaleveringDataTekstLijnen">
-<FormalSpec>pxLevOrd:BL.Flow.Proxy.pxLevOrd</FormalSpec>
+<FormalSpec>pxLevOrd:BL.Flow.Proxy.pxLevOrd,Taal:DOM.enu.Taal</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
+	#dim Vertaler As DOM.common.Transl.Vertaler = ..VertaalApi.GeefVertaler(Taal, ##class(DOM.common.Transl.enu.VertaalGroep).Algemeen())
 	#dim ArrayKeyList As %ListOfDataTypes = ##class(TECH.ArrayUtils).ArrayKeysToList(..NaleveringDataArray)
 	#dim ArrayKeyListIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(ArrayKeyList)
 	#dim NaLeveringDataIterator As TECH.Iterator
@@ -125,11 +132,11 @@
 			Set CurrentNaleveringOrderId = $Piece(CurrentNaleveringData,"||",3)
 			
 			If MagHoofdingLijnGezetWorden {
-				Do ..VoegToeNaleverDataHoofdingTekstlijn(pxLevOrd)
+				Do ..VoegToeNaleverDataHoofdingTekstlijn(pxLevOrd, Vertaler)
 				Set MagHoofdingLijnGezetWorden = $$$False
 			}
 			
-			Set NaleveringTekstLijn = NaleveringTekstLijn _ CurrentNaleveringAantal _ " per " _ CurrentNaleveringDatum _ " (" _ CurrentNaleveringOrderId _ "), "
+			Set NaleveringTekstLijn = NaleveringTekstLijn _ CurrentNaleveringAantal _ " " _ Vertaler.GeefVertaling("per") _ " " _ CurrentNaleveringDatum _ " (" _ CurrentNaleveringOrderId _ "), "
 			Set MagTekstLijnToegevoegdWorden = $$$True
 		}
 		
@@ -160,10 +167,10 @@
 </Method>
 
 <Method name="VoegToeNaleverDataHoofdingTekstlijn">
-<FormalSpec>pxLevOrd:BL.Flow.Proxy.pxLevOrd</FormalSpec>
+<FormalSpec>pxLevOrd:BL.Flow.Proxy.pxLevOrd,Vertaler:DOM.common.Transl.Vertaler</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	#dim HoofdingLijn As %String = "Naleveringen: " _ $$$CRLF
+	#dim HoofdingLijn As %String = Vertaler.GeefVertaling("Naleveringen") _ ": "
 	#dim LijnObj As BL.Flow.Proxy.pxProductLijn = ##class(BL.Flow.Proxy.pxTekstLijn).BuildSeparator(HoofdingLijn)
 	Do pxLevOrd.AppendLijn(LijnObj)
 ]]></Implementation>