RE: Timing loop

See what I mean?  Hey, but who doesn't have the following in their programs
nowadays?
     H Bnddir('QC2LE')

Rob Berendt
--
"They that can give up essential liberty to obtain a little temporary
safety deserve neither liberty nor safety."
Benjamin Franklin



                    "Hillier, Martin"
                    <Martin.Hillier@M       To:     "'rpg400-l@midrange.com'" 
<rpg400-l@midrange.com>
                    attel.com>              cc:
                    Sent by:                Fax to:
                    rpg400-l-admin@mi       Subject:     RE: Timing loop
                    drange.com


                    02/27/2002 10:11
                    AM
                    Please respond to
                    rpg400-l






This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
--
[ Picked text/plain from multipart/alternative ]
Another method is to use the C function sleep. Its in binding directory
QC2LE, so you need to add that to the CRTPGM step.

Its very well documented in the 'Who knew you could do that with RPG' red
book, available online.

-----Original Message-----
From: Smith, Nelson [mailto:NSmith@lincare.com]
Sent: 27 February 2002 14:32
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.
_______________________________________________
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.