S370FPDUw.d Informat

Reads unsigned packed decimal data in IBM mainframe format.

Category:

Numeric

Syntax

S370FPDUw.d

Syntax Description

w: specifies the width of the input field.

Default:1

Range:1–16

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

Default:0

Range:0–31

Details

Packed decimal data contain two digits per byte. The last half of the last byte, which indicates the sign for signed packed data, is always F for unsigned packed data.

Use S370FPDUw.d on other operating environments to read unsigned packed decimal data from IBM mainframe files.

Comparisons

The S370FPDUw.d informat is similar to the S370FPDw.d informat except that the S370FPDUw.d informat rejects all sign digits except F.
The S370FPDUw.d informat is equivalent to the COBOL notation PIC 9(n) PACKED-DECIMAL, where the n value is the number of digits.

Example

input @1 x s370fpdu3.;

Data Line 1	Result
----+----1
12345F	12345
1The data line is a hexadecimal representation of a binary number that is stored in packed decimal form. Each two hexadecimal characters correspond to one byte of binary data, and each byte corresponds to one column of the input field.