COBOL Manual for TNS and TNS/R Programs

Data Division
HP COBOL Manual for TNS and TNS/R Programs—522555-006
7-63
PICTURE Clause
°
In the PADDING clause of the SELECT statement
°
In a RECEIVE-CONTROL paragraph
°
In the SPECIAL-NAMES paragraph
°
As the identifier in a CALL statement
°
As the identifier in a CANCEL statement
°
In comparison with a nonnational data item or nonnational literal
If national data items and national literals are used for items in a STRING
statement (part-1, delimiter, or result ) or an UNSTRING statement
(delim-1, delim-2, result, or delimstore ), all the items must be national
data items or national literals.
If you use a VALUE clause with a national item, you must precede the value with N
or n with no space between N or n and the value. For example:
01 kanji-field PIC N(4) VALUE IS N"kanji-value"
where kanji-value is a Kanji literal.
•
Editing Characters
Editing is done by inserting, suppressing, or replacing a character. Editing occurs
when a value is moved into a data item whose PICTURE character-string contains
editing characters. The primary purpose of editing is to easily transform data into
reportable form.
The methods of editing are:
°
Simple insertion
°
Special insertion
°
Fixed insertion
°
Floating insertion
°
Zero suppression
The type of editing that you can perform on an item depends on the item’s
category.
Table 7-3. Types of Editing Performed
Data Item Category Type of Editing
Alphabetic None
Numeric None
Alphanumeric None
Alphanumeric Edited Simple insertion [0, B, or slash (/)]
Numeric Edited All, subject to note following table
National None