Formats

S370FZDSw.d Format

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

Category:	Numeric
Alignment:	left

Syntax

S370FZDSw.d

w

specifies the width of the output field.

Default:	8
Range:	2-32

d

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

Default:	0
Range:	0-31

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

The S370FZDSw.d format is similar to the S370FZDLw.d format except that the S370FZDSw.d format does not embed the sign of the number in the zoned output.
The S370FZDSw.d format is equivalent to the COBOL notation PIC S9(n) DISPLAY SIGN LEADING SEPARATE, where the n value is the number of digits.

y=put (x,s370fzds4.);
put y $hex8.;

Value of x	Results*
123	4EF1F2F3
-123	60F1F2F3
* 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.