CLOSE DATABASES OPEN DATABASE (HOME(2)) + "Northwind\northwind.dbc" * Create XML SELECT 0 USE northwind!OrderDetails SET ORDER TO ORDERID && ORDERID SELECT 0 USE northwind!Orders SET RELATION TO OrderID INTO OrderDetails oXA = CREATEOBJECT("XmlAdapter") oXA.RespectNesting = .T. oXA.AddTableSchema("Orders") oXA.AddTableSchema("OrderDetails") oXA.ToXML("Orders.xml",,.T.) ***Modify Command Orders.xml CLOSE DATABASES ALL * Load XML oXA = CREATEOBJECT("XmlAdapter") oXA.LoadXML("Orders.xml",.T.) FOR i=1 TO oXA.Tables.Count oXA.Tables(i).Tocursor() ENDFOR SETthanks and regards,