EXTENT

Código:

DEFINE VARIABLE nome AS CHARACTER EXTENT 10.
DEFINE VARIABLE i    AS INT. 

ASSIGN nome[1] = "Im".
ASSIGN nome[2] = "sl4v3r".

DO i = 1 TO 10:
   message nome[i] VIEW-AS ALERT-BOX.       
END.

Cabe um comentário:

Código:

ASSIGN nome[1] = "Im".
ASSIGN nome[2] = "sl4v3r".

Essa parte do código pode ser melhorada, para questões de perfomance:

Para uma perfomance maior o correto seria:

Código:

ASSIGN nome[1] = "Im"
       nome[2] = "sl4v3r".

Também cabe um exemplo de como criar a variável extent já com dados iniciais:

Código:

DEFINE VARIABLE nome AS CHARACTER EXTENT 2 INITIAL ["Sim","Não"].

Justamente...