Navigation:  Procedure Interne > Generale/servizio > Files generati > 'NOMEPRG'.PRC > Gestione griglie modo "A" > X-DESTROY-MENU-nomegrid

Rimozione dell'handle del menu pop-up dalla memoria.

 

Esempio della chiamata alla routine

 

Questa routine viene richiamata alla fine del programma:

 

     *

      fine.

      z-chiudi.

          perform z-close-files

          close t-grid-det

          delete t-grid-det

          perform x-destroy-menu-grid-det

          close window w-sv-cur-prg

          perform z-99-exit-program

          exit program

          .

 

 

 

Esempio della routine

 

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

     * DESTROY del menu pop-up griglia

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

      x-destroy-menu-grid-det.

          if grid-det-menu-handle <> 0

             call 'W$MENU' using wmenu-destroy, grid-det-menu-handle,

                    giving myResult

          end-if

          .