NCEPLIBS-bufr  11.7.0
 All Data Structures Files Functions Variables Pages
ufbcpy.f File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine ufbcpy (LUBIN, LUBOT)
 THIS SUBROUTINE COPIES A COMPLETE SUBSET BUFFER, UNPACKED INTO INTERNAL MEMORY FROM LOGICAL UNIT LUBIN BY A PREVIOUS CALL TO BUFR ARCHIVE LIBRARY SUBROUTINE READSB OR READNS, TO LOGICAL UNIT LUBOT. More...
 

Detailed Description

Author
WOOLLEN
Date
1994-01-06

Definition in file ufbcpy.f.

Function/Subroutine Documentation

subroutine ufbcpy (   LUBIN,
  LUBOT 
)

THIS SUBROUTINE COPIES A COMPLETE SUBSET BUFFER, UNPACKED INTO INTERNAL MEMORY FROM LOGICAL UNIT LUBIN BY A PREVIOUS CALL TO BUFR ARCHIVE LIBRARY SUBROUTINE READSB OR READNS, TO LOGICAL UNIT LUBOT.

BUFR ARCHIVE LIBRARY SUBROUTINE OPENMG OR OPENMB MUST HAVE BEEN PREVIOUSLY CALLED TO OPEN AND INITIALIZE A BUFR MESSAGE WITHIN MEMORY FOR LOGICAL UNIT LUBOT. BOTH FILES MUST HAVE BEEN OPENED TO THE INTERFACE (VIA A CALL TO BUFR ARCHIVE LIBRARY SUBROUTINE OPENBF) WITH IDENTICAL BUFR TABLES.

PROGRAM HISTORY LOG: 1994-01-06 J. WOOLLEN – ORIGINAL AUTHOR 1998-07-08 J. WOOLLEN – REPLACED CALL TO CRAY LIBRARY ROUTINE "ABORT" WITH CALL TO NEW INTERNAL BUFRLIB ROUTINE "BORT" 1999-11-18 J. WOOLLEN – THE NUMBER OF BUFR FILES WHICH CAN BE OPENED AT ONE TIME INCREASED FROM 10 TO 32 (NECESSARY IN ORDER TO PROCESS MULTIPLE BUFR FILES UNDER THE MPI) 2003-11-04 S. BENDER – ADDED REMARKS/BUFRLIB ROUTINE INTERDEPENDENCIES 2003-11-04 D. KEYSER – MAXJL (MAXIMUM NUMBER OF JUMP/LINK ENTRIES) INCREASED FROM 15000 TO 16000 (WAS IN VERIFICATION VERSION); UNIFIED/PORTABLE FOR WRF; ADDED DOCUMENTATION (INCLUDING HISTORY); OUTPUTS MORE COMPLETE DIAGNOSTIC INFO WHEN ROUTINE TERMINATES ABNORMALLY 2009-06-26 J. ATOR – USE IOK2CPY 2009-08-11 J. WOOLLEN – ADD COMMON UFBCPL TO REMEMBER WHICH UNIT IS COPIED TO WHAT SUBSET BUFFER IN ORDER TO TRANSFER LONG STRINGS VIA UFBCPY AND WRTREE 2014-12-10 J. ATOR – USE MODULES INSTEAD OF COMMON BLOCKS

USAGE: CALL UFBCPY (LUBIN, LUBOT) INPUT ARGUMENT LIST: LUBIT - INTEGER: FORTRAN LOGICAL UNIT NUMBER FOR INPUT BUFR FILE LUBOT - INTEGER: FORTRAN LOGICAL UNIT NUMBER FOR OUTPUT BUFR FILE

REMARKS: THIS ROUTINE CALLS: BORT IOK2CPY STATUS THIS ROUTINE IS CALLED BY: COPYSB Also called by application programs.

Definition at line 48 of file ufbcpy.f.

References bort(), iok2cpy(), and status().

Referenced by copysb().