Index: DOM/PM/enu/RVGDeurSteunNaarBinnen/AutoComplete.cls.xml
===================================================================
diff -u -r72552 -r74704
--- DOM/PM/enu/RVGDeurSteunNaarBinnen/AutoComplete.cls.xml	(.../AutoComplete.cls.xml)	(revision 72552)
+++ DOM/PM/enu/RVGDeurSteunNaarBinnen/AutoComplete.cls.xml	(.../AutoComplete.cls.xml)	(revision 74704)
@@ -29,6 +29,13 @@
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
+
+<Property name="True">
+<Type>%String</Type>
+<InitialExpression>"true"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
 </Class>
 
 
Index: DOM/PM/enu/RVGDeurSteunNaarBinnen.cls.xml
===================================================================
diff -u -r72552 -r74704
--- DOM/PM/enu/RVGDeurSteunNaarBinnen.cls.xml	(.../RVGDeurSteunNaarBinnen.cls.xml)	(revision 72552)
+++ DOM/PM/enu/RVGDeurSteunNaarBinnen.cls.xml	(.../RVGDeurSteunNaarBinnen.cls.xml)	(revision 74704)
@@ -6,11 +6,11 @@
 <Super>TECH.Enumeration</Super>
 
 <Parameter name="VALUELIST">
-<Default>;Nee;Lengte70-218mm;Lengte70-350mm</Default>
+<Default>;Nee;Lengte70-218mm;Lengte70-350mm;true</Default>
 </Parameter>
 
 <Parameter name="DISPLAYLIST">
-<Default>;Nee;Lengte70-218mm;Lengte70-350mm</Default>
+<Default>;Nee;Lengte70-218mm;Lengte70-350mm;true</Default>
 </Parameter>
 
 <Method name="Nee">
@@ -33,6 +33,13 @@
 <Implementation><![CDATA[	Quit "Lengte70-350mm"
 ]]></Implementation>
 </Method>
+
+<Method name="True">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.PM.enu.RVGDeurSteunNaarBinnen</ReturnType>
+<Implementation><![CDATA[	Quit "true"
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: DOM/PM/enu/RVGDeurSteunNaarBinnen/Verwerker.cls.xml
===================================================================
diff -u -r72552 -r74704
--- DOM/PM/enu/RVGDeurSteunNaarBinnen/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 72552)
+++ DOM/PM/enu/RVGDeurSteunNaarBinnen/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 74704)
@@ -18,6 +18,8 @@
 		Do ..VerwerkLengteTot350()
 	} ElseIf RVGDeurSteunNaarBinnen = "Nee" {
 		Do ..VerwerkNee()
+	} ElseIf RVGDeurSteunNaarBinnen = "true" {
+		Do ..VerwerkTrue()
 	} Else {
 		Set Exceptie = ##class(TECH.Exceptions.EnumerationException).%New(RVGDeurSteunNaarBinnen,"DOM.PM.enu.RVGDeurSteunNaarBinnen",$classname())
 		Do ##class(TECH.ExceptionHandler).Throw(Exceptie)
@@ -42,6 +44,12 @@
 <Private>1</Private>
 <Implementation><![CDATA[]]></Implementation>
 </Method>
+
+<Method name="VerwerkTrue">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
 </Class>