Hola, Nacho.

Lo que pasa es un problema de lógica. De acuerdo al entorno, la DBC permanece o no abierta. Si ya está abierta, no queda reseleccionada.

Cambia el método:

>PROCEDURE Opendata as VOID
>   IF ! DBUSED('C:\Temp\Northwind\northwind.dbc')
>      OPEN DATABASE 'C:\Temp\Northwind\northwind.dbc'
>   ENDIF
>ENDPROC

por

PROCEDURE Opendata as VOID
   OPEN DATABASE 'C:\Temp\Northwind\northwind.dbc'
ENDPROC

Además, siempre es una buena práctica preguntar por el resultado de CursorFill(). Si devuelve FALSE, aerror() te devuelve el detalle del problema, que luego debes ver cómo subir a las capas superiores. Una alternativa sería cargar todo en una string y devolver eso en lugar del XML.

Del lado cliente, antes de convertir el xml retornado, deberías fijarte si lo que vino es xml o una string de error (que por ejemplo, puede empezar siempre con "ERROR").

Espero que te ayude. Suerte,