Index: vhUnitTest/APPS/AKP/AankoopControle/BLUM/impl/DespatchNaarCSBSOConverteerder/Converteer/Base.cls.xml
===================================================================
diff -u
--- vhUnitTest/APPS/AKP/AankoopControle/BLUM/impl/DespatchNaarCSBSOConverteerder/Converteer/Base.cls.xml	(revision 0)
+++ vhUnitTest/APPS/AKP/AankoopControle/BLUM/impl/DespatchNaarCSBSOConverteerder/Converteer/Base.cls.xml	(revision 37660)
@@ -0,0 +1,37 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.APPS.AKP.AankoopControle.BLUM.impl.DespatchNaarCSBSOConverteerder.Converteer.Base">
+<Abstract>1</Abstract>
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="OnBeforeAllTests">
+<Implementation><![CDATA[
+	do ##super()
+	do ..Setup()
+]]></Implementation>
+</Method>
+
+<Method name="OnAfterAllTests">
+<Implementation><![CDATA[
+	do ##class(vhUnitTest.DataHelper).VerwijderToelevering(240024)
+	do ##class(vhTest.Utils.DOM.PM.Product).VerwijderProducten(1000,1023)
+	do ##super()
+]]></Implementation>
+</Method>
+
+<Method name="Setup">
+<Private>1</Private>
+<Implementation><![CDATA[
+	do ##class(vhTest.Utils.DOM.PM.Product).CreeerProducten(1000,1023)
+	do ##class(vhUnitTest.DataHelper).VerwijderToelevering(240024)
+	
+	set ^KTO(5005,240024,1)="\29.04.13\AB 817.873/STOCK\\\6332\\9365\\\\\\\\\\EUR\62969,61200\\\2\\\\"
+	set ^KTO(5005,240024,101)="\784192\240\\\1030.9\47.1550#0\\1307.47\1307.47\\L\8\4000\800\2474.16\KTRPL\\\\H\EUR\\\16/45\\\\\\\\\\\"
+	
+	do ##class(vhUnitTest.DataHelper).MaakToeleveringCompleet(5005,240024)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhUnitTest/APPS/AKP/AankoopControle/BLUM/impl/DespatchNaarCSBSOConverteerder/Converteer/TestMultiPallet.cls.xml
===================================================================
diff -u -r37598 -r37660
--- vhUnitTest/APPS/AKP/AankoopControle/BLUM/impl/DespatchNaarCSBSOConverteerder/Converteer/TestMultiPallet.cls.xml	(.../TestMultiPallet.cls.xml)	(revision 37598)
+++ vhUnitTest/APPS/AKP/AankoopControle/BLUM/impl/DespatchNaarCSBSOConverteerder/Converteer/TestMultiPallet.cls.xml	(.../TestMultiPallet.cls.xml)	(revision 37660)
@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="vhUnitTest.APPS.AKP.AankoopControle.BLUM.impl.DespatchNaarCSBSOConverteerder.Converteer.TestMultiPallet">
-<Super>vhUnitTest.TestCase</Super>
+<Super>vhUnitTest.APPS.AKP.AankoopControle.BLUM.impl.DespatchNaarCSBSOConverteerder.Converteer.Base</Super>
 
 <Method name="Test">
 <Implementation><![CDATA[
Index: DOM/PM/impl/BlumProductAPI.cls.xml
===================================================================
diff -u -r29059 -r37660
--- DOM/PM/impl/BlumProductAPI.cls.xml	(.../BlumProductAPI.cls.xml)	(revision 29059)
+++ DOM/PM/impl/BlumProductAPI.cls.xml	(.../BlumProductAPI.cls.xml)	(revision 37660)
@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="DOM.PM.impl.BlumProductAPI">
-<Super>TECH.RegisteredObject,DOM.PM.BlumProductAPI</Super>
+<Super>DOM.PM.impl.ProductAPI,DOM.PM.BlumProductAPI</Super>
 
 <Method name="GeefBlumKlantID">
 <FormalSpec>ProductID:%String</FormalSpec>
@@ -19,6 +19,13 @@
 	Quit BlumKlantID
 ]]></Implementation>
 </Method>
+
+<Method name="GeefProductIdVolgensIdentNummer">
+<FormalSpec>IdentNr:%String,KundeNr:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	quit $$GETVH^BLPROD(IdentNr,KundeNr)
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhUnitTest/APPS/AKP/AankoopControle/BLUM/impl/DespatchNaarCSBSOConverteerder/Converteer/TestMultiPallet5Plus.cls.xml
===================================================================
diff -u -r37599 -r37660
--- vhUnitTest/APPS/AKP/AankoopControle/BLUM/impl/DespatchNaarCSBSOConverteerder/Converteer/TestMultiPallet5Plus.cls.xml	(.../TestMultiPallet5Plus.cls.xml)	(revision 37599)
+++ vhUnitTest/APPS/AKP/AankoopControle/BLUM/impl/DespatchNaarCSBSOConverteerder/Converteer/TestMultiPallet5Plus.cls.xml	(.../TestMultiPallet5Plus.cls.xml)	(revision 37660)
@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="vhUnitTest.APPS.AKP.AankoopControle.BLUM.impl.DespatchNaarCSBSOConverteerder.Converteer.TestMultiPallet5Plus">
-<Super>vhUnitTest.TestCase</Super>
+<Super>vhUnitTest.APPS.AKP.AankoopControle.BLUM.impl.DespatchNaarCSBSOConverteerder.Converteer.Base</Super>
 
 <Method name="Test">
 <Implementation><![CDATA[
Index: vhTest/Fake/DOM/PM/Product.cls.xml
===================================================================
diff -u -r29059 -r37660
--- vhTest/Fake/DOM/PM/Product.cls.xml	(.../Product.cls.xml)	(revision 29059)
+++ vhTest/Fake/DOM/PM/Product.cls.xml	(.../Product.cls.xml)	(revision 37660)
@@ -47,6 +47,12 @@
 <Implementation><![CDATA[	Quit "V1"
 ]]></Implementation>
 </Method>
+
+<Method name="GeefGrootteOrdeAankoop">
+<ReturnType>DOM.PM.enu.GrootteOrde</ReturnType>
+<Implementation><![CDATA[	Quit ##class(DOM.PM.enu.GrootteOrde).Duizend()
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: APPS/AKP/AankoopControle/BLUM/impl/ToeleveringInfoVerzamelaar.cls.xml
===================================================================
diff -u -r37275 -r37660
--- APPS/AKP/AankoopControle/BLUM/impl/ToeleveringInfoVerzamelaar.cls.xml	(.../ToeleveringInfoVerzamelaar.cls.xml)	(revision 37275)
+++ APPS/AKP/AankoopControle/BLUM/impl/ToeleveringInfoVerzamelaar.cls.xml	(.../ToeleveringInfoVerzamelaar.cls.xml)	(revision 37660)
@@ -5,21 +5,23 @@
 
 <Property name="ToeleveringAPI">
 <Type>DOM.AKP.ToeleveringAPI</Type>
+<Private>1</Private>
 </Property>
 
-<Property name="ProductAPI">
-<Type>DOM.PM.ProductAPI</Type>
+<Property name="BlumProductAPI">
+<Type>DOM.PM.BlumProductAPI</Type>
+<Private>1</Private>
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>ProductAPI:DOM.PM.ProductAPI,ToeleveringAPI:DOM.AKP.ToeleveringAPI</FormalSpec>
+<FormalSpec>BlumProductAPI:DOM.PM.BlumProductAPI,ToeleveringAPI:DOM.AKP.ToeleveringAPI</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	set ..ToeleveringAPI = $$$Inject(ToeleveringAPI,##class(DOM.DomeinContext).Instance().GeefToeleveringAPI())
-	set ..ProductAPI = $$$Inject(ProductAPI,##class(DOM.DomeinContext).Instance().GeefProductAPI())
+	set ..BlumProductAPI = $$$Inject(BlumProductAPI,##class(DOM.PM.impl.BlumProductAPI).%New())
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -33,7 +35,7 @@
 		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 = ..ProductAPI.GeefProduct(CSBSO41.ProductNrCustomer)
+			#Dim Product as DOM.PM.Product = ..BlumProductAPI.GeefProduct(CSBSO41.ProductNrCustomer)
 			;Theoretische prijs volgens toelevering. 
 			set CSBSO41.Value = CSBSO41.QuantityInvoiced * ToeleveringLijn.GeefEenheidsPrijs() / $Select(Product.GeefGrootteOrdeAankoop()="M":1000,Product.GeefGrootteOrdeAankoop()="H":100,1:1 )
 			set CSBSO41.Value = CSBSO41.Value * (1 - ToeleveringLijn.GeefKorting())
@@ -49,7 +51,7 @@
 		}		
 	} else {		
 		if (ToeleveringLijnNr=""){ ;manual order
-			set CSBSO41.ProductNrCustomer = ..GeefProductNummer(CSBSO31.InvoicingCustomerNr,CSBSO41.IdentNr)
+			set CSBSO41.ProductNrCustomer = ..BlumProductAPI.GeefProductIdVolgensIdentNummer(CSBSO31.InvoicingCustomerNr,CSBSO41.IdentNr)
 
 			if ##class(Blum.Product).%ExistsId(CSBSO41.IdentNr) {
 				;Theorische prijs volgens product
Index: vhTest/Mock/DOM/PM/BlumProductAPI.cls.xml
===================================================================
diff -u -r29059 -r37660
--- vhTest/Mock/DOM/PM/BlumProductAPI.cls.xml	(.../BlumProductAPI.cls.xml)	(revision 29059)
+++ vhTest/Mock/DOM/PM/BlumProductAPI.cls.xml	(.../BlumProductAPI.cls.xml)	(revision 37660)
@@ -6,7 +6,7 @@
 Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
 Inheritance van meerdere TECH.Interface interfaces resulteert nog niet in een mockklasse met overeenkomstige inheritance-structuur.</Description>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>DOM.PM.BlumProductAPI,Tools.Mock.MockClassBase</Super>
+<Super>DOM.PM.BlumProductAPI,vhTest.Mock.DOM.PM.ProductAPI</Super>
 <Inheritance>right</Inheritance>
 
 <Method name="MockInstance">
@@ -24,6 +24,13 @@
 <Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefBlumKlantID",ProductID)
 ]]></Implementation>
 </Method>
+
+<Method name="GeefProductIdVolgensIdentNummer">
+<FormalSpec>IdentNr:%String,KundeNr:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefProductIdVolgensIdentNummer",IdentNr,KundeNr)
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: DOM/PM/BlumProductAPI.cls.xml
===================================================================
diff -u -r29059 -r37660
--- DOM/PM/BlumProductAPI.cls.xml	(.../BlumProductAPI.cls.xml)	(revision 29059)
+++ DOM/PM/BlumProductAPI.cls.xml	(.../BlumProductAPI.cls.xml)	(revision 37660)
@@ -11,6 +11,12 @@
 <FormalSpec>ProductID:%String</FormalSpec>
 <ReturnType>%String</ReturnType>
 </Method>
+
+<Method name="GeefProductIdVolgensIdentNummer">
+<Abstract>1</Abstract>
+<FormalSpec>IdentNr:%String,KundeNr:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+</Method>
 </Class>