Index: AXimpl/Dynamics/SalesLineStatusOut/EventHandler/SalesLineStatusUpdate.cls.xml
===================================================================
diff -u -r53532 -r72496
--- AXimpl/Dynamics/SalesLineStatusOut/EventHandler/SalesLineStatusUpdate.cls.xml	(.../SalesLineStatusUpdate.cls.xml)	(revision 53532)
+++ AXimpl/Dynamics/SalesLineStatusOut/EventHandler/SalesLineStatusUpdate.cls.xml	(.../SalesLineStatusUpdate.cls.xml)	(revision 72496)
@@ -109,7 +109,18 @@
 <FormalSpec>Event:TECH.Events.LadeGerecepteerdEvent</FormalSpec>
 <Private>1</Private>
 <ReturnType>AXimpl.Request</ReturnType>
-<Implementation><![CDATA[	Quit ##class(AXimpl.Request).%New("SalesLineStatus/Update",Event.Data.OrderID_"_"_Event.Data.OrderLijnCode,..#Geproduceerd)
+<Implementation><![CDATA[
+	#dim LadeGerecepteerdEventData As TECH.Events.LadeGerecepteerdEventData = Event.Data
+	#dim DnaCodeService As APPS.Halux.AAP.DnaCodeService = ##class(APPS.Halux.AAP.DnaCodeService).%New()
+	#dim DnaCodes As TECH.DynamicIterator = DnaCodeService.GeefDnaCodesViaBatchIdEnSequentienummer(LadeGerecepteerdEventData.BatchID, LadeGerecepteerdEventData.SequenceNr)
+	Set DocumentGenerator = ##class(APPS.Halux.Afmelden.impl.DocumentLadeGerecepteerdNaarObjective).%New()
+	
+	While DnaCodes.HasNext() {
+		#dim DnaCode As DOM.Halux.AAP.DnaCode = DnaCodes.Next()
+		Do DocumentGenerator.GenereerDocumentVoorObjective(DnaCode.DnaCode)
+	}
+	
+	Quit ##class(AXimpl.Request).%New("SalesLineStatus/Update", LadeGerecepteerdEventData.OrderID_"_"_ LadeGerecepteerdEventData.OrderLijnCode,..#Geproduceerd)
 ]]></Implementation>
 </Method>
 </Class>