Formats

S370FZDLw.d Format

Writes zoned decimal leading-sign data in IBM mainframe format.

Category:	Numeric
Alignment:	left

Syntax

S370FZDLw.d

w

specifies the width of the output field.

Default:	8
Range:	1-32

d

specifies to multiply the number by 10^d. This argument is optional.

Default:	0
Range:	0-31

Use S370FZDLw.d in other operating environments to write zoned decimal leading-sign data in the same format as on an IBM mainframe computer.

The S370FZDLw.d format is similar to the S370FZDw.d format except that the S370FZDLw.d format displays the sign of the number in the first byte of the formatted output.
The S370FZDLw.d format is equivalent to the COBOL notation PIC S9(n) DISPLAY SIGN LEADING, where the n value is the number of digits.

y=put(x,s370fzdl3.);
put y $hex6.;

Value of x	Results*
123	C1F2F3
-123	D1F2F3
* The result is a hexadecimal representation of a binary number in zoned decimal format on an IBM mainframe computer. Each two hexadecimal digits correspond to one byte of binary data, and each byte corresponds to one column of the output field.