S370FPDUw.d

S370FPDUw.d

Writes unsigned packed decimal data in IBM mainframe format

Category: Numeric

Alignment: left

Syntax
Syntax Description
Details
Comparisons
Examples

Syntax

S370FPDUw.d

Syntax Description

w

specifies the width of the output field.

Default:	1
Range:	1-16

d

optionally specifies to multiply the number by 10^d.

Details

Use S370FPDUw.d in other operating environments to write unsigned packed decimal data in the same format as on an IBM mainframe computer.

Comparisons

The S370FPDUw.d format is similar to the S370FPDw.d format except that the S370FPDw.d format always uses the absolute value instead of the signed value.
The S370FPDUw.d format is equivalent to the COBOL notation PIC 9(n) PACKED-DECIMAL, where the n value is the number of digits.

Examples

y=put(x,s370fpdu2.);
put y $hex4.;

Values Results*

123

123F

-123

123F

*The result is a hexadecimal representation of a binary number written in packed decimal format. Each two hexadecimal digits correspond to one byte of binary data, and each byte corresponds to one column of the output field.

Values	Results*
123	123F
-123	123F
*The result is a hexadecimal representation of a binary number written in packed decimal format. Each two hexadecimal digits correspond to one byte of binary data, and each byte corresponds to one column of the output field.

Chapter Contents
Previous
Next
Top of Page