Ir para conteúdo
  • Cadastre-se

dev botao

  • Este tópico foi criado há 3724 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Postado

Estou com os fontes atualizados e não consigo homologar.

 

Recebi retorno do banco com muitos erros, ex:

- Erro de digito verificador;

- Erro de código de barras;

- Digito verificador do campo livre invalido, etc.

 

Alguém conseguiu homologar?

 

  • 2 semanas depois ...
Postado

Bom um dos erros é o código de barras que quando volta da homologação diz que não bate com o código da linha digitável... Mas eu vou no banco passo o leitor e aparece certinho no caixa eletrônico... Não sei o que fazer.... Preciso muito resolver essa semana, estou disposto a pagar pelo serviço de quem se dispor a me ajudar até o final. Pode passar o valor aí. Obrigado...

 

Vamos la aqui vai o código que estou usando:

 

var
  Titulo : TACBrTitulo;
 
ACBrBoleto1.ListadeBoletos.Clear;
ACBrBoleto1.Banco.TipoCobranca := cobCaixaEconomica;
ACBrBoleto1.Cedente.Nome := 'RAZÃO SOCIAL DA EMPRESA';
ACBrBoleto1.Cedente.CNPJCPF := '00000000000000'; //CNPJ DA EMPRESA
ACBrBoleto1.Cedente.Logradouro := 'ENDERECO DA EMPRESA';
ACBrBoleto1.Cedente.NumeroRes := '0'; //NUMERO DA EMPRESA
ACBrBoleto1.Cedente.Bairro := 'BAIRRO DA EMPRESA';
ACBrBoleto1.Cedente.Cidade := 'CIDADE DA EMPRESA'
ACBrBoleto1.Cedente.CEP := '78550286';
ACBrBoleto1.Cedente.UF := 'MT';
ACBrBoleto1.Cedente.CodigoCedente := '457574'; //MESMO NUMERO DA CONTA CONFORME INSTRUCAO DO BANCO
ACBrBoleto1.Cedente.Convenio := ''; //NÃO TEM
ACBrBoleto1.Cedente.Agencia := '0854'; //AGENCIA DA CONTA
ACBrBoleto1.Cedente.AgenciaDigito := '0'; //DIGITO DA AGENICIA
ACBrBoleto1.Cedente.Conta := '457574'; //NUMERO DA CONTA
ACBrBoleto1.Cedente.ContaDigito := '6'; //DIGITO DA CONTA
Titulo := ACBrBoleto1.CriarTituloNaLista;
with Titulo do begin
  Vencimento := date(); //VENCIMENTO
  DataDocumento := date(); //DATA EMISSAO
  NumeroDocumento := '50'; //DOCUMENTO INTERNO
  EspecieDoc := 'DS'; //ESPECIE
  Aceite := atNao; //SEM ACEITE
  DataProcessamento := Now; //DATA PROCESSAMENTO
  Parcela := 1; //NÚMERO DA PARCELA
  Carteira := 'SR'; //CARTEIRA SEM REGISTRO
  ValorDocumento := 10; //VALOR DO DOCUMENTO
  Sacado.NomeSacado := 'NOME DO SACADO';
  Sacado.CNPJCPF := '00000000000';
  Sacado.Logradouro := 'ENDERECO DO SACADO';
  Sacado.Numero := '1'; //NUMERO END. SACADO
  Sacado.Bairro := 'BAIRRO SACADO';
  Sacado.Cidade := 'CIDADE SACADO';
  Sacado.UF := 'MT';
  Sacado.CEP := '78550000';
  LocalPagamento := 'LOCAL DE PAGAMENTO';
  ValorMoraJuros := 0; //VALOR DA MORA DE JUROS
  DataProtesto := DATE()+30; //DATA PROTESTO
  PercentualMulta := 2; //PERCENTUAL MULTA
  MsgBoleto := 'OBSERVACOES DO BOLETO';
  NossoNumero := '56'; //NOSSO NUMERO
end;
ACBrBoleto1.ACBrBoletoFC.NomeArquivo := 'CAMINHO_DO_ARQUIVO.pdf'; //SALVO O CAMINHO
ACBrBoleto1.GerarPDF;
 
 
Lembrando que estou com os fontes atualizados...

post-10369-0-44360400-1394404591_thumb.j

Postado (editado)

Bom dia..

ja homologuei vários clientes com o sigcb..

 

pelo que vi no teu fonte.. você não esta alimentando a Modalidade..

 

e nunca vi uma homologação sem convenio..

então talvez vc deveria conversar com o banco para ver oque vai nesse campo então.. 

 

e tem uma validação que fiz no final da função antes de dar o result :

 function TACBrCaixaEconomica.MontarCodigoBarras(const ACBrTitulo : TACBrTitulo): String;

pois as vezes gerava digito verificador 0 (ZERO) e o banco no aceita isso, nesse caso deve-se passar 1.

 

    //nao pode ser um 'ZERO' digito verificador geral
    //orientacao passada pelo pessoal da caixa
    if DigitoCodBarras = '0' then
      DigitoCodBarras := '1';
 
talvez fazendo isso já resolva seus problemas..
 
 
Obs.: é sempre bom dar uma analisada no fonte.. as vezes você pode estar informando algo de errado para o componente.. e sempre validar junto ao manual do banco..
Editado por Oneide
  • Curtir 1
---------------------------------------------------------

Att. 

Oneide Luiz Schneider
Analista/Desenvolvedor de Software
Itapiranga/Maravilha - SC
(49) 99367442
  • 1 mês depois ...
  • 5 meses depois ...
  • Este tópico foi criado há 3724 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • 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.

The popup will be closed in 10 segundos...