Index: vhTest/Mock/APPS/Halux/PPS/DocumentGenerator/PickingOnderdelen.cls.xml
===================================================================
diff -u
--- vhTest/Mock/APPS/Halux/PPS/DocumentGenerator/PickingOnderdelen.cls.xml	(revision 0)
+++ vhTest/Mock/APPS/Halux/PPS/DocumentGenerator/PickingOnderdelen.cls.xml	(revision 70541)
@@ -0,0 +1,38 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Mock.APPS.Halux.PPS.DocumentGenerator.PickingOnderdelen">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>APPS.Halux.PPS.DocumentGenerator.PickingOnderdelen,Tools.Mock.MockClassBase</Super>
+<Inheritance>right</Inheritance>
+
+<Method name="%OnNew">
+<FormalSpec>FileUtils:TECH.File.impl.FileUtils="",FileWriter:TECH.File.FileWriter="",OnderdelenPickingUitvoeringInfoRepository:APPS.Halux.PPS.Activiteit.impl.common.dto.OnderdelenPickingUitvoeringInfoRepository="",ProductAPI:DOM.PM.impl.ProductAPI=""</FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="GenereerDocumenten">
+<FormalSpec>Batch:APPS.Halux.common.Batch</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("GenereerDocumenten",Batch)
+]]></Implementation>
+</Method>
+
+<Method name="MaakBestand">
+<FormalSpec>Toelevering:DOM.AKP.Toelevering,BestandNaam:%String</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("MaakBestand",Toelevering,BestandNaam)
+]]></Implementation>
+</Method>
+
+<Method name="VerwijderDocumenten">
+<FormalSpec>BatchID:%String</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("VerwijderDocumenten",BatchID)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/Halux/AAP/BatchEventHandler.cls.xml
===================================================================
diff -u -r66766 -r70541
--- APPS/Halux/AAP/BatchEventHandler.cls.xml	(.../BatchEventHandler.cls.xml)	(revision 66766)
+++ APPS/Halux/AAP/BatchEventHandler.cls.xml	(.../BatchEventHandler.cls.xml)	(revision 70541)
@@ -15,6 +15,7 @@
 	If (BatchEvent.%IsA("APPS.Halux.common.event.BatchRemovedEvent")) {
 		Do ##class(APPS.Halux.AAP.DnaCodeService).%New().VerwijderDnaCodesVoorBatch(BatchEvent.Data.BatchID)
 		Do ##class(APPS.Halux.PPS.MatService).%New().VerwijderMattenInfo(BatchEvent.Data.BatchID)
+		Do ##class(APPS.Halux.PPS.DocumentGeneratorService).%New().VerwijderDocumenten(BatchEvent.Data.BatchID)
 	}
 ]]></Implementation>
 </Method>
Index: vhTest/Fake/APPS/Halux/PPS/DocumentGenerator/PickingOnderdelen.cls.xml
===================================================================
diff -u
--- vhTest/Fake/APPS/Halux/PPS/DocumentGenerator/PickingOnderdelen.cls.xml	(revision 0)
+++ vhTest/Fake/APPS/Halux/PPS/DocumentGenerator/PickingOnderdelen.cls.xml	(revision 70541)
@@ -0,0 +1,27 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.APPS.Halux.PPS.DocumentGenerator.PickingOnderdelen">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden, nieuwe methodes worden automatisch bijgevoegd, bestaande blijven zoals ze zijn.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>APPS.Halux.PPS.DocumentGenerator.PickingOnderdelen</Super>
+
+<Method name="GenereerDocumenten">
+<FormalSpec>Batch:APPS.Halux.common.Batch</FormalSpec>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="MaakBestand">
+<FormalSpec>Toelevering:DOM.AKP.Toelevering,BestandNaam:%String</FormalSpec>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwijderDocumenten">
+<FormalSpec>BatchID:%String</FormalSpec>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/Halux/PPS/DocumentGenerator/PickingOnderdelen.cls.xml
===================================================================
diff -u
--- APPS/Halux/PPS/DocumentGenerator/PickingOnderdelen.cls.xml	(revision 0)
+++ APPS/Halux/PPS/DocumentGenerator/PickingOnderdelen.cls.xml	(revision 70541)
@@ -0,0 +1,320 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.Halux.PPS.DocumentGenerator.PickingOnderdelen">
+<IncludeCode>Prod.Product</IncludeCode>
+<Super>TECH.Mockable</Super>
+
+<Property name="Batch">
+<Type>APPS.Halux.common.Batch</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="FileUtils">
+<Type>TECH.File.impl.FileUtils</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="FileWriter">
+<Type>TECH.File.FileWriter</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="Logger">
+<Type>vhLib.Logger</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="ProductAPI">
+<Type>DOM.PM.impl.ProductAPI</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="OnderdelenPickingUitvoeringInfoRepository">
+<Type>APPS.Halux.PPS.Activiteit.impl.common.dto.OnderdelenPickingUitvoeringInfoRepository</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>FileUtils:TECH.File.impl.FileUtils="",FileWriter:TECH.File.FileWriter="",OnderdelenPickingUitvoeringInfoRepository:APPS.Halux.PPS.Activiteit.impl.common.dto.OnderdelenPickingUitvoeringInfoRepository="",ProductAPI:DOM.PM.impl.ProductAPI=""</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..FileUtils = $$$Inject(FileUtils, ##class(TECH.File.impl.FileUtils).%New())
+	Set ..FileWriter = $$$Inject(FileWriter, ##class(TECH.Context).Instance().GeefFileAPI().GeefFileWriter())
+	Set ..OnderdelenPickingUitvoeringInfoRepository = $$$Inject(OnderdelenPickingUitvoeringInfoRepository, ##class(APPS.Halux.PPS.Activiteit.impl.common.dto.OnderdelenPickingUitvoeringInfoRepository).%New())
+	Set ..ProductAPI = $$$Inject(ProductAPI, ##class(DOM.PM.impl.ProductAPI).%New())
+	Set ..Logger = ##class(vhLib.Logger).%New("DocumentGeneratorService")
+	
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="GenereerDocumenten">
+<FormalSpec>Batch:APPS.Halux.common.Batch</FormalSpec>
+<Implementation><![CDATA[
+	Set ..Batch = Batch
+	#dim ToeleveringenIterator As TECH.Iterator = ..Batch.GeefToeleveringIterator()
+	#dim Exceptie As TECH.Exceptions.Exception
+	#dim FileException As TECH.Exceptions.FileException
+	#dim GeneralErrorException As TECH.Exceptions.FileException
+	#dim Omschrijving As %String
+	
+	If (##class(TECH.StringUtils).Equals(..Batch.GeefCategorie(), ##class(APPS.Halux.common.enu.Categorie).Legrabox(), ##class(APPS.Halux.common.enu.Categorie).TAORbox())) {
+		While ToeleveringenIterator.HasNext()
+		{
+			#dim Toelevering As DOM.AKP.Toelevering = ToeleveringenIterator.Next()
+			#dim BestandNaam As %String = ##class(TECH.Files).AppendSubPath(..GeefBestandLocatie() , "\IN\") _ Toelevering.GeefID()_".pic"
+			try {
+				If ##class(TECH.File).Exists(BestandNaam) {
+					Do ..FileUtils.Delete(BestandNaam)				
+				}
+				
+				If (..Batch.GeefCategorie() = ##class(APPS.Halux.common.enu.Categorie).Legrabox()) {
+					Do ..TriggerLBXPickingOnderdelenAansturingActiePerToelevering(Toelevering.GeefID())
+				} ElseIf (..Batch.GeefCategorie() = ##class(APPS.Halux.common.enu.Categorie).TAORbox()) {
+					Do ..TriggerTAXPickingOnderdelenAansturingActiePerToelevering(Toelevering.GeefID())
+				}
+				
+				Do ..MaakBestand(Toelevering, BestandNaam)
+				Kill ^PCDataOnderdelenPickingDocument(Toelevering.GeefID())
+			} catch {
+				Set Exceptie = ##class(TECH.ExceptionHandler).Catch()
+				Set Omschrijving = "Er is een fout gebeurd bij het genereren van picking onderdelendocument: '" _ BestandNaam _"'. Exceptie: "_ Exceptie.ToString()
+				Set GeneralErrorException = ##class(TECH.Exceptions.GeneralErrorException).%New(Omschrijving)
+				Do ##class(TECH.ExceptionHandler).Throw(GeneralErrorException)
+			}
+		}
+	}
+]]></Implementation>
+</Method>
+
+<Method name="VerwijderDocumenten">
+<FormalSpec>BatchID:%String</FormalSpec>
+<Implementation><![CDATA[
+	Set ..Batch = ##class(APPS.ApplicatieContext).Instance().GeefProductieAPI().GeefBatchService().GeefBatch(BatchID)
+	#dim ToeleveringenIterator As TECH.Iterator = ..Batch.GeefToeleveringIterator()
+	
+	If (##class(TECH.StringUtils).Equals(..Batch.GeefCategorie(), ##class(APPS.Halux.common.enu.Categorie).Legrabox(), ##class(APPS.Halux.common.enu.Categorie).TAORbox())) {
+		While ToeleveringenIterator.HasNext()
+		{
+			#dim Toelevering As DOM.AKP.Toelevering = ToeleveringenIterator.Next()
+			#dim BestandNaam As %String = ##class(TECH.Files).AppendSubPath(..GeefBestandLocatie() , "\VERWERKING\") _ Toelevering.GeefID()_".pic"
+			
+			If ##class(TECH.File).Exists(BestandNaam) {
+				try {
+					Do ..FileUtils.Delete(BestandNaam)
+				} catch {
+					#dim Exceptie As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
+					Do ..Logger.Error("Er is een fout gebeurd bij het verwijderen van bestand '" _ BestandNaam _"'. Exceptie: "_ Exceptie.ToString())
+				}
+			}				
+		}
+	}
+]]></Implementation>
+</Method>
+
+<Method name="MaakBestand">
+<FormalSpec>Toelevering:DOM.AKP.Toelevering,BestandNaam:%String</FormalSpec>
+<Implementation><![CDATA[
+	#dim BoxBarcode, PRNr, PCDataLocatie, IdentNr, OBJTIdentNr, KortTekst, HLXLocatie, PackAmount, SourceEmpty, UserField2, UserField3, UserField4, UserField5, UserField6 As %String = ""
+	#dim PickedAmount, LaatsteProductId, Aantal, AantalVerschillendeProductenZonderLocatie As %Decimal = 0
+	#dim OrderDesc As %String = ..GeefOrderDesc()
+	#dim LookupService As OBJTimpl.PM.OBJTIdentLookupService = ##class(OBJTimpl.PM.OBJTIdentLookupService).%New()
+	#dim ToeleveringID As %String = Toelevering.GeefID()	
+	#dim Product As Prod.Product
+	Set AantalVerschillendeProductenZonderLocatie = 0
+	
+	If ($Data(^PCDataOnderdelenPickingDocument(ToeleveringID))) {
+		try {
+		Do ..FileWriter.Open(BestandNaam)
+		Do ..FileWriter.WriteLine("Type"_ "|" _"OrderID"_ "|" _"BoxBarcode"_ "|" _"OrderDesc"_ "|" _"Location"_ "|" _"AskedAmount"_ "|" _"PickedAmount"_ "|" _"PackAmount"_ "|" _"SourceEmpty"_ "|" _"ProductCode"_ "|" _"ProductDescription"_ "|" _"UserField1"_ "|" _"UserField2"_ "|" _"UserField3"_ "|" _"UserField4"_ "|" _"UserField5"_ "|" _"UserField6")
+		
+		For { Set LaatsteProductId = $order(^PCDataOnderdelenPickingDocument(ToeleveringID, LaatsteProductId)) Quit:LaatsteProductId=""
+			Set IdentNr = ..ProductAPI.GeefIdentNummerVoorProductId(LaatsteProductId)
+			Set Aantal = ^PCDataOnderdelenPickingDocument(ToeleveringID, LaatsteProductId)
+			Set BoxBarcode = ToeleveringID
+			Set HLXLocatie = $$$ProductGet(LaatsteProductId, $$$ControleStatus) ; herbruik van veld voor HLX Locatie
+			Set OBJTIdentNr = LookupService.GeefOBJTIdentNr(IdentNr)
+			Set OBJTIdentNr = ##class(TECH.StringUtils).Replace(OBJTIdentNr, ".", "")
+			Set Product = ##class(Prod.Product).%OpenId(LaatsteProductId)
+			Set PCDataLocatie = ..GeefPCDataLocatie(Product)
+			Set KortTekst = Product.KortTekst
+			Set PackAmount = 0
+			Set PickedAmount = 0
+			Set SourceEmpty = ""
+			Set UserField2 = ""
+			Set UserField3 = ""
+			Set UserField4 = ""
+			Set UserField5 = ""
+			Set UserField6 = ""
+			
+			If $$$Not(PCDataLocatie = "") {
+				Do ..FileWriter.WriteLine("P" _"|"_ ToeleveringID _"|"_ BoxBarcode _"|"_ OrderDesc _"|"_ PCDataLocatie _"|"_ Aantal _"|"_ PickedAmount _"|"_ PackAmount _"|"_ SourceEmpty _"|"_ OBJTIdentNr _"|"_ KortTekst _"|"_ HLXLocatie _"|"_ UserField2 _"|"_ UserField3 _"|"_ UserField4 _"|"_UserField5 _"|"_ UserField6)
+			} Else {
+				Set AantalVerschillendeProductenZonderLocatie = AantalVerschillendeProductenZonderLocatie + 1
+			}
+		}
+		
+		If (AantalVerschillendeProductenZonderLocatie > 0) {
+			Set BoxBarcode = ToeleveringID
+			Set OBJTIdentNr = "ZONDERLOC"
+			Set KortTekst = "Zonder vaste locatie"
+			Set HLXLocatie = ""
+			Set PackAmount = 0
+			Set PickedAmount = 0
+			Set PCDataLocatie = ..GeefZonderLocatie()
+			Set Aantal = AantalVerschillendeProductenZonderLocatie
+			Set UserField2 = ""
+			Set UserField3 = ""
+			Set UserField4 = ""
+			Set UserField5 = ""
+			Set UserField6 = ""
+			Do ..FileWriter.WriteLine("P" _"|"_ ToeleveringID _"|"_ BoxBarcode _"|"_ OrderDesc _"|"_ PCDataLocatie _"|"_ Aantal _"|"_ PickedAmount _"|"_ PackAmount _"|"_ SourceEmpty _"|"_ OBJTIdentNr _"|"_ KortTekst _"|"_ HLXLocatie _"|"_ UserField2 _"|"_ UserField3 _"|"_ UserField4 _"|"_UserField5 _"|"_ UserField6)		
+		}
+		
+		Do ..FileWriter.Close()
+		} catch {
+			Do ..FileWriter.Close()
+			#dim Exceptie As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
+			Do Exceptie.Throw()
+		}
+	}
+]]></Implementation>
+</Method>
+
+<Method name="GeefPCDataLocatie">
+<FormalSpec>Product:Prod.Product</FormalSpec>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim PCDataLocatie As %String = ""
+	
+	#dim Locaties As %String = Product.CycleCountTypeWMS  ; Herbruik van veld voor PCData locatie
+	If Locaties[";"
+	{
+		Set PCDataLocatie = ""
+		#dim I As %Integer = 0
+		While $L($P(Locaties,";",$I(I)))
+		{
+			If $P($P(Locaties,";",I), ":") = ..GeefFamilie()
+			{
+				Set PCDataLocatie=$P($P(Locaties,";",I), ":", 2)
+			}
+		}
+	} Else {
+		Set PCDataLocatie = Locaties
+	}
+	
+	If PCDataLocatie'?1"A"2N1"_"3N
+
+	{
+		Set PCDataLocatie = "" ;$$GeefZonderLocatie(Familie)
+	}
+	
+	Quit PCDataLocatie
+]]></Implementation>
+</Method>
+
+<Method name="GeefOrderDesc">
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim OrderDesc As %String = ""
+	
+	If (..Batch.GeefCategorie() = ##class(APPS.Halux.common.enu.Categorie).Legrabox()) {
+		Set OrderDesc = "L " _ ..Batch.GeefLijn() _ " " _$E(..Batch.GeefID(), $L(..Batch.GeefID())-3, $L(..Batch.GeefID()))
+	} ElseIf (..Batch.GeefCategorie() = ##class(APPS.Halux.common.enu.Categorie).TAORbox()) {
+		Set OrderDesc = "TAX " _ ..Batch.GeefLijn() _ " " _$E(..Batch.GeefID(), $L(..Batch.GeefID())-3, $L(..Batch.GeefID()))
+	}
+	
+	Quit OrderDesc
+]]></Implementation>
+</Method>
+
+<Method name="GeefZonderLocatie">
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim Locatie As %String = ""
+	
+	If (..Batch.GeefCategorie() = ##class(APPS.Halux.common.enu.Categorie).Legrabox()) {
+		Set Locatie = "A04_099"
+	} ElseIf (..Batch.GeefCategorie() = ##class(APPS.Halux.common.enu.Categorie).TAORbox()) {
+		Set Locatie = "A02_099"
+	}
+	
+	Quit Locatie
+]]></Implementation>
+</Method>
+
+<Method name="GeefFamilie">
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim Familie As %String = ""
+	
+	If (..Batch.GeefCategorie() = ##class(APPS.Halux.common.enu.Categorie).Legrabox()) {
+		Set Familie = "LBX"
+	} ElseIf (..Batch.GeefCategorie() = ##class(APPS.Halux.common.enu.Categorie).TAORbox()) {
+		Set Familie = "TAX"
+	}
+	
+	Quit Familie
+]]></Implementation>
+</Method>
+
+<Method name="GeefBestandLocatie">
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim BestandLocatie As %String
+	
+	If (..Batch.GeefCategorie() = ##class(APPS.Halux.common.enu.Categorie).Legrabox()) {
+		Set BestandLocatie = ##class(TECH.Config.ConfigMgr).Instance().GetString("APPS.Halux.PPS.DocumentGeneratorService.PickingOnderdelen.LBX")
+	} ElseIf (..Batch.GeefCategorie() = ##class(APPS.Halux.common.enu.Categorie).TAORbox()) {
+		Set BestandLocatie = ##class(TECH.Config.ConfigMgr).Instance().GetString("APPS.Halux.PPS.DocumentGeneratorService.PickingOnderdelen.TAX")
+	}
+	
+	Quit BestandLocatie
+]]></Implementation>
+</Method>
+
+<Method name="TriggerLBXPickingOnderdelenAansturingActiePerToelevering">
+<FormalSpec>ToeleveringID:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Set AansturingActie = ##class(APPS.Halux.PPS.Document.impl.LBX.OnderdelenPicking).%New()
+	#dim UitvoeringInfoIterator As TECH.Iterator = ..OnderdelenPickingUitvoeringInfoRepository.ZoekViaToeleveringID(ToeleveringID)
+	Set UitvoeringInfoLijst = ##class(TECH.ListOfObjects).%New()
+	
+	While UitvoeringInfoIterator.HasNext() {
+		#dim UitvoeringInfo = UitvoeringInfoIterator.Next()
+		Do UitvoeringInfoLijst.Insert(UitvoeringInfo)
+	}
+	
+	Do AansturingActie.MaakDocumentenVoorUitvoeringInfoLijst(UitvoeringInfoLijst, ToeleveringID)
+]]></Implementation>
+</Method>
+
+<Method name="TriggerTAXPickingOnderdelenAansturingActiePerToelevering">
+<FormalSpec>ToeleveringID:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Set AansturingActie = ##class(APPS.Halux.PPS.Document.impl.TAX.OnderdelenPicking).%New()
+	#dim UitvoeringInfoIterator As TECH.Iterator = ..OnderdelenPickingUitvoeringInfoRepository.ZoekViaToeleveringID(ToeleveringID)
+	Set UitvoeringInfoLijst = ##class(TECH.ListOfObjects).%New()
+	
+	While UitvoeringInfoIterator.HasNext() {
+		#dim UitvoeringInfo = UitvoeringInfoIterator.Next()
+		Do UitvoeringInfoLijst.Insert(UitvoeringInfo)
+	}
+	
+	Do AansturingActie.MaakDocumentenVoorUitvoeringInfoLijst(UitvoeringInfoLijst, ToeleveringID)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/Halux/PPS/Document/impl/common/OnderdelenPicking.cls.xml
===================================================================
diff -u -r69473 -r70541
--- APPS/Halux/PPS/Document/impl/common/OnderdelenPicking.cls.xml	(.../OnderdelenPicking.cls.xml)	(revision 69473)
+++ APPS/Halux/PPS/Document/impl/common/OnderdelenPicking.cls.xml	(.../OnderdelenPicking.cls.xml)	(revision 70541)
@@ -86,8 +86,7 @@
 </Method>
 
 <Method name="MaakDocumentenVoorUitvoeringInfoLijst">
-<FormalSpec>UitvoeringInfoLijst:APPS.Halux.PPS.dto.UitvoeringInfoLijst</FormalSpec>
-<Private>1</Private>
+<FormalSpec>UitvoeringInfoLijst:APPS.Halux.PPS.dto.UitvoeringInfoLijst,ToeleveringIDVoorPCDataOnderdelenPickingDocument:%Integer=0</FormalSpec>
 <ReturnType>%ListOfObjects</ReturnType>
 <ReturnTypeParams>ELEMENTTYPE="APPS.common.Print.Kolommen.Document"</ReturnTypeParams>
 <Implementation><![CDATA[
@@ -101,7 +100,7 @@
 		#dim BatchProductiegroep As APPS.Halux.common.enu.ProductieGroep = ..Batch.GeefProductieGroep()
 	}
 	While GesorteerdeOnderdeelPickingsPerToelevering.HasNext() {
-		Do ..MaakDocumentEnVoegToeAanDocumenten(GesorteerdeOnderdeelPickingsPerToelevering.Next(), BatchCategorie, BatchProductiegroep)
+		Do ..MaakDocumentEnVoegToeAanDocumenten(GesorteerdeOnderdeelPickingsPerToelevering.Next(), BatchCategorie, BatchProductiegroep, ToeleveringIDVoorPCDataOnderdelenPickingDocument)
 	}
 	Quit ..Documenten
 ]]></Implementation>
@@ -169,7 +168,7 @@
 </Method>
 
 <Method name="MaakDocumentEnVoegToeAanDocumenten">
-<FormalSpec>GesorteerdeOnderdeelPickingsVoor1Toelevering:APPS.Halux.PPS.Document.impl.common.OnderdelenPicking.OnderdeelPickingBinaireKnoop,Categorie:APPS.Halux.common.enu.Categorie="",Productiegroep:APPS.Halux.common.enu.ProductieGroep=""</FormalSpec>
+<FormalSpec>GesorteerdeOnderdeelPickingsVoor1Toelevering:APPS.Halux.PPS.Document.impl.common.OnderdelenPicking.OnderdeelPickingBinaireKnoop,Categorie:APPS.Halux.common.enu.Categorie="",Productiegroep:APPS.Halux.common.enu.ProductieGroep="",ToeleveringIDVoorPCDataOnderdelenPickingDocument:%Integer=0</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	If $IsObject(GesorteerdeOnderdeelPickingsVoor1Toelevering){
@@ -203,6 +202,10 @@
 			}
 			#dim VermeldOmschrijvingEnKorttekst As %Boolean = ('$IsObject(DataVoorVorigeLijn) || IsTussenlijnNodig)
 			Do ..VoegToeItem(DataVoorLijn,VermeldOmschrijvingEnKorttekst)
+			
+			If ((ToeleveringIDVoorPCDataOnderdelenPickingDocument > 0) && (##class(TECH.StringUtils).Equals(..Batch.GeefCategorie(), ##class(APPS.Halux.common.enu.Categorie).TAORbox(), ##class(APPS.Halux.common.enu.Categorie).Legrabox()))) {
+				Do ..ZetDataVoorPCDataOnderdelenPickingDocument(DataVoorLijn, ToeleveringIDVoorPCDataOnderdelenPickingDocument)
+			}
 			Set DataVoorVorigeLijn = DataVoorLijn
 		}
 		If $IsObject(..Document){
@@ -213,6 +216,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ZetDataVoorPCDataOnderdelenPickingDocument">
+<FormalSpec>DataVoorLijn:APPS.Halux.PPS.Document.impl.common.OnderdelenPicking.OnderdeelPickingBinaireKnoop,ToeleveringIDVoorPCDataOnderdelenPickingDocument:%Integer</FormalSpec>
+<Implementation><![CDATA[	Set ^PCDataOnderdelenPickingDocument(ToeleveringIDVoorPCDataOnderdelenPickingDocument, DataVoorLijn.HFV.GeefProductID()) = DataVoorLijn.HFV.GeefAantal()
+]]></Implementation>
+</Method>
+
 <Method name="IsTussenlijnNodig">
 <FormalSpec>DataVoorVorigeLijn:APPS.Halux.PPS.Document.impl.common.OnderdelenPicking.OnderdeelPickingBinaireKnoop,DataVoorLijn:APPS.Halux.PPS.Document.impl.common.OnderdelenPicking.OnderdeelPickingBinaireKnoop</FormalSpec>
 <Private>1</Private>
Index: APPS/Halux/PPS/Document/impl/TAX/OnderdelenPicking.cls.xml
===================================================================
diff -u -r69914 -r70541
--- APPS/Halux/PPS/Document/impl/TAX/OnderdelenPicking.cls.xml	(.../OnderdelenPicking.cls.xml)	(revision 69914)
+++ APPS/Halux/PPS/Document/impl/TAX/OnderdelenPicking.cls.xml	(.../OnderdelenPicking.cls.xml)	(revision 70541)
@@ -158,11 +158,11 @@
 </Method>
 
 <Method name="MaakDocumentEnVoegToeAanDocumenten">
-<FormalSpec>Wortel:APPS.Halux.PPS.Document.impl.common.OnderdelenPicking.OnderdeelPickingBinaireKnoop,Categorie:APPS.Halux.common.enu.Categorie="",Productiegroep:APPS.Halux.common.enu.ProductieGroep=""</FormalSpec>
+<FormalSpec>Wortel:APPS.Halux.PPS.Document.impl.common.OnderdelenPicking.OnderdeelPickingBinaireKnoop,Categorie:APPS.Halux.common.enu.Categorie="",Productiegroep:APPS.Halux.common.enu.ProductieGroep="",ToeleveringIDVoorPCDataOnderdelenPickingDocument:%Integer=0</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	Set ..VakkenPerKar = ##class(%ArrayOfDataTypes).%New()
-	Do ##super(Wortel, Categorie, Productiegroep)
+	Do ##super(Wortel, Categorie, Productiegroep, ToeleveringIDVoorPCDataOnderdelenPickingDocument)
 ]]></Implementation>
 </Method>
 
Index: APPS/Halux/PPS/Activiteit/impl/common/dto/OnderdelenPickingUitvoeringInfoRepository.cls.xml
===================================================================
diff -u
--- APPS/Halux/PPS/Activiteit/impl/common/dto/OnderdelenPickingUitvoeringInfoRepository.cls.xml	(revision 0)
+++ APPS/Halux/PPS/Activiteit/impl/common/dto/OnderdelenPickingUitvoeringInfoRepository.cls.xml	(revision 70541)
@@ -0,0 +1,38 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.Halux.PPS.Activiteit.impl.common.dto.OnderdelenPickingUitvoeringInfoRepository">
+<Modified>0</Modified>
+<Super>TECH.Persistentie.impl.Repository</Super>
+
+<Parameter name="DataClassName">
+<Type>%String</Type>
+<Default>APPS.Halux.PPS.Activiteit.impl.common.dto.OnderdelenPickingUitvoeringInfo</Default>
+</Parameter>
+
+<Method name="ZoekViaToeleveringID">
+<FormalSpec>ToeleveringID:%String</FormalSpec>
+<ReturnType>TECH.Iterator</ReturnType>
+<Implementation><![CDATA[	Quit ..ZoekViaFilter("ToeleveringID = ?", $LB(ToeleveringID))
+]]></Implementation>
+</Method>
+
+<Method name="ZoekViaFilter">
+<FormalSpec>Filter:%String,Params:%List</FormalSpec>
+<Private>1</Private>
+<ReturnType>TECH.Iterator</ReturnType>
+<Implementation><![CDATA[
+	#dim SqlTableName As TECH.String = ##class(TECH.CompiledClassUtils).GetSQLTableName(..DataClassName)
+	#dim SqlStatement As TECH.String = "SELECT * FROM " _SqlTableName _" WHERE " _Filter
+
+	#dim ResultSet As TECH.ResultSet = ..QueryAPI.GetResultSet(##class(TECH.DynamicQuery).%New(SqlStatement,Params))
+	#dim Opener As TECH.Persistentie.Repository.ResultSetItemOpener = ##class(TECH.Persistentie.Repository.ResultSetItemOpener).%New($this)
+	#dim ResultSetIterator As TECH.Iterator = ##class(TECH.ResultSetIterator).%New(ResultSet)
+	#dim Result As TECH.Iterator = ##class(TECH.DynamicIterator).%New(ResultSetIterator, Opener)
+
+	quit Result
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Fake/APPS/Halux/PPS/DocumentGeneratorService.cls.xml
===================================================================
diff -u
--- vhTest/Fake/APPS/Halux/PPS/DocumentGeneratorService.cls.xml	(revision 0)
+++ vhTest/Fake/APPS/Halux/PPS/DocumentGeneratorService.cls.xml	(revision 70541)
@@ -0,0 +1,24 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.APPS.Halux.PPS.DocumentGeneratorService">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden, nieuwe methodes worden automatisch bijgevoegd, bestaande blijven zoals ze zijn.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>APPS.Halux.PPS.DocumentGeneratorService</Super>
+
+<Method name="GenereerDocumenten">
+<FormalSpec>Batch:APPS.Halux.common.Batch</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
+<Method name="VerwijderDocumenten">
+<FormalSpec>BatchID:%String</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/Halux/PPS/DocumentGeneratorService.cls.xml
===================================================================
diff -u
--- APPS/Halux/PPS/DocumentGeneratorService.cls.xml	(revision 0)
+++ APPS/Halux/PPS/DocumentGeneratorService.cls.xml	(revision 70541)
@@ -0,0 +1,57 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.Halux.PPS.DocumentGeneratorService">
+<Super>TECH.Mockable</Super>
+
+<Property name="Batch">
+<Type>APPS.Halux.common.Batch</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="Logger">
+<Type>vhLib.Logger</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="PickingOnderdelenGenerator">
+<Type>APPS.Halux.PPS.DocumentGenerator.PickingOnderdelen</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>PickingOnderdelen:APPS.Halux.PPS.DocumentGenerator.PickingOnderdelen=""</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..Logger = ##class(vhLib.Logger).%New("DocumentGeneratorService")
+	Set ..PickingOnderdelenGenerator = $$$Inject(PickingOnderdelen, ##class(APPS.Halux.PPS.DocumentGenerator.PickingOnderdelen).%New())
+	
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="GenereerDocumenten">
+<FormalSpec>Batch:APPS.Halux.common.Batch</FormalSpec>
+<Implementation><![CDATA[
+	Set ..Batch = Batch
+	
+	Do ..Logger.Info("Genereer documenten", "Genereer extra documenten voor batch '" _ Batch.GeefID() _"'.")
+	Do ..PickingOnderdelenGenerator.GenereerDocumenten(Batch)
+]]></Implementation>
+</Method>
+
+<Method name="VerwijderDocumenten">
+<FormalSpec>BatchID:%String</FormalSpec>
+<Implementation><![CDATA[
+	Set ..Batch = ##class(APPS.ApplicatieContext).Instance().GeefProductieAPI().GeefBatchService().GeefBatch(BatchID)
+	
+	Do ..Logger.Info("Verwijder documenten", "Verwijder extra documenten voor batch: '" _ BatchID _"'.")
+	Do ..PickingOnderdelenGenerator.VerwijderDocumenten(BatchID)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/Halux/Planning/impl/BatchStarter.cls.xml
===================================================================
diff -u -r66764 -r70541
--- APPS/Halux/Planning/impl/BatchStarter.cls.xml	(.../BatchStarter.cls.xml)	(revision 66764)
+++ APPS/Halux/Planning/impl/BatchStarter.cls.xml	(.../BatchStarter.cls.xml)	(revision 70541)
@@ -33,8 +33,13 @@
 <Private>1</Private>
 </Property>
 
+<Property name="DocumentGeneratorService">
+<Type>APPS.Halux.PPS.DocumentGeneratorService</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>BatchBewaarder:APPS.Halux.Planning.BatchBewaarder,BatchSequentieService:APPS.Halux.common.impl.SequentieService,BatchSequentieVerwijderaar:APPS.Halux.Planning.impl.BatchSequentieVerwijderaar,Logger:vhLib.Logger,DnaCodeService:APPS.Halux.AAP.DnaCodeService,MatService:APPS.Halux.PPS.MatService</FormalSpec>
+<FormalSpec>BatchBewaarder:APPS.Halux.Planning.BatchBewaarder,BatchSequentieService:APPS.Halux.common.impl.SequentieService,BatchSequentieVerwijderaar:APPS.Halux.Planning.impl.BatchSequentieVerwijderaar,Logger:vhLib.Logger,DnaCodeService:APPS.Halux.AAP.DnaCodeService,MatService:APPS.Halux.PPS.MatService,DocumentGeneratorService:APPS.Halux.PPS.DocumentGeneratorService</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -46,6 +51,7 @@
 	Set ..Logger = $$$Inject(Logger, ##class(vhLib.Logger).%New())
 	Set ..DnaCodeService =  $$$Inject(DnaCodeService,##class(APPS.Halux.PPS.Activiteit.impl.TBX.KlantEtiketIoCContainer).Instance().Resolve("DnaCodeService"))
 	Set ..MatService = $$$Inject(MatService, ##class(APPS.Halux.PPS.MatService).%New())
+	Set ..DocumentGeneratorService = $$$Inject(DocumentGeneratorService, ##class(APPS.Halux.PPS.DocumentGeneratorService).%New())
 
 	Quit $$$OK
 ]]></Implementation>
@@ -74,6 +80,7 @@
 		Do ..DnaCodeService.BewaarDnaCodes(..DnaCodeService.MaakDnaCodesVoorBatch(Batch))
 		Do ..BatchSequentieService.GenereerSequentie(Batch)
 		Do ..MatService.BewaarMattenInfo(Batch)
+		Do ..DocumentGeneratorService.GenereerDocumenten(Batch)
 		Do Batch.ZetStatus(##class(APPS.Halux.common.enu.BatchStatus).Gestart())
 		Do ..BatchBewaarder.BewaarBatch(Batch)
 		Do ##class(APPS.Halux.common.event.BatchEventRaiser).RaiseBatchGeslotenEvent(Batch.GeefID())
@@ -84,6 +91,7 @@
 		Do ..BatchSequentieVerwijderaar.VerwijderBatchSequentie(Batch)
 		Do ..DnaCodeService.VerwijderDnaCodesVoorBatch(Batch)
 		Do ..MatService.VerwijderMattenInfo(Batch.GeefID())
+		Do ..DocumentGeneratorService.VerwijderDocumenten(Batch.GeefID())
 		Do ..Logger.Error("StartBatch", "Starten van batch ("_Batch.GeefID()_") is mislukt."_$$$CRLF_$$$CRLF_"Exception:"_$$$CRLF_Exception.ToString())
 		Do ##class(TECH.ExceptionHandler).Throw(Exception)
 	}
Index: vhTest/Mock/APPS/Halux/PPS/DocumentGeneratorService.cls.xml
===================================================================
diff -u
--- vhTest/Mock/APPS/Halux/PPS/DocumentGeneratorService.cls.xml	(revision 0)
+++ vhTest/Mock/APPS/Halux/PPS/DocumentGeneratorService.cls.xml	(revision 70541)
@@ -0,0 +1,32 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Mock.APPS.Halux.PPS.DocumentGeneratorService">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>APPS.Halux.PPS.DocumentGeneratorService,Tools.Mock.MockClassBase</Super>
+<Inheritance>right</Inheritance>
+
+<Method name="%OnNew">
+<FormalSpec>PickingOnderdelen:APPS.Halux.PPS.DocumentGenerator.PickingOnderdelen=""</FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="GenereerDocumenten">
+<FormalSpec>Batch:APPS.Halux.common.Batch</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("GenereerDocumenten",Batch)
+]]></Implementation>
+</Method>
+
+<Method name="VerwijderDocumenten">
+<FormalSpec>BatchID:%String</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("VerwijderDocumenten",BatchID)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>