VMS Help FORTRAN, Statements, ENTRY  *Conan The Librarian (sorry for the slow response - running on an old VAX)

  Designates an alternate entry point at which execution of a
  subprogram can commence.  You cannot use an ENTRY statement in a DO
  loop or a block IF construct.  Statement format:

     ENTRY nam[([p[,p]...])]

     nam  Is a symbolic name for the entry point.  The name
          must be unique among all global names in the program.
          In a function subprogram, the data type defined for
          or implied by the name and the data type of the
          function must be consistent within the following groups:

          Group 1: BYTE, INTEGER*1, INTEGER*2, INTEGER*4,
                   LOGICAL*1, LOGICAL*2, LOGICAL*4, REAL*4,
                   REAL*8, and COMPLEX*8
          Group 2: REAL*16 and COMPLEX*16
          Group 3: CHARACTER

          If the data type is character, the length of the entry
          point name must be the same as the function name or must
          be of passed length.

     p    Is a dummy argument or an alternate return argument
          (designated by an asterisk).  The arguments must agree in
          order, number, and type with the actual arguments of the
          statement invoking the entry point.  The arguments need
          not agree in name, order, number, or type with the
          dummy arguments in the SUBROUTINE or FUNCTION statement
          for the subprogram.  You must use only the dummy arguments
          defined in the ENTRY statement.

  The ENTRY statement is not executable and can appear within a
  function or subroutine program after the FUNCTION or SUBROUTINE
  statement.  Execution of a subprogram referred to by an entry name
  begins with the first executable statement after the ENTRY
  statement.