Rational Developer for System z
Enterprise PL/I for z/OS, Version 3.8, Language Reference Manual

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) );

Terms of use | Feedback

This information center is powered by Eclipse technology. (http://www.eclipse.org)