Arnaldo Cruz

Não tem nada no discord sobre o assunto. Já tentei de tudo sem resultado. Quando executo o comando abaixo FDataModule.ACBrTEFAPI1.Inicializar; recebo a mensagem >>>ERRO AO CARREGAR A FUNÇÃO: PW_IINIT DE: C:\PROGRAM FILES (X86)\PAYGO\PGWEBLIB.DLL já tentei de todas as formas como segue com a plicação em modo Debug e com aplicação em modo Release TEFPayGoAPI.PathLib := 'C:\Program Files (x86)\PayGo\PGWebLib'; >>>ERRO AO CARREGAR A FUNÇÃO: PW_IINIT DE: C:\PROGRAM FILES (X86)\PAYGO\PGWEBLIB.DLL TEFPayGoAPI.PathLib := 'C:\Program Files (x86)\PayGo\PGWebLib\x64'; >>> ACCESS VIOLATION AT ADDRESS 0170417F IN MODULE TEFPayGoAPI.PathLib := 'C:\Program Files (x86)\PayGo\PGWebLib\DEBUG\x64';>>> ACCESS VIOLATION AT ADDRESS 0170417F IN MODULE Com a configuração abaixo passa pelo FDataModule.ACBrTEFAPI1.Inicializar TEFPayGoAPI.PathLib := 'C:\Program Files (x86)\PayGo\PGWebLib\DEBUG'; executo a configuração executo a instalação e ocorre a mensagem >>> NÃO FOI POSSIVEL CONECTAR

Até a configuração vai de boa, imprime o resultado configuração if (ACBrTEFAPI1.TEF is TACBrTEFAPIClassPayGoWeb) then begin with TACBrTEFAPIClassPayGoWeb(ACBrTEFAPI1.TEF) do begin //TEFPayGoAPI.PathLib := 'C:\temp\64bits\PGWebLib.dll'; // Permite forçar o uso de uma DLL específica, diferente do definido em "PathPGWebLib" {$IFDEF DEBUG} TEFPayGoAPI.IsDebug := True; {$EndIf} end; end; ACBrTEFAPI1.Modelo := tefApiPayGoWeb; ACBrTEFAPI1.ArqLOG := ExtractFilePath(Application.ExeName) + 'LogTEF\ArqLog.txt'; ACBrTEFAPI1.TratamentoTransacaoPendente := TACBrTEFTratamentoTransacaoPendente(2); ACBrTEFAPI1.TratamentoTransacaoInicializacao := TACBrTEFTratamentoTransacaoInicializacao(1); ACBrTEFAPI1.DadosAutomacao.AutoAtendimento := False; ACBrTEFAPI1.DadosAutomacao.ImprimeViaClienteReduzida := False; ACBrTEFAPI1.ConfirmarTransacaoAutomaticamente := False; ACBrTEFAPI1.DadosAutomacao.SuportaDesconto := False ; ACBrTEFAPI1.DadosAutomacao.SuportaSaque := False; ACBrTEFAPI1.DadosAutomacao.NomeSoftwareHouse := 'Uirauna Software'; ACBrTEFAPI1.DadosAutomacao.CNPJSoftwareHouse := 'meucnpj'; ACBrTEFAPI1.DadosAutomacao.NomeAplicacao := 'CAIXANFCE'; ACBrTEFAPI1.DadosAutomacao.VersaoAplicacao := VersaoFiscal; ACBrTEFAPI1.DadosEstabelecimento.RazaoSocial := NomeEmpresa; ACBrTEFAPI1.DadosEstabelecimento.CNPJ := CnpjEmpresa; if PortaPinPad <> '' then begin ACBrTEFAPI1.DadosTerminal.PortaPinPad := PortaPinPad; end; case QRCODETEF of 0: ACBrTEFAPI1.ExibicaoQRCode := qrapiAuto; 1: ACBrTEFAPI1.ExibicaoQRCode := qrapiExibirAplicacao; 2: ACBrTEFAPI1.ExibicaoQRCode := qrapiExibirPinPad; 3: ACBrTEFAPI1.ExibicaoQRCode := qrapiNaoSuportado; else ACBrTEFAPI1.ExibicaoQRCode := qrapiAuto; end; Arquivo de Log ArqLog.txt Mensagem ao tentar instalar o Ponto de captura Qualquer dica eu agradeço

estou tentando fazer uma venda com PIX Sicredi e estou recebendo este erro do titulo. Acabei de receber as credenciais pesquisei aqui no forum sobre o mesmo erro e encontrei algumas respostas. 1 Resposta encontrada o usuário WLE respondeu : Deu certo o PIX no SICREDI. A chave privada estava criptografada. Pergunto Eu tenho que descriptografar a chave privada ? 2 Resposta Não lembro o usuario - Dizia que após a sicredi liberar as credenciais o usuário terá que esperar dois dias uteis. Qualquer dica eu agradeço

Estou emitindo NFC-es com Ide.tpEmis := teOffLine; porem quando olho o xml a tag está igual a 1 <tpEmis>1</tpEmis>; está saindo igual se estivesse emitindo normal

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.