I am attempting to eliminate several pre-printed forms by using AFPDS, however I am running into a problem printing images. I first encountered the problem in trying to shade boxes. After
research revealed that box shading is actually an image, I tried adding our company logo, confirming that I am unable to print images using AFPDS.
A R PRINT
A PAGSEG(MYLIB/PSEGMENT +
A 4 4 +
A (*SIZE 3.0 1.0))
A BOX(1 1 1.5 2 0.01 +
A (*SHADE 20 (*COLOR BLK)))
A BOX(2 1 2.5 2 0.01 +
A (*SHADE 40 (*COLOR BLK)))
A BOX(3 1 3.5 2 0.01 +
A (*SHADE 60 (*COLOR BLK)))
A BOX(4 1 4.5 2 0.01 +
A (*SHADE 80 (*COLOR BLK)))
A BOX(5 1 5.5 2 0.01 +
A (*SHADE 100 (*COLOR BLK)))
The printer file is compiled with DEVTYPE(*AFPDS)
The assoicated RPGLE is just as simple at this point
FPTESTP O E PRINTER
C WRITE PRINT
C EVAL *INLR = '1'
Printing the output produces several boxes, but no shading and no logo.
Assuming this is mostly likey a configuration issue, I have tried several variations of two printer configurations to solve my problem
First I attempted using a remote output queue.
Next I tried using a real printer defintion.
My printer is an HP LaserJet 5SI with a JetDirect card
My iSeries is a model 170 w/V5R2. I have also tried this on a model 810 w/V5R2
Since there are many posslible failure points in using a page segment to print a logo, I would be happy with help in identifing the correct printer configuraion for getting my boxes shaded.
October 9, 2008 5:41 PM
May 29, 2012 1:55 PM