What does it mean when EIBCALEN is equal to zeros?
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
What is the use of mdt (modified data tag)?
kindly specify the pic clause for the following:any bll cell, data type of length option field, hhmmss type of data fields?
What are the cics commands associated with task control?
What is commarea (communications area)?
Can you define aica abend?
List out all the tables that are a part of cics ?
Explain difference between call and link?
Code the related portions of cics/cobol-i programs to gain addressability to twa area assigned to a particular task. Assme that the size of twa area is 300bytes. What are the advantages if cobol-ii is used in the place of cobol?
Explain the primary function of the processing program table (ppt)?
how a data in physical and symbolic map gets treated? Since the physical map is much concerned about the screen alignment and the field positions, how the values entered in the field which has PICIN or PICOUT clause in Physical map gets treated? Does that mean datas recieved or sent to the physical map should be constant? How does the data in Symbolic map gets converted with 5suffix namely F,L,A,I and O. For example EMPNO is treated as EMPNOI, EMPNOO, EMPNOA, EMPNOL and EMPNOF. how does this happen in symbolic map. Please provide your inputs on the above and kindly correct me if I am wrong.
Specify cics transaction initiation process?
how do you intitiate another transaction?
Can you define mapset?
What Are Send Map Maponly & Send Map Dataonly ?
How vsam files are read in cics pgms?