Pathway/iTS SCREEN COBOL Reference Manual (H06.10+, J06.03+)

Data Division
HP NonStop Pathway/iTS SCREEN COBOL Reference Manual426750-003
5-95
Special Registers
Since W-FLD4 is an alphanumeric item, the reply is left justified in the field and
filled with blanks.
USER CONVERSION Clause
The USER CONVERSION clause assigns a user-defined number to be passed with
the field to a conversion procedure.
numeric-litera
l
specifies the user conversion routine number.
This clause is used only if the application makes use of a user conversion procedure.
For details on user conversion procedures, see the
Pathway/iTS TCP and Terminal
Programming Guide
.
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, see Section 6,
Procedure Division and Appendix A, Advisory Messages.
USER [ CONVERSION ]
numeric-literal
01 DIAGNOSTIC-ALLOWED PIC AAA.