Microfocus Cobol "SLEEP" routine
in [Cobol]
|
Prev: COBOL dynamic allocation (putenv) of output-file won't release extra space when closed
Next: Web Services and COBOL (Fairly long post, but I don't have time to write a proper article on it)
From: Steve Rainbird on 15 May 2007 11:00 "C C" <someone(a)atsbcglobal.net> wrote in message news:Pzi2i.3295$zj3.230(a)newssvr23.news.prodigy.net... > Thanks. That's what I'm doing right now. I just want to avoid having to > call "system". In AIX, a new-line is output by the system thus online > sessions experience a shift on their screen. This behavior still occurs > even if my call "system" script re-directs output to /dev/null. > > > "Steve Rainbird" <news.nospam(a)rainbird.me.nospam.uk> wrote in message > news:5atoomF2qeibjU1(a)mid.individual.net... >> "C C" <someone(a)atsbcglobal.net> wrote in message >> news:yAh2i.4627$UU.2661(a)newssvr19.news.prodigy.net... >>> Hello. >>> >>> Is there a way in MF Cobol to pause program execution (sleep) for, let's >>> say, 5 minutes??? My workaround is to call the AIX command "sleep 300". >>> I need a routine in Cobol itself so I may vary the time to pause in some >>> programs. >>> >>> Thanks in advance. >>> >> >> >> Not that I know of. >> >> I use >> >> call "system" using ws-sleep-call >> >> >> Where ws-sleep-call is defined as >> >> 01 ws-mss-sleep-call. >> 03 pic x(6) value "sleep ". >> 03 ws-mss-sleep pic 9(15).999. >> 03 pic x value x"00". >> >> Works for me. >> >> -- >> Steve >> >> >> > > Have you tried call "SYSTEM" there is a difference but I can't remember offhand what it is. Or maybe even CBL_EXEC_RUN_UNIT although I have never used this. -- Steve
From: C C on 15 May 2007 12:43 I think "TIME-OUT" needs a SCREEN SECTION. I don't want SCREEN SECTION in the sleep functionality I am trying to implement in programs under cron or batch control. "Vaclav Snajdr" <snajdr.vaclav(a)t-online.de> wrote in message news:f2cdof$tbi$01$1(a)news.t-online.com... > it is possible to use "accept with timeout xyz" instead call system ... > (in background programs too) > > > > C C wrote: > >> Thanks. That's what I'm doing right now. I just want to avoid having to >> call "system". In AIX, a new-line is output by the system thus online >> sessions experience a shift on their screen. This behavior still occurs >> even if my call "system" script re-directs output to /dev/null. >> >> >> "Steve Rainbird" <news.nospam(a)rainbird.me.nospam.uk> wrote in message >> news:5atoomF2qeibjU1(a)mid.individual.net... >>> "C C" <someone(a)atsbcglobal.net> wrote in message >>> news:yAh2i.4627$UU.2661(a)newssvr19.news.prodigy.net... >>>> Hello. >>>> >>>> Is there a way in MF Cobol to pause program execution (sleep) for, >>>> let's >>>> say, 5 minutes??? My workaround is to call the AIX command "sleep >>>> 300". >>>> I need a routine in Cobol itself so I may vary the time to pause in >>>> some >>>> programs. >>>> >>>> Thanks in advance. >>>> >>> >>> >>> Not that I know of. >>> >>> I use >>> >>> call "system" using ws-sleep-call >>> >>> >>> Where ws-sleep-call is defined as >>> >>> 01 ws-mss-sleep-call. >>> 03 pic x(6) value "sleep ". >>> 03 ws-mss-sleep pic 9(15).999. >>> 03 pic x value x"00". >>> >>> Works for me. >>> >>> -- >>> Steve >>> >>> >>> > > -- > Vaclav Snajdr
From: Sergey Kashyrin on 15 May 2007 13:48 Why just not to call it directly ? CALL 'sleep' USING BY VALUE 300. Regards, Sergey "C C" <someone(a)atsbcglobal.net> wrote in message news:yAh2i.4627$UU.2661(a)newssvr19.news.prodigy.net... > Hello. > > Is there a way in MF Cobol to pause program execution (sleep) for, let's > say, 5 minutes??? My workaround is to call the AIX command "sleep 300". > I need a routine in Cobol itself so I may vary the time to pause in some > programs. > > Thanks in advance. >
From: William M. Klein on 15 May 2007 15:32 I don't know which versions it is and is not in, but check your documentation for the Micro Focus callable service CBL_THREAD_SLEEP P.S. I haven't actually used it myself, so "YMMV" -- Bill Klein wmklein <at> ix.netcom.com "C C" <someone(a)atsbcglobal.net> wrote in message news:yAh2i.4627$UU.2661(a)newssvr19.news.prodigy.net... > Hello. > > Is there a way in MF Cobol to pause program execution (sleep) for, let's say, > 5 minutes??? My workaround is to call the AIX command "sleep 300". I need a > routine in Cobol itself so I may vary the time to pause in some programs. > > Thanks in advance. >
From: James J. Gavan on 15 May 2007 16:36
William M. Klein wrote: > I don't know which versions it is and is not in, but check your documentation > for the Micro Focus callable service > > CBL_THREAD_SLEEP > > P.S. I haven't actually used it myself, so "YMMV" > Out of curiosity I went looking, searching on 'WAIT', 'SLEEP' - no luck. Never thought of CBL_THREAD...... Here's the reference to it in Net Express V 5.0 :- http://supportline.microfocus.com/supportline/documentation/books/nx50/nx50indx.htm Jimmy |