Re: Date Handling Problem

To all,

JP wrote earlier
> How many digits does the date function return? Which Cobol are you
using OPM or ILE)?

First, I believe the COBOL being used is ILE which is on AS/400 V4R4. But I 
pulled this information from the licensing:

V4R4M0      OPM COBOL for AS/400
V4R4M0      *PRV ILE COBOL for AS/400
V4R4M0      Client Encryption 128-bit
V4R4M0      Point-of-Sale Utility for AS/400
V3R6M0      ADTS CS/400
V3R6M0      CODE/400

Second, well hopefully I will answer this question right:

Month returns 2 digits
Day returns 2 digits
Year returns 4 digits (well at least it is being displayed that way, but i 
believe the zeros are now being put in the front of it.

This is the output from my QPRINT file as you have already seen:

08/14/0002

Should I pull information from the compile report??


Bruce wrote earlier:

>this returns the date as a two digit year. what you want is accept today-date 
>from date YYYYMMDD. this will return the 4 digit year, and note that the 
>format is in ISO sequence.

I have already tried this step, and even trying to use the FUNCTION 
CURRENT-DATE or something close to that.

When I attempt to do this:

0140.00            ACCEPT TODAYS-DATE FROM DATE YYYYMMDD.

An error is displayed in the message error saying:

"A period is required before YYYYMMDD. Line rejected."

So I have followed by adding another period, then it asks for a space, and so 
on.

Thanks,

Eric

Howard Weatherly, your message wasnt available on the server when I checked it, 
but I will check to see if your post did come through later though.


--
__________________________________________________________
Sign-up for your own FREE Personalized E-mail at Mail.com
http://www.mail.com/?sr=signup