Pessoal estou homologando o boleto do banco UNICRED e em alguns boletos aleatórios esta sendo gerado a letra P, analisando o código fonte da
unit 'ACBrBancoUnicredES.pas' do banco vi que este 'P' é gerado na função de calculo do digito verificador:
function TACBrBancoUnicredES.CalcularDigitoVerificador(const ACBrTitulo: TACBrTitulo String;
begin
Modulo.CalculoPadrao;
Modulo.MultiplicadorFinal := 9;
Modulo.Documento := ACBrTitulo.NossoNumero;
Modulo.Calcular;
if Modulo.ModuloFinal = 1 then
Result:= 'P'
else
Result:= IntToStr(Modulo.DigitoFinal);
end;
Gostaria de saber o por que esta acontecendo isto, por que não pode ser gerado letra em linha digitável, segue anexo da impressão do boleto.