jefferson01

Fiz o teste aqui e está funcionando corretamente. Att. Jefferson

Boa tarde! Fiz o teste com a unit informado nesse tópico e agora está sendo passado corretamente a informação "paginacao.itensPorPagina=1000" na url da consulta quando usando o indicador pix igual a true. Agora retornou os 153 títulos, no nosso caso, corretamente. Fizemos também o teste usando o indicador pix igual a false e a informação "itensPorPagina=1000" na url da consulta ficou certo. Obrigado a todos.

Boa tarde, @Daniel InfoCotidiano Os testes que eu fiz, foram realizados com o programa exemplo.

Fiz o procedimento e continuo com o problema. O estranho é que utilizo a API do Banco Inter(V2 e V3 com PIX) e Itaú(Com PIX) sem problema nenhum.

@Juliomar Marchetti, se retiro json4delphi do path passa a apresentar erro em ACBrJSON. Diz que não encontrou Jsons.dcu. Utilizamos o Delphi 7.

@Juliomar Marchetti, Obrigado pelo retorno. Os fontes aqui estão atualizados. Att. Jefferson

Bom dia! Verificando em debug, percebemos que na geração do token o retorno está sendo o mesmo valor enviado no Body. Não sabemos o que estamos fazendo de erro. Os testes estão sendo realizados no aplicativo de exemplo. Segue anexo do que observamos.

Aqui é V3 também!

Bom dia! Também estou com problema ao gerar o token para o SIcoob. Segue baixo o log: 10/10/24 11:03:51:063 - Body Resposta (payload):client_id=XXXXXXXXXXXXXXXXXXX&scope=boletos_inclusao boletos_consulta boletos_alteracao&grant_type=client_credentials 10/10/24 11:03:51:063 - Falha Envio: Falha na Autenticação: HTTP_Code=500 Erro=client_id=XXXXXXXXXXXXXXXXXXXXXXXXXX&scope=boletos_inclusao boletos_consulta boletos_alteracao&grant_type=client_credentials 10/10/24 11:40:23:739 - Autenticando Token... 10/10/24 11:40:23:747 - Comando Enviar: TOAuth 10/10/24 11:40:23:747 - Header Envio:Authorization: Basic MGI0MjU2ODMtNTQzZS00MWNlLTkxZDYtM2VjNjg2NTliNTkzOjBiNDI1NjgzLTU0M2UtNDFjZS05MWQ2LTNlYzY4NjU5YjU5Mw== 10/10/24 11:40:23:747 - URL: [POST] https://auth.sicoob.com.br/auth/realms/cooperado/protocol/openid-connect/token 10/10/24 11:40:23:748 - Body Envio (Payload):client_id=XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX&scope=boletos_inclusao boletos_consulta boletos_alteracao&grant_type=client_credentials 10/10/24 11:40:23:821 - Erro: HTTP_Code=500 Erro=client_id=XXXXXXXXXXXXXXXXXXXXXXXX&scope=boletos_inclusao boletos_consulta boletos_alteracao&grant_type=client_credentials 10/10/24 11:40:23:822 - Header Resposta:POST /auth/realms/cooperado/protocol/openid-connect/token HTTP/1.1 Host: auth.sicoob.com.br Keep-Alive: 300 Connection: keep-alive User-Agent: Mozilla/4.0 (compatible; Synapse) Content-Type: application/x-www-form-urlencoded Content-Length: 134 Authorization: Basic MGI0MjU2ODMtNTQzZS00MWNlLTkxZDYtM2VjNjg2NTliNTkzOjBiNDI1NjgzLTU0M2UtNDFjZS05MWQ2LTNlYzY4NjU5YjU5Mw== Não sei o que estamos fazendo de errado. Se alguém puder orientar fico muito agradecido. Att. Jefferson

@Daniel InfoCotidiano, passei em Boleto.Cedente.CedenteWS.Scope := 'boleto-cobranca.write boleto-cobranca.read'; Muito obrigado pela atenção. Desculpe o incomodo ai! TMJ

Na função Enviar não é atualizado o Scope function TBoletoW_Inter_API.Enviar: boolean; var LJsonObject : TACBrJSONObject; begin Result := inherited Enviar; (* Tratamento automatico qdo tpINCLUI com pix. Entao ele vai enviar capturar a reposta para pegar o codigoSolicitacao e realizar uma consulta detalhe automaticamente para retornar o boleto com QrCODE *) if (Boleto.Cedente.CedenteWS.IndicadorPix) and (Boleto.Configuracoes.WebService.Operacao = tpInclui) then begin try LJsonObject := TACBrJSONObject.Parse( FRetornoWS ); if NaoEstaVazio(LJsonObject.AsString['codigoSolicitacao']) then begin ATitulo.NossoNumeroCorrespondente := LJsonObject.AsString['codigoSolicitacao']; Boleto.Configuracoes.WebService.Operacao := tpConsultaDetalhe; GerarDados; Result := inherited Enviar; end; finally LJsonObject.Free; Boleto.Configuracoes.WebService.Operacao := tpInclui; end; end; end; eu já alterei passando "Boleto.Cedente.CedenteWS.Scope := 'boleto-cobranca.read';" antes de enviar a consulta mas não resolveu. Quando solicito a baixa ou quando faço a consulta sempre atualizo o Scope, porém, "parece" que não está atualizando. faço assim /*Consulta*/ Boleto.Cedente.CedenteWS.Scope := 'boleto-cobranca.read'; Boleto.Configuracoes.WebService.Operacao := tpConsulta; /*Consulta Detalhe*/ Boleto.Cedente.CedenteWS.Scope := 'boleto-cobranca.read'; Boleto.Configuracoes.WebService.Operacao := tpConsultaDetalhe; /*Baixa*/ Boleto.Cedente.CedenteWS.Scope := 'boleto-cobranca.write'; Boleto.Configuracoes.WebService.Operacao := tpBaixa; /*Incluir*/ Boleto.Cedente.CedenteWS.Scope := 'boleto-cobranca.write'; Boleto.Configuracoes.WebService.Operacao := tpInclui;

Uma coisa estranha que estou observando é que se fizer solicitações diferentes da o problema, por exemplo, se abrir o programa e solicitar a baixa de um boleto, faz correto e depois eu consultar da o erro de 13/09/24 15:43:09:230 - Retorno Envio: Result={"message":"Faltando escopos necessários."}. Se eu fechar o programa e abrir novamente consigo fazer a consulta. Não consegui encontrar o motivo. Acredito que deve ser o mesmo motivo de apresentar essa mensagem ao incluir, já que faz o envio e depois a consulta. *** O ambiente de produção está OK. ***

@Daniel InfoCotidiano, está acontecendo também no programa de exemplo. Só temos credenciais em produção.

@Daniel InfoCotidiano Você conseguiu ver algo sobre essa parte "Ao enviar um boleto para a versão 3 estamos recebendo o retorno "Faltando escopos necessários." quando o componente vai consultar o boleto enviado. Quando realizamos a consulta detalhe "manualmente" é retornado os dados corretamente. Não conseguimos encontrar o que estamos fazendo de errado."

Boa tarde @Daniel InfoCotidiano Se mudar o combobox no portal da documentação o campo altera para "valor". Segue exemplo:

Bom dia @Daniel InfoCotidiano Fiz a atualização ontem(12/09/2024), antes disso utilizávamos apenas a versão 2 da API do banco Inter. Estamos realizando os testes em produção. Depois da atualização a V2 está funcionando normalmente. Quando começamos a alterar o sistema para utilizar a V3 encontramos os problemas relatados. Att. Jefferson

Atualizei o Acbr para utilizar a API do Banco Inter na Versão 3 e encontrei alguns problemas Na procedure GerarJuros está sendo utilizado a propriedade "DataMulta", acredito que o correto seja "DataMoraJuros". Na procedure GerarDesconto está sendo gerado a "taxa" quando o indicador de desconto é Valor, porém o correto é gerar "valor". Isso quando o indicador Pix está true. Ao enviar um boleto para a versão 3 estamos recebendo o retorno "Faltando escopos necessários." quando o componente vai consultar o boleto enviado. Quando realizamos a consulta detalhe "manualmente" é retornado os dados corretamente. Não conseguimos encontrar o que estamos fazendo de errado. Segue em anexo a unit ACBrBoletoW_Inter_API.pas com as alterações mencionadas e o arquivo ArqBoletoWS.log. Desde já agradeço a atenção. ACBrBoletoW_Inter_API.zip ArqBoletoWS.zip

Muito obrigado @denisrique. Fico no aguardo. Att. Jefferson

Bom dia @denisrique! Surgiu a necessidade do nosso sistema também comunicar com a balança rodoviária BJ-850. Você conseguiu realizar a leitura do peso? Att. Jefferson

Boa tarde @amadeujunior18! Surgiu a necessidade do nosso sistema também comunicar com a balança rodoviária BJ-850. Você conseguiu realizar a leitura do peso? Att. Jefferson

@Italo Giurizzato Junior, sobre a duvida acima, observamos que após executar o metodo Emitir o xml do RPS está na propriedade NFSeX.NotasFiscais.Items[0].XmlRps e em TACBrNFSeProviderEL.TratarRetornoConsultaLoteRps da unit EL.Provider não é utiliza essa propriedade? Sendo assim ela já tem informação. É isso mesmo ou estamos analisando errado? Desculpe se estou errando em algo. Desde já agradeço.

Bom dia @Italo Giurizzato Junior! Depois de utilizar o método "Emitir" temos que carregar o xml do RPS antes de executar o método "ConsultarLoteRps"? Se sim, como executamos isso? Desde já agradeço muito pela atenção. Att. Jefferson

Bom dia! Não estamos conseguindo utilizar corretamente o ACBRNFSeX para enviar nota para o provedor EL versão 1 no município de Viana - ES. Acreditamos que seja alguma configuração ou uso errado que estamos realizando. A propriedade ACBRNFSeX.Configuracoes.Geral.ConsultaLoteAposEnvio está igual a True e mesmo assim ao enviar o RPS não recebemos nenhum retorno mesmo a Nota sendo gerada. Quando apresenta algum erro a coleção ACBRNFSeX.WebService.Emite.Erros também fica sem informação. Se utilizamos o método ACBRNFSeX.ConsultarLoteRps ou ACBRNFSeX.ConsultarSituacao também não temos o retorno da Nota ou de erros. Ao consultar e tiver algum erro é gerado o xml com o(s) erro(s), porém a coleção erros não é preenchida. Quando a Nota está gerada na prefeitura é gerado um xml que não é o da NFSe. Em anexo tem 2 xml, um gerado quando tem erro e outro gerado quando a Nota está gerada na prefeitura. Esse arquivos são gerado depois de utilizar o método ACBRNFSeX.ConsultarLoteRps ou ACBRNFSeX.ConsultarSituacao. Não sabemos mais como proceder. Att, Jefferson 000000439526-lista-nfse-con-lot-soap.xml 000000439523-lista-nfse-con-lot-soap.xml

O nome do parâmetro me confundiu mesmo. Coloque true e deu certo. Muito obrigado @BigWings, @Juliomar Marchetti e @Italo Giurizzato Junior pela atenção. @João Paulo F. Gava, seguindo a recomendação de enviar em modo síncrono deu certo aqui. Att. Jefferson

Bom dia @BigWings Utilizamos o método Enviar e o parâmetro ASSincrono é por padrão False e não alteramos ele. Tem que fazer algum outra coisa para enviar no modo síncrono? Att. Jefferson