RE: Timing loop

["Thomas, Wendy" <Wendy.Thomas@xxxxxxxxxxx>]

SEND A REPLY!

-----Original Message-----
From: Smith, Nelson [mailto:NSmith@lincare.com]
Sent: February 27, 2002 9:32 AM
To: rpg400-l@midrange.com
Subject: Timing loop


What's the best way to implement a timing loop in RPG without creating
another CFINT that would eat up the system?  i.e. I would like to wait 5
seconds and retry something, but I don't want to be testing the time every
.000001 microseconds (or however fast a loop would execute) to see if 5
seconds has passed or not.

Nelson Smith, CDP, CCP
IBM Certified Specialist
AS400 RPG IV Programmer
(727) 431-8243
(800) 284-2006



****************************************************************************
****************************************************************************
****************************************************
This message originates from Lincare Holdings Inc. It contains information
which maybe confidential or privileged and is intended only for the
individual or entity named above.
It is prohibited for anyone else to disclose, copy, distribute or use the
contents of this message.
All personal messages express views solely of the sender, which are not to
be attributed to Lincare Holdings Inc., and may not be copied or distributed
without this disclaimer.
If you received this message in error, please notify us immediately at
MailAdmin@lincare.com or (800) 284-2006.
****************************************************************************
****************************************************************************
****************************************************

_______________________________________________
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.