Inclusão Descrição de Motivo quando liquidado Banco do Brasil

[Adriano Teodorico]

Pessoal, boa tarde, por favor. na unit ACBrBancoBrasil, na função CodMotivoRejeicaoToDescricao, poderiam adicionar alguns motivos que estão faltando quando o Titulo for liquidado:

function TACBrBancoBrasil.CodMotivoRejeicaoToDescricao(const TipoOcorrencia: TACBrTipoOcorrencia; CodMotivo: Integer): String;

...

toRetornoLiquidado, toRetornoBaixaAutomatica, toRetornoLiquidadoSemRegistro: // 06, 09 e 17 (Liquidado)
      case CodMotivo of
        01: Result:='01-Por saldo';
        02: Result:='02-Parcial';
        03: Result:='03-No proprio banco';
        04: Result:='04-Compensacao eletronica';
        05: Result:='05-Compensacao convencional';
        06: Result:='06-Por meio eletronico';
        07: Result:='07-Apos feriado local';
        08: Result:='08-Em cartorio';
        30: Result:='30-Liquidação no Guichê de Caixa em cheque';
        09: Result:='09-Comandada banco';
        10: Result:='10-Comandada cliente arquivo';
        11: Result:='11-Comandada cliente on-line';
        12: Result:='12-Decurso prazo - cliente';
        13: Result:='13-Decurso prazo - banco';

       14: Result:='14-Protestado';
        15: Result:='15-Titulo Excluido';
        30: Result:='30-Liquidacao no guiche de caixa em cheque';
        31: Result:='31-Liquidado em banco correspondente';
        32: Result:='32-Liquidado Terminal Auto-Atend';
        33: Result:='33-Liquidado Internet';
        34: Result:='34-Liquidado Office Banking';
        35: Result:='35-Liquidado Correspondente Dinheiro';
        36: Result:='36-Liquidado Correspondente Cheque';
        37: Result:='37-Liquidacao por meio de Central de Atendimento';

        99: Result:='99-Liquidado por agendamento';

 

Muito Obrigado.

 

Atenciosamente.

 

[Renato Rubinho]

Bom dia,

Anexe a unit atualizada com a sugestão de implementação para os consultores avaliarem.

Note que o 30 já existia, fora da ordem.

Anexe também o manual que constam essas informações.