Aquí tienes el ejemplo por si te sirve de ayuda:
100 /* COPIA ARCHIVO SPOOL A FICHERO Y VICEVERSA
*/ 20/12/04
101 /* HACIENDOLO DE ESTA MANERA en CTLCHAR(*FCFC)
*/ 20/12/04
700
04/06/02
800 PGM
04/06/02
801 CPYSPLF FILE(QPSUPRTF) TOFILE(MEINA) CTLCHAR(*FCFC)
20/12/04
805 /* *****************************************************************
*/ 20/12/04
806 /* Especifica que el primer Caracter de cada registro
*/ 20/12/04
807 /* contiene uno de los codigos de control de formularios
*/ 20/12/04
808 /* ANSI listados en el Manual CL REFERENCE.
*/ 20/12/04
810 /* *****************************************************************
*/ 20/12/04
811
20/12/04
812 /* LUEGO ANTES DE IMPRIMIR HACEMOS UN OVRPRTF CON CTLCHAR(*FCFC)
*/ 20/12/04
813
20/12/04
814 OVRPRTF FILE(QSYSPRT) CTLCHAR(*FCFC)
20/12/04
815
20/12/04
816 /* DESPUES HACIENDO UN CPYF DEL ARCHIVO YA LO TENEMOS
*/ 20/12/04
817
20/12/04
818 CPYF FROMFILE(MEINA) TOFILE(QSYSPRT) /* Va +
20/12/04
819 directamente a Spool */
20/12/04
820
20/12/04
821 DLTOVR FILE(*ALL)
20/12/04
822
20/12/04
900 ENDPGM
20/12/04
* * * * F I N D E F U E N T E * * * *
Saludos,
Paco Medina
DEPT. INFORMÁTICA
Exclusivas Camacho, S. Ltd.
CIF B29145240
Av. J. Ortega y Gasset, 301 (Pol. San Luis)
Málaga, España
Tel. +34 952 322 900
Fax +34 952 314 900
www.e-camacho.com
[email protected]
Antes de imprimir piensa si es necesario, piensa en el MEDIO AMBIENTE
Este mensaje se dirige exclusivamente a su destinatario y puede contener
información privilegiada o confidencial. Si no es vd. el destinatario
indicado, queda notificado de que la utilización, divulgación y/o copia sin
autorización está prohibida en virtud de la legislación vigente. Si ha
recibido este mensaje por error, le rogamos que nos lo comunique
inmediatamente por esta misma vía y proceda a su destrucción. Gracias.
Before printing thinks if necessary, think of ENVIRONMENT
This message is intended exclusively for its addressee and may contain
information that is CONFIDENTIAL and protected by professional privilege. If
you are not the intended recipient you are hereby notified that any
dissemination, copy or disclosure of this communication is strictly
prohibited by law. If this message has been received in error, please
immediately notify us via e-mail and delete it. Thank you.
_____
De: [email protected]
[mailto:[email protected]] En nombre de Nicolas
Machado
Enviado el: jueves, 25 de marzo de 2010 20:41
Para: [email protected]
Asunto: Re: Consulta QSYSPRT y Lisyado Continuado.
mhh todavia no.
Pero se me ocurrio otra cosa y no no recuerdo como hacerlo.
La idea es copiar todos los listados a un archivo PF , con *ADD y *PTRCTL
para no perder los caracters de control.
eso funciona.
Pero no recuerdo como pasarlo de nuevo al QSYSPRT, me parece que habia que
hacer un OVRPRTF y luego un CPYF ???
Alguien recuerda ?
Saludos
El 25/03/2010 02:45 p.m., Àlex Corretgé escribió:
has probado con la opción USROPN y abrirlo y cerrarlo en el programa
inicial?
Atentament / Kind Regards
Àlex Corretgé
Serveis Informàtics Corretgé.com SLU
Carrer de la Font, 2
17142 - Verges
Tel: +34 972 780 422
Cell: +34 669 86 92 64
http://corretge.cat/
skype: corretge_com
LinkedIn: http://www.linkedin.com/in/corretge
News: http://bloc.corretge.cat
2010/3/25 Nicolas Machado <[email protected]>
Buenas, queria consultarlos por este requerimiento.
Tengo un programa que recorre un archivo y segun la condicion llama a un
nuevo programa que entre otras cosas imprime un resporte usando hoja O y la
qsysprt.
Como el programa es llamado varias veces, el listado se repeti N veces.
Ahora quieren que todos las salidas a spool esten en el mismo archivo
QSYSPRT, y no en QSYSPRT separadas.
Se me ocurrio hacer un OPEN del QSYSPRT antes del ciclo que llama al
programa y hacer el CLOSE al finalizar.
Esa seria la solucion ?
desde ya muchas gracias
--
.::.
Nicolas Machado
Metodo Argentina S.A.
_____________________
Tel: 02262 527431
Necochea, Buenos Aires.
____________________________________________________
© Publicaciones Help400, S.L. - Todos los
derechos reservados http://www.help400.es
----------------------------------------------------
Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400
____________________________________________________
© Publicaciones Help400, S.L. - Todos los
derechos reservados http://www.help400.es
----------------------------------------------------
Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400
--
.::.
Nicolas Machado
Metodo Argentina S.A.
_____________________
Tel: 02262 527431
Necochea, Buenos Aires.
____________________________________________________
© Publicaciones Help400, S.L. - Todos los
derechos reservados http://www.help400.es
----------------------------------------------------
Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400
