RE: UDATE question

I do:

C         eval       threemonthsago = Today - %days(120)

Okay, I get it. <vbg>
But I'm "only" on V5R1 and have to support V4R5 until June 1st, so I don't
like to write code that won't work on my systems.


-Bob Cozzi
www.RPGxTools.com
If everything is under control, you are going too slow.
- Mario Andretti

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Dave Boettcher
Sent: Friday, March 11, 2005 11:08 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: Re: UDATE question

LOL!!



>>> pmorgan@xxxxxxxxxxxxxx 03/11/2005 10:37:52 AM >>>
Bob,

Isn't this 2005?  When are you going to start using free format?

ThreeMonthsAgo = Today - %days(120);

Paul

-- 
Paul Morgan
Senior Programmer Analyst - Retail
J. Jill Group
100 Birch Pond Drive, PO Box 2009
Tilton, NH 03276-2009
Phone: (603) 266-2117
Fax:   (603) 266-2333

"Bob Cozzi" wrote

> UDATE? What's that? Isn't this 2005?
>
> D  JobDate        S             D   Inz(*JOB)
> Or
> D  Today          S             D   Inz(*SYS)
> D ThreeMonthsAgo  S             D
>
> C          Today    SubDur      120:*DAYS    ThreeMonthsAgo
>
>
>
>
> -Bob Cozzi



-- 
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
list
To post a message email: RPG400-L@xxxxxxxxxxxx 
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l 
or email: RPG400-L-request@xxxxxxxxxxxx 
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.



-- 
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.