Re: AFPRSC

Hi Antonio the code looks ok.

What I remember about this keyword is that scaling is not supported for all
image types.

This is a working example (no scaling):

R PRTJPG
AFPRSC(&PRTNAME &PRTAFPTIPO &PRTV -
&PRTH (*ROTATION &PRTAFPROTA) -
(*PATH &PRTPATH))
PRTV 5S 3P
PRTH 5S 3P
PRTNAME 250A P
PRTPATH 250A P
PRTAFPTIPO 10A P
PRTAFPROTA 3S 0P

Creation command:

CRTPRTF
FILE(MUOBJ/MUAF200P)
SRCFILE(MUSRC/QDDSSRC)
DEVTYPE(*AFPDS)
PAGESIZE(29,7 21 *UOM)
FNTCHRSET(*LIBL/C0H20000 *LIBL/T1001144 10)
PAGRTT(0)
UOM(*CM)
MAXRCDS(999999)
USRDTA('Afpds')


Another possible problem is with Ifs auth.

How do you print the spool? Using a phisical printer or via Pdf?

Another warning about this keyword: if you include 1.000 times the same
image the resulting Pdf size will be as if there are 1.000 diffrent images.
If you include 1.000 times the same Overaly the resulting Pdf's size will
be smaller. This was true until 2016 using V7R2 and Ibm said it was working
as designed.

HTH

--
Marco Facchinetti

Mr S.r.l.

Tel. 035 962885
Cel. 393 9620498

Skype: facchinettimarco


Il giorno mer 28 nov 2018 alle ore 18:57 Antonio Rosa <arosa@xxxxxxxxxxxxx>
ha scritto:

Hi All.



I am trying to use AFPRSC to print a JPG image with no success and have run
out of ideas. Can anybody help. This is on V7.2



The printer file is very simple:



A R FM000I


A AFPRSC('01-05-1001.jpg' *JFIF +


A 4 4 (*PATH '/home/Imagens')
+


A (*MAPOPT *SL) +


A (*SIZE 2 2))


A R FM000L


10 10'Test text print'




The printer file is compiled as *AFPDS and UOM=*INCH



The RPG program:



FWHM050Mno O E PRINTER OFLIND(*IN31)



write fm000i;

write fm000l;



*inlr=*on;



The spool file is created and AFP attributes are flagged as YES.



The file is in the directory below and has the same size as the original
file in the server that it was copied from.



Directório . . . . : /home/Imagens



Opç Ligação de objecto Tipo

01-05-1001.jpg STMF





Atributes:

CCSID - 1252



Cps.



Antonio Rosa



e-mail: <mailto:msousa@xxxxxxxxxxxxx> arosa@xxxxxxxxxxxxx

tlm. +351 918809439

CISTERSIS

sistemas de informação



www.cistersis.com





---
Este e-mail foi verificado em termos de vírus pelo software antivírus
Avast.
https://www.avast.com/antivirus
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com