Homologação Banco Safra

[Jean Semolini]

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.

 

[Juliana Tamizou]

Boa tarde.

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

Att.

[Jean Semolini]

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.

[Juliana Tamizou]

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.

[Jean Semolini]

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.

[Juliana Tamizou]

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.

[Jean Semolini]

Boa tarde, sim eles estão alegando que não pode ter o traço.. 

E estão barrando a homologação por isso também..

[Jean Semolini]

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;

[Juliana Tamizou]

Boa tarde

Por favor anexe a uni alterada.

Att.

[Jean Semolini]

On 10/19/2018 at 5:36 PM, Juliana Tamizou said:

Boa tarde.

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

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

Att.

 

ACBrBancoSafra.pas

[Juliana Tamizou]

Boa tarde

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

Att.

[Binho Biatheski]

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 +

 

[alegsantos]

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.