Márcio Antônio

Deu certo Juliomar, baixei novamente os fontes, e consegui instalar, obrigado pela força.

Olá, instalei normalmente o jedi no windows 10, mas no 11 não estou conseguindo, quando rodo o Install.bat, ele me retorna vários erros, como por exemplo: C:\Desenvolvimento\Componentes Alexandria\Jedi\jcl-JCL-2.7-Build5676\jcl\source\common\JclAlgorithms.pas(1227) Warning: W1072 Implicit conversion may lose significant digits from 'signed 64-bit integer' to 'Integer' C:\Desenvolvimento\Componentes Alexandria\Jedi\jcl-JCL-2.7-Build5676\jcl\source\common\JclAlgorithms.pas(1237) Warning: W1071 Implicit integer cast with potential data loss from 'unsigned 32-bit integer' to 'Integer' C:\Desenvolvimento\Componentes Alexandria\Jedi\jcl-JCL-2.7-Build5676\jcl\source\common\JclAlgorithms.pas(1242) Warning: W1072 Implicit conversion may lose significant digits from 'signed 64-bit integer' to 'Integer' C:\Desenvolvimento\Componentes Alexandria\Jedi\jcl-JCL-2.7-Build5676\jcl\source\common\JclAlgorithms.pas(1260) Warning: W1072 Implicit conversion may lose significant digits from 'signed 64-bit integer' to 'Integer' C:\Desenvolvimento\Componentes Alexandria\Jedi\jcl-JCL-2.7-Build5676\jcl\source\common\JclAbstractContainers.pas(2554) Error: E2010 Incompatible types: 'TObject' and 'T' C:\Desenvolvimento\Componentes Alexandria\Jedi\jcl-JCL-2.7-Build5676\jcl\source\common\JclAbstractContainers.pas(2844) Warning: W1071 Implicit integer cast with potential data loss from 'Cardinal' to 'Integer' C:\Desenvolvimento\Componentes Alexandria\Jedi\jcl-JCL-2.7-Build5676\jcl\source\common\JclArrayLists.pas(2789) Fatal: F2063 Could not compile used unit 'JclAbstractContainers.pas' o que pode ser?

Estou usando essas configurações: ACBrBoleto.Cedente.CedenteWS.ClientID := cdsConsDuplicatasCLIENTID.AsString; ACBrBoleto.Cedente.CedenteWS.ClientSecret := cdsConsDuplicatasCLIENTSECRET.AsString; ACBrBoleto.Cedente.CedenteWS.KeyUser := cdsConsDuplicatasKEYUSER.AsString; ACBrBoleto.Cedente.CedenteWS.Scope := cdsConsDuplicatasSCOPE.AsString; ACBrBoleto.Cedente.CedenteWS.IndicadorPix := True; ACBrBoleto.Configuracoes.WebService.Ambiente := TpcnTipoAmbiente(dtmSysParams.GetParamAsInteger('BOLETOHIBRIDO_AMBIENTE')); // Tipo de ambiente (taProducao, taHomologacao) ACBrBoleto.Configuracoes.WebService.SSLHTTPLib := httpWinHTTP; ACBrBoleto.Configuracoes.WebService.SSLCryptLib := cryWinCrypt; ACBrBoleto.Configuracoes.WebService.SSLType := LT_TLSv1_2; ACBrBoleto.Configuracoes.WebService.TimeOut := 30000; ACBrBoleto.Configuracoes.WebService.UseCertificateHTTP := False; ACBrBoleto.Configuracoes.WebService.Operacao := tpInclui; ACBrBoleto.Enviar; Na minha máquina em homologação, pega normal... no cliente em produção, não pega...

Olá, Estou com um cliente tentando emitir o boleto híbrido do BB, e está dando o erro abaixo: 10/11/23 11:28:12:744 - Autenticando Token... 10/11/23 11:28:13:077 - Falha Envio: Falha na Autenticação: HTTP_Code=500 Erro= Na minha máquina em homologação, funciona normalmente... alguém tem alguma ideia do que possa ser?

Obrigado pelo retorno.

Bom dia, sobre os bancos homologados a emitir boletos híbridos: CNAB - por transferência de arquivos: Santander Sicredi Itau API - on-line: BB PenseBem Sicredi V2 Sicoob Sobre a caixa econômica, se enquadra em qual situação acima?

Obrigado pelo retorno.

Bom dia, tenho uma dúvida: Eu gero o meu boleto normal, envio a remessa para o banco com as instruções, Titulo.OcorrenciaOriginal.Tipo := toRemessaHibrido; ACBrBoleto.Cedente.PIX.Chave := ''; ai no arquivo retorno vem a chavepix para que eu possa alimentar o componente e só ai poder imprimir o boleto com o qrcode?

Boa tarde, estou tentando homologar o boleto híbrido do banco itaú, estou fazendo o código abaixo: ACBrBoleto.Cedente.CedenteWS.ClientID := cdsConsDuplicatasCLIENTID.AsString; ACBrBoleto.Cedente.CedenteWS.ClientSecret := cdsConsDuplicatasCLIENTSECRET.AsString; // ACBrBoleto.Cedente.CedenteWS.KeyUser := cdsConsDuplicatasKEYUSER.AsString; // Não informar ACBrBoleto.Cedente.CedenteWS.Scope := cdsConsDuplicatasSCOPE.AsString; ACBrBoleto.Cedente.CedenteWS.IndicadorPix := True; ACBrBoleto.Configuracoes.WebService.Ambiente := TpcnTipoAmbiente(dtmSysParams.GetParamAsInteger('BOLETOHIBRIDO_AMBIENTE')); // Tipo de ambiente (taProducao, taHomologacao) ACBrBoleto.Configuracoes.WebService.SSLHTTPLib := httpOpenSSL; ACBrBoleto.Configuracoes.WebService.SSLCryptLib := cryOpenSSL; ACBrBoleto.Configuracoes.WebService.SSLType := LT_TLSv1_2; ACBrBoleto.Configuracoes.WebService.TimeOut := 30000; ACBrBoleto.Configuracoes.WebService.UseCertificateHTTP := False; ACBrBoleto.Configuracoes.WebService.VersaoDF := 'V2'; // (V2 significa que vai utilizar a versão corrente da API) ACBrBoleto.Configuracoes.WebService.Operacao := tpInclui; ACBrBoleto.Enviar; if (ACBrBoleto.TotalListaRetornoWeb > 0) AND (ACBrBoleto.ListaRetornoWeb[i].DadosRet.TituloRet.EMV <> '') then begin e não me retorna nada no EMV, e nem da erro algum... eu devo fazer algo a mais????

Obrigado pelo retorno!

Bom dia, eu criei um serviço para ficar baixando as notas destinadas ao cnpj do cliente, testei aqui na minha máquina e funcionou direitinho, mas quando coloquei no servidor, não funcionou, não entendi o por que, coloquei o log e o mesmo me retornou assim: logConsultaNFeDestinadas.Log('Consulta Notas Destinadas - Erro: ', IntToStr(dtmCompra.ACBRNFeTriviaDownload.WebServices.StatusServico.cStat)); logConsultaNFeDestinadas.Log('Consulta Notas Destinadas - Motivo: ', dtmCompra.ACBRNFeTriviaDownload.WebServices.StatusServico.xMotivo); logConsultaNFeDestinadas.Log('Consulta Notas Destinadas - Mensagem: ', dtmCompra.ACBRNFeTriviaDownload.WebServices.StatusServico.Msg); logConsultaNFeDestinadas.Log('Consulta Notas Destinadas - Observação: ', dtmCompra.ACBRNFeTriviaDownload.WebServices.StatusServico.xObs); logConsultaNFeDestinadas.Log('Consulta Notas Destinadas - RetornoWS: ', dtmCompra.ACBRNFeTriviaDownload.WebServices.StatusServico.RetornoWS); logConsultaNFeDestinadas.Log('Consulta Notas Destinadas - RetWS: ', dtmCompra.ACBRNFeTriviaDownload.WebServices.StatusServico.RetWS); [04/10/2023 08:49:58.658]Consulta Notas Destinadas - Erro: 0 [04/10/2023 08:49:58.658]Consulta Notas Destinadas - Motivo: [04/10/2023 08:49:58.658]Consulta Notas Destinadas - Mensagem: [04/10/2023 08:49:58.658]Consulta Notas Destinadas - Observação: [04/10/2023 08:49:58.658]Consulta Notas Destinadas - RetornoWS: [04/10/2023 08:49:58.658]Consulta Notas Destinadas - RetWS: O erro ocorre, quando eu mando conectar na sefaz; A instalação do certificado, está igual em ambos os cenários.

Verifiquei o erro, eu não estava alimentando a tag NossoNumero, estava alimentando apenas a tag NumeroDocumento.

Bom dia, estou tentando cancelar um boleto híbrido no banco do brasil, e está me retornando erro: 28/09/23 09:09:17:270 - Autenticando Token... 28/09/23 09:09:18:640 - Comando Enviar: {"numeroConvenio":3128557} 28/09/23 09:09:19:318 - Retorno Envio: HTTPCode=404 ErrorCode=0 Result={"errors":[{"code":"4923892.1","message":"Boleto já baixado/cancelado ou inexistente."}]} Verifiquei com o suporte do banco do brasil, e eles me retornaram, que temos que enviar o nosso número do boleto também...

Isso mesmo, essa NFe foi emitida ontem, quando a sefaz de Pernambuco estava fora, então só nos resta aguardar. Muito obrigado pela informação.

Boa tarde, estou tentando gerar uma nota de devolução de compra, mas a sefaz está rejeitando informando que a chave referenciada está inexistente na sefaz de Pernambuco, mas a mesma está autorizada na sefaz Nacional, como eu devo proceder?

Fiz isso e pegou, Valeu!

Bom dia, Estou tentando conceder um abatimento de um boleto híbrido do banco do brasil, e está me retornando o seguinte erro: 17/08/23 07:16:18:659 - Autenticando Token... 17/08/23 07:16:19:777 - Comando Enviar: {"numeroConvenio":3128557,"RemessaConcederAbatimento":"S","abatimento":{"valorAbatimento":50}} 17/08/23 07:16:20:498 - Retorno Envio: HTTPCode=400 ErrorCode=0 Result={"errors": [{"code": "4010580.1","message": "Nenhuma opção de alteração informada."}]} Falei com o suporte do banco do brasil, e os mesmos pediram para fazer o seguinte: Utilizar a requisição conforme exemplo abaixo: image2644×664 76.1 KB { “numeroConvenio”: 3128557, “indicadorIncluirAbatimento”: “S”, “abatimento”: { “valorAbatimento”: 50.00 } } tentei alterar na unit ACBrBoletoW_BancoBrasil_API, mas não pegou... aonde eu posso ajustar isso?

Descobri o problema, eu não estava alimentando a tag do NossoNumero... pegou direitinho! Uma dúvida, quando eu altero a data do vencimento ou concedo um desconto, não é gerado uma nova string de qrcode??? pq não veio nada aqui quando realizei a alteração do vencimento: ACBrBoleto.ListaRetornoWeb[i].DadosRet.TituloRet.EMV

Bom dia, tentei realizar uma alteração de um vencimento de um boleto híbrido no banco do brasil, e me retornou esse erro: 16/08/23 08:30:30:837 - Autenticando Token... 16/08/23 08:30:46:100 - Comando Enviar: {"numeroConvenio":3128557,"indicadorNovaDataVencimento":"S","alteracaoData":{"novaDataVencimento":"11.09.2023"}} 16/08/23 08:30:59:207 - Retorno Envio: HTTPCode=404 ErrorCode=0 Result= Entrei em contato com o suporte do banco, e eles me responderam isso: Bom dia Não localizamos em nossos logs a sua requisição no dia de hoje. Efetuamos testes no endpoint e não apresentou erro. Colocando o seu JSON em um validador de JSON disponível na internet ele apresentou como Inválido. Poderia copiar o JSON abaixo, colar na sua ferramenta e efetuar novo teste? { "numeroConvenio": 3128557, "indicadorNovaDataVencimento": "S", "alteracaoData": { "novaDataVencimento": "16.08.2023" } } O que devo estar fazendo de errado?

Obrigado Juliomar pelo esclarecimento, irei cancelar o meu boleto híbrido pelo método tpPIXCancelar.

Boa tarde, Gostaria de tirar uma dúvida, estou querendo cancelar um boleto já registrado, vi que não está implementado o método tpCancelar, para o banco do brasil... o método tpPIXCancelar, realiza o cancelamento do boleto no banco ou eu tenho que chamar o tpBaixa?

Pensei que tivesse alguma forma de obter essa informação na consulta... Mas obrigado pela força.

E tem como descobrir essa informação? pois estou precisando para encerrar a mesma, e no encerramento pede essa informação.

Olá, eu tenho apenas a chave de uma MDFe, executei o comando abaixo da consulta: ACBrMDFe1.Manifestos.Clear; ACBrMDFe1.WebServices.Consulta.MDFeChave := vChave; ACBrMDFe1.WebServices.Consulta.Executar; No retorno abaixo, aonde eu descubro o cMunDescarga ? ACBrMDFe1.WebServices.Consulta....

Perdão ítalo pela postagem no local errado, irei verificar junto aos clientes, obrigado.