getabdb.f File Reference

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...

Detailed Description

Author

ATOR

Date

2005-11-29

Definition in file getabdb.f.

Function/Subroutine Documentation

getabdb()

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.

Definition at line 28 of file getabdb.f.

References nemtbd(), moda_tababd::ntbb, moda_tababd::ntbd, status(), moda_tababd::tabb, and moda_tababd::tabd.