Sviluppo4d.it
Sito indipendente di informazioni tecniche per sviluppatori 4th Dimension italiani  

Sviluppatori 4D

Utility 4D

Risorse 4D



4d logo
Naviga: Prev Next

Titolo: Costruire una Lista Gerarchica

Categoria: Codice Ultimo Aggiornamento: 24/06/04


Ecco un codice di esempio per costruire una lista gerarchica di due livelli, basata su una struttura con una tabella [Padri] e una di [Figli] in relazione.

C_LONGINT(Lista_l;$sottolista_l;$padri_l)
ListaGerarchica_l:=New list  ` Ne creo una nuova
ALL RECORDS([Padri])
For ($padri_l;1;Records in selection([Padri]))
      RELATE MANY([Padri])  `seleziona eventuali figli di questo padre
      If (Records in selection([Figli])>0)  `controlla se ce ne sono
           ORDER BY([Figli];[Figli]Nome)
           $sottolista_l:=New list  `crea una lista temporanea dei figli
           For ($i;1;Records in selection([Figli]))
               `per ogni figlio aggiunge il figlio all'elenco dei figli
              APPEND TO LIST($sottolista_l;[Figli]Nome;-1*Record number([Figli])) 
              NEXT RECORD([Figli])
           End for
      End if
        ` aggiunge il padre e il suo elenco dei figli alla lista principale
      APPEND TO LIST(ListaGerarchica_l;[Padri]Nome;Record number([Padri]);$sottolista_l;True)
      NEXT RECORD([Padri])
End for

Inviato da: Umberto Migliore Visite: 7466

Se accedi con utente e password, puoi aggiungere dei commenti.


Accesso

User: Nuovo
Pass: Accedi

Utenti Registrati

Cerca

Se non trovi le informazioni che cerchi scrivi a aiuto@sviluppo4d.it

4D Principali

4D Discussioni

Faq random


Crediti

Dominio registrato da ZetaNet
Sito realizzato da Nexus srl
4D SQL 11.9.0 offerto da 4D & Italsoftware
Icone di FAMFAMFAM
Moderato da Umberto Migliore
264 utenti registrati

Pagina servita il 24/06/17 alle 00:36:34 Valid HTML 4.01! Valid CSS!

Mutuo Facile, Serie Filmcards, Serie Singloids e altre app di Nexus srl per iPhone e iPad

Cidroid, distributore italiano lettori barcode per Apple iPhone, iPod, iPad della IPC