edson.hexa

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

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) 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 }

Bom dia, Eu utilizo o Fortes Report, e a propriedade nosso numero passo da seguinte forma Titulo.NossoNumero := IntToStrZero(varNossoNumero,5); onde varNossoNumero = 00077 Att

Boa tarde, Estou tentando homologar boleto Sicredi mas estou tendo problemas na linha digitável e no Código de barras, segue a analise feita pelo banco 3027-05-15876 - Boletos.PDF