iTS 1.0+)

Data Division

Compaq NonStop™ Pathway/iTS SCREEN COBOL Reference Manual—426750-001

5-93

Special Registers

USER CONVERSION Clause

The USER CONVERSION clause assigns a user-defined number to be passed with the

field to a conversion procedure.

numeric-literal

specifies the user conversion routine number.

This clause is used only if the application makes use of a user conversion procedure.

Refer to the Compaq NonStop™ Pathway/iTS TCP and Terminal Programming Guide

for details regarding user conversion procedures.

User conversion procedures are provided for input and for output. An input procedure

converts incoming data; an output procedure converts outgoing data. The TCP does no

standard conversion of data passed between an intelligent device and a message field in

the Message Section.

Special Registers

Special registers are data items defined automatically by the SCREEN COBOL

compiler, not by the program. Each special register has a particular purpose and should

be used only in the manner outlined in its description.

DIAGNOSTIC-ALLOWED Special Register

The DIAGNOSTIC-ALLOWED special register indicates whether diagnostic screens

are to be displayed to inform the terminal operator if an error or termination condition

occurs. A copy of this register is local to each program unit.

The register is initialized to the value specified by the DIAGNOSTIC parameter of the

PATHCOM SET TERM command each time the program unit is called. If the

DIAGNOSTIC parameter has not been specified on the SET TERM command, the

default value is YES, which enables display of diagnostic screens. The program can

move the value NO into the register to disable display of diagnostic screens.

The register has the following implicit declaration:

For additional information regarding the use of diagnostic screens, refer to Section 6,

Procedure Division and Appendix A, Advisory Messages.

USER [ CONVERSION ] numeric-literal

01 DIAGNOSTIC-ALLOWED PIC AAA.