Truncates subprogram names to a specified length.
Note: This directive is supported for native COBOL only.
Syntax:
>>-.---.-.------TRUNCCALLNAME--"integer"--.------><
+-/-+ +-NO---TRUNCCALLNAME-------------+
Parameters:
|
integer
|
The length to which to truncate the name
|
Properties:
| Default:
|
NOTRUNCCALLNAME
|
| Phase:
|
Syntax check
|
| $SET:
|
Initial
|
Dependencies:
Set to TRUNCCALLNAME"8" by DIALECT"ANS85", DIALECT"COB370", DIALECT"ENTCOBOL", DIALECT"MVS", DIALECT"OS390", DIALECT"OSVS", and DIALECT"VSC21".
Comments:
This directive truncates the name of a called subprogram to integer characters. Only literal or data names are truncated.