Navigation:  Documentazione SCREENS > Files generati > 'NOMEPRG'.PRC > Gestione base > Z-CAMBIA-CONTROLLI > Z-CAMBIA-PAGINA-nn > Z-CAMBIA-TM-nomecampo

Viene costruita una routine di questo tipo per ciascun controllo della maschera che è soggetto a modifica di visibilità e/o abilitazione.

Permette la modifica delle proprietà ENABLED e VISIBLE

 

Esempio della chiamata alla routine

 

Una prima chiamata a questa funzione è presente all'interno di Z-CAMBIA-PAGINA-nn e/o Z-FORZA-CAMBIA-PAGINA-nn.

E' possibile richiamarla manualmente quando si vuole forzare la modifica all'abilitazione del singolo campo.

 

      z-cambia-pagina-00.

          move z-forza-cambia-ctr    to z-forza-cambia-pagina

          perform z-cambia-tm-num

          perform z-cambia-tm-des

 

 

Esempio della routine

 

NB: la condizione di abilitazione/visibilità viene definita manualmente all'interno di SCREENS.

 

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

     ** Modifica visibilita`/abilitazione campo:

     ** 'Numero informazione'

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

      z-cambia-tm-num.

          if a-operazione = "I"

             if x-enabled-tm-num = 0 or

                z-forza-cambia-ctr = 'S'

                move 1       to x-enabled-tm-num

                modify e-tm-num, enabled = 1

                    , color = t-cf-color-control

                             (k-idc-tm-num)

                modify e-label-tm-num, enabled = 1

                    , color = ext-color-label

             end-if

           else

             if x-enabled-tm-num = 1 or

                z-forza-cambia-ctr = 'S'

                move 0       to x-enabled-tm-num

                modify e-tm-num, enabled = 0

                    , color = ext-color-disabled

                modify e-label-tm-num, enabled = 0

                    , color = ext-color-disabled

             end-if

          end-if

          .