Index: vhTest/Integratie/ProductBeheer/Maatwerk/Langteksten/TestBase.cls.xml
===================================================================
diff -u -r31085 -r31110
--- vhTest/Integratie/ProductBeheer/Maatwerk/Langteksten/TestBase.cls.xml	(.../TestBase.cls.xml)	(revision 31085)
+++ vhTest/Integratie/ProductBeheer/Maatwerk/Langteksten/TestBase.cls.xml	(.../TestBase.cls.xml)	(revision 31110)
@@ -1,16 +1,16 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="vhTest.Integratie.ProductBeheer.Maatwerk.Langteksten.TestBase">
+<Description>
+verbetering: langteksten verplaatsen naar End2End package</Description>
 <Abstract>1</Abstract>
 <Super>vhTest.Integratie.TestCase</Super>
 
-<UDLText name="T">
-<Content><![CDATA[
-// verbetering: langteksten verplaatsen naar End2End package
+<Property name="Taal">
+<Type>DOM.enu.Taal.AutoComplete</Type>
+<Private>1</Private>
+</Property>
 
-]]></Content>
-</UDLText>
-
 <Method name="Test">
 <Implementation><![CDATA[	do ..MaakLangtekstBestand()
 ]]></Implementation>
@@ -35,7 +35,7 @@
 	
 	while TaalIterator.HasNext() {
 		set Taal = TaalIterator.Next()
-		Continue:($L(Taal)>1)   ; Voorlopig alleen de 4 talen NFDE 
+		Continue:($$$Not(..IsGeldigeTaalVoorLangtekst(Taal)))
 		
 		set ProductLangtekst = LangtekstCreator.GeefLangtekst(Kenmerken, HalffabItemsBoom, Taal)
 		
@@ -82,6 +82,13 @@
 <ReturnType>DOM.PM.impl.LangtekstCreator</ReturnType>
 <Implementation><![CDATA[]]></Implementation>
 </Method>
+
+<Method name="IsGeldigeTaalVoorLangtekst">
+<FormalSpec>Taal:DOM.enu.Taal</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[	Quit ##class(TECH.StringUtils).Equals(Taal, ..Taal.Nederlands, ..Taal.Frans, ..Taal.Engels, ..Taal.Duits)
+]]></Implementation>
+</Method>
 </Class>