Index: vhUnitTest/AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter/ProductItemConverterFake.cls.xml
===================================================================
diff -u -r52421 -r53257
--- vhUnitTest/AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter/ProductItemConverterFake.cls.xml	(.../ProductItemConverterFake.cls.xml)	(revision 52421)
+++ vhUnitTest/AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter/ProductItemConverterFake.cls.xml	(.../ProductItemConverterFake.cls.xml)	(revision 53257)
@@ -42,7 +42,7 @@
 </Method>
 
 <Method name="%OnNew">
-<FormalSpec>ProductAPI:DOM.PM.ProductAPI="",ProductRolAPI:DOM.PM.ProductRolAPI="",LangtekstBewaarder:DOM.PM.LangtekstBewaarder="",KlasRepository:Prod.Klas.KlasRepository="",Logger:vhLib.Logger="",MailAPI:TECH.Mail.MailAPI="",PakketService:DOM.PM.impl.DataM.PakketService=""</FormalSpec>
+<FormalSpec>ProductAPI:DOM.PM.ProductAPI="",ProductRolAPI:DOM.PM.ProductRolAPI="",LangtekstBewaarder:DOM.PM.LangtekstBewaarder="",KlasRepository:Prod.Klas.KlasRepository="",Logger:vhLib.Logger="",MailAPI:TECH.Mail.MailAPI=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -53,7 +53,7 @@
 	Set ..IndexenAangemaakt = $$$False
 	Set ..IndexenVerwijderd = $$$False
 	Set ..MailGestuurd = $$$False
-	Quit ##super(ProductAPI,ProductRolAPI,LangtekstBewaarder,KlasRepository,Logger,MailAPI,PakketService)
+	Quit ##super(ProductAPI,ProductRolAPI,LangtekstBewaarder,KlasRepository,Logger,MailAPI)
 ]]></Implementation>
 </Method>
 
Index: AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter.cls.xml
===================================================================
diff -u -r52421 -r53257
--- AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter.cls.xml	(.../ProductItemConverter.cls.xml)	(revision 52421)
+++ AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter.cls.xml	(.../ProductItemConverter.cls.xml)	(revision 53257)
@@ -38,18 +38,13 @@
 <Private>1</Private>
 </Property>
 
-<Property name="PakketService">
-<Type>DOM.PM.impl.DataM.PakketService</Type>
-<Private>1</Private>
-</Property>
-
 <Property name="ProductZoekIndexBuilder">
 <Type>APPS.PM.ProductZoekIndexBuilder</Type>
 <Private>1</Private>
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>ProductAPI:DOM.PM.ProductAPI,ProductRolAPI:DOM.PM.ProductRolAPI,LangtekstBewaarder:DOM.PM.LangtekstBewaarder,KlasRepository:Prod.Klas.KlasRepository,Logger:vhLib.Logger,MailAPI:TECH.Mail.MailAPI,PakketService:DOM.PM.impl.DataM.PakketService,ProductZoekIndexBuilder:APPS.PM.ProductZoekIndexBuilder</FormalSpec>
+<FormalSpec>ProductAPI:DOM.PM.ProductAPI,ProductRolAPI:DOM.PM.ProductRolAPI,LangtekstBewaarder:DOM.PM.LangtekstBewaarder,KlasRepository:Prod.Klas.KlasRepository,Logger:vhLib.Logger,MailAPI:TECH.Mail.MailAPI,ProductZoekIndexBuilder:APPS.PM.ProductZoekIndexBuilder</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -61,7 +56,6 @@
 	Set ..KlasRepository = $$$Inject(KlasRepository,##class(Prod.Klas.KlasRepository).%New())
 	Set ..Logger = $$$Inject(Logger,##class(vhLib.Logger).%New())
 	Set ..MailAPI = $$$Inject(MailAPI,##class(TECH.Context).Instance().GeefMailAPI())
-	Set ..PakketService = $$$Inject(PakketService,##class(DOM.PM.impl.DataM.PakketService).%New())
 	Set ..ProductZoekIndexBuilder = $$$Inject(ProductZoekIndexBuilder, ##class(BL.Prod.SearchBuildIndex).%New())
 	Quit $$$OK
 ]]></Implementation>
@@ -297,38 +291,8 @@
 <FormalSpec>Product:DOM.PM.Product,ExtIterator:TECH.ListIterator</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	Set TeVerwijderenPakketLijst = ##class(%ListOfDataTypes).%New()
-	While ExtIterator.HasNext() {		
-		#dim Ext as AXif.Dynamics.ProductItemIn.MessageParts.AxdEntityExt = ExtIterator.Next()
-
-		#dim KlantId as %String = ##class(AXimpl.AxToAdminUtils).ConvertCustomerID(Ext.CustVendRelation)
-
-		do ##class(TECH.ListUtils).AppendList(.TeVerwijderenPakketLijst, ..PakketService.GeefPakketNummersVoorKlantProduct(KlantId,Product.GeefID()))
-
-		if ..PakketService.BestaatViaPakketnaam(KlantId,Ext.ExternalItemId){
-			#dim Pakketnummer as %String = ..PakketService.GeefPakketNummerViaPakketnaam(KlantId,Ext.ExternalItemId)
-			
-			if $$$Not(##class(TECH.StringUtils).Contains(..PakketService.GeefPakketType(Pakketnummer),"E","C")){				
-				;indien type pakket <> E of C -> in fase 2A alleen nog 1 op 1 pakketten, 1-N zijn anders dummy product (shadow/ghost product in AX)
-				;pakket verwijderen : was een D pakket wijzend naar 1 of meerdere producten, maar moet nu E pakket worden wijzend naar AX phantom product 
-				;we laten het pakket in de lijst van te verwijderen pakketten staan, en maken een nieuw E pakket aan.
-				Set Pakketnummer = ..PakketService.MaakPakket(KlantId,Ext.ExternalItemId)
-				Do ..PakketService.ZetPakketType(Pakketnummer,"E")
-			} else {
-				;verwijder pakket uit lijstteverwijderenpakketten
-				Do ##class(TECH.ListUtils).RemoveItemFromList(Pakketnummer,TeVerwijderenPakketLijst)
-			}			
-		} else {
-			Set Pakketnummer = ..PakketService.MaakPakket(KlantId,Ext.ExternalItemId)
-			Do ..PakketService.ZetPakketType(Pakketnummer,"E")
-		}
-
-		Do ..PakketService.BewaarPakketOnderdeel(Pakketnummer,Product.GeefID(),1)		
-	}
-	set TeVerwijderenPakketnummerIterator = ##class(TECH.ListIterator).%New(TeVerwijderenPakketLijst)
-	While TeVerwijderenPakketnummerIterator.HasNext(){
-		Do ..PakketService.VerwijderPakket(TeVerwijderenPakketnummerIterator.Next())
-	}
+	
+	Quit ;ingevolge UST3977 niet meer doen.
 ]]></Implementation>
 </Method>
 
Index: vhUnitTest/AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter/Test.cls.xml
===================================================================
diff -u -r52421 -r53257
--- vhUnitTest/AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 52421)
+++ vhUnitTest/AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 53257)
@@ -9,12 +9,11 @@
 	#dim ProductRolAPIMock as DOM.PM.ProductRolAPI = ##class(vhTest.Mock.DOM.PM.ProductRolAPI).MockInstance()
 	Set LangtekstBewaarderMock = ##class(vhTest.Mock.DOM.PM.LangtekstBewaarder).%New()
 	Set KlasRepositoryMock = ##class(vhTest.Mock.Prod.Klas.KlasRepository).%New()
-	Set PakketServiceMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.PakketService).%New()
 	
 	#dim Envelope as AXif.Dynamics.ProductItemIn.Envelope = ..GeefEnvelope("ProductItemInUpdateKorttekst.xml")
 	Set Envelope.Body.MessageParts.MessagePart.Item.GetAt(1).PrimaryVendorId= "06332"
 
-	Set Converter = ##class(vhUnitTest.AXimpl.Dynamics.ProductItemUpsertIn.Converter.ProductItemConverter.ProductItemConverterFake).%New(ProductAPIMock,ProductRolAPIMock,LangtekstBewaarderMock,KlasRepositoryMock,,,PakketServiceMock)
+	Set Converter = ##class(vhUnitTest.AXimpl.Dynamics.ProductItemUpsertIn.Converter.ProductItemConverter.ProductItemConverterFake).%New(ProductAPIMock,ProductRolAPIMock,LangtekstBewaarderMock,KlasRepositoryMock)
 
 	Do Converter.ConvertProductItem(Envelope.Body.MessageParts.MessagePart.Item.GetAt(1),"vhbe")
 ]]></Implementation>
@@ -26,13 +25,12 @@
 	#dim ProductRolAPIMock as DOM.PM.ProductRolAPI = ##class(vhTest.Mock.DOM.PM.ProductRolAPI).MockInstance()
 	Set LangtekstBewaarderMock = ##class(vhTest.Mock.DOM.PM.LangtekstBewaarder).%New()
 	Set KlasRepositoryMock = ##class(vhTest.Mock.Prod.Klas.KlasRepository).%New()
-	Set PakketServiceMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.PakketService).%New()
 	
 	#dim Envelope as AXif.Dynamics.ProductItemIn.Envelope = ..GeefEnvelope("ProductItemInUpdateKorttekst.xml")
 	Set Envelope.Body.MessageParts.MessagePart.Item.GetAt(1).PrimaryVendorId= "05497"
 	
 
-	Set Converter = ##class(vhUnitTest.AXimpl.Dynamics.ProductItemUpsertIn.Converter.ProductItemConverter.ProductItemConverterFake).%New(ProductAPIMock,ProductRolAPIMock,LangtekstBewaarderMock,KlasRepositoryMock,,,PakketServiceMock)
+	Set Converter = ##class(vhUnitTest.AXimpl.Dynamics.ProductItemUpsertIn.Converter.ProductItemConverter.ProductItemConverterFake).%New(ProductAPIMock,ProductRolAPIMock,LangtekstBewaarderMock,KlasRepositoryMock)
 
 	Do Converter.ConvertProductItem(Envelope.Body.MessageParts.MessagePart.Item.GetAt(1),"hlx")
 ]]></Implementation>
@@ -76,14 +74,7 @@
 	Set KlasRepositoryMock = ##class(vhTest.Mock.Prod.Klas.KlasRepository).%New()
 	Do KlasRepositoryMock.VerwachtMethodCall("ZoekViaGroepen","KB","KVD","SVD/BL").DanReturn(..GeefKlasIterator())
 
-	Set PakketServiceMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.PakketService).%New()
-	Do PakketServiceMock.VerwachtMethodCall("GeefPakketNummersVoorKlantProduct","K||1000","ProductID").DanReturn(##class(%ListOfDataTypes).%New())
-	Do PakketServiceMock.VerwachtMethodCall("BestaatViaPakketnaam","K||1000","klantreferentie").DanReturn($$$False)
-	Do PakketServiceMock.VerwachtMethodCall("MaakPakket","K||1000","klantreferentie").DanReturn("PakketNummer")
-	Do PakketServiceMock.VerwachtMethodCall("ZetPakketType","PakketNummer","E").DanDoeNiks()
-	DO PakketServiceMock.VerwachtMethodCall("BewaarPakketOnderdeel","PakketNummer","ProductID",1).DanDoeNiks()
-
-	Set Converter = ##class(vhUnitTest.AXimpl.Dynamics.ProductItemUpsertIn.Converter.ProductItemConverter.ProductItemConverterFake).%New(ProductAPIMock,ProductRolAPIMock,LangtekstBewaarderMock,KlasRepositoryMock,,,PakketServiceMock)
+	Set Converter = ##class(vhUnitTest.AXimpl.Dynamics.ProductItemUpsertIn.Converter.ProductItemConverter.ProductItemConverterFake).%New(ProductAPIMock,ProductRolAPIMock,LangtekstBewaarderMock,KlasRepositoryMock)
 	
 	#dim Envelope as AXif.Dynamics.ProductItemIn.Envelope = ..GeefEnvelope("ProductItemInUpdateKorttekst.xml")
 	Set Envelope.Body.MessageParts.MessagePart.Item.GetAt(1).StoppedSales ="Yes" ;Niet Actief
@@ -106,11 +97,10 @@
 	Do AdministratiefProductMock.Verifieer()
 	Do LangtekstBewaarderMock.Verifieer()
 	Do KlasRepositoryMock.Verifieer()
-	Do PakketServiceMock.Verifieer()
 ]]></Implementation>
 </Method>
 
-<Method name="Test : indien update een exceptie gooid worden de index toch nog terug opgebouwd">
+<Method name="Test : indien update een exceptie gooit worden de index toch nog terug opgebouwd">
 <Implementation><![CDATA[
 
 	Set ProductMock = ##class(vhTest.Mock.DOM.PM.Product).%New()
@@ -128,9 +118,8 @@
 	#dim ProductRolAPIMock as DOM.PM.ProductRolAPI = ##class(vhTest.Mock.DOM.PM.ProductRolAPI).MockInstance()
 	Set LangtekstBewaarderMock = ##class(vhTest.Mock.DOM.PM.LangtekstBewaarder).%New()
 	Set KlasRepositoryMock = ##class(vhTest.Mock.Prod.Klas.KlasRepository).%New()
-	Set PakketServiceMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.PakketService).%New()
 	
-	Set Converter = ##class(vhUnitTest.AXimpl.Dynamics.ProductItemUpsertIn.Converter.ProductItemConverter.ProductItemConverterFake).%New(ProductAPIMock,ProductRolAPIMock,LangtekstBewaarderMock,KlasRepositoryMock,,,PakketServiceMock)
+	Set Converter = ##class(vhUnitTest.AXimpl.Dynamics.ProductItemUpsertIn.Converter.ProductItemConverter.ProductItemConverterFake).%New(ProductAPIMock,ProductRolAPIMock,LangtekstBewaarderMock,KlasRepositoryMock)
 	
 	#dim Envelope as AXif.Dynamics.ProductItemIn.Envelope = ..GeefEnvelope("ProductItemInUpdateKorttekst.xml")
 	Set Envelope.Body.MessageParts.MessagePart.Item.GetAt(1).StoppedSales =""  ; Actief
@@ -162,8 +151,7 @@
 	#dim ProductRolAPIMock as DOM.PM.ProductRolAPI = ##class(vhTest.Mock.DOM.PM.ProductRolAPI).MockInstance()
 	Set LangtekstBewaarderMock = ##class(vhTest.Mock.DOM.PM.LangtekstBewaarder).%New()	
 	Set KlasRepositoryMock = ##class(vhTest.Mock.Prod.Klas.KlasRepository).%New()
-	Set PakketServiceMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.PakketService).%New()
-	Set Converter = ##class(vhUnitTest.AXimpl.Dynamics.ProductItemUpsertIn.Converter.ProductItemConverter.ProductItemConverterFake).%New(ProductAPIMock,ProductRolAPIMock,LangtekstBewaarderMock,KlasRepositoryMock,,,PakketServiceMock)
+	Set Converter = ##class(vhUnitTest.AXimpl.Dynamics.ProductItemUpsertIn.Converter.ProductItemConverter.ProductItemConverterFake).%New(ProductAPIMock,ProductRolAPIMock,LangtekstBewaarderMock,KlasRepositoryMock)
 	
 	#dim Envelope as AXif.Dynamics.ProductItemIn.Envelope = ..GeefEnvelope("ProductItemInUpdateKorttekst.xml")
 
@@ -182,8 +170,7 @@
 	#dim ProductRolAPIMock as DOM.PM.ProductRolAPI = ##class(vhTest.Mock.DOM.PM.ProductRolAPI).MockInstance()
 	Set LangtekstBewaarderMock = ##class(vhTest.Mock.DOM.PM.LangtekstBewaarder).%New()
 	Set KlasRepositoryMock = ##class(vhTest.Mock.Prod.Klas.KlasRepository).%New()
-	Set PakketServiceMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.PakketService).%New()
-	Set Converter = ##class(vhUnitTest.AXimpl.Dynamics.ProductItemUpsertIn.Converter.ProductItemConverter.ProductItemConverterFake).%New(ProductAPIMock,ProductRolAPIMock,LangtekstBewaarderMock,KlasRepositoryMock,,,PakketServiceMock)
+	Set Converter = ##class(vhUnitTest.AXimpl.Dynamics.ProductItemUpsertIn.Converter.ProductItemConverter.ProductItemConverterFake).%New(ProductAPIMock,ProductRolAPIMock,LangtekstBewaarderMock,KlasRepositoryMock)
 	
 	#dim Envelope as AXif.Dynamics.ProductItemIn.Envelope = ..GeefEnvelope("ProductItemInUpdateKorttekst.xml")
 	Set Envelope.Body.MessageParts.MessagePart.Item.GetAt(1).Translation.GetAt(2).Name = "Andere korttekst"
@@ -202,8 +189,7 @@
 	#dim ProductRolAPIMock as DOM.PM.ProductRolAPI = ##class(vhTest.Mock.DOM.PM.ProductRolAPI).MockInstance()
 	Set LangtekstBewaarderMock = ##class(vhTest.Mock.DOM.PM.LangtekstBewaarder).%New()
 	Set KlasRepositoryMock = ##class(vhTest.Mock.Prod.Klas.KlasRepository).%New()
-	Set PakketServiceMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.PakketService).%New()
-	Set Converter = ##class(vhUnitTest.AXimpl.Dynamics.ProductItemUpsertIn.Converter.ProductItemConverter.ProductItemConverterFake).%New(ProductAPIMock,ProductRolAPIMock,LangtekstBewaarderMock,KlasRepositoryMock,,,PakketServiceMock)
+	Set Converter = ##class(vhUnitTest.AXimpl.Dynamics.ProductItemUpsertIn.Converter.ProductItemConverter.ProductItemConverterFake).%New(ProductAPIMock,ProductRolAPIMock,LangtekstBewaarderMock,KlasRepositoryMock)
 	
 	#dim Envelope as AXif.Dynamics.ProductItemIn.Envelope = ..GeefEnvelope("ProductItemInUpdateKorttekst.xml")
 	Set Envelope.Body.MessageParts.MessagePart.Item.GetAt(1).Translation.GetAt(2).Name = "Andere en veel te lange korttekst"
@@ -257,14 +243,7 @@
 	Set KlasRepositoryMock = ##class(vhTest.Mock.Prod.Klas.KlasRepository).%New()
 	Do KlasRepositoryMock.VerwachtMethodCall("ZoekViaGroepen","KB","KVD","SVD/BL").DanReturn(..GeefKlasIterator())
 
-	Set PakketServiceMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.PakketService).%New()
-	Do PakketServiceMock.VerwachtMethodCall("GeefPakketNummersVoorKlantProduct","K||1000","ProductID").DanReturn(##class(%ListOfDataTypes).%New())
-	Do PakketServiceMock.VerwachtMethodCall("BestaatViaPakketnaam","K||1000","klantreferentie").DanReturn($$$False)
-	Do PakketServiceMock.VerwachtMethodCall("MaakPakket","K||1000","klantreferentie").DanReturn("PakketNummer")
-	Do PakketServiceMock.VerwachtMethodCall("ZetPakketType","PakketNummer","E").DanDoeNiks()
-	Do PakketServiceMock.VerwachtMethodCall("BewaarPakketOnderdeel","PakketNummer","ProductID",1).DanDoeNiks()
-
-	Set Converter = ##class(vhUnitTest.AXimpl.Dynamics.ProductItemUpsertIn.Converter.ProductItemConverter.ProductItemConverterFake).%New(ProductAPIMock,ProductRolAPIMock,LangtekstBewaarderMock,KlasRepositoryMock,,,PakketServiceMock)
+	Set Converter = ##class(vhUnitTest.AXimpl.Dynamics.ProductItemUpsertIn.Converter.ProductItemConverter.ProductItemConverterFake).%New(ProductAPIMock,ProductRolAPIMock,LangtekstBewaarderMock,KlasRepositoryMock)
 	Set Converter.NieuwProductMock = ProductMock
 	
 	#dim Envelope as AXif.Dynamics.ProductItemIn.Envelope = ..GeefEnvelope("ProductItemInUpdateKorttekst.xml")
@@ -288,12 +267,13 @@
 	Do ProductRolAPIMock.Verifieer()
 	Do LangtekstBewaarderMock.Verifieer()
 	Do KlasRepositoryMock.Verifieer()
-	Do PakketServiceMock.Verifieer()
 ]]></Implementation>
 </Method>
 
 <Method name="Test Pakketten die niet meer in bericht zitten worden verwijderd">
 <Implementation><![CDATA[
+	Quit ;ingevolge UST3977 niet meer doen.
+	
 	#dim ProductMock as vhTest.Mock.DOM.PM.Product = ..GeefProductMockMetVerwachtMethodCalls($$$True)	
 	Do ProductMock.IndienMethodCall("ZetIdentNr","IdentNummer").DanDoeNiks()
 	Do ProductMock.IndienMethodCall("ZetOpslagZone","9").DanDoeNiks()
@@ -321,17 +301,7 @@
 	Set KlasRepositoryMock = ##class(vhTest.Mock.Prod.Klas.KlasRepository).%New()
 	Do KlasRepositoryMock.IndienMethodCall("ZoekViaGroepen","KB","KVD","SVD/BL").DanReturn(..GeefKlasIterator())
 
-	Set PakketServiceMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.PakketService).%New()
-	#dim TeverwijderenPakketlijst as %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("Teverwijderen1","Teverwijderen2")
-	Do PakketServiceMock.VerwachtMethodCall("GeefPakketNummersVoorKlantProduct","K||1000","ProductID").DanReturn(TeverwijderenPakketlijst)
-	Do PakketServiceMock.VerwachtMethodCall("BestaatViaPakketnaam","K||1000","klantreferentie").DanReturn($$$False)
-	Do PakketServiceMock.VerwachtMethodCall("MaakPakket","K||1000","klantreferentie").DanReturn("PakketNummer")
-	Do PakketServiceMock.VerwachtMethodCall("ZetPakketType","PakketNummer","E").DanDoeNiks()
-	DO PakketServiceMock.VerwachtMethodCall("BewaarPakketOnderdeel","PakketNummer","ProductID",1).DanDoeNiks()
-	Do PakketServiceMock.VerwachtMethodCall("VerwijderPakket","Teverwijderen1").DanDoeNiks()
-	Do PakketServiceMock.VerwachtMethodCall("VerwijderPakket","Teverwijderen2").DanDoeNiks()
-
-	Set Converter = ##class(vhUnitTest.AXimpl.Dynamics.ProductItemUpsertIn.Converter.ProductItemConverter.ProductItemConverterFake).%New(ProductAPIMock,ProductRolAPIMock,LangtekstBewaarderMock,KlasRepositoryMock,,,PakketServiceMock)
+	Set Converter = ##class(vhUnitTest.AXimpl.Dynamics.ProductItemUpsertIn.Converter.ProductItemConverter.ProductItemConverterFake).%New(ProductAPIMock,ProductRolAPIMock,LangtekstBewaarderMock,KlasRepositoryMock)
 	Set Converter.NieuwProductMock = ProductMock
 	
 	#dim Envelope as AXif.Dynamics.ProductItemIn.Envelope = ..GeefEnvelope("ProductItemInUpdateKorttekst.xml")
@@ -340,67 +310,10 @@
 	Do $$$AssertEquals(Converter.DoorgestuurdNaarEWMS,$$$True)
 	Do $$$AssertEquals(Converter.NieuwProductGegeven,$$$True)
 	
-	Do PakketServiceMock.Verifieer()
 	Do ProductMock.Verifieer()
 ]]></Implementation>
 </Method>
 
-<Method name="Test Bestaand pakket niet verwijderen indien in xmltag">
-<Implementation><![CDATA[
-	#dim ProductMock as vhTest.Mock.DOM.PM.Product = ..GeefProductMockMetVerwachtMethodCalls($$$True)	
-	Do ProductMock.IndienMethodCall("ZetIdentNr","IdentNummer").DanDoeNiks()
-	Do ProductMock.IndienMethodCall("ZetOpslagZone","9").DanDoeNiks()
-	Do ProductMock.VerwachtMethodCall("ZetMuntAankoop","EUR").DanDoeNiks()
-	Do ProductMock.VerwachtMethodCall("ZetBTWCode","8").DanDoeNiks()
-	Do ProductMock.VerwachtMethodCall("ZetWerkvloerEenheid","ST").DanDoeNiks() ;InventUnitId
-
-
-	#dim ProductAPIMock as DOM.PM.ProductAPI = ##class(vhTest.Mock.DOM.PM.ProductAPI).MockInstance()
-	Do ProductAPIMock.IndienMethodCall("BestaatIdentNr","IdentNummer").DanReturn($$$False)
-	
-	Set AdministratiefProductMock = ##class(vhTest.Mock.DOM.PM.AdministratiefProduct).%New()
-	Do AdministratiefProductMock.IndienMethodCall("ZetLangtekst","AVENTOS~SERVO-DRIVE   support d'interrupteur","F").DanDoeNiks()
-	Do AdministratiefProductMock.IndienMethodCall("ZetLangtekst","AVENTOS SERVO-DRIVE  schakelaarhouder","N").DanDoeNiks()
-	Do AdministratiefProductMock.IndienMethodCall("Save").DanDoeNiks()
-	
-	#dim ProductRolAPIMock as DOM.PM.ProductRolAPI = ##class(vhTest.Mock.DOM.PM.ProductRolAPI).MockInstance()
-	Do ProductRolAPIMock.IndienMethodCall("GeefAdministratiefProduct","ProductID").DanReturn(AdministratiefProductMock)
-
-	Set LangtekstBewaarderMock = ##class(vhTest.Mock.DOM.PM.LangtekstBewaarder).%New()
-	Do LangtekstBewaarderMock.IndienMethodCall("BewaarVoorTaal","ProductID","AVENTOS~SERVO-DRIVE   support d'interrupteur","F").DanDoeNiks()
-	Do LangtekstBewaarderMock.IndienMethodCall("BewaarVoorTaal","ProductID","AVENTOS SERVO-DRIVE  schakelaarhouder","N").DanDoeNiks()
-	Do LangtekstBewaarderMock.IndienMethodCall("BewaarBestelReferentie","ProductID","Lijn1~Lijn2").DanDoeNiks()
-	
-	Set KlasRepositoryMock = ##class(vhTest.Mock.Prod.Klas.KlasRepository).%New()
-	Do KlasRepositoryMock.IndienMethodCall("ZoekViaGroepen","KB","KVD","SVD/BL").DanReturn(..GeefKlasIterator())
-
-	Set PakketServiceMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.PakketService).%New()
-	#dim TeverwijderenPakketlijst as %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("Teverwijderen1","Teverwijderen2","TeBehouden")
-	Do PakketServiceMock.VerwachtMethodCall("GeefPakketNummersVoorKlantProduct","K||1000","ProductID").DanReturn(TeverwijderenPakketlijst)
-	Do PakketServiceMock.VerwachtMethodCall("BestaatViaPakketnaam","K||1000","klantreferentie").DanReturn($$$True)
-	Do PakketServiceMock.VerwachtMethodCall("GeefPakketNummerViaPakketnaam","K||1000","klantreferentie").DanReturn("TeBehouden")
-	Do PakketServiceMock.VerwachtMethodCall("GeefPakketType","TeBehouden").DanReturn("E")
-	
-	;Do PakketServiceMock.VerwachtMethodCall("ZetPakketType","PakketNummer","E").DanDoeNiks()
-	DO PakketServiceMock.VerwachtMethodCall("BewaarPakketOnderdeel","TeBehouden","ProductID",1).DanDoeNiks()
-	Do PakketServiceMock.VerwachtMethodCall("VerwijderPakket","Teverwijderen1").DanDoeNiks()
-	Do PakketServiceMock.VerwachtMethodCall("VerwijderPakket","Teverwijderen2").DanDoeNiks()
-
-	Set Converter = ##class(vhUnitTest.AXimpl.Dynamics.ProductItemUpsertIn.Converter.ProductItemConverter.ProductItemConverterFake).%New(ProductAPIMock,ProductRolAPIMock,LangtekstBewaarderMock,KlasRepositoryMock,,,PakketServiceMock)
-	Set Converter.NieuwProductMock = ProductMock
-	
-	#dim Envelope as AXif.Dynamics.ProductItemIn.Envelope = ..GeefEnvelope("ProductItemInUpdateKorttekst.xml")
-
-	Do Converter.ConvertProductItem(Envelope.Body.MessageParts.MessagePart.Item.GetAt(1),"vhbe")
-
-	Do $$$AssertEquals(Converter.DoorgestuurdNaarEWMS,$$$True)
-	Do $$$AssertEquals(Converter.NieuwProductGegeven,$$$True)
-	
-	Do PakketServiceMock.Verifieer()
-	Do ProductMock.Verifieer()
-]]></Implementation>
-</Method>
-
 <Method name="GeefKlasIterator">
 <Private>1</Private>
 <ReturnType>TECH.Iterator</ReturnType>