Contribuição - ACBrBancoBradesco.pas

[Nelson Santos]

Bom dia,

Verifiquei que a classe para o Banco Bradesco (arquivo ACBrBancoBradesco.pas) está faltando o motivo 76 na função TACBrBancoBradesco.COdMotivoRejeicaoToDescricao, conforme Manual anexo.

Fiz a alteração, incluindo a linha "76: Result := '76-Pagador Eletrônico DDA (NOVO)- Esse motivo somente será disponibilizado no arquivo retorno para as empresas cadastradas nessa condição';" logo depois da linha nr. 1312.

Anexei o fonte.

ACBrBancoBradesco.pas

[Nelson Santos]

Anexo manual:

 

layout_cobranca_port_30_09_09.pdf

[Juliana Tamizou]

Boa tarde,

Obrigada pela contribuição, adicionada para validação.

Att.

[Nelson Santos]

@Juliana Tamizou

Ainda neste módulo, notei que a procedure TACBrBancoBradesco.LerRetorno400 ( ARetorno: TStringList ) não lê os dados do sacado do arquivo retorno.

Existe algum impedimento para isto ? Não seria interessante ler estes dados do arquivo retorno para revalidação (se for necessário) pelo programador do sistema ?

[José M. S. Junior]

Suas sugestões foram disponibilizadas nos fontes do Projeto ACBr. 

Obrigado pela contribuição!