Hola Alberto,

ahora no lo tengo muy fresco, pero si no recuerdo mal en  (&OVLNM2 6.9 2.5),
 los desplazamientos también pueden ser variables, tipo  (&OVLNM2 &HORI
&VERT)

El 31 de enero de 2018, 8:48, alberto <alberto.marti...@roler.es> escribió:

> Buenos dias.
> Con este tema de los preformatos, se me ha refrescado la memoria...supongo
> que os ha pasado a muchos, que enviando un preformato a una impresora, os
> sale de una manera, y enviándolo a un fichero PDF se os descuadra(y
> viceversa).
> Esta tambien podría ser la solución. Tener un preformato para impresora y
> otro para PDF y cambiarlo dinámicamente.
> Por otra parte, Javier, estoy diseñando PRTF siguiendo tu idea. Sólo una
> cosa, en (&OVLNM2 6.9 2.5) en 6.9 y 2.5 supongo que pasas los parámetros
> de desplazamiento. Tambien supongo que si los dos preformatos tienen los
> mismos tamaños, esto va a 0, no?
> Gracias!! y gracias a todos los que me respondísteis.
>
>
>
> De:        "Javier Mora" <jm...@musgrave.es>
> Para:        "forum.help400" <forum.help400@listas.combios.es>
> Fecha:        24/01/2018 14:06
> Asunto:        ** Newsletter ** RE: ** Newsletter ** RE: Duda copias en
> preformatos
> Enviado por:        forum.help400-boun...@listas.combios.es
> ------------------------------
>
>
>
> Te pongo un pequeño ejemplo de la DDS de archivo de impresora:
>
>      A          R OVL1
>      A                                      OVERLAY(&OVLNM2 6.9 2.5)
>      A            OVLNM2         8A  P
>
> Y en el programa cambias el valor de la variable en función del preformato
> a imprimir
>
> OVLNM2 = ‘PREFORM01’;
> WRITE OVL1;
> WRITE OTRO_REG;
>
> OVLNM2 = ‘PREFORM02’;
> WRITE OVL1;
> WRITE OTRO_REG;
>
> Normalmente la palabra clave OVERLAY debe ir en un registro a parte, que
> suele “escribirse” antes que el contenido variable del documento.
>
> Javier
>
>
> *De:* forum.help400-boun...@listas.combios.es [
> mailto:forum.help400-boun...@listas.combios.es
> <forum.help400-boun...@listas.combios.es>] *En nombre de *alberto
> * Enviado el:* miércoles, 24 de enero de 2018 10:45
> * Para:* forum.help400
> * Asunto:* Re: ** Newsletter ** RE: Duda copias en preformatos
>
> Caray. Esto pinta bien. Evidentemente no lo he hecho nunca.
> Interpreto que es un registro vacio, sólo con esta variable?
> Descrito en el fichero al principio al final?, le da lo mismo?
> Interpreto que el orden de escritura sería algo así:
> Overlay=1;
>   Exsr Sr_albaran;
> Overlay=2;
>   Exsr Sr_albaran;
>
> Begsr Sr_albaran;
>   Write reg_overlay
>   write cabecera
>   dow not %eof
>        Write lineas
>    Enddo
>   write total
> Endsr;
>
>
>
>
> De:        "Javier Mora" <*jm...@musgrave.es* <jm...@musgrave.es>>
> Para:        "forum.help400" <*forum.help400@listas.combios.es*
> <forum.help400@listas.combios.es>>
> Fecha:        24/01/2018 10:34
> Asunto:        ** Newsletter ** RE: Duda copias en preformatos
> Enviado por:        *forum.help400-boun...@listas.combios.es*
> <forum.help400-boun...@listas.combios.es>
> ------------------------------
>
>
>
>
> Otra opción consiste en incluir en el PRTF un registro con OVERLAY y
> parametrizarlo con una “variable a programa” y cargar el nombre de un
> preformato u otro.
>
> Javier Mora
>
> * De:* *forum.help400-boun...@listas.combios.es*
> <forum.help400-boun...@listas.combios.es> [
> *mailto:forum.help400-boun...@listas.combios.es*
> <forum.help400-boun...@listas.combios.es>] *En nombre de *Fernando
> Sánchez Piña
> * Enviado el:* miércoles, 24 de enero de 2018 9:25
> * Para:* forum.help400
> * Asunto:* Re: Duda copias en preformatos
>
> Buenos días,
>
> De esa manera te genera dos impresos.
> Yo suelo hacer un sólo preformato sin el texto y luego se lo añado en el
> PRTF como una variable de texto más, de esta forma se genera un único
> impreso y quedan identificadas cada hoja con Original y Copia. Además se
> puede ver antes de imprimirlo en el mismo spool del as400.
>
> Un saludo
>
> Fernando Sánchez Piña
>
> El 24 de enero de 2018, 9:17, alberto <*alberto.marti...@roler.es*
> <alberto.marti...@roler.es>> escribió:
> Buenos dias.
> Para los que hacéis preformatos, a ver si me podéis confirmar una cosa. Lo
> digo porque igual tiro para el camino más largo, y luego resulta que hay un
> atajo:
> Tengo que hacer una impresión con original + copia en la que en la primera
> página ponga 'original' y en la segunda ponga 'copia'
> Yo he pensado en hacer dos preformatos(uno para cada hoja) y dos rutinas
> de impresión, evidentemente antes de ejecutar cada una de ellas, hago un
> ovrprtf del printerfile y le asigno un preformato.
>
> -Llenar fichero
> ovrprtf file(printerfile) FRONTOVL(&libl/PREFORMato1)
> Ejecutar rutina printer
> ovrprtf file(printerfile) FRONTOVL(&libl/PREFORMato2)
> Ejecutar rutina printer
>
> Alguien lo ha hecho de un sólo paso?
> Gracias!
>
> ____________________________________________________
> Únete a Recursos AS400, nuestra Comunidad ( *http://bit.ly/db68dd*
> <http://bit.ly/db68dd> )
> Forum.Help400 © Publicaciones Help400, S.L.
> ____________________________________________________
> Únete a Recursos AS400, nuestra Comunidad ( *http://bit.ly/db68dd*
> <http://bit.ly/db68dd> )
> Forum.Help400 © Publicaciones Help400, S.L. ______________________________
> ______________________
> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
> Forum.Help400 © Publicaciones Help400, S.L.
>
> ____________________________________________________
> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
> Forum.Help400 © Publicaciones Help400, S.L.
>
____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Responder a