Gestão de Pessoas - Manual do Usuário > Customizações > Funções > Extenso

Extenso

Gera o extenso de um valor (moeda) em três linhas.

Importante

Esta função contempla no máximo duas casas decimais após a virgula. Caso o valor tenha três ou mais casas decimais após a virgula, ele será arredondado para o valor real de duas.

Exemplo:1,5447 = um real e cinquenta e quatro centavos.

Sintaxe: Extenso (Valor, Tamanho_Linha1, Tamanho_Linha2, Tamanho_Linha3, Linha1, Linha2, Linha3);

Parâmetros:

Nome	Tipo	Descrição
ValorCampo	Numérico	Variável do qual se deseja obter o extenso.
Tamanho_Linha1	Numérico	Quantidade de caracteres que será usado na primeira linha para geração do extenso.
Tamanho_Linha2	Numérico	Quantidade de caracteres que será usado na segunda linha para geração do extenso.
Tamanho_Linha3	Numérico	Quantidade de caracteres que será usado na terceira linha para geração do extenso.
Linha1	Alfa	Variável que receberá a primeira linha do extenso do valor.
Linha2	Alfa	Variável que receberá a segunda linha do extenso do valor.
Linha3	Alfa	Variável que receberá a terceira linha do extenso do valor.

Exemplo: Deseja-se gerar o extenso do valor do salário do empregado.

Definir Alfa VextLin1;
Definir Alfa VextLin2;
Definir Alfa VextLin3;
Extenso (R034Fun.ValSal,30,30,30,VExtLin1,VextLin2,VextLin3);

Logo, se o valor do salário do empregado fosse, por exemplo, R$ 1.577,95 teríamos o seguinte resultado:

VextLin1 = "Um mil, quinhentos e setenta e"

VextLin2 = " sete reais e noventa e cinco "

VextLin3 = "centavos *********************"

Utilização: Gerador de Relatórios.