marcotema

Já atualizei as dlls, tanto na pasta do sistema quando na pasta windows porém o erro permanece.

Bom dia, Estou homologando minha aplicação com a carteira PIX sicredi, fiz todos procedimentos conforme solicita a cartilha, porem quando configuro os arquivos de chave privada e certificado gerados pelo mesmo obtenho estes erros: Chave privada: Error loading Private Key Error: 101077092 - error:06065064:digital envelope routines:EVP_DecryptFinal_ex:bad decrypt Certificado: Error loading PEM Certificate Error: 587690100 - error:23077074:PKCS12 routines:PKCS12_pbe_crypt:pkcs12 cipherfinal error isso seria dlls? ou se alguém já passou pela mesma situação. desde já agradeço. estou anexando log gerado. Obs: Estou usando o exemplo do Abrpixcd. pix.txt

Eu também estou com este problema, só no ambiente de homologação.

crie uma lista de emails e faça um laço por exemplo: for IX := 0 to cNome.Items.Count -1 do begin if (Trim(mDestino.Items.Strings[IX]) <> '') then Mail1.AddAddress(mDestino.Items.Strings[IX],cNome.Items.Strings[IX]); end;

Verifique o anti-virus microsoft security, hoje passei por esta situação desativei o security o funcionou.

Olá também estou com o mesmo problema

boa tarde eu tenho o simulador, está um tanto quanto desatualizado, talvez ajude. Se quiser me envio e-mail [email protected]

Bom dia, Juliana Após as alterações realizadas conforme disse anteriormente o banco (HSBC) aprovou os boletos, segue anexo as correções, Obrigado pela atenção. ACBrBancoHSBC.zip

Bom dia a todos, verificando as units dos bancos onde se calcula o nosso numero e digito verificador notei que a do HSBS esta pegando o NumeroDocumento na função "CalcularDigitoVerificador" e nos outros bancos nossoNumero, no entanto os boletos para aprovação que estava enviando para o banco HSBC estavam sendo reprovado dizendo que o calculo do digito(s) verificador estavam incorretos, então mudei para o NossoNumero e calculo passou a ser feito conforme exemplificou o banco, vou enviar novamente para o banco, qualquer coisa posto aqui. Duvida: O correto é conforme está na unit original (NumeroDocumento) ou NossoNumero ?, porque para que o cálculo seja feito corretamente tenho que passar no numeroDocumento o NossoNumero igual, me desculpem se estiver dizendo besteira... segue o trecho do código que alterei: function TACBrBancoHSBC.CalcularDigitoVerificador(const ACBrTitulo: TACBrTitulo ): String; var ANumeroDoc, ANumeroBase, ADigito1: AnsiString; ADigito2, ADigito: AnsiString; Numero, Cedente, Vencimento: Extended; function CalcularDigito(const ANumero: AnsiString): AnsiString; begin Modulo.CalculoPadrao; Modulo.Documento := AnsiString(ANumero); Modulo.Calcular; Result := AnsiString(IntToStr(Modulo.DigitoFinal)); end; begin Result := '0'; // numero base para o calculo do primeiro e segundo digitos // ANumeroDoc := padR(AnsiString(ACBrTitulo.NumeroDocumento),13,'0'); - Original ANumeroDoc := padR(AnsiString(ACBrTitulo.NossoNumero),13,'0'); - Alterado // Calculo do primeiro digito ANumeroBase := ANumeroDoc; ADigito := CalcularDigito(ANumeroDoc); ADigito1 := ADigito + '4'; // calculo do segundo digito Vencimento := StrToFloat(FormatDateTime('ddmmyy', ACBrTitulo.Vencimento)); Cedente := StrToFloat(Self.ACBrBanco.ACBrBoleto.Cedente.CodigoCedente); Numero := StrToFloat(ANumeroBase + ADigito1); ANumeroBase := FloatToStr(Numero + Cedente+ Vencimento); ADigito2 := CalcularDigito(ANumeroBase); // digito final 3 posicoes = digito 1 + '4' + digito 2 Result := ADigito1 + ADigito2; end;

Boa tarde, Juliana, vou exemplificar o que acontece: Nosso numero = 23910477-578 logo gera a seguinte linha digitável: 39994.37654 60000.000004 23910.015322 8 55790000097500, segundo consta no manual do HSBC para cobrança tipo CNR as posiçoes de 13 a 20 (inicio do nosso numero) e de 22 a 26 (final do nosso numero sem os digitos verificadores) o que se faz 13 posições do nosso numero note que foi representado somente parte do nosso numero (23910), verificando a unit AcbrbancoHSBC na linha 115 " fpTamanhoMaximoNossoNum := 16;" está definindo um tamanho máximo de 16 posições creio que já com os digitos verificadores, mas na linha 231 onde se monta o código de barras está setando para 13 " padR(NossoNumero, 13, '0') " já com os digitos verificadores, não conheço a fundo do código, mas resolvi alterar somente a linha 115 definindo para 13 o tamanho máximo, e deu certo conforme exemplo: 39994.37654 60000.002398104777.015324 1 55790000097500, assim o nosso numero foi representado por inteiro na linha digitável, vou enviar para o banco, se estiver correto posto a correção aqui. Obrigado.

Sim, vou anexar conforme o banco assinalou.

Bom dia, estou utilizando o componente para gerar boletos, nos bancos brasil, Bradesco e caixa tudo ok, já no banco HSBC foi reprovado dizendo que a linha digitável deve conter o nosso numero do boleto conforme anexo. se alguém já passou por isto agradeceria a ajuda, desde já agradeço a atenção.

o problema é quando se comanda a redução do dia atual esta não emite, somente se imprime no dia posterior ao movimento.

Boa tarde, utilizo o Estado do ecf para verificar se existe redução Z pendente, do dia anterior, dentro do mesmo dia, apenas comando a redução Z normalmente.

Obrigado por responder, mas já estou fazendo isto na primeira redução, na qual o ecf requer a redução, o problema está na segunda dentro do mesmo dia. por exemplo: movimento de 20/12/2011 e fechado no dia seguinte (21/12/2011), logo ecf requer redução. abertura de movimento do dia 21/12/2011, este movimento é que o ecf não permite fechar a redução Z, so no dia 22.