Navigation:  Documentazione SCREENS > Files generati > 'NOMEPRG'.PRC > Gestione griglie modo "A" > Z-nomegrid-TEST-LUNGHEZZA

Routine che verifica se è possibile aggiungere una colonna alla chiave di ordinamento, restituendo l'esito

 

Esempio della chiamata alla routine

 

Questa routine viene richiamata da alcune procedure automatiche. Le routine automatiche sono:

•Z-nomegrid-RIORDINA-RECORD

 

 

Esempio della routine

 

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

     * Verifico se la stringa di ordinamento non supera i 250 caratteri

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

      z-grid-det-test-lunghezza.

          if (gor-r-off + gor-r-fld - 1) > gor-r-l-ord

             compute gor-r-fld = gor-r-l-ord -gor-r-off + 11

             move m-tb-ord-troppo-lungo to wb-msg

             perform vbx-msg-error

             move 'N' to gor-r-ok

          end-if

          .