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

what is the most common way of building queue-id of a tsq?

607

Explain the uses that are associated to tsq and tdq ?

634

What is a cics task?

563

Let us say you have a collection of multiple maps in cics. So if you are asked to determine the exact storage space that is available in a symbolicmap, then how will you compute it?

677

What are some of the cics commands associated with interval control?

575




In the EIB block of CICS, highlight the names of few of the important fields?

570

What does a cics translator do?

875

What Are Send Map Maponly & Send Map Dataonly ?

691

Define TCT.

696

Explain the difference between pseudo-conversational and conversational?

552

Explain the difference between cics program control table (pct) and cics processing program table (ppt)?

599

Name the command which is used to release a record on which exclusive control is gained?

557

Can QSAM files be accessed from CICS?

671

How do you use altindxs in batch, cics programs?

565

the dfhcommara is used to pass information from one application to another. What are some other ways that this function can be accomplished?

651