The GLOBAL attribute provides a strong definition of a  variable
  or  routine so that other independently compiled units can refer
  to it.

  Syntax:

     [GLOBAL]

  or,

     [GLOBAL(idenifier)]

  or,

     [GLOBAL('string-literal')]

  The 'identifier' is the name of the  identifier  passed  to  the
  linker.   It  is passed in uppercase on OpenVMS systems.  If you
  omit the identifier, the name of the variable is used.

  The 'string-literal' is  a  specified  string  literal  that  is
  passed unmodified to the linker.

  See the "HP Pascal Language Reference Manual" for  the  complete
  description of using the GLOBAL attribute.