COBOL Manual for TNS and TNS/R Programs

Program Compilation
HP COBOL Manual for TNS and TNS/R Programs—522555-006
11-103
PERFORM-TRACE
PERFORM-TRACE
PERFORM-TRACE gives additional information if run-time error 148, “PERFORM
nesting too deep,” occurs.
If the program was compiled with the PERFORM-TRACE directive and run-time error
148 occurs, this additional information is given:
Line numbers of PERFORMs from latest to earliest
Line Number File Number
llllll.lll nnn
...
The file number nnn is the number of the source file. The source-file specified in
the compilation command has file number 001. A file number is shown for each file
referenced by the directive SOURCE or a COPY Statement. To see the file numbers,
compile the program with SHOWFILE directive (see SHOWFILE and NOSHOWFILE).
Default: OPTIMIZE 1
Placement: Outside the boundary of a separately compiled program
Scope: The optimization level active at the beginning of a separately compiled
program determines the level of optimization for that program and any
programs it contains.
Dependencies: None
Default: The compiler does not provide additional information if run-time error
148 occurs.
Placement: Anywhere
Scope: Applies to the compilation unit
Dependencies: None
PERFORM-TRACE
VST800.vsd