copybf.f File Reference

Copy an entire BUFR file. More...

Go to the source code of this file.

Functions/Subroutines
subroutine	copybf (LUNIN, LUNOT)
	This subroutine copies an entire BUFR file from one Fortran logical unit to another. More...

Detailed Description

Copy an entire BUFR file.

Definition in file copybf.f.

Function/Subroutine Documentation

subroutine copybf	(		LUNIN,
			LUNOT
	)

This subroutine copies an entire BUFR file from one Fortran logical unit to another.

Author

J. Woollen

Date

1994-01-06

Parameters

[in]	LUNIN	- integer: Fortran logical unit number for source BUFR file
[in]	LUNOT	- integer: Fortran logical unit number for target BUFR file

The logical unit numbers LUNIN and LUNOT must already be associated with actual filenames on the local system, typically via a Fortran "OPEN" statement.

Remarks

• This subroutine uses subroutine msgwrt() to copy each BUFR message from LUNIN to LUNOT; therefore, this subroutine can be used to create a copy of LUNIN where each corresponding message in LUNOT contains any or all of the updates described in the documentation for subroutine msgwrt().

Program history log:

• 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()
• 2000-09-19 J. Woollen – Maximum message length increased from 10,000 to 20,000 bytes
• 2004-08-09 J. Ator – Maximum message length increased from 20,000 to 50,000 bytes
• 2005-11-29 J. Ator – Use rdmsgw() and iupbs01()
• 2012-09-15 J. Woollen – Modified for C/I/O/BUFR interface; use status()
• 2014-12-10 J. Ator – Use modules instead of COMMON blocks

Definition at line 39 of file copybf.f.

References bort(), closbf(), iupbs01(), msgwrt(), openbf(), rdmsgw(), status(), and wrdlen().