tipo number em array

pessoal, tenho um fonte que importa alguns dados em csv, pra isso tenho um array com os campos, porém os campos de tipo number não são importados, alguém sabe o porque? Captura de tela 2023-03-23 173648.png

esse campo e mais um que também é do tipo number, não importa para o banco de dados, dá esse erro

Trecho da declaração das variáveis e array:

Local cArq := cGetFile('*.CSV',/*cTitulo*/,/*nMascpadrao*/,/*cDirinicial*/,.T.,/*nOpcoes*/,.T.,.T.)
Local cLinha := ""
Local lPrim := .T.
Local aCampos := {'BZ_FILIAL','BZ_COD','BZ_LOCPAD','BZ_QE','BZ_EMIN'}
Local aDados := {}

Trecho da importação:

dbSelectArea("SBZ")
dbSetOrder(1)
dbGoTop()
If !dbSeek(xFilial("SBZ")+aDados[i,1]+aDados[i,2]+aDados[i,3]+aDados[i,4]+aDados[i,5])
Reclock("SBZ",.T.)
SBZ->BZ_FILIAL := xFilial("SBZ")
For j:=1 to Len(aCampos)
cCampo := "SBZ->" + aCampos[j]
&cCampo := aDados[i,j]
Next j
SBZ->(MsUnlock())
EndIf
Next i
End Transaction
compartilhar
  • Quando você lê o CSV, é bem provável que o seu dado esteja como character, você precisaria converter ele para número, talvez com o uso da função Val.

    Daniel Mendes   23 de Mar de 2023
  1. Você vai ver essas setas em qualquer página de pergunta. Com elas, você pode dizer se uma pergunta ou uma resposta foram relevantes ou não.
  2. Edite sua pergunta ou resposta caso queira alterar ou adicionar detalhes.
  3. Caso haja alguma dúvida sobre a pergunta, adicione um comentário. O espaço de respostas deve ser utilizado apenas para responder a pergunta.
  4. Se o autor da pergunta marcar uma resposta como solucionada, esta marca aparecerá.
  5. Clique aqui para mais detalhes sobre o funcionamento do TOTVS DevForum!

1 resposta

Não é a resposta que estava procurando? Procure outras perguntas com as tags advpl array protheus csv importacao ou faça a sua própria pergunta.