Index: TECH/StringUtils.cls.xml
===================================================================
diff -u -r291 -r308
--- TECH/StringUtils.cls.xml	(.../StringUtils.cls.xml)	(revision 291)
+++ TECH/StringUtils.cls.xml	(.../StringUtils.cls.xml)	(revision 308)
@@ -314,6 +314,18 @@
 	quit $select(AantalPieces>0:AantalPieces-1,1:0)
 ]]></Implementation>
 </Method>
+
+<Method name="Execute">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>String:%String</FormalSpec>
+<ProcedureBlock>0</ProcedureBlock>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	new ReturnWaarde
+	Xecute "Set ReturnWaarde = "_String
+	Quit ReturnWaarde
+]]></Implementation>
+</Method>
 </Class>