VMSZNw.d Informat

Reads VMS and MicroFocus COBOL zoned numeric data.

Category:

Numeric

Syntax

Details

Example

Syntax

VMSZNw.d

Required Arguments

w: specifies the width of the output field.

Default:1

Range:1–32

d: specifies the number of digits to the right of the decimal point in the numeric value. This argument is optional.

Details

The VMSZNw.d informat is similar to the ZDw.d informat. Both read a string of ASCII digits, and the last digit is a special character denoting the magnitude of the last digit and the sign of the entire number. The difference between the VMSZNw.d informat and the ZDw.d informat is in the special character used for the last digit. The following table shows the special characters used by the VMSZNw.d informat.

Desired Digit	Special Character	Desired Digit	Special Character
0	0	-0	p
1	1	-1	q
2	2	-2	r
3	3	-3	s
4	4	-4	t
5	5	-5	u
6	6	-6	v
7	7	-7	w
8	8	-8	x
9	9	-9	y

Data formatted using the VMSZNw.d informat are ASCII strings.

Example

input @1 vmszn4.;

Data line	Result
----+----1
1234	1234
123t	-1234

VMSZNw.d Informat

Syntax

Required Arguments

Details

Example

See Also