Enables you to specify how a program's Data Division is to be maintained between CICS link levels.
Note: This directive is supported for native COBOL only.
Syntax:
>>-.---.-.----.---------DATA-CONTEXT------><
+-/-+ +-NO-+
Properties:
| Default:
|
NODATA-CONTEXT
|
| Phase:
|
Syntax check
|
| $SET:
|
Any
|
Comments:
If a program is compiled with DATA-CONTEXT and is invoked in link level 1 then invoked again in link level 2, its Data Division contents in link level 2 will be in an initial state. On return to link level 1, the program's Data Division contents will be the same as they were before link level 2 was invoked.
If a program is compiled with NODATA-CONTEXT and is invoked in link level 1 then invoked again in link level 2, its Data Division contents in link level 2 will be whatever the link level 1 invocation had set them to. On return to link level 1, the program's Data Division contents will be in whatever state link level 2 had left them.
You might need this directive when compiling programs for running under the Enterprise Server Mainframe Subsystem Support.