Pregunta: | 48589 - IMPRESIóN DE DOS REPORTES EN LA MISMA PAGINA EN VFP 5.0 |
Autor: | Pablo Ramos |
Utilizando VFP Versión 5.0 con windows XP tengo dos reportes que necesito se impriman uno detrás de otro en la misma página ya que conforman un modelo obligatorio. Ocurre que al concluir el primer reporte la impresora ejecta la página por lo que el otro reporte sale en la página siguiente. He tratado de eliminar el eject haciendo set eject off y cambiando la variable _Peject pero no he podido lograr lo que deseo. Ambos reportes fueron realizado con el Generador de Reporte de VFP 5.0. Agradecería mucho si alguien pudiera darme una idea de que hacer. |
Respuesta: | Enrique Rdz Vega |
Si tus reportes ocupan la mitad de la hoja cada uno, loque puedes haser para que la impresora no saque la hoja por completo es definir el tamaño de papel al primer reporte asi no sacara toda la hoja y elsegundo reporte defines el tamaño del papel equivalente al restante del primer reporte, espero y ser claro, el problema es que tengo el mismo problema no puedo definir el tamaño del papel,
puedes hacer un sys(1037) antes de " Repor form ----- to print " eso funciona,espero te ayude en algo . |
Respuesta: | Ignacio Santillanes |
Hola, pablo :
1 opcion (IMPRESORA LASER-INYECCION)- lo que yo haria guardaria los datos a imprimir en una tabla tmp del 1er rep. en la 1er file de tu tabla con los campos a reemplazar resultado de la 1era seleccion y los del 2do rep. en fila 2 , para posteriormente acomodar los datos en el detalle del reporte a imprimir ya definiendo el tamano de la hoja a carta. 2 opcion (IMPRESORA DE MATRIZ)-Mandarlo directamente a la impresora con ??? como en DOS donde vas imprimiendo linea por linea lo que necesites imprimir al puerto LPT1(Set printer to LPT1) ya definiendo anteriormente una impresora tipo Generic- Text (TXT). ej. SET PRINTER TO NAME "txt" SET DEVICE TO printer ???SPACE(0)+"1-primer linea a imprimir +CHR(10) ???CHR(13) ???SPACE(0)+"2-segunda linea "+CHR(10) ???CHR(13) ???space(0)+"n numero de lina que necesites "+CHR(10) ???CHR(13) SET PRINTER TO LPT1 SET PRINTER off SET PRINTER to SET DEVICE TO screen *aqui ya estan enviados los datos a la imp. conectada al puertop LPT1 Saludos de Tijuana Mexico. |