English
Español
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.
English
Español
