Acbr Boleto Bb Erro Durante A Preparação Do Relatorio

[dathilis]

Pessoal, estou com o seguinte problema ao imprimir um boleto do Banco do Brasil:"erro durante a preparação do relatorio EInOutError (I/O 1314 error).

 

Estou usando forte Report e delphi 7, pelo que eu entendi não há provilégio para escrever no arquivo, mas sinceramente não sei como resolver. Alguém ja teve este problema?

 

PS estou usando Windows 7  

[Ana Fernanda]

Estou com o mesmo problema.

Alguém tem alguma sugestão?

Att.

Ana Fernanda

[Juliomar Marchetti]

Por favor tentem reproduzir o erro com o demo do boleto e deem um passo a passo para reproduzir !

[Ana Fernanda]

Tanto no meu sistema como no DEMO o erro é o mesmo usando o FORTES.

 

LayoutBoleto: Erro durante a preparação do relatório

EAccessViolation(Access violation at address 004050A0 in module 'SISTEMA.exe'. Write of address 00000210)

Att.

[GustavoKato]

tente o seguinte, clique com o botão direito sobre o exe, então clique em "Executar como administrador", se for problema de permissão de gravação deverá resolver

[Ana Fernanda]

Cliquei com o botão direito.

Executei como administrador.

O erro é o mesmo.

Att.

[Ana Fernanda]

Depois de muitas novas instalações, agora o problema está em acbrboleto1.Imprimir;

 

Se alguém puder me ajudar, uso FORTES.

Att

[Agnaldo Prates]

Muito estranho este erro.

Testa este Demo que estou usando pra ver.

 

Lembre-se, dê uma olhada na alimentação do componente.

 

Att.

AcbrBoletoDemo.rar

[Ana Fernanda]

Não consegui compilar. Mas vi que no código vc não usa o acbrboleto1.imprimir que onde está dando erro no meu sistema.

Att.

[Ana Fernanda]

O erro acontece exatamente nesta linha em vermelho:

 

if Filtro = fiNenhum then

         begin

           if MostrarPreview then

              RLLayout.PreviewModal

           else

              RLLayout.Print;

         end

 

Att.

Ana Fernanda

[tiagoshimizu]

Olá a todos. Estava com este mesmo problema, só que depois de atualizar os componentes! Retornei para a versão 7316 e funcionou normal por aqui. Tenta aí pra ver.

T+.

[Ana Fernanda]

O erro acontece exatamente nesta linha em vermelho:

 

if Filtro = fiNenhum then

         begin

           if MostrarPreview then

              RLLayout.PreviewModal

           else

              RLLayout.Print;

         end

[Agnaldo Prates]

Dê uma olhada na linha 257 da Unit uDemo.pas

lá está exatamente assim:

ACBrBoleto1.Imprimir; 

 

Possivelmente você está com problemas de versão.

Para testar, renomeie a pasta AcBrBoleto para Old_AcBrBoleto e autlize através do svn, recompile o pacote e teste.

Quando ocorrem estas coisas eu faço isso e sempre dá certo.

 

att.

[Ana Fernanda]

Só me fala como recompilar o pacote para eu não fazer nenhuma besteira.

OBrigada

[Agnaldo Prates]

Baixa via svn, vá na pasta onde estão sendo salvos os arquivos do AcBr, dentro dela existe uma subpasta denominada "Pacotes\Delphi\ACBrBoleto", aberta esta pasta, abra o arquivo ACBr_Boleto.dpk, depois de aberta, clique com o botão 2 do mouse sobre Contains e, em seguida clique em Build, logo em seguida, clique em File. Open e abra o arquivo ACBr_BoletoFC_Fortes.dpk, e faça o mesmo, botão 2 do mouse sobre Contains e, em seguida clique em Build.

Para os demais reports, o procesimento é o mesmo.

 

Possivelmente vai resolver.

[Ana Fernanda]

Prezados,

 

consegui fazer o boleto aparecer, fazendo a alteração a seguir no código (uso fortes). A alteração foi comentar a linha que está em vermelho.

Outra situação, a Juliana afirma que o layout do boleto (fortes) está de acordo com as novas regras da FEBRABAN, mas como pode ser visto na figura em anexo, temos ainda informações desatualizadas (exemplo, cedente ou deveria ser beneficiário. ....).

 

procedure TACBrBoletoFCFortesFr.RLBand2BeforePrint(Sender: TObject;

   var PrintIt: boolean);

Var

  CodBarras, LinhaDigitavel : String;

begin

  with fBoletoFC.ACBrBoleto do

  begin

     CodBarras      := Banco.MontarCodigoBarras( Titulo );

     LinhaDigitavel := Banco.MontarLinhaDigitavel( CodBarras,Titulo );

 

     imgBanco3.Picture.Assign(imgBanco2.Picture);

     fBoletoFC.CarregaLogo( imgBanco3.Picture, Banco.Numero );

     txtNumeroBanco3.Caption         := txtNumeroBanco2.Caption;

     txtLocalPagamento3.Lines.Text   := lblLocalPagto.Lines.Text;

     txtDataVencimento3.Caption      := txtDataVencimento2.Caption;

     txtNomeCedente3.Caption         := txtNomeCedente2.Caption;

     txtEndCedente1.Caption          := txtEndCedente.Caption  ;

     txtCodigoCedente3.Caption       := txtCodigoCedente2.Caption;

     txtDataDocumento3.Caption       := txtDataDocumento2.Caption;

     txtNumeroDocumento3.Caption     := txtNumeroDocumento2.Caption;

     txtEspecie3.Caption             := txtEspecie2.Caption;

     txtAceite3.Caption              := txtAceite2.Caption;

     txtDataProcessamento3.Caption   := txtDataProcessamento2.Caption;

     txtNossoNumero3.Caption         := txtNossoNumero2.Caption;

     txtUsoBanco3.Caption            := txtUsoBanco2.Caption;

     txtCarteira3.Caption            := txtCarteira2.Caption;

     txtEspecieDoc3.Caption          := txtEspecieDoc2.Caption;

     txtValorDocumento3.Caption      := txtValorDocumento2.Caption;

     txtNomeSacado3.Caption          := txtNomeSacado2.Caption;

     txtEnderecoSacado3.Caption      := txtEnderecoSacado2.Caption;

     txtCidadeSacado3.Caption        := txtCidadeSacado2.Caption;

     txtCpfCnpjSacado3.Caption       := txtCpfCnpjSacado2.Caption;

     txtSacadorAvalista3.Caption     := txtSacadorAvalista2.Caption;

 

     imgCodigoBarra.Caption          := CodBarras;

     //txtNumBarcode.Caption           := CodBarras;

     txtLinhaDigitavel.Caption       := LinhaDigitavel;

     txtInstrucoes3.Lines.Text       := txtInstrucoes2.Lines.Text;

   end;

end;

 

[Juliana Tamizou]

Bom dia.

 

A única informação que ainda não foi substituído o "Cedente" por "Beneficiário" é nas informações adicionais, conforme vc mesma pode verificar na imagem em anexo. 

 

Att.

[geazi]

Senhores, boa tarde a todos.

 

Desde que fiz update no sábado, 20.09.2014, esse problema de access violation aparece.

Para solucionar, fiz como a Ana Fernanda explicou acima.

Porém, com o TACBrBoletoFCFortesFr aberto, ao comentar a linha: 

txtNumBarcode.Caption           := CodBarras;

O delphi informa:

Field ACBRBoletoFCFortesFr.txtNumBarcode dos not have a corresponding component. Remove the declaration ?

No que respondo "Yes" e salvo, o boleto consegue ser impresso, aparentemente, normal.

Percebi que o txtNumBarcode é um TRLLabel e existem outros desse componente no mesmo formulário.

 

Antes disso eu desinstalei o ACBr e reinstalei novamente mas continuou dando o problema.

Notei que a revisão 7458 não está com esse problema.

Há uma solução recomendada para esse assunto ?

[Juliana Tamizou]

Boa tarde.

 

Acredito que a solução indicada por você seja exatamente oque precisa ser feito.

 

Att.

[butzke.cleiton]

Boa Noite,

 

 

gostaria de reportar que atualizei via svn hoje pela manhã e que, por algum motivo o ACBR que estou implementando em meu sistema parou de imprimir em Fortes. Gera erro qdo selecionado. Testei pelo DEMO e dá o mesma exceção. Quando uso o LazReport, gera certinho.

[Juliomar Marchetti]

Você recompilou os pacotes após efetuar a atualização do svn?

[butzke.cleiton]

Bom dia, 

ajustei o código conforme  a geazi e a Juliana haviam passado no post anterior e recompilei depois desta, então corrigiu.

Grato.