ASSIGN(3F) Last changed: 2-24-98
ASSIGN, ASNUNIT, ASNFILE, ASNRM - Provides library interface to assign
processing
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)
UNICOS, UNICOS/mk and IRIX systems
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 7.2 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.
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).
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)
ASNCTL(3F), ASNQFILE(3F), ASNQUNIT(3F), ISHELL(3F)
assign(1)
Application Programmer's Library Reference Manual, publication
SR-2165, for the printed version of this man page.
ASSIGN(3F) Last changed: 2-24-98
ASSIGN, ASNUNIT, ASNFILE, ASNRM - Provides library interface to assign
processing
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)
UNICOS, UNICOS/mk and IRIX systems
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 7.2 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.
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).
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)
ASNCTL(3F), ASNQFILE(3F), ASNQUNIT(3F), ISHELL(3F)
assign(1)
Application Programmer's Library Reference Manual, publication
SR-2165, for the printed version of this man page.
[ Back ]
|
