Ajustes unit ACBrBancoSicredi.pas

[JLuis]

Juliana Tamizou, peço por gentileza subir para o SVN o fonte em anexo no qual fiz alguns ajustes cfe. descrito abaixo

1) Correção TipoOcorrencia toRetornoRegistroRecusado: //03, linha 820 da function TACBrBancoSicredi.CodMotivoRejeicaoToDescricao()

O CodMotivo 'C5' que no conjunto do AnsiIndexStr está na posição 9, estava no result da posição 46 do case.

1.1) Códigos de motivo adicionados:

'C4', 'C7', 'C8' e 'C9'

2) Correção TipoOcorrencia toRetornoBaixaRejeitada: //27

Os códigos de motivo 'C5', 'C7' também estavam com o Result invertido.

No "else", a linha:

            case StrToInt(CodMotivo) of

foi substituida por:

            case StrToIntDef(CodMotivo,-1) of

pois já ocorreu um caso em que retornou código que não consta no manual do Sicredi, com esta alteração caso retorne um código diferente entra como "Outros Motivos".

3)  TipoOcorrencia toRetornoInstrucaoRejeitada: //32

3.1) Código 'C4' não previsto no Result

3.2) Código 'C5' o Result estava no índice errado.

3.3) Códigos de motivo adicionados:

'I9', 'K9', 'A3', 'C8', 'C9', 'J3' e 'D1'

 

* Os ajustes e códigos adicionados foram apurados em casos de erros ocorridos na leitura do retorno.

Desde já agradeço.

ACBrBancoSicredi.pas

[Juliana Tamizou]

Boa noite.

Alteração disponível no svn.

Att.

[JLuis]

Olá Juliana, obrigado pela atenção, ... só acho que houve algum problema no seu "merge", no fonte que eu anexei eu havia organizado os códigos de retorno dentro do [...] segundo o índice da estrutura case mas como vc. ordenou-os alfabeticamente dentro do conjunto de valores testado pela função AnsiIndexStr, a partir do "B9" o índice de todas as mensagens a seguir não bate com a posição dos respectivos códigos dentro do conjunto [..]!  O "B9" inclusive eu havia acrescentado porque não estava sendo testado pelo case.

Para ser mais claro estou anexando uma imagem demonstrando um exemplo com o C4, C7 e C8 que estão nas posições 9, 10, 11 respectivamente dentro do conjunto e ficaram nas posições 48,49 e 50 do case.... Assim, o sistema sempre apresentará a mensagem errada não condizente com o código retornado pelo banco!!

No fonte que eu anexei no primeiro post eu havia organizado isso inclusive acrescentei a mensagem do "B9" que não estava na lista.

Com toRetornoInstrucaoRejeitada: //32  a partir da linha 1092 ocorreu o mesmo problema.

Peço-lhe por gentileza verificar, se precisar de ajuda estou à disposição ok

Obrigado.

Juliana,

Para ajudar, refiz os ajustes ref. aos problemas relatados no post anterior porém, sem reordenar os códigos dentro do conjunto [...], acho que mexer nisso só vai dar mais confusão, melhor manter na ordem que os códigos vinham sendo acrescentados. É importante destacar que sempre deve-se acrescentar ao final do conjunto para não bagunçar os testes do case em relação aos respectivos códigos de cada mensagem ok

Permaneço à disposição.

Att.

ACBrBancoSicredi.pas

[Juliana Tamizou]

Boa noite.

Alteração disponível no svn.

Att.