Arquivo de Remessa CNAB400 HSCB- Nosso Numero Problema

[cloudcon]

Boa tarde,

Estou aqui para reportar que o arquivo de remessa CNAB 400 do hsbc está com problema de digitos a mais.

ví que já existe um tópico falando sobre isso, mais ainda não foi corrigido.

Vou postar a minha solução.

acbrBancoHSBC

linha 333

Antiga

NossoNumero+DigitoNossoNumero + // Nosso Numero

Alterado

RightStr(NossoNumero+DigitoNossoNumero,11) + // Nosso Numero

[Juliana Tamizou]

Bom dia.

Recentemente foi feita uma correção baseada no tipo de cobrança da carteira...seus fontes estão com as seguintes linhas na geração do cabeçalho do arquivo:

if aCarteira = '1' then // Cobranca Registrada

begin

Parte2 :=

CalcularFatorVencimento(Vencimento) +

IntToStrZero(Round(ValorDocumento * 100), 10) +

copy(padR(NossoNumero, 13, '0'),3,11) +

padR(ACBrBoleto.Cedente.Agencia, 4, '0') +

padR(ACBrBoleto.Cedente.Conta, 7, '0') +

'00';

end

else // 'CNR' Cobranca Nao Registrada

begin

Parte2 :=

CalcularFatorVencimento(Vencimento) +

IntToStrZero(Round(ValorDocumento * 100), 10) +

padR(ACBrBoleto.Cedente.CodigoCedente, 7, '0') +

padR(NossoNumero, 13, '0') +

DataToJuliano(Vencimento);

end;

Acredito que um ajuste parecido resolva o problema, se possível efetue a implementação e caso o arquivo seja gerado corretamente, anexe aqui a unit alterada.

Att

[cloudcon]

Eu adicionei o rigthstr por ser um comando que roda desde o delphi 6, por questão de compatibilidade com os outros programadores que utilizam o componente e optei também por que caso venha a acontecer algum equivoco no tamanho do nosso numero ele copiará de traz para frente, pegando os numeros válidos que estão no final.

ACBrBancoHSBC.pas

[j2c9m7]

Ola

tenho a unit HSBC homologada! segue anexo

boletos e cnab 400

remessa simples e registrada

Resposta do banco HSBC

{

Boa tarde Jair,

Segue resultado do teste realizado nos boletos. Os mesmos estão aprovados.

Obs.: Como trata-se somente de teste não é possível gerar arquivo retorno.

Abraço!

Decio Carboni

Especialista Vendas | HSBC Bank Brasil S.A.

PCM Sales - HSBC Empresas

Rua Dante Pelizzari, 1554 Térreo Sala 12 Panazzolo Caxias do Sul/RS

[email protected]

}

ACBrBancoHSBC.pas

hsbc.pdf

remessa.txt

[cloudcon]

Obrigado amigo.

Estou fazendo o download dela agora.

Abraço

[Juliana Tamizou]

Boa tarde Jair.

As alterações enviadas por você estarão disponíveis em breve no svn....apenas foram feitos alguns ajustes para que seja considerado o layout Com e Sem Registro.

Att.

[j2c9m7]

Juliana

me diga uma coisa, o nosso numero quando passado pro acbrboleto, ja deve ter o checkdigito calculado?

se sim, o tamanho, da forma que esta, esta diferente da forma que consegui homologar no HSBC

se nao, falta calcular o digito na rotina montarcodigobarras

favor, me de um retorno!

Abraços

[Juliana Tamizou]

Boa tarde Jair.

O calculo do nosso número é feito pelo componente, apenas deve ser informado o Nosso Número, em o digito verificador.

Att.

[j2c9m7]

Juliana

Segue algumas alteracoes necessarias para homologar cobranca registrada!

Abraços

ACBrBancoHSBC.pas

[Juliana Tamizou]

Bom dia Jair.

Correções disponíveis no svn.

Att.