**un saludo a toda la comunidad,gracias de antemano por su ayuda
**tengo un form con un grid de donde mando llamar cursoradpterxml
**en el prg;
*prg que convierte una tabla mediante un cursor a xml

SET SAFETY OFF 
SET TALK OFF 
clear all
SET DEFAULT TO c:\tienda
USE clientes
CURSORTOXML('clientes','xmlclientes.xml',1,512,0,'xmlclientes.xsd')
MODIFY FILE xmlclientes.xml

***en el init del form


LOCAL oXMLAdapter AS XMLAdapter
THISFORM.AddProperty('oXMLAdapter',CREATEOBJECT('XMLAdapter'))

WITH THISFORM.oXMLAdapter
.LoadXML('C:\tienda\xmlclientes.xml',.T.)
ENDWITH
THISFORM.DATAENVIRONMENT.CURSORADAPTERXML.SELECTCMD="Thisform.oXMLAdapter.tables.Item(1)"

THISFORM.DATAENVIRONMENT.CURSORADAPTERXML.CURSORFILL(.T.)
THISFORM.BindControls= (.f.)
THISFORM.GrdCursoradapterxml.AutoFit()
thisform.GrdCursoradapterxml.RecordSourceType= 1

thisform.grdCursoradapterxml.Enabled = .T. 
thisform.grdCursoradapterxml.Refresh   
thisform.Refresh 

**a ver si a alguien le ha pasado