Printing on legal size with printer-init

[Erin Sokul <eksokul@UMICH.EDU>]

I am attempting to print a report on legal size paper (8.5X14) using the
printer-init command.  We are using an HP laserjet printer.  The program will
not allow me to use declare-layout to set the page size.  The following code was
inserted into the program, but did not allow the legal size printing.  any help
would be greatly appreciated.


#ifndef MVS
#ifndef OS400
  printer-init <27>E<27>&l0L
                   !--> Perforation Skip
  !             --> Reset
 #else
  printer-init <39>E<39>&l0L
#endif
#else
  printer-init <39>E<39>&l0L
#endif

  declare procedure
   before-report = Init-Page-Size

  page-size 85 168

printer-init <27>E<27>(0N<27>&l0O<27>&l3A<27>&l8D<27>&l88F<27>(s16.66H<27>&k2G

page-size 85 168


Thanks
Erin