Index: EXT/Unishop/PurchaseOrder001/OrderConverter.cls.xml
===================================================================
diff -u -r37068 -r37356
--- EXT/Unishop/PurchaseOrder001/OrderConverter.cls.xml	(.../OrderConverter.cls.xml)	(revision 37068)
+++ EXT/Unishop/PurchaseOrder001/OrderConverter.cls.xml	(.../OrderConverter.cls.xml)	(revision 37356)
@@ -40,7 +40,6 @@
 	Set LijnenIterator = ##class(TECH.ListIterator).%New(ExtOrder.Lijnen)
 	While LijnenIterator.HasNext() {
 		#dim OrderLine As EXT.Unishop.PurchaseOrder001.CreateOrder.OrderLijn = LijnenIterator.Next()
-		Continue:OrderLine.Product.%Extends("EXT.Unishop.PurchaseOrder001.CreateOrder.VoorgedefinieerdProduct") 
 		Do AppsOrder.Lijnen.Insert(..ConverteerLijn(OrderLine))
 	}
 	
Index: APPS/EDI/Bestel/impl/BestelService/UnishopBesteller.cls.xml
===================================================================
diff -u -r37337 -r37356
--- APPS/EDI/Bestel/impl/BestelService/UnishopBesteller.cls.xml	(.../UnishopBesteller.cls.xml)	(revision 37337)
+++ APPS/EDI/Bestel/impl/BestelService/UnishopBesteller.cls.xml	(.../UnishopBesteller.cls.xml)	(revision 37356)
@@ -23,6 +23,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="ProductRepository">
+<Type>APPS.EDI.Bestel.impl.BestelService.UnishopBesteller.ProductRepository</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <FormalSpec>ExterneVerkoopService:APPS.EC.Verkoop.ExterneVerkoopService,ProductConverter:APPS.EDI.common.impl.ProductConverter,OfferteService:APPS.VKP.OfferteService</FormalSpec>
 <Private>1</Private>
@@ -33,6 +38,7 @@
 	Set ..ExterneVerkoopService = $$$Inject(ExterneVerkoopService,##class(APPS.EC.Verkoop.impl.Externe.VerkoopService).%New())
 	Set ..ProductConverter = $$$Inject(ProductConverter,##class(APPS.EDI.common.impl.ProductConverter).%New())
 	Set ..OfferteService = $$$Inject(OfferteService, ##class(APPS.ApplicatieContext).Instance().GeefVerkoopAPI().GeefOfferteService())
+	Set ..ProductRepository = ##class(APPS.EDI.Bestel.impl.BestelService.UnishopBesteller.ProductRepository).%New()	
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -163,6 +169,13 @@
 <Method name="VoegToeProductLijn">
 <FormalSpec>OfferteID:%String,Lijn:APPS.EDI.common.dto.ProductLijn</FormalSpec>
 <Private>1</Private>
+<Implementation><![CDATA[
+	#dim Offerte As APPS.VKP.Offerte = ..OfferteService.GeefOfferte(OfferteID)	
+	#dim PakketReferentie As %String = Lijn.Product.PakketReferentie	
+	#dim ProductID As %String = ..ProductRepository.ZoekViaKlantEnPakketReferentie(##class(DOM.DomeinContext).Instance().GeefLegacyPartijAPI().GeefKlantNummerVoorPartijID(Offerte.GeefKlantID()),PakketReferentie)
+	
+	Do ..OfferteService.VoegToeProduct(Offerte, ProductID, Lijn.Aantal, PakketReferentie, Lijn.Referentie)
+]]></Implementation>
 </Method>
 </Class>
 
Index: vhUnitTest/EXT/Unishop/PurchaseOrder001/OrderConverter/Converteer/Test.cls.xml
===================================================================
diff -u -r37331 -r37356
--- vhUnitTest/EXT/Unishop/PurchaseOrder001/OrderConverter/Converteer/Test.cls.xml	(.../Test.cls.xml)	(revision 37331)
+++ vhUnitTest/EXT/Unishop/PurchaseOrder001/OrderConverter/Converteer/Test.cls.xml	(.../Test.cls.xml)	(revision 37356)
@@ -3,7 +3,7 @@
 <Class name="vhUnitTest.EXT.Unishop.PurchaseOrder001.OrderConverter.Converteer.Test">
 <Super>vhUnitTest.TestCase</Super>
 
-<Method name="Test: 1 lade mag verwerkt worden">
+<Method name="Test: 1 lade mag verwerkt worden -&gt; 1 lijn in resultaat">
 <Implementation><![CDATA[
 	Set AanvraagHeaderBepaler = ##class(APPS.EDI.Bestel.impl.BestelService.PlaatsBestelling.AanvraagHeaderBepaler).%New()
 	#dim AanvraagHeader As APPS.EDI.Bestel.impl.BestelService.PlaatsBestelling.AanvraagHeader = AanvraagHeaderBepaler.GeefAanvraagHeader("alpnachnorm_ch")
@@ -25,7 +25,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: 1 gewone lade en 1 voorgedefinieerd product: enkel lade verwerken">
+<Method name="Test: 1 gewone lade en 1 voorgedefinieerd product -&gt; 2 lijnen in resultaat">
 <Implementation><![CDATA[
 	Set AanvraagHeaderBepaler = ##class(APPS.EDI.Bestel.impl.BestelService.PlaatsBestelling.AanvraagHeaderBepaler).%New()
 	#dim AanvraagHeader As APPS.EDI.Bestel.impl.BestelService.PlaatsBestelling.AanvraagHeader = AanvraagHeaderBepaler.GeefAanvraagHeader("alpnachnorm_ch")
@@ -44,11 +44,11 @@
 	
 	#dim Resultaat As APPS.EDI.Bestel.BestelService.PlaatsBestelling.Aanvraag = OrderConverter.Converteer(TeConverterenOrder)
 	
-	do $$$AssertEquals(Resultaat.Order.Lijnen.Count(),1)
+	do $$$AssertEquals(Resultaat.Order.Lijnen.Count(),2)
 ]]></Implementation>
 </Method>
 
-<Method name="Test: 1 voorgedefinieerd product en 2 lades: enkel laden verwerken">
+<Method name="Test: 1 voorgedefinieerd product en 2 lades -&gt; 3 lijnen in resultaat">
 <Implementation><![CDATA[
 	Set AanvraagHeaderBepaler = ##class(APPS.EDI.Bestel.impl.BestelService.PlaatsBestelling.AanvraagHeaderBepaler).%New()
 	#dim AanvraagHeader As APPS.EDI.Bestel.impl.BestelService.PlaatsBestelling.AanvraagHeader = AanvraagHeaderBepaler.GeefAanvraagHeader("alpnachnorm_ch")
@@ -68,11 +68,11 @@
 	
 	#dim Resultaat As APPS.EDI.Bestel.BestelService.PlaatsBestelling.Aanvraag = OrderConverter.Converteer(TeConverterenOrder)
 	
-	do $$$AssertEquals(Resultaat.Order.Lijnen.Count(),2)
+	do $$$AssertEquals(Resultaat.Order.Lijnen.Count(),3)
 ]]></Implementation>
 </Method>
 
-<Method name="Test: enkel 1 voorgedefinieerd product niets verwerken">
+<Method name="Test: enkel 1 voorgedefinieerd product -&gt;1 lijn in resultaat">
 <Implementation><![CDATA[
 	Set AanvraagHeaderBepaler = ##class(APPS.EDI.Bestel.impl.BestelService.PlaatsBestelling.AanvraagHeaderBepaler).%New()
 	#dim AanvraagHeader As APPS.EDI.Bestel.impl.BestelService.PlaatsBestelling.AanvraagHeader = AanvraagHeaderBepaler.GeefAanvraagHeader("alpnachnorm_ch")
@@ -89,11 +89,11 @@
 	
 	#dim Resultaat As APPS.EDI.Bestel.BestelService.PlaatsBestelling.Aanvraag = OrderConverter.Converteer(TeConverterenOrder)
 	
-	do $$$AssertEquals(Resultaat.Order.Lijnen.Count(),0)
+	do $$$AssertEquals(Resultaat.Order.Lijnen.Count(),1)
 ]]></Implementation>
 </Method>
 
-<Method name="Test: niets te verwerken">
+<Method name="Test: niets te verwerken -&gt; 0 lijnen in resultaat">
 <Implementation><![CDATA[
 	Set AanvraagHeaderBepaler = ##class(APPS.EDI.Bestel.impl.BestelService.PlaatsBestelling.AanvraagHeaderBepaler).%New()
 	#dim AanvraagHeader As APPS.EDI.Bestel.impl.BestelService.PlaatsBestelling.AanvraagHeader = AanvraagHeaderBepaler.GeefAanvraagHeader("alpnachnorm_ch")
Index: APPS/VKP/impl/OfferteService.cls.xml
===================================================================
diff -u -r37250 -r37356
--- APPS/VKP/impl/OfferteService.cls.xml	(.../OfferteService.cls.xml)	(revision 37250)
+++ APPS/VKP/impl/OfferteService.cls.xml	(.../OfferteService.cls.xml)	(revision 37356)
@@ -65,7 +65,7 @@
 <FormalSpec>Offerte:APPS.VKP.Offerte,ProductID:%String,Aantal:%String,PakketReferentie:%String="",ProjectReferentie:%String=""</FormalSpec>
 <ReturnType>DOM.EC.Winkelkar.ProductLijn</ReturnType>
 <Implementation><![CDATA[
-	#dim LijnId As %String = ..WinkelkarService.VoegToeMaatwerk(Offerte.GeefWinkelkarID(), ProductID, Aantal, PakketReferentie, ProjectReferentie)
+	#dim LijnId As %String = ..WinkelkarService.VoegToeProduct(Offerte.GeefWinkelkarID(), ProductID, Aantal, PakketReferentie, ProjectReferentie)
 	Quit ##class(DOM.EC.Winkelkar.Lijn).%OpenId(LijnId)
 ]]></Implementation>
 </Method>