Marcar registros
Hola experto:
Tengo una tabla anteriores y una tabla actuales
Lo que quiero es que con base a las dos tablas generar una tercera pero que le pegue un clave a los registros que están en la tabla anteriores pero que no están en la tabla actuales y viceversa marcar los pedidos que tengo en tabla actuales pero que o están en tabla anteriores
Ejemplo :
Ejemplo
Anteriores. Pedido
100
110
111
Actuales. Pedido
100
120
130
Resultado
Todos.pedido todos.mov
100 ANT
110 CXL
111 CXL
120 NVO
130 NVO
Saludos
Tengo una tabla anteriores y una tabla actuales
Lo que quiero es que con base a las dos tablas generar una tercera pero que le pegue un clave a los registros que están en la tabla anteriores pero que no están en la tabla actuales y viceversa marcar los pedidos que tengo en tabla actuales pero que o están en tabla anteriores
Ejemplo :
Ejemplo
Anteriores. Pedido
100
110
111
Actuales. Pedido
100
120
130
Resultado
Todos.pedido todos.mov
100 ANT
110 CXL
111 CXL
120 NVO
130 NVO
Saludos
Respuesta de Víctor Arturo Mercado Fernández
1
Intenta con algo similar a:
SELECT Todos && La tabla "Todos" debe tener un indice por el campo "pedido"
ZAP && Para asegurar que la tabla está vacía
APPEND FROM Anteriores
REPLACE ALL Todos.mov WITH "CLX"
SELECT Actuales
GO TOP
DO WHILE !EOF()
SELECT Todos
SEEK Actuales.pedido
IF EOF()
APPEND BLANK
REPLACE Todos.pedido with Actuales.pedido,;
Todos.mov WITH "NVO"
ELSE
REPLACE Todos.mov WITH "ANT"
ENDIF
SELECT Actuales
SKIP
Enddo
... bueno, eso digo yo.
Víctor.
SELECT Todos && La tabla "Todos" debe tener un indice por el campo "pedido"
ZAP && Para asegurar que la tabla está vacía
APPEND FROM Anteriores
REPLACE ALL Todos.mov WITH "CLX"
SELECT Actuales
GO TOP
DO WHILE !EOF()
SELECT Todos
SEEK Actuales.pedido
IF EOF()
APPEND BLANK
REPLACE Todos.pedido with Actuales.pedido,;
Todos.mov WITH "NVO"
ELSE
REPLACE Todos.mov WITH "ANT"
ENDIF
SELECT Actuales
SKIP
Enddo
... bueno, eso digo yo.
Víctor.
