Rotina para copiar dados DBF

[JuniorVaz]

Ola galera, estou precisando de uma forcinha de vocês, tenho duas tabelas DBF, cadref.dbf e cadrefcli.dbf, com os seguintes campos:

codref
codpla
descref
descpla
codgra
codref
codalm
preco
obs
descalm
descrefo
t01
t02
t03
t04
t05
t06
t07
t08
t09
t10
t11
t12
t13
t14
codcli
razao

Neste caso, as duas tabelas que tenho(CADREF.DBF E CADREFCLI.DBF), são identicas, preciso no entanto fazer uma filtragem da tabela CADREF.DBF, pelo campo CODCLI, por exemplo:

só quero que seja copiado as linhas que corresponderem ao cliente xcliente por exemplo... e depois de filtrar, preciso copiar os dados da filtragem para a tabela CADREFCLI.PRG...

Preciso desta forcinha, é um trabalho urgente que tenho até esta semana para entregar... Espero a colaboração de todos... Obrigado desde ja... VLW

[janio]

Amigo,

Use o Append From, tipo:

Código: Selecionar todos

xCODCLI = 0   // CODIGO do cliente para filtragem
DBCLOSEALL()
USE CADREFCLI.DBF  // DBF que receberá os DADOS
APPEND FROM CADREF.DBF for CODCLI = xCODCLI

Feche o Banco de Dados... refaça os índices e pronto!

Um abraço,

Janio

[JuniorVaz]

Vlw ai cara, deu pra fazer certinho o que eu estava precisando, era bem simples, mas não sabia fazer isso... vlw mesmo...