ireadmg.f File Reference

Read the next message from a BUFR file that was previously opened for reading. More...

Go to the source code of this file.

Functions/Subroutines
function	ireadmg (LUNIT, SUBSET, IDATE)
	This function calls BUFRLIB subroutine readmg() and passes back its return code as the function value. More...

Detailed Description

Read the next message from a BUFR file that was previously opened for reading.

Definition in file ireadmg.f.

Function/Subroutine Documentation

function ireadmg	(		LUNIT,
		character*8	SUBSET,
			IDATE
	)

This function calls BUFRLIB subroutine readmg() and passes back its return code as the function value.

Author

J. Woollen

Date

1994-01-06

Parameters

[in]	LUNIT	- integer: Fortran logical unit number for BUFR file
[out]	SUBSET	- character*8: Table A mnemonic for type of BUFR message that was read (see DX BUFR Tables for further information about Table A mnemonics)
[out]	IDATE	- integer: date-time stored within Section 1 of BUFR message that was read, in format of either YYMMDDHH or YYYYMMDDHH, depending on the most recent call to subroutine datelen()

Returns

ireadmg - integer:

• 0 = new BUFR message was successfully read into internal arrays
• -1 = there are no more BUFR messages in the file connected to logical unit LUNIT

Remarks

• The use of this function allows the return code from readmg() to be used as the target variable within an iterative program loop.

Program history log:

• 1994-01-06 J. Woollen – Original author
• 1999-11-18 J. Woollen – Added new function entry points ireadmm and ireadibm
• 2002-05-14 J. Woollen – Removed entry points icopysb, ireadft, ireadibm, ireadmm, ireadns and ireadsb (they became separate routines in the BUFRLIB to increase portability to other platforms)
• 2003-11-04 S. Bender – Added remarks and routine interdependencies
• 2003-11-04 D. Keyser – Unified/portable for WRF; added history documentation

Definition at line 43 of file ireadmg.f.

References readmg().

Referenced by bufr_c_interface_mod::ireadmg_c(), split_by_subset(), and ufbtab().