Ajuda em montar prg

[kristo]

Bom dia a todos
Eu uso clipper mais não tenho grandes conhecimentos, estou precisando montar uma PRG com a seguinte função:
Tenho 5 dbf com os nomes:
SP.dbf
MG.dbf
RJ.dbf
BH.dbf
SC.dbf
eu preciso montar o seguinte, preciso de uma prg que pegue os dados desses arquivos e monte um novo dbf, ou seja que entre em SP.DBF pegue a quatidade de 100 nomes dentro dele e jogue para uma nova dbf, com a mesma estrutura da DBF pesquisada, nome da nova DBF pode ser SP2.dbf, e assim por diante, se der para colocar todos os estados nessa prg para ele fazer a busca automática, melhor ainda.
Os campos contido nas DBF são os seguintes
nome,endereco,cidade,estado,telefone

Pode parecer abuso par alguns e fácil para outros, mais estou precisando disso e não sei como fazer, se alguém puder me ajudar fico grato.

Fiquem em paz.

[MARCELOG]

Olá Santo (Kristo),
há diversas maneiras de fazer o que você quer.
Um exemplo.

Crie a tabela SP2.DBF com os campos.

Depois

USE SP2.DBF
USE SP.DBF

For i= 1 To 100
SP2->(DBAPPEND()) //Sua rotina para inserir registro
SP2->Campo1 = SP->Campo1
SP2->Campo2 = SP->Campo2
SP2->Campo3 = SP->Campo3
SP2->Campo4 = SP->Campo4
SP->(DBSKIP())
Next i

Espero ter ajudado.

MarceloG

[kristo]

Olá Santo (Kristo),
há diversas maneiras de fazer o que você quer.
Um exemplo.

Crie a tabela SP2.DBF com os campos.

Depois

USE SP2.DBF
USE SP.DBF

For i= 1 To 100
SP2->(DBAPPEND()) //Sua rotina para inserir registro
SP2->Campo1 = SP->Campo1
SP2->Campo2 = SP->Campo2
SP2->Campo3 = SP->Campo3
SP2->Campo4 = SP->Campo4
SP->(DBSKIP())
Next i

Espero ter ajudado.

MarceloG

Marcelão valeu, acabou de salvar uma alma do purgatório, agora so mais uma coisinha, não me ache abusado ok

Não tenho rotinha para inserir os registros, pode quebrar essa tb?
Fique com Deus