Hi Matan, With regard to your post on this subject which included:
<SNIPPET> RC = TIME(R) SECS = 1800 /* 1800 second you want them to pass */ DO FOREVER N = TIME(E) /*get the time in second which was pass */ IF N >= SECS THEN LEAVE END </SNIPPET> As Dustin Hoffman said in "Hook", bad form. Whilst DO FOREVER is in the manual, IBM do not recommend its use. As Nick correctly points out this will eat CPU cycles, without logically doing anything productive that could not be accomplished by going to SLEEP in the manner alluded to in Ted MacNeil's post. A loop of this type may well be picked up by automation software, with the task being axed as resource hungry. Waiting (SLEEP) allows other work to use the processor in a productive fashion, and is much better for overall though put and service targets. Kind Regards - Terry Director KMS-IT Limited 228 Abbeydale Road South Dore Sheffield S17 3LA UK Reg : 3767263 Outgoing e-mails have been scanned, but it is the recipients responsibility to ensure their anti-virus software is up to date. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
