Guess this maybe should be in the CL thread...oh well. I have a RPG report with a width of 80. I want it to print portrait but the printer is making it landscape and tiny print. I coded in the cl page rotation 90 and that made it big print but it is still landscape....how do I get it to print portrait? Any ideas?
Announcement
Collapse
No announcement yet.
RPG report
Collapse
X
-
Re: RPG report
if its only 80 in width then the printer should auto rotate.
else
PHP Code:~
c eval Cmdstring = 'OVRPRTF FILE(CST30AP) DEVTYPE('+
c '*AFPDS) CPI(12) PAGRTT(90) OUTQ(RPRT2005)'
c + ' OVRFLW(45)'
*
c eval cmdlength = %len(%trim(cmdstring))
c call(e) 'QCMDEXC'
c parm cmdstring
c parm cmdlength
*
c if not%open(CST30AP)
c open CST30AP
c endif
All my answers were extracted from the "Big Dummy's Guide to the As400"
and I take no responsibility for any of them.
www.code400.com
Comment