Ir para conteúdo
  • Cadastre-se

dev botao

  • Este tópico foi criado há 2189 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Postado

Boa tarde, estou realizando a homologação do boleto para o banco safra e o mesmo esta sendo rejeitado, em contato com o pessoal do banco eles me informaram que o nosso número é livre, ou seja, não faz o cálculo do digito verificador, e o modelo feito pelo acbrboleto gera o nosso numero com o digito verificador.

Gostaria de saber se alguém passou por essa situação, ou se conseguiu homologar o boleto do safra com digito verificador.

 

  • Administradores
Postado

Boa tarde.

Você utiliza diretamente o componente ou o ACBrMonitorPlus? 
Quais informações está passando ao componente ?

Att.

Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Postado
16 hours ago, Juliana Tamizou said:

Boa tarde.

Você utiliza diretamente o componente ou o ACBrMonitorPlus? 
Quais informações está passando ao componente ?

Att.

Bom dia, estou usando diretamente o componente.
Usamos ele para emitir boleto para vários bancos, porém, para o banco safra o campo nosso numero deve ser campo livre (sem o digito verificador) e o componente quando eu mando o nosso numero ele faz o cálculo do digito verificador e atribuiu ele ao nosso numero.

Ex: o nosso numero que eu envio para o componente é  000000003, quando o boleto é gerado aparece 00000003-5, a pessoa que faz homologação diz que o boleto teria que ser gerado como 000000003.

  • Administradores
Postado

Boa tarde.

Observe o seguinte trecho do código deste banco, basta informar 000000000 no NossoNumero para gerar a remessa conforme regras do banco.

IfThen(NossoNumero = '000000000', '000000000', PadLeft(RightStr(NossoNumero,8),8,'0') + CalcularDigitoVerificador(ACBrTitulo))       

Att.

Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Postado

Boa tarde, então vou precisar mexer no fonte do componente mesmo? (Essa era nossa dúvida se existia alguma outra forma no componente para ele não calcular o digito).

Outra pergunta, o nosso numero sempre é gerado com o ' - ' (traço), pois eles reclamaram disso também na impressão do boleto.

  • Administradores
Postado

Boa tarde.

2 horas atrás, Jean Semolini disse:

então vou precisar mexer no fonte do componente mesmo?

Não, basta setar a propriedade NossoNumero conforme citei em meu post anterior.

2 horas atrás, Jean Semolini disse:

nosso numero sempre é gerado com o ' - ' (traço

Realmente, sim...o manual regulamenta isto tb?

Att.

Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Postado

Realizando a alteração abaixo dentro do arquivo ACBrBancoSafra.pas o boleto foi gerado conforme as orientações para homologação.

function TACBrBancoSafra.MontarCampoNossoNumero(const ACBrTitulo: TACBrTitulo): string;
begin
with ACBrTitulo do
begin
Result := PadLeft(RightStr(NossoNumero,8),9,'0'); // + '-' + CalcularDigitoVerificador(ACBrTitulo);
end;
end;

function TACBrBancoSafra.MontarCodigoBarras(const ACBrTitulo: TACBrTitulo): string;
var
CodigoBarras, FatorVencimento, DigitoCodBarras: string;
begin
with ACBrTitulo.ACBrBoleto do
begin
FatorVencimento := CalcularFatorVencimento(ACBrTitulo.Vencimento);

CodigoBarras := IntToStr(Banco.Numero) + '9' + FatorVencimento +
IntToStrZero(Round(ACBrTitulo.ValorDocumento * 100), 10) +
'7' + Cedente.Agencia + Cedente.AgenciaDigito + Cedente.Conta + Cedente.ContaDigito +
PadLeft(RightStr(ACBrTitulo.NossoNumero,8),9,'0') + '2';
//PadLeft(RightStr(ACBrTitulo.NossoNumero,8),8,'0') + CalcularDigitoVerificador(ACBrTitulo) + '2';

DigitoCodBarras := CalcularDigitoCodigoBarras(CodigoBarras);
end;

Result := IntToStr(Numero) + '9' + DigitoCodBarras + Copy(CodigoBarras, 5, 39);
end;

  • Administradores
Postado

Boa tarde

Por favor anexe a uni alterada.

Att.

Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

  • Administradores
Postado

Boa tarde

Obrigada por contribuir, sua alteração foi incluída na fila para análise.

Att.

Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Postado

Bom tarde,

Fiz a homologação e não tive rejeição com nosso numero, apenas com Agência Encarregada da Cobrança, está fixo no fonte.

att.

//              '00000'                                                                        + // Agência Encarregada da Cobrança
ACBRBoleto.Cedente.Agencia +
ACBRBoleto.Cedente.AgenciaDigito +

 

  • Curtir 1
  • 1 mês depois ...
Postado

Bom dia amigos! Estou com o mesmo problema de homologação do campo Nosso Numero (e por consequência, na linha digitável, e no código de barras). Vou testar com a unit alterada acima.

--

Alexandre Santos

AGS Soluções Informática - São Paulo - SP

www.agssolucoes.com.br

  • Este tópico foi criado há 2189 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...