Nummerierte Liste / Baum aus nested structure machen (Datenbanken und Verzeichnisdienste)

[thread]14733[/thread]

Nummerierte Liste / Baum aus nested structure machen

Leser: 19

Articles: hide open all | hide show old branches

+4 replies
pktm

2010-02-26 00:04
User since
2003-08-07
2921 Artikel
BenutzerIn
Hallo!

Wenn ich so eine nested structure habe:
Code: (dl )

1 2 3 4 5

id|lft|rgt|ident 1 | 1 | 8 | root 2 | 2 | 5 | a 3 | 3 | 4 | b 4 | 6 | 7 | c
Wie kann ich daraus eine nummerierte Liste machen, also sowas in der Art hier:
Code: (dl )

1 2 3 4

1. root 1.2 a 1.2.1 b 1.3 c
Ich stehe da gerade auf dem Schlauch.

Grüße, pktm
http://www.intergastro-service.de (mein erstes CMS :) )
- +3 replies
- pq
  
  2010-02-26 00:20
  User since
  2003-08-04
  12208 Artikel
  Admin1
  siehe Nested_Sets und http://www.klempert.de/nested_sets/artikel/
  
  Code: (dl )
  
  1 2 3 4 5 6 7
  
  SELECT n.name, COUNT(*)-1 AS level FROM tree AS n, tree AS p WHERE n.lft BETWEEN p.lft AND p.rgt GROUP BY n.lft ORDER BY n.lft;
  
  damit kriegst du den level. die nummer kannst du dann noch herauskriegen, wenn du nochmals über die einträge iterierst, die du aus der db bekommst.
  
  edit: link zu wikipedia korrigiert
  Last edited: 2010-02-26 01:08:27 +0100 (CET)
  Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
  lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
  - +2 replies
  - pq
    
    2010-02-26 00:47
    User since
    2003-08-04
    12208 Artikel
    Admin1
    
    das könnte dann so aussehen:
    
    Code (perl): (dl )
    
    1 2 3 4 5 6 7 8 9 10 11 12
    
    my @levels; while (my $row = $sth->fetchrow_hashref) { my $level = $row->{level}; $levels[$level]++; local $" = "."; print "@levels[0 .. $level] $row->{ident}\n"; } __END__ 1 root 1.1 a 1.1.1 b 1.2 c
    
    Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
    lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
    - pktm
      
      2010-02-26 01:00
      
      User since
      2003-08-07
      2921 Artikel
      BenutzerIn
      
      GÖTTLICH! Vielen Dank!
      http://www.intergastro-service.de (mein erstes CMS :) )

View all threads created 2010-02-26 00:04.