Name:         GROPEN

Purpose:      open device for graphics

Category:     GRAPHICS

File:         pgplot.src

Author:       T.J. Pearson

Use:          see description below.

Description:

            INTEGER FUNCTION GROPEN (TYPE,DUMMY,FILE,IDENT)
            INTEGER   TYPE, DUMMY, IDENT
            CHARACTER*(*) FILE
      
       GRPCKG: assign a device and prepare for plotting.  GROPEN must be
       called before all other calls to GRPCKG routines.
      
       Returns:
      
       GROPEN (output, integer): 1 => success, any other value
             indicates a failure (usually the value returned will
             be a VMS error code). In the event of an error, a
             message will be sent to the standard error unit.
      
       Arguments:
      
       TYPE (input, integer): default device type (integer code).
       DUMMY (input, integer): not used at present.
       FILE (input, character): plot specifier, of form 'device/type'.
       IDENT (output, integer): plot identifier to be used in later
             calls to GRPCKG.
      
        1-Jun-1984 - [TJP].
        2-Jul-1984 - change to call GRSLCT [TJP].
       13-Jul-1984 - add device initialization [TJP].
       23-Jul-1984 - add /APPEND qualifier.
       19-Oct-1984 - add VV device [TJP].
       26-Dec-1984 - obtain default file name from common [TJP].
       29-Jan-1985 - add HP2648 device [KS/TJP].
        5-Aug-1986 - add GREXEC support [AFT].
       12-Oct-1986 - fix bug causing GREXEC to erase screen [AFT].
        3-Jun-1987 - remove declaration of exit handler [TJP].
       15-Dec-1988 - standardize [TJP].
       25-Jun-1989 - remove code that removes spaces from the device name 
                     [TJP].
       26-Nov-1990 - [TJP].
        5-Jan-1993 - [TJP].
        1-Sep-1994 - store device capabilities in common for later use [TJP].
       17-Apr-1995 - zero-length string fix [TJP].
        6-Jun-1995 - explicitly initialize GRSTAT [TJP].
       29-Apr-1996 - moved initialization into GRINIT [TJP].

Updates:      Oct 16, 1998: JPT automatically extracted from source.