NCEPLIBS-bufr
12.0.1
|
Get Table B and Table D information from the internal DX BUFR tables. More...
Go to the source code of this file.
Functions/Subroutines | |
recursive subroutine | getabdb (LUNIT, TABDB, ITAB, JTAB) |
This subroutine reads Table B and Table D information from the internal DX BUFR tables for a specified Fortran logical unit, then returns this information in a pre-defined ASCII format. More... | |
Get Table B and Table D information from the internal DX BUFR tables.
Definition in file getabdb.f.
recursive subroutine getabdb | ( | LUNIT, | |
character*128, dimension(*) | TABDB, | ||
ITAB, | |||
JTAB | |||
) |
This subroutine reads Table B and Table D information from the internal DX BUFR tables for a specified Fortran logical unit, then returns this information in a pre-defined ASCII format.
[in] | LUNIT | – integer: Fortran logical unit number for BUFR file |
[in] | ITAB | – integer: Dimensioned size of TABDB array; used by the subroutine to ensure that it doesn't overflow the TABDB array |
[out] | TABDB | – character*128(*): Internal Table B and Table D information |
[out] | JTAB | – integer: Number of entries stored within TABDB |
Definition at line 19 of file getabdb.f.
References modv_im8b::im8b, moda_nmikrp::irp, moda_nmikrp::krp, moda_nmikrp::nem, nemtbd(), moda_tababd::ntbb, moda_tababd::ntbd, status(), moda_tababd::tabb, moda_tababd::tabd, x48(), and x84().