Index: DOM/AKP/ProductToeleveringLijn.cls.xml
===================================================================
diff -u -r33372 -r35461
--- DOM/AKP/ProductToeleveringLijn.cls.xml	(.../ProductToeleveringLijn.cls.xml)	(revision 33372)
+++ DOM/AKP/ProductToeleveringLijn.cls.xml	(.../ProductToeleveringLijn.cls.xml)	(revision 35461)
@@ -4,6 +4,11 @@
 <Abstract>1</Abstract>
 <Super>DOM.AKP.ToeleveringLijn,TECH.Interface</Super>
 
+<Method name="GeefEenheidsPrijs">
+<Abstract>1</Abstract>
+<ReturnType>%Decimal</ReturnType>
+</Method>
+
 <Method name="GeefProductID">
 <Abstract>1</Abstract>
 <ReturnType>%String</ReturnType>
Index: APPS/EDIExport/AankoopOrder/impl/BLUM/DataVerzamelaar.cls.xml
===================================================================
diff -u -r35453 -r35461
--- APPS/EDIExport/AankoopOrder/impl/BLUM/DataVerzamelaar.cls.xml	(.../DataVerzamelaar.cls.xml)	(revision 35453)
+++ APPS/EDIExport/AankoopOrder/impl/BLUM/DataVerzamelaar.cls.xml	(.../DataVerzamelaar.cls.xml)	(revision 35461)
@@ -92,48 +92,46 @@
 	Set ToeleveringDetail.NetPrice = $Extract(BLExportLijn,35,44)
 	Set ToeleveringDetail.PriceDimension = $Extract(BLExportLijn,45,45) 
 	Set ToeleveringDetail.DeliveryDateAxBUA = $Extract(BLExportLijn,46,51)
-	Set ToeleveringDetail.ProductIdentificationCustomer = ..GeefLVHProductNummer(ToeleveringDetail.OrderLineIdentificationCustomer, BLExportLijn)
-	Set ToeleveringDetail.ProductData = ..GeefProductData(ToeleveringDetail.ProductIdentificationCustomer)
+	Set ToeleveringDetail.ProductData =  ..GeefProductVanToelevering(ToeleveringDetail.OrderLineIdentificationCustomer, BLExportLijn)
+	Set ToeleveringDetail.ProductIdentificationCustomer = ToeleveringDetail.ProductData.ProductID
 	Quit ToeleveringDetail
 ]]></Implementation>
 </Method>
 
-<Method name="GeefProductData">
-<FormalSpec>ProductID:%String=""</FormalSpec>
-<Private>1</Private>
+<Method name="GeefProductVanToelevering">
+<FormalSpec>OrderLineIdentificationCustomer:%String,BLExportLijn:%String</FormalSpec>
 <ReturnType>APPS.EDIExport.AankoopOrder.BLUM.dto.ProductData</ReturnType>
 <Implementation><![CDATA[
 	set ProductData = ##class(APPS.EDIExport.AankoopOrder.BLUM.dto.ProductData).%New()
-	If (ProductID '= "")
+		
+	#dim ToeleveringID As %String = $Piece(OrderLineIdentificationCustomer,".",1)
+	#dim ToeleveringLijnID As %Integer = $Piece(OrderLineIdentificationCustomer,".",2) * 100
+	#dim Toelevering As DOM.AKP.Toelevering = ..ToeleveringAPI.GeefToelevering(ToeleveringID)
+	#dim ToeleveringLijn As DOM.AKP.impl.DataM.DataMProductToeleveringLijn = Toelevering.GeefToeleveringLijn(ToeleveringLijnID)
+	Set ProductData.ProductID = ToeleveringLijn.GeefProductID()
+	Set ProductData.BrutoAankoopPrijs = ToeleveringLijn.GeefEenheidsPrijs()
+	
+	Do ..VulAanProductData(.ProductData)
+
+	Quit ProductData
+]]></Implementation>
+</Method>
+
+<Method name="VulAanProductData">
+<FormalSpec><![CDATA[&ProductData:APPS.EDIExport.AankoopOrder.BLUM.dto.ProductData]]></FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	If (ProductData.ProductID '= "")
 	{
-		#dim Product As DOM.PM.Product = ..ProductAPI.GeefProduct(ProductID)
+		#dim Product As DOM.PM.Product = ..ProductAPI.GeefProduct(ProductData.ProductID)
 		if $IsObject(Product)
 		{
 			set ProductData.KortTekst = Product.GeefKorttekst()
 			set ProductData.EANCode = Product.GeefEANCode()
-			set ProductData.BrutoAankoopPrijs = Product.GeefBrutoAankoopPrijs() 
 		} 
 	}
-	Quit ProductData
 ]]></Implementation>
 </Method>
-
-<Method name="GeefLVHProductNummer">
-<FormalSpec>OrderLineIdentificationCustomer:%String,BLExportLijn:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[
-	#dim LVHProductNummer As %String = $$$Trim($Extract(BLExportLijn,56,74))
-	if (LVHProductNummer = "")
-	{
-		#dim ToeleveringID As %String = $Piece(OrderLineIdentificationCustomer,".",1)
-		#dim ToeleveringLijnID As %Integer = $Piece(OrderLineIdentificationCustomer,".",2) * 100
-		#dim Toelevering As DOM.AKP.Toelevering = ..ToeleveringAPI.GeefToelevering(ToeleveringID)
-		#dim ToeleveringLijn As DOM.AKP.impl.DataM.DataMProductToeleveringLijn = Toelevering.GeefToeleveringLijn(ToeleveringLijnID)
-		Quit:(ToeleveringLijn '= "") ToeleveringLijn.GeefProductID()
-	} 
-	Quit LVHProductNummer
-]]></Implementation>
-</Method>
 </Class>
 
 
Index: DOM/AKP/impl/DataM/DataMProductToeleveringLijn.cls.xml
===================================================================
diff -u -r29059 -r35461
--- DOM/AKP/impl/DataM/DataMProductToeleveringLijn.cls.xml	(.../DataMProductToeleveringLijn.cls.xml)	(revision 29059)
+++ DOM/AKP/impl/DataM/DataMProductToeleveringLijn.cls.xml	(.../DataMProductToeleveringLijn.cls.xml)	(revision 35461)
@@ -17,6 +17,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefEenheidsPrijs">
+<ReturnType>%Decimal</ReturnType>
+<Implementation><![CDATA[	Quit ..GeefPiece(6)
+]]></Implementation>
+</Method>
+
 <Method name="GeefAantal">
 <ReturnType>%Integer</ReturnType>
 <Implementation><![CDATA[	Quit ..GeefPiece(3)
Index: vhUnitTest/APPS/EDIExport/AankoopOrder/impl/BLUM/DataVerzamelaar/GeefCOMSO/Test.cls.xml
===================================================================
diff -u -r35450 -r35461
--- vhUnitTest/APPS/EDIExport/AankoopOrder/impl/BLUM/DataVerzamelaar/GeefCOMSO/Test.cls.xml	(.../Test.cls.xml)	(revision 35450)
+++ vhUnitTest/APPS/EDIExport/AankoopOrder/impl/BLUM/DataVerzamelaar/GeefCOMSO/Test.cls.xml	(.../Test.cls.xml)	(revision 35461)
@@ -55,6 +55,7 @@
 	
 	#dim ToeleveringLijnMock As vhTest.Mock.DOM.AKP.ProductToeleveringLijn = ##class(vhTest.Mock.DOM.AKP.ProductToeleveringLijn).%New()
 	Do ToeleveringLijnMock.IndienMethodCall("GeefProductID").DanReturn("DummyProductID")
+	Do ToeleveringLijnMock.IndienMethodCall("GeefEenheidsPrijs").DanReturn("90.25")
 
 	Do ToeleveringMock.IndienMethodCall("GeefToeleveringLijn", $$$ElkeWaarde).DanReturn(ToeleveringLijnMock)
 	
Index: vhTest/Mock/DOM/AKP/ProductToeleveringLijn.cls.xml
===================================================================
diff -u -r33372 -r35461
--- vhTest/Mock/DOM/AKP/ProductToeleveringLijn.cls.xml	(.../ProductToeleveringLijn.cls.xml)	(revision 33372)
+++ vhTest/Mock/DOM/AKP/ProductToeleveringLijn.cls.xml	(.../ProductToeleveringLijn.cls.xml)	(revision 35461)
@@ -14,6 +14,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefEenheidsPrijs">
+<ReturnType>%Decimal</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefEenheidsPrijs")
+]]></Implementation>
+</Method>
+
 <Method name="GeefLeverdag">
 <ReturnType>%Date</ReturnType>
 <Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefLeverdag")