Index: vhUnitTest/APPS/EDI/Bestel/impl/BestelService/PlaatsBestelling/Test.cls.xml
===================================================================
diff -u -r36377 -r36430
--- vhUnitTest/APPS/EDI/Bestel/impl/BestelService/PlaatsBestelling/Test.cls.xml	(.../Test.cls.xml)	(revision 36377)
+++ vhUnitTest/APPS/EDI/Bestel/impl/BestelService/PlaatsBestelling/Test.cls.xml	(.../Test.cls.xml)	(revision 36430)
@@ -12,119 +12,119 @@
 <Implementation><![CDATA[
 	#dim Aanvraag As APPS.EDI.Bestel.BestelService.PlaatsBestelling.Aanvraag = ..GeefAanvraag()
 	
-	#dim UnishopBestellerStub As vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.UnishopBesteller = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.UnishopBesteller).%New()
-	Do UnishopBestellerStub.VerwachtMethodCall("MaakOfferte",Aanvraag).ExactAantalKeer(1).DanReturn(..GeefResultaatMetExceptie())
-	Do UnishopBestellerStub.VerwachtMethodCall("BestelOfferte",1234,Aanvraag).ExactAantalKeer(0)
-	#dim TandemboxBestellerStub As vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller).%New()
-	Do TandemboxBestellerStub.VerwachtMethodCall("MaakOfferte",Aanvraag).ExactAantalKeer(1).DanReturn(..GeefResultaatMetExceptie())
-	Do TandemboxBestellerStub.VerwachtMethodCall("BestelOfferte",1234).ExactAantalKeer(0)
+	#dim UnishopBestellerMock As vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.UnishopBesteller = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.UnishopBesteller).%New()
+	Do UnishopBestellerMock.IndienMethodCall("MaakOfferte",Aanvraag).DanReturn(..GeefResultaatMetExceptie())
+	Do UnishopBestellerMock.VerwachtMethodCall("BestelOfferte",1234,Aanvraag).ExactAantalKeer(0)
+	#dim TandemboxBestellerMock As vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller).%New()
+	Do TandemboxBestellerMock.IndienMethodCall("MaakOfferte",Aanvraag).DanReturn(..GeefResultaatMetExceptie())
+	Do TandemboxBestellerMock.VerwachtMethodCall("BestelOfferte",1234).ExactAantalKeer(0)
 	
-	Set BestelService = ##class(APPS.EDI.Bestel.impl.BestelService).%New(UnishopBestellerStub, TandemboxBestellerStub)
+	Set BestelService = ##class(APPS.EDI.Bestel.impl.BestelService).%New(UnishopBestellerMock, TandemboxBestellerMock)
 	#dim Resultaat As APPS.EDI.Bestel.BestelService.PlaatsBestelling.Resultaat  = BestelService.PlaatsBestelling(Aanvraag)
 	do $$$AssertEquals(Resultaat.Exceptie.GeefInnerExcepties().Count(),2)
 	
-	Do UnishopBestellerStub.Verifieer()
-	Do TandemboxBestellerStub.Verifieer()
+	Do UnishopBestellerMock.Verifieer()
+	Do TandemboxBestellerMock.Verifieer()
 ]]></Implementation>
 </Method>
 
 <Method name="Test: UnishopBesteller geeft geen fout,TBXBesteller geeft fout">
 <Implementation><![CDATA[
 	#dim Aanvraag As APPS.EDI.Bestel.BestelService.PlaatsBestelling.Aanvraag = ..GeefAanvraag()
 	
-	#dim UnishopBestellerStub As vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.UnishopBesteller = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.UnishopBesteller).%New()
-	Do UnishopBestellerStub.VerwachtMethodCall("MaakOfferte",Aanvraag).ExactAantalKeer(1).DanReturn(..GeefResultaatZonderExceptie())
-	Do UnishopBestellerStub.VerwachtMethodCall("BestelOfferte",1234,Aanvraag).ExactAantalKeer(0)
-	#dim TandemboxBestellerStub As vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller).%New()
-	Do TandemboxBestellerStub.VerwachtMethodCall("MaakOfferte",Aanvraag).ExactAantalKeer(1).DanReturn(..GeefResultaatMetExceptie())
-	Do TandemboxBestellerStub.VerwachtMethodCall("BestelOfferte",1234).ExactAantalKeer(0)
+	#dim UnishopBestellerMock As vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.UnishopBesteller = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.UnishopBesteller).%New()
+	Do UnishopBestellerMock.IndienMethodCall("MaakOfferte",Aanvraag).DanReturn(..GeefResultaatZonderExceptie())
+	Do UnishopBestellerMock.VerwachtMethodCall("BestelOfferte",1234,Aanvraag).ExactAantalKeer(0)
+	#dim TandemboxBestellerMock As vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller).%New()
+	Do TandemboxBestellerMock.IndienMethodCall("MaakOfferte",Aanvraag).DanReturn(..GeefResultaatMetExceptie())
+	Do TandemboxBestellerMock.VerwachtMethodCall("BestelOfferte",1234).ExactAantalKeer(0)
 	
-	Set BestelService = ##class(APPS.EDI.Bestel.impl.BestelService).%New(UnishopBestellerStub, TandemboxBestellerStub)
+	Set BestelService = ##class(APPS.EDI.Bestel.impl.BestelService).%New(UnishopBestellerMock, TandemboxBestellerMock)
 	#dim Resultaat As APPS.EDI.Bestel.BestelService.PlaatsBestelling.Resultaat  = BestelService.PlaatsBestelling(Aanvraag)
 	do $$$AssertEquals(Resultaat.Exceptie.GeefInnerExcepties().Count(),1)
 	
-	Do UnishopBestellerStub.Verifieer()
-	Do TandemboxBestellerStub.Verifieer()
+	Do UnishopBestellerMock.Verifieer()
+	Do TandemboxBestellerMock.Verifieer()
 ]]></Implementation>
 </Method>
 
 <Method name="Test: UnishopBesteller geeft fout,TBXBesteller geeft geen fout">
 <Implementation><![CDATA[
 	#dim Aanvraag As APPS.EDI.Bestel.BestelService.PlaatsBestelling.Aanvraag = ..GeefAanvraag()
 	
-	#dim UnishopBestellerStub As vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.UnishopBesteller = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.UnishopBesteller).%New()
-	Do UnishopBestellerStub.VerwachtMethodCall("MaakOfferte",Aanvraag).ExactAantalKeer(1).DanReturn(..GeefResultaatMetExceptie())
-	Do UnishopBestellerStub.VerwachtMethodCall("BestelOfferte",1234,Aanvraag).ExactAantalKeer(0)
-	#dim TandemboxBestellerStub As vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller).%New()
-	Do TandemboxBestellerStub.VerwachtMethodCall("MaakOfferte",Aanvraag).ExactAantalKeer(1).DanReturn(..GeefResultaatZonderExceptie())
-	Do TandemboxBestellerStub.VerwachtMethodCall("BestelOfferte",1234).ExactAantalKeer(0)
+	#dim UnishopBestellerMock As vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.UnishopBesteller = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.UnishopBesteller).%New()
+	Do UnishopBestellerMock.IndienMethodCall("MaakOfferte",Aanvraag).DanReturn(..GeefResultaatMetExceptie())
+	Do UnishopBestellerMock.VerwachtMethodCall("BestelOfferte",1234,Aanvraag).ExactAantalKeer(0)
+	#dim TandemboxBestellerMock As vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller).%New()
+	Do TandemboxBestellerMock.IndienMethodCall("MaakOfferte",Aanvraag).DanReturn(..GeefResultaatZonderExceptie())
+	Do TandemboxBestellerMock.VerwachtMethodCall("BestelOfferte",1234).ExactAantalKeer(0)
 	
-	Set BestelService = ##class(APPS.EDI.Bestel.impl.BestelService).%New(UnishopBestellerStub, TandemboxBestellerStub)
+	Set BestelService = ##class(APPS.EDI.Bestel.impl.BestelService).%New(UnishopBestellerMock, TandemboxBestellerMock)
 	#dim Resultaat As APPS.EDI.Bestel.BestelService.PlaatsBestelling.Resultaat  = BestelService.PlaatsBestelling(Aanvraag)
 	do $$$AssertEquals(Resultaat.Exceptie.GeefInnerExcepties().Count(),1)
 	
-	Do UnishopBestellerStub.Verifieer()
-	Do TandemboxBestellerStub.Verifieer()
+	Do UnishopBestellerMock.Verifieer()
+	Do TandemboxBestellerMock.Verifieer()
 ]]></Implementation>
 </Method>
 
 <Method name="Test: UnishopBesteller geeft geen fout,TBXBesteller geeft geen fout">
 <Implementation><![CDATA[
 	#dim Aanvraag As APPS.EDI.Bestel.BestelService.PlaatsBestelling.Aanvraag = ..GeefAanvraag()
 	
-	#dim UnishopBestellerStub As vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.UnishopBesteller = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.UnishopBesteller).%New()
-	Do UnishopBestellerStub.VerwachtMethodCall("MaakOfferte",Aanvraag).ExactAantalKeer(1).DanReturn(..GeefResultaatZonderExceptie())
-	Do UnishopBestellerStub.VerwachtMethodCall("BestelOfferte",1234,Aanvraag).ExactAantalKeer(1)
-	#dim TandemboxBestellerStub As vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller).%New()
-	Do TandemboxBestellerStub.VerwachtMethodCall("MaakOfferte",Aanvraag).ExactAantalKeer(1).DanReturn(..GeefResultaatZonderExceptie())
-	Do TandemboxBestellerStub.VerwachtMethodCall("BestelOfferte",1234).ExactAantalKeer(1).DanReturn(..GeefResultaatZonderExceptie())	
+	#dim UnishopBestellerMock As vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.UnishopBesteller = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.UnishopBesteller).%New()
+	Do UnishopBestellerMock.IndienMethodCall("MaakOfferte",Aanvraag).DanReturn(..GeefResultaatZonderExceptie())
+	Do UnishopBestellerMock.VerwachtMethodCall("BestelOfferte",1234,Aanvraag).ExactAantalKeer(1)
+	#dim TandemboxBestellerMock As vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller).%New()
+	Do TandemboxBestellerMock.IndienMethodCall("MaakOfferte",Aanvraag).DanReturn(..GeefResultaatZonderExceptie())
+	Do TandemboxBestellerMock.VerwachtMethodCall("BestelOfferte",1234).ExactAantalKeer(1)
 	
-	Set BestelService = ##class(APPS.EDI.Bestel.impl.BestelService).%New(UnishopBestellerStub, TandemboxBestellerStub)
+	Set BestelService = ##class(APPS.EDI.Bestel.impl.BestelService).%New(UnishopBestellerMock, TandemboxBestellerMock)
 	#dim Resultaat As APPS.EDI.Bestel.BestelService.PlaatsBestelling.Resultaat  = BestelService.PlaatsBestelling(Aanvraag)
 	do $$$AssertFalse($isObject(Resultaat.Exceptie))
 	
-	Do UnishopBestellerStub.Verifieer()
-	Do TandemboxBestellerStub.Verifieer()
+	Do UnishopBestellerMock.Verifieer()
+	Do TandemboxBestellerMock.Verifieer()
 ]]></Implementation>
 </Method>
 
 <Method name="Test: TBXBesteller geeft geen fout bij MaakOfferte en wel bij BestelOfferte, UNI doet alles goed">
 <Implementation><![CDATA[
 	#dim Aanvraag As APPS.EDI.Bestel.BestelService.PlaatsBestelling.Aanvraag = ..GeefAanvraag()
 	
-	#dim UnishopBestellerStub As vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.UnishopBesteller = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.UnishopBesteller).%New()
-	Do UnishopBestellerStub.VerwachtMethodCall("MaakOfferte",Aanvraag).ExactAantalKeer(1).DanReturn(..GeefResultaatZonderExceptie())
-	Do UnishopBestellerStub.VerwachtMethodCall("BestelOfferte",1234,Aanvraag).ExactAantalKeer(1)
-	#dim TandemboxBestellerStub As vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller).%New()
-	Do TandemboxBestellerStub.VerwachtMethodCall("MaakOfferte",Aanvraag).ExactAantalKeer(1).DanReturn(..GeefResultaatZonderExceptie())
-	Do TandemboxBestellerStub.VerwachtMethodCall("BestelOfferte",1234).ExactAantalKeer(1).DanReturn(..GeefResultaatMetExceptie())
+	#dim UnishopBestellerMock As vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.UnishopBesteller = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.UnishopBesteller).%New()
+	Do UnishopBestellerMock.IndienMethodCall("MaakOfferte",Aanvraag).ExactAantalKeer(1).DanReturn(..GeefResultaatZonderExceptie())
+	Do UnishopBestellerMock.VerwachtMethodCall("BestelOfferte",1234,Aanvraag).ExactAantalKeer(1)
+	#dim TandemboxBestellerMock As vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller).%New()
+	Do TandemboxBestellerMock.IndienMethodCall("MaakOfferte",Aanvraag).ExactAantalKeer(1).DanReturn(..GeefResultaatZonderExceptie())
+	Do TandemboxBestellerMock.VerwachtMethodCall("BestelOfferte",1234).ExactAantalKeer(1).DanReturn(..GeefResultaatMetExceptie())
 	
-	Set BestelService = ##class(APPS.EDI.Bestel.impl.BestelService).%New(UnishopBestellerStub, TandemboxBestellerStub)
+	Set BestelService = ##class(APPS.EDI.Bestel.impl.BestelService).%New(UnishopBestellerMock, TandemboxBestellerMock)
 	#dim Resultaat As APPS.EDI.Bestel.BestelService.PlaatsBestelling.Resultaat  = BestelService.PlaatsBestelling(Aanvraag)
 	do $$$AssertEquals(Resultaat.Exceptie.GeefInnerExcepties().Count(),1)
 	
-	Do UnishopBestellerStub.Verifieer()
-	Do TandemboxBestellerStub.Verifieer()
+	Do UnishopBestellerMock.Verifieer()
+	Do TandemboxBestellerMock.Verifieer()
 ]]></Implementation>
 </Method>
 
 <Method name="Test: TBXBesteller geeft geen fout bij MaakOfferte en wel bij BestelOfferte, UNI idem">
 <Implementation><![CDATA[
 	#dim Aanvraag As APPS.EDI.Bestel.BestelService.PlaatsBestelling.Aanvraag = ..GeefAanvraag()
 	
-	#dim UnishopBestellerStub As vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.UnishopBesteller = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.UnishopBesteller).%New()
-	Do UnishopBestellerStub.VerwachtMethodCall("MaakOfferte",Aanvraag).ExactAantalKeer(1).DanReturn(..GeefResultaatZonderExceptie())
-	Do UnishopBestellerStub.VerwachtMethodCall("BestelOfferte",1234,Aanvraag).ExactAantalKeer(1).DanReturn(..GeefResultaatMetExceptie())
-	#dim TandemboxBestellerStub As vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller).%New()
-	Do TandemboxBestellerStub.VerwachtMethodCall("MaakOfferte",Aanvraag).ExactAantalKeer(1).DanReturn(..GeefResultaatZonderExceptie())
-	Do TandemboxBestellerStub.VerwachtMethodCall("BestelOfferte",1234).ExactAantalKeer(1).DanReturn(..GeefResultaatMetExceptie())
+	#dim UnishopBestellerMock As vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.UnishopBesteller = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.UnishopBesteller).%New()
+	Do UnishopBestellerMock.IndienMethodCall("MaakOfferte",Aanvraag).ExactAantalKeer(1).DanReturn(..GeefResultaatZonderExceptie())
+	Do UnishopBestellerMock.VerwachtMethodCall("BestelOfferte",1234,Aanvraag).ExactAantalKeer(1).DanReturn(..GeefResultaatMetExceptie())
+	#dim TandemboxBestellerMock As vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller = ##class(vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller).%New()
+	Do TandemboxBestellerMock.IndienMethodCall("MaakOfferte",Aanvraag).ExactAantalKeer(1).DanReturn(..GeefResultaatZonderExceptie())
+	Do TandemboxBestellerMock.VerwachtMethodCall("BestelOfferte",1234).ExactAantalKeer(1).DanReturn(..GeefResultaatMetExceptie())
 	
-	Set BestelService = ##class(APPS.EDI.Bestel.impl.BestelService).%New(UnishopBestellerStub, TandemboxBestellerStub)
+	Set BestelService = ##class(APPS.EDI.Bestel.impl.BestelService).%New(UnishopBestellerMock, TandemboxBestellerMock)
 	#dim Resultaat As APPS.EDI.Bestel.BestelService.PlaatsBestelling.Resultaat  = BestelService.PlaatsBestelling(Aanvraag)
 	do $$$AssertEquals(Resultaat.Exceptie.GeefInnerExcepties().Count(),2)
 	
-	Do UnishopBestellerStub.Verifieer()
-	Do TandemboxBestellerStub.Verifieer()
+	Do UnishopBestellerMock.Verifieer()
+	Do TandemboxBestellerMock.Verifieer()
 ]]></Implementation>
 </Method>