Jump to content

ademar-datalan

Membros Pro
  • Posts

    103
  • Joined

  • Last visited

1 Follower

About ademar-datalan

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

ademar-datalan's Achievements

Collaborator

Collaborator (7/14)

  • First Post
  • Collaborator Rare
  • Conversation Starter
  • Week One Done
  • One Month Later

Recent Badges

9

Reputation

1

Community Answers

  1. Está sendo usando num servidor local com o fuso horário correto do Brasil.
  2. Recebemos esse comunicado do suporte do BB ------------------------------------------------------- A data/horário informado não está sendo informado o horário com -3 conforme RFC 3339 UTC - 3 necessário para trazer os dados conforme horário de Brasília, o que pode estar gerando inconsistências. Ao informar a data de início sem o UTC correto, e colocar por exemplo "inicio":"2024-07-14T21:00:00","fim":"2024-07-15T20:59:59 serão apresentadas as transações entre 0h00 de 15/07 às 23h59 de 15/07, e a transação realizada às 21h27 de 15/07 não é exibida. Como não informam o UTC -3, a consulta está trazendo as cobranças realizadas COM UMA DIFERENÇA DE 3 HORAS. O correto para trazer o pagamento informado seria: "inicio":"2024-07-14T21:00:00-03:00","fim":"2024-07-15T20:59:59-03:00 Gentileza ajustar as consultas com UTC -3 conforme exemplo abaixo e refazer a consulta: Fonte:https://publicador.developers.bb.com.br/bucket/Documentacao_API_Pix_v2_pix_74b8abd91c.pdf
  3. Ok, Mas não entendi se nós temos que fazer alguma coisa ou a equipe do ACBr vai fazer os ajustes para que possa ser mantida a compatibilidade?
  4. Bom dia, Teve alguma evolução nesse assunto?
  5. Fizemos o retrocesso para a versão 34464 e algumas anteriores, mas mesmo assim, não funcionou.
  6. Após a última atualização do ACBr, está ocorrendo algum erro interno no componente que não estamos conseguindo identificar. Esse erro só ocorre no processamento direto no servidor Windows server 2022 na nuvem. Quando a nota é enviada com o método síncrono, ele é autorizada, mas não retorno o código do status, a chave e nem a mensagem. Antes da atualização do ACBr estava tudo funcionando corretamente, não fizemos nenhuma alteração no sistema, apenas compilação e substituição do executável e parou de funcionar, voltando o executável antigo, o processo funciona corretamente. Segue em anexo XML e log gerado pelo componente. 000000000086980-env-lot.xml 000000000086980-pro-lot.xml ErrosAcbr.txt
  7. Olá, Não tenho o delphi 7 para testar, não sei qual seria o comando que deveria se usado nesse caso. ACBrPIXCD.pas
  8. Ao utilizar a rotina de consulta de PIX recebidos, tivemos problemas com o Banco do Brasil, que gerar uma rejeição por não informar corretamente o Time Zone, fizemos um ajuste na função function TACBrPixEndPointPix.ConsultarPixRecebidos, e com esse ajuste deu certo, gostaria que fosse feito ajuste na versão oficial do AcBr. function TACBrPixEndPointPix.ConsultarPixRecebidos(Inicio: TDateTime; Fim: TDateTime; const TxId: String; const CpfCnpj: String; PagAtual: Integer; ItensPorPagina: Integer): Boolean; var s, e: String; RespostaHttp: AnsiString; ResultCode: Integer; begin if (NivelLog > 1) then begin RegistrarLog('ConsultarPixRecebidos( '+FormatDateTimeBr(Inicio)+', '+ FormatDateTimeBr(Fim)+', '+ TxId+', '+CpfCnpj+', '+ IntToStr(PagAtual)+', '+ IntToStr(ItensPorPagina)+' )'); end; Clear; fPSP.PrepararHTTP; with fPSP.URLQueryParams do begin Values['inicio'] := DateTimeToIso8601(Inicio); Values['fim'] := DateTimeToIso8601(Fim); //------- Alterei aqui para resolver por enquanto ---------- Values['inicio'] := Values['inicio'].Replace('Z','-03:00'); Values['fim'] := Values['fim'].Replace('Z','-03:00'); // -------------------------------------------------------- s := Trim(TxId); if (s <> '') then begin Values['txid'] := s; Values['txIdPresente'] := 'true'; end; s := OnlyNumber(CpfCnpj); if (s <> '') then begin e := ValidarCNPJouCPF(s); if (e <> '') then raise EACBrPixException.Create(ACBrStr(e)); if Length(s) < 12 then Values['cpf'] := s else Values['cnpj'] := s; end; if (PagAtual > 0) then Values['paginacao.paginaAtual'] := IntToStr(PagAtual); if (ItensPorPagina > 0) then Values['paginacao.itensPorPagina'] := IntToStr(ItensPorPagina); end; fPSP.AcessarEndPoint(ChttpMethodGET, EndPoint, ResultCode, RespostaHttp); Result := (ResultCode = HTTP_OK); if Result then fPixConsultados.AsJSON := String(RespostaHttp) else fPSP.TratarRetornoComErro(ResultCode, RespostaHttp, Problema); end;
  9. Estou precisando registrar boletos via API do BANRISUL. O link com as instruções é esse: https://developers-openbanking.banrisul.com.br/pages/PORTAL_V1.7.6/docs/clientes-banrisul/api-cobranca-v1.2.0.html Tem como fazer essa implementação? Posso ajudar com os testes.
  10. Ok, Se não tem como fazer, estão pode encerrar o chamado. Obrigado.
  11. Boa tarde italo, tudo bem? Em momento nenhum comentei que as descrições afrontam a Tabela de bandeiras, eu apenas estou pedindo para incluir mais uma opção BANRICOMPRAS seguindo a mesma lógica que já exite hoje, e acredito que esta nova opção, também não afronte Tabela de bandeiras. Desculpe se me expressei mal. Seria mais uma opção nesta função. function BandeiraCartaoToDescStr(const t: TpcnBandeiraCartao): string; begin case t of bcVisa: Result := 'Visa'; bcMasterCard: Result := 'MasterCard'; bcAmericanExpress: Result := 'AmericanExpress'; bcSorocred: Result := 'Sorocred'; bcDinersClub: Result := 'Diners Club'; bcElo: Result := 'Elo'; bcHipercard: Result := 'Hipercard'; bcAura: Result := 'Aura'; bcCabal: Result := 'Cabal'; bcAlelo: Result := 'Alelo'; bcBanesCard: Result := 'BanesCard'; bcCalCard: Result := 'CalCard'; bcCredz: Result := 'Credz'; bcDiscover: Result := 'Discover'; bcGoodCard: Result := 'GoodCard'; bcGreenCard: Result := 'GreenCard'; bcHiper: Result := 'Hiper'; bcJcB: Result := 'JcB'; bcMais: Result := 'Mais'; bcMaxVan: Result := 'MaxVan'; bcPolicard: Result := 'Policard'; bcRedeCompras: Result := 'RedeCompras'; bcSodexo: Result := 'Sodexo'; bcValeCard: Result := 'ValeCard'; bcVerocheque: Result := 'Verocheque'; bcVR: Result := 'VR'; bcTicket: Result := 'Ticket'; bcOutros: Result := 'Outros' end; end;
  12. Boa tarde Antonio Carlos, Acho que eu não expliquei direito o caso, pois essa alteração não afeta em nada a NT que vc indicou, até porque fosse possível apenas as descrições tradicionais como Visa, Master, Amex,.., não poderiam ter, nesta mesma função, descrições como: Result := 'Mais'; Result := 'MaxVan'; Result := 'Policard'; Result := 'RedeCompras'; ETC... Esta função complementa a descrição que é impressa no DANFE da NFC-e, e é chamada dentro de outra função ManterDescricaoPagamentos. Favor revisar novamente. Obrigado funcao 2.txt
  13. Bom dia, Gostaria de ver a possibilidade e de incluir mais um tipo de bandeira na função BandeiraCartaoToDescStr, na Unit pcnConversao.pas, seria o BANRICOMPRAS, que é um tipo de cartão do BANRISUL, muito utilizado no RS. Temos reclamações dos clientes que na impressão da NFC-e está aparecendo como OUTROS, além disso seria interessante ter uma opção para retornar em branco, pois nem sempre a opção outros fica bom. funcao.txt
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.

The popup will be closed in 10 seconds...