PPLITLINK

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 in native COBOL only.

Syntax:

>>-.---.-.------LITLINK-------.-----><
   +-/-+ +-----NOLITLINK------+

Parameters:

None.

Properties:

Default: Current LITLINK setting
Phase: Generate
$SET: Initial

Dependencies:

If OMF"GNT", PPLITLINK sets OMF"OBJ" at end.

Comments:

This directive only affects object code files.

With NOLITLINK, literals are not declared as public symbols for SET statements that use a data item defined as USAGE IS PROCEDURE-POINTER.