"Sleeping" is a lot less hard on your processor, in my opinion...your code will spin an entire CPU won't it...? It will be checking as fast as the processor will let it what the elapsed time is since resetting the Rexx timer.
I saw this done about 10 years ago when a company moved from an 8-way Amdahl to a 4-way IBM machine with about the same MIPS...and then found the new box only had 3/4 of it's power available as this task was spinning on the 4th engine. It had not shown up before as it was limited to 1 out of 8 engines...and it had been doing that for about 2 years, but no-one had noticed. Anyway, if you want a simple SLEEP program, I can mail you one (it's in Assembler and is free, with NO support offered under any circumstances) Best wishes ...Nick -----Original Message----- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Matan Cohen Sent: 17 May 2010 15:58 To: IBM-MAIN@bama.ua.edu Subject: Re: Time Parameter i think the best way to accomplish that is to perfom the check of 30 minute in the rexx (in case you don't want it to go to sleep) if your rexx performing somthing in this 30 minutes you should add a check in it of the time like this: 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 On Mon, May 17, 2010 at 7:38 AM, Bruce Hewson <bruce_hew...@hotmail.com>wrote: > Hi Gil, > > that is correct, but in my defence I quote my original post:- > > "Where SLEEP and QUERYENQ are local programs." > > On Sun, 16 May 2010 09:53:44 -0500, Paul Gilmartin > <paulgboul...@aim.com> wrote: > > >On Sun, 16 May 2010 00:59:59 -0500, Bruce Hewson wrote: > >> > >> Address TSO 'SLEEP 1000' > >> > >??? > > > >I find no such command in: > > > > URL: http://publibz.boulder.ibm.com/cgi- > bin/bookmgr_OS390/BOOKS/ikj4c5a1 > > > > Title: z/OS V1R11.0 TSO/E Command Reference > > Document Number: SA22-7782-12 > > > >-- gil > > > > > regards > Bruce Hewson > > ---------------------------------------------------------------------- > 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 > -- best regards, matan cohen MF System Administrator. ---------------------------------------------------------------------- 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 ______________________________________________________________________ This email has been scanned by the MessageLabs Email Security System. For more information please visit http://www.messagelabs.com/email ______________________________________________________________________ ---------------------------------------------------------------------- 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
