Index: APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/KlantEtiketDataOrderAanvuller.cls.xml
===================================================================
diff -u -r32743 -r32776
--- APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/KlantEtiketDataOrderAanvuller.cls.xml	(.../KlantEtiketDataOrderAanvuller.cls.xml)	(revision 32743)
+++ APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/KlantEtiketDataOrderAanvuller.cls.xml	(.../KlantEtiketDataOrderAanvuller.cls.xml)	(revision 32776)
@@ -39,12 +39,18 @@
 	
 	#dim Toelevering As DOM.AKP.Toelevering = ..ToeleveringAPI.GeefToelevering(UitvoeringInfo.ToeleveringID)
 	#dim OrderID As TECH.String = Toelevering.GeefOrderID()
-	Set UitvoeringInfo.KlantEtiketData.OrderTitel = Vertaler.GeefVertaling("Order")
-	Set UitvoeringInfo.KlantEtiketData.OrderID = OrderID
-	Set UitvoeringInfo.KlantEtiketData.Verzendwijze = ..OrderAPI.GeefOrder(OrderID).GeefVerzendingWijze()
+	set UitvoeringInfo.KlantEtiketData.OrderTitel = Vertaler.GeefVertaling("Order")
+	set UitvoeringInfo.KlantEtiketData.OrderID = OrderID
+	set UitvoeringInfo.KlantEtiketData.Verzendwijze = ..OrderAPI.GeefOrder(OrderID).GeefVerzendingWijze()
 	
-	;Set OfferteDocumentReferentiesBepaler = ##class(APPS.VKP.impl.OfferteDocumentReferentiesBepaler).%New()
-	;Set UitvoeringInfo.KlantEtiketData.DocumentReferenties = OfferteDocumentReferentiesBepaler.GeefDocumentReferenties(..OrderAPI.GeefOrder(OrderID))
+	set OfferteDocumentReferentiesBepaler = ##class(APPS.VKP.impl.OfferteDocumentReferentiesBepaler).%New()
+	#dim DocumentReferenties As APPS.VKP.impl.OfferteDocumentReferentiesBepaler.DocumentReferentiesList = OfferteDocumentReferentiesBepaler.GeefDocumentReferenties(..OrderAPI.GeefOrder(OrderID))
+	set DocumentReferentiesIterator = ##class(TECH.ListIterator).%New(DocumentReferenties)
+	while DocumentReferentiesIterator.HasNext() {
+		set DocumentReferenties = ##class(APPS.Halux.PPS.Activiteit.impl.common.dto.KlantEtiketData.DocumentReferenties).%New()
+		do DocumentReferenties.Copy(DocumentReferentiesIterator.Next())
+		do UitvoeringInfo.KlantEtiketData.DocumentReferenties.Insert(DocumentReferenties)
+	}
 ]]></Implementation>
 </Method>
 </Class>