Makes the Compiler declare literals as public symbols, in a SET statement using a data item defined as USAGE IS PROCEDURE-POINTER.
This means literals are resolved at link time rather than run time. (Symbol references defined in this way are referred to
as litlinked.)
Note: This directive is supported for native COBOL only.
Syntax:
>>-.---.-.------PPLITLINK-------.-----><
+-/-+ +-----NOPPLITLINK------+
Properties:
Default:
|
Current PPLITLINK setting
|
Phase:
|
Generate
|
$SET:
|
Initial
|
Comments:
This directive only affects object code files.
With NOPPLITLINK, literals are not declared as public symbols for SET statements that use a data item defined as USAGE IS PROCEDURE-POINTER.