Example 1
Establishes the address of the communication area. In this example, CICSCommArea is a subclass of OsPtr.
| result aCommArea | result := CICS address exec. aCommArea := CICSCommArea address: (result commarea reference).
Example 2
Finds the length of the communication area based on the eib.
| result eib commAreaLength | result := CICS address exec. eib := result eib. commAreaLength := eib eibcalen.