ADVPL – Como usar JSONObject():fromJsonFile() para carregar arquivos JSON

Aprenda como ler um arquivo JSON no ADVPL utilizando o método fromJsonFile() da classe JSONObject(). Este recurso é muito útil para integrar sistemas, importar configurações ou tratar dados externos dentro do Protheus.

✅ Exemplo completo em ADVPL

User Function jsonFile()
    local cPathAndFile  := "C:\temp\json.json"
    local oJsonObject   := JSONObject():New()
    local xReturn       := Nil

    xReturn := oJsonObject:fromJsonFile(cPathAndFile)

    if valType(xReturn) == "U"
        conout("Arquivo: " + cPathAndFile + " lido com sucesso")
    else
        conout("Erro: " + cValToChar(xReturn) + " na leitura do arquivo: " + cPathAndFile)
    endif

    freeObj(oJsonObject)
Return( Nil )

📌 Como funciona o código

• JSONObject():New() – Cria um objeto para manipular JSON.
• fromJsonFile() – Lê o conteúdo de um arquivo JSON direto do disco.
• valType(xReturn) – Verifica se retornou U (undefined), indicando leitura bem-sucedida.
• conout() – Exibe mensagens no console do Protheus.

📝 Dicas importantes

• Garanta que o caminho do arquivo exista (C:\temp\json.json).
• O JSON deve estar bem formatado para evitar erros.
• Recomenda-se usar freeObj() para liberar o objeto após o uso.

Gostou? Compartilhe com seus amigos e deixe um comentário! 😎