Index: WSimpl/Unishop/enu/BeschikbareTalen/AutoComplete.cls.xml
===================================================================
diff -u
--- WSimpl/Unishop/enu/BeschikbareTalen/AutoComplete.cls.xml	(revision 0)
+++ WSimpl/Unishop/enu/BeschikbareTalen/AutoComplete.cls.xml	(revision 36629)
@@ -0,0 +1,49 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="WSimpl.Unishop.enu.BeschikbareTalen.AutoComplete">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
+Een hercompilatie van de Enumeratie - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
+De enumeratie Eigenschapn moeten als type de enumeratieklasse zelf terug geven. De enumeratieklasse moet afleiden van TECH.Enumeration</Description>
+<ClassType>serial</ClassType>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>%SerialObject</Super>
+
+<Property name="Duits">
+<Type>%String</Type>
+<InitialExpression>"D"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="Engels">
+<Type>%String</Type>
+<InitialExpression>"E"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="Frans">
+<Type>%String</Type>
+<InitialExpression>"F"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="Italiaans">
+<Type>%String</Type>
+<InitialExpression>"IT"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="Nederlands">
+<Type>%String</Type>
+<InitialExpression>"N"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+</Class>
+
+
+</Export>
Index: WSimpl/Unishop/enu/BeschikbareTalen/Verwerker.cls.xml
===================================================================
diff -u
--- WSimpl/Unishop/enu/BeschikbareTalen/Verwerker.cls.xml	(revision 0)
+++ WSimpl/Unishop/enu/BeschikbareTalen/Verwerker.cls.xml	(revision 36629)
@@ -0,0 +1,64 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="WSimpl.Unishop.enu.BeschikbareTalen.Verwerker">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
+Een hercompilatie van de Enumeratie - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
+De enumeratie methoden moeten als type de enumeratieklasse zelf terug geven. De enumeratieklasse moet afleiden van TECH.Enumeration</Description>
+<Abstract>1</Abstract>
+<ProcedureBlock>1</ProcedureBlock>
+
+<Method name="Verwerk">
+<Final>1</Final>
+<FormalSpec>BeschikbareTalen:WSimpl.Unishop.enu.BeschikbareTalen</FormalSpec>
+<Implementation><![CDATA[
+	If BeschikbareTalen = "D" {
+		Do ..VerwerkDuits()
+	} ElseIf BeschikbareTalen = "E" {
+		Do ..VerwerkEngels()
+	} ElseIf BeschikbareTalen = "F" {
+		Do ..VerwerkFrans()
+	} ElseIf BeschikbareTalen = "IT" {
+		Do ..VerwerkItaliaans()
+	} ElseIf BeschikbareTalen = "N" {
+		Do ..VerwerkNederlands()
+	} Else {
+		Set Exceptie = ##class(TECH.Exceptions.EnumerationException).%New(BeschikbareTalen,"WSimpl.Unishop.enu.BeschikbareTalen",$classname())
+		Do ##class(TECH.ExceptionHandler).Throw(Exceptie)
+	}
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkDuits">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkEngels">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkFrans">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<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>
+</Class>
+
+
+</Export>
Index: vhConsistency/Checks/LandVertalingControle.cls.xml
===================================================================
diff -u -r36607 -r36629
--- vhConsistency/Checks/LandVertalingControle.cls.xml	(.../LandVertalingControle.cls.xml)	(revision 36607)
+++ vhConsistency/Checks/LandVertalingControle.cls.xml	(.../LandVertalingControle.cls.xml)	(revision 36629)
@@ -9,7 +9,7 @@
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
 	#Dim LandIterator As TECH.ListbuildIterator = ##class(APPS.TRANSP.Common.NietBeneluxLanden).GeefBeschikbareLandCodes()
-	#Dim ExportTalenIterator As TECH.ListbuildIterator = ##class(TECH.ListbuildIterator).%New($LB("NL","FR","EN","DE","IT"))
+	#Dim ExportTalenIterator As TECH.ListIterator = ##class(WSimpl.Unishop.enu.BeschikbareTalen).ValueListIterator()
 	While LandIterator.HasNext()
 	{
 		#Dim Land As %String = LandIterator.Next()
@@ -21,6 +21,7 @@
 				Do ..VoegMeldingToe("Er is geen vertaling voor land " _Land _" naar de taal " _Taal _" !")
 			}
 		}
+		Do ExportTalenIterator.Reset()
 	}
 
 	If (..GeefAantalMeldingen()>0)
Index: WSimpl/Unishop/enu/BeschikbareTalen.cls.xml
===================================================================
diff -u
--- WSimpl/Unishop/enu/BeschikbareTalen.cls.xml	(revision 0)
+++ WSimpl/Unishop/enu/BeschikbareTalen.cls.xml	(revision 36629)
@@ -0,0 +1,53 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="WSimpl.Unishop.enu.BeschikbareTalen">
+<Super>TECH.Enumeration</Super>
+
+<Parameter name="DISPLAYLIST">
+<Type>%String</Type>
+<Default>,N,F,E,D,IT</Default>
+</Parameter>
+
+<Parameter name="VALUELIST">
+<Type>%String</Type>
+<Default>,N,F,E,D,IT</Default>
+</Parameter>
+
+<Method name="Nederlands">
+<ClassMethod>1</ClassMethod>
+<ReturnType>WSimpl.Unishop.enu.BeschikbareTalen</ReturnType>
+<Implementation><![CDATA[	Quit "N"
+]]></Implementation>
+</Method>
+
+<Method name="Frans">
+<ClassMethod>1</ClassMethod>
+<ReturnType>WSimpl.Unishop.enu.BeschikbareTalen</ReturnType>
+<Implementation><![CDATA[	Quit "F"
+]]></Implementation>
+</Method>
+
+<Method name="Engels">
+<ClassMethod>1</ClassMethod>
+<ReturnType>WSimpl.Unishop.enu.BeschikbareTalen</ReturnType>
+<Implementation><![CDATA[	Quit "E"
+]]></Implementation>
+</Method>
+
+<Method name="Duits">
+<ClassMethod>1</ClassMethod>
+<ReturnType>WSimpl.Unishop.enu.BeschikbareTalen</ReturnType>
+<Implementation><![CDATA[	Quit "D"
+]]></Implementation>
+</Method>
+
+<Method name="Italiaans">
+<ClassMethod>1</ClassMethod>
+<ReturnType>WSimpl.Unishop.enu.BeschikbareTalen</ReturnType>
+<Implementation><![CDATA[	Quit "IT"
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>