Ir para conteúdo
  • Cadastre-se

edson.hexa

Membros
  • Total de ítens

    4
  • Registro em

  • Última visita

Posts postados por edson.hexa

  1. Bom dia a todos,

    postei um topico sobre o assunto a alguns dias, e hoje recebi o ok do banco os boletos e o arquivo remessa foram homologados,

    a mudança que fiz foi a seguinte,

    na função montacodigodebarras

     

    CampoLivre :=   Modalidade                              + { 1-Com registro ou 3-Sem registro. Por enquanto vou deixar 1 mais tenho que tratar menhor essa informação }
                          '1'                                     + { 1-Carteira simples }
                          //padR(ACBrTitulo.NossoNumero,8,'0')      + { Nosso número }  // Comentei aqui
                          padR(FormatDateTime('yy',ACBrTitulo.DataDocumento) + //Adicionei essa linhas
                          ACBrTitulo.CodigoGeracao + RightStr(ACBrTitulo.NossoNumero,5),8,'0') + //Adicionei essa linhas
                          CalcularDigitoVerificador(ACBrTitulo)   + { Dígito verificador do nosso número }
                          padR(OnlyNumber(Cedente.Agencia),4,'0') + { Código agência (cooperativa) }
                          padR(Cedente.AgenciaDigito,2,'0')       + { Dígito da agência (posto da cooperativa) }
                          padR(OnlyNumber(Cedente.CodigoCedente),5,'0')   + { Código cedente }  //  Ver manual página 86 - CNAB240 ou 51 - CNAB400
                          '1'                                     + { Filler - zero. Obs: Será 1 quando o valor do documento for diferente se zero }
                          '0';                                    { Filler - zero }

     

    como disse o nosso amigo o ano tem que vir na montagem do nosso numero.

     

    Att..

     

    Edson Francisco

  2. Boa tarde, entrei em contato com o banco e me disseram o seguinte a formação do campo Linha digitável é da seguinte forma 

     

    (748)BANCO (9)MOEDA (1) Tipo de cobrança 1=com e 3 sem (.) (1)Carteira

    (1)  Digito Nosso Numero (5) 2º Digito Nosso Numero (2) 3ºDigito Nosso Numero 

    nessa parte é formada pelo Ano e o digito 2 (152) do campo nosso numero, no primeiro anexo que enviei tem a analise no topo dela tem a formação exata de como o campo tem que ser e no AcbrBoletoSicredi ele não está fazendo dessa forma, eu fiz uma mudança na função TACBrBancoSicredi.MontarCodigoBarras  e gerou o campo com os valores corretos do nosso numero, mandei para analise e estou aguardando retorno, por favor chequem ai também pra ver se está correto a mudança, ficou assim :

     { Monta o campo livre }
          CampoLivre :=   Modalidade                              + { 1-Com registro ou 3-Sem registro. Por enquanto vou deixar 1 mais tenho que tratar menhor essa informação }
                          '1'                                     + { 1-Carteira simples }
                          //padR(ACBrTitulo.NossoNumero,8,'0')      + { Nosso número  } //COMENTEI AQUI
                          padR(FormatDateTime('yy',ACBrTitulo.DataDocumento) +  //ADICIONEI
                          ACBrTitulo.CodigoGeracao + RightStr(ACBrTitulo.NossoNumero,5),8,'0') + //ADICIONEI
                          CalcularDigitoVerificador(ACBrTitulo)   + { Dígito verificador do nosso número }
                          padR(OnlyNumber(Cedente.Agencia),4,'0') + { Código agência (cooperativa) }
                          padR(Cedente.AgenciaDigito,2,'0')       + { Dígito da agência (posto da cooperativa) }
                          padR(OnlyNumber(Cedente.CodigoCedente),5,'0')   + { Código cedente }  //  Ver manual página 86 - CNAB240 ou 51 - CNAB400
                          '1'                                     + { Filler - zero. Obs: Será 1 quando o valor do documento for diferente se zero }
                          '0';                                    { Filler - zero }

×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.