Exemplo da função FWJsonSerialize + Um estrutura de classe em Advpl para criação de Json mais complexo

Necessitei criar uma estrutura Json em Advpl, procurando no TDN encontrei a Rotina FWJsonSerialize. No Exemplo apresentando tem uma classe simples que é transformada em string no formato Json.

Como necessitava de uma estrutura para enviar os dados para o google charts e pensando facilitar futuras manutenções, criei um classe onde as definições dos atributos seria um outra classe criada para definir a estrutura.

Exemplo da Implementação:

Class EX_CHARTS.PRW

Class EX_DADOS.PRW

Class EX_COLS

Class EX_ROWS

Class EX_CONFIG

A saída da função será:

{
“CONFIG”:{
“HEIGHT”:100
,”TITLE”:”Teste”
, “WIDTH”:10
},
“DADOS”:{
“COLS”:[
{ “LABEL”:”label2″
,”TYPE”:”2″
},
{
“LABEL”:”label2″
,”TYPE”:”2″
}
],
“ROWS”:[
]
}
}

Segue link do GitHub: https://github.com/rcarloslima/exemplo_FWJsonSerialize_advpl_OO

Protheus, TOTVS e Microsiga são marcas registradas pertencentes a TOTVS S/A.

Sou Ruann Carlos, formado em Análise e Desenvolvimento de Sistemas, apaixonado por novas tecnologias.
Atuando a 8 anos com o sistema Totvs Protheus, com a implantação e suporte aos módulos de contabilidade, fiscal, financeiro, compras, estoque, gestão de pessoal, ponto eletrônico, entre outros, como também no desenvolvimento em Advpl, integração de outros sistemas e análise dos dados.

Deixe uma resposta

O seu endereço de e-mail não será publicado. Campos obrigatórios são marcados com *