Impressão CTE via Fortes Report - problema com cópias

[sergiom]

Bom dia,

a rotina de impressão do DACTE, pelo Forte Reports não tem mais a configuração do número de cópias?

A do Fast Report tem.

Após as alterações que foram feitas e causaram problema reportado em outro tópico, descobri que ao mandar imprimir vários CTe´s, antes a impressão saia cada CTe com suas cópias subsequentes.  Agora sai todo o conjunto de CTe, e depois novo conjunto de cópia.

Exemplo:

Carrego os CTe   1000, 1001, 1002, 1003 e mando imprimir 2 cópias.

Antes

1000, 1000
1001, 1001
1002, 1002
1003, 1003

Agora

1000, 1001, 1002, 1003
Cópia
1000, 1001, 1002, 1003

Acredito que possa ter relação com não ter NUMCOPIAS na UNIT do FORTES REPORTS e tem na do FAST REPORT.

Atenciosamente

Sérgio

unction TACBrCTeDACTEFR.PrepareReport(ACTE: TCTe): Boolean;
var
  i: Integer;
  Stream: TStringStream;
begin
  Result := False;

  if Trim(FastFile) <> '' then
  begin
    if not (UpperCase(Copy(FastFile, Length(FastFile)-3, 4)) = '.FR3') then
    begin
      Stream := TStringStream.Create(FastFile);
      frxReport.FileName := '';
      frxReport.LoadFromStream(Stream);
      Stream.Free;
    end
    else
    if FileExists(FastFile) then
      frxReport.LoadFromFile(FastFile)
    else
      raise EACBrCTeDACTEFR.CreateFmt('Caminho do arquivo de impressão do DACTE "%s" inválido.', [FastFile]);
  end
  else
    raise EACBrCTeDACTEFR.Create('Caminho do arquivo de impressão do DACTE não assinalado.');

  frxReport.PrintOptions.Copies := NumCopias;
  frxReport.PrintOptions.ShowDialog := MostraSetup;
  frxReport.ShowProgress := MostraStatus;
  frxReport.PreviewOptions.AllowEdit := False;

[sergiom]

Em algum lugar não teria que ter a informação

onde NumCopias é informado no Report?

Atenciosamente

Sérgio

Editado 7 Janeiro, 2019 por sergiom

[Italo Giurizzato Junior]

Bom dia Sergio,

Peço que tenha um pouco mais de paciência, nós estamos analisando o caso.

Caso queira colaborar analisando o código e acrescentando o que esta faltando, toda ajuda é bem vida.

[sergiom]

Ítalo

estou sendo paciente, mas para quem alterou é fácil identificar onde mexeu.

Não consegui achar como configurar copias no FORTES REPORTS.

Tem algumas referencia a CARBONCOPIES.

Atenciosamente

Sérgio

 

 

[Daniel Simoes]