awkksgovus
Programmer
In short we have this sitituation.
Main PGMA calls PGMB
PGMB (Doesn't use DFHCOMMAREA) returns to PGMA
PGMA calls PGMB (second time)
PGMB returns to PGMA
PGMA calls PGMC (uses commarea) DFHCOMMAREA (working storeage area) is correct before the call
PGMC is invoked - DFHCOMMAREA - does not contain any information that looks like it came from PGMA
The call to PGMC from PGMA looks like this:
EXEC CICS LINK
PROGRAM (PGMC)
COMMAREA (WS-PGMA-DATA)
LENGTH (WS-MAX-LENGTH)
END-EXEC.
The WS-PGMA-DATA is a total of 12000 bytes
the WS-MAX-LENGTH PIC S9(5) COMP VALUE +12000.
The EIBCALEN = 0 when it is checked in PGMC when it is called.
So... what dots am I missing or t's am I not crossing to make this work?
Main PGMA calls PGMB
PGMB (Doesn't use DFHCOMMAREA) returns to PGMA
PGMA calls PGMB (second time)
PGMB returns to PGMA
PGMA calls PGMC (uses commarea) DFHCOMMAREA (working storeage area) is correct before the call
PGMC is invoked - DFHCOMMAREA - does not contain any information that looks like it came from PGMA
The call to PGMC from PGMA looks like this:
EXEC CICS LINK
PROGRAM (PGMC)
COMMAREA (WS-PGMA-DATA)
LENGTH (WS-MAX-LENGTH)
END-EXEC.
The WS-PGMA-DATA is a total of 12000 bytes
the WS-MAX-LENGTH PIC S9(5) COMP VALUE +12000.
The EIBCALEN = 0 when it is checked in PGMC when it is called.
So... what dots am I missing or t's am I not crossing to make this work?