RetExtValor

Esta função retorna o extenso de um valor (moeda) em duas linhas, sem acentuação, completando o espaço restante com o caracter "*".

Sintaxe: RetExtValor (Numero xValor, Numero xTamanho1, Numero xTamanho2, Alfa End PExt1, Alfa End PExt2)

Parâmetros:

Nome	Tipo	Descrição
xValor	Numérico	Valor que se deseja saber o extenso.
xTamanho1	Numérico	Tamanho (em caracteres) do primeiro extenso.
xTamanho2	Numérico	Tamanho (em caracteres) do segundo extenso.
xPExt1	Alfa	Retorno do primeiro Extenso.
xPExt2	Alfa	Retorno do segundo Extenso.

Exemplo:

Preciso do extenso do valor 1.345,15.

Logo, as variáveis xext1 e xext2 retornarão:

xext1 = "um mil e trezentos e quarenta e cinco reais e ***";
xext2 = "quinze centavos ***********************************";

Utilização: Gerador de Relatórios e Regras.