NCEPLIBS-bufr  12.0.0
wtstat.f File Reference

Update file status in library internals. More...

Go to the source code of this file.

Functions/Subroutines

subroutine wtstat (LUNIT, LUN, IL, IM)
 Update file status in library internals. More...
 

Detailed Description

Update file status in library internals.

Author
J. Woollen
Date
1994-01-06

Definition in file wtstat.f.

Function/Subroutine Documentation

◆ wtstat()

subroutine wtstat (   LUNIT,
  LUN,
  IL,
  IM 
)

Update file status in library internals.

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.

Note
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.
Parameters
[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
  • 0 Disconnect LUNIT from the software
  • 1 Connect LUNIT to the software for output operations (i.e. writing/encoding BUFR), if not already connected
  • -1 Connect LUNIT to the software for input operations (i.e. reading/decoding BUFR), if not already connected
[in]IM- integer: Message status update option, indicating whether a message is currently open within the internal arrays for LUNIT
  • 0 No
  • 1 Yes
Author
J. Woollen
Date
1994-01-06

Definition at line 36 of file wtstat.f.

References bort(), moda_stbfr::iolun, and moda_stbfr::iomsg.

Referenced by closbf(), closmg(), openbf(), openmb(), openmg(), rdmemm(), readerme(), readmg(), and rewnbf().