Index: vhTest/Fake/APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler/KleurcodeStringBepaler.cls.xml
===================================================================
diff -u
--- vhTest/Fake/APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler/KleurcodeStringBepaler.cls.xml	(revision 0)
+++ vhTest/Fake/APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler/KleurcodeStringBepaler.cls.xml	(revision 35835)
@@ -0,0 +1,43 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler.KleurcodeStringBepaler">
+<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>APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler.KleurcodeStringBepaler</Super>
+
+<Method name="GeefKleurcodeString">
+<FormalSpec>LadeOnderdeel:DOM.PM.Maatwerk.LadeInfo.LadeOnderdeel,Delimiter:%String="-"</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkBodem">
+<FormalSpec>Bodem:DOM.PM.Maatwerk.LadeInfo.Bodem</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkFront">
+<FormalSpec>Front:DOM.PM.Maatwerk.LadeInfo.Front</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkRug">
+<FormalSpec>Rug:DOM.PM.Maatwerk.LadeInfo.Rug</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkZijkant">
+<FormalSpec>Zijkant:DOM.PM.Maatwerk.LadeInfo.Zijkant</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler/KleurcodeStringBepaler.cls.xml
===================================================================
diff -u -r30853 -r35835
--- APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler/KleurcodeStringBepaler.cls.xml	(.../KleurcodeStringBepaler.cls.xml)	(revision 30853)
+++ APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler/KleurcodeStringBepaler.cls.xml	(.../KleurcodeStringBepaler.cls.xml)	(revision 35835)
@@ -1,19 +1,22 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler.KleurcodeStringBepaler">
-<Super>TECH.RegisteredObject,DOM.PM.Maatwerk.LadeInfo.LadeOnderdeelVisitor</Super>
+<Super>TECH.Mockable,DOM.PM.Maatwerk.LadeInfo.LadeOnderdeelVisitor</Super>
 
 <Property name="KleurCodes">
 <Type>%ListOfDataTypes</Type>
 <Private>1</Private>
 </Property>
 
 <Method name="GeefKleurcodeString">
-<FormalSpec>LadeOnderdeel:DOM.PM.Maatwerk.LadeInfo.LadeOnderdeel</FormalSpec>
+<FormalSpec>LadeOnderdeel:DOM.PM.Maatwerk.LadeInfo.LadeOnderdeel,Delimiter:%String="-"</FormalSpec>
+<ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
 	Set ..KleurCodes = ##class(%ListOfDataTypes).%New()
+	
 	Do LadeOnderdeel.Accept($this)
-	Quit ##class(TECH.ListUtils).ListToPieces(..KleurCodes, "-")
+	
+	Quit ##class(TECH.ListUtils).ListToPieces(..KleurCodes, Delimiter)
 ]]></Implementation>
 </Method>
 
@@ -27,6 +30,7 @@
 <FormalSpec>Front:DOM.PM.Maatwerk.LadeInfo.Front</FormalSpec>
 <Implementation><![CDATA[
 	#dim Kleuren As %ArrayOfDataTypes = Front.GeefKleuren()
+	
 	Do ..KleurCodes.Insert(Kleuren.GetAt(1))
 	Do ..KleurCodes.Insert(Kleuren.GetAt(3))
 ]]></Implementation>
@@ -36,6 +40,7 @@
 <FormalSpec>Rug:DOM.PM.Maatwerk.LadeInfo.Rug</FormalSpec>
 <Implementation><![CDATA[
 	#dim Kleuren As %ArrayOfDataTypes = Rug.GeefKleuren()
+	
 	Do ..KleurCodes.Insert(Kleuren.GetAt(1))
 	Do ..KleurCodes.Insert(Kleuren.GetAt(3))
 ]]></Implementation>
@@ -45,6 +50,7 @@
 <FormalSpec>Zijkant:DOM.PM.Maatwerk.LadeInfo.Zijkant</FormalSpec>
 <Implementation><![CDATA[
 	#dim Kleuren As %ArrayOfDataTypes = Zijkant.GeefKleuren()
+	
 	Do ..KleurCodes.Insert(Kleuren.GetAt(2))
 	Do ..KleurCodes.Insert(Kleuren.GetAt(3))
 	Do ..KleurCodes.Insert(Kleuren.GetAt(1))
Index: vhTest/Mock/APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler/KleurcodeStringBepaler.cls.xml
===================================================================
diff -u
--- vhTest/Mock/APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler/KleurcodeStringBepaler.cls.xml	(revision 0)
+++ vhTest/Mock/APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler/KleurcodeStringBepaler.cls.xml	(revision 35835)
@@ -0,0 +1,45 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Mock.APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler.KleurcodeStringBepaler">
+<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>APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler.KleurcodeStringBepaler,Tools.Mock.MockClassBase</Super>
+<Inheritance>right</Inheritance>
+
+<Method name="GeefKleurcodeString">
+<FormalSpec>LadeOnderdeel:DOM.PM.Maatwerk.LadeInfo.LadeOnderdeel,Delimiter:%String="-"</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefKleurcodeString",LadeOnderdeel,Delimiter)
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkBodem">
+<FormalSpec>Bodem:DOM.PM.Maatwerk.LadeInfo.Bodem</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("VerwerkBodem",Bodem)
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkFront">
+<FormalSpec>Front:DOM.PM.Maatwerk.LadeInfo.Front</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("VerwerkFront",Front)
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkRug">
+<FormalSpec>Rug:DOM.PM.Maatwerk.LadeInfo.Rug</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("VerwerkRug",Rug)
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkZijkant">
+<FormalSpec>Zijkant:DOM.PM.Maatwerk.LadeInfo.Zijkant</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("VerwerkZijkant",Zijkant)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>