Index: WSimpl/Halux/PPS/Verpakking/TAXFlatpackV1Controle/ControleServiceDummy.cls.xml
===================================================================
diff -u
--- WSimpl/Halux/PPS/Verpakking/TAXFlatpackV1Controle/ControleServiceDummy.cls.xml	(revision 0)
+++ WSimpl/Halux/PPS/Verpakking/TAXFlatpackV1Controle/ControleServiceDummy.cls.xml	(revision 35717)
@@ -0,0 +1,55 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.ControleServiceDummy">
+<Super>WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.ControleService</Super>
+
+<Property name="DummyDataBepaler">
+<Type>APPS.Halux.PPS.Verpakking.TAXFlatpackV1Controle.impl.DummyDataBepaler</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..DummyDataBepaler = ##class(APPS.Halux.PPS.Verpakking.TAXFlatpackV1Controle.impl.DummyDataBepaler).%New()
+	
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="GeefMetaData">
+<ReturnType>WS.Halux.PPS.Verpakking.TAXFlatpackV1Controle.MetaData</ReturnType>
+<Implementation><![CDATA[
+	#dim MetaData As WS.Halux.PPS.Verpakking.TAXFlatpackV1Controle.MetaData = ##class(WS.Halux.PPS.Verpakking.TAXFlatpackV1Controle.MetaData).%New()
+	
+	Set MetaData.ForceerRedenen = ..DummyDataBepaler.GeefForceerRedenen()
+	
+	Quit MetaData
+]]></Implementation>
+</Method>
+
+<Method name="GeefData">
+<FormalSpec>Id:%String</FormalSpec>
+<ReturnType>WS.Halux.PPS.Verpakking.TAXFlatpackV1Controle.Data</ReturnType>
+<Implementation><![CDATA[
+	#dim Data As WS.Halux.PPS.Verpakking.TAXFlatpackV1Controle.Data = ##class(WS.Halux.PPS.Verpakking.TAXFlatpackV1Controle.Data).%New()
+	
+	Set Data.ProductInfo = ..DummyDataBepaler.GeefProductInfo()
+	Set Data.Onderdelen = ..DummyDataBepaler.GeefOnderdelen()
+	Set Data.Draagplaat = ..DummyDataBepaler.GeefDraagPlaat()
+	
+	Quit Data
+]]></Implementation>
+</Method>
+
+<Method name="Afgehandeld">
+<FormalSpec>Data:WS.Halux.PPS.Verpakking.TAXFlatpackV1Controle.Status</FormalSpec>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: WS/Halux/PPS/Verpakking/TAXFlatpackV1Controle/ControleService.cls.xml
===================================================================
diff -u -r35699 -r35717
--- WS/Halux/PPS/Verpakking/TAXFlatpackV1Controle/ControleService.cls.xml	(.../ControleService.cls.xml)	(revision 35699)
+++ WS/Halux/PPS/Verpakking/TAXFlatpackV1Controle/ControleService.cls.xml	(.../ControleService.cls.xml)	(revision 35717)
@@ -10,7 +10,7 @@
 <Method name="GeefMetaData">
 <ReturnType>WS.Halux.PPS.Verpakking.TAXFlatpackV1Controle.MetaData</ReturnType>
 <WebMethod>1</WebMethod>
-<Implementation><![CDATA[	Quit ##class(APPS.Halux.PPS.Verpakking.TAXFlatpackV1Controle.impl.ControleService).%New().GeefMetaData()
+<Implementation><![CDATA[	Quit ##class(WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.ControleServiceDummy).%New().GeefMetaData()
 ]]></Implementation>
 </Method>
 
@@ -20,7 +20,7 @@
 <WebMethod>1</WebMethod>
 <Implementation><![CDATA[
 	$$$chkRequiredParameter(Id)
-	Quit ##class(APPS.Halux.PPS.Verpakking.TAXFlatpackV1Controle.impl.ControleService).%New().GeefData(Id)
+	Quit ##class(WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.ControleServiceDummy).%New().GeefData(Id)
 ]]></Implementation>
 </Method>
 
@@ -29,7 +29,7 @@
 <WebMethod>1</WebMethod>
 <Implementation><![CDATA[
 	$$$chkRequiredParameter(Data)
-	Do ##class(APPS.Halux.PPS.Verpakking.TAXFlatpackV1Controle.impl.ControleService).%New().Afgehandeld(Data)
+	Quit ##class(WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.ControleService).%New().Afgehandeld(Data)
 ]]></Implementation>
 </Method>
 </Class>
FishEye: Tag 35717 refers to a dead (removed) revision in file `APPS/Halux/PPS/Verpakking/TAXFlatpackV1Controle/ControleService.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?
Index: WSimpl/Halux/PPS/Verpakking/TAXFlatpackV1Controle/ControleService.cls.xml
===================================================================
diff -u -r35699 -r35717
--- WSimpl/Halux/PPS/Verpakking/TAXFlatpackV1Controle/ControleService.cls.xml	(.../APPS/Halux/PPS/Verpakking/TAXFlatpackV1Controle/ControleService.cls.xml)	(revision 35699)
+++ WSimpl/Halux/PPS/Verpakking/TAXFlatpackV1Controle/ControleService.cls.xml	(.../WSimpl/Halux/PPS/Verpakking/TAXFlatpackV1Controle/ControleService.cls.xml)	(revision 35717)
@@ -1,23 +1,22 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
-<Class name="APPS.Halux.PPS.Verpakking.TAXFlatpackV1Controle.ControleService">
-<Abstract>1</Abstract>
-<Super>TECH.Interface</Super>
+<Class name="WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.ControleService">
+<Super>TECH.RegisteredObject</Super>
 
 <Method name="GeefMetaData">
-<Abstract>1</Abstract>
 <ReturnType>WS.Halux.PPS.Verpakking.TAXFlatpackV1Controle.MetaData</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
 </Method>
 
 <Method name="GeefData">
-<Abstract>1</Abstract>
 <FormalSpec>Id:%String</FormalSpec>
 <ReturnType>WS.Halux.PPS.Verpakking.TAXFlatpackV1Controle.Data</ReturnType>
-<Implementation><![CDATA[]]></Implementation>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
 </Method>
 
 <Method name="Afgehandeld">
-<Abstract>1</Abstract>
 <FormalSpec>Data:WS.Halux.PPS.Verpakking.TAXFlatpackV1Controle.Status</FormalSpec>
 <Implementation><![CDATA[]]></Implementation>
 </Method>
Index: APPS/Halux/PPS/Verpakking/TAXFlatpackV1Controle/impl/ControleService.cls.xml
===================================================================
diff -u -r35701 -r35717
--- APPS/Halux/PPS/Verpakking/TAXFlatpackV1Controle/impl/ControleService.cls.xml	(.../ControleService.cls.xml)	(revision 35701)
+++ APPS/Halux/PPS/Verpakking/TAXFlatpackV1Controle/impl/ControleService.cls.xml	(.../ControleService.cls.xml)	(revision 35717)
@@ -37,7 +37,7 @@
 <Implementation><![CDATA[
 	#dim Data As WS.Halux.PPS.Verpakking.TAXFlatpackV1Controle.Data = ##class(WS.Halux.PPS.Verpakking.TAXFlatpackV1Controle.Data).%New()
 	
-	Set Data.ProductInfo = ..DummyDataBepaler.GeefProductInfo()
+	Set Data.ProductInfo = ..DummyDataBepaler.GeefProductInfo(Id)
 	Set Data.Onderdelen = ..DummyDataBepaler.GeefOnderdelen()
 	Set Data.Draagplaat = ..DummyDataBepaler.GeefDraagPlaat()
 	
FishEye: Tag 35717 refers to a dead (removed) revision in file `vhTest/Mock/APPS/Halux/PPS/Verpakking/TAXFlatpackV1Controle/ControleService.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?