S370FPDUw.d

S370FPDUw.d

Reads unsigned packed decimal data in IBM mainframe format

Category: Numeric

Syntax
Syntax Description
Details
Comparisons
Examples

Syntax

S370FPDUw.d

Syntax Description

w

specifies the width of the input field.

Default:	1
Range:	1-16

d

optionally specifies the power of 10 by which to divide the value

Range:

0-10

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.

Examples

input @1 x s370fpdu3.;

Data Lines* Results

----+----1

12345F

12345

*The data line is a hexadecimal representation of a binary number that is stored in packed decimal form. Each two hexadecimal digits correspond to one byte of binary data, and each byte corresponds to one column of the input field.

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

Chapter Contents
Previous
Next
Top of Page