Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator.cls.xml
===================================================================
diff -u -r74390 -r74402
--- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator.cls.xml	(.../HoofdDataGenerator.cls.xml)	(revision 74390)
+++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator.cls.xml	(.../HoofdDataGenerator.cls.xml)	(revision 74402)
@@ -167,7 +167,7 @@
 	Set TekstVelden.MultipersonalityKlant2 = ..GeefWaardeOfNull(..GeefTweedeMultipersonality(OorsprongKettingLijst))
 	
 	#dim KlantInstellingen As DOM.Halux.AAP.Klantinstellingen
-	#dim KlantInstellingenIterator = ..KlantinstellingenRepository.ZoekViaKlantId()
+	#dim KlantInstellingenIterator = ..KlantinstellingenRepository.ZoekViaKlantId(Toelevering.GeefKlantID())
 	
 	Set TekstVelden.GebruikHalvePaletten = "false"
 	Set TekstVelden.IsExport = "false"