RE: OVRPRTF on QUHSDSPH

["York, Albert" <albert.york@xxxxxxxxxxxxxx>]

Simon,

Of course you're right. I guess I got focused on one solution and missed the
obvious. Thank you.

However, now I have another problem. When I try to override the QSYSPRT in
my program it doesn't go take effect. If I do the override before I call the
program it works fine.

Here is the code I am using:

*
  * Override printer features
  *
 C                   eval      OvrCmd =
 C                             'OVRPRTF FILE(QSYSPRT) PAGESIZE(66 80) '
 C                             + 'RPLUNPRT(*YES) SECURE(*YES)'
 C                   call      'QCMDEXC'
 C                   parm                    OvrCmd          256
 C                   parm      256           CmdLen           15 5
  *
  *********************
  *
  * Process API call.
  *
 C                   CALL      'QUHDSPH'

Any suggestions?

Thanks,

Albert


        -----Original Message-----
        From:   Simon Coulter [SMTP:shc@flybynight.com.au]
        Sent:   Monday, October 07, 2002 6:46 PM
        To:     midrange-l@midrange.com
        Subject:        Re: OVRPRTF on QUHSDSPH


        Hello Albert,

        You wrote:
        >I am trying to use a different printer file other than QSYSPRT for
the
        >QUHDSPH API which displays help text but I get an error message:
        >CPF9850 Override of printer file QSYSPRT not allowed.
        >Is there another way to do this? I want to control the page width
without
        >changing the QSYSPRT printer file in QSYS.

        Why not simply override the attributes of QSYSPRT rather than
pointing to a
        completely different file?  For example:

                OVRPRTF QSYSPRT PAGESIZE(x y *ROWCOL)

        Regards,
        Simon Coulter.
        --------------------------------------------------------------------
           FlyByNight Software         AS/400 Technical Specialists

           http://www.flybynight.com.au/
           Phone: +61 3 9419 0175   Mobile: +61 0411 091 400        /"\
           Fax:   +61 3 9419 0175   mailto: shc@flybynight.com.au   \ /
                                                                     X
                         ASCII Ribbon campaign against HTML E-Mail  / \
        --------------------------------------------------------------------

        _______________________________________________
        This is the Midrange Systems Technical Discussion (MIDRANGE-L)
mailing list
        To post a message email: MIDRANGE-L@midrange.com
        To subscribe, unsubscribe, or change list options,
        visit: http://lists.midrange.com/cgi-bin/listinfo/midrange-l
        or email: MIDRANGE-L-request@midrange.com
        Before posting, please take a moment to review the archives
        at http://archive.midrange.com/midrange-l.