Importar de DBF para DBF.........

Fórum sobre a linguagem CA-Clipper.

Moderador: Moderadores

Avatar do usuário
matrix
Usuário Nível 3
Usuário Nível 3
Mensagens: 131
Registrado em: 06 Jul 2004 08:41
Localização: Paraná
Contato:

Importar de DBF para DBF.........

Mensagem por matrix »

Pessoal, desculpem a falta de memoria mas me deu um branco e fiz busca pelo assunto e naum houve retorno entaum......peço ajuda.

tipo: tenho um campo no DBF_A->CAMPO1/Caracter/82 e um campo no DBF_B->CAMPO2/Numerico/15/0

entaum preciso do seguinte, preciso coletar os primeiros 15 caracteres da esquerda do campo1(C/82) e grava-los no campo2(N/15/0)

agradeço a lembrança.

abraços
"Ter Problemas é Inevitável, ser derrotado por eles é opcional.!!"
Avatar do usuário
Eolo
Colaborador
Colaborador
Mensagens: 1134
Registrado em: 08 Dez 2005 18:24
Localização: São Paulo - SP

Mensagem por Eolo »

Matrix,
Se vc tem certeza que os 15 primeiros elementos à esquerda do "campo1" são caracteres numéricos (0 a 9) e/ou espaços contíguos, é só fazer o seguinte, considerando que os 2 DBFs têm o mesmo número de registros:

Código: Selecionar todos

use dbf_a excl new
use dbf_b excl new
sele dbf_b
do whil !eof()
  repl campo2 with val(left(dbf_a->campo1,15)) // <----
  sele dbf_a
  skip
  sele dbf_b
  skip
endd
quit
Responder