On Wed, Nov 15, 2017 at 9:58 AM, Gord Tomlin <
[email protected]> wrote:
>
> That's an interesting approach, John, offloading the annoyances to the LE
> runtime library. And using the LE entry and exit macros is certainly
> simpler than using CEEPIPI to access the runtime.
>
> Having said that, I've found that the most convenient way to call the LE
> runtime routines is from a language designed to use them. Your code above
> is much simpler than the code required to do all the work in HLASM, but
> it's also more complex than writing the program in C.
>
> I'm reminded of Dave Cole's post "The Pointlessness of handwriting
> "efficient" code (was One Byte MVC Versus IC/STC)" from 2017-10-16 12:23.
> These days, IMHO it's best to use HLASM when it's necessary for some
> reason, as opposed to automatically using it for everything. It's pretty
> simple to call a LE-compliant HLASM routine from a C program to accomplish
> something unique.
>
> Now, having blathered on for a bit, ISTR that you don't have access to a C
> compiler. So for you, the choices would be a little different!
>
That is my problem. No "C" compiler. Only COBOL 4.2. Also, in the test
program where I was doing this, I was using HLASM because I was "playing
around" with the IEFPRMLB macro. Now, that is a well hidden diamond which
has some features which are just begging to be abused. Such as: What is the
easiest way to code up a dynamic FREE of a particular DD statement? My
response:
IEFPRMLB REQUEST=FREE,
DDNAME=DDNAME,
CALLERNAME=ME
DDNAME DC CL8'SYSPRINT' OR WHATEVER
ME DC CL16'ABCDEFGH12345678' OR WHATEVER, IT DOESN'T MATTER
The DDNAME to be freed could have been allocated via JCL DD, or DYNALLOC
(or TSO ALLOCATE, or BPXWDYN), or even IEFPRMLB REQUEST=ALLOCATE.
> --
>
> Regards, Gord Tomlin
> Action Software International
> (a division of Mazda Computer Corporation)
> Tel: (905) 470-7113, Fax: (905) 470-6507
> Support: https://actionsoftware.com/support/
>
--
I have a theory that it's impossible to prove anything, but I can't prove
it.
Maranatha! <><
John McKown
