MVSFORUMS.com

complex · Beginner Joined: 15 Sep 2003 Posts: 8 Topics: 4

Is there any inbuilt COBOL or LE feature which can allow an application program to wait for a specified time ?

kolusu · Posted: Tue Mar 23, 2004 4:01 pm Post subject:

complex,
Cobol has a delay module named 'ILBOWAT0' which will delay the execuetion for specified period of time. The only problem is that it operates in 24 bit addressing mode. The wait-time is specified in terms of seconds. In the below example, the pgm sits for 45 secs.

complex · Beginner Joined: 15 Sep 2003 Posts: 8 Topics: 4

Thanks for the info Kolusu.

I have another question , this may sound a bit amateurish - but what would happen if i link the ILBOWAT0 module from a 31 bit module ?

kolusu · Posted: Tue Apr 06, 2004 10:45 am Post subject:

complex,

It just takes 2 secs to test out what happens with the wait-module is linked with 31 bit addressing mode.

If you link ILBOWAT0 with a 31 bit mode then the job will abend with u4038 with the following message:

WHITE · Beginner Joined: 03 Sep 2004 Posts: 8 Topics: 4

MikeBaker · Beginner Joined: 04 May 2004 Posts: 96 Topics: 9

ILBOWAT0 is not the name of any COBOL compiler. It is one of the modules supplied with the COBOL LE library. It can run on zOS just so long as it runs in 24 bit mode.

"zOS and 64 bit mode" does not mean that everything runs in 64 bit mode. There will still be plenty of things running in 24bit, others in 31bit, and other stuff will be stored above the 32 bit line.

Crox · Beginner Joined: 29 May 2004 Posts: 52 Topics: 9

An easy way to keep one identifier under the line, you can define it EXTERNAL. That is what you can do with the field wait-time. To be sure not to get any conflict with an other program, define wait-time as <program-name>-wait-time.

tattva · Beginner Joined: 02 Feb 2005 Posts: 97 Topics: 36

Hi all,

Can any one provide some indepth info(like source code.. etc) about ILBOWAT0.

Just curious to know.

Thanks,
tattva

kolusu · Posted: Sun Jan 08, 2006 10:52 am Post subject:

Tattva,

ILBOWAT0 is a poorly documented(actually no Documentation) which is still a part of the LE run-time library. Why do you need the source code ?

Hope this helps...

Cheers

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu

THRIVIKRAM · Beginner Joined: 03 Oct 2005 Posts: 70 Topics: 34

kOLUSU,
I got this error while using the DELAY progtam.
An attempt was made to initialize an AMODE24 application without usingthe ALL31(OFF) and STACK(,,BELOW)
run-time options.

As you said there are ways of overcoming this error.Can you please tell how to get rid of this.

Crox · Beginner Joined: 29 May 2004 Posts: 52 Topics: 9

Most of the sites are using default intallation parms which means that EXTERNA defintions are below the 16M line. By defining your A-mode 24 adressing parm as EXTERNAL, it will go ok.

Terry_Heinze · Posted: Fri Jan 29, 2016 9:21 am Post subject:

Ah ha -- a time traveler. Smile

_________________
....Terry

Mickeyd · Beginner Joined: 02 Jan 2003 Posts: 27 Topics: 0

first question why are you trying to do this?? you may get fired from your job if they find out your holding up a resource in a batch job

kolusu · Posted: Fri Jan 29, 2016 11:15 am Post subject:

William Collins · Supermod Joined: 03 Jun 2012 Posts: 437 Topics: 0

I'm resisting the temptation to edit the topic title to 10-year wait in COBOL.

Welcome back, Crox.