Change the 'LFT' functions to 'RHT' functions.  The "0!HPDATE"
string turns out to be "011" and your pulling of "01" instead
of "11".

Regards,
Michael L Gueterman
Easy Does It Technologies
Allaire Alliance Partner
email: [log in to unmask]
http://www.editcorp.com
voice: (888) 858-EDIT -or- (509) 943-5108
fax:   (509) 946-1170
--

-----Original Message-----
From:   Johnson Stephen [SMTP:[log in to unmask]]
Sent:   Monday, May 11, 1998 12:45 PM
To:     [log in to unmask]
Subject:        [HP3000-L] HPDATE INCORRECT

:SETVAR
GFILE,"CD"+"!HPYEAR"+"![LFT("0!HPMONTH",2)]"+"![LFT("0!HPDATE",2)]"
00003000
:SETVAR
GFILE2,"C2"+"!HPYEAR"+"![LFT("0!HPMONTH",2)]"+"![LFT("0!HPDATE",2)]"
00004000
:PURGE !GFILE
                                               00005000
PURGE CD980501
      ^
This executed this morning the 11th of May.
Should say CD980511
??????

Stephen  Johnson