Working Storage Initialisation errors generated when a submodule has been called multiple times from the same CICS program. Working Storage should be retained for EXEC CICS CALL on submodules until the calling CICS program has finished execution.

To resolve this compile the calling CICS program using the Directive DATA-CONTEXT.This will retain Working Storage for subsequent calls to the same submodule.