Boa tarde, Pessoal alguem tem algum exemplo do uso do Json nativo no TLPP apresentado neste artigo. https://tdn.totvs.com/display/tec/Json. Preciso de algo um pouco mais complexo.
Ex: adicição de nós/ remoção de nós
se puderem me ajudar fico grato.
Trabalhar com JSON nativo TLPP
- 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.
- Edite sua pergunta ou resposta caso queira alterar ou adicionar detalhes.
- 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.
- Se o autor da pergunta marcar uma resposta como solucionada, esta marca aparecerá.
- Clique aqui para mais detalhes sobre o funcionamento do TOTVS DevForum!
1 resposta
-
Cláudio,
O JSON nativo do TLPP ainda é um
JsonObject.Para adicionar um valor, basta usar colchetes e fazer a atribuição padrão do ADVPL com
:=e para remover, basta usar o métodoDelName://------------------------------------------------------------------- /*/{Protheus.doc} nativeJson Exemplo de utilização de JSON em TLPP @author Daniel Mendes @since 29/11/2021 @version 1.0 /*/ //------------------------------------------------------------------- user function nativeJson() local jMyJson as json //Inicia o json jMyJson := {"numero" : 123} //Cria um novo nó, com uma string jMyJson["string"] := "Xisto" //Cria um novo nó, com um objeto jMyJson["objeto"] := {"chave": "valor"} //Remove um valor jMyJson:DelName("numero") ConOut(jMyJson:toJson()) return
Documentações:
-