Answer / yogendra shinde

EIBCALEN stands for Execution Interface Block Communication
Area Length. If CICS applicaton program is running for the
first time then no data has been transferred from CICS MAP
or terminal to application pgm. At that time the length of
the COMMAREA is zero. Which is indicated by EIBCALEN
parameter.

Answer / santosh khot

The Program is Running first time and there is not transfer
of data from program to program.

Answer / cheran pogu

EIBCALEN determines whether the calling program sent
COMMAREA, if EIBCALEN is greater than zero, COMMAREA was
sent. this should always be checked.

Answer / 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!!

Answer / thomas vt

EIBCALEN equals to zero means that the communication area
length is zero indicating that currently no data
transaction has been occured and it is the initial state of
runing that program..

and also the communication area length will increased
according to the length of data transmitted...
i.e we can pass data from one program to another by sending
it as a group item under the DFHCOMMAREA variable used in
program

Answer / zxascgfg

IT IS THE INITIAL STAGE OF RUNNING THE PROGRAM.

Name some important fields in the EIB block ?

2 Answers   IBM,

how do you execute a background cics txn ?

0 Answers   IBM,

Name some translator and compile options and explain their meaning?

0 Answers   Fujitsu,

Kindly specify the pic clause for the any bll cell type of data fields?

0 Answers  

How do you dynamically set the CURSOR position to a specific field?

3 Answers  

Highlight the difference between a symbolic map and physical map?

0 Answers  

where we can declare the files in fct and pct and ppt and rct pls give clear structure

1 Answers   IBM,

Explain how pa key is different from pf key?

0 Answers  

Hi Folks, In the Map, one field is having attribute FSET. I want to FSET OFF of that field through program. Can any body let me know the process? Thanks Praveen

3 Answers  

Can you define mapset?

0 Answers  

Define the attribute byte?

0 Answers  

Explain the various ways data can be passed between CICS programs.

2 Answers   IBM,