iok2cpy.f File Reference

Check whether a BUFR message or data subset can be copied from one BUFR file to another. More...

Go to the source code of this file.

Functions/Subroutines
INTEGER function	iok2cpy (LUI, LUO)
	This function determines whether a BUFR message, or a data subset from within a BUFR message, can be copied from one Fortran logical unit to another. More...

Detailed Description

Check whether a BUFR message or data subset can be copied from one BUFR file to another.

Definition in file iok2cpy.f.

Function/Subroutine Documentation

INTEGER function iok2cpy	(		LUI,
			LUO
	)

This function determines whether a BUFR message, or a data subset from within a BUFR message, can be copied from one Fortran logical unit to another.

The decision is based on whether both logical units contain identical definitions for the BUFR message type in question within their associated DX BUFR Table information. Note that it's possible for a BUFR message type to be identically defined for two different logical units even if the full set of associated DX BUFR table information isn't identical between both units.

Author

J. Ator

Date

2009-06-26

Parameters

[in]	LUI	- integer: Internal I/O stream index associated with source BUFR file
[in]	LUO	- integer: Internal I/O stream index associated with target BUFR file

Returns

iok2cpy - integer: Flag indicating whether a BUFR message or data subset can be copied from the BUFR file associated with LUI to the BUFR file associated with LUO

• 0 = No
• 1 = Yes

Program history log:

• 2009-06-26 J. Ator – Original author
• 2014-12-10 J. Ator – Use modules instead of COMMON blocks

Definition at line 35 of file iok2cpy.f.

References icmpdx(), and nemtbax().

Referenced by copymg(), copysb(), cpymem(), and ufbcpy().