Arnaldo Cruz

eu tambem estou com o mesmo problema desde ontem após atualizar o ACBr até quarta feira estava tudo OK

Consegui resolver , o erro foi que o cliente quando copiou o codigo de acesso gerado pela conta dele copiou incompleto, como eu não tenho acesso a conta do cliente não tinha como saber se estava certo ou errado, pedi ao suporte da sicredi para verificar as credenciais e eles detectaram o erro. Aproveitando geramos um boleto de boa, efetuamos a baixa, porem quanto eu executo a consulta mim retorna o json abaixo ArqBoletoWS.log 11/03/24 23:04:01:212 - Autenticando Token... 11/03/24 23:04:02:649 - Comando Enviar: 11/03/24 23:04:03:930 - Retorno Envio: {"items":[],"hasNext":false} No banco do brasil retorna baixa e liquidação pelo Operacao := tpConsulta , vi que na Sicredi eles diferenciam Baixa de Liquidação, mas no componente ´so tem a opção baixa será que tem alguma coisa haver ?.

Provavelmente não, pois estou emitindo NFC-e,MDF-e,NF-e,gero boletos para banco do Brasil API no mesmo sistema e na mesma maquina,

Juliomar quais as dll do ACBrBoleto são usadas ?

Eu estou supondo que o componente ACBrBoleto tenha esta tratativa do Token, corrija-me se estiver errado. Existe todo um processo para adquirir as credenciais, ClientID - ClientSecret, e KeyUser Passado estes dados é devolvido um token que suponho seja administrado pelo componente. inclusive no exemplo do ACBr desconheço algo a nivel de usuario que receba o token e armazene e verifica sua validade.

Agora passou do erro 403 para 401. um outro usuário reportou no Grupo do DTComponent que também não consegue emitir boleto do Sicredi usando o ACBr, eu já emito sem erro para,BB,CX,Bradesco, agora para o Sicredi não funciona nem a pau 1 - Criado a Aplicação no Portal do desenvolvedor (Api Cobranca 221677178 Producao) Selecionado a - OPEN API - OAUTH - PARCEIROS b - OPEN API - COBRANCA - PARCEIROS 1.0.0 c - Clicamos em Registrar 2 - Após Aprovação a - clicado em detalhes para obter o codigo. b - Escolha o Tipo de solicitação abaixo = API Cobrança Boletos c - Escolha o motivo do contato = Solicitar Acess Token d - Assunto = Emissao de Boleto e - Ambiente = Produção f - Client ID = Client ID /Cliente Secret Obtidos no Passo 1 g - Clicamos em enviar 3 - O Cliente acessou o portal da Conta a - Menu Cobrança b - Gerar c - foi digitado o codigo informado no APP do Celular d - Foi gerado o codigo de Acesso. Passando as configurações para o Componente ACBrBoleto. Client ID = 221677178 Client Secret = Codigo de acesso Obtido no Portal da Conta KeyUser = Codigo obtido no Passo 2 opção Detalhe; Quando tento enviar o boleto recebo a mensagem "ERRO: FALHA NA AUTENTICAÇÃO: HTTP_CODE=401 ERRO=INVALID USER CREDENTIALS"; Qualquer dica eu agradeço Desde já agradeço

Eu fiz seguindo o manual. Primeiro Passo Acessei o Portal do desenvolvedor criei a aplicação,selecionado opção Produção, após aprovado foi gerado o client ID Segundo Passo foi acessado o portal do cliente e foi gerado a chave de acesso usando o ClienteID do portal do desenvolvedor. no meu sistema. Cliente ID = Agencia + CodBeneficiario (Ambos sem DV) totalizando 9 digitos). Cliente Secret = Codigo de Acesso gerado no portal do Cliente KeyUser = Client ID (Gerado no Portal do desenvolvedor)

Cadastrei a aplicação do Portal developer da Sicredi(esperei o 3 dias) aplicação aprovado Peguei o client ID do Portal developer e gerei o codigo de Acesso no portal da Conta. baixei o arquivo CRT e instalei na maquina. agencia = XXXX sem DV conta = XXXXXX = X codigo Beneficiario = XXXXX Cliente ID = XXXXXXXXXXX Client Secret = XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX ( Portal da Conta) KeyUSer = XXXXXXXXXXXXXXXXXXXXXXXX (Portal developer) Quando tento enviar o boleto recebo a mensagem ERRO: falha na autenticação: http_code=403 erro=access denied for this environment Agradeço qualquer orientação Obrigado

Estou fazendo a devolução de recebimento por PIX do Banco do Brasil. Até umas duas horas Após solicitar a devolução o Status da consulta só volta que está em processamento. após umas duas horas que volta o status de devolvido. Gostaria de confirmar se existe um intervalo de horas e qual intervalo e se isso é pra todos os bancos ou essa particularidade é somente para o Banco do Brasil.

Pessoal estou efetuando pagamento com pix pelo sistema em produção. 1 - Gero o QrCode 2 - O cliente ler este QrCode, efetua o pagamento 3 - o Pagamento cai na Conta tudo certinho e finalizo a venda O Problema é quando gero o QrCode e o cliente desiste da compra ou por qualquer motivo a venda não vai ser mais concluida O Problema está no segundo IF que sempre volta Zero faço os procedimentos abaixo quando pra cancelar o procedimento de pagamento com PIX, antes que ele seja efetuado pelo cliente. if FDatamodule.ACBrPixCD1.PSP.epCob.ConsultarCobrancaImediata(FFluxoDados.txid) then begin if (FDatamodule.ACBrPixCD1.PSP.epCob.CobCompleta.pix.Count > 0) then ///////////// o Problema é que Aqui sempre volta Zero ///////////////////////////////////// begin E2E := FDatamodule.ACBrPixCD1.PSP.epCob.CobCompleta.pix[0].endToEndId; StatusCobranca := FDatamodule.ACBrPixCD1.PSP.epCob.CobCompleta.status; if StatusCobranca = stcATIVA then begin FDatamodule.ACBrPixCD1.PSP.epCob.CobRevisada.status := stcREMOVIDA_PELO_USUARIO_RECEBEDOR; if FDatamodule.ACBrPixCD1.PSP.epCob.RevisarCobrancaImediata(FFluxoDados.TxID) then begin Panel1.Caption :='Cobrança PIX cancelada com sucesso'; Faço o cancelamento no sistema end; end else begin Aqui eu faço o tratamento para os demais retorno end; end; end if;

Banco do Brasil - Boleto API Colegas quando faço a consulta dos titulos baixados não retorna os valores de Juros,Multa,Despesas. Retorno := Boleto.ListaConsultaRetornoWeb; valorPago := Retorno[I].DadosRet.TituloRet.ValorPago; OK valorDesc := Retorno[I].DadosRet.TituloRet.ValorDesconto; Retorna 0 valorJuros := Retorno[I].DadosRet.TituloRet.ValorMoraJuros; Retorna 0 valorMulta := Retorno[I].DadosRet.TituloRet.ValorMulta; Retorna 0 valorDesp := Retorno[I].DadosRet.TituloRet.ValorDespesaCobranca;Retorna 0 (CUSTO DA COBRANÇA de 2,83 não sei se vem mesmo) RetornoDetalhe := Boleto.ListaRetornoWeb[i]; valorPago := RetornoDetalhe.DadosRet.TituloRet.ValorPago; OK valorDesc := RetornoDetalhe.DadosRet.TituloRet.ValorDesconto; Retorna 0 valorJuros := RetornoDetalhe.DadosRet.TituloRet.ValorMoraJuros; Retorna 0 valorMulta := RetornoDetalhe.DadosRet.TituloRet.ValorMulta; Retorna 0 valorDesp := RetornoDetalhe.DadosRet.TituloRet.ValorDespesaCobranca; Retorna 0 (CUSTO DA COBRANÇA de 2,83 não sei se vem mesmo) E No caso o boleto Valor Pago = 15,36 teve Juros de 0,06, teve multa de 0,30 (e teve CUSTO DA COBRANÇA de 2,83 não sei se vem mesmo) Se alguem puder mim dá uma dica eu agradeço

colegas alguém sabe mim dizer se quando envio um boleto hibrido para o banco e o cliente paga com pix se é cobrado duas taxas 1 ref. o boleto e outra ref o PIX ?

estranho eu emito em homologação sem problemas

with Prod.comb do begin cProdANP:= StrToInt(FrmCaixaNovo.CDSNFeDetalheCODANP.AsString) ; descANP := FDataModule.RetornaDescANP(FrmCaixaNovo.CDSNFeDetalheDESCRICAO.AsString); pGLP := 100 ; pGNn := 0 ; pGNi := 0 ; vPart := FrmCaixaNovo.CDSNFeDetalheVALOR.AsFloat; UFcons := UFEmpresa; end; with Imposto do begin QtdeGas := (13 * FrmCaixaNovo.CDSNFeDetalheQTDE.AsFloat); vIcmsGas := RoundABNT(QtdeGas * 1.2571,2); qBCMonoRet := QtdeGas; adRemICMSRet := 1.2571; vICMSMonoRet := vIcmsGas; TotIcmsGas := TotIcmsGas + vIcmsGas; end;

a sim agora entendi, obrigado

não entendi sua resposta

Utilizo TEF ACBr com payGoWeb , está aparecendo muita venda por link de pagamento, atualmente o cliente faz a venda a vista e nas informações complementares está colocando os dados do pagamento, gostaria de saber se no ACBr tem como automatizar esta forma de pagamento, ou se o ACBr tem componenete especifico pra isso e qual o procedimento junto ao PSP,banco. Obrigado

BigWings estou preenchendo esta parte que vc postou igualzinho, estou falando das novas tag como abaixo. if FrmNotaMod55.CDSNFeDetalheCODANP.AsString <> '' then begin with Prod.comb do begin cProdANP := strtoint(FrmNotaMod55.CDSNFeDetalheCODANP.AsString); UFcons := FrmNotaMod55.EdtUFCliente.Text; descANP := FrmNotaMod55.CDSNFeDetalheDESCANP.AsString; pGLP := 100; pGNn := 0; pGNi := 0; vPart := FrmNotaMod55.CDSNFeDetalheVALOR.AsFloat; end; end; with Imposto do begin if FrmNotaMod55.CDSNFeDetalheCODANP.AsString <> '' then begin vIcmsGas := RoundABNT(FrmNotaMod55.CDSNFeDetalheVALOR.AsFloat * 1.2571,2); qBCMonoRet := FrmNotaMod55.CDSNFeDetalheVALOR.AsFloat; adRemICMSRet :=1.2571; vICMSMonoRet := vIcmsGas; TotIcmsGas := TotIcmsGas + vIcmsGas; end; end; se for informado CST cst61 sai o grupo no xml com Novas tag do combustivel <ICMS> <ICMS61> <orig>0</orig> <CST>61</CST> <qBCMonoRet>75.0000</qBCMonoRet> <adRemICMSRet>1.2571</adRemICMSRet> <vICMSMonoRet>94.28</vICMSMonoRet> </ICMS61> </ICMS> se não for informado CST 61 e somente CSOSN não sai as tag novas do combustivel <ICMS> <ICMSSN500> <orig>0</orig> <CSOSN>500</CSOSN> </ICMSSN500> </ICMS> a duvida por ser empresa simples nacional deve se informa CST 61 ai no Danfe o a coluna CSOSN sai '0' se informar somnete a CSOSN no danfe sai preenchido a coluna CSOSN. Porem o Danfe o CSOSN está saindo com "0" em Homologação a Nota é transmitida estou com medo de quando for em produção ocorrer rejeição.

Tenho 2 clientes deposito de gás que realizam venda somente para consumidor final, gostaria de saber como preencher as tag no XML, procurei no exemplo da NF-e do acbr e não comtempla nenhuma tag descrito na NT. Qualquer dica eu agradeço Obrigado

Colegas estou tentando arredondar o valor 0,0046 que deveria no caso ficar 0,01 usando o RoundABNT fica 0,00

Pessoal de duas semanas para cá está acontecendo esse erro, fui observando que todas vez que a operação é abortada ou acontece alguma rejeição de cartão o pinpad exibe a mensagem de operação cancelada ou operação recusada ( e fica a mensagem permanentemente até que seja desligado o pinpad da energia) e na próxima venda acontece o erro; No no principio era em só cliente ai eu mandava desligar o pinpad e voltava a funcionar, presumi que fosse o pinpad com problemas, mas agora já está acontecendo em mais de 10 clientes o mesmo problema e pela mesma forma. Observação O Sistema não trava e pode-se fazer vendas a seguir a vista ou a prazo ou por pix menos cartão, o log do TEF é o mesmo que aparece na mensagem. estou usando a versão 4.1.4.0 da paygoweb.dll produção. o travamento já se deu com pinpad da gertec,elgin,Rede,cielo. outra coisa estranha é que em todos os clientes o erro acontece entre as 14:00 horas e 15:horas Alguem já teve este problema que possa mim dá uma dica de como resolver.

Cara eu fico perplexo com certas resposta, se o cara não sabe resposta deixa pra lá vá pra outra que saiba responder, agora responder "Consulte seu contador" se agente pergunta pra quem desenvolve é porque a desgraça do contador não sabe, os melecas a maioria das vezes não sabem nem o que se trata o registro 1601, contadores acostumados que o sistema contábil faz tudo é so apertar um botão pra selecionar alguma coisa, apertar outro pra executar

Colegas o recebimento do caixa através do PIX eu implantei pela chave estática, não existe o cadastro de um PSP ou banco, agora não estou sabendo como informar no campo COD_PART_IP , nas vendas com cartão preencho com o campo do registro 0150 e obviamente do cadastro de fornecedores, já o PIX como não existe cadastro ferrou, alguem procede dessa forma ou existe uma outra maneira. Obrigado

Já sim se vc reparar minhas configurações estão identicas Aqui SSLIB equivale a LT_TLSv1_2 ? Isso mesmo Valor do SSLIB = 5 FDataModule.ACBrBoleto1.Configuracoes.WebService.SSLType := TSSLType(SSLIB); SSLIB = 5

Configurações Dados do Cedente pego do site do BBDeveloper FDataModule.ACBrBoleto1.Banco.TipoCobranca := cobBancoDoBrasilAPI; FDataModule.ACBrBoleto1.Cedente.TipoCarteira := tctRegistrada; FDataModule.ACBrBoletoFCFR1.DirLogo := LocImagem; FDataModule.ACBrBoleto1.ACBrBoletoFC.DirLogo := LocImagem; FDataModule.ACBrBoleto1.ACBrBoletoFC.Filtro := fiNenhum; FDataModule.ACBrBoleto1.ACBrBoletoFC.LayOut := TACBrBolLayOut(edtLayout.ItemIndex); FDataModule.ACBrBoleto1.Banco.Digito := DVBANCO; FDataModule.ACBrBoleto1.Banco.Numero := StrToInt(NBanco); FDataModule.ACBrBoleto1.Banco.Nome := 'Banco do Brasil'; FDataModule.ACBrBoleto1.Cedente.TipoInscricao := pJuridica; FDataModule.ACBrBoleto1.Cedente.Agencia := Agencia; FDataModule.ACBrBoleto1.Cedente.AgenciaDigito := DVAgencia; FDataModule.ACBrBoleto1.Cedente.Conta := Conta; FDataModule.ACBrBoleto1.Cedente.ContaDigito := DVConta; FDataModule.ACBrBoleto1.Cedente.Nome := 'TECIDOS FARIA DUARTE'; FDataModule.ACBrBoleto1.Cedente.CNPJCPF := '74910037000193'; FDataModule.ACBrBoleto1.Cedente.CodigoCedente := '4863177';//CodCedente; FDataModule.ACBrBoleto1.Cedente.Convenio := '1014051';//CONVENIO; FDataModule.ACBrBoleto1.Cedente.Modalidade := '35'; FDataModule.ACBrBoleto1.Cedente.Logradouro := EnderecoEmpresa; FDataModule.ACBrBoleto1.Cedente.NumeroRes := NumeroEmpresa; FDataModule.ACBrBoleto1.Cedente.Bairro := BairroEMpresa ; FDataModule.ACBrBoleto1.Cedente.Cidade := CidadeEmpresa ; FDataModule.ACBrBoleto1.Cedente.UF := UFEmpresa ; FDataModule.ACBrBoleto1.Cedente.CEP := CepEmpresa ; FDataModule.ACBrBoleto1.Cedente.ResponEmissao := tbCliEmite; FDataModule.ACBrBoleto1.Cedente.IdentDistribuicao := tbClienteDistribui; FDataModule.ACBrBoleto1.Cedente.CaracTitulo := tcSimples; FDataModule.ACBrBoleto1.Cedente.CedenteWS.ClientID := CLIENTID; FDataModule.ACBrBoleto1.Cedente.CedenteWS.ClientSecret := CLIENTSECRET; FDataModule.ACBrBoleto1.Cedente.CedenteWS.Scope := SCOPE; FDataModule.ACBrBoleto1.Cedente.CedenteWS.KeyUser := KEYUSER; FDataModule.ACBrBoleto1.Cedente.CedenteWS.IndicadorPix := False; FDataModule.ACBrBoleto1.Configuracoes.WebService.SSLCryptLib := cryOpenSSL ; FDataModule.ACBrBoleto1.Configuracoes.WebService.SSLHTTPLib := httpOpenSSL; FDataModule.ACBrBoleto1.Configuracoes.WebService.SSLType := TSSLType(SSLIB); FDataModule.ACBrBoleto1.Configuracoes.WebService.TimeOut := 30000 ; FDataModule.ACBrBoleto1.Configuracoes.WebService.UseCertificateHTTP := False ; Dados do titulo Dados do sacado pego do site BBDeveloper Titulo := ACBrBoleto1.CriarTituloNaLista; Titulo.Vencimento := 19/11/2022; Titulo.DataDocumento := 19/10/2022; Titulo.NumeroDocumento := '123456'; Titulo.EspecieDoc := 'DM'; Titulo.Aceite := atNao; Titulo.DataProcessamento := 19/10/2022; Titulo.Carteira := '17'; Titulo.NossoNumero := '2'; Titulo.ValorDocumento := 80; Titulo.Sacado.NomeSacado := 'VALERIO DE AGUIAR ZORZATO'; Titulo.Sacado.CNPJCPF := '96050176876'; Titulo.Sacado.Logradouro := 'RUA LAQUEADA'; Titulo.Sacado.Numero := '25'; Titulo.Sacado.Bairro := 'CENTRO'; Titulo.Sacado.Cidade := 'UIRAUNA'; Titulo.Sacado.UF := 'PB'; Titulo.Sacado.CEP := '58915000'; Titulo.ValorAbatimento := 0; Titulo.LocalPagamento := 'PAGAR EM QUALQUER BANCO'; Titulo.ValorMoraJuros := 0.50; Titulo.ValorDesconto := 0; Titulo.ValorAbatimento := 0; Titulo.DataMoraJuros := 0; Titulo.DataDesconto := 0; Titulo.TipoDesconto := tdNaoConcederDesconto; Titulo.DataAbatimento := 0; Titulo.DataProtesto := 0; Titulo.PercentualMulta := 2; Titulo.CodigoMulta := cmPercentual; Titulo.CodigoMoraJuros := cjValorDia; Titulo.CodigoMora := '1'; Titulo.Mensagem.Add(cdsBoletoADICIONAIS.AsString); Titulo.OcorrenciaOriginal.Tipo := toRemessaRegistrar; Titulo.Instrucao2 := IntToStr(NoN); Titulo.QtdeParcelas := 1; Titulo.QtdePagamentoParcial := 1; Titulo.TipoPagamento := tpNao_Aceita_Valor_Divergente; Titulo.PercentualMinPagamento := 0; Titulo.PercentualMaxPagamento := 0; Titulo.ValorMinPagamento := 0; Titulo.ValorMaxPagamento := 0; 19/10/22 13:23:17:645 - Autenticando Token... 19/10/22 13:23:18:989 - Erro ao gerar token de Autenticação: HTTP_Code=400 Erro="Bad Request" 19/10/22 13:23:18:989 - Comando Enviar: {"numeroConvenio":1014051, "numeroCarteira":17, "numeroVariacaoCarteira":35, "codigoModalidade":1, "dataEmissao":"19.10.2022", "dataVencimento":"19.11.2022", "valorOriginal":80, "valorAbatimento":0, "codigoAceite":"N", "codigoTipoTitulo":2, "descricaoTipoTitulo":"DM", "numeroTituloBeneficiario":"123456", "campoUtilizacaoBeneficiario":"", "numeroTituloCliente":"00010140510000000002", "mensagemBloquetoOcorrencia":"2", "jurosMora":{"tipo":1, "valor":0.4}, "pagador":{"tipoInscricao":1, "numeroInscricao":96050176876, "nome":"VALERIO DE AGUIAR ZORZATO", "endereco":"RUA LAQUEADA 25", "cep":58915000, "cidade":"UIRAUNA", "bairro":"CENTRO", "uf":"PB"}, "indicadorPix":"N"} 19/10/22 13:23:19:457 - Retorno Envio: HTTPCode=401 ErrorCode=0 Result={ "statusCode": 401, "error": "Unauthorized", "message": "Bad Credentials", "attributes": { "error": "Bad Credentials" } }