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. More...

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 http://weather.gov/tg/ftpingest.html)

This routine can generate different flag field separator blocks depending on the value of variable iopt.

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").

Program history log:

• Stephen Gilbert 2002-09-16

Parameters

[in]	iopt	Flag 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]	lenin	Desired length of the flag field separator block. ignored, if iopt=2.
[in]	lenbull	Integer length of the bulletin (in bytes) that will follow this separator block.
[out]	csep*(*)	Character array containing the flag field separator.
[out]	lenout	Integer length of the flag field separator block.

Author

Stephen Gilbert

Date

2002-09-16

Definition at line 57 of file mkfldsep.f.