Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Impresión (https://www.clubdelphi.com/foros/forumdisplay.php?f=4)
-   -   Impresión simultanea (https://www.clubdelphi.com/foros/showthread.php?t=67208)

alcides 05-04-2010 22:35:41

Impresión simultanea
 
Hola a todos,

Como se puede lograr una impresion simultanea, ya sea facturas o cheques, si por favor me puede decir como.

He tratado de realizar una impresión simultanea de por lo menos 100 registros, lo imprimo pero no simultaneo.

con delphi, access y reporbuilder



Alcides
Rep. Dom.

Casimiro Notevi 05-04-2010 22:52:30

¿Qué quiére decir una impresión simultánea?, ¿varios documentos a la vez?

alcides 06-04-2010 13:29:32

Gracias casimiro notevi,

una impresion simultanea de registro en un preimpreso (facturas, cheques, recibo, etc).

es lo que he tratado de imprimir, 100 registros de forma simultanea. Que solo me pida la impresora una vez.




Alcides
Rep.Dom.

Casimiro Notevi 06-04-2010 13:35:56

Bien, ¿y si nos cuentas qué haces, cómo, etc.? ;)

alcides 06-04-2010 13:46:21

esto es lo que tengo, despues de capturar el parametro realizo lo siguiente:

Código Delphi [-]
begin
     Qry_Imprime.Close;
     Qry_Imprime.Parameters.ParamByName('playa_empleado1').value := playa_empleado1.Text;
     Qry_Imprime.open;
    While not qry_imprime.Eof do begin 
     ppReport1.PrintReport;

      qry_imprime.Next
end
      ppReport1.Print;
end;

la impresion se va realizando, pero por cada registro debo darle que imprima y cerrar.

Y eso no esta bien para tanto registros.


Gracias,



Alcides
Rep.Dom.

Casimiro Notevi 06-04-2010 13:55:38

Claro, así estás llamando al informe por cada empleado, tienes que crear un query con todos y luego ejecutar el informe, sin ese bucle.

¿Cómo tienes hecho el informe?

alcides 06-04-2010 14:13:47

Casimiro notevi, es una base de datos en access y la organizo por playa o departamento en un qry y luego procedo a la impresion.

este es el qry

Código Delphi [-]
select   *  
from       Maestro_empleados 
where    playa_empleado   = :playa_empleado1
and        Estatus_Empleado <> 'I'
order by codigo_empleado1,codigo_empleado2,codigo_empleado3;


Alcides
Rep.Dom.

Casimiro Notevi 06-04-2010 14:25:45

Te sugiero que mires los ejemplos que trae reportbuilder, este es un informe de los más básicos.

¿Este query que has mostrado cuántos registros devuelve?, debes hacer el select de todos los empleados que quieres imprimir.
Luego en el informe debes elegir "grupos" y añadir, por ejemplo, el campo códigoempleado (o como lo llames en tu tabla), verás que sale lo quieres.

alcides 06-04-2010 14:33:10

Gracias Casimiro Notevi,

relizare unos ajustes, y te hago saber como me fue





Alcides
Rep.Dom.


La franja horaria es GMT +2. Ahora son las 06:51:45.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi