CLEAR SET MEMOWIDTH TO 150 CREATE CURSOR foo (f1 I) LOCAL oXA as XMLAdapter oXA=CREATEOBJECT("XMLAdapter") oXA.AddTableSchema("foo") oXA.XMLSchemaLocation="test.xsd" oXA.ToXML("cXML",,.F.) ?cXML ? oXA.ToXML("cXML","test.xsd",.F.) ?cXML RETURN