Index: vhTest/Mock/CHUI/VKP/OrderIngave/TeVerwijderenTijdelijkeOrders.cls.xml
===================================================================
diff -u
--- vhTest/Mock/CHUI/VKP/OrderIngave/TeVerwijderenTijdelijkeOrders.cls.xml	(revision 0)
+++ vhTest/Mock/CHUI/VKP/OrderIngave/TeVerwijderenTijdelijkeOrders.cls.xml	(revision 51187)
@@ -0,0 +1,87 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Mock.CHUI.VKP.OrderIngave.TeVerwijderenTijdelijkeOrders">
+<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</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>CHUI.VKP.OrderIngave.TeVerwijderenTijdelijkeOrders,Tools.Mock.MockClassBase</Super>
+<Inheritance>right</Inheritance>
+
+<Method name="Delete">
+<Implementation><![CDATA[	do ..VerwerkMethodCall("Delete")
+]]></Implementation>
+</Method>
+
+<Method name="GeefID">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefID")
+]]></Implementation>
+</Method>
+
+<Method name="GeefOrderNr">
+<ReturnType>TECH.String</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefOrderNr")
+]]></Implementation>
+</Method>
+
+<Method name="GeefPogingen">
+<ReturnType>TECH.Numeric</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefPogingen")
+]]></Implementation>
+</Method>
+
+<Method name="OnDelete">
+<Implementation><![CDATA[	do ..VerwerkMethodCall("OnDelete")
+]]></Implementation>
+</Method>
+
+<Method name="Save">
+<Implementation><![CDATA[	do ..VerwerkMethodCall("Save")
+]]></Implementation>
+</Method>
+
+<Method name="Validate">
+<Implementation><![CDATA[	do ..VerwerkMethodCall("Validate")
+]]></Implementation>
+</Method>
+
+<Method name="VerhoogPogingen">
+<FormalSpec>Increment:TECH.Numeric</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("VerhoogPogingen",Increment)
+]]></Implementation>
+</Method>
+
+<Method name="ZetOrderNr">
+<FormalSpec>OrderNr:TECH.String</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("ZetOrderNr",OrderNr)
+]]></Implementation>
+</Method>
+
+<Method name="ZetPogingen">
+<FormalSpec>Pogingen:TECH.Numeric</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("ZetPogingen",Pogingen)
+]]></Implementation>
+</Method>
+
+<Storage name="Default">
+<Type>%Library.CacheStorage</Type>
+<DefaultData>TeVerwijderenTijdelijkeOrdersDe1</DefaultData>
+<Data name="TeVerwijderenTijdelijkeOrdersDe1">
+<Structure>listnode</Structure>
+<Subscript>"TeVerwijderenTijdelijkeOrders"</Subscript>
+<Value name="1">
+<Value>FormalSpecParser</Value>
+</Value>
+<Value name="2">
+<Value>MethodCallStubs</Value>
+</Value>
+<Value name="3">
+<Value>IsMethodCallVerwacht</Value>
+</Value>
+</Data>
+</Storage>
+</Class>
+
+
+</Export>
Index: CHUI/VKP/OrderIngave/TeVerwijderenTijdelijkeOrders.cls.xml
===================================================================
diff -u -r51171 -r51187
--- CHUI/VKP/OrderIngave/TeVerwijderenTijdelijkeOrders.cls.xml	(.../TeVerwijderenTijdelijkeOrders.cls.xml)	(revision 51171)
+++ CHUI/VKP/OrderIngave/TeVerwijderenTijdelijkeOrders.cls.xml	(.../TeVerwijderenTijdelijkeOrders.cls.xml)	(revision 51187)
@@ -2,17 +2,52 @@
 <Export generator="Cache" version="24">
 <Class name="CHUI.VKP.OrderIngave.TeVerwijderenTijdelijkeOrders">
 <ClassType>persistent</ClassType>
-<Super>TECH.Persistent</Super>
+<Super>TECH.Persistent,TECH.Mockable</Super>
 
 <Property name="OrderNr">
 <Type>TECH.String</Type>
 </Property>
 
+<Property name="Pogingen">
+<Type>TECH.Numeric</Type>
+<InitialExpression>0</InitialExpression>
+</Property>
+
 <Index name="OrderNrIndex">
 <Properties>OrderNr</Properties>
 <Unique>1</Unique>
 </Index>
 
+<Method name="GeefOrderNr">
+<ReturnType>TECH.String</ReturnType>
+<Implementation><![CDATA[	Quit ..OrderNr
+]]></Implementation>
+</Method>
+
+<Method name="ZetOrderNr">
+<FormalSpec>OrderNr:TECH.String</FormalSpec>
+<Implementation><![CDATA[	Set ..OrderNr = OrderNr
+]]></Implementation>
+</Method>
+
+<Method name="GeefPogingen">
+<ReturnType>TECH.Numeric</ReturnType>
+<Implementation><![CDATA[	Quit ..Pogingen
+]]></Implementation>
+</Method>
+
+<Method name="ZetPogingen">
+<FormalSpec>Pogingen:TECH.Numeric</FormalSpec>
+<Implementation><![CDATA[	Set ..Pogingen = Pogingen
+]]></Implementation>
+</Method>
+
+<Method name="VerhoogPogingen">
+<FormalSpec>Increment:TECH.Numeric</FormalSpec>
+<Implementation><![CDATA[	Set ..Pogingen = ..Pogingen + Increment
+]]></Implementation>
+</Method>
+
 <Storage name="Default">
 <Type>%Library.CacheStorage</Type>
 <DataLocation>^CHUI.VKP.O6E74.TeVerwijderDE2CD</DataLocation>
@@ -27,6 +62,9 @@
 <Value name="2">
 <Value>OrderNr</Value>
 </Value>
+<Value name="3">
+<Value>Pogingen</Value>
+</Value>
 </Data>
 </Storage>
 </Class>
Index: vhTest/Fake/CHUI/VKP/OrderIngave/TeVerwijderenTijdelijkeOrders.cls.xml
===================================================================
diff -u
--- vhTest/Fake/CHUI/VKP/OrderIngave/TeVerwijderenTijdelijkeOrders.cls.xml	(revision 0)
+++ vhTest/Fake/CHUI/VKP/OrderIngave/TeVerwijderenTijdelijkeOrders.cls.xml	(revision 51187)
@@ -0,0 +1,72 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.CHUI.VKP.OrderIngave.TeVerwijderenTijdelijkeOrders">
+<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>CHUI.VKP.OrderIngave.TeVerwijderenTijdelijkeOrders</Super>
+
+<Method name="Delete">
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
+<Method name="GeefID">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="GeefOrderNr">
+<ReturnType>TECH.String</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="GeefPogingen">
+<ReturnType>TECH.Numeric</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="OnDelete">
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
+<Method name="Save">
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
+<Method name="Validate">
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
+<Method name="VerhoogPogingen">
+<FormalSpec>Increment:TECH.Numeric</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
+<Method name="ZetOrderNr">
+<FormalSpec>OrderNr:TECH.String</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
+<Method name="ZetPogingen">
+<FormalSpec>Pogingen:TECH.Numeric</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
+<Storage name="Default">
+<Type>%Library.CacheStorage</Type>
+</Storage>
+</Class>
+
+
+</Export>