Output a standard page header
──────────────────────────────────────────────────────────────────────────────

 Syntax

        GT_PageHeader( cRepName, lPageReset, nLeftMgn, nRightMgn, ;
                       nPageWidth , nHeader , cSystemName , cUserName )

 Arguments:

      cRepName    - Report name
      lPageReset  - If .T., reset the page number count
      nLeftMgn    - Left margin of page
      nRightMgn   - Right margin of page
      nPageWidth  - Width of page
      nHeader     - Row on which to start header
      cSystemName - Name of system
      cUserName   - Name of user

 Returns:

      NIL

 Description:

      Outputs a double lined box structure containing the name of the
      system, report and user, the date and time, and the page number.

 Examples:



 Header File: GT_LIB.CH

 Source: PHEADER.PRG

 Author:  Martin Colloby