Index: vhUnitTest/APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteKopieerder/Kopieer/Test.cls.xml
===================================================================
diff -u -r53675 -r53917
--- vhUnitTest/APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteKopieerder/Kopieer/Test.cls.xml	(.../Test.cls.xml)	(revision 53675)
+++ vhUnitTest/APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteKopieerder/Kopieer/Test.cls.xml	(.../Test.cls.xml)	(revision 53917)
@@ -212,6 +212,27 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test : Foutmelding met extra uitleg wanneer de OfferteKopieerder crasht">
+<Implementation><![CDATA[
+	Set Bestelling = ##class(vhTest.Fake.APPS.VKP.impl.Offerte).%New("Demo_UTKlantId",##class(DOM.common.DemoPersonality).Instance().GeefID())
+	Do Bestelling.ZetID("UT_OfferteID")
+	
+	Set OfferteKopieerderMock = ##class(vhTest.Mock.APPS.VKP.Offerte.impl.OfferteKopieerder).%New()
+	Do OfferteKopieerderMock.VerwachtMethodCall("KopieerOfferte", Bestelling, ##class(DOM.VKP.enu.Klant).DemoMultiPersonality(), ##class(DOM.common.enu.Personality).VanHoecke()).DanException($$$DummyException)
+	
+	Set Kopieerder = ##class(APPS.VKP.Offerte.impl.KlantBestellingNaarLeverancierOfferteKopieerder).%New(OfferteKopieerderMock)
+	
+	#dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("Fout bij kopieren van de webshop-bestelling 'UT_OfferteID' voor klant 'Demo_UTKlantId' van personality 'Demo' naar '1'", 
+																	"!!! OPGELET !!!", 
+																	"Deze bestelling moet manueel opnieuw verwerkt worden, bvb. via de Powertool ExterneVerkoopPowerService method BestelAfhandelingOpnieuwVerwerken().", 
+																	"Eerst vhLibLogging nakijken in welke status de bestelling zich bevindt !!!" 
+																	)
+	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.GeneralErrorException",Substrings))
+	
+	Do Kopieerder.Kopieer(Bestelling)
+]]></Implementation>
+</Method>
+
 <Method name="GeefOfferte">
 <FormalSpec>Personality:DOM.common.Personality</FormalSpec>
 <Private>1</Private>