Me imagino que es una version de prueba... pero me surgiò una duda, para que es la siguiente linea?

m.nDigits = 16 - 4

Digo, podria haber sido asignada directamente a 12, no?

LPARAMETERS nCurrency

LOCAL cMask, nDigits, nDecimals

m.nDigits = 16 - 4
m.nDecimals = SET('DECIMALS')
m.cMask = RIGHT('$$$,$$$,$$$,$$$,$$$,$$$', m.nDigits) + ;
          IIF(m.nDecimals > 0, '.' + REPLICATE('9', m.nDecimals), '')

RETURN TRANSFORM(ROUND(m.nCurrency,m.nDecimals), m.cMask)