
Declarar variáveis locais e/ou atribuir valores a qualquer variável.
STORE <exp> TO <var1> [,[<varn>...] <var1>[,<varn>...] = <exp>
<exp> representa a expressão a ser atribuída a uma ou mais variáveis.
<var> é a variável que receberá o valor de <exp>.
Declara variáveis locais e/ou atribuir valores a variáveis de qualquer tipo ou a elementos de vetores pré-declarados.
Mais de uma variável pode ser especificada bastando separá-las por uma "," (vírgula) .
Se a variável não existir, esta será declarada com o valor e o tipo da expressão, caso contrário ela receberá apenas o valor da expressão que deve ser de mesmo tipo.
O exemplo a seguir mostra-nos a declaração de duas variáveis lógicas e duas variáveis numéricas.
STORE .T. TO varlog1, varlog2
varnum1, varnum2 = 123
O exemplo a seguir mostra-nos, na mesma instrução, a atribuição de valores a um elemento de vetor e a declaração de uma variável.
DECLARE vet[12]= NTOF(0)
STORE NTOF(36.8) TO varflo, vet[5]
$DATE, $FLOAT, $LEN, $LENTMP, @ ... GET, ACCEPT, DECLARE, INPUT, PRIVATE PUBLIC, SET DECIMALS e SPACE( ).
