Preencher com zeros campos numericos ñ preenchidos

[Gilberto M Silva]

como faço para preencher com zeros campos numericos não preenchidos? por ex: eu comando a impressão do sequinte valor:
preco = 5,50
@prow()+01,01 say preco pict "@e 999,999.99"
então ele será impresso no formato "5,50"
eu quero que imprima no formato "000005,50".
não pode ser string tem que ser numérico
Qual comando devo usar?? obg.

[Toledo]

Gilberto, veja um exemplo do que você pode fazer:

Código: Selecionar todos

vpreco:=5.50
@ 10,10 say TRANS(STRZERO((vpreco*100),8),"@R 999999,99")

Abraços,