divert(-1)
#
# Check Date field format
#
# use define(`confEnableMFCDateFormat', true) for enable MFC date format
#
# RFC date format:
# Tue, 22 Oct 2002 16:31:30 +0300
#
# MFC date format:
# Tue, 22 Oct 02 17:31:26 Russian Daylight Time
# Tue, 22 Oct 02 17:31:26 Russian Standard Time
# Tue, 22 Oct 02 17:31:26 GTB Standard Time
# Mon, 31 Mar 03 10:51:16 GTB Daylight Time
#

divert(0)

VERSIONID(`$Id: check-date.m4,v 8.12 2002/11/04 11:11:36 corvax Exp $')

dnl
dnl
LOCAL_CONFIG
dnl
dnl
D{Msg_date}"554 Bogus date format"
dnl
dnl
LOCAL_RULESETS
dnl
dnl
######################################################################
#                            Check Date field                        #
######################################################################
dnl
HDate: $>CheckDate
dnl
SCheckDate
dnl
ifdef(`confEnableMFCDateFormat',`
dnl R $-, $- $- $- $-:$-:$- Russian Daylight Time	$: OK
dnl R $-, $- $- $- $-:$-:$- Russian Standard Time	$: OK
R $+ $- $- $-:$-:$- Russian Daylight Time		$: OK
R $+ $- $- $-:$-:$- Russian Standard Time		$: OK
R $+ $- $- $-:$-:$- GTB Standard Time			$: OK
R $+ $- $- $-:$-:$- GTB Daylight Time			$: OK
')
R $+ Standard Time				$#error $: ${Msg_date}
R $+ Daylight Time				$#error $: ${Msg_date}
R $+ AM						$#error $: ${Msg_date}
R $+ PM						$#error $: ${Msg_date}
R $* $- : $- : $-				$#error $: ${Msg_date}
dnl