NCEPLIBS-bufr
11.6.0
|
Update the status of a system file with respect to the BUFRLIB software. More...
Go to the source code of this file.
Functions/Subroutines | |
subroutine | wtstat (LUNIT, LUN, IL, IM) |
This subroutine can be used to connect or disconnect a specified Fortran logical unit number to/from the BUFRLIB software, and it can also be used to set or reset the internal message status associated with that logical unit number. More... | |
Update the status of a system file with respect to the BUFRLIB software.
Definition in file wtstat.f.
subroutine wtstat | ( | LUNIT, | |
LUN, | |||
IL, | |||
IM | |||
) |
This subroutine can be used to connect or disconnect a specified Fortran logical unit number to/from the BUFRLIB software, and it can also be used to set or reset the internal message status associated with that logical unit number.
[in] | LUNIT | – integer: Fortran logical unit number for BUFR file |
[in] | LUN | – integer: Internal I/O stream index associated with LUNIT |
[in] | IL | – integer: File status update option
|
[in] | IM | – integer: Message status update option, to indicate whether a message is now open within the internal arrays for LUNIT
|
Before this subroutine is called to connect any LUNIT to the software, a previous call should have been made to subroutine status() to confirm that internal space is available to connect the associated file, as well as to obtain an LUN value to use in connecting it. Once a file is connected, the corresponding LUNIT and LUN values remain linked to each other for as long as the file is connected to the software.
Program history log:
Date | Programmer | Comments |
---|---|---|
1994-01-06 | J. Woollen | Original author |
1998-07-08 | J. Woollen | Replaced call to Cray library routine ABORT with call to new internal routine bort() |
1999-11-18 | J. Woollen | The number of BUFR files which can be opened at one time increased from 10 to 32 |
2003-11-04 | J. Ator | Corrected a typo in test for IM validity; added documentation |
2003-11-04 | S. Bender | Added remarks and routine interdependencies |
2003-11-04 | D. Keyser | Unified/portable for WRF; added documentation; outputs more complete diagnostic info when routine terminates abnormally |
2014-12-10 | J. Ator | Use modules instead of COMMON blocks |
Definition at line 52 of file wtstat.f.
References bort().
Referenced by closbf(), closmg(), openbf(), openmb(), openmg(), rdmemm(), readerme(), readmg(), and rewnbf().