NCEPLIBS-bufr
11.6.0
|
Go to the source code of this file.
Functions/Subroutines | |
subroutine | getabdb (LUNIT, TABDB, ITAB, JTAB) |
THIS SUBROUTINE RETURNS INTERNAL TABLE B AND TABLE D INFORMATION FOR LOGICAL UNIT LUNIT IN A PRE-DEFINED ASCII FORMAT. More... | |
Definition in file getabdb.f.
subroutine getabdb | ( | LUNIT, | |
character*128, dimension(*) | TABDB, | ||
ITAB, | |||
JTAB | |||
) |
THIS SUBROUTINE RETURNS INTERNAL TABLE B AND TABLE D INFORMATION FOR LOGICAL UNIT LUNIT IN A PRE-DEFINED ASCII FORMAT.
PROGRAM HISTORY LOG: 2005-11-29 J. ATOR – ADDED TO BUFR ARCHIVE LIBRARY (WAS IN-LINED IN PROGRAM NAMSND) 2014-12-10 J. ATOR – USE MODULES INSTEAD OF COMMON BLOCKS
USAGE: CALL GETABDB( LUNIT, TABDB, ITAB, JTAB ) INPUT ARGUMENT LIST: LUNIT - INTEGER: FORTRAN LOGICAL UNIT NUMBER FOR BUFR FILE ITAB - INTEGER: DIMENSIONED SIZE OF TABDB ARRAY
OUTPUT ARGUMENT LIST: TABDB - CHARACTER*128: (JTAB)-WORD ARRAY OF INTERNAL TABLE B AND TABLE D INFORMATION JTAB - INTEGER: NUMBER OF ENTRIES STORED WITHIN TABDB
REMARKS: THIS ROUTINE CALLS: NEMTBD STATUS THIS ROUTINE IS CALLED BY: None Normally called only by application programs.