Extenso

1) Função MesExtenso

Retorna o nome do mês por extenso.

Sintaxe:
MesExtenso(nMes)

Parâmetros:
nMes – Número do mês (1 a 12). Se "nMes" não for informado, é assumido o mês da data base do sistema. Esta variável também pode ser caracter ("1" ou "2") ou do tipo data.

Retorna:
cNome – Nome do mês por extenso.

Exemplo:
msgalert ("Volta Redonda, " + strzero(day(dDataBase),2) +" de " + mesextenso(dDataBase) +" de "+ strzero(year(dDataBase),4))

2) Função Extenso
Gera o extenso de um valor numérico. Esta função retorna um valor, dinheiro ou quantidade, por extenso.

Sintaxe:
Extenso(nValor, lQtd, nMoeda)

Parametros:
nValor – Valor a ser gerado o extenso.

lQtd – Verdadeiro (.T.) indica que o valor representa uma quantidade.Falso (.F.) indica que o valor representa dinheiro. Se não for especificado, o default é falso (.F.).

nMoeda - Qual moeda do sistema deve ser o extenso.

Retorna:
cValor – Retorna o valor por extenso.

Exemplo:
nValor := SE1->E1_VALOR
msgalert ( extenso(nValor) )


Veja também: String para vetor