Index: vhUnitTest/DOM/common/TaalcodeConverter/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/DOM/common/TaalcodeConverter/Test.cls.xml	(revision 0)
+++ vhUnitTest/DOM/common/TaalcodeConverter/Test.cls.xml	(revision 55311)
@@ -0,0 +1,28 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.DOM.common.TaalcodeConverter.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test TaalNaarTaalCodeISO639x1">
+<Implementation><![CDATA[
+	#dim TaalIterator as TECH.Iterator = ##class(DOM.enu.Taal).ValueListIterator()
+	while(TaalIterator.HasNext()){
+		#dim Taal as DOM.enu.Taal = TaalIterator.Next()
+		Do $$$AssertTrue($Length(##class(DOM.common.TaalcodeConverter).TaalNaarISO639x1(Taal)>0 ))
+	}
+]]></Implementation>
+</Method>
+
+<Method name="Test TaalCodeISO639x1NaarTaal">
+<Implementation><![CDATA[
+	#dim TaalIterator as TECH.Iterator = ##class(DOM.enu.TaalCodeISO639x1).ValueListIterator()
+	while(TaalIterator.HasNext()){
+		#dim Taal as DOM.enu.Taal = TaalIterator.Next()
+		Do $$$AssertTrue($Length(##class(DOM.common.TaalcodeConverter).ISO639x1NaarTaal(Taal)>0 ))
+	}
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: DOM/common/TaalcodeConverter.cls.xml
===================================================================
diff -u
--- DOM/common/TaalcodeConverter.cls.xml	(revision 0)
+++ DOM/common/TaalcodeConverter.cls.xml	(revision 55311)
@@ -0,0 +1,24 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.common.TaalcodeConverter">
+<Super>TECH.RegisteredObject</Super>
+
+<Method name="TaalNaarISO639x1">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>Taal:DOM.enu.Taal</FormalSpec>
+<ReturnType>DOM.enu.TaalCodeISO639x1</ReturnType>
+<Implementation><![CDATA[	Quit $Classmethod( ##class(DOM.enu.TaalCodeISO639x1).Classname() ,##class(DOM.enu.Taal).LogicalToDisplay(Taal))
+]]></Implementation>
+</Method>
+
+<Method name="ISO639x1NaarTaal">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>ISO639x1:DOM.enu.TaalCodeISO639x1</FormalSpec>
+<ReturnType>DOM.enu.Taal</ReturnType>
+<Implementation><![CDATA[	Quit $Classmethod( ##class(DOM.enu.Taal).Classname() ,##class(DOM.enu.TaalCodeISO639x1).LogicalToDisplay(ISO639x1))
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>