RE: UDATE question

["Wilt, Charles" <CWilt@xxxxxxxxxxxx>]

The problem is UDATE doesn't return a date data type.

Use %date() for the current system date.

Additionally, note that UDATE returns the job date, not the system date.  You 
probably want the system date, so use the %date() above.  If you really want 
the job's date, which never changes even when the job runs after midnight, use 
%date(UDATE:*MDY).

HTH,

Charles Wilt
iSeries Systems Administrator / Developer
Mitsubishi Electric Automotive America
ph: 513-573-4343
fax: 513-398-1121
 

> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of John Furniss
> Sent: Friday, March 11, 2005 10:23 AM
> To: rpg400-l@xxxxxxxxxxxx
> Subject: UDATE question
> 
> 
> List:
>       This should be easy, but I can't figure it out. I 
> checked the RPGILE .PDF with no luck. I am getting an error 
> when I put UDATE into a field I've defined as a date data 
> type. I then want to do a   SUBDUR  120:*D on it. What I need 
> to be able to do is subtract 120 days from today's date. How 
> would you do this? I know this is probably a common thing to do.
>       Thanks,
> 
> John Furniss
> Allied Machine & Engineering Corp.
> iSeries Application Programmer
> Phone (330) 343-4283 Ext. 8371
> email: jfurniss@xxxxxxxxxxxxxxxxx
> 
> -- 
> 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.
> 
>