Popular um vetor com os nomes de todas as colunas de uma datawindow

No exemplo abaixo, o vetor as_colunas será preenchido com os nomes de todas as colunas da datawindow adw_dw. O código abaixo retorna apenas as colunas de dados, incluindo computed columns; outros controles como computed fields não são considerados. Código compilado na versão 10.2.1 do PowerBuilder.

Código PowerBuilder:

/* Argumentos:
   adw_dw - datawindow
   as_colunas - vetor de strings a ser preenchido
*/


int i,j
boolean lb_ha_col
string ls_nome_col


i = 0
j = 0
lb_ha_col = true

DO WHILE lb_ha_col
   i ++
   ls_nome_col = adw_dw.describe("#" + string(i) + ".name")
   if ls_nome_col = "!" then
      lb_ha_col = false
      continue
   end if
   j ++
   as_colunas[j] = ls_nome_col
LOOP