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

How can you access qsam (seq) files from cics?

1077

---

What is the main function of the sign-on table?

1007

---

Define an aica abend?

1044

---

Can a CICS code be a part of a copybook? If so, then what are the outcomes after compilation?

1068

---

Define primary objective of cics?

959

---

Whenever a cics program goes through a compilation process, there is always some extra code that is added to the program. Where exactly does this new piece of code go to and what is it termed as ?

985

---

If we wish to create bms executable, what are the basic steps that the user has to go through?

1050

---

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

1059

---

explain the means of supporting pseudo conversation programming. (Eg. Storing and restoring of states, control flow, error handling)?

1015

---

What do you mean by CEMT?

1210

---

Explain the primary significance of intra-partition and extra-partition tdqs ?

1020

---

Name the two types of transient data queues?

1010

---

What is the pic clause for the hhmmss type of data fields?

877

---

what are the six different type of argument values in cobol that can be placed in various options of a cics command?

1219

---

what are the reserved words for cics?

1041

---