Index: TECH/Exceptions/StatusException.cls.xml
===================================================================
diff -u -r1074 -r1133
--- TECH/Exceptions/StatusException.cls.xml	(.../StatusException.cls.xml)	(revision 1074)
+++ TECH/Exceptions/StatusException.cls.xml	(.../StatusException.cls.xml)	(revision 1133)
@@ -17,13 +17,13 @@
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
 	Set ..Status = Status
-	Quit ##super(..ExceptionCode, ..Omschrijving)
+	Quit ##super(ExceptionCode, Omschrijving)
 ]]></Implementation>
 </Method>
 
 <Method name="ToString">
 <ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit $$ParseStatus^vhLib(..Status)
+<Implementation><![CDATA[	Quit ##super()_" ("_$$ParseStatus^vhLib(..Status)_")"
 ]]></Implementation>
 </Method>
 </Class>