copiar informacion de una columna a otra en una misma tabla

nessthor
25 de Junio del 2003
Estoy utilizando lo siguiente:
Replace ColumnaB with ColumnaA for recno()>1

Pero con esto no me sirve.
Lo ke necestio hacer exactamente es lo siguiente: El contenido de la fila 1 de la ColumnaA se copie en la fila 2 de la columnaB, y el contenido de la fila 2 de la ColumnaA se copie a la fila 3 de la columna B y asi sucesivamente.
Gracias por su ayuda.

Emilson
25 de Junio del 2003
ok, me inmagino que ya has de tener datos en la tabla, solo seria un pequeño juego que no podria ser muy complicado prueba con esto.

local xValue
select tabla
store columnA to xValue
skip
do while !eof()
replace columnB with xValue
store columnA to xValue
skip
enddo.

Espero te sirva.

Rafael S?hez
25 de Junio del 2003
ok.puede ser una buena solucion pero esta programada a la antigualocal xValue

select tabla
go top
xValue=columnA
skip
scan while !eof() &&tiene el skip incorporado
replace columnB with xValue
xValue= columnA
endscan

Emilson
25 de Junio del 2003
Porque para esa gracia podriamos hacerlo de esta manera y ahorrar unas cuantas lineas.

local xValue
select tabla
scan
if !bof()
replace columnB with xValue
endif
xValue=columnA
endscan

Emilson
25 de Junio del 2003
Pueda que este a la antigua pero hay un problema con el scan....endscan que siempre te envia al inico de la tabla aunque le des un skip antes para avanzar al siguiente registro y la unica diferencia del scan...endscan con do....enddo es como tu dices que ya trae incorporado es salto de registro pero aun el do...enddo es muy utilizado aunque tu no lo creas. y no necesitas especificar el "while !eof()" puesto que por default el lo hace.