On Tue, Jun 25, 2013 at 9:56 AM, Tom Marchant <[email protected]>wrote:

> On Tue, 25 Jun 2013 08:15:46 -0500, John McKown <
> [email protected]> wrote:
>
> >1) Can I use a BAKR instruction in CICS successfully.
>
> You will still need to provide a save area, which would be marked with
> "F1SA"
> in offset 4, or set register 13 to zero.  This is necessary for debugging
> purposes,
> even if you never call any other program that will require a save area.
>  See
> Chapter 2 of the Assembler Services Guide for release 12 or above of z/OS.
>
> >4) What about not using a save area at all?
>
> Please don't do that.
>

Looks like I'm going to be forced to. That is, use the caller's save area
and not set up one of my own. I don't use any z/OS services (SVC, PC) or
even macros in the code. The code gets a buffer and modifies it using only
CPU instructions.  Otherwise, I must either abandon the attempt altogether;
which makes debugging harder, but not impossible;  or make the HLASM
subroutine LE compliant. I don't want to do this. It might be considered
"disruptive" and it is definitely "new and unproven" and so close to
anathema to those above me and those who must use it. This is one reason to
recode into COBOL. That is "understood" and "accepted" by all. And, as a
big plus, will get me out of the support loop.

Despite what has been posted about CICS not supporting doing a COBOL CALL
to a composite linked subroutine, we do it at present for these routines.
The only "gotcha" is that the CALL'd code cannot do any CICS requests. The
code in question is "pure CPU" code without any subroutine calls, PCs, SVCs
or even macro invocations.

--

> Tom Marchant
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [email protected] with the message: INFO IBM-MAIN
>



-- 
This is a test of the Emergency Broadcast System. If this had been an
actual emergency, do you really think we'd stick around to tell you?

Maranatha! <><
John McKown

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to