To migrate two programs which use START data to exchange a structure,
change the instructions shown in Table 1.
Table 1. Migrating START dataProgram |
Before |
After |
PROG1 |
EXEC CICS START TRANSID(TRAN2)
FROM(structure)
|
EXEC CICS PUT CONTAINER(structure-name)
CHANNEL(channel-name)
FROM(structure)
EXEC CICS START TRANSID(TRAN2)
CHANNEL(channel-name)
|
PROG2 |
EXEC CICS RETRIEVE INTO(structure)
|
EXEC CICS GET CONTAINER(structure-name)
INTO(structure)
|
Note that the new version of PROG2 is the same as that in the
pseudoconversational example.