x.1 = 'line 1'
x.2 = 'Line Two'
'EXECIO 2 WRITE QUEUE1 X.'
This example writes data to a CICS temporary storage queue.
'EXECIO 2 READ QUEUE1 Y.'
say y.0 /* ==> 2 */
say y.1 /* ==> 'line 1' */
say y.2 /* ==> 'Line Two' */
This example reads data from a temporary storage queue.