Index: DOM/VKP/impl/DataM/DataMBon/NaleveringDataAanvuller.cls.xml
===================================================================
diff -u -r64144 -r64151
--- DOM/VKP/impl/DataM/DataMBon/NaleveringDataAanvuller.cls.xml	(.../NaleveringDataAanvuller.cls.xml)	(revision 64144)
+++ DOM/VKP/impl/DataM/DataMBon/NaleveringDataAanvuller.cls.xml	(.../NaleveringDataAanvuller.cls.xml)	(revision 64151)
@@ -136,7 +136,7 @@
 				Set MagHoofdingLijnGezetWorden = $$$False
 			}
 			
-			Set NaleveringTekstLijn = NaleveringTekstLijn _ CurrentNaleveringAantal _ " " _ Vertaler.GeefVertaling("per") _ " " _ CurrentNaleveringDatum _ " (" _ CurrentNaleveringOrderId _ "), "
+			Set NaleveringTekstLijn = NaleveringTekstLijn _ CurrentNaleveringAantal _ " " _ Vertaler.GeefVertaling("op") _ " " _ CurrentNaleveringDatum _ " (" _ CurrentNaleveringOrderId _ "), "
 			Set MagTekstLijnToegevoegdWorden = $$$True
 		}
 		
Index: vhDeploy/Deploy20210406xVertalingenNaleveringenLeverbon.cls.xml
===================================================================
diff -u
--- vhDeploy/Deploy20210406xVertalingenNaleveringenLeverbon.cls.xml	(revision 0)
+++ vhDeploy/Deploy20210406xVertalingenNaleveringenLeverbon.cls.xml	(revision 64151)
@@ -0,0 +1,66 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Deploy20210406xVertalingenNaleveringenLeverbon">
+<Super>vhDeploy.Deploy</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>Aanmaak vertalingen Naleveringen op Leverbon</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Do ..MaakVertalingNaleveringen()
+	Do ..MaakVertalingPer()
+]]></Implementation>
+</Method>
+
+<Method name="MaakVertalingNaleveringen">
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim Sleutel As TECH.String = "Naleveringen"
+	
+	#dim N As TECH.String = "Naleveringen"
+	#dim F As TECH.String = "Commandes en attente"
+	#dim D As TECH.String = "Nachlieferungen"
+	#dim E As TECH.String = "Back orders"
+	
+	Do ..MaakVertaling(Sleutel, N, F, D, E)
+]]></Implementation>
+</Method>
+
+<Method name="MaakVertalingPer">
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim Sleutel As TECH.String = "op"
+	
+	#dim N As TECH.String = "op"
+	#dim F As TECH.String = "le"
+	#dim D As TECH.String = "am"
+	#dim E As TECH.String = "on"
+	
+	Do ..MaakVertaling(Sleutel, N, F, D, E)
+]]></Implementation>
+</Method>
+
+<Method name="MaakVertaling">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>Sleutel:TECH.String,N:TECH.String,F:TECH.String,D:TECH.String,E:TECH.String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim VertaalGroep As DOM.common.Transl.enu.VertaalGroep = ##class(DOM.common.Transl.enu.VertaalGroep).Algemeen()
+	#dim TextType As TECH.String = "L"
+	
+	do ##class(Res.Vertaling).CreateOrUpdate(VertaalGroep, Sleutel, TextType, ##class(DOM.enu.Taal).Nederlands(), N)
+	do ##class(Res.Vertaling).CreateOrUpdate(VertaalGroep, Sleutel, TextType, ##class(DOM.enu.Taal).Frans(), F)
+	do ##class(Res.Vertaling).CreateOrUpdate(VertaalGroep, Sleutel, TextType, ##class(DOM.enu.Taal).Duits(), D)
+	do ##class(Res.Vertaling).CreateOrUpdate(VertaalGroep, Sleutel, TextType, ##class(DOM.enu.Taal).Engels(), E)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>