LEFT returns a string that is the result of inserting string x at the left end of a string with length n and padded on the right with the character z as needed.
>>-LEFT(x,n-+----+-)------------------------------------------->< '-,z-'
dcl Source char value('One Hundred SCIDS Marks');
dcl Target char(30);
Target = left (Source, length(Target), '*');
/* 'One Hundred SCIDS Marks*******' */
If z is omitted, a blank is used as the padding character.