I need to change the following string formula to be Right Justified it is currently print out as Left. Can anyone help me change it.

//firstpay e-name 40 digits

StringVar T1;
StringVar T2;
StringVar ExStr;
NumberVar L;
NumberVar X;
T1:=' ';
X:=Length(T1);
ExStr:=left({CHECK_MSTR.NAME},40);
L:=Length(ExStr);
T2:=left(T1, X-L)+ExStr;
T2;