NCEPLIBS-bufr  12.0.1
wrdxtb.f File Reference

Write DX BUFR tables messages to a BUFR file. More...

Go to the source code of this file.

Functions/Subroutines

recursive subroutine wrdxtb (LUNDX, LUNOT)
 This subroutine generates one or more BUFR messages from the DX BUFR tables information associated with a given BUFR file, and it then writes the messages out to the same or possibly a different BUFR file. More...
 

Detailed Description

Write DX BUFR tables messages to a BUFR file.

Author
J. Ator
Date
2009-03-23

Definition in file wrdxtb.f.

Function/Subroutine Documentation

◆ wrdxtb()

recursive subroutine wrdxtb (   LUNDX,
  LUNOT 
)

This subroutine generates one or more BUFR messages from the DX BUFR tables information associated with a given BUFR file, and it then writes the messages out to the same or possibly a different BUFR file.

Logical units LUNDX and LUNOT should have already been opened via previous calls to subroutine openbf(), and in particular logical unit LUNOT must have been opened for output operations. LUNDX and LUNOT may be the same if it is desired to append to LUNOT with DX BUFR messages generated from its own internal tables.

Parameters
[in]LUNDX- integer: Fortran logical unit number associated with DX BUFR table information to be written out.
[in]LUNOT- integer: Fortran logical unit number of BUFR file to which messages are to be written.
Author
J. Ator
Date
2009-03-23

Definition at line 25 of file wrdxtb.f.

References adn30(), bort(), cpbfdx(), dxmini(), getlens(), modv_im8b::im8b, iupb(), iupm(), moda_mgwa::mgwa, msgfull(), msgwrt(), moda_tababd::ntba, moda_tababd::ntbb, moda_tababd::ntbd, pkb(), pkc(), status(), moda_tababd::taba, moda_tababd::tabb, moda_tababd::tabd, and x84().

Referenced by makestab(), and writdx().