Informats

S370FZDSw.d Informat

Reads zoned decimal separate leading-sign data in IBM mainframe format.

Category:

Numeric

Syntax

S370FZDSw.d

w

specifies the width of the input field.

Default:	8
Range:	2-32

d

specifies the power of 10 by which to divide the value. This argument is optional.

Default:	0
Range:	0-31

Use S370FZDSw.d on other operating environments to read zoned decimal data from IBM mainframe files.

Zoned decimal separate leading-sign data is similar to standard zoned decimal data except that the sign of the value is stored in the first byte of zoned decimal leading sign data, and the first digit of the value is stored in the second byte.
The S370FZDSw.d informat is equivalent to the COBOL notation PIC S9(n) DISPLAY SIGN LEADING SEPARATE, where the n value is the number of digits.

input @1 x s370fzds4.;

Data Line*	Results
----+----1
4EF1F2F3	123
60F1F2F3	-123
* The data line contains a hexadecimal representation of a binary number that is stored in zoned decimal format on an IBM mainframe operating environment. Each two hexadecimal characters correspond to one byte of binary data, and each byte corresponds to one column of the input field.