FUNCTION SL_PAGESIZE()

  Short:
  ------
  SL_PAGESIZE() Sets the page size on the laserjet

  Returns:
  --------
  cCode => control string to send to the printer

  Syntax:
  -------
  SL_PAGESIZE(nSize)

  Description:
  ------------
  Sets the page size on the laserjet where <nSize> is
  one of the following:

       1 Executive          (7.25" x 10.5")
       2 Letter                 (8.5" x 11")
       3 Legal                  (8.5" x 14")
      26 A4                     (210mm x 297mm)
      80 Monarch Envelope   (3 7/8" x 7 1/2")
      90 COM-10 Envelope    (4 1/8" x 8 1/2")
      91 International C5   (162mm  x 229mm)

  Examples:
  ---------
   cCode := SL_PAGESIZE(2)  // letter size
   ?cCode
   cCode := SL_PAGESIZE(3)  // legal  size
   ?cCode
   cCode := SL_PAGESIZE(26)  // A4 size
   ?cCode

  Notes:
  -------
  Does not send anything to the printer - instead
  returns a control string that you send to the printer. String can be
  sent with ? or ?? or  QOUT() or QQOUT().

  For HP and compatible(PCL) Laserjet printers.

  Source:
  -------
  S_HPLAS.PRG