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>
Para:   "forum.help400" <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



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 [
mailto: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> 
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 )
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