Index: APPS/AKP/AankoopControle/BLUM/impl/INVOIC02Verwerker.cls.xml
===================================================================
diff -u -r38204 -r38210
--- APPS/AKP/AankoopControle/BLUM/impl/INVOIC02Verwerker.cls.xml	(.../INVOIC02Verwerker.cls.xml)	(revision 38204)
+++ APPS/AKP/AankoopControle/BLUM/impl/INVOIC02Verwerker.cls.xml	(.../INVOIC02Verwerker.cls.xml)	(revision 38210)
@@ -115,6 +115,7 @@
 	#Dim FaktuurLijnList as %ListOfObjects = ##class(%ListOfObjects).%New()
 	#dim index as %Integer = 1
 	#Dim lijnref as %String
+
 	for index=1:1:INVOICE02.IDOC.E1EDP01.Count(){
 		set FaktuurLijn = INVOICE02.IDOC.E1EDP01.GetAt(index)
 		set lijnref = ..GeefToeleveringInfo(FaktuurLijn)
@@ -139,7 +140,7 @@
 <FormalSpec>INVOIC02:APPS.AKP.AankoopControle.BLUM.XML.Faktuur.Invoice.INVOIC02</FormalSpec>
 <ReturnType>%Integer</ReturnType>
 <Implementation><![CDATA[
-	#Dim E1EDP01Iterator as TECH.ListIterator = ##class(TECH.ListIterator).%New(INVOIC02.IDOC.E1EDP01)
+	#Dim E1EDP01Iterator as TECH.ListIterator
 	#Dim E1EDP01 as APPS.AKP.AankoopControle.BLUM.XML.Faktuur.Invoice.E1EDP01
 	#Dim NieuweVervLijnNr as %Integer
 	#Dim BerichtBehandelen as %Integer = 1
@@ -157,6 +158,7 @@
 		do ..TransactionService.ZetZendingen(..GeefZendingNummers(INVOIC02))
 		if ..TransactionService.StartTransactie() {
 			try {
+				set E1EDP01Iterator = ##class(TECH.ListIterator).%New(INVOIC02.IDOC.E1EDP01)
 				while E1EDP01Iterator.HasNext(){ //per factuurlijn
 					set E1EDP01 = E1EDP01Iterator.Next()
 					// zoekt de factuur , maar onafhankelijk van de zending( die voor 1/1/2017 gelinkt is één factuur, daarna mogelijk meerdere)