Navigation:  Documentazione SCREENS > Programma sorgente > X-SET-FL-MOD

Questa routine potrà essere utile per impostare il valore delle variabili FL-MOD-nomegrid.

 

Può essere utile per:

 

Rendere una griglia read-only.

Ad esempio, nei programmi di gestione tabella (vedi tabella provincie, COGF09), che possono essere richiamati:

•In selezione/consultazione: FL-MOD-nomegrid = "N"

•In manutenzione: FL-MOD-nomegrid = "S"

 

Quindi si dovrà:

 

A) Preparare la routine di modifica:

 

     **---------------------------------------------------------------**

     ** Imposto il contenuto di fl-mod-tm-tab

     **---------------------------------------------------------------**

      x-set-fl-mod.

          if a-modalita = "S"

             move "N"                  to fl-mod-tm-tab

           else

             move "S"                  to fl-mod-tm-tab

          end-if

          perform z-imposta-riga-alt-tm-tab

 

In questo esempio, il valore della variabile viene impostato in funzione della modalità di chiamata. Poi si esegue Z-IMPOSTA-RIGA-ALT-nomegrid, che modifica il layout della griglia.

          .

B) Chiamata alla routine:

 

Si deve includere la routine all'inizio del programma, dopo il comando "DISPLAY S-MM-1", ad esempio:

 

      a4.

          modify e-tm-tab, mass-update = 1

          move 1                        to i

          perform z-svuota-tutto-tm-tab

          modify e-tm-tab, mass-update = 0

          initialize tab-maschera

          perform x-status-bar-init

          perform z-carica-controlli

          display s-mm-1

 

    **--------------------------------------------------------------**

    ** CHIAMATA ESSENZIALE per capire nel sorgente in quale colonna

    **  sono

    **--------------------------------------------------------------**

          perform x-trova-col-num-tm-tab

          perform x-set-fl-mod