Imprimir 2 copias en reporte

[PETACA]

Hola a todos. Tengo un reporte donde imprimo una factura. Lo que quiero es saber como

indicarle que me imprime 2 copias, en estos momentos lo tengo llamando 2 veces al reporte.

Estoy usando foxypreviewer.

Hay alguna manera de hacer esto ?.

Saludos y gracias

[Luis la Romana]

Hola, en el report form la diferencia entre documento (una factura) y reporte (de ventas) son apenas perceptibles.

Para imprimir facturas de formulario tamaño media carta, en donde el juego de arriba se repite abajo y entre ambos ocupan el espacio de una hoja carta, basta con alargar hacia abajo la sección Detalle. Lo amplias mucho, casi el doble en espacio y justo a continuación de donde termina el primer juego, le pegas allí todo lo que lleve el Encabezado, es decir Copias el grupo de campos y luego dar Pegar. Más abajo aun, copias y pegas el grupo de campos que lleva al inicio el Detalle. En general verás que se trata de hacer un Detalle que anida, repite lo del Encabezado y lo suyo propio.

[Luis Maria Guayan]

Personalmente duplico (triplico o el caso que fuera) los registros del cursor que tomará el informe y hago un corte de control por cada copia o texto de la copia (ORIGINAL, DUPLICADO, TRIPLICADO, ETC).

 

Luis María Guayán
Tucumán, Argentina
_________________________
http://www.PortalFox.com

Nada corre como un zorro
_________________________

[HernanCano]

En FoxyPreviewer arma tu reporte como si fueras a imprimir una sola copia.

Cuando lo tengas listo, agrega la prop .lRepeatInPage=.t.  a la inicialización del repo. Si bien en pantalla lo verás una sola vez, en la impresora saldrá las dos veces que necesitas.

Chao.

[Arnaldo Toledano]

QUE LO QUE DECÍS ! ! ! ! ! ! !


Arnaldo Toledano

El 01/07/2013 08:18 p.m., Luis la Romana escribió:

Hola, en el report form la diferencia entre documento (una factura) y reporte (de ventas) son apenas perceptibles.

Para imprimir facturas de formulario tamaño media carta, en donde el juego de arriba se repite abajo y entre ambos ocupan el espacio de una hoja carta, basta con alargar hacia abajo la sección Detalle. Lo amplias mucho, casi el doble en espacio y justo a continuación de donde termina el primer juego, le pegas allí todo lo que lleve el Encabezado, es decir Copias el grupo de campos y luego dar Pegar. Más abajo aun, copias y pegas el grupo de campos que lleva al inicio el Detalle. En general verás que se trata de hacer un Detalle que anida, repite lo del Encabezado y lo suyo propio.

--
Arnaldo Toledano Tesys Informática Córdoba Argentina

[Arnaldo Toledano]

Luis Maria, te estas refiriendo al  FoxPreviewer ?

If FoxPreviewer
     No utilizo FoxPreviewer
Else
    Que significa CORTE DE CONTROL ??? en un REPORTE ?
endif


Arnaldo Toledano

[Víctor Hugo Espínola Domínguez]

Hola Arnaldo

>Que significa CORTE DE CONTROL ??? en un REPORTE ?

En el diseñador de reportes es "Data Grouping..." del menú "Report"

La frase "Corte de control" tiene su origen en la era de la programación espagueti cuando el archivo de entrada está ordenado por uno o más campos que controlan los "cortes"  (pausas) que se hacen en el proceso secuencial de los registros (detalles), para efectuar los inherentes al campo de "control" que cambió de valor.

Ejemplo: Listar los empleados de la empresa, los datos de los mismos están ordenados por sucursal y departamento.

El proceso secuencial de imprimir un empleado se "corta" cuando cambia el valor del código de la sucursal o del departamento, se imprime el total del departamento y se inicializa el "control" del departamento, Lo mismo se hace con el cambio de sucursal.

Posteriormente se cambió el algoritmo por el de la programación estructurada, pero la frase "Corte de control" se siguió usando.

Saludos,

Víctor.

 

[Claudio Luna]

Corte de control / apareo de archivos.... que tiempos.. jaja

Saludos

--

Claudio Luna

Monttevideo - Uruguay

SKYPE: clunamarin

Cel. 099 194 770

[Ricardo Pina]

Que grande.

Los pendejos tratando de levantar por facebook y nosotros teniamos apareo de archicvos hace viente años, jajja

 

--

            

                   Ricardo Pina

Desarrollo y Servicios Informáticos

                  Profesionales
               www.dsip.com.ar

 

 

[Jose Antonio Blasco]

Yo utilizo la siguiente función, que me permite asignar al controlador de la impresora, el número de copias que quiero:

Function NumCopias

*------------------------------------------

* Parametros:

*  lcFRX    = archivo frx con el formato

*  lnCopies = nº de copias

*

* Uso:

*    =NumCopias('mireport',3)

*------------------------------------------

Lparameter lcFRX, lnCopies

Local lcNewExpr, lnStartCopiesLine, lcStartAtCopiesLine, lnEndCopiesLine, ;

lnLenCopiesLine, lcTop, lcBottom, lcAlias

#Define vfCRLF Chr(13) + Chr(10)

lcAlias=Alias()

lcFRX = FORCEEXT(lcFRX, 'frx')

Use (lcFRX) In 0 ALIAS FrxCopias

Select FrxCopias

GOTO top

Locate For objtype = 1 And objCode = 53

If Empty(Expr)

lcNewExpr = "COPIES=" + Allt(Str(lnCopies)) + vfCRLF

Else

lnStartCopiesLine = Atc("COPIES", Expr)

If lnStartCopiesLine <> 0

lcStartAtCopiesLine = Substr(Expr, lnStartCopiesLine)

lnEndCopiesLine = Atc(vfCRLF, lcStartAtCopiesLine)

lnLenCopiesLine = Len(Substr(lcStartAtCopiesLine, 1, lnEndCopiesLine))

lcTop = Substr(Expr, 1, lnStartCopiesLine - 1)

lcBottom = Substr(Expr, (Len(lcTop) + lnLenCopiesLine))

lcNewExpr  = lcTop + "COPIES=" + Allt(Str(lnCopies)) + lcBottom

Else

lcNewExpr = Expr + "COPIES=" + Allt(Str(lnCopies)) + vfCRLF

Endif

Endif

Replace Expr With lcNewExpr

Use In FrxCopias

If !Empty(lcAlias)

Select &lcAlias

Endif

Endfunc

Espero que os sirva.

Un saludo.

Jose A. Blasco
Zaragoza - España
Visual FoxPro 9 SP2

"No hay camino hacia la libertad, la libertad es el camino" - Indira Gandhi
“Nunca te olvides de sonreír, porque el día que no sonrías  será un día perdido”  -  Charles Chaplin
“Todo el mundo quiere tener un amigo, pero pocos se toman la molestia de ser uno” - Anónimo

[Arnaldo Toledano]

Veinte años.... que lo pa.....

Victor Hugo.

Lo de corte de control lo tengo claro, calcula que programo desde el año 1989.....
Lo que preguntaba es que es CORTE DE CONTROL en un reporte de VFP, utilizando justamente los REPORTES.
Esa es mi duda,  (Ricardo Pina, Tengo una DUDA ...).

Luis Maria no me ha contestado, el debe haber interpretado mi pregunta.
Básicamente es lo siguiente.
Si tengo :
Encabezado
Detalle
Pie de Pagina
Pongo un CORTE DE CONTROL
como volver a Encabezado, detalle, pie de Pagina en UNA MISMA HOJA.
Se entiende ?????

Arnaldo Toledano

[Luis Maria Guayan]

Perdón Pendex Toledano, quise decir Data Grouping :-) se me escapó el viejazo, veo que ya no estoy en la pomada !!

Luis María Guayán
Tucumán, Argentina
_________________________
http://www.PortalFox.com
Nada corre como un zorro
_________________________

[Luis la Romana]

Arriba explico cómo hago eso desde hace años, en el report form para repetir encabezado y detalle, dentro del mismo Report Form.

[Arnaldo Toledano]

Si, pero YO no entendi NADA.
Si lo podes explicar de nuevo...


Arnaldo Toledano

El 02/07/2013 11:46 a.m., Luis la Romana escribió:

Arriba explico cómo hago eso desde hace años, en el report form para repetir encabezado y detalle, dentro del mismo Report Form.

[Luis la Romana]

Tengo la mejor ortografía de todo el grupo, no sé qué más hacer, básicamente menciono que alargas o amplias la sección Detalle, quedando los actuales campos en su sitio, en el espacio limpio de abajo copias los campos de Encabezado y copias otra vez los campos de Detalle que ya tienes.

----Encabezado
(campoA)  (CampoB)
----Detalle
(campoC) (campoD)

(campoA)  (CampoB)
(campoC) (campoD)

[Víctor Hugo Espínola Domínguez]

Hola Arnaldo

>Lo que preguntaba es que es CORTE DE CONTROL en un reporte de VFP, utilizando justamente los REPORTES.

Copy/Paste de lo que te respondí:

-------------------------------------------------------------------------------------------------

Hola Arnaldo

>Que significa CORTE DE CONTROL ??? en un REPORTE ?

En el diseñador de reportes es "Data Grouping..." del menú "Report"

La frase "Corte de control" tiene su origen en , 

-------------------------------------------------------------------------------------------------

>Si tengo :
>Encabezado
>Detalle
>Pie de Pagina
>Pongo un CORTE DE CONTROL
>como volver a Encabezado, detalle, pie de Pagina en UNA MISMA HOJA.
>Se entiende ?????

Se puede hacer eso definiendo un formulario en el panel de control de impresoras, el formulario definido debe tener la mitad de alto del formulario físico.

La solución de Luis la Romana es para los casos en que el detalle consta de un solo registro, ejemplo: Recibo de dinero, recibo de liquidación de haberes, etc... Es un "truco",

La propuesta de Luís María es mejor.

Supongamos que quieres imprimir la liquidación de salarios en duplicado para cada empleado (varios registros para un empleado), entonces en el cursor o tabla temporal a ser usado(a) en el report tendrías un campo adicional que tenga el tipo de recibo "Original" o "Duplicado" a algún código que lo identifique; los datos obviamente ordenados por Empleado, TipoRecibo.

En el report:

Un primer "Group" por IdEmpleado con la opción "Group start on -> New page"

Segundo "Group" por TipoRecibo con la opción "Group start on -> New page" o "Group start on -> New line" dependiendo de si tienes un formulario especial definido o no.

 

Saludos,

Víctor.

[Claudio Luna]

Arnaldo estas imagen puede ser de ayuda:

Un saludo

Claudio

[Guillermo MDQ]

Para el caso de tener que imprimir una factura por duplicado en un tamaño de hoja pre impresa A4 por ejemplo, lo mejor para mi es tener un campo para agrupar, que podria ser 1 para el original y 2 para la copia..
Hay que establecer la cantidad de lineas maximas que me permite la hoja para imprimir el detalle
Despues  creamos un cursor con los registro de el detalle duplicados y diferenciados por el campo que se quiere agrupar, y si la cantidad de registros no alcanza para cubrir el total de lineas permitidas le agregamos registros en blanco hasta completar ese maximo.
Despues hacemos el reporte agrupado por el campo diferenciador de copias y en los encabezamientos de grupo ponemos los datos de cabezera de factura, y en el pie de grupo los totales.
Esta creo que es la mejor manera de imprimir dos copias de factura en un tamaño de hoja pre impreso.

Saludos
Guillermo

[Arnaldo Toledano]

Guillermo, me parece lo mas atinado. 
Lo he echo pero no con la prolijidad que mencionas.

Lo probare como vos indicas y te cuento.

Gracias

Arnaldo

[Luis Maria Guayan]

El 02/07/2013 13:48, Luis la Romana escribió:

Tengo la mejor ortografía de todo el grupo,

Y de la modestia  ¿Como andamos?

[IonLitio]

Hola, yo como no habia encontrado solución lo hice de otra manera.....no se tan efectiva como los que ya te contestaron...pero me sirve y lo principal....anda.

Arme un reporte con el detalle de la factura (suponiendo que tenes 2 tablas factura y detallefactura), agrupado por el campo que las relaciona, en mi caso "codigofactura".

a ese detalle le relacione un encabezado y un pie. Puse todos los campos que necesite de la tabla factura en estas dos bandas extra. Luego cree una banda mas de detalle, y le hice lo mismo que la anterior, le relacione un encabezado y un pie. 

Asi que, me quedaron las siguientes bandas:

-TITULO (vacia)

-ENCABEZADO DE PÁGINA (vacia)

-CABECERA DE GRUPO : codigofactura (vacia)

-ENCABEZADO DE DETALLE 1

-DETALLE 1

-PIE DE DETALLE 1

-ENCABEZADO DE DETALLE 2

-DETALLE 2

-PIE DE DETALLE 2

-PIE DE GRUPO: codigofactura (vacia)

-PIE DE PAGINA (vacia)

Solo queda darle los altos a las bandas y las distancias de los controles.

Espero haberte servido de ayuda.

Saludos.

IonLitio.

[HernanCano]

Russvell:

La solución la entiendo así. Mi pregunta es: ¿Cómo logras que en la misma hoja quepa? ¿Acaso defines un tamaño diferente (media carta)? ¿o detectas el tamaño de una "carta" y divides la altura por dos (por programa) para cambiar la altura del reporte y luego haces ésto de repetir el reporte dos veces?

Yo lo estoy haciendo con FoxyPreviewer y la prop .lRepeatInPage=.t., pero me interesa conocer una alternativa sin FoxyPreviewer.

Gracias.


El martes, 2 de julio de 2013 14:55:42 UTC-5, MALKASOFT ADPI: http://www.developervfp.blogspot.com/ escribió:

Hola yo hago algo muy simple

Select CursorReporte

REPORT FORM Tureporte TO PRINTER NOCONSOLE NODIALOG

REPORT FORM Tureporte TO PRINTER NOCONSOLE NODIALOG

de esa manera me da dos copias.....

Pd.: Descargate mi grilla que tiene multiples funciones como filtrar, multiseleccion, búsqueda, etc del siguiente link http://www.developervfp.blogspot.com/p/gridlibre-v35.html. Ahora también puedes bajarte mi ultima herramienta Busqueda Incremental con un TEXTBOX http://developervfp.blogspot.mx/p/busqueda-incremental-con-un-textbox.html  las herramientas viene con código fuente, ojo no hacer mal uso por favor. 

Saludos; 

Ing. Russvell Jesus Soto Gamarra 

[Luis la Romana]

Es que le estoy explicando al amigo cómo resolver su problema, pero no entiende aún siendo claro lo que escribo, sospecho que es él quien no puede leer.

[Víctor Hugo Espínola Domínguez]

Hola Luis la Romana

Me gustaría ver un ejemplo de reporte original/duplicado usando el método que describes.

Saludos,

Víctor.

[Luis la Romana]

Aqui os lo mando, la factura es media carta así que la hoja entera trae dos facturas con un corte al medio.

[ZeRoberto]

Hola Luis me podrías decir que tipo de letra es?

El 3 de julio de 2013 18:17, Luis la Romana <jose...@gmail.com> escribió:

Aqui os lo mando, la factura es media carta así que la hoja entera trae dos facturas con un corte al medio.

--
btnMyVideo.Click()

[Víctor Hugo Espínola Domínguez]

Hola Luis la Romana

Me refería a los .fr? ;-)

Saludos,

Víctor.

[HernanCano]

Víctor:
Yo le mando el mismo mensaje a luis, el romano.

[Víctor Hugo Espínola Domínguez]

Hola Hernán

La verdad es que me gustaría conocer su técnica, por eso de que cada día se aprende algo nuevo y compartir es lo que hace grande a este foro.

Saludos,

Víctor.

[Luis la Romana]

Sí claro, aquí les muestro el report form.

[elkin dario uribe torres]

Buenas tardes

Creo que funciona de 10 pero solo porque los datos ya estan establecidos y solo son esos no otros por lo tanto el tamaño del papel siempre se respeta, pero el compañero PETACA lo que pide es  'Hola a todos. Tengo un reporte donde imprimo una factura. Lo que quiero es saber como indicarle que me imprime 2 copias, en estos momentos lo tengo llamando 2 veces al reporte.  Estoy usando foxypreviewer.  Hay alguna manera de hacer esto ?. ' 

Creo que la factura como puede tener un item puede tener varios, de ahi la sugerencia del maestro LMG 'Personalmente duplico (triplico o el caso que fuera) los registros del cursor que tomará el informe y hago un corte de control por cada copia o texto de la copia (ORIGINAL, DUPLICADO, TRIPLICADO, ETC.' y para eso el reporte deberia ir asi como lo muestro en la imagen.  

 

Saludos

Elkin Uribe

[Víctor Hugo Espínola Domínguez]

Creo que nos estás tomando el pelo muy ortográficamente. ;-(

Lo que queremos ver es el frx de:

Aqui os lo mando, la factura es media carta así que la hoja entera trae dos facturas con un corte al medio.

Ejemplo-media-carta-dos-veces.pdf 10 kb   Ver   Descargar

Saludos,

Víctor.

[Ricardo Pina]

Creo que ese es otro precio, jaja

 

[HernanCano]

 

Víctor:

La respuesta ya te la había dado antes. Es ésta.

 

El martes, 2 de julio de 2013 18:20:33 UTC-5, HernanCano escribió:

Russvell:

La solución la entiendo así. Mi pregunta es: ¿Cómo logras que en la misma hoja quepa? ¿Acaso defines un tamaño diferente (media carta)? ¿o detectas el tamaño de una "carta" y divides la altura por dos (por programa) para cambiar la altura del reporte y luego haces ésto de repetir el reporte dos veces?

Yo lo estoy haciendo con FoxyPreviewer y la prop .lRepeatInPage=.t., pero me interesa conocer una alternativa sin FoxyPreviewer.

 

Gracias.

 

[HernanCano]

Bien, Luis. Así me lo imaginaba.

 

Mi duda es porque cuando quise hacer ésto, VFP me sacaba error diciendo que la banda de detalle era muy grande y no mostraba el reporte.

 

Volveré a intentar y les cuento.

 

El jueves, 4 de julio de 2013 14:56:04 UTC-5, Luis la Romana escribió:

Sí claro, aquí les muestro el report form.

<<imagen>>>

[Víctor Hugo Espínola Domínguez]

Hola Hernán

Si te fijas en este mismo hilo el 02-julio-13 le había contestado a Arnaldo:

=============================================================================================

Hola Arnaldo

>Lo que preguntaba es que es CORTE DE CONTROL en un reporte de VFP, utilizando justamente los REPORTES.

Copy/Paste de lo que te respondí:

-------------------------------------------------------------------------------------------------

Hola Arnaldo

>Que significa CORTE DE CONTROL ??? en un REPORTE ?

En el diseñador de reportes es "Data Grouping..." del menú "Report"

La frase "Corte de control" tiene su origen en , 

-------------------------------------------------------------------------------------------------

>Si tengo :
>Encabezado
>Detalle
>Pie de Pagina
>Pongo un CORTE DE CONTROL
>como volver a Encabezado, detalle, pie de Pagina en UNA MISMA HOJA.
>Se entiende ?????

Se puede hacer eso definiendo un formulario en el panel de control de impresoras, el formulario definido debe tener la mitad de alto del formulario físico.

La solución de Luis la Romana es para los casos en que el detalle consta de un solo registro, ejemplo: Recibo de dinero, recibo de liquidación de haberes, etc... Es un "truco",

La propuesta de Luís María es mejor.

Supongamos que quieres imprimir la liquidación de salarios en duplicado para cada empleado (varios registros para un empleado), entonces en el cursor o tabla temporal a ser usado(a) en el report tendrías un campo adicional que tenga el tipo de recibo "Original" o "Duplicado" a algún código que lo identifique; los datos obviamente ordenados por Empleado, TipoRecibo.

En el report:

Un primer "Group" por IdEmpleado con la opción "Group start on -> New page"

Segundo "Group" por TipoRecibo con la opción "Group start on -> New page" o "Group start on -> New line" dependiendo de si tienes un formulario especial definido o no.

 =============================================================================================

En otro hilo doy el enlace donde se muestran 2 soluciones, una usando la sugerencia de Luís María y otra usando reporte con detalle multibanda. Pueden descargar el ejemplo desde el siguiente enlace: http://www.mediafire.com/download/ed58lb3bbjc0t28/OrigDuplMB.rar

Saludos,

Víctor.

[Luis la Romana]

Me retiro del caso, no tiene sentido, mejor voy me voy a probar el Win8.1 asi que saludetes.

[Víctor Hugo Espínola Domínguez]

Que pena, me hubiera gustado aprender tu técnica :-(

Saludos,

Víctor.

[Fernando Rodriguez]

necesito ayuda  tengo una factura igual a la de la fotografia   y necesito  imprimirla  dos veces  a cada mitad  de la hoja  A4 , he hecho casi  todo lo que he visto en este foro  pero la primera factura  me sale bien  pero en la copia  los datos  detallados  de los articulos  me sale  solo una vez  y el  ultimo registro de la  factura original  ,  como podre  solucionar esto o como hago para que  me salga la copia  bien he revisado   de  todo  pero nada me funciona  adjunto una foto   para que vean mi caso , 

[Fernando Rodriguez]

oye  quisiera  que me ayudaras  para saber  como lo hiciste  porque  he intentado y  los datos  de la copia  no me los muestra todos  me queda  asi como esta imagen   que envio  en donde  los  datos  de la copia  solo me sale  uno  no se porque  he intentado de todo y no he podido  ojala puedas ayudarme 

[Viktor Velazquez]

yo lo logre de esta manera.. con algunos inconvenientes te paso el codigo.. sludos

---

Date: Tue, 4 Feb 2014 09:25:18 -0800
From: ferch...@gmail.com
To: publice...@googlegroups.com
Subject: Re: [vfp] Re: Imprimir 2 copias en reporte

[Víctor Hugo Espínola Domínguez]

Hola Fernando

Es imposible encontrar el error si no envías los fuentes. Puedes descargar ejemplos, usando 2 técnicas diferentes, desde el siguiente enlace: http://www.mediafire.com/download/ed58lb3bbjc0t28/OrigDuplMB.rar

Saludos,

Víctor.

Lambaré - Paraguay.

 

[MALKASOFT ADPI: http://www.developervfp.blogspot.com/]

Hola yo hago algo muy simple

Select CursorReporte

REPORT FORM Tureporte TO PRINTER NOCONSOLE NODIALOG

REPORT FORM Tureporte TO PRINTER NOCONSOLE NODIALOG

de esa manera me da dos copias.....

Pd.: Descargate mi grilla que tiene multiples funciones como filtrar, multiseleccion, búsqueda, etc del siguiente link http://www.developervfp.blogspot.com/p/gridlibre-v35.html. Ahora también puedes bajarte mi ultima herramienta Busqueda Incremental con un TEXTBOX http://developervfp.blogspot.mx/p/busqueda-incremental-con-un-textbox.html  las herramientas viene con código fuente, ojo no hacer mal uso por favor. 

Saludos; 

Ing. Russvell Jesus Soto Gamarra 

http://developervfp.blogspot.mx/

San Juan del Rio - Queretaro - Mexico 

Nextel.: 52*133750*16

rycjesusrj @ hotmail.com

https://www.youtube.com/watch?v=JI6OfgFBK_0 

https://www.youtube.com/watch?v=n--TBp7Or9g&feature=g-upl

[Antonio Domínguez]

buenas tardes, yo lo solucioné así, agregando un campo de copia y duplicado y asignado un grupo, pero ahora, mi problemas es que cuando son muchos registros se mueve mi hoja, me gustaría saber como hacerle para que imprima un cierto número de registro y cuando llegue al tope, que se vaya a otra página, estoy utilizando el vfp  6.00. saludos.