Pathway/iTS SCREEN COBOL Reference Manual (G06.24+, H06.03+, Pathway/iTS 1.0+)

Data Division
Compaq NonStop™ Pathway/iTS SCREEN COBOL Reference Manual—426750-001
5-57
Field-Characteristic Clauses
The following rules apply:
•
A TO, FROM, or USING clause can be specified only with an elementary screen
field.
•
The TO and FROM clauses can both be specified for a screen field. If both clauses
are specified, the data names can differ.
•
If a data association clause is specified for any field, a PICTURE clause must also
be specified for that field.
•
The category of the screen field must be compatible with the associated data item in
the Working-Storage Section or Linkage Section. A numeric edited field must be
associated with a numeric data item, and an alphabetic edited field must be
associated with an alphabetic or alphanumeric data item.
The data movement occurs in connection with the execution of a DISPLAY or ACCEPT
statement. The statements explicitly or implicitly name the screen field containing the
data association clause.
UPSHIFT Clause
The UPSHIFT clause specifies that lowercase alphabetic characters are to be translated
to uppercase characters for input and output.
If UPSHIFT appears by itself, INPUT-OUTPUT is assumed. If this clause is omitted,
lowercase alphabetic characters for the field remain in lowercase. The UPSHIFT clause
is a valid screen field attribute for PIC N fields but is really useful only on mixed fields
(PIC N(10)A(10), for example).
USER CONVERSION Clause
The USER CONVERSION clause gives a user-defined number to be passed with the
field to a conversion procedure.
The USER CONVERSION clause is used only if the application makes use of a user
conversion procedure.
When an input screen field contains only blanks or fill characters, use the CONVERT
BLANKS to allow the USER CONVERSION clause to be invoked.
UPSHIFT [ INPUT ]
[ OUTPUT ]
[ INPUT-OUTPUT ]
[ I-O ]
Note. If an alphanumeric field is declared with the UPSHIFT and USER CONVERSION
clauses, the TCP upshifts the field both before and after the user conversion procedure is
called.
USER [ CONVERSION ] numeric-literal