Re: Single Source CICS/Batch





?? Ursprüngliche Nachricht

Am 28.10.06, 12:29:27, schrieb "Vanroy - Cleymans" <vanroy@xxxxxxxxxx>
zum Thema Single Source CICS/Batch:


Does anybody has experience with writung the Cobol source code once
and
running the load module(s) in Cics and Batch environment (on Z/OS)

thanks,

Willy Vanroy

hello Willy

every day :-)

for Batch and CICS you can use a main source. Inside that you can call
subroutines for both environments. Some times you need a flag to mark
the different between batch and CICS.

One problem: inside CICS you can not use any FD, SD related
statements. You can do something like this

CICS / batch main --> call calculation-routine with:

if CICS-flag -> exec CICS commands
if batch-flag -> call i/o for file access batch

with the CICS-precompiler parm NOLINKAGE your PROCEDURE DIVISION USING
was not expanded with using dfhcommarea and dfheiblk. The copies are
insertet.

You can make your program able to use CICS-commands if you are using:

if CICS-flag -> exec CICS address eib...

make your programs dynamic by using CALL WS-PGM-NAME instead of CALL
'PGMNAME' and the DYNAM directive at cobol compile time.

Use autoinstall exit to install programms to CICS PCT

DB2 is a very, very strange problem. You can use the identical source
in CICS and batch, but in CICS the compiler was CICS-driven changed to
NODYNAM and therefore the CICS DB2-Api was statically linked and that
can not run within a TSO (IKJEFT0?) or IMS environment. But in batch
you can use the DYNAM compile-option to use the same loadmodul for TSO
and IMS bacause the DB2-Api was dnamicly called.

DB2-Api is the modul DSNHALI, it is different in every environment!


Its not easy its tricky

Einen schoenen Tag
Andreas Lerch



.



Relevant Pages

  • Re: JCL, Cobol and "Call Parameters"
    ... you are migrating to MF and Unix? ... or CICS applications as well? ... Yep we are planing to migrate CICS and Batch Jobs. ... Batch will be native Cobol with UC4 as Scheduling ...
    (comp.lang.cobol)
  • Re: VSAM random read error
    ... every RNF condition (doing it at file open won't solve the RNF during ... This temp dataset is shielded from the CICS updates. ... temp dataset at the end of batch. ...
    (bit.listserv.ibm-main)
  • Re: Single Source CICS/Batch
    ... running the load modulein Cics and Batch environment ... B04 77 WS-ORIGINAL-EIBRSRCE PIC XVALUE LOW-VALUES. ... B04 77 WS-LINK-EIBFN REDEFINES ...
    (comp.lang.cobol)
  • Re: VSAM random read error
    ... Occasionally a record not found condition was hit but the record ... I assume a CI/CA split happens after batch file open and the record ... The file is indeed open for update in CICS but the key for which the ... time and found that no other program running parallely was even using ...
    (bit.listserv.ibm-main)
  • Re: CICS kickoff online users
    ... I looking for a command/program to kickoff all the users using a cics ... batch is completed. ... ENABLE all the VSAM files for that application. ... When the flag says that batch processing is active, ...
    (comp.lang.cobol)