Index: DOM/enu/Taal/AutoComplete.cls.xml
===================================================================
diff -u -r30631 -r31090
--- DOM/enu/Taal/AutoComplete.cls.xml	(.../AutoComplete.cls.xml)	(revision 30631)
+++ DOM/enu/Taal/AutoComplete.cls.xml	(.../AutoComplete.cls.xml)	(revision 31090)
@@ -9,6 +9,13 @@
 <ProcedureBlock>1</ProcedureBlock>
 <Super>%SerialObject</Super>
 
+<Property name="Deens">
+<Type>DOM.enu.Taal</Type>
+<InitialExpression>"DA"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
 <Property name="Duits">
 <Type>DOM.enu.Taal</Type>
 <InitialExpression>"D"</InitialExpression>
@@ -30,12 +37,26 @@
 <ReadOnly>1</ReadOnly>
 </Property>
 
+<Property name="Italiaans">
+<Type>DOM.enu.Taal</Type>
+<InitialExpression>"IT"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
 <Property name="Nederlands">
 <Type>DOM.enu.Taal</Type>
 <InitialExpression>"N"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
+
+<Property name="Spaans">
+<Type>DOM.enu.Taal</Type>
+<InitialExpression>"ES"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
 </Class>
 
 
Index: DOM/enu/Taal/Verwerker.cls.xml
===================================================================
diff -u -r30631 -r31090
--- DOM/enu/Taal/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 30631)
+++ DOM/enu/Taal/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 31090)
@@ -13,21 +13,33 @@
 <Final>1</Final>
 <FormalSpec>Taal:DOM.enu.Taal</FormalSpec>
 <Implementation><![CDATA[
-	If Taal = "D" {
+	If Taal = "DA" {
+		Do ..VerwerkDeens()
+	} ElseIf Taal = "D" {
 		Do ..VerwerkDuits()
 	} ElseIf Taal = "E" {
 		Do ..VerwerkEngels()
 	} ElseIf Taal = "F" {
 		Do ..VerwerkFrans()
+	} ElseIf Taal = "IT" {
+		Do ..VerwerkItaliaans()
 	} ElseIf Taal = "N" {
 		Do ..VerwerkNederlands()
+	} ElseIf Taal = "ES" {
+		Do ..VerwerkSpaans()
 	} Else {
-		Set Exceptie = ##class(TECH.Exceptions.EnumerationException).%New(Taal,"DOM.enu.Taal")
+		Set Exceptie = ##class(TECH.Exceptions.EnumerationException).%New(Taal,"DOM.enu.Taal",$classname())
 		Do ##class(TECH.ExceptionHandler).Throw(Exceptie)
 	}
 ]]></Implementation>
 </Method>
 
+<Method name="VerwerkDeens">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
 <Method name="VerwerkDuits">
 <Abstract>1</Abstract>
 <Private>1</Private>
@@ -46,11 +58,23 @@
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 
+<Method name="VerwerkItaliaans">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
 <Method name="VerwerkNederlands">
 <Abstract>1</Abstract>
 <Private>1</Private>
 <Implementation><![CDATA[]]></Implementation>
 </Method>
+
+<Method name="VerwerkSpaans">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
 </Class>
 
 
Index: DOM/enu/Taal.cls.xml
===================================================================
diff -u -r29059 -r31090
--- DOM/enu/Taal.cls.xml	(.../Taal.cls.xml)	(revision 29059)
+++ DOM/enu/Taal.cls.xml	(.../Taal.cls.xml)	(revision 31090)
@@ -6,11 +6,11 @@
 <Super>TECH.Enumeration</Super>
 
 <Parameter name="VALUELIST">
-<Default>,F,N,E,D</Default>
+<Default>,F,N,E,D,DA,IT,ES</Default>
 </Parameter>
 
 <Parameter name="DISPLAYLIST">
-<Default>,Frans,Nederlands,Engels,Duits</Default>
+<Default>,Frans,Nederlands,Engels,Duits,Deens,Italiaans,Spaans</Default>
 </Parameter>
 
 <Method name="Nederlands">
@@ -40,6 +40,27 @@
 <Implementation><![CDATA[	quit "F"
 ]]></Implementation>
 </Method>
+
+<Method name="Deens">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.enu.Taal</ReturnType>
+<Implementation><![CDATA[	quit "DA"
+]]></Implementation>
+</Method>
+
+<Method name="Italiaans">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.enu.Taal</ReturnType>
+<Implementation><![CDATA[	quit "IT"
+]]></Implementation>
+</Method>
+
+<Method name="Spaans">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.enu.Taal</ReturnType>
+<Implementation><![CDATA[	quit "ES"
+]]></Implementation>
+</Method>
 </Class>