dcl Source char value('Feel the Power');
dcl Target20 char(20);
dcl Target21 char(21);
Target20 = center (Source, length(Target20), '*');
/* '***Feel the Power***' - exactly centered */
Target21 = center (Source, length(Target21), '*');
/* '***Feel the Power****' - leaning left! */
z が省略される場合は、埋め込み文字にブランクが使われます。