Index: vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/MaakOfferte/Test.cls.xml
===================================================================
diff -u -r40580 -r44240
--- vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/MaakOfferte/Test.cls.xml	(.../Test.cls.xml)	(revision 40580)
+++ vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/MaakOfferte/Test.cls.xml	(.../Test.cls.xml)	(revision 44240)
@@ -26,7 +26,10 @@
 	Set VerkoopAPI = ##class(vhTest.Mock.DOM.VKP.VerkoopAPI).%New()
 	Do VerkoopAPI.IndienMethodCall("GeefKlant",..#KlantID).DanReturn(StandaardKlant)
 	
-	Set TandemboxBesteller = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller).%New(VerkoopAPI)
+	Set DataIOWWWStub = ##class(vhTest.Mock.WS.TBX.DataIOWWW).%New()
+	Do DataIOWWWStub.IndienMethodCall("WSOrdToWWW",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn($ListBuild("1"))
+	
+	Set TandemboxBesteller = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller).%New(VerkoopAPI,,DataIOWWWStub)
 	Do TandemboxBesteller.MaakOfferte(Aanvraag)
 	
 	Do $$$AssertEquals(TandemboxBesteller.GeefWebOrder().KLNummer,StandaardKlant.GeefCode())
@@ -58,8 +61,12 @@
 	Set VerkoopAPI = ##class(vhTest.Mock.DOM.VKP.VerkoopAPI).%New()
 	Do VerkoopAPI.IndienMethodCall("GeefKlant",..#KlantID).DanReturn(StandaardKlant)
 	
-	Set TandemboxBesteller = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller).%New(VerkoopAPI)
+	Set DataIOWWWStub = ##class(vhTest.Mock.WS.TBX.DataIOWWW).%New()
+	Do DataIOWWWStub.IndienMethodCall("WSOrdToWWW",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn($ListBuild("1"))
+	
+	Set TandemboxBesteller = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller).%New(VerkoopAPI,,DataIOWWWStub)
 	#dim Resultaat As APPS.EDI.Bestel.BestelService.PlaatsBestelling.Resultaat = TandemboxBesteller.MaakOfferte(Aanvraag)
+	
 	Do $$$AssertEquals(Resultaat.Exceptie.GeefOmschrijving(),"RequestedDeliveryDate not valid. (2011.42.42)")
 ]]></Implementation>
 </Method>
@@ -77,8 +84,12 @@
 	Set VerkoopAPI = ##class(vhTest.Mock.DOM.VKP.VerkoopAPI).%New()
 	Do VerkoopAPI.IndienMethodCall("GeefKlant",..#KlantID).DanReturn(StandaardKlant)
 	
-	Set TandemboxBesteller = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller).%New(VerkoopAPI)
+	Set DataIOWWWStub = ##class(vhTest.Mock.WS.TBX.DataIOWWW).%New()
+	Do DataIOWWWStub.IndienMethodCall("WSOrdToWWW",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn($ListBuild("1"))
+	
+	Set TandemboxBesteller = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller).%New(VerkoopAPI,,DataIOWWWStub)
 	#dim Resultaat As APPS.EDI.Bestel.BestelService.PlaatsBestelling.Resultaat = TandemboxBesteller.MaakOfferte(Aanvraag)
+	
 	Do $$$AssertEquals(TandemboxBesteller.GeefWebOrder().LeverTijd,"")
 	Do $$$AssertEquals(TandemboxBesteller.GeefWebOrder().LeverTijdID,"LATER")
 ]]></Implementation>
@@ -104,8 +115,12 @@
 	Set VerkoopAPI = ##class(vhTest.Mock.DOM.VKP.VerkoopAPI).%New()
 	Do VerkoopAPI.IndienMethodCall("GeefKlant",..#KlantID).DanReturn(StandaardKlant)
 	
-	Set TandemboxBesteller = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller).%New(VerkoopAPI)
+	Set DataIOWWWStub = ##class(vhTest.Mock.WS.TBX.DataIOWWW).%New()
+	Do DataIOWWWStub.IndienMethodCall("WSOrdToWWW",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn($ListBuild("1"))
+	
+	Set TandemboxBesteller = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller).%New(VerkoopAPI,,DataIOWWWStub)
 	#dim Resultaat As APPS.EDI.Bestel.BestelService.PlaatsBestelling.Resultaat = TandemboxBesteller.MaakOfferte(Aanvraag)
+	
 	Do $$$AssertEquals(TandemboxBesteller.GeefWebOrder().Opmerking1,"Naam"_$$$CRLF_"Straat 1"_$$$CRLF_"1234 Woonplaats"_$$$CRLF_"BELGIE")
 ]]></Implementation>
 </Method>
@@ -130,8 +145,12 @@
 	Set VerkoopAPI = ##class(vhTest.Mock.DOM.VKP.VerkoopAPI).%New()
 	Do VerkoopAPI.IndienMethodCall("GeefKlant",..#KlantID).DanReturn(StandaardKlant)
 	
-	Set TandemboxBesteller = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller).%New(VerkoopAPI)
+	Set DataIOWWWStub = ##class(vhTest.Mock.WS.TBX.DataIOWWW).%New()
+	Do DataIOWWWStub.IndienMethodCall("WSOrdToWWW",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn($ListBuild("1"))
+	
+	Set TandemboxBesteller = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller).%New(VerkoopAPI,,DataIOWWWStub)
 	#dim Resultaat As APPS.EDI.Bestel.BestelService.PlaatsBestelling.Resultaat = TandemboxBesteller.MaakOfferte(Aanvraag)
+	
 	Do $$$AssertEquals(TandemboxBesteller.GeefWebOrder().Opmerking1,"")
 ]]></Implementation>
 </Method>
@@ -158,15 +177,16 @@
 	Set WebOrder2 = ##class(WS.TBX.Order).%New()
 	Set WebOrder2.CommissieReferentie = "De Commissiereferentie 2"
 	
-	Set DataIOWWWMock = ##class(vhTest.Mock.WS.TBX.DataIOWWW).%New()
+	Set DataIOWWWStub = ##class(vhTest.Mock.WS.TBX.DataIOWWW).%New()
 	Set Matcher1 = ##class(vhUnitTest.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.MaakOfferte.Test.WebOrderReferentieMatcher).%New(WebOrder1)
-	Do DataIOWWWMock.IndienMethodCall("WSOrdToWWW",Matcher1,$$$ElkeWaarde,$$$ElkeWaarde).DanReturn($lb("78"))
+	Do DataIOWWWStub.IndienMethodCall("WSOrdToWWW",Matcher1,$$$ElkeWaarde,$$$ElkeWaarde).DanReturn($lb("78"))
 	Set Matcher2 = ##class(vhUnitTest.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.MaakOfferte.Test.WebOrderReferentieMatcher).%New(WebOrder2)
-	Do DataIOWWWMock.IndienMethodCall("WSOrdToWWW",Matcher2,$$$ElkeWaarde,$$$ElkeWaarde).DanReturn($lb("2"))
+	Do DataIOWWWStub.IndienMethodCall("WSOrdToWWW",Matcher2,$$$ElkeWaarde,$$$ElkeWaarde).DanReturn($lb("2"))
 	
-	Set TandemboxBesteller = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller).%New(VerkoopAPI,,DataIOWWWMock)
+	Set TandemboxBesteller = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller).%New(VerkoopAPI,,DataIOWWWStub)
 	#dim Resultaat1 As APPS.EDI.Bestel.BestelService.PlaatsBestelling.Resultaat = TandemboxBesteller.MaakOfferte(Aanvraag1)
 	#dim Resultaat2 As APPS.EDI.Bestel.BestelService.PlaatsBestelling.Resultaat = TandemboxBesteller.MaakOfferte(Aanvraag2)
+	
 	Do $$$AssertNotEquals(Resultaat1.OfferteIDTBX,Resultaat2.OfferteIDTBX)
 	Do $$$AssertEquals(Resultaat1.Exceptie,"")
 	Do $$$AssertEquals(Resultaat2.Exceptie,"")
Index: vhTest/Mock/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller.cls.xml
===================================================================
diff -u -r36377 -r44240
--- vhTest/Mock/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller.cls.xml	(.../TandemboxBesteller.cls.xml)	(revision 36377)
+++ vhTest/Mock/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller.cls.xml	(.../TandemboxBesteller.cls.xml)	(revision 44240)
@@ -3,8 +3,7 @@
 <Class name="vhTest.Mock.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller">
 <Description>
 Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
-Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
-Inheritance van meerdere TECH.Interface interfaces resulteert nog niet in een mockklasse met overeenkomstige inheritance-structuur.</Description>
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
 <ProcedureBlock>1</ProcedureBlock>
 <Super>APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller,Tools.Mock.MockClassBase</Super>
 <Inheritance>right</Inheritance>