PLIFILL

PLIFILL moves z copies of the byte y to the location x without any conversions, padding, or truncation.

Read syntax diagramSkip visual syntax diagramPLIFILL( x, y, z)
x
Expression. x must be declared POINTER or OFFSET. If it is OFFSET, x must be declared with the AREA attribute.
y
Must be declared CHARACTER(1) NONVARYING.
z
Expression. It is converted to type size_t 1.

Example

  dcl 1 Str1,
        2 B  fixed bin(31),
        2 C  pointer,
        2 * union,
          3 D  char(4),
          3 E  fixed bin(31),
          3 *,
            4 * char(3),
            4 F fixed bin(8) unsigned,
        2 * char(0)
             initial call plifill( addr(Str1), '00'x, stg(Str1) );