Index: vhTest/Fake/TECH/Persistent/impl/Gateway.cls.xml
===================================================================
diff -u
--- vhTest/Fake/TECH/Persistent/impl/Gateway.cls.xml	(revision 0)
+++ vhTest/Fake/TECH/Persistent/impl/Gateway.cls.xml	(revision 33340)
@@ -0,0 +1,44 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.TECH.Persistent.impl.Gateway">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden, nieuwe methodes worden automatisch bijgevoegd, bestaande blijven zoals ze zijn.
+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>TECH.Persistent.impl.Gateway</Super>
+
+<Method name="DeleteId">
+<FormalSpec>ID:%String</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
+<Method name="ExistsId">
+<FormalSpec>ID:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="New">
+<ReturnType>TECH.Persistent</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="OpenId">
+<FormalSpec>ID:%String</FormalSpec>
+<ReturnType>TECH.Persistent</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="Save">
+<FormalSpec>Data:TECH.Persistent</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: WSimpl/EC/ExterneVerkoop/VerzendingMogelijkheidRepository.cls.xml
===================================================================
diff -u -r33335 -r33340
--- WSimpl/EC/ExterneVerkoop/VerzendingMogelijkheidRepository.cls.xml	(.../VerzendingMogelijkheidRepository.cls.xml)	(revision 33335)
+++ WSimpl/EC/ExterneVerkoop/VerzendingMogelijkheidRepository.cls.xml	(.../VerzendingMogelijkheidRepository.cls.xml)	(revision 33340)
@@ -7,6 +7,15 @@
 <Type>%String</Type>
 <Default>WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid</Default>
 </Parameter>
+
+<Method name="VerwijderViaOfferteID">
+<FormalSpec>OfferteID:%String</FormalSpec>
+<Implementation><![CDATA[
+	#dim SqlStatement As TECH.String = "DELETE FROM " _..#DataClassName _" WHERE (OfferteID = ?)"
+	#dim lbParams As %List = $LB(OfferteID)
+	Do ..QueryAPI.ExecuteDynamicQuery(SqlStatement,lbParams)
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhUnitTest/WSimpl/EC/ExterneVerkoop/VerzendingMogelijkheidRepository/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/WSimpl/EC/ExterneVerkoop/VerzendingMogelijkheidRepository/Test.cls.xml	(revision 0)
+++ vhUnitTest/WSimpl/EC/ExterneVerkoop/VerzendingMogelijkheidRepository/Test.cls.xml	(revision 33340)
@@ -0,0 +1,73 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test: Maak ">
+<Implementation><![CDATA[
+	#dim DataClassName As %String = "WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid"
+	#dim MockGateway As vhTest.Mock.TECH.Persistent.impl.Gateway = ##class(vhTest.Mock.TECH.Persistent.impl.Gateway).%New(DataClassName)
+	Do MockGateway.VerwachtMethodCall("New").DanDoeNiks() 
+
+	#dim VerzendingMogelijkheidRepository As WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository = ##class(WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New(MockGateway)
+	do VerzendingMogelijkheidRepository.Maak()
+	do MockGateway.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test: Bewaar ">
+<Implementation><![CDATA[
+	#dim DummyClass As %String = "WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid"
+	#dim DataClassName As %String = "TestDataClassName"
+	#dim MockGateway As vhTest.Mock.TECH.Persistent.impl.Gateway = ##class(vhTest.Mock.TECH.Persistent.impl.Gateway).%New(DataClassName)
+	Do MockGateway.VerwachtMethodCall("Save",DummyClass).DanDoeNiks() 
+	
+	#dim VerzendingMogelijkheidRepository As WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository = ##class(WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New(MockGateway)
+	do VerzendingMogelijkheidRepository.Bewaar(DummyClass)
+	do MockGateway.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test: GeefViaID =&gt; controleer property waarden. ">
+<Implementation><![CDATA[
+	#dim DataClassName As %String = "WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid"
+	#dim MockGateway As vhTest.Mock.TECH.Persistent.impl.Gateway = ##class(vhTest.Mock.TECH.Persistent.impl.Gateway).%New(DataClassName)
+	Do MockGateway.VerwachtMethodCall("OpenId",1).DanDoeNiks() 
+	
+	#dim VerzendingMogelijkheidRepository As WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository = ##class(WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New(MockGateway)
+	do VerzendingMogelijkheidRepository.GeefViaID(1)
+	do MockGateway.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test: VerwijderViaOfferteID ">
+<Implementation><![CDATA[
+	#dim DataClassName As %String = "WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid"
+	#dim MockGateway As vhTest.Mock.TECH.Persistent.impl.Gateway = ##class(vhTest.Mock.TECH.Persistent.impl.Gateway).%New(DataClassName)
+	#dim MockQueryAPI As vhTest.Mock.TECH.Query.QueryAPI = ##class(vhTest.Mock.TECH.Query.QueryAPI).%New()
+	
+	#dim VerwachteSqlStatement As TECH.String = "DELETE FROM " _DataClassName _" WHERE (OfferteID = ?)"
+	#dim VerwachtelbParams As %List = $LB(666)
+	Do MockQueryAPI.VerwachtMethodCall("ExecuteDynamicQuery", VerwachteSqlStatement, VerwachtelbParams,$$$ElkeWaarde ).DanDoeNiks()
+	
+	#dim VerzendingMogelijkheidRepository As WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository = ##class(WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New(MockGateway, MockQueryAPI)
+	do VerzendingMogelijkheidRepository.VerwijderViaOfferteID(666)
+	do MockQueryAPI.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test: VerwijderID ">
+<Implementation><![CDATA[
+	#dim DataClassName As %String = "WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid"
+	#dim MockGateway As vhTest.Mock.TECH.Persistent.impl.Gateway = ##class(vhTest.Mock.TECH.Persistent.impl.Gateway).%New(DataClassName)
+	Do MockGateway.VerwachtMethodCall("DeleteId",1).DanDoeNiks() 
+
+	#dim VerzendingMogelijkheidRepository As WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository = ##class(WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New(MockGateway)
+	do VerzendingMogelijkheidRepository.VerwijderViaID(1)
+	Do MockGateway.Verifieer()
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Mock/TECH/Persistent/impl/Gateway.cls.xml
===================================================================
diff -u
--- vhTest/Mock/TECH/Persistent/impl/Gateway.cls.xml	(revision 0)
+++ vhTest/Mock/TECH/Persistent/impl/Gateway.cls.xml	(revision 33340)
@@ -0,0 +1,46 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Mock.TECH.Persistent.impl.Gateway">
+<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>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>TECH.Persistent.impl.Gateway,vhTest.Mock.TECH.Persistent.Gateway</Super>
+<Inheritance>right</Inheritance>
+
+<Method name="DeleteId">
+<FormalSpec>ID:%String</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("DeleteId",ID)
+]]></Implementation>
+</Method>
+
+<Method name="ExistsId">
+<FormalSpec>ID:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("ExistsId",ID)
+]]></Implementation>
+</Method>
+
+<Method name="New">
+<ReturnType>TECH.Persistent</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("New")
+]]></Implementation>
+</Method>
+
+<Method name="OpenId">
+<FormalSpec>ID:%String</FormalSpec>
+<ReturnType>TECH.Persistent</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("OpenId",ID)
+]]></Implementation>
+</Method>
+
+<Method name="Save">
+<FormalSpec>Data:TECH.Persistent</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("Save",Data)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Mock/TECH/Query/impl/QueryAPI.cls.xml
===================================================================
diff -u
--- vhTest/Mock/TECH/Query/impl/QueryAPI.cls.xml	(revision 0)
+++ vhTest/Mock/TECH/Query/impl/QueryAPI.cls.xml	(revision 33340)
@@ -0,0 +1,70 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Mock.TECH.Query.impl.QueryAPI">
+<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>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>TECH.Query.impl.QueryAPI,vhTest.Mock.TECH.Query.QueryAPI</Super>
+<Inheritance>right</Inheritance>
+
+<Method name="MockInstance">
+<ClassMethod>1</ClassMethod>
+<ReturnType>vhTest.Mock.TECH.Query.impl.QueryAPI</ReturnType>
+<Implementation><![CDATA[
+	do ##class(TECH.Context).Instance().PushQueryAPIClassName(##class(vhTest.Mock.TECH.Query.impl.QueryAPI).%ClassName(1))
+	quit ##class(TECH.Context).Instance().GeefQueryAPI()
+]]></Implementation>
+</Method>
+
+<Method name="ExecuteDynamicQuery">
+<FormalSpec>Query:%String,lbParams:%List="",RuntimeMode:TECH.enu.ResultSetRuntimeMode=""</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("ExecuteDynamicQuery",Query,lbParams,RuntimeMode)
+]]></Implementation>
+</Method>
+
+<Method name="GeefIDVanEnigeOptioneleRecord">
+<FormalSpec>Query:%String,lbParams:%List="",RuntimeMode:TECH.enu.ResultSetRuntimeMode=""</FormalSpec>
+<ReturnType>%CacheString</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefIDVanEnigeOptioneleRecord",Query,lbParams,RuntimeMode)
+]]></Implementation>
+</Method>
+
+<Method name="GeefQueryUitvoerder">
+<ReturnType>TECH.Query.QueryUitvoerder</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefQueryUitvoerder")
+]]></Implementation>
+</Method>
+
+<Method name="GeefRecords">
+<FormalSpec>KlasseNaam:%String</FormalSpec>
+<ReturnType>TECH.ResultSet</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefRecords",KlasseNaam)
+]]></Implementation>
+</Method>
+
+<Method name="GetDynamicResultSet">
+<FormalSpec>Query:%String,lbParams:%List="",RuntimeMode:TECH.enu.ResultSetRuntimeMode=""</FormalSpec>
+<ReturnType>TECH.ResultSet</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GetDynamicResultSet",Query,lbParams,RuntimeMode)
+]]></Implementation>
+</Method>
+
+<Method name="GetResultSet">
+<FormalSpec>Query:TECH.Query</FormalSpec>
+<ReturnType>TECH.ResultSet</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GetResultSet",Query)
+]]></Implementation>
+</Method>
+
+<Method name="HasResultsDynamicQuery">
+<FormalSpec>Query:%String,lbParams:%List="",RuntimeMode:TECH.enu.ResultSetRuntimeMode=""</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("HasResultsDynamicQuery",Query,lbParams,RuntimeMode)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Fake/TECH/Query/impl/QueryAPI.cls.xml
===================================================================
diff -u
--- vhTest/Fake/TECH/Query/impl/QueryAPI.cls.xml	(revision 0)
+++ vhTest/Fake/TECH/Query/impl/QueryAPI.cls.xml	(revision 33340)
@@ -0,0 +1,59 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.TECH.Query.impl.QueryAPI">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden, nieuwe methodes worden automatisch bijgevoegd, bestaande blijven zoals ze zijn.
+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>TECH.Query.impl.QueryAPI</Super>
+
+<Method name="ExecuteDynamicQuery">
+<FormalSpec>Query:%String,lbParams:%List="",RuntimeMode:TECH.enu.ResultSetRuntimeMode=""</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
+<Method name="GeefIDVanEnigeOptioneleRecord">
+<FormalSpec>Query:%String,lbParams:%List="",RuntimeMode:TECH.enu.ResultSetRuntimeMode=""</FormalSpec>
+<ReturnType>%CacheString</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="GeefQueryUitvoerder">
+<ReturnType>TECH.Query.QueryUitvoerder</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="GeefRecords">
+<FormalSpec>KlasseNaam:%String</FormalSpec>
+<ReturnType>TECH.ResultSet</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="GetDynamicResultSet">
+<FormalSpec>Query:%String,lbParams:%List="",RuntimeMode:TECH.enu.ResultSetRuntimeMode=""</FormalSpec>
+<ReturnType>TECH.ResultSet</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="GetResultSet">
+<FormalSpec>Query:TECH.Query</FormalSpec>
+<ReturnType>TECH.ResultSet</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="HasResultsDynamicQuery">
+<FormalSpec>Query:%String,lbParams:%List="",RuntimeMode:TECH.enu.ResultSetRuntimeMode=""</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>