NCEPLIBS-bufr
11.6.0
|
Read the tank receipt time from Section 1 of a BUFR message. More...
Go to the source code of this file.
Functions/Subroutines | |
subroutine | rtrcpt (LUNIT, IYR, IMO, IDY, IHR, IMI, IRET) |
This subroutine reads the tank receipt time (if one exists) from Section 1 of a BUFR message. More... | |
Read the tank receipt time from Section 1 of a BUFR message.
Definition in file rtrcpt.f.
subroutine rtrcpt | ( | LUNIT, | |
IYR, | |||
IMO, | |||
IDY, | |||
IHR, | |||
IMI, | |||
IRET | |||
) |
This subroutine reads the tank receipt time (if one exists) from Section 1 of a BUFR message.
It is similar to subroutine rtrcptb(), except that rtrcptb() operates on a BUFR message passed in via a memory array, whereas this subroutine operates on the BUFR message that was read into internal arrays via the most recent call to any of the other message-reading subroutines for a specified Fortran logical unit.
[in] | LUNIT | – integer: Fortran logical unit number for BUFR file |
[out] | IYR | – integer: Tank receipt year |
[out] | IMO | – integer: Tank receipt month |
[out] | IDY | – integer: Tank receipt day |
[out] | IHR | – integer: Tank receipt hour |
[out] | IMI | – integer: Tank receipt minute |
[out] | IRET | – integer: return code
|
Program history log:
Date | Programmer | Comments |
---|---|---|
2009-03-23 | J. Ator | Original author |
2013-10-07 | J. Ator | Modified to call rtrcptb() |
2014-12-10 | J. Ator | Use modules instead of COMMON blocks |