Index: TECH/Persistent/impl/Gateway.cls.xml
===================================================================
diff -u -r2328 -r3204
--- TECH/Persistent/impl/Gateway.cls.xml	(.../Gateway.cls.xml)	(revision 2328)
+++ TECH/Persistent/impl/Gateway.cls.xml	(.../Gateway.cls.xml)	(revision 3204)
@@ -32,6 +32,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Copy">
+<FormalSpec>Data:TECH.Persistent,Deep:%Boolean=0</FormalSpec>
+<ReturnType>TECH.Persistent</ReturnType>
+<Implementation><![CDATA[	Quit Data.%ConstructClone(Deep)
+]]></Implementation>
+</Method>
+
 <Method name="ExistsId">
 <FormalSpec>ID:%String</FormalSpec>
 <ReturnType>%Boolean</ReturnType>