reconverter banco de dados dbf

[COUTINHORJ]

ola gostaia da ajuda de vcs para converter um banco inteiro

exemplo no banco

campo nome da pessoa está assim: silva, luiz inacio lula da

preciso de converter para ficar assim: luiz inacio lula da silva

ou seja removendo a virgula em todos e passando o primeiro nome ate a virgula para o final

desde já agradeço a todos q puderem contribuir.

Angelo Coutinho

[Jairo Maia]

Olá Angelo Coutinho,

Seja bem vindo ao fórum.

Considerando que esse critério está exatamente da forma como você colocou, tente desta forma:

Código: Selecionar todos

Local cLastName, cName

USE SeuDbf EXCLUSIVE NEW

IF NetErr()
  Alert( "Não foi possivel abrir o banco de dados!" )
  Return Nil
EndIf

DO WHILE !EOF()

  // varname substitua pela variavel do campo do nome
  
  cLastName := Left( varname, At( ",", varname ) - 1 )
  cName := SubSt( varname, At( ",", varname ) + 2 )
  
  REPLACE varname WITH cName + " " + cLastName
  
  SKIP
  
ENDDO

Return Nil

[COUTINHORJ]

olá jairo me poupou trabalho de meses. te agradeço de coração.

forte abraço, te desejo paz e saúde