Homologação Do Boleto Sicredi

[lucasjrnany]

Bom dia, 

 

Estou com uma dificuldade na homologação do boleto do Sicredi, o Suporte do Banco Sicredi  me retornou umas criticas, que ja pesquisei no fórum algo similar porem não encontrei. 

As criticas foram a respeito do tipo de cobrança que o cliente usa cobrança com registro porem na impressão e no arquivo de remessa estão indo o valor de cobranã sem registro. Analisando o código fonte me deparei com está informação. no campo modalidade do componente estou mandando o valor 3 que é cobrança com registro conforme descrito na linha 115 do código fonte do ACBrBancoSicredi

 

      FatorVencimento := CalcularFatorVencimento(ACBrTitulo.Vencimento);

      Modalidade := IfThen(Cedente.Modalidade='','1',Copy(trim(Cedente.Modalidade),1,1));

 

      { Monta o campo livre }

      CampoLivre :=   Modalidade                              + { 1-Sem registro ou 3-Com registro.}

 

O Suporte do banco me disse que valor do campo com Registo tem que ser o valor 'A' porem no arquivo de remessa está indo o valor 'C' que cobrança sem registro como descrito no manual na pagina 26 ( http://www.sicredi.com.br/websitesicredi/upload/files/28460_Manual_Beneficiario_Cobranca_CNAB_400___18062014.pdf) CNAB400. Depurando o o fonte encontrei na linha 289 do código fonte do ACBrBancoSicredi. 

 

     if StrToIntDef(ACBrBoleto.Cedente.Modalidade,1) = 1 then

         wModalidade := 'A'

      else

         wModalidade := 'C';

 

      with ACBrBoleto do

      begin

         wLinha:= '1'                                                                   +  // 001 a 001 - Identificação do registro detalhe

                  wModalidade                                                           +  // 002 a 002 - Tipo de cobrança ("A" - Registrada  e "C" Sem Regsitro)

                  ifthen(wModalidade = 'A', 'A', ' ')                                   +  // 003 a 003 - Tipo de carteira = "A" Simples

                  IfThen(TipoImpressao = tipCarne, 'B', 'A')                            +  // 004 a 004 - Tipo de impressão = "A" Normal "B" Carnê //--Anderson  

 

No if a modalidade 1 está recebendo o valor A de cobrança registrada então está invertendo os valores.

 

Obrigado pela Ajuda .

 

Att

 

 

[Juliana Tamizou]

Bom dia.

 

Após analise do manual e dos fontes, conclui que a única coisa a ser corrigida é a anotação para informar 1- Com Registro   e 3- Se Registro. Apesar da orientação no fonte estar incorreta, a implementação está conforme o manual do banco.

 

Ajuste disponível no svn

 

Att.

[lucasjrnany]

Bom dia Juliana

 

Então na  modalidade informo 1 - com registro / 3 sem registro 

 

Att. 

[Juliana Tamizou]

Boa tarde.

Pelo que pude observar no seu ini, a propriedade Modalidade não foi informada nas configurações do cedente.

Att.