>>> On 12/2/2010 at 1:13 PM, in message <[email protected]>,
>>> Steve
Comstock <[email protected]> wrote:
> I think many (not all) of the LE services are useful. For a COBOL
> shop, the ability to dynamically request storage (no need to have
> an Assembler subroutine) and the ability to write condition handlers
> in COBOL (no need for Assembler STAE or ESTAE routines) seem to be
> attractive.
I am in agreement. Though I have to admit I'd prefer that Enterprise COBOL be
upgraded to support many of these things. Certainly the latest COBOL standard
supports dynamic memory allocation with the ALLOCATE and FREE statements. And
some form of exception handling, though I'm not sure how it would fit in with
LE. I can barely spell STAE, much less make use of it. :-)
> On the other hand, the truth is I don't see many shops using the
> CEE callable services. I think part of the problem is lack of
> awareness (fixable by training, of course). Another part is lack
> of leadership on trying new things.
No doubt. Which is why I'm trying to take a bit of initiative here.
Disgressing slightly, I have to admit that one of the things that kept me from
using LE services in the past was the need to handle the feedback code. In VSE
all of the documentation specifically states "COBOL programs must provide the
feedback code parameter in each call to an LE/VSE callable service." What's
really frustrating is I don't even think it's true! There is no OMITTED
keyword in COBOL for VSE/ESA, but you can simulate it:
LINKAGE SECTION.
77 LS-OMITTED POINTER.
PROCEDURE DIVISION.
set address of OMITTED to NULL
call "ceemsg" using CTOK CEEMSG LS-OMITTED
Using LS-OMITTED in this way instead of the OMITTED keyword appears to work the
same way on z/OS, so I'd hope that VSE would work the same way. Ergh. Can
someone on VSE try this out and see if it works?
Oh well, ten years late but I think we can get some good use out of LE.
Frank
--
Frank Swarbrick
Applications Architect - Mainframe Applications Development
FirstBank Data Corporation - Lakewood, CO USA
P: 303-235-1403
>>>
The information contained in this electronic communication and any document
attached hereto or transmitted herewith is confidential and intended for the
exclusive use of the individual or entity named above. If the reader of this
message is not the intended recipient or the employee or agent responsible for
delivering it to the intended recipient, you are hereby notified that any
examination, use, dissemination, distribution or copying of this communication
or any part thereof is strictly prohibited. If you have received this
communication in error, please immediately notify the sender by reply e-mail
and destroy this communication. Thank you.
----------------------------------------------------------------------
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
