Migrating XCTL commands that pass COMMAREAs

To migrate two programs which use a COMMAREA on an XCTL command to pass a structure, change the instructions shown in Table 1.

Table 1. Migrating XCTL commands that pass COMMAREAs
Program Before After
PROG1
EXEC CICS XCTL PROGRAM(PROG2) 
          COMMAREA(structure)
EXEC CICS PUT CONTAINER(structure-name) 
          CHANNEL(channel-name) 
          FROM(structure)
EXEC CICS XCTL PROGRAM(PROG2) 
          CHANNEL(channel-name)
...
PROG2
EXEC CICS ADDRESS 
     COMMAREA(structure-ptr)
...
EXEC CICS GET CONTAINER(structure-name) 
          INTO(structure)
...