buenas tardes tengan todos, estoy desarrollando un pequeno software con sql, en el mismo he creado un pequeno prg que trabaja con el vfpcom de esta manera

oVFPCOM = Createobject('vfpcom.comutil')
oRecordSet = Createobject('ADODB.RECORDSET')
oRecordSet.CursorType = 3 && adOpenStatic
oRecordSet.LockType = 1 && adLockReadOnly
oRecordSet.Open(cadena,conexion)
orecordset.movefirst
If !oRecordSet.Eof()
If oVFPCOM.RSToCursor(oRecordSet, 'workcursor')<> 0
Messagebox(Message())
Endif
aseclect = 'SELECT * FROM workcursor INTO TABLE '+nombcurosr
&aseclect
Select workcursor
Use
Endif
oRecordSet.Close

bien con esta pequena rutina envio cualquier consulta a una table temporal un solo metodo para todas las consultas, hasta aqui bien.

acabo de crear un sp de busqueda en el sql pero cuando retorna los valores me envia el siguiente error:

0x80004005: unknow com status code.

reviso la consulta en el sql y devuelve los resultados bien.

select d.nombre,d.pfin,d.pffn,d.monto,d.codigo,i.nombre
   from pvprodeptos d, pvproimp i where
   d.nimpuesto = i.ninterno

esta es la consulta que realiza el programa, alguna idea.

yo seguire buscando a ver que sera.

gracias...