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.
