Hi all. I'm back from my holidays

A custom wants the code of his products were printed always (always) with zeros in the left side and thousands separator.

The problem is when the numbre is < 1000: fox replace separator with another zero.
¿Some other idea?
¿Must i write a routine to converting in a string like long time ago?

trans(45678, "@L 999,999") returns 045.678
trans(678, "@L 999,999") returns 0000678