S370FZDLw.d Format

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

Syntax

S370FZDLw.d

Syntax Description

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

Details

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

Comparisons

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

Example

y=put(x,s370fzdl3.);
put y $hex6.;
Value of x
Result 1
123
C1F2F3
-123
D1F2F3
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.