stntbi.f File Reference

Go to the source code of this file.

Functions/Subroutines
subroutine	stntbi (N, LUN, NUMB, NEMO, CELSQ)
	THIS SUBROUTINE STORES A NEW ENTRY WITHIN INTERNAL BUFR TABLE B OR D, DEPENDING ON THE VALUE OF NUMB. More...

Detailed Description

Author

ATOR

Date

2009-03-23

Definition in file stntbi.f.

Function/Subroutine Documentation

stntbi()

subroutine stntbi	(		N,
			LUN,
		character*(*)	NUMB,
		character*(*)	NEMO,
		character*(*)	CELSQ
	)

THIS SUBROUTINE STORES A NEW ENTRY WITHIN INTERNAL BUFR TABLE B OR D, DEPENDING ON THE VALUE OF NUMB.

PROGRAM HISTORY LOG: 2009-03-23 J. ATOR – ORIGINAL AUTHOR 2014-12-10 J. ATOR – USE MODULES INSTEAD OF COMMON BLOCKS

USAGE: CALL STNTBI ( N, LUN, NUMB, NEMO, CELSQ ) INPUT ARGUMENT LIST: N - INTEGER: STORAGE INDEX INTO INTERNAL TABLE B OR D LUN - INTEGER: I/O STREAM INDEX INTO INTERNAL TABLE B OR D NUMB - CHARACTER*6: FXY NUMBER FOR NEW TABLE B OR D ENTRY (IN FORMAT FXXYYY) NEMO - CHARACTER*8: MNEMONIC CORRESPONDING TO NUMB CELSQ - CHARACTER*55: ELEMENT OR SEQUENCE DESCRIPTION CORRESPONDING TO NUMB

REMARKS: THIS ROUTINE CALLS: IFXY NENUBD THIS ROUTINE IS CALLED BY: RDUSDX STSEQ Not normally called by application programs.

Definition at line 27 of file stntbi.f.

References moda_tababd::idnb, moda_tababd::idnd, ifxy(), nenubd(), moda_tababd::ntbb, moda_tababd::ntbd, moda_tababd::tabb, and moda_tababd::tabd.

Referenced by rdusdx().