Index: APPS/EC/Winkelkar/dto/ProductLijn.cls.xml
===================================================================
diff -u -r45473 -r62119
--- APPS/EC/Winkelkar/dto/ProductLijn.cls.xml	(.../ProductLijn.cls.xml)	(revision 45473)
+++ APPS/EC/Winkelkar/dto/ProductLijn.cls.xml	(.../ProductLijn.cls.xml)	(revision 62119)
@@ -15,6 +15,15 @@
 <Type>%Integer</Type>
 </Property>
 
+<Property name="EenheidPrijs">
+<Type>%Decimal</Type>
+</Property>
+
+<Property name="AankoopPrijs">
+<Type>%Decimal</Type>
+<Parameter name="XMLPROJECTION" value="none"/>
+</Property>
+
 <Property name="Omschrijving">
 <Type>%String</Type>
 </Property>
Index: APPS/EC/Winkelkar/impl/LijnNaarDtoVisitor.cls.xml
===================================================================
diff -u -r62118 -r62119
--- APPS/EC/Winkelkar/impl/LijnNaarDtoVisitor.cls.xml	(.../LijnNaarDtoVisitor.cls.xml)	(revision 62118)
+++ APPS/EC/Winkelkar/impl/LijnNaarDtoVisitor.cls.xml	(.../LijnNaarDtoVisitor.cls.xml)	(revision 62119)
@@ -73,6 +73,8 @@
 	Set Lijn.TotaalPrijs = ProductLijn.GeefEindklantTotaalPrijs()
 	Set Lijn.ProductId = ProductLijn.GeefProductId()
 	Set Lijn.ExterneId = ProductLijn.ExterneId
+	Set Lijn.EenheidPrijs = ProductLijn.GeefEindklantEenheidPrijsNettoExclBTW()
+	Set Lijn.AankoopPrijs = ProductLijn.EenheidPrijsExclBTW
 	
 	Do ..VoegToeLijn(Lijn)	
 	Quit $$$OK