Pathway/iTS TCP and Terminal Programming Guide

Processing Double-Byte Character Sets
Compaq NonStop™ Pathway/iTS TCP and Terminal Programming Guide—426751-001
8-13
Procedure Division
•
The UPSHIFT clause is a valid screen-field attribute for PIC N fields, but it is useful
only on mixed fields—for example, PIC N(10)A(10).
The translation routines upshift lowercase characters on output to IBM 3270 devices
configured to use 1-byte Katakana characters. Upshifting of lowercase characters is
not done on input for these devices because they cannot generate lowercase
characters.
Upshifting on output is not done for 3270-type devices configured to use both
lowercase and uppercase 1-byte alphabetic characters. These devices cannot display
or generate 1-byte Katakana characters.
•
When the VALUE clause is used for a field that allows only double-byte data, the
literal string provided must follow the same rules as those defined for a VALUE
clause associated with a Working-Storage PIC N field.
•
Programs that use a double-byte character set, identified by the CHARACTER-SET
IS KANJI-KATAKANA clause, are restricted in their ability to define input control-
character clauses. They can use only single-byte characters from the ASCII
character set.
Procedure Division
The Procedure Division includes all of the processing steps for the program. As the
Compaq NonStop™ Pathway/iTS SCREEN COBOL Reference Manual explains, these
steps consist of SCREEN COBOL statements and sentences, grouped into paragraphs,
procedures, and sections.
IF Statement
SCREEN COBOL program units use an IF statement to evaluate a condition and then
transfer control depending on whether the value of a condition is true or false. In
addition to the general conventions for IF statements described in the Compaq
NonStop™ Pathway/iTS SCREEN COBOL Reference Manual, when developing
Pathway applications for double-byte character sets you must consider the following:
•
Comparisons (using GREATER THAN, LESS THAN, EQUAL, and so on) of a
PIC N data item or literal with a numeric data item (PIC 9) are not allowed.
•
All other comparisons are allowed and are done on a byte-by-byte basis.
If a comparison of a numeric data item and a double-byte character set data item is
attempted, the compiler issues an error message at the time of compiling.