Método TJsonParser:Json_Parser

Faz o parser Json de uma mensagem.

Sintaxe

Json_Parser( < cJson >, < nLen >, < @aJson >, < @nRet > )

Nome	Tipo	Descrição	Obrigatório	Referência
cJson	Caractere	Mensagem no formato Json	X
nLen	Numérico	Tamanho da mensagem Json que será avaliado	X
aJson	Vetor	Vetor contendo todos os campos da mensagem Json	X	X
nRet	Numérico		X	X

Nome	Tipo	Descrição
lRet	Lógico	Retorno do Parser.

Exemplo 1

  ....
  lRet := oJsonP:Json_Parser()
  If (lRet == .F.)
    ConOut("Erro ao executar o parser Json")
  EndIf

Totvs Application Server com versão igual ou superior a 7.00.131227A