Boleto Sicredi não Homologa

[Rodrigo W. Campos]

Bom dia.

Já enviei para o banco mais de 10 tentativas e ainda não passou pela homologação.

Alguém podem me acompanhar até o processo final?

Segue a baixo os dados fornecidos pelo banco e em seguida o código utilizado.

 

- CÓDIGO DA COOPERATIVA: 0821
- UA / POSTO: 12
- CNPJ: 06.233.056/0001-72
- CPF:475.677.161-00
- RAZÃO SOCIAL: COMPASSO COMÉRCIO E REPRESENTAÇÃO AGROPECUÁRIA LTDA
- FANTASIA: COMPASSO AGROPECUARIA LTDA
- NUMERO AGENCIA: 0821
- DIGITO AGENCIA: 4
- CONTA CORRENTE: 37375
- DIGITO CONTA CORRENTE:3
- ESPÉCIE: R$
- CARTEIRA: SIMPLES
- CÓDIGO DO CEDENTE: 37375
- CONVENIO: SICREDI

 

    var Titulo: TACBrTitulo;

 

    ACBrBoleto1.Banco.TipoCobranca := cobSicred;
    ACBrBoleto1.Cedente.Nome := 'COMPASSO COMÉRCIO E REPRESENTAÇÃO AGROPECUÁRIA LTDA';
    ACBrBoleto1.Cedente.CNPJCPF := '06.233.056/0001-72';
    ACBrBoleto1.Cedente.NumeroRes := '99';
    ACBrBoleto1.Cedente.Logradouro := 'ENDEREÇO';
    ACBrBoleto1.Cedente.Bairro := 'BAIRRO';
    ACBrBoleto1.Cedente.Cidade := 'TABAPORÃ';
    ACBrBoleto1.Cedente.CEP := '78.530-000'
    ACBrBoleto1.Cedente.UF := 'MT';
    ACBrBoleto1.Cedente.CodigoCedente := '37375';
    ACBrBoleto1.Cedente.Convenio := 'SICREDI';
    ACBrBoleto1.Cedente.Modalidade := '1';
    ACBrBoleto1.Cedente.Agencia := '0821';
    ACBrBoleto1.Cedente.AgenciaDigito := '12';
    ACBrBoleto1.Cedente.Conta := '37375';
    ACBrBoleto1.Cedente.ContaDigito := '3';

 

    Titulo := ACBrBoleto1.CriarTituloNaLista;
    Titulo.Vencimento := strtodate('10/02/2016');
    Titulo.DataDocumento := date();
    Titulo.NumeroDocumento := '99';
    Titulo.EspecieDoc := 'DM';
    Titulo.Aceite := atNao;
    Titulo.DataProcessamento := Now;
    Titulo.TotalParcelas := 1;
    Titulo.Parcela := 1;
    Titulo.Carteira := '1';
    Titulo.ValorDocumento := 10;
    Titulo.Sacado.NomeSacado := 'RODRIGO CAMPOS';
    Titulo.Sacado.CNPJCPF := '72976322104';
    Titulo.Sacado.Logradouro := 'ENDEREÇO';
    Titulo.Sacado.Numero := '99';
    Titulo.Sacado.Bairro := 'BAIRRO';
    Titulo.Sacado.Cidade := 'SINOP';
    Titulo.Sacado.UF := 'MT';
    Titulo.Sacado.CEP := '78.550-000';

 

    Titulo.LocalPagamento := 'PAGAR PREFERÊNCIALMENTE NAS AGÊNCIAS DO BANCO SICREDI';
    Titulo.ValorMoraJuros := 0.01;
    Titulo.DataProtesto := strtodate('10/02/2016')+5;
    Titulo.PercentualMulta := 2;
    Titulo.NossoNumero := formatfloat('00000000', 1);
    Titulo.Mensagem.Text := '';

 

    ACBrBoleto1.ACBrBoletoFC.NomeArquivo := 'c:\teste.pdf';
    ACBrBoleto1.Imprimir;

[Juliana Tamizou]

Bom dia.

Se a intenção deste tópico é pedir ajuda, você deve fornecer mais detalhes sobre os motivos da não homologação pelo banco.

Att.

[Rodrigo W. Campos]

Enviei mais uma vez para homologação. Assim que eu receber os erros novos vou postar aki

[Dercide Alvarez]

Rodrigo,

Já fizemos a homologação do Sicredi, e passou sem problemas.

Verifique se é CNAB 400, e veja o que você esta passando do DV da agência, pois vi que você passou 4, e o correto é o UA/Posto que nesse caso é 12.

Quando postar o erro de homologação, poste em forma de arquivo parte dos fontes da configuração do emitente.

Dercide.

 

Editado 15 Fevereiro, 2016 por Dercide Alvarez

[Rodrigo W. Campos]

Em 15/02/2016 at 16:23, Dercide Alvarez disse:

Rodrigo,

Já fizemos a homologação do Sicredi, e passou sem problemas.

Verifique se é CNAB 400, e veja o que você esta passando do DV da agência, pois vi que você passou 4, e o correto é o UA/Posto que nesse caso é 12.

Quando postar o erro de homologação, poste em forma de arquivo parte dos fontes da configuração do emitente.

Dercide.

ACBrBoleto1.Cedente.AgenciaDigito := '12';

Olhe ali coloquei 12...

Mas ele da erro ao tentar pagar boleto = Dígito verificador geral do código de barras não confere.

 

[Juliana Tamizou]

Boa tarde.

Verifique  se a propriedade CodigoGeracao  foi titulo foi informada e está com valor correto.

Att.

[Dercide Alvarez]

Rodrigo,

Poste em arquivo, parte do código da configuração do boleto, e passa o código de barras que o sistema gerou com erro.

Ai poderemos dar uma analisada.

Dercide

[Rodrigo W. Campos]

Boa noite. Resolvi depois de algumas buscas e esqueci de voltar postar a solução encontrada.

Faltava informar  TituloCodigoGeracao := '2'; 

Como faz tempo. Não lembro o porque tinha q ser 2. Mas era isso que faltava no do sicredi.

Obrigado a colaboração de todos.

Editado 31 Março, 2016 por Rodrigo W. Campos