Boa tarde.
O componente faz um tratamento com a informação recebida na carteira para que o valor enviado na remessa seja conforme especificado pelo manual do banco (a impressão é diferente). Observe o trecho de código abaixo:
aCarteira := StrToIntDef(ACBrTitulo.Carteira, 0 );
if aCarteira = 101 then
aCarteira:= 5
else if aCarteira = 201 then
aCarteira:= 6
else if aCarteira = 102 then
aCarteira:= 4;
if aCarteira = 5 then
aAgencia := PadLeft(OnlyNumber(ACBrTitulo.ACBrBoleto.Cedente.Agencia) +
ACBrTitulo.ACBrBoleto.Cedente.AgenciaDigito,5,'0')
else
aAgencia:= '00000';
Informação a ser enviada na remessa conforme manual do banco.
Posição 108 a 108 Código da carteira (1 = ELETRÔNICA COM REGISTRO, 2 = ELETRÔNICA COM REGISTRO, 3 = CAUCIONADA ELETRÔNICA, 5 = RÁPIDA COM REGISTRO (BLOQUETE EMITIDO PELO CLIENTE)
Informação a ser utilizada no boleto impresso
Tipo de Modalidade Carteira
101-Cobrança Simples Rápida COM Registro
102- Cobrança simples – SEM Registro
201- Penhor Rápida com Registro
Conforme pode ser observado, a carteira do seu cliente não consta nos manuais do banco, verifique se existe uma atualização para o mesmo.
Att.