1. Categories >> Software >> MainFrame >> IBM MainFrame >> CICS
  2. Suggest New Category

What does it mean when EIBCALEN is equal to zeros?

Question Posted / pradeep

Answer Posted / pradeep

Its not that just CICS has returned no data, but also, when
there is another Programming language which passes data to
the CICS program, the EIBCALEN will be zero. This is
because, the CICS to CICS data transfer only through the
COMMAREA in LINKAGE SECTION. And if there is another prog.
lang. passing the data to a CICS prg, then data will be
received in the LINKAGE SECTION but with a Different Pre-
defined data item. For ex:

LINKAGE,SECTION.

01 DFHCOMMAREA.
03 FILLER PIC X(95).
01 TWA-AREA.
05 INTERFACE-AREA-ADDR USAGE IS POINTER.
01 MANTIS-IN.
02 FILLER PIC X(8).
02 MANTIS-DATA.
05 FILLER PIC X(95).

Here, the DFHCOMMAREA is only used, when a CICS Prog sends
the data. Whereas the MANTIS-IN is used when a MANTIS prog
is linked to this CICS pgm.

So, In PROCEDURE DIVISION, we give the following check

EVALUATE,EIBCALEN,
WHEN ZERO
EXEC CICS ADDRESS TWA(ADDRESS OF TWA-AREA) END-EXEC
SET ADDRESS OF MANTIS-IN TO INTERFACE-AREA-ADDR
MOVE MANTIS-DATA TO WW-LINKAGE-AREA
WHEN OTHER
MOVE DFHCOMMAREA TO WW-LINKAGE-AREA
END-EVALUATE.

Hope this is understandable!!

Is This Answer Correct ?    25 Yes 4 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

Explain the difference between a package and a plan.

557

What is the kcp in the cics?

695

Can you define cics task?

631

What is meant by MDT? Furthermore, comment on FRSET and FSET ?

663

what are the reserved words for cics?

561




Explain how many conditions can you include in a single handle condition command?

615

What is the pic clause for the any bll cell type of data fields?

551

In a CICS program, how will you read a VSAM file?

651

With the use of an alternate index, how is a VSAM file accessed?

646

Define floating maps with illustration?

567

Define transient data?

575

mention the option used in the cics read command to gain accessibility directly to the file i/o area. (Assume cobol-ii).?

643

Explain what is the massinsert option?

637

Explain the difference between tsq and tdq

603

List out all the tables that are a part of cics ?

584