Index: TECH/Exceptions/RuntimeException.cls.xml
===================================================================
diff -u -r9 -r194
--- TECH/Exceptions/RuntimeException.cls.xml	(.../RuntimeException.cls.xml)	(revision 9)
+++ TECH/Exceptions/RuntimeException.cls.xml	(.../RuntimeException.cls.xml)	(revision 194)
@@ -32,7 +32,7 @@
 
 <Method name="GeefOmschrijving">
 <ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit "Runtime exception"
+<Implementation><![CDATA[	Quit "Runtime exception : "_..GeefZerror()
 ]]></Implementation>
 </Method>
 
Index: TECH/DateTime.cls.xml
===================================================================
diff -u -r41 -r194
--- TECH/DateTime.cls.xml	(.../DateTime.cls.xml)	(revision 41)
+++ TECH/DateTime.cls.xml	(.../DateTime.cls.xml)	(revision 194)
@@ -42,6 +42,7 @@
 		#dim Dummy As %String = $zdatetime(Horolog,1)
 	}
 	catch {
+		#dim Exception = ##class(TECH.ExceptionHandler).Catch()
 		set Result = 0		
 	}
 	quit Result