NCEPLIBS-bufr
11.5.0
|
Copy a BUFR data subset. More...
Go to the source code of this file.
Functions/Subroutines | |
subroutine | copysb (LUNIN, LUNOT, IRET) |
This subroutine copies a BUFR data subset from one Fortran logical unit to another. More... | |
Copy a BUFR data subset.
Definition in file copysb.f.
subroutine copysb | ( | LUNIN, | |
LUNOT, | |||
IRET | |||
) |
This subroutine copies a BUFR data subset from one Fortran logical unit to another.
[in] | LUNIN | - integer: Fortran logical unit number for source BUFR file |
[in] | LUNOT | - integer: Fortran logical unit number for target BUFR file |
[out] | IRET | - integer: return code
|
Logical unit LUNIN should have already been opened for input operations via a previous call to subroutine openbf(), and a BUFR message should have already been read into internal arrays for LUNIN via a previous call to one of the message-reading subroutines.
Logical unit LUNOT should have already been opened for output operations via a previous call to subroutine openbf(), and a BUFR message should already be open for output within internal arrays via a previous call to one of the BUFRLIB message-writing subroutines.
The compression status of the data subset (i.e. compressed or uncompressed) will be preserved when copying from LUNIN to LUNOT.
If LUNOT < 0, then a data subset is read from the BUFR message in internal arrays for LUNIN but is not copied to the BUFR message in internal arrays for LUNOT. Otherwise, the DX BUFR Table information associated with each of the logical units LUNIN and LUNOT must contain identical definitions for the type of BUFR message containing the data subset to be copied from LUNIN to LUNOT.
Program history log:
Definition at line 65 of file copysb.f.
References bort(), cmpmsg(), cpyupd(), getlens(), iok2cpy(), mesgbc(), readsb(), status(), ufbcpy(), upb(), and writsb().
Referenced by icopysb().