NCEPLIBS-bufr  12.0.1
blocks.f File Reference

Encapsulate a BUFR message with IEEE Fortran control words. More...

Go to the source code of this file.

Functions/Subroutines

subroutine blocks (MBAY, MWRD)
 This subroutine encapsulates a BUFR message with IEEE Fortran control words as specified via the most recent call to subroutine setblock(). More...
 

Detailed Description

Encapsulate a BUFR message with IEEE Fortran control words.

Author
J. Woollen
Date
2012-09-15

Definition in file blocks.f.

Function/Subroutine Documentation

◆ blocks()

subroutine blocks ( integer*4, dimension(mwrd)  MBAY,
  MWRD 
)

This subroutine encapsulates a BUFR message with IEEE Fortran control words as specified via the most recent call to subroutine setblock().

A previous call to subroutine setblock() is required in order to activate encapsulation with control words, and to specify whether the control words should be encoded using big-endian or little-endian byte ordering. In such cases, the input parameter MBAY is then modified to add the specified control words to the existing BUFR message whenever this subroutine is called, and MWRD is also modified accordingly.

Alternatively, if subroutine setblock() was never previously called, or if no encapsulation was specified during the most recent call to subroutine setblock(), then this subroutine simply returns without modifying either of its input parameters.

Date
2012-09-15
Parameters
[in,out]MBAY– integer(*): BUFR message, possibly with added control words on output
[in,out]MWRD– integer: Size (in integers) of contents of MBAY
Remarks
  • For more information about IEEE Fortran control words, as well as their historical use within the BUFRLIB software, see the documentation for subroutine setblock().
  • Whenever a BUFR message in MBAY is to be encapsulated with control words, the user must ensure the availability of sufficient extra space when allocating MBAY within the application program.
Author
J. Woollen
Date
2012-09-15

Definition at line 40 of file blocks.f.

Referenced by msgwrt().