Index: DOM/common/enu/Personality.cls.xml
===================================================================
diff -u -r57660 -r58210
--- DOM/common/enu/Personality.cls.xml	(.../Personality.cls.xml)	(revision 57660)
+++ DOM/common/enu/Personality.cls.xml	(.../Personality.cls.xml)	(revision 58210)
@@ -6,101 +6,101 @@
 <Super>TECH.Enumeration</Super>
 
 <Parameter name="DISPLAYLIST">
-<Default>,VanHoecke,VanHoeckeVoorHalux,SFS,Dupont,Kisch,Destil,HaefeleBE,VanRaemdonck,Noteborn,Daro,Hein,HaefeleNL,Seefelder,BeslagDesign,Demo,Zweygart,Galimberti,Pavanello,Ferexpert,Beslagteknikk</Default>
+<Default>,VanHoecke,VanHoeckeVoorHalux,SFS,Dupont,Kisch,Destil,HaefeleBE,VanRaemdonck,Noteborn,Daro,Hein,HaefeleNL,Seefelder,BeslagDesign,Demo,Zweygart,Galimberti,Pavanello,Ferexpert,Beslagteknikk,JBarth</Default>
 </Parameter>
 
 <Parameter name="VALUELIST">
-<Default>,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20</Default>
+<Default>,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,32</Default>
 </Parameter>
 
 <Method name="VanHoecke">
 <ClassMethod>1</ClassMethod>
 <ReturnType>DOM.common.enu.Personality</ReturnType>
-<Implementation><![CDATA[	quit 1
+<Implementation><![CDATA[	Quit 1
 ]]></Implementation>
 </Method>
 
 <Method name="VanHoeckeVoorHalux">
 <ClassMethod>1</ClassMethod>
 <ReturnType>DOM.common.enu.Personality</ReturnType>
-<Implementation><![CDATA[	quit 2
+<Implementation><![CDATA[	Quit 2
 ]]></Implementation>
 </Method>
 
 <Method name="SFS">
 <ClassMethod>1</ClassMethod>
 <ReturnType>DOM.common.enu.Personality</ReturnType>
-<Implementation><![CDATA[	quit 3
+<Implementation><![CDATA[	Quit 3
 ]]></Implementation>
 </Method>
 
 <Method name="Dupont">
 <ClassMethod>1</ClassMethod>
 <ReturnType>DOM.common.enu.Personality</ReturnType>
-<Implementation><![CDATA[	quit 4
+<Implementation><![CDATA[	Quit 4
 ]]></Implementation>
 </Method>
 
 <Method name="Kisch">
 <ClassMethod>1</ClassMethod>
 <ReturnType>DOM.common.enu.Personality</ReturnType>
-<Implementation><![CDATA[	quit 5
+<Implementation><![CDATA[	Quit 5
 ]]></Implementation>
 </Method>
 
 <Method name="Destil">
 <ClassMethod>1</ClassMethod>
 <ReturnType>DOM.common.enu.Personality</ReturnType>
-<Implementation><![CDATA[	quit 6
+<Implementation><![CDATA[	Quit 6
 ]]></Implementation>
 </Method>
 
 <Method name="HaefeleBE">
 <ClassMethod>1</ClassMethod>
 <ReturnType>DOM.common.enu.Personality</ReturnType>
-<Implementation><![CDATA[	quit 7
+<Implementation><![CDATA[	Quit 7
 ]]></Implementation>
 </Method>
 
 <Method name="VanRaemdonck">
 <ClassMethod>1</ClassMethod>
 <ReturnType>DOM.common.enu.Personality</ReturnType>
-<Implementation><![CDATA[	quit 8
+<Implementation><![CDATA[	Quit 8
 ]]></Implementation>
 </Method>
 
 <Method name="Noteborn">
 <ClassMethod>1</ClassMethod>
 <ReturnType>DOM.common.enu.Personality</ReturnType>
-<Implementation><![CDATA[	quit 9
+<Implementation><![CDATA[	Quit 9
 ]]></Implementation>
 </Method>
 
 <Method name="Daro">
 <ClassMethod>1</ClassMethod>
 <ReturnType>DOM.common.enu.Personality</ReturnType>
-<Implementation><![CDATA[	quit 10
+<Implementation><![CDATA[	Quit 10
 ]]></Implementation>
 </Method>
 
 <Method name="Hein">
 <ClassMethod>1</ClassMethod>
 <ReturnType>DOM.common.enu.Personality</ReturnType>
-<Implementation><![CDATA[	quit 11
+<Implementation><![CDATA[	Quit 11
 ]]></Implementation>
 </Method>
 
 <Method name="HaefeleNL">
 <ClassMethod>1</ClassMethod>
 <ReturnType>DOM.common.enu.Personality</ReturnType>
-<Implementation><![CDATA[	quit 12
+<Implementation><![CDATA[	Quit 12
 ]]></Implementation>
 </Method>
 
 <Method name="Seefelder">
 <ClassMethod>1</ClassMethod>
 <ReturnType>DOM.common.enu.Personality</ReturnType>
-<Implementation><![CDATA[	quit 13
+<Implementation><![CDATA[	Quit 13
 ]]></Implementation>
 </Method>
 
@@ -121,35 +121,35 @@
 <Method name="Zweygart">
 <ClassMethod>1</ClassMethod>
 <ReturnType>DOM.common.enu.Personality</ReturnType>
-<Implementation><![CDATA[	quit 16
+<Implementation><![CDATA[	Quit 16
 ]]></Implementation>
 </Method>
 
 <Method name="Galimberti">
 <ClassMethod>1</ClassMethod>
 <ReturnType>DOM.common.enu.Personality</ReturnType>
-<Implementation><![CDATA[	quit 17
+<Implementation><![CDATA[	Quit 17
 ]]></Implementation>
 </Method>
 
 <Method name="Pavanello">
 <ClassMethod>1</ClassMethod>
 <ReturnType>DOM.common.enu.Personality</ReturnType>
-<Implementation><![CDATA[	quit 18
+<Implementation><![CDATA[	Quit 18
 ]]></Implementation>
 </Method>
 
 <Method name="Ferexpert">
 <ClassMethod>1</ClassMethod>
 <ReturnType>DOM.common.enu.Personality</ReturnType>
-<Implementation><![CDATA[	quit 19
+<Implementation><![CDATA[	Quit 19
 ]]></Implementation>
 </Method>
 
 <Method name="Beslagteknikk">
 <ClassMethod>1</ClassMethod>
 <ReturnType>DOM.common.enu.Personality</ReturnType>
-<Implementation><![CDATA[	quit 20
+<Implementation><![CDATA[	Quit 20
 ]]></Implementation>
 </Method>
 
@@ -159,62 +159,69 @@
 Voorlopige toekenning van de nummerkes, nog te vervolledigen bij de implemetatie van de personalities.
 ClassMethod BiemarBois() As DOM.common.enu.Personality
 {
-	quit 21
+	Quit 21
 }
 
 ClassMethod CampeTonny() As DOM.common.enu.Personality
 {
-	quit 22
+	Quit 22
 }
 
 ClassMethod Rini() As DOM.common.enu.Personality
 {
-	quit 23
+	Quit 23
 }
 
 ClassMethod Furnifit() As DOM.common.enu.Personality
 {
-	quit 24
+	Quit 24
 }
 
 ClassMethod Yachtsupplier() As DOM.common.enu.Personality
 {
-	quit 25
+	Quit 25
 }
 
 ClassMethod Aelle() As DOM.common.enu.Personality
 {
-	quit 26
+	Quit 26
 }
 
 ClassMethod Palmieri() As DOM.common.enu.Personality
 {
-	quit 27
+	Quit 27
 }
 
 ClassMethod DSGroup() As DOM.common.enu.Personality
 {
-	quit 28
+	Quit 28
 }
 
 ClassMethod DeBisschop() As DOM.common.enu.Personality
 {
-	quit 29
+	Quit 29
 }
 
 ClassMethod DeceuninckDeforce() As DOM.common.enu.Personality
 {
-	quit 30
+	Quit 30
 }
 
 ClassMethod Pierard() As DOM.common.enu.Personality
 {
-	quit 31
+	Quit 31
 }
 */
 ]]></Content>
 </UDLText>
 
+<Method name="JBarth">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.common.enu.Personality</ReturnType>
+<Implementation><![CDATA[	Quit 32
+]]></Implementation>
+</Method>
+
 <Method name="RandomValue">
 <ClassMethod>1</ClassMethod>
 <FormalSpec>ValueToBeIgnored...:TECH.String</FormalSpec>