B) Not necessarily. Working storage of a COBOL program complied with
DATA(31) may define data residing below 16M if ALL31 is set to OFF
[IBM-supplied default]. This is achieved using the EXTERNAL attribute as in
the following code snippet

 01  BELOW                   EXTERNAL.                    
     05  DELAY-AMT           PIC S9(9) COMP.              
                                                         
     CALL ILBOWAT0 USING DELAY-AMT              

-----Original Message-----
Date:    Tue, 30 Aug 2005 17:02:50 -0500
From:    Bill Klein <[EMAIL PROTECTED]>
Subject: Fw: Fw: COBOL callable services?

Just remember that when calling ILBOWAT0, you 

A) want to do a dynamic CALL
B) need to use DATA(24)

I know that some shops have actually created their own "interface" module
(to be called by DATA(31) programs) to copy the time below the line and then
to call ILBOWAT0.

P.S.  ILBOABN0 *has* been changed to accept data above the line - as I
recall.  Certainly ILBOSTP0 can be called from above the line.

<[EMAIL PROTECTED]> wrote in message
news:<[EMAIL PROTECTED]>...
> No PL/I however I have written and assembler STIMER routine.  I'll stick
> with ILBOWATO for now.
> 
> Thanks,
>    Craig

_
This message and any attachments are intended only for the use of the addressee 
and
may contain information that is privileged and confidential. If the reader of 
the 
message is not the intended recipient or an authorized representative of the
intended recipient, you are hereby notified that any dissemination of this
communication is strictly prohibited. If you have received this communication in
error, please notify us immediately by e-mail and delete the message and any
attachments from your system.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to