ADVPL – Como usar JSONObject():toJsonFile() para salvar arquivos JSON

Aprenda como salvar dados em formato JSON no ADVPL utilizando o método toJsonFile() da classe JSONObject(). Esse recurso é ideal para exportar informações, gerar logs estruturados ou criar integrações com outras aplicações fora do Protheus.

✅ Exemplo prático em ADVPL

function saveJson()
    local cPathAndFile  := "C:\temp\json.json" as character
    local oJsonObject   := JSONObject():New() as json
    local xReturn       := Nil

    oJsonObject := {
        "testetojsonfile" : {
            "var1" : "ola",
            "var2" : "olaola",
            "var3" : "olaolaola"
        }
    }

    xReturn := oJsonObject:toJsonFile(cPathAndFile)

    if valType(xReturn) == "U"
        conout("Arquivo: " + cPathAndFile + " criado com sucesso")
    else
        conout("Erro: " + cValToChar(xReturn) + " na gravação do arquivo: " + cPathAndFile)
    endif

    freeObj(oJsonObject)
Return( Nil )

📘 Entendendo o código

• JSONObject():New() – Cria o objeto JSON em memória.
• toJsonFile() – Salva o conteúdo JSON diretamente em um arquivo físico.
• valType(xReturn) – Retorna "U" quando o processo é bem-sucedido.
• freeObj() – Libera o objeto após o uso, evitando consumo desnecessário de memória.

💡 Dicas úteis

• Verifique se o diretório C:\temp\ existe antes de executar a função.
• O arquivo será criado (ou sobrescrito) automaticamente com os dados definidos no objeto JSON.
• Ideal para gerar relatórios, logs ou arquivos de integração em formato leve e padronizado.

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