La palabra clave AFPRSC no está soportada por HPT. Al imprimir el spool sobre
una impresora PCL el sistema ignora AFPRSC. Sólo podrás ver la imagen si
generar un PDF con InfoPrint Server o con los "Transform Services (5761TS1)",
disponible sin cargo a partir de la V6R1.
Javier
________________________________
De: [email protected]
[mailto:[email protected]] En nombre de LLuís Segura
Enviado el: jueves, 20 de marzo de 2014 10:36
Para: forum.help400
Asunto: RE: INSERTAR IMAGENES EN UN PRINTER
Buenos días Fernando,
Estaba probando con un pequeño programa la función AFPRSC que
desconocía y no me acaba de funcionar, me genera un fichero de spool, pero
vacío.
¿Primero, como tienes definido el fichero de impresión? Entiendo que el
programa lo tienes en Cobol, supongo que como FORMATFILE sin más.
¿Los ficheros supongo que pueden estar en cualquier carpeta del IFS, o
bien tienen que estar en la carpeta AFPRESOURCES que nos propones en el
ejemplo?
¿Las imágenes tienen que tener un formato especial o son JPG normales y
corrientes?
Gracias por el ejemplo y por tu tiempo.
Saludos
Lluís.
De: [email protected]
[mailto:[email protected]] En nombre de Fernando Idem
Enviado el: dilluns, 17 de març de 2014 15:47
Para: informatica; forum.help400
Asunto: Re: INSERTAR IMAGENES EN UN PRINTER
Buenas;
Yo tengo esto que lo utilizamos una vez, tenia unas imágenes de los
artículos en la carpeta IFS.
Y los iba cargando dependiendo del articulo.
En la DDS del fichero de impresion generamos un registro;
A*%%**************************************************************
A R JPGDIR
A*%%**************************************************************
A*%%RI 00000
A*%%**************************************************************
A** &FILEJPG - Nombre de la imagen
A** &POSD - Posicionamiento Vertical (Desde margen superior)
A** &POSA - Posicionamiento Horizontal (Desde margen Izquierdo)
A*****************************************************************
A AFPRSC(&FILEJPG *JFIF +
A &POSD &POSA +
A (*SIZE &ANCHO &ALTO) +
A (*PATH &PATHIN) +
A (*MAPOPT *ST))
A FILEJPG 10A P
A POSD 5S 3P
A POSA 5S 3P
A ANCHO 5S 3P
A ALTO 5S 3P
A PATHIN 500A P
A******************************************************************
Y en programa
MOVE 5,5 TO POSA
MOVE 5,20 TO POSD
MOVE "ARTI.JPG" TO FILEJPG
MOVE 2,00 TO ANCHO
MOVE 1,50 TO ALTO
MOVE "\\Qibm\UserData\OS400\AFPresources
<file:///\\Qibm\UserData\OS400\AFPresources> "
TO PATHIN.
WRITE R-REGISTRO FROM JPGDIR FORMAT "JPGDIR".
No se si esto es lo que necesitas.
Un saludo
El 11 de marzo de 2014, 9:39, informatica <[email protected]>
escribió:
Buenos días-
Necesito insertar la imagen del artículo en un documento
generado en el iseries (V7r1m0). Las imágenes están en una carpeta del ifs.
Alguien sabe como??? o donde buscar información??
Muy agradecido
____________________________________________________
Ú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.
