openbt.f File Reference

Specify DX BUFR table file of last resort. More...

Go to the source code of this file.

Functions/Subroutines
subroutine	openbt (LUNDX, MTYP)
	This subroutine is called as a last resort from within subroutine cktaba(), in the event the latter subroutine is unable to locate a DX BUFR table for use in reading/decoding a given BUFR message. More...

Detailed Description

Specify DX BUFR table file of last resort.

Definition in file openbt.f.

Function/Subroutine Documentation

subroutine openbt	(		LUNDX,
			MTYP
	)

This subroutine is called as a last resort from within subroutine cktaba(), in the event the latter subroutine is unable to locate a DX BUFR table for use in reading/decoding a given BUFR message.

Within the BUFRLIB distribution package, this subroutine is a default placeholder which always returns LUNDX = 0 and is only included to allow application programs to compile without generating a link error for an unresolved external reference. However, users are free to define their own inline version of this subroutine with the same name and calling sequence and include it within the compilation of their application program in order to override the default placeholder version of this subroutine. In such cases, subroutine cktaba() will then use the inline version of this subroutine as a last resort when attempting to locate the required DX BUFR table file.

Author

J. Woollen

Date

1998-07-08

Parameters

[in]	MTYP	– integer: Data category of BUFR message for which subroutine cktaba() was unable to locate a DX BUFR table file
[out]	LUNDX	– integer: Fortran logical unit number for file containing DX BUFR table information to be used in decoding message 0 = No such file is available

Remarks

• See DX BUFR Tables for more information about the format and contents of DX BUFR table files.

Program history log:

Date	Programmer	Comments
1998-07-08	J. Woollen	Original author
2009-04-21	J. Ator	Use errwrt()

Definition at line 41 of file openbt.f.

References errwrt().

Referenced by cktaba().