× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Your missing something.  The valid values of a *HMS time is 0 to 240000
according to the RPG manual so your value is a valid time thus %error should
not be set on.

Scott Mildenberger

> -----Original Message-----
> From: Slava Zharichenko [mailto:Slava.Zharichenko@exel.com]
> Sent: Friday, September 07, 2001 12:03 PM
> To: rpg400-l@midrange.com
> Subject: Time validations bug??
>
>
>
>  *HMS          Test(TE)                TimeFld
>                    If        %Error
> .....
>
> I using this code to validate Time and it does not set  error flag for
> 240000 time.
> bug, or i am missing something?
>
>
>
>
> ______________________________________________________________________
> Important Email Information
>
> The information in this email is confidential and may be legally
> privileged. It is intended solely for the addressee. Access
> to this email
> by anyone else is unauthorized. If you are not the intended
> recipient, any
> disclosure, copying, distribution or any action taken or omitted to be
> taken in reliance on it, is prohibited and may be unlawful.
> If you are not
> the intended addressee please contact the sender and dispose of this
> e-mail.
>
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L)
> mailing list
> To post a message email: RPG400-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> or email: RPG400-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>


As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.