Perguntas Inclusão de zeros antes do saldo

Sei que é uma duvida bem simples mas eu queria saber como faço para gerar cod de barras + a quantidade disponível em estoque composto por 9 dígitos, exemplo: 120 unidades = 000000120

do jeito que esta a minha fonte gero apenas 120.
alguém pode dar uma sugestão?

cString := "80"
cString += Alltrim(TRB->B1_CODBAR)
cString += strtran(Transform((nQuant ),"@E 99999999"),",",".")
Fwrite(n_outfile, cString + chr(13) + chr(10), Len(cString) + 2)

Elivelton,

Use a função STRZERO:

tdn.totvs.com/display/tec/StrZero

Deve suprir o que precisa

Inocencio,
eu usei da seguinte maneira mas deu erro pois é numérico e não carácter
como posso converter??

cString += StrZero(Val(nQuant), 9, 0)

Inocencio,
descobri tirei o Val que não devia estar ali e fiz assim e funcionou.
Valeu pela dica!!!!!!!!!!!!!!!!!!!!!!!!

cString := "80"
cString += Alltrim(TRB->B1_CODBAR)
cString += STRZERO(nquant, 9, 0)
Fwrite(n_outfile, cString + chr(13) + chr(10), Len(cString) + 2)

Maravilha.

Precisando de mais informação, posta aí que a galera ajuda.