Transferir Linhas Registros entre tabelas

[m@r<3|o]

Pessoal entre 2 tabelas
existe alguma sintax ,
generica ... para que 2 tabelas com a mesma estrutura
eu consiga remanejar lancamentos


acho que por terem mesma estrutura
deve ter um jeito cobiçera de fazer

Vlw
BATMAN

[Tales Ruan]

O que exatamente você precisa?

Tendo duas tabelas com a mesma estrutura, quer manter as linhas iguais nas duas?

[m@r<3|o]

Mestre Yoda,

2 bases de dados iguais uma

por dentro no C: e
for fora no PEN DRIVE

mais em primeiro instante vai ser feito no C:
ai clicando num comando
GRAVARIA NO H: e excluiria do C:

[hugo]

ceus batman, estariamos apagando pedidos que nao possuem notas do banco "oficial"?

zueira marcelo, nao precisa responder, vou apagar aqui depois que tu zuar

valeu!

so mesmo pra dizer um ola! garrraaadaaaaasssoooo esta semana!

[Marcos Guedes]

Entendi muito não!
Seria uma espécie de backup, Marcelo?

Sendo backup... seria dos dados?
De toda a tabela, com sua estrutura?

Não ficou muito claro, pra mim.

[m@r<3|o]

sim ,

C:\PastaOrigem\teste.dbf cod desc
E:\PastaDestino\teste.dbf cod desc

passar registros de uma tabela para outra , acho que faz isso em 4 linhas
só que preciso dar uma fuçada ....

caso alguem saber , somente de DBF para DBF com estruturas iguais

seria algo como

select tabela1
append from dbf('tabela2') for registro = 'S'

???

[m@r<3|o]

assim

Código:

CLOSE DATABASES ALL
SET PATH TO C:\A1
USE TABLE1
SET PATH TO C:\A2
APPEND FROM DBF('table2.dbf')  *** ERRO

só que recebo um Erro Alias is not found

ou assim


assim

Código:

CLOSE DATABASES ALL

CREATE CURSOR export (estado c(2), cidade c(10))
SET PATH TO C:\A1
APPEND FROM TABLE1

SET PATH TO C:\A2 ADDITIVE
   USE TABLE2 IN 0 EXCLUSIVE
   SELECT TABLE2
   APPEND FROM DBF('export')
   USE IN TABLE2

USE IN export

Nao da Erro mais nao exporta

[Marcos Guedes]

tens algum campo autoinc em sua tabela?
Uma das formas é fazer o seguinte:

Código:

INSERT INTO tabelaDestino (campoDestino1, campoDestino2, campoDestino3...) SELECT campoOrigem1, campoOrigem2, campoOrigem3... FROM tabelaOrigem WHERE...

Resolve?

[m@r<3|o]

em ultima questao , vo ver se faço do while com into cursor

mais como havia dito , gostaria de usar assim

Código:

set path  pasta1
use pasta1 in 0 excl
set path pasta2
use pasta2 in 1 excl
APPEND FROM  tabela2  for  tabela1.situacao ='N'

eu fazendo isso seria o maximo, só que como acima a area de trabalho do FOR tabela1 nao acha to tentando

[Marcos Guedes]

Marcelo, você entendeu minha mensagem?

tens algum campo autoinc em sua tabela?
Uma das formas é fazer o seguinte:

Código:

INSERT INTO tabelaDestino (campoDestino1, campoDestino2, campoDestino3...) SELECT campoOrigem1, campoOrigem2, campoOrigem3... FROM tabelaOrigem WHERE...

Resolve?

[m@r<3|o]

Nao tem campo Auto numerico ,
Marcos do jeito que voce citou seria somente por a mão na massa.

só que to tentando fazer utilizando o commando DBF () nao utilizei ele ainda
e + commando Append From

Código:

CLOSE DATABASES ALL
SET PATH TO C:\A1
USE table1 EXCL
SET PATH TO C:\A2
use table2 IN 0 EXCLUSIVE 
Append from (DBF('table1')) FOR situacao = 'N'
DELETE FOR table1.situacao = 'N'

quando se tem 2 tabelas de estruturas iguais pode se utilizar o DBF so que meu for esta enjuado

A logica é simplesmente essa

Código:

 Select AliasTabDestino
 Append from (DBF(“AliasTabOrigem”))

no meu teste , apagou os registros , mais nao fez o Append

- Clique aqui para baixar o arquivo!

pude ajuda

[Tales Ruan]

Talvez o comando COPY TO pode ajudar.

Faça um teste. Acho que resolve.

[Julio]

Marcelo

Dei um browser logo apos "use table2 IN 0 EXCLUSIVE " e ele mostra a tabela1 e não a dois.

Quais dados tem que passar para a tabela2, os que estão com situacao = "N"?

[Julio]

Dei uma mexido do meu modo veja se esta como precisa:

Código:

CLOSE DATABASES ALL
SET PATH TO C:\teste\A1
USE table1 EXCL
SET PATH TO C:\teste\A2

use  table2 exclusive

Append From c:\teste\a1\table1 FOR situacao = "N"

SET PATH TO C:\teste\A1
USE table1 EXCL
DELETE FOR table1.situacao = 'N'


[Marcos Guedes]

Marcelo... caso a dica do Julio não funcione... suas tabelas são FREE?

Se você ler com atenção a mensagem que postei verás que se resolve tudo com uma única linha de código.


Se demorar, terei que fazer um exemplo.
rs...