Função SubTotal em Excel

Acima colocamos exemplos para o caso, é da seguinte forma:

Código:

/* colunas de somatorias */
DEF VAR colunas-somadas AS INT EXTENT 3 INIT [12, 13, 14].

/* subtotal onde temos: (indice, [soma, media, etc], colunas de somatoria, não me lembro, não me lembro, não me lembro) */
chPlanilha:range(chPlanilha:COLUMNS(1),chPlanilha:COLUMNS(i-cont-coluna)):Subtotal(1, 1, colunas-somadas, FALSE, FALSE, FALSE).
chPlanilha:range(chPlanilha:COLUMNS(1),chPlanilha:COLUMNS(i-cont-coluna)):Subtotal(2, 1, colunas-somadas, FALSE, FALSE, FALSE).
chPlanilha:range(chPlanilha:COLUMNS(1),chPlanilha:COLUMNS(i-cont-coluna)):Subtotal(3, 1, colunas-somadas, FALSE, FALSE, FALSE).

ChPlanilha:Outline:ShowLevels(4).

Eu inclui este codigo no meu programa,

excelAppl:range(excelAppl:COLUMNS(1),excelAppl:COLUMNS(14)):Subtotal(1, 1, colunas-somadas, FALSE, FALSE, FALSE).

porem retorna a mensagem abaixo:

** Only individual array elements are allowed in expressions or on the right-hand-side of non-array assignments. (361)
** Could not understand line 462. (196)

Creio que tenha algo na definição com o INIT.
Tente mudar o código da seguinte forma:

Código:

/* colunas de somatorias */
DEF VAR colunas-somadas AS INT EXTENT 3.

ASSIGN colunas-somadas[1] = 12
       colunas-somadas[2] = 13
       colunas-somadas[3] = 14.

/* subtotal onde temos: (indice, [soma, media, etc], colunas de somatoria, não me lembro, não me lembro, não me lembro) */
chPlanilha:range(chPlanilha:COLUMNS(1),chPlanilha:COLUMNS(i-cont-coluna)):Subtotal(1, 1, colunas-somadas, FALSE, FALSE, FALSE).
chPlanilha:range(chPlanilha:COLUMNS(1),chPlanilha:COLUMNS(i-cont-coluna)):Subtotal(2, 1, colunas-somadas, FALSE, FALSE, FALSE).
chPlanilha:range(chPlanilha:COLUMNS(1),chPlanilha:COLUMNS(i-cont-coluna)):Subtotal(3, 1, colunas-somadas, FALSE, FALSE, FALSE).

ChPlanilha:Outline:ShowLevels(4).

Qualquer coisa, o KB P158166 pode dar mais informações.