W3FI61

The W3FI61 routine builds 40 char communications prefix.

USAGE:    CALL W3FI61 (LOC,ICAT,AREG,IBCKUP,IDATYP,IERR)

   Input argument list:
      ICAT     - CATALOG NUMBER
      AREG     - AFOS REGIONAL ADDRESSING FLAGS (6 POSITIONS)
                    SELECT ANY OR ALL OF THE FOLLOWING. SELECTIONS
                    WILL AUTOMATICALLY BE LEFT JUSTIFIED AND BLANK
                    FILLED TO 6 POSITIONS.
                 IF BULLETINS AND/OR MESSAGES ARE NOT TO BE ROUTED
                    TO AFOS, THEN LEAVE THE FIELD FILLED WITH BLANKS.
                 E - EASTERN REGION
                 C - CENTRAL REGION
                 W - WESTERN REGION
                 S - SOUTHERN REGION
                 A - ATLANTIC REGION
                 P - PACIFIC REGION
      IERR     - ERROR RETURN
      IBCKUP   - BACKUP INDICATOR W/HEADER KEY
                 0 = NOT A BACKUP
                 1 = FD BACKUP
                 2 = DF BACKUP
                     BACK UP IS ONLY PERMITTED FOR FD AND DF BULLETINS
      IDATYP   - DATA TYPE INDICATOR
                 0  = EBCIDIC DATA
                 11 = BINARY DATA
                 12 = PSUEDO-ASCII DATA
                 3  = ASCII DATA
 
   Output argument list:
      LOC      - NAME OF THE ARRAY TO RECEIVE THE COMMUNICATIONS PREFIX
 
REMARKS:
        Error returns:
                      IERR  = 0   NORMAL RETURN
                            = 1   INCORRECT BACKUP FLAG
                            = 2   A REGIONAL ADDRESSING FLAG IS
                                  NON-BLANK AND NON-STANDARD ENTRY
                            = 3   DATA TYPE IS NON-STANDARD ENTRY

 


  
W3lib.tar
  
Library contains Fortran 90 decoder/encoder
   routines for GRIB edition 1. (Fortran90) 

   Date posted: 2/22/2007