Oi, Carol!
Eu sei que não é a solução que você queria obter, mas só sei fazer da forma que vou expor.
Vou expor através de exemplos, que vale mais que mil palavras!
Levando em consideração o seu exemplo "nos míííííííííííííííínimos" detalhes:
Crie um arquivo chamado "texto.txt" e copie para ele as informações que você postou no tópico (religiosamente, obedecendo até os espaços).
Crie um arquivo DBF e nomeie-o de "teste.dbf" com a seguinte estrutura:
- Campo CODIGO, tipo Character, tamanho 2;
- Campo NOME, tipo Character, tamanho 6.
Feito isto, compile e link estes poucos códigos aí embaixo, comentado linha a linha para que você possa entender o que foi feito:
Código: Selecionar todos
CLS // Limpa a tela
USE teste NEW // Abre o arquivo DBF "teste.dbf"
ZAP // Elimina todos os dados do arquivo DBF
// Copia p/o arquivo DBF dados ASCII do arq. "texto.txt"
APPEND FROM texto.txt SDF
// Localiza no arquivo DBF a linha de código "3"
LOCATE FOR ALLTRIM(teste->codigo) = "3"
// Altera conteúdo da coluna "NOME" de "nome 3" p/"Mudei"
REPLACE teste->nome WITH "Mudei"
// Reposiciona o ponteiro no início do arquivo DBF
teste->(DBGOTOP())
// Copia dados alterados do arquivo DBF p/NOVO arquivo texto
COPY TO texto1.txt SDF // Atenção: Copia para "texto1.txt"
DBCLOSEALL() // Fecha todos os arquivos DBF abertos
RETURN // Aborta o programa
Após isto, edite o arquivo "texto.txt" e veja que ele estará intacto.
Edite o arquivo "texto1.txt" e veja que o "nome 3" foi modificado para "Mudei", bem como no arquivo DBF "teste.dbf".
Imagino que você pode adaptar este exemplo às suas necessidades.
Boa sorte!