aslsoftwareltda

Boa tarde Fiz um teste no modo homologação e continua vido o retorno vazio conforme anexo. No segundo passou foi informado que tem 3 arquivos, porém no retorno continua vindo vazio, no exemplo estou configurando conforme imagem. na configuração do consulta estou colocando dessa forma. Problema resolvido, a conversão de base64 para arquivo e a descompactação não funciona no delphi 2010 ou inferior. No Delphi xe8 deu certo. Obrigado a todos pela ajuda.

Boa tarde Fiz um teste no modo homologação e continua vido o retorno vazio conforme anexo. No segundo passou foi informado que tem 3 arquivos, porém no retorno continua vindo vazio, no exemplo estou configurando conforme imagem. na configuração do consulta estou colocando dessa forma. 2024.10.07.13.21.17.201-RetornoConsulta.txt 2024.10.07.13.21.39.765-RetornoConsulta.txt 2024.10.07.13.22.01.558-RetornoConsulta.txt

No exemplo até comentei pra não ter risco, deixei apenas o tpConsulta; Boleto.Configuracoes.WebService.Operacao := tpConsulta; //case cbbWSConsulta.ItemIndex of // 0 : Boleto.Configuracoes.WebService.Operacao := tpConsulta; // 1 : Boleto.Configuracoes.WebService.Operacao := tpConsultaDetalhe; //end;

Então só posso tá fazendo alguma coisa errada, pois estou fazendo da seguinte forma. Incluo um boleto apenas para pegar o número do cliente. Envio a consulta FiltrosAPI.Clear; FiltrosAPI.indicadorSituacao := isbBaixado; FiltrosAPI.dataMovimento.DataInicio := StrToDate('09/09/2024'); FiltrosAPI.dataMovimento.DataFinal := StrToDate('10/09/2024'); FiltrosAPI.indiceContinuidade := 0; Depois pego o numeroprotocolo e envio a consulta FiltrosAPI.Clear; FiltrosAPI.indicadorSituacao := isbBaixado; FiltrosAPI.dataMovimento.DataInicio := StrToDate('09/09/2024'); FiltrosAPI.dataMovimento.DataFinal := StrToDate('10/09/2024'); FiltrosAPI.NumeroProtocolo := 30168569; FiltrosAPI.indiceContinuidade := 0; Depois pego o identificador e envio a consulta FiltrosAPI.Clear; FiltrosAPI.indicadorSituacao := isbBaixado; FiltrosAPI.dataMovimento.DataInicio := StrToDate('09/09/2024'); FiltrosAPI.dataMovimento.DataFinal := StrToDate('10/09/2024'); FiltrosAPI.NumeroProtocolo := 30168569; FiltrosAPI.Identificador := 12422463; FiltrosAPI.indiceContinuidade := 0; Porém no meu não retorna nada no resultado. Estou fazendo correto?

Teria como me mandar o seu programa exemplo e o ini utilizado para testar aqui? Obrigado.

É sim.

Fiz aqui e já estou te mandando juntamente com os arquivos de resposta. logws.txt 2024.10.07.09.09.52.484-RetornoConsulta.txt 2024.10.07.09.11.40.646-RetornoConsulta.txt 2024.10.07.09.13.21.888-RetornoConsulta.txt

Segue logws em anexo. logws.txt

Bom dia Daniel O programa exemplo não tem a opção de consultar movimento, apenas a opção de consultar boleto que esteja carregado no componente. A consulta de movimento é necessário o envio de 3 passos para efetuar a consulta da movimentação em arquivo zip. Isso pelo menos no exemplo em Delphi.

Boa tarde Daniel, Exatamente isso, quando eu envio o terceiro passo como mencionado, não estou conseguindo pegar os boletos retornados.

Boa tarde, Quando passo da forma que você falou sem carregar nenhum boleto o segundo passo não vai pra frente, dá o erro abaixo. Result={"mensagens":[{"mensagem":"O campo N mero do Cliente obrigat rio, favor verificar.","codigo":"5002"}]} Porém já verifiquei e o campo CodigoCedente tá preenchido. Quando envio carregando boleto ocorre as seguintes situações. Primeiro passo FiltrosAPI.Clear; FiltrosAPI.indicadorSituacao := isbBaixado; FiltrosAPI.dataMovimento.DataInicio := StrToDate('09/09/2024'); FiltrosAPI.dataMovimento.DataFinal := StrToDate('10/09/2024'); FiltrosAPI.indiceContinuidade := 0; Boleto.Configuracoes.WebService.Operacao := tpConsulta; Boleto.Enviar; resultado Msg_Retorno=Solicitação recebida com sucesso. Utilize o 'Código da Solicitação' para verificar se já foi processada. HTTP_Result=200 Segundo passo FiltrosAPI.Clear; FiltrosAPI.indicadorSituacao := isbBaixado; FiltrosAPI.dataMovimento.DataInicio := StrToDate('09/09/2024'); FiltrosAPI.dataMovimento.DataFinal := StrToDate('10/09/2024'); FiltrosAPI.indiceContinuidade := 0; FiltrosAPI.NumeroProtocolo := 29785729; (este número que me foi passado no primeiro passo) Boleto.Configuracoes.WebService.Operacao := tpConsulta; Boleto.Enviar; Resultado Msg_Retorno=-Quantidade de arquivos :1 HTTP_Result=200 Terceiro passo FiltrosAPI.Clear; FiltrosAPI.indicadorSituacao := isbBaixado; FiltrosAPI.dataMovimento.DataInicio := StrToDate('09/09/2024'); FiltrosAPI.dataMovimento.DataFinal := StrToDate('10/09/2024'); FiltrosAPI.indiceContinuidade := 0; FiltrosAPI.NumeroProtocolo := 29785729; (este número que me foi passado no primeiro passo) FiltrosAPI.Identificador := 12224055; (este número que me foi passado no segundo passo) Boleto.Configuracoes.WebService.Operacao := tpConsulta; Boleto.Enviar; Resultado HTTP_Result=200 indicadorContinuidade=0 proximoIndice=0 [Boletos Index = 000] numeroBoleto = SeuNumero = dataRegistro = 30/12/1899 dataVencimento = 30/12/1899 valorOriginal = 30/12/1899 carteiraConvenio = variacaoCarteiraConvenio = 0 codigoEstadoTituloCobranca = estadoTituloCobranca = contrato = dataMovimento = 30/12/1899 dataCredito = 30/12/1899 valorAtual = 0 valorPago = 0 NossoNumeroCorrespondente = EMV (QrCodePix) = --- No log do ultimo passo chega o arquivo corretamente Retorno Envio: {"resultado":{"arquivo":"UEsDBBQACAgIAFaOQlkAAAAAAAAAAAAAAAA3AAAATElRVUlfMzE4Ml80OTExNjBfMjAyNDEwMDIxNzUwNDU5MzQ2NTk0XzIzNzEwNTExXzAuanNvbu2dzW7jNhCAXyXQOQnI4X9uuy4WCLDbbhfpXhY9MLYaCLCtVLaDAkWfpoc+yL5YKcmy41o/zEESXY1hBAE5MkcafRhyOBp9+zPaJE9L+yl9SVbxeptGd9HH+59/uY+uo4Xd2vt1Mk/S171AgN8Q474PhNwV3xvC3N/9ER+SVZ04Jefi690qztLZMnGycXTHDaWSHJrT9Taz+W9U7at0YZfJwi6cLK3EHpLtbumEgHHtZDbx7sei3Q3tRs1Hv9p/9vp9jdfzUrvq0IOOIM51fLHLNKskKeH8lrjPdTRPF8lT+t5mmd24n1BCGmq0yDtJLub+Mqoh/79Q330KFV179PoU7SzNsvL8mesDwXQ1qM2S314bBm5FMXTR++7RbqsOstcpP72D/Mfk9527WHPrY7Q3CX/O4pdkY9NZFi+SznuiPNX3dj1Pv8Tz+DFepFl0565X1fXuKbeIPXRadyUosOsoWTwkz+lPzx+StTs6TvIeoOI62p41R0Re3Vx9TezVl3hrn3Y2W9jKeD/Em3l6cp2K5k/FSCdN5VU4tfPpzThLHzM3qDuQCsmp+ev6f8OPolr+hx/9Jn70DYUOfoCqVnxIwQlxYnX45BoiPgU+7rK04cOMrsdH6Hp6+J6eWbp6jtcb+/2f73+nXgDpW5DnAAGIfft0+JGa1/qfbr9Tp9sJNwJasWGl2yECarFxio2LTd35NWLTJNyMTbNpz7yOaqGGDoVMvc852HhCxBjaFzFUeSHjxOqRMRSRKZHhuoUZTuTI2BwNPR1uFCFjeBrR6WkUIYiNx/qGU6LHXN9M0NcoyXrzNUY3Q8OOvsatb2qhkQyhKVc1rSEBZkb2NAczT4garfuiBoA0U6MP1Dixemq0Rmo8YgHg7shxuTkaekLcGNEbNx0xtIqbhhia0wy5KbgB1hYNYJzDyNwcDD0dbjRhgXLjNENukJtQuaGjRARYZ0TAKYbYlBEBg7HnkIgBHeZujVMMiekMB4AwgMwMzQwTgTLDcFHjl1ejoSnuDPXYqD02n5M/EJY3wSJVbwFnasQtkQ24mAqXXIzIOlykwjyaAhdBAp6VvTLzhLBRvWXRUODaw8vkYvVeRnHE5gKwOZp5QthoG","nomeArquivo":"LIQUI_3182_491160_202410021750459346594_23710511_0.zip"}} Obs.: por segurança alterei o arquivo base64 pra ninguém converter.

Boa tarde, O problema que ao consultar o retorno em ListaRetornoWeb só tá exibindo o boleto que carreguei no inicio. Deveria listar todos arquivos que vieram no arquivo zip.

Boa tarde, utilizo sim o componente TACBrBoleto e verifiquei os exemplos, porém estou seguindo as informações passadas no topico abaixo. O Daniel falou que preciso carregar 1 boleto apenas no componente para depois solicitar a consulta da movimentação, no log vem corretamente o json contendo o arquivo zip em base64, porém não sei como fazer a leitura deste arquivo, tentei usar o tpConsultaDetalhe, porém quando faço a leitura só tá devolvendo o boleto que carreguei no inicio. Desde já agradeço sua ajuda.

Certo, e como faria pra consultar na classe estes dados, teria um exemplo ?

Boa tarde a todos. Usando o a consulta pelo componente, consegue obter o "NossoNumeroCorrespondente" e depois peguei e fiz a consulta por passando ele no parâmetro "NumeroProtocolo", depois consultei novamente passados os 2 resultados anteriores no "NumeroProtocolo" e "Identificador". No logo retornou o json {"resultado":{"arquivo":" porém depois desse ponto não sei como fazer a leitura do arquivo e verificar o retorno contido nele, alguém conseguiu fazer? Obrigado

Bom dia Juliomar, Com o fast report versão 6.6.12 deu certo, atualizei aqui e tá funcionando corretamente. Obrigado pela ajuda.

Boa tarde Juliomar, Infelizmente não tenho aqui o fr3 da versão anterior. A versão do fast report é a 5.1.9, fiz um novo teste aqui com a versão 6.6.12 e parece que deu certo, amanhã vou confirmar se é esse o problema mesmo. Obrigado pelo retorno.

Boa tarde, alguém já passou pela situação que ao mandar carregar um boleto e mandar imprimir ele fica todo bagunçado com diversas paginas conforme arquivo em anexo? Estou utilizando o fastreport BoletoPIX.fr3, o acbr foi atualizado dia 19/08/2024. Um detalhe que percebi é que quando carrego os dados sem o campo QrCode.emv imprime, porém quando mando preenchido com o valor retornado da api que ocorre este problema. Desde já agradeço a ajuda. Boleto_03338189621_082024.pdf

Obrigado pelo retorno.

Boa tarde, Segue abaixo. [3158607] Nome=Santana do Deserto UF=MG Provedor=Futurize Versao=2.02 ProRecepcionar=https://santanadodesertomg.nfse-futurize.com.br/webservice/prod HomRecepcionar=https://santanadodesertomg.nfse-futurize.com.br/webservice/homo

Esqueci e mencionar, segue detalhado a forma que chamo a classe em tempo de execução. Var ACBrConsultaCNPJ :TACBrConsultaCNPJws; begin ACBrConsultaCNPJ := TACBrConsultaCNPJws.Create(Self); if ACBrConsultaCNPJ.Consulta(EditCNPJ.Text, 'https://receitaws.com.br/v1/cnpj/') then begin ... end; ACBrConsultaCNPJ.Free; end;

Boa tarde, Não sou muito bom em implementação de componentes, mas peguei o arquivo ACBrConsultaCNPJ.pas mudei o nome dele para ACBrConsultaCNPJws.pas e fiz algumas alterações pra fazer a busca utilizando a api do site https://www.receitaws.com.br/ que no gratuito permite 3 consultas por minutos, para os clientes que tenho atendeu bem. Na minha tela de consulta chamei ele da seguinte forma if ACBrConsultaCNPJ.Consulta(EditCNPJ.Text, 'https://receitaws.com.br/v1/cnpj/') then Lembrando que fiz apenas o básico pra funcionar e meus clientes parar de reclamar rsrsrsr. Coloquei as dll do OpenSSL versão 1.1.1.10 na pasta do executável, senão não funciona. ACBrConsultaCNPJws.pas

Bom dia, também estou com o mesmo problema. Alguém tem o contato da sefaz mg pra tentar resolver isso? Obrigado

Desculpe, acabei de ver aqui já copiei o schema atualizado e deu tudo certo. Agora apareceu a data de pagamento. Obrigado. Vi que ao imprimir esta data não é exibida né.

Gerou o seguinte erro. Mensagem: Erro de Validação: Element '{http://www.abrasf.org.br/nfse.xsd}DataPagamento' is unexpected according to content model of parent element '{http://www.abrasf.org.br/nfse.xsd}InfDeclaracaoPrestacaoServico'.