Anterior Sumário Próximo OpenBASE! o Banco de Dados inteligente. Fale conosco!

SET Align

Propósito

Alinhar números inteiros em máscaras com decimais.

Sintaxe

SET ALIGN ON | off

Utilização

Para que números inteiros, ao serem formatados, não sejam alinhados como decimais e sim como inteiros.

Exemplo

O exemplo a seguir mostra-nos a utilização deste comando. Compare os resultados dos três primeiros comandos com o resultado dos três últimos.

PROG

var_num = 123456

@ 00,01 SAY TRANSFORM ("99999,99",var_num)

@ 01,01 SAY var_num USING "99999,99"

@ 02,01 GET var_num PIC "99999,99"

read

SET ALIGN OFF

var_num = 123456

@ 03,01 SAY TRANSFORM ("99999,99",var_num)

@ 05,01 SAY var_num USING "99999,99"

@ 06,01 GET var_num PIC "99999,99"

read

Consulte

@ ... GET, @ ... SAY, SET DECIMALS, SET DEVICE, SET POINT, STORE, CHEXME( ) e TRANSFORM( ).

Anterior Sumário Próximo OpenBASE! o Banco de Dados inteligente. Fale conosco!