assign(3F)

NAME
     ASSIGN, ASNUNIT, ASNFILE, ASNRM - Provides library interface to assign
     processing

SYNOPSIS
     All systems:

     CALL ASNUNIT(iunit, astring, ier)

     CALL ASNFILE(fname, astring, ier)

     CALL ASNRM(ier)

     CALL ASSIGN(cmd ,ier)

     UNICOS and UNICOS/mk systems only:

     CALL ASSIGN(cmd)

IMPLEMENTATION
     UNICOS, UNICOS/mk and IRIX systems

DESCRIPTION
     This routine is supported on IRIX systems for programs compiled with
     the MIPSpro 7 Fortran 90 compiler or compiled with the -craylibs
     option to the MIPSpro F77 compiler.

     ASSIGN provides an interface to assign processing from Fortran.

     ASNUNIT and ASNFILE assign attributes to units and files,
     respectively.

     ASNRM removes all entries currently in the assign environment.

     When using the CF90 compiler or MIPSpro 7 Fortran 90 compiler on
     UNICOS, UNICOS/mk, or IRIX, all arguments must be of default kind
     unless documented otherwise.  On UNICOS and UNICOS/mk, default kind is
     KIND=8 for integer, real, complex, and logical arguments; on IRIX, the
     default kind is KIND=4.

     These routines have the following arguments:

     cmd       A Fortran character variable containing a complete assign(1)
               command in the format also acceptable to ISHELL(3F).  The -V
               option cannot be processed by the ASSIGN routine.

     ier       An integer variable that is assigned the exit status on
               return.  A 0 indicates normal return; >0 indicates a
               specific error status

     iunit     An integer variable or constant containing the unit number
               to which attributes are assigned.

     astring   A Fortran character variable containing any attribute
               options and option values that could be passed to assign(1).
               Control options -I, -O, and -R can also be passed.

     fname     A character variable or constant containing the file name to
               which attributes are assigned.

NOTES
     Users are encouraged to use the ASSIGN library routines rather than
     ISHELL('assign'), because ISHELL(3F) causes vfork(2), an exec(2) of
     sh(1), another fork(2), and another exec(2) of assign(1).

EXAMPLES
     Example 1:  The following is equivalent to assign -s unblocked f:file

          CALL ASSIGN('assign -s unblocked f:file' ,ier)

     Example 2:  The following has the same effect as assign -I -n 2 u:99

          INTEGER IUN
          IUN = 99
          CALL ASNUNIT(IUN,'-I -n 2',IER)

     Example 3:  The following is equivalent to executing assign -s tape
     u:1

          CALL ASNUNIT(1,' -s tape',IER)

SEE ALSO
     ASNCTL(3F), ASNQFILE(3F), ASNQUNIT(3F), ISHELL(3F)

     assign(1)

     Application Programmer's Library Reference Manual for the printed
     version of this man page.