Parte ii - IIS Marconi Latina - Area didattica

910 volume V Programmazione
|005300 MOVE 1 TO EOJ.
|005400*-----------------------------------------------------------------
|005500 SCANSIONE.
|005600 DISPLAY COGNOME (IND-UTENTE), " ",
|005700 NOME (IND-UTENTE), " ",
|005800 NOTA (IND-UTENTE).
|005900*
82.7.5 Tabelle ordinate
«
Se si devono utilizzare i dati in una tabella per eseguire una ricerca al suo interno (utilizzando
l’istruzione ‘SEARCH’ nella divisione ‘PROCEDURE DIVISION’), se si può essere certi che le
informazioni contenute siano ordinate secondo una certa chiave, lo si può specificare nella
dichiarazione:
La metavariabile data-name-4 dello schema sintattico rappresenta una variabile contenuta
nell’elemento ricorrente; attraverso la parola chiave ‘ASCENDING’ si intende dichiarare
che la tabella è ordinata, lessicograficamente, in modo ascendente, secondo il contenuto di
quella variabile, se invece si usa la parola chiave ‘DESCENDING’, si intende un ordinamento
decrescente.
È possibile specificare più chiavi di ordinamento successive, nel caso si vogliano abbinare
chiavi secondarie di ordinamento.
Sia chiaro che la tabella deve già risultare ordinata secondo le chiavi specificate, altrimenti
le istruzioni ‘SEARCH’ della divisione ‘PROCEDURE DIVISION’ danno risultati errati o falliscono
semplicemente. Naturalmente, all’interno del programma è possibile prevedere un
procedimento di riordino, da eseguire prima di utilizzare delle istruzioni ‘SEARCH’.
L’esempio seguente mostra l’indicazione della chiave di ordinamento, costituita precisamente
dalla variabile ‘COGNOME’, che deve risultare ascendente in fase di ricerca:
|001000 WORKING-STORAGE SECTION.
|001100 01 RECORD-UTENTI.
|001200 02 UTENTE OCCURS 1 TO 60 TIMES
|001300 DEPENDING ON UTENTI-MAX
|001350 ASCENDING KEY IS COGNOME
|001400 INDEXED BY IND-UTENTE.