NCEPLIBS-w3emc 2.12.0
Loading...
Searching...
No Matches
mkfldsep.f File Reference

Makes TOC Flag Field Separator Block. More...

Go to the source code of this file.

Functions/Subroutines

subroutine mkfldsep (csep, iopt, lenin, lenbull, lenout)
 Generates a TOC Flag Field Separator Block used to separate WMO Bulletins within a transmission file to be ingested in TOC's FTP Input Service, which can be used to disseminate WMO buletins.
 

Detailed Description

Makes TOC Flag Field Separator Block.

Author
Stephen Gilbert
Date
2002-09-16

Definition in file mkfldsep.f.

Function/Subroutine Documentation

◆ mkfldsep()

subroutine mkfldsep ( character*(*), intent(out)  csep,
integer, intent(in)  iopt,
integer, intent(in)  lenin,
integer, intent(in)  lenbull,
integer, intent(out)  lenout 
)

Generates a TOC Flag Field Separator Block used to separate WMO Bulletins within a transmission file to be ingested in TOC's FTP Input Service, which can be used to disseminate WMO buletins.

See [File Transfer Input Service Guide - Input examples and how to FTP files to the Gateway] (https://www.weather.gov/tg/ftpingest).

This routine can generate different flag field separator blocks depending on the value of variable iopt. For details see [GATEWAY File Standards & Content Structures] (https://www.weather.gov/tg/fstandrd).

Bulletin "Flag Field Separator" block - OPTION 1 (old)

  • bytes:
    • 1 - 4 Marker string (####).
    • 5 - 7 Block length [018 fixed value].
    • 8 - 13 Total length of bulletin in bytes [octets] (not including the flag field block).
    • 14 - 17 Marker string (####).
    • 18 Line Feed (ASCII "0A").

Bulletin "Flag Field Separator" block - OPTION 1a (new)

  • bytes:
    • 1 - 4 Marker string (####).
    • 5 - 7 Block length (nnn) - value always greater than 018.
    • 8 - 18 Total length of bulletin in bytes [octets] (not including the flag field block).
    • 19 - nnn-5 Reserved for future use.
    • nnn-4 - nnn-1 Marker string (####).
    • nnn Line Feed (ASCII "0A").

Bulletin "Flag Field Separator" block - OPTION 2 (limited)

  • bytes:
    • 1 - 4 Marker string (****).
    • 5 - 14 Total length of bulletin in bytes [octets] (not including the flag field block).
    • 15 - 18 Marker string (****).
    • 19 Line Feed (ASCII "0A").
Parameters
[in]ioptFlag Field Separator block option: = 1: Separator block for use with alphanumeric bulletins. if lenin <= 18 and lenbull <= 999999, OPTION 1 block will be generated. if lenin > 18 or lenbull > 999999, OPTION 1a block will be generated. = 2: Separator block for use with GRIB/BUFR bulletins.
[in]leninDesired length of the flag field separator block. ignored, if iopt=2.
[in]lenbullInteger length of the bulletin (in bytes) that will follow this separator block.
[out]csep*(*)Character array containing the flag field separator.
[out]lenoutInteger length of the flag field separator block.
Author
Stephen Gilbert
Date
2002-09-16

Definition at line 55 of file mkfldsep.f.