Preencher strings (direita e esquerda)

Frequentemente precisamos preencher alguma string com zeros a esquerda ou algo similar. Um lugar onde frequentemente vemos isto é quando vamos trabalhar com CNAB, onde devemos mandar X casas e só temos (X-5), ex.: Preciso mandar 000003, mas o número que tenho no AX é 3, e para isso, muitos (me incluo nestes) acabam reinventando a roda e fazendo loops para preencher e etc.

O uso é bem simples como podem ver abaixo:

1. static void Job2(Args _args)
2. {
3.     int i = 1;
4.     str formatedLeft, formatedRight;
5.     str finalResultLeft, finalResultRight;
6.     ;
8.     formatedLeft = strRFix(int2str(i), 5, "0");
9.     formatedRight = strLFix(int2str(i), 5, "0");
10.     finalResultLeft = strFmt("NUM-%1", formatedLeft);
11.     finalResultRight = strFmt("NUM-%1", formatedRight);
12.     info(strFmt("%1 - %2", finalResultLeft, finalResultRight));
13. }

[]'s

Alexssander