Index: APPS/Halux/Machine/Kantenband/impl/KantenbandDataBepaler/DikteCodeBepaler.cls.xml
===================================================================
diff -u -r31681 -r54564
--- APPS/Halux/Machine/Kantenband/impl/KantenbandDataBepaler/DikteCodeBepaler.cls.xml	(.../DikteCodeBepaler.cls.xml)	(revision 31681)
+++ APPS/Halux/Machine/Kantenband/impl/KantenbandDataBepaler/DikteCodeBepaler.cls.xml	(.../DikteCodeBepaler.cls.xml)	(revision 54564)
@@ -1,32 +1,34 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="APPS.Halux.Machine.Kantenband.impl.KantenbandDataBepaler.DikteCodeBepaler">
-<Super>TECH.RegisteredObject,APPS.Halux.PPS.enu.TAORLadeZijkantDecor.Verwerker</Super>
+<Super>TECH.Mockable,APPS.Halux.PPS.enu.TAORLadeZijkantDecor.Verwerker</Super>
 
 <Property name="DikteCode">
 <Type>%String</Type>
 <Private>1</Private>
 </Property>
 
 <Method name="BepaalCode">
-<FormalSpec>LadeZijkantDecor:APPS.Halux.PPS.enu.TAORLadeZijkantDecor.Verwerker</FormalSpec>
+<FormalSpec>PlaatAfwerking:APPS.Halux.PPS.enu.TAORDecor</FormalSpec>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	set ..DikteCode = ""
-	do ..Verwerk(LadeZijkantDecor)
-	quit ..DikteCode
+	Set ..DikteCode = ""
+	
+	Do ..Verwerk(PlaatAfwerking)
+	
+	Quit ..DikteCode
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkFineer">
 <Private>1</Private>
-<Implementation><![CDATA[	set ..DikteCode  = "D08"
+<Implementation><![CDATA[	Set ..DikteCode = "D08"
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkMelamine">
 <Private>1</Private>
-<Implementation><![CDATA[	set ..DikteCode  = "D08"
+<Implementation><![CDATA[	Set ..DikteCode = "D08"
 ]]></Implementation>
 </Method>
 </Class>