HP COBOL II/XL Quick Reference Guide (31500-90015)

6-: 29
Special Register Words
Table 6-2. Special Register Words
---------------------------------------------------------
| | |
| Word | Contents |
| | |
---------------------------------------------------------
| | |
| LINAGE-COUNTER | An unsigned number used to keep |
| | track of the number of lines |
| | written to each page of a |
| | printed report. |
| | |
---------------------------------------------------------
| | |
| DEBUG-ITEM | A data item used in support of |
| | the COBOL DEBUG facility. |
| | |
---------------------------------------------------------
| | |
| TALLY | A 5-digit unsigned integer |
| | typically used to store |
| | information produced by the |
| | EXAMINE statement in the |
| | PROCEDURE DIVISION. |
| | |
---------------------------------------------------------
| | |
| CURRENT-DATE | An 8-digit alphanumeric item |
| | used only as the sending field |
| | in a MOVE or DISPLAY statement |
| | in the PROCEDURE DIVISION. |
| | |
---------------------------------------------------------
| | |
| WHEN-COMPILED | An 18-character alphanumeric |
| | item that represents the date |
| | and time that the program is |
| | compiled.[REV BEG] |
| | |
---------------------------------------------------------
| | |
| RETURN-CODE | A predefined numeric data name |
| | in the PROCEDURE DIVISION of a |
| | subprogram, RETURN-CODE is used |
| | to pass a value back to the |
| | calling program.[REV END] |
| | |
---------------------------------------------------------
| | |
| TIME-OF-DAY | A six-character numeric item |
| | accessed only as the |
| | transmitting field of a MOVE or |
| | DISPLAY statement in the |
| | PROCEDURE DIVISION to access the |
| | time of day. |
| | |
---------------------------------------------------------