Converter JSON de retorno

[Fabiano Moraes de Araújo]

Bom dia !

Como faço para converter o JSON de retorno do banco ? Preciso desmembrar os campos do retorno e pra isso teria que converter par XML ou outro formato que eu possa importar.

Um exemplo de retorno :

JSON={ "codigo" : "422", "mensagem" : "Erro na validação de Campos.", "campos" : [{ "campo" : "COD-RET", "mensagem" : "Atualização não permitida na mesma data de emissão do título", "valor" : "" }] }

Nesse caso específico ocorreu um erro ao tentar conceder abatimento em um título, então preciso importar esse conteúdo para o meu aplicativo.

 

 

[Juliomar Marchetti]

declara a uses system.json ou rest.json

e dai cria uma classe com o  retorno ou joga para um tjsonobject

var
  LObjeto : tjsonobject;
begin
  LObjeto := TJsonValue.ParseJsonValue('String que tu pegou do json', False, True ) as TJsonObject;
 ....
  LObjeto.GetValue<string>('campo');
    ....

 

[Fabiano Moraes de Araújo]

Eu programo em FoxPro, e essa classe não funciona.  Alguma outra idéia ?

[Juliomar Marchetti]

23 minutos atrás, Fabiano Moraes de Araújo disse:

Eu programo em FoxPro, e essa classe não funciona.  Alguma outra idéia ?

Boa tarde

não. postei baseado no que uso pois não havia nenhuma informação sobre o que, e supos que seria delphi ou lazarus por conta do componente

desconheço como fazer em foxpro

desculpe

[Fabiano Moraes de Araújo]

E tem como incluir no ini de retorno todos os campos do Json ? Só alguns são preenchidos.

[Alexandre de Paula]

5 minutos atrás, Fabiano Moraes de Araújo disse:

E tem como incluir no ini de retorno todos os campos do Json ? Só alguns são preenchidos.

Tem como dar mais informações sobre isso? Lib ou Monitor?
Qual banco/carteira/fomato de transmissão? Quais campos não são preenchidos? Se preferir e for possível anexe o log e o INI do retorno

[Fabiano Moraes de Araújo]

Uso a ACBrBoleto64.dll, e seria para todos os bancos. Hoje uso Itaú e Santander.

Os campos mais importantes são : "base64" ("dados_qrcode"), e esses abaixo quando dá erro na operação :

JSON={ "codigo" : "422", "mensagem" : "Erro na validação de Campos.", "campos" : [{ "campo" : "COD-RET", "mensagem" : "Atualização não permitida na mesma data de emissão do título", "valor" : "" }] }
 

 

[Alexandre de Paula]

Criada a TK-6392 para avaliação. Assim que tivermos um posicionamento retornamos aqui no tópico.

Obrigado.

[Daniel InfoCotidiano]

@Fabiano Moraes de Araújo
sua lib está atualizada ?
desculpe a pergunta, é pq nao tivemos relatos semelhantes por enq

[Fabiano Moraes de Araújo]

Está atualizada sim, estou usando a última versão.

[Daniel InfoCotidiano]

estamos verificando

[Daniel InfoCotidiano]

22 horas atrás, Fabiano Moraes de Araújo disse:

JSON={ "codigo" : "422", "mensagem" : "Erro na validação de Campos.", "campos" : [{ "campo" : "COD-RET", "mensagem" : "Atualização não permitida na mesma data de emissão do título", "valor" : "" }] }
 

este json é especifico de qual banco por favor?
 

[Daniel InfoCotidiano]

pq testei com Itau e esta funcionando no meu ambiente:

Cod_Retorno=422
Msg_Retorno=Erro na validação de Campos.
Ori_Retorno=
HTTP_Result=200
JSON={"codigo":"422","mensagem":"Erro na validação de Campos.","campos":[{"campo":"COD-RET","mensagem":"Atualização não permitida na mesma data de emissão do título","valor":""}]}
[Rejeicao0]
Campo=
Codigo=
Versao=
Mensagem=Atualização não permitida na mesma data de emissão do título
Ocorrencia=
Valor=

Pode anexar o log Completo da Lib de boleto por favor do dia que aconteceu esta ocorrencia

[Fabiano Moraes de Araújo]

Boa tarde.

Continua não detalhando os campos. Segue abaixo um teste feito via Itaú.

[REGISTRO1]
CodRetorno=
ControleCodRetorno=
ControleData=
ControleHora=
ControleNSU=
ControleOriRetorno=
ControleRetorno=
Excecao=
HTTPResultCode=422
Header_Agencia=0
Header_Autenticacao=
Header_CNPJCPF_Beneficiario=
Header_Data_Hora=
Header_Id_Origem=
Header_Id_Processo=
Header_Indice=0
Header_Operacao=ALTERA_BOLETO
Header_Sistema_Origem=
Header_Usuario=
Header_Usuario_Servico=
Header_Versao=
IDCodBarras=
IDLinhaDig=
IDNossoNum=
IDURL=
IndicadorContinuidade=0
JSON={ "codigo" : "422", "mensagem" : "Erro na validação de Campos.", "campos" : [{ "campo" : "COD-RET", "mensagem" : "Atualização não permitida na mesma data de emissão do título", "valor" : "" }] }
MsgRetorno=
OriRetorno=
ProximoIndice=0

[TITULORETORNO1]
Aceite=0
CaracTitulo=0
Carteira=
CarteiraEnvio=0
CodBarras=
CodigoCanalTituloCobranca=
CodigoDesconto=0
CodigoEstadoTituloCobranca=
CodigoMora=
CodigoMoraJuros=0
CodigoMulta=0
CodigoNegativacao=0
DataAbatimento=
DataBaixa=
DataCredito=
DataDesconto=
DataDesconto2=
DataDocumento=
DataLimitePagto=
DataMoraJuros=
DataMovimento=
DataMulta=
DataProcessamento=
DataProtesto=
DiasDeProtesto=0
EspecieDoc=
EspecieMod=
EstadoTituloCobranca=
HoraBaixa=
Instrucao1=
Instrucao2=
Instrucao3=
LinhaDig=
MultaValorFixo=0
NossoNumero=
NossoNumeroCorrespondente=
NumeroDocumento=
Parcela=0
PercentualMaxPagamento=0
PercentualMinPagamento=0
PercentualMulta=0
QtdePagamentoParcial=0
QtdeParcelas=0
SeuNumero=
TipoDiasProtesto=0
TipoPagamento=0
Tx_ID=
URL=
UsoBanco=
ValorAbatimento=0
ValorDesconto=0
ValorDesconto2=0
ValorDespesaCobranca=0
ValorDocumento=0
ValorIOF=0
ValorMaxPagamento=0
ValorMinPagamento=0
ValorMoraJuros=0
ValorOutrasDespesas=0
ValorOutrosCreditos=0
ValorPago=0
ValorRecebido=0
Vencimento=
emv=
url_Pix=

[Sacado1]
Bairro=
CEP=
CNPJCPF=
Cidade=
Complemento=
Email=
Fone=
Logradouro=
NomeSacado=
Numero=
Pessoa=0
UF=

[SacadoAvalista1]
CNPJCPF=
NomeAvalista=
Pessoa=0
 

[Alexandre de Paula]

Em 20/12/2024 at 15:02, Daniel InfoCotidiano disse:

Pode anexar o log Completo da Lib de boleto por favor do dia que aconteceu esta ocorrencia

Boa tarde @Fabiano Moraes de Araújo

Consegue anexar as informações conforme o Daniel solicitou? Fica mais fácil de localizarmos a situação que está ocorrendo.

Obrigado

[Fabiano Moraes de Araújo]

É esse ?

23/12/24 14:37:50:935 - TLibBoletoConfig.AplicarConfiguracoes: C:\ACBr\ACBr Boleto\INI\INICIAL-4-FRIGODUTRA-08879982000145.Ini
23/12/24 14:37:50:935 - Travar
23/12/24 14:37:50:946 - Travar
23/12/24 14:37:50:953 - TLibBoletoConfig.Gravar: C:\ACBr\ACBr Boleto\INI\INICIAL-4-FRIGODUTRA-08879982000145.Ini
23/12/24 14:37:50:963 - TLibBoletoConfig.Gravar - Feito
23/12/24 14:37:50:968 - Destravar
23/12/24 14:37:50:976 - TLibBoletoConfig.AplicarConfiguracoes - Feito
23/12/24 14:37:50:983 - Destravar
23/12/24 14:37:50:991 - TLibBoletoConfig.Ler - Feito
23/12/24 14:37:50:998 - Destravar
23/12/24 14:37:51:006 - LIB_Inicializar( C:\ACBr\ACBr Boleto\INI\INICIAL-4-FRIGODUTRA-08879982000145.Ini,  )
23/12/24 14:37:51:013 -    ACBrLibBoleto - 1.2.1.333
23/12/24 14:37:51:023 - Boleto_ConfigurarDados(C:\ACBr\ACBr Boleto\INI\CEDENTE-4-FRIGODUTRA-08879982000145.Ini )
23/12/24 14:37:51:028 - Travar
23/12/24 14:37:51:036 -    SetRetorno(0, )
23/12/24 14:37:51:043 - FinalizarImpressao - Iniciado
23/12/24 14:37:51:050 - FinalizarImpressao - Feito
23/12/24 14:37:51:058 - Destravar
23/12/24 14:37:51:065 - Boleto_LimparLista
23/12/24 14:37:51:073 - Travar
23/12/24 14:37:51:080 -    SetRetorno(0, )
23/12/24 14:37:51:087 - Destravar
23/12/24 14:37:51:100 - Boleto_LimparLista
23/12/24 14:37:51:103 - Travar
23/12/24 14:37:51:110 -    SetRetorno(0, )
23/12/24 14:37:51:117 - Destravar
23/12/24 14:37:51:125 - Boleto_IncluirTitulos(C:\ACBr\ACBr Boleto\INI\ALT-TITULO-4-1129857.Ini, P )
23/12/24 14:37:51:131 - Travar
23/12/24 14:37:51:913 - FinalizarImpressao - Iniciado
23/12/24 14:37:51:913 - FinalizarImpressao - Feito
23/12/24 14:37:51:922 -    SetRetorno(0, 1 Titulo(s) Carregado(s))
23/12/24 14:37:51:930 - Destravar
23/12/24 14:37:51:938 - Boleto_EnviarBoleto(1 )
23/12/24 14:37:51:948 - Travar
23/12/24 14:37:52:864 -    MoverStringParaPChar. StrLen:2016, BufLen:10000
23/12/24 14:37:52:865 -    SetRetorno(0, [REGISTRO1]
CodRetorno=
ControleCodRetorno=
ControleData=
ControleHora=
ControleNSU=
ControleOriRetorno=
ControleRetorno=
Excecao=
HTTPResultCode=422
Header_Agencia=0
Header_Autenticacao=
Header_CNPJCPF_Beneficiario=
Header_Data_Hora=
Header_Id_Origem=
Header_Id_Processo=
Header_Indice=0
Header_Operacao=ALTERA_BOLETO
Header_Sistema_Origem=
Header_Usuario=
Header_Usuario_Servico=
Header_Versao=
IDCodBarras=
IDLinhaDig=
IDNossoNum=
IDURL=
IndicadorContinuidade=0
JSON={ "codigo" : "422", "mensagem" : "Erro na validação de Campos.", "campos" : [{ "campo" : "COD-RET", "mensagem" : "Atualização não permitida na mesma data de emissão do título", "valor" : "" }] }
MsgRetorno=
OriRetorno=
ProximoIndice=0

[TITULORETORNO1]
Aceite=0
CaracTitulo=0
Carteira=
CarteiraEnvio=0
CodBarras=
CodigoCanalTituloCobranca=
CodigoDesconto=0
CodigoEstadoTituloCobranca=
CodigoMora=
CodigoMoraJuros=0
CodigoMulta=0
CodigoNegativacao=0
DataAbatimento=
DataBaixa=
DataCredito=
DataDesconto=
DataDesconto2=
DataDocumento=
DataLimitePagto=
DataMoraJuros=
DataMovimento=
DataMulta=
DataProcessamento=
DataProtesto=
DiasDeProtesto=0
EspecieDoc=
EspecieMod=
EstadoTituloCobranca=
HoraBaixa=
Instrucao1=
Instrucao2=
Instrucao3=
LinhaDig=
MultaValorFixo=0
NossoNumero=
NossoNumeroCorrespondente=
NumeroDocumento=
Parcela=0
PercentualMaxPagamento=0
PercentualMinPagamento=0
PercentualMulta=0
QtdePagamentoParcial=0
QtdeParcelas=0
SeuNumero=
TipoDiasProtesto=0
TipoPagamento=0
Tx_ID=
URL=
UsoBanco=
ValorAbatimento=0
ValorDesconto=0
ValorDesconto2=0
ValorDespesaCobranca=0
ValorDocumento=0
ValorIOF=0
ValorMaxPagamento=0
ValorMinPagamento=0
ValorMoraJuros=0
ValorOutrasDespesas=0
ValorOutrosCreditos=0
ValorPago=0
ValorRecebido=0
Vencimento=
emv=
url_Pix=

[Sacado1]
Bairro=
CEP=
CNPJCPF=
Cidade=
Complemento=
Email=
Fone=
Logradouro=
NomeSacado=
Numero=
Pessoa=0
UF=

[SacadoAvalista1]
CNPJCPF=
NomeAvalista=
Pessoa=0
)
23/12/24 14:37:52:872 - Destravar
23/12/24 14:37:52:916 - Boleto_LimparLista
23/12/24 14:37:52:916 - Travar
23/12/24 14:37:52:923 -    SetRetorno(0, )
23/12/24 14:37:52:932 - Destravar
23/12/24 14:37:52:940 - Boleto_IncluirTitulos(C:\ACBr\ACBr Boleto\INI\ALT-TITULO-4-1129857.Ini, P )
23/12/24 14:37:52:947 - Travar
23/12/24 14:37:53:576 - FinalizarImpressao - Iniciado
23/12/24 14:37:53:576 - FinalizarImpressao - Feito
23/12/24 14:37:53:586 -    SetRetorno(0, 1 Titulo(s) Carregado(s))
23/12/24 14:37:53:595 - Destravar
23/12/24 14:37:53:604 - Boleto_SetDiretorioArquivo(C:\ACBr\ACBr Boleto\PDF, PED981574-1_7334.PDF )
23/12/24 14:37:53:614 - Travar
23/12/24 14:37:53:622 -    SetRetorno(0, )
23/12/24 14:37:53:632 - Destravar
23/12/24 14:37:53:640 - Boleto_GerarPDFBoleto(0 )
23/12/24 14:37:53:649 - Travar
23/12/24 14:37:54:271 -    SetRetorno(0, )
23/12/24 14:37:54:271 - FinalizarImpressao - Iniciado
23/12/24 14:37:54:281 - FinalizarImpressao - Feito
23/12/24 14:37:54:288 - Destravar
23/12/24 14:37:54:297 - TACBrLib.Destroy
23/12/24 14:37:54:305 - Finalizar
 

[Alexandre de Paula]

anexe o arquivo no tópico por favor.

[Fabiano Moraes de Araújo]

Segue em anexo.

LOG.txt

[Daniel InfoCotidiano]

Obrigado, vamos dar continuidade ao caso.

[Daniel InfoCotidiano]

@Fabiano Moraes de Araújo
Consegui simular o problema e enviamos uma correção ao SVN.
A lib será disponibilizada na próxima compilação, previsto para terça pela manhã.
 

[Fabiano Moraes de Araújo]

Perfeito, vou aguardar a versão nova. Obrigado.

[Daniel InfoCotidiano]

Em 26/12/2024 at 15:53, Fabiano Moraes de Araújo disse:

Perfeito, vou aguardar a versão nova. Obrigado.

Bom dia !
Chegou a realizar os testes ?