Re: Date Variables

["Fay, Brannon" <brannon.fay@PAETEC.COM>]

Kenny

You either want to use strtodate, i.e.

LET $MAXDATE = strtodate( '01-SEP-1999', 'DD-MON-YYYY' )

or change the default date format via:

ALTER-LOCALE
        DATE-EDIT-MASK = 'DD-MON-YYYY'

I'm not quite sure if that latter will work or not but the strtodate will.

HTH,
Brannon Fay

-----Original Message-----
From: Kenny Melton [mailto:KMELTO1@TANDY.COM]
Sent: Tuesday, October 05, 1999 3:59 PM
To: Multiple recipients of list SQR-USERS
Subject: Date Variables


Hello Everyone,

I am using SQR 4.3.4 and am having a strange problem (or a severe brain
burp).  Can anyone tell me why the following works the way it does?:

BEGIN-SETUP
    DECLARE-VARIABLE
        DATE  $MINDATE
        DATE  $MAXDATE
    END-DECLARE
END-SETUP

BEGIN-PROCEDURE COMPARE-DATES
    LET $MAXDATE = '01-SEP-1999'
    LET $MINDATE = '31-AUG-1999'

    SHOW 'MAX DATE = ' $MAXDATE
    SHOW 'MIN DATE = ' $MINDATE

    IF $MAXDATE = $MINDATE
        SHOW 'MAXDATE = MINDATE'
    END-IF

    IF $MAXDATE <> $MINDATE
        SHOW 'MAXDATE <> MINDATE'
    END-IF

    IF $MAXDATE > $MINDATE
        SHOW 'MAXDATE > MINDATE'
    END-IF

    IF $MAXDATE < $MINDATE
        SHOW 'MAXDATE < MINDATE'
    END-IF

END-PROCEDURE

The log file output looks like this:

MAX DATE = 01-SEP-1999
MIN DATE = 31-AUG-1999
MAXDATE = MINDATE

I'm kind of stumped on this one.  I think it has something to do with the
internal "string" representation of the date variables, but all my juggling
with the SQR.INI file settings didn't have any impact.  I have also tried it
with the "MOVE" command in place of the "LET" command above and, again, no
difference.  Oh, one more thing -- this happens consistently when one of the
dates is an end-of-month date, and the other date is the following
first-of-month date.  OK Gurus, what am I missing?

Thanks in advance,
Kenny Melton
Sr. Technical Architect
Tandy Information Services
PeopleSoft Financial Systems
kmelto1@tandy.com