Determines how Working-Storage is initialized for programs marked as IS INITIAL.
Syntax:
>>-.---.--INITIAL"value"---------------------><
+-/-+
Parameters:
The permissible values for
value are
- 1
- For a program marked as IS INITIAL, on program entry, Working-Storage is first initialized to the value specified by the DEFAULTBYTE
directive, and then Working-Storage items with a VALUE clause are initialized. This is the default behavior, and the behavior
of previous releases.
- 2
- For a program marked as IS INITIAL, on program entry, Working-Storage items with a VALUE clause are initialized, and Working-Storage
items without a VALUE clause are undefined.
Properties:
| Default:
|
INITIAL"1"
|
| Phase:
|
Syntax check
|
| $SET:
|
Initial
|
Comments:
This directive is incompatible with the INIT-BY-TYPE directive; if you specify the two together, a syntax checker error is
generated.