Arquivo Remessa Bradesco homologação [Resolvido]

[Leao]

Ao tentar homologar bco.bradesco, informa mensagem de erro:051, refere-se ao código

fornecido pelo mesmo (código convênio), na possição 27, realmente no arquivo gerado

não costa, mesmo informando os campos, carteira 009

uso cnab400

como corrigir isso?

Veja o arquivo remessa:

01REMESSA01COBRANCA 00000046000900366331J B MOREIRA 237BRADESCO 130412 MX0000001 000001

1000000000000000000000090046000366331 0000000000000001029700000000002N 0 011/02 15041200000000005000000000001N120412000000000000000020000000000000000000000000000000000000000000000163532808000130RETIFICA GP DE MOTORES LTDA RODOVIA BR 010, 15-A - KM 1348RODOVIARI 65903390 000002

2 0090046000366331000000010297000003

9 000004

Não é inserido o código do convêncio, já procurei no forum, e são vários casos,

uns informa que tem que informar no código cedente=carteira+agenca sem digito+conta;

já informei continua não mostrando no arquivo.

Veja parte do código

ACBrBoleto1.Cedente.Agencia:=iif(not VarIsNull(CamposResultado_banco1[2]),CamposResultado_banco1[2],'');

ACBrBoleto1.Cedente.AgenciaDigito:=iif(not VarIsNull(CamposResultado_banco1[3]),CamposResultado_banco1[3],0);

ACBrBoleto1.Cedente.Bairro:=Sistema.BairroUsr;

ACBrBoleto1.Cedente.CEP:=Sistema.CEPUsr;

ACBrBoleto1.Cedente.Cidade:=Sistema.CidadeUsr;

ACBrBoleto1.Cedente.CNPJCPF:=Sistema.CNPJUsr;

ACBrBoleto1.Cedente.CodigoCedente:=iif(not VarIsNull(CamposResultado_banco1[2]),CamposResultado_banco1[2],'')+ //carteira

iif(not VarIsNull(CamposResultado_banco1[6]),CamposResultado_banco1[6],'')+ //agencia

iif(not VarIsNull(CamposResultado_banco1[4]),CamposResultado_banco1[4],'')+ //conta corrente

iif(not VarIsNull(CamposResultado_banco1[5]),CamposResultado_banco1[5],''); //digito da conta

// iif(not VarIsNull(CamposResultado_banco1[7]),Trim(CamposResultado_banco1[7]),'')+

// iif(not VarIsNull(CamposResultado_banco1[24]),Trim(CamposResultado_banco1[24]),'');

//ACBrBoleto1.Cedente.CodigoTransmissao:=iif(not VarIsNull(CamposResultado_banco1[7]),Trim(CamposResultado_banco1[7]),'');

ACBrBoleto1.Cedente.Conta:=iif(not VarIsNull(CamposResultado_banco1[4]),CamposResultado_banco1[4],'');

ACBrBoleto1.Cedente.ContaDigito:=iif(not VarIsNull(CamposResultado_banco1[5]),CamposResultado_banco1[5],'');

ACBrBoleto1.Cedente.Convenio:=iif(not VarIsNull(CamposResultado_banco1[7]),Trim(CamposResultado_banco1[7]),'');

ACBrBoleto1.Cedente.Logradouro:=Sistema.EnderecoUsr;

ACBrBoleto1.Cedente.Modalidade:=iif(not VarIsNull(CamposResultado_banco1[23]),CamposResultado_banco1[23],'1');

ACBrBoleto1.Cedente.Nome:=iif(not VarIsNull(CamposResultado_banco1[15]),CamposResultado_banco1[15],'FALTA INFORMAR O NOME DA EMPRESA');

ACBrBoleto1.Cedente.TipoInscricao:=iif(not VarIsNull(CamposResultado_banco1[21]),CamposResultado_banco1[21],'1');

ACBrBoleto1.Cedente.UF:=Sistema.UfUsr;

ACBrBoleto1.ACBrBoletoFC.DirLogo:=sistema.Pasta+'\'+'Bancos\'; // 'D:\Acbr\Fontes\ACBrBoleto\Logos\Colorido\';

Obrigado e aguardo

Leão

T1029_03.txt

[Leao]

ninguém responde...

ninguém...

[Leao]

ninguém responde...

[Leao]

A solução encontrada por Edudsg, é:no lugar do codigo de cedente coloquei o convenio.

Obrigado,

[Mark Apollo]

Olá, Leao, obrigado por colocar a solução, mesmo ninguém tendo respondido. Infelizmente nem sempre encontramos a resposta ou sequer uma ajuda nos fóruns, mas, acredito que faz parte, o negócio é sempre estar disposto a ajudar, mesmo que ninguém te ajude.

Abraços.

[edudsg]

A solução encontrada por Edudsg, é:no lugar do codigo de cedente coloquei o convenio.

Obrigado,

Obrigado por lembrar de mim.

Aos demais, se quiserem mostro a solução adotada.

[@lessandro]

Boa Tarde, Estou passando o mesmo problema. 

Ao enviar o arquivo ocorre esse erro. 051 .

Edudsg, será que você ou alguém que já passou pelo mesmo problema, pode me mostrar a solução? 

 

Obrigado. 

[podiuminformatica]

Também estou com problema em gerar remessa para o Bradesco. 
Passo na propriedade "CodigoCedente" o valor informado pelo banco, mas na hora de montar o arquivo o componente joga na linha agência + conta corrente. 
 

Registro Header (primeira linha do arquivo):

- posição 27 a 46: preencher com o número do perfil (código do cedente – acessório escritural) = 4680446, alinhar com zeros a 

O componente deveria colocar o valor do cedente, mas não coloca. 
 

[Daniel Simoes]

Vocês precisam fornecer mais detalhes, se desejam que a equipe de desenvolvimento faça qualquer tipo de analise...

- Como você pode demonstrar que a sua solicitação está correta ? (Link para o manual do banco)

- Trecho da Linha que está errada... Como está gerando ? Como deveria gerar ?

- Como reproduzir o erro usando a aplicação Demo do ACBr ?

 

Para os com maior disposição em ajudar.... É ótimo quando alguém liga o Debug e relata exatamente qual trecho do código está com o problema...

 

Lembrem-se o ACBr é OpenSource, todos podem analisar o código e sugerir modificações... Se vocês ficaram esperando que apenas os commiters façam analise e correções... o projeto não cresce... 

[Juliana Tamizou]

Boa noite.

Complementando a postagem do Daniel, também evite duplicar postagens, este mesmo item está sendo discutido no tópico http://www.projetoacbr.com.br/forum/topic/23548-boletoremessa-bradesco/.

Att.

[Edson.pol]

Bom dia Juliana.

Comigo aconteceu a mesma coisa semana passada. Não estava conseguindo nem enviar o arquivo remessa (teste) de um cliente pelo netbanking.

O manual diz:

Posições: 027 a 046 - Código da Empresa - Tamanho: 20

Será fornecido pelo Bradesco, quando do Cadastramento Vide Obs. Pág. 16

...

Registro Header Label
Das Posições 027 a 046

Códigos da Empresa
Será informado pelo Bradesco, quando do cadastramento da Conta beneficiário na sua Agência.
Esse código deve ser alinhado à direita com Zeros à esquerda.

O componente está gerando as posições 27 a 46 com o "código do cedente", que o Bradesco orienta que seja a junção de "zero+carteira+agencia+conta".

Ex: 0 009 00060 00059422 (17 dígitos)

Porém, o Bradesco tem mais um campo, que é chamado de "Código da empresa no banco", que pode ser obtido por telefone com a central de cobrança, ou no netbanking.

Ex: 4541841 (Formatado com zeros a esquerda ficaria 00000000000004541841). E esta informação que deve ir no header da remessa.

 

A solução que encontrei foi alimentar no componente o campo "Cedente.CodigoTransmissao", com o número da empresa, e na unit  ACBrBancoBradesco.pas,

alterei a procedure GerarRegistroHeader400, trocando "CodigoCedente", por "CodigoTransmissao".

[]´s

Edson.

 

Link do manual CNAB do Bradesco

http://www.bradesco.com.br/portal/PDF/pessoajuridica/solucoes-integradas/outros/layout-de-arquivo/cobranca/4008-524-0121-08-layout-cobranca-versao-portugues.pdf

 

 

 

[Juliana Tamizou]

Boa tarde.

Conforme citei em meu post anterior, este mesmo item já está sendo discutido em outro tópico, sendo assim vou manter as repostas nele...em todo caso não parece tratar-se da necessidade de alteração do componente e sim da configuração correta.

 

Att.