Index: TECH/Concurrency/TxScope.cls.xml
===================================================================
diff -u -r946 -r1013
--- TECH/Concurrency/TxScope.cls.xml	(.../TxScope.cls.xml)	(revision 946)
+++ TECH/Concurrency/TxScope.cls.xml	(.../TxScope.cls.xml)	(revision 1013)
@@ -1,5 +1,5 @@
 <?xml version="1.0" encoding="UTF-8"?>
-<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-03-21 11:43:47">
+<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-04-12 08:19:32">
 <Class name="TECH.Concurrency.TxScope">
 <Description>
 Koppeling van Transactie aan locks en aan het huidige proces.
@@ -9,7 +9,7 @@
 <IncludeCode>TECH.Error</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
 <Super>%RegisteredObject</Super>
-<TimeChanged>62171,42309.778488</TimeChanged>
+<TimeChanged>62193,29983.346026</TimeChanged>
 <TimeCreated>62055,48616.45905</TimeCreated>
 <ClassDefinitionError>0</ClassDefinitionError>
 
@@ -169,10 +169,8 @@
 <Method name="Commit">
 <Implementation><![CDATA[
 	Do ..ControleerIsHuidigeScope()
-	d WLIP^vhDBG(191,"Commit TS")
 	If (..TransactieGestartInDezeScope) {
 		Do ..Transactie.Commit()
-		d WLIP^vhDBG(191,"Echte commit TS")
 	}
 	Set ..Status = ##class(TxStatus).Committed()
 	
@@ -271,5 +269,5 @@
 ]]></Implementation>
 </Method>
 </Class>
-<Checksum value="885096884"/>
+<Checksum value="3947545295"/>
 </Export>