RE: date & Test still not working

If it's 6,0 numeric, you need to use *MDY instead of *USA. *USA is for
8-digit dates (MMDDYYYY).

Francis Lapeyre
IS Dept. Programmer/Analyst
Stewart Enterprises, Inc.
E-mail: flapeyre@xxxxxxxx 

 

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of steema@xxxxxxxxxxxxx
Sent: Friday, March 17, 2006 10:39 AM
To: RPG programming on the AS400 / iSeries
Subject: Re: date & Test still not working

it is 6 numeric.


> Is it still not working??
>
> what is the definition & size of datefield?  10 alpha?   ie, 03/17/2006  ?
>
>
>
> steema@xxxxxxxxxxxxx wrote:
>> Lim, I did this but got non compile.
>>
>>  *RNF7510 30      1 The operand is too small to contain a complete date.
>>
>>> Would it be easier to do below?
>>> C                   monitor
>>> C                   eval      dateField = %date(datef:*USA)
>>>
>>> C                   on-error
>>> C                   eval      *in22 = *on
>>> C                   iter
>>> C                   endmon
>>>
> --
> 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.