Z-nomegrid-CANCEL-ENTRY |
  
|
Z-nomegrid-CANCEL-ENTRY |
|
Gestione delle operazioni da eseguire prima dopo che l'utente ha annullato la modifica di una cella.
Esempio della chiamata alla routine
Questa routine viene richiamata da alcune procedure automatiche:
Esempio della routine
**---------------------------------------------------------------**
** Gestione CANCEL-ENTRY griglia: grid-det
**---------------------------------------------------------------**
z-grid-det-cancel-entry.
if tm-grid-det-dati-pnt = 0
exit paragraph
end-if
inquire e-grid-det (1, w-cell-x),
hidden-data in w-hidden-data
evaluate w-hid-data-col-id
when 'data'
move grb-r-data to tm-r-data (i)
perform x-controlla-tm-r-data-auto
perform x-ctr-color-tm-r-data
when 'ora'
move grb-r-ora to tm-r-ora (i)
when 'val-f'
move grb-r-val-f to tm-r-val-f (i)
when 'ana-des'
move grb-r-ana-des to tm-r-ana-des (i)
when 'check'
move grb-r-check to tm-r-check (i)
when 'ana-cod'
move grb-r-ana-cod to tm-r-ana-cod (i)
perform x-controlla-tm-r-ana-cod-auto
perform x-ctr-color-tm-r-ana-cod
when 'mer'
move grb-r-mer-cm to tm-r-mer-cm (i)
move grb-r-mer-dm to tm-r-mer-dm (i)
perform x-controlla-tm-r-mer-auto
perform x-ctr-color-tm-r-mer
end-evaluate
move i to k-rg
perform x-modify-riga-grid-det
.