Index: TECH/Persistent/Opener.cls.xml
===================================================================
diff -u -r1382 -r2198
--- TECH/Persistent/Opener.cls.xml	(.../Opener.cls.xml)	(revision 1382)
+++ TECH/Persistent/Opener.cls.xml	(.../Opener.cls.xml)	(revision 2198)
@@ -10,7 +10,7 @@
 <Implementation><![CDATA[
 	#dim Object As TECH.Persistent = $classMethod(ClassName,"%OpenId",Id)
 	if ('$IsObject(Object)) {
-		set Exception = ##class(TECH.Exceptions.BaseException).%New(##class(TECH.enu.ExceptionCode).ObjectExpected(),"Kon object van type "_ClassName_" niet openen met id "_Id)
+		set Exception = ##class(TECH.Exceptions.BaseException).%New(##class(TECH.enu.ExceptionCode).ObjectExpected(),"Kon object van type "_ClassName_" niet openen met id '"_Id_"'")
 		do Exception.VoegToeExtraInfo($$$LCVT($get(%objlasterror)))
 		do ##class(TECH.ExceptionHandler).Throw(Exception)
 	}