Date:         Thu, 8 Jun 2000 09:19:53 -0400
Reply-To:     CICS List <CICS-L@LISTSERV.UGA.EDU>
Sender:       CICS List <CICS-L@LISTSERV.UGA.EDU>
From:         "Donald H. Blake" <Donald_H_Blake@KEYBANK.COM>
Subject:      Re: Common Batch & CICS routines
Content-type: text/plain; charset=us-ascii

I've never tried it, but what happens with this interface under EXCI?





Bob@cpuperform.com on 06/07/2000 03:37:27 PM

Please respond to CICS-L@listserv.uga.edu

To:   CICS-L@listserv.uga.edu
cc:
Subject:  Re: Common Batch & CICS routines




The simplest way to determine if you are running under cics or batch is
to simulate the DFHAFCB TYPE=LOCATE macro. In assembler you get a 0 if
in batch, a non zero if under cics. The code is PSATOLD to TCB, tcb
extension 2, AFCB pointer. It is only set if running under cics. You
could call a common module that either did a cics call or a batch call
depending on where you are.

"Theisen, Craig" wrote:
>
>         We are on release 4.1 of CICS,    and we are doing new development
> on OS/390 in COBOL MVS where we want our objects to be re-usable between
> CICS and Batch processes (executing the same load modules if possible).
> Can anyone give me any techniques they use or reference manuals I can read
> for good ways of doing this?
>
>         I have thought about developing them as DB2 stored procedure calls,
> but I would think there should be an even less involved  method than that.
> Both of these platforms are legacy IBM so maybe they can share things in
> current releases?      We do have MQ if somehow that poses a solution?
>
>         I hope this posting is not repetative,   I am a new to this list and
> I have been away from CICS for a few years(since version 1.7).    I searched
> the Listserver archives and the only info I found was from 1996 & 1997 so I
> am thinking there may be newer techniques.
>
>         All ideas are appreciated
>
>         Craig Theisen
>         GuideOne Insurance