Index: BL/Flow/Proxy/pxLevering.cls.xml
===================================================================
diff -u -r63827 -r64163
--- BL/Flow/Proxy/pxLevering.cls.xml	(.../pxLevering.cls.xml)	(revision 63827)
+++ BL/Flow/Proxy/pxLevering.cls.xml	(.../pxLevering.cls.xml)	(revision 64163)
@@ -263,15 +263,23 @@
 <Parameter name="XMLPROJECTION" value="NONE"/>
 </Property>
 
+<Property name="NaleveringDataAanvuller">
+<Type>DOM.VKP.impl.DataM.DataMBon.NaleveringDataAanvuller</Type>
+<Private>1</Private>
+<Parameter name="XMLPROJECTION" value="NONE"/>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>VerkoopsvoorwaardenURLBepaler:BL.Flow.Proxy.impl.VerkoopsvoorwaardenURLBepaler,KlantInstellingenService:APPS.common.KlantInstellingenService</FormalSpec>
+<FormalSpec>VerkoopsvoorwaardenURLBepaler:BL.Flow.Proxy.impl.VerkoopsvoorwaardenURLBepaler,KlantInstellingenService:APPS.common.KlantInstellingenService,NaleveringDataAanvuller:DOM.VKP.impl.DataM.DataMBon.NaleveringDataAanvuller</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	set ..VerkoopsvoorwaardenURLBepaler = $$$Implementation(VerkoopsvoorwaardenURLBepaler,##class(BL.Flow.Proxy.impl.VerkoopsvoorwaardenURLBepaler).%New())
+	Set ..VerkoopsvoorwaardenURLBepaler = $$$Implementation(VerkoopsvoorwaardenURLBepaler,##class(BL.Flow.Proxy.impl.VerkoopsvoorwaardenURLBepaler).%New())
 	Set ..KlantInstellingenService = $$$Inject(KlantInstellingenService, ##class(APPS.ApplicatieContext).Instance().GeefOrderVerwerkingAPI().GeefKlantInstellingenService())
+	Set ..NaleveringDataAanvuller = $$$Inject(NaleveringDataAanvuller, ##class(DOM.VKP.impl.DataM.DataMBon.NaleveringDataAanvuller).%New())
+	
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -393,6 +401,9 @@
 	. ; Next LijnNr
 	
 	Do flbLevBonEnd   ; (KLNr,BONNr,Taal,Rec,Rec3)
+	
+	Do ..NaleveringDataAanvuller.VulNaleveringDataAanIndienNodig(Bon, pxOrd, Taal)
+	
 	Do flbPPODFields()
 
 	; GEEN remboursbon als :