FoxPro/Visual FoxPro - agregar campo a Cursor

Buenas,


tengo una tabla en sql la cual tiene varios campos, recupero la data desde vfoxpro por medio de un sql en vfoxpro el me genera un cursor aleatoriamente con Sys(2015) quiero saber como a ese cursor de la tabla de agregarle un campo mas que no tiene la tabla original de sql

¿y porque no utilizas el CREATE CURSOR?

Ademas, con el SELEC * FROM tabla INTO TABLE tabla_del_cursor

dale un miro al DISPLAY STRUCTURE TO
lo envias a un archivo plano y con el CRIMSON EDITOR puedes facilmente crear la instruccion para el CREATE CURSOR.

esto es lo que hago, tengo una tabla en sql con 3 campo que son campo1,campo2,campo3, desde vfoxpro hago esto:

conec= SQLCONNECT('dbsql')
lcsql="Select * from dbsql_tabla"

genera_cursor = "C" + Sys(2015)

r = SQLEXEC(conec,lcSql,genera_cursor)

el cursor que se me genera quiero agregarle un nuevo campo que se llame campo4 el cual sera numerico de 1, como podria hacerlo.


gracias

En la linea donde defines:
lcsql="Select * from dbsql_tabla"

cabiala por:
lcsql="Select *,campo4 as xx from dbsql_tabla"

Tengo mis dudas, pero intentalo y me cuentas.

DEVILSITO

no funciona verifique, ademas no se puede dar un select de un campo que no existe.

si tienes otra idea\


gracias

Fácil:

conec= SQLCONNECT('dbsql')
lcsql="Select *, 0 AS CAMPO4 from dbsql_tabla"

genera_cursor = "C" + Sys(2015)

r = SQLEXEC(conec,lcSql,genera_cursor)


Aunque casi preferiría:

lcSql= "Select *, CAST(0 AS TinyInt) AS CAMPO4 from dbsql_tabla"

Gracias a todos por su ayuda.

juan manuel muchas gracias las 2 opciones que me dices funcionaron correctamente

tanbien encontre esta solucion en la web

select * from tabla into cursor tempo readwrite
EXECSCRIPT('alter table tempo add nuevocampo c(10)')


gracias a todos por sus aportes