S370FPDw.d Format

Writes packed decimal data in IBM mainframe format.

Category:	Numeric
Alignment:	left

Syntax

S370FPDw.d

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

Default:0

Range:0–31

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

The following table shows the notation for equivalent packed decimal formats in several programming languages:

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

Value of `x`	Result 1
	----+----1
128	0000128C
1The result is a hexadecimal representation of a binary number written in packed decimal format. Each byte occupies one column of the output field.