HP 3000 Manuals HP 3000 Manuals
The FSET Procedure
The FSET procedure changes the MPE/iX operating system file number
assigned to a given FORTRAN 77 logical unit number.
The FSET procedure is called from an HP FORTRAN 77 program as follows:
CALL FSET(unit, newfile, oldfile)
----------------------------------------------------------------------------------------------
| | | |
| Item | Description/Default | Restrictions |
| | | |
----------------------------------------------------------------------------------------------
| | | |
| unit | Positive integer constant or variable | Must be nonnegative. |
| | (INTEGER*2 or INTEGER*4) that specifies the | |
| | file table entry for which the change is to be | |
| | made. | |
| | | |
----------------------------------------------------------------------------------------------
| | | |
| newfile | Positive integer constant or variable | None. |
| | (INTEGER*2 or INTEGER*4) that specifies the new | |
| | MPE/iX file number to be assigned to unit. | |
| | | |
----------------------------------------------------------------------------------------------
| | | |
| oldfile | Integer variable to which the procedure returns | None. |
| | the old value of the file number that was | |
| | assigned to unit. | |
| | | |
----------------------------------------------------------------------------------------------
Arguments to FSET may be INTEGER*2 or INTEGER*4, but all the arguments in
a given call must match in size.
Refer to the HP FORTRAN 77/iX Programmer's Guide for an example of using
the FSET procedure.