English
Español
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. |
Preciso do extenso do valor 1.345,15.
<div class="Code"><p>Definir Alfa xext1;<br></br>Definir Alfa xext2;<br></br>RetExtValor(1345.15, 50, 50, xext1, xext2); </p></div>
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.
English
Español
