SET Ext

• Sintaxe
• Argumentos
• Utilização
• Exemplo
• Consulte

Determinar o retorno da função EXT( ) (singular e plural).

Sintaxe

SET EXT TO <cad1> <cad2> <cad3> <cad4> [<cad5>]

Argumentos

<cad1>	representa o valor inteiro no singular.
<cad2>	representa o valor inteiro no plural.
<cad3>	representa o valor decimal no singular.
<cad4>	representa o valor decimal no plural.
<cad5>	representa o complemento do extenso.

Utilização

Para alterar a saída da função de extenso (EXT( )), possibilitando imprimir por extenso diversas medidas .

Exemplo

O exemplo a seguir mostra a impressão do extenso do valor de var_num em três medidas diferentes.

PROG

SET DECIMALS TO 2 ON var_num

var_num = 10.80

? EXT (var_num,1,80,1)

SET EXT TO "Metro" "Metros" "Centímetro" "Centímetros"

? EXT (var_num,1,80,1)

SET EXT TO "Dollar" "Dollars" "Cent" "Cents"

? EXT (var_num,1,80,1)

Consulte

EXT( ).