Questa routine permette di caricare l'ordine delle colonne di una griglia all'interno di apposite variabili specifiche generate nella ".WRK" (GCN-nomecolonna)
NB: questa versione analizza il contenuto della griglia attraverso un'area di linkage restituita da GRIDADMN ed è alternativa a X-TROVA-COL-NUM-nomegrid
Esempio della chiamata alla routine
Questa routine è essenziale nel caso di griglia modificabile, ma è consigliabile anche per gli altri programmi.
Va messa nella parte iniziale di un programma, dopo le routine iniziali e soprattutto dopo la Z-PREPARA-nomegrid.
....
display s-mm-1
perform z-costruisci-controlli
perform z-prepara-tm-grid
* Caricamento id colonne griglia
perform x-trova-col-hd-grid-det
.
Esempio della routine
*------------------------------------------------------------------
* Ricerca posizioni colonna per: tm-tab
*------------------------------------------------------------------
x-trova-col-hd-tm-tab.
move 0 to k
perform gdad-hd-pnt times
add 1 to k
move gdad-hd-ele (k) to w-hidden-data
evaluate w-hid-data-col-id
when 'num'
move k to gcn-num
when 'des'
move k to gcn-des
when 'tip'
move k to gcn-tip
when 'lun'
move k to gcn-lun
when 'lun-dec'
move k to gcn-lun-dec
.....
when 'liv-filtro'
move k to gcn-liv-filtro
when 'liv-ordine'
move k to gcn-liv-ordine
when 'filtro-main'
move k to gcn-filtro-main
when 'link'
move k to gcn-link
when 'fl-id'
move k to gcn-fl-id
when 'dato-calcolato'
move k to gcn-dato-calcolato
end-evaluate
end-perform
.