Impressão do DACTE em Lotes

[JCDC]

Boa Tarde.

Eu ja dei uma pesquisada aqui no forum e somente encontrei uma pergunta de um outro colega, mas sem resposta.

Estou gerando os CTes em lotes, mas na impressão, ele imprime um a um, ou seja, o usuario tem que fechar o preview

do primeiro para que o segundo apareça e assim ate o final.

Alguem teria alguma solução para a impressão em Lote ?

Estou usando os fontes para quickreport versao 3.0.

Desde ja, agradeço

Julio

[Italo Giurizzato Junior]

Boa noite Julio,

Basta deixar a propriedade de Preview = False neste caso não vai aparecer o Preview e todos os DACTEs serão impressos em sequencia.

[JCDC]

Boa Noite Italo.

Eu ja havia feito isso, mas mesmo assim, vc percebe que a impressora não imprime na sequencia, como

se fossem varias paginas em um mesmo relatorio. Ha uma parada entre um e outro.

O que eu gostaria é de ter um relatorio com varias paginas, sendo um CTe em cada pagina.

Mas memso assim, obrigado pela dica.

Julio

[Italo Giurizzato Junior]

Julio,

Você deve estar fazendo alguma coisa errada, pois eu deixo a propriedade:

ACBrCTeDACTeQR1.MostrarPreview := False;

Se monto um lote com 10 CTe e envio, se todos forem autorizados ocorre a impressão dos 10 DACTE sem nenhuma parada entre eles como se fosse um relatório com 10 folhas.

outra coisa ao enviar utilizo o seguinte comando:

ACBrCTe1.Enviar(nLote); // nLote é o numero sequencial do lote

espero ter ajudado.

[Adriano Lucas]

Bom dia,

Estou com a mesma dificuldade colocada pelo colega, mas tenho algumas diferenças, eu tenho uma tela onde o usuário pesquisa os CTe que deseja imprimir, poderá ser um ou vários Cte, eu utilizo o Dacte do Fast,'DACTE_1_04.fr3', e sem usar preview.

Antes de atualizar os fontes, semana passada, eu pesquisava os cte e com o grid com 5 cte por exemplo mandava imprimir ele imprimia automaticamente um cte após o outro na impressora padrão.

Agora com a atualização, para cada Cte que ele vai imprimir ele abre a tela de configuração de Impressão para escolher a impressora.

Desde já agradeço,

Adriano

[Adriano Lucas]

Bom dia,

Descobri o porque da impressão do modelo do Fast exibir a tela de seleção de impressora, este modelo está com a propriedade "ShowDialog" como True;

Gostaria de saber se tem como em tempo de execução antes de imprimir setar esta propriedade para FALSE. Hoje altero a propriedade de Preview com o meu parâmetro. Como no Ex:

DACTEFR.MostrarPreview := pVisualizar;

Desde já agradeço

Adriano

[jcanjo]

Adriano Lucas.

 

Também estou com este problema. Como você resolveu ?

 

Como faço para direcionar a impressora, porque coloco dacte.impressora := '\\cpu\j210' não funciona.

 

Tem alguma ideia ?

 

Grato.

[jcanjo]

Bom dia,

Descobri o porque da impressão do modelo do Fast exibir a tela de seleção de impressora, este modelo está com a propriedade "ShowDialog" como True;

Gostaria de saber se tem como em tempo de execução antes de imprimir setar esta propriedade para FALSE. Hoje altero a propriedade de Preview com o meu parâmetro. Como no Ex:

DACTEFR.MostrarPreview := pVisualizar;

Desde já agradeço

Adriano

 

 

Boa Noite Italo.

Eu ja havia feito isso, mas mesmo assim, vc percebe que a impressora não imprime na sequencia, como

se fossem varias paginas em um mesmo relatorio. Ha uma parada entre um e outro.

O que eu gostaria é de ter um relatorio com varias paginas, sendo um CTe em cada pagina.

Mas memso assim, obrigado pela dica.

Julio

Olha só... testei assim e funcionou..

 

Dentro do arquivo ACBrCTeDACTEFR.

Coloque antes do print a seguinte linha.

 

procedure TACBrCTeDACTEFR.ImprimirDACTE(CTE: TCTe);

begin

  if PrepareReport(CTE) then

  begin

    dmDacte.frxReport.PrintOptions.Printer := Impressora;

 

    if MostrarPreview then

      dmDacte.frxReport.ShowPreparedReport

    else

       begin

           dmDacte.frxReport.PrintOptions.showdialog:= mostrarpreview;

      dmDacte.frxReport.Print;

       end;

 

Espero ter ajudado.

  end;

end;