COBOL Manual for TNS and TNS/R Programs

Procedure Division Verbs
HP COBOL Manual for TNS and TNS/R Programs—522555-006
9-287
USE DEBUGGING
In Example 9-73, the debugging procedure displays the contents of the special register
DEBUG-ITEM.
The COBOL process executes the debugging statements if the PARAM DEBUG is on
(see PARAM Command).
Example 9-73. USE DEBUGGING Statement
...
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SOURCE-COMPUTER. HP WITH DEBUGGING MODE.
...
PROCEDURE DIVISION.
DECLARATIVES.
TRACE-PROGRAM SECTION.
USE FOR DEBUGGING ON ALL PROCEDURES.
DISPLAY-DEBUG-ITEM.
DISPLAY DEBUG-ITEM.
END DECLARATIVES.
BEGIN-PROCESSING.
...