Arnaldo Cruz
-
Total de ítens
549 -
Registro em
-
Última visita
-
Days Won
2
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Posts postados por Arnaldo Cruz
-
-
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 enviar3 - 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 environmentAgradeç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
beginQtdeGas := (13 * FrmCaixaNovo.CDSNFeDetalheQTDE.AsFloat);
vIcmsGas := RoundABNT(QtdeGas * 1.2571,2);
qBCMonoRet := QtdeGas;
adRemICMSRet := 1.2571;
vICMSMonoRet := vIcmsGas;
TotIcmsGas := TotIcmsGas + vIcmsGas;end;
-
1
-
-
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 BBDeveloperFDataModule.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 BBDeveloperTitulo := 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" } }
Rejeição 103 - Falha no Schema XML do MDFe
em ACBrMDFe
Postado
eu tambem estou com o mesmo problema desde ontem após atualizar o ACBr até quarta feira estava tudo OK