Al final, lo que he encontrado como solución necesita un par de pasos intermedios:

CRTPF FILE(QTEMP/TXT) RCDLEN(80) 
CPYF FROMFILE(archivo) TOFILE(QTEMP/TXT) MBROPT(*ADD) FMTOPT(*CVTSRC)        
CPYF FROMFILE(QTEMP/TXT  ) TOFILE(QPRINT )
DLTF 
QTEMP/TXT        

Lástima que no sirva hacer directamente:
CPYF FROMFILE(archivo) TOFILE(QPRINT) MBROPT(*ADD) FMTOPT(*CVTSRC)
No hace caso, y sigue copiando los números de secuencia...


Gracias otra vez, por vuestra ayuda
Jesus Busquets
Grespania, SA
                                                         

MRIERAB wrote:
Jesus:

Te sirve el siguiente mandato?:

CPYF FROMFILE(Biblioteca/Aarchivo_fuente) TOFILE(*PRINT)
    FROMMBR(Miembro)

Saludos

Marti Riera

----- Mensaje Original -----
De: Jesus Busquets <[EMAIL PROTECTED]>
Fecha: Jueves, Abril 22, 2004 4:51 pm
Asunto: Copia de un miembro fuente a impresora

  
Hola foro, una pregunta sencillita...

¿cuál sería la forma más sencilla de mandar a una impresora 
simplemente 
lo que tengo en un miembro fuente?
No quiero que me saque nada más que la impresión fiel de lo que 
tengo en 
el archivo fuente, quiero que lo haga un CL

(ya sé que puedo hacer un rpg sencillito para hacerlo, claro.. 
pregunto 
si hay algo más simple)

Un saludo
Jesus Busquets
Grespania, SA

_____________________________________________________
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________

Para darte de baja, envía el mensaje resultante de pulsar
mailto:[EMAIL PROTECTED]

    



_____________________________________________________
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________

Para darte de baja, envía el mensaje resultante de pulsar
mailto:[EMAIL PROTECTED]

  

Responder a