Index: vhTest/Fake/APPS/AKP/AankoopControle/BLUM/impl/INVOIC02Verwerker.cls.xml
===================================================================
diff -u -r37879 -r38204
--- vhTest/Fake/APPS/AKP/AankoopControle/BLUM/impl/INVOIC02Verwerker.cls.xml	(.../INVOIC02Verwerker.cls.xml)	(revision 37879)
+++ vhTest/Fake/APPS/AKP/AankoopControle/BLUM/impl/INVOIC02Verwerker.cls.xml	(.../INVOIC02Verwerker.cls.xml)	(revision 38204)
@@ -56,6 +56,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="MassageINVOIC02">
+<FormalSpec>INVOICE02:APPS.AKP.AankoopControle.BLUM.XML.Faktuur.Invoice.INVOIC02</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
 <Method name="UpdateBlumFaktuur">
 <FormalSpec>BlumFaktuur:Blum.Facturen,INVOIC02:APPS.AKP.AankoopControle.BLUM.XML.Faktuur.Invoice.INVOIC02,E1EDP01:APPS.AKP.AankoopControle.BLUM.XML.Faktuur.Invoice.E1EDP01</FormalSpec>
 <Implementation><![CDATA[
Index: vhTest/Mock/APPS/AKP/AankoopControle/BLUM/impl/INVOIC02Verwerker.cls.xml
===================================================================
diff -u -r37879 -r38204
--- vhTest/Mock/APPS/AKP/AankoopControle/BLUM/impl/INVOIC02Verwerker.cls.xml	(.../INVOIC02Verwerker.cls.xml)	(revision 37879)
+++ vhTest/Mock/APPS/AKP/AankoopControle/BLUM/impl/INVOIC02Verwerker.cls.xml	(.../INVOIC02Verwerker.cls.xml)	(revision 38204)
@@ -78,6 +78,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="MassageINVOIC02">
+<FormalSpec>INVOICE02:APPS.AKP.AankoopControle.BLUM.XML.Faktuur.Invoice.INVOIC02</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("MassageINVOIC02",INVOICE02)
+]]></Implementation>
+</Method>
+
 <Method name="UpdateBlumFaktuur">
 <FormalSpec>BlumFaktuur:Blum.Facturen,INVOIC02:APPS.AKP.AankoopControle.BLUM.XML.Faktuur.Invoice.INVOIC02,E1EDP01:APPS.AKP.AankoopControle.BLUM.XML.Faktuur.Invoice.E1EDP01</FormalSpec>
 <Implementation><![CDATA[	do ..VerwerkMethodCall("UpdateBlumFaktuur",BlumFaktuur,INVOIC02,E1EDP01)
Index: APPS/AKP/AankoopControle/BLUM/impl/INVOIC02Verwerker.cls.xml
===================================================================
diff -u -r37963 -r38204
--- APPS/AKP/AankoopControle/BLUM/impl/INVOIC02Verwerker.cls.xml	(.../INVOIC02Verwerker.cls.xml)	(revision 37963)
+++ APPS/AKP/AankoopControle/BLUM/impl/INVOIC02Verwerker.cls.xml	(.../INVOIC02Verwerker.cls.xml)	(revision 38204)
@@ -106,6 +106,35 @@
 ]]></Implementation>
 </Method>
 
+<Method name="MassageINVOIC02">
+<FormalSpec>INVOICE02:APPS.AKP.AankoopControle.BLUM.XML.Faktuur.Invoice.INVOIC02</FormalSpec>
+<Implementation><![CDATA[
+	#Dim ToeleveringLijnArray as %ArrayOfDataTypes = ##class(%ArrayOfDataTypes).%New()
+	#Dim FaktuurLijn as APPS.AKP.AankoopControle.BLUM.XML.Faktuur.Invoice.E1EDP01
+	#Dim UniekeFaktuurLijn as APPS.AKP.AankoopControle.BLUM.XML.Faktuur.Invoice.E1EDP01
+	#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)
+ 		if $$$Not(ToeleveringLijnArray.GetAt(lijnref)){
+ 			do ToeleveringLijnArray.SetAt( index, lijnref )			
+ 		} else {
+ 			set UniekeFaktuurLijn = INVOICE02.IDOC.E1EDP01.GetAt(ToeleveringLijnArray.GetAt(lijnref))
+ 			set UniekeFaktuurLijn.MENGE = UniekeFaktuurLijn.MENGE + FaktuurLijn.MENGE
+ 			do ..ZetFaktuurLijnBedrag(UniekeFaktuurLijn,..GeefFaktuurLijnBedrag(UniekeFaktuurLijn) + ..GeefFaktuurLijnBedrag(FaktuurLijn))			
+ 		}
+	}
+	set lijnref = ToeleveringLijnArray.Next("")
+	while $$$Not(lijnref="") {
+		Do FaktuurLijnList.Insert(INVOICE02.IDOC.E1EDP01.GetAt(ToeleveringLijnArray.GetAt(lijnref)))
+		set lijnref = ToeleveringLijnArray.Next(lijnref)
+	}
+	set INVOICE02.IDOC.E1EDP01 = FaktuurLijnList
+]]></Implementation>
+</Method>
+
 <Method name="Verwerk">
 <FormalSpec>INVOIC02:APPS.AKP.AankoopControle.BLUM.XML.Faktuur.Invoice.INVOIC02</FormalSpec>
 <ReturnType>%Integer</ReturnType>
@@ -120,9 +149,10 @@
 	#Dim VHPrijs as %Numeric
 	#Dim PrijsVerschil as %Numeric
 	
-	if $$$Not(..MagBerichtVerwerktWorden(INVOIC02)) {
+	if $$$Not(..MagBerichtVerwerktWorden(INVOIC02)) {		
 		quit 0
 	} else {
+		do ..MassageINVOIC02(INVOIC02)
 		; start van de transactie + locken van betrokken zendingen in Verv en RCP
 		do ..TransactionService.ZetZendingen(..GeefZendingNummers(INVOIC02))
 		if ..TransactionService.StartTransactie() {
@@ -295,6 +325,20 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ZetFaktuurLijnBedrag">
+<FormalSpec>E1EDP01:APPS.AKP.AankoopControle.BLUM.XML.Faktuur.Invoice.E1EDP01,Bedrag:%Numeric</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Numeric</ReturnType>
+<Implementation><![CDATA[
+	#Dim E1EDP26Iterator as TECH.Iterator = ##class(TECH.ListIterator).%New(E1EDP01.E1EDP26)
+	#Dim E1EDP26 as APPS.AKP.AankoopControle.BLUM.XML.Faktuur.Invoice.E1EDP26
+	while E1EDP26Iterator.HasNext(){
+		set E1EDP26 = E1EDP26Iterator.Next()
+		set:E1EDP26.QUALF="003" E1EDP26.BETRG=Bedrag
+	}
+]]></Implementation>
+</Method>
+
 <Method name="GeefToeleveringInfo">
 <FormalSpec>E1EDP01:APPS.AKP.AankoopControle.BLUM.XML.Faktuur.Invoice.E1EDP01</FormalSpec>
 <Private>1</Private>
Index: vhUnitTest/APPS/AKP/AankoopControle/BLUM/impl/INVOIC02Verwerker/Test.cls.xml
===================================================================
diff -u -r37963 -r38204
--- vhUnitTest/APPS/AKP/AankoopControle/BLUM/impl/INVOIC02Verwerker/Test.cls.xml	(.../Test.cls.xml)	(revision 37963)
+++ vhUnitTest/APPS/AKP/AankoopControle/BLUM/impl/INVOIC02Verwerker/Test.cls.xml	(.../Test.cls.xml)	(revision 38204)
@@ -3,6 +3,28 @@
 <Class name="vhUnitTest.APPS.AKP.AankoopControle.BLUM.impl.INVOIC02Verwerker.Test">
 <Super>vhUnitTest.TestCase</Super>
 
+<Method name="Test : MassageINVOIC02 voegt meerdere factuurlijnen voor een zelfde Toeleveringlijn samen">
+<Implementation><![CDATA[
+	#dim INVOIC02Verwerker as APPS.AKP.AankoopControle.BLUM.impl.INVOIC02Verwerker = ##class(APPS.AKP.AankoopControle.BLUM.impl.INVOIC02Verwerker).%New()
+	#dim INVOIC02Double as APPS.AKP.AankoopControle.BLUM.XML.Faktuur.Invoice.INVOIC02 = ##class(vhTest.Utils.APPS.AKP.AankoopControle.BLUM.XML.Faktuur.Invoice.INVOICE02).%New().GeefINVOICE02()
+
+	;lijntje extra dat moet blijven zoals het is.
+	Do INVOIC02Double.IDOC.E1EDP01.Insert(INVOIC02Double.IDOC.E1EDP01.GetAt(2).%ConstructClone(1))	
+	Do ..ZetToeleveringInfo(INVOIC02Double.IDOC.E1EDP01.GetAt(3), $Piece(INVOIC02Double.IDOC.E1EDP01.GetAt(2).E1EDP02.GetAt(3).BELNR,".",1) _ ".66" )
+
+	;maak dat lijn 1 en 2 samegenvoegd zullen worden
+	set INVOIC02Double.IDOC.E1EDP01.GetAt(2).E1EDP02.GetAt(3).BELNR = INVOIC02Double.IDOC.E1EDP01.GetAt(1).E1EDP02.GetAt(3).BELNR
+
+	#dim nieuwehoeveelheid as %Integer = INVOIC02Double.IDOC.E1EDP01.GetAt(1).MENGE + INVOIC02Double.IDOC.E1EDP01.GetAt(2).MENGE
+	#dim nieuwewaarde as %Numeric = INVOIC02Double.IDOC.E1EDP01.GetAt(1).E1EDP26.GetAt(1).BETRG + INVOIC02Double.IDOC.E1EDP01.GetAt(2).E1EDP26.GetAt(1).BETRG
+	do INVOIC02Verwerker.MassageINVOIC02(INVOIC02Double)
+	
+	do $$$AssertEquals(INVOIC02Double.IDOC.E1EDP01.Count(),2)
+	do $$$AssertEquals(INVOIC02Double.IDOC.E1EDP01.GetAt(1).MENGE ,nieuwehoeveelheid)
+	do $$$AssertEquals(INVOIC02Double.IDOC.E1EDP01.GetAt(1).E1EDP26.GetAt(1).BETRG ,nieuwewaarde)
+]]></Implementation>
+</Method>
+
 <Method name="Test : INVOIC02Verwerker haalt de juiste info uit INVOICE02">
 <Implementation><![CDATA[
 	#dim INVOIC02Verwerker as APPS.AKP.AankoopControle.BLUM.impl.INVOIC02Verwerker = ##class(APPS.AKP.AankoopControle.BLUM.impl.INVOIC02Verwerker).%New()
@@ -247,50 +269,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test INVOIC02Verwerker Verwerk start tx,throwt een exceptie als een toeleveringlijn 2 maal op een faktuur staat en doet rollback">
-<Implementation><![CDATA[
-	#dim ReceptieServiceMock as vhTest.Mock.APPS.AKP.Receptie.impl.ReceptieService = ##class(vhTest.Mock.APPS.AKP.Receptie.impl.ReceptieService).%New()
-	#dim ZendingServiceMock as vhTest.Mock.APPS.AKP.Zending.ZendingService = ##class(vhTest.Mock.APPS.AKP.Zending.ZendingService).%New(ReceptieServiceMock)
-	#dim BlumFacturenRepoMock as vhTest.Mock.Blum.FacturenRepository = ##class(vhTest.Mock.Blum.FacturenRepository).%New()
-	#dim PrijsVerschilMailerMock as vhTest.Mock.APPS.AKP.AankoopControle.BLUM.impl.PrijsVerschillenMailer = ##class(vhTest.Mock.APPS.AKP.AankoopControle.BLUM.impl.PrijsVerschillenMailer).%New()	
-	#dim TransactionServiceMock as vhTest.Mock.APPS.AKP.AankoopControle.BLUM.impl.INVOIC02TransactionService = ##class(vhTest.Mock.APPS.AKP.AankoopControle.BLUM.impl.INVOIC02TransactionService).%New()
-	#dim BlumFactuurDummy as Blum.Facturen = ##class(Blum.Facturen).%New()
-	#dim INVOIC02 as APPS.AKP.AankoopControle.BLUM.XML.Faktuur.Invoice.INVOIC02 = ##class(vhTest.Utils.APPS.AKP.AankoopControle.BLUM.XML.Faktuur.Invoice.INVOICE02).%New().GeefINVOICE02MetDubbel()
-	#dim INVOIC02Verwerker as APPS.AKP.AankoopControle.BLUM.impl.INVOIC02Verwerker = ##class(APPS.AKP.AankoopControle.BLUM.impl.INVOIC02Verwerker).%New(ZendingServiceMock,BlumFacturenRepoMock,PrijsVerschilMailerMock,TransactionServiceMock)
-	;Blum.Facturen
-	do BlumFacturenRepoMock.IndienMethodCall("BestaatFactuurViaLeverancierEnFactuurNummer",5005,"857382").DanReturn(0)
-	do BlumFacturenRepoMock.IndienMethodCall("Maak").DanReturn(BlumFactuurDummy)
-	do BlumFacturenRepoMock.IndienMethodCall("Bewaar", BlumFactuurDummy).DanDoeNiks()
-
-	;^Verv Zending
-	do ZendingServiceMock.IndienMethodCall("BestaatZending","5005","297851").DanReturn(1)
-	do ZendingServiceMock.IndienMethodCall("GeefReceptieNummerZending","5005","297851").DanReturn("iets")
-	;^Verv faktuur
-	do ZendingServiceMock.IndienMethodCall("MaakZendingFaktuur","5005","297851","857382",BlumFactuurDummy).DanReturn(BlumFactuurDummy)
-	
-	;1e lijn verplaatsen,Geen prijsVerschil op lijn
-	do ZendingServiceMock.IndienMethodCall("VerplaatsDummyFaktuurLijn","5005","297851","857382","202267.01","05430289",192).DanReturn(1)	
-	do ZendingServiceMock.IndienMethodCall("GeefFaktuurLijnWaarde","5005","297851","857382",1).DanReturn(553.44) ;
-	do ZendingServiceMock.IndienMethodCall("GeefFaktuurLijnGefaktureerdAantal","5005","297851","857382",1).DanReturn(192)
-	do ZendingServiceMock.IndienMethodCall("HerrekenDummyFaktuur","5005","297851").DanDoeNiks()
-	
-	;2de lijn verplaatsen,reeds op andere faktuur 
-	do ZendingServiceMock.IndienMethodCall("VerplaatsDummyFaktuurLijn","5005","297851","857382","202267.03","05417931",192).DanReturn(0)
-	do ZendingServiceMock.IndienMethodCall("GeefBlumFaktuurNrVanVervFaktuurLijnVoorProductAantal","5005","297851","202267.03","05417931",192).DanReturn("857382")
-
-	do TransactionServiceMock.IndienMethodCall("ZetZendingen",$$$ElkeWaarde).DanDoeNiks()
-	do TransactionServiceMock.VerwachtMethodCall("StartTransactie",).DanReturn(1)
-	do TransactionServiceMock.VerwachtMethodCall("RollBackTransactie").DanDoeNiks()
-
-	#dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("192stuks van Identnr 05417931 van toelevering 202267.03 zijn reeds gefaktureerd op blumfaktuurnummer 857382 voor zending 297851")
-	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New(##class(TECH.Exceptions.GeneralErrorException).%ClassName(1),Substrings))
-
-	do INVOIC02Verwerker.Verwerk(INVOIC02)
-	
-	do TransactionServiceMock.Verifieer()
-]]></Implementation>
-</Method>
-
 <Method name="Test INVOIC02Verwerker Verwerk geeft 0 terug indien de levering niet in ^Verv bestaat">
 <Implementation><![CDATA[
 	#dim ReceptieServiceMock as vhTest.Mock.APPS.AKP.Receptie.impl.ReceptieService = ##class(vhTest.Mock.APPS.AKP.Receptie.impl.ReceptieService).%New()
@@ -312,6 +290,19 @@
 	do ZendingServiceMock.Verifieer()
 ]]></Implementation>
 </Method>
+
+<Method name="ZetToeleveringInfo">
+<FormalSpec>E1EDP01:APPS.AKP.AankoopControle.BLUM.XML.Faktuur.Invoice.E1EDP01,ToeleveringInfo:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#Dim E1EDP02Iterator as TECH.Iterator = ##class(TECH.ListIterator).%New(E1EDP01.E1EDP02)
+	#Dim E1EDP02 as APPS.AKP.AankoopControle.BLUM.XML.Faktuur.Invoice.E1EDP02
+	while E1EDP02Iterator.HasNext(){
+		set E1EDP02 = E1EDP02Iterator.Next()
+		set:E1EDP02.QUALF="ZON" E1EDP02.BELNR=ToeleveringInfo 
+	}
+]]></Implementation>
+</Method>
 </Class>