S370FZDSw.d Format

Writes zoned decimal separate leading-sign data in IBM mainframe format.
Category: Numeric
Alignment: left

Syntax

S370FZDSw.d

Syntax Description

w
specifies the width of the output field.
Default:8
Range:2–32
d
specifies to multiply the number by 10d. This argument is optional.
Default:0
Range:0–31

Details

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.

Comparisons

  • 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.

Example

y=put (x,s370fzds4.);
put y $hex8.;
Value of x
Result 1
123
4EF1F2F3
-123
60F1F2F3
1The result is a hexadecimal representation of a binary number in zoned decimal format on an IBM mainframe computer. Each two hexadecimal characters correspond to one byte of binary data, and each byte corresponds to one column of the output field.