Index: TECH/File/FileWriter.cls.xml =================================================================== diff -u -r2929 -r2941 --- TECH/File/FileWriter.cls.xml (.../FileWriter.cls.xml) (revision 2929) +++ TECH/File/FileWriter.cls.xml (.../FileWriter.cls.xml) (revision 2941) @@ -113,6 +113,7 @@ Quit $$$OK Catch Set $ZTRAP = "" + Set Exception = ##class(TECH.ExceptionHandler).Catch() Do ..LockHelper.UnLock(##class(TECH.enu.LockType).Exclusive()) ]]>