58 CALL
status(lunit,lun,il,im)
65 1 CALL
rdmsgw(lunit,mgwa,ier)
83 901 CALL
bort(
'BUFRLIB: POSAPX - INPUT BUFR FILE IS CLOSED, IT MUST'//
84 .
' BE OPEN FOR OUTPUT')
85 902 CALL
bort(
'BUFRLIB: POSAPX - INPUT BUFR FILE IS OPEN FOR INPUT'//
86 .
', IT MUST BE OPEN FOR OUTPUT')
void backbufr(f77int *nfile)
This subroutine backspaces a BUFR file by one BUFR message.
subroutine rdmsgw(LUNIT, MESG, IRET)
THIS SUBROUTINE READS THE NEXT BUFR MESSAGE FROM LOGICAL UNIT LUNIT AS AN ARRAY OF INTEGER WORDS...
function idxmsg(MESG)
This function determines whether a given BUFR message contains DX BUFR tables information that was ge...
subroutine status(LUNIT, LUN, IL, IM)
This subroutine checks whether a specified Fortran logical unit number is currently connected to the ...
subroutine rdbfdx(LUNIT, LUN)
BEGINNING AT THE CURRENT FILE POINTER LOCATION WITHIN LUNIT, THIS SUBROUTINE READS A COMPLETE DICTION...
subroutine posapx(LUNXX)
THIS SUBROUTINE READS TO THE END OF THE FILE POINTED TO BY ABS(LUNXX) AND POSITIONS IT FOR APPENDING...
subroutine bort(STR)
This subroutine calls subroutine errwrt() to log an error message, then calls subroutine bort_exit() ...