Index: APPS/AKP/AankoopControle/BLUM/impl/ToeleveringInfoVerzamelaar.cls.xml
===================================================================
diff -u -r38003 -r38064
--- APPS/AKP/AankoopControle/BLUM/impl/ToeleveringInfoVerzamelaar.cls.xml	(.../ToeleveringInfoVerzamelaar.cls.xml)	(revision 38003)
+++ APPS/AKP/AankoopControle/BLUM/impl/ToeleveringInfoVerzamelaar.cls.xml	(.../ToeleveringInfoVerzamelaar.cls.xml)	(revision 38064)
@@ -27,36 +27,44 @@
 </Method>
 
 <Method name="ZetVHProduktInfo">
-<FormalSpec>CSBSO31:APPS.AKP.AankoopControle.BLUM.TXT.TransportEnFaktuur.CSBS031,CSBSO41:APPS.AKP.AankoopControle.BLUM.TXT.TransportEnFaktuur.CSBS041,ToeleveringNr:%String,ToeleveringLijnNr:%String</FormalSpec>
+<FormalSpec>CSBSO31:APPS.AKP.AankoopControle.BLUM.TXT.TransportEnFaktuur.CSBS031,CSBSO41:APPS.AKP.AankoopControle.BLUM.TXT.TransportEnFaktuur.CSBS041,ToeleveringNr:%String,ToeleveringLijnNr:%String,ProductNr:%String</FormalSpec>
 <Implementation><![CDATA[
 	if ..ToeleveringAPI.BestaatToelevering(ToeleveringNr){		
 		#Dim Toelevering As DOM.AKP.Toelevering = ..ToeleveringAPI.GeefToelevering(ToeleveringNr)	
 		#Dim ToeleveringLijnID As %Integer = ToeleveringLijnNr * 100
 		#Dim count as %Integer
-		
+
+		set CSBSO41.KundeStamNummer = Toelevering.GeefKlantNummerBijLeverancier()
+
 		;het kan een gesplitste lijn zijn
 		for count=0:1:9 {
 			set ToeleveringLijnID = ToeleveringLijnNr * 100 + count
 			quit:Toelevering.BestaatToeleveringLijn(ToeleveringLijnID)
 		}		
-		
+		//haa linfo van toelevering, blum kan iets anders leveren dan we verwachten (vervang product)
 		if Toelevering.BestaatToeleveringLijn(ToeleveringLijnID){
 			#Dim ToeleveringLijn As DOM.AKP.impl.DataM.DataMProductToeleveringLijn = Toelevering.GeefToeleveringLijn(ToeleveringLijnID)	
 			set CSBSO41.ProductNrCustomer = ToeleveringLijn.GeefProductID()
-			#Dim Product as DOM.PM.Product = ..BlumProductAPI.GeefProduct(CSBSO41.ProductNrCustomer)
-			;is de prijs die we verwachten -> dummy factuur, prijs die blum gaat rekenen zit niet in despatch bericht.
-			set CSBSO41.Value = CSBSO41.QuantityInvoiced * ..GeefVHProductPrijs(CSBSO41.ProductNrCustomer)
-			set CSBSO41.KundeStamNummer = Toelevering.GeefKlantNummerBijLeverancier()
 		} else {
 			#Dim Error As %String = ""
 			if ToeleveringLijnNr = "" {
 				set Error = "Geen lijnnr gespecifieerd voor lijn van toelevering " _ ToeleveringNr _" in xml bestand"
+				set Exception = ##class(TECH.Exceptions.GeneralErrorException).%New(Error)
+				do ##class(TECH.ExceptionHandler).Throw(Exception)	
+
 			} else {
-				set Error = "Lijn " _ ToeleveringLijnNr _ " van toelevering " _ ToeleveringNr _ " gespecifieerd in xml bestand niet gevonden in Admin"
+				// de lijn zit niet meer in KTO : Blum levert te veel of wij hebben de toelevering niet opgesplitst en er is al een deel gerecepteerd en ingeboekt.
+				// daar door is de lijn uit KTO en moeten we product gegevens op andere manier ophalen dan uit KTO.
+				// we gaan er vanuit da Blum hetzelfde product levert als we gevraagd hebben : productnr zit mee in xml bericht.
+				set CSBSO41.ProductNrCustomer = ProductNr
+				//TODO : mail nog te sturen
+				set Error = "Lijn " _ ToeleveringLijnNr _ " van toelevering " _ ToeleveringNr _ " gespecifieerd in xml bestand niet gevonden in Admin"				
 			}
-			set Exception = ##class(TECH.Exceptions.GeneralErrorException).%New(Error)
-			do ##class(TECH.ExceptionHandler).Throw(Exception)	
 		}		
+		#Dim Product as DOM.PM.Product = ..BlumProductAPI.GeefProduct(CSBSO41.ProductNrCustomer)
+		;is de prijs die we verwachten -> dummy factuur, prijs die blum gaat rekenen zit niet in despatch bericht.
+		set CSBSO41.Value = CSBSO41.QuantityInvoiced * ..GeefVHProductPrijs(CSBSO41.ProductNrCustomer)
+
 	} else {		
 		if (ToeleveringLijnNr=""){ ;manual order
 			set CSBSO41.KundeStamNummer = CSBSO31.InvoicingCustomerNr ;geen toelevering om kundestamnummer op te halen, we gebruiken de shipto
Index: APPS/AKP/AankoopControle/BLUM/impl/DespatchNaarCSBSOConverteerder.cls.xml
===================================================================
diff -u -r37600 -r38064
--- APPS/AKP/AankoopControle/BLUM/impl/DespatchNaarCSBSOConverteerder.cls.xml	(.../DespatchNaarCSBSOConverteerder.cls.xml)	(revision 37600)
+++ APPS/AKP/AankoopControle/BLUM/impl/DespatchNaarCSBSOConverteerder.cls.xml	(.../DespatchNaarCSBSOConverteerder.cls.xml)	(revision 38064)
@@ -138,7 +138,7 @@
 			
 			set CSBSO31.CSBSO41Array.GetAt(arraysleutel).QuantityInvoiced = + CSBSO31.CSBSO41Array.GetAt(arraysleutel).QuantityInvoiced + E1EDL44.VEMNG
 			set CSBSO31.CSBSO41Array.GetAt(arraysleutel).QuantityShipped = CSBSO31.CSBSO41Array.GetAt(arraysleutel).QuantityInvoiced 			
-			do ..ToeleveringInfoVerzamelaar.ZetVHProduktInfo(CSBSO31,CSBSO41,E1EDL44.VBELN, E1EDL44.POSNR)			
+			do ..ToeleveringInfoVerzamelaar.ZetVHProduktInfo(CSBSO31,CSBSO41,E1EDL44.VBELN, E1EDL44.POSNR,E1EDL44.MATNR)			
 			
 			set CSBSO31.NetValue = CSBSO31.NetValue + CSBSO31.CSBSO41Array.GetAt(arraysleutel).Value
 
Index: vhTest/Mock/APPS/AKP/AankoopControle/BLUM/impl/ToeleveringInfoVerzamelaar.cls.xml
===================================================================
diff -u -r38003 -r38064
--- vhTest/Mock/APPS/AKP/AankoopControle/BLUM/impl/ToeleveringInfoVerzamelaar.cls.xml	(.../ToeleveringInfoVerzamelaar.cls.xml)	(revision 38003)
+++ vhTest/Mock/APPS/AKP/AankoopControle/BLUM/impl/ToeleveringInfoVerzamelaar.cls.xml	(.../ToeleveringInfoVerzamelaar.cls.xml)	(revision 38064)
@@ -16,8 +16,8 @@
 </Method>
 
 <Method name="ZetVHProduktInfo">
-<FormalSpec>CSBSO31:APPS.AKP.AankoopControle.BLUM.TXT.TransportEnFaktuur.CSBS031,CSBSO41:APPS.AKP.AankoopControle.BLUM.TXT.TransportEnFaktuur.CSBS041,ToeleveringNr:%String,ToeleveringLijnNr:%String</FormalSpec>
-<Implementation><![CDATA[	do ..VerwerkMethodCall("ZetVHProduktInfo",CSBSO31,CSBSO41,ToeleveringNr,ToeleveringLijnNr)
+<FormalSpec>CSBSO31:APPS.AKP.AankoopControle.BLUM.TXT.TransportEnFaktuur.CSBS031,CSBSO41:APPS.AKP.AankoopControle.BLUM.TXT.TransportEnFaktuur.CSBS041,ToeleveringNr:%String,ToeleveringLijnNr:%String,ProductNr:%String</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("ZetVHProduktInfo",CSBSO31,CSBSO41,ToeleveringNr,ToeleveringLijnNr,ProductNr)
 ]]></Implementation>
 </Method>
 </Class>