get "s_menuebene==0", $db_struktur, "holmenu0a";
$anzds_ebene0 = $_amount_query;
# Ebene0 + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +  #
while(get_next("holmenu0a")){
   $kind0_id = $Id; # DS-ID sichern
   # Ebene1 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ #
   get "s_elternid==$kind0_id sort=s_menupos", $db_struktur, "holmenu1a";
   $anzds_ebene1 = $_amount_query;
   out "\$anzds_ebene1($anzds_ebene1) Untermenüeinträge in Ebene1 - <b>$a_menuname</b>\$Id($Id)<br>";
   while(get_next("holmenu1a")){
   my $einzb = "&nbsp;" x $s_menuebene x 4 ."|-";
   out<<EOF;
      $einzb\$Id($Id) - \$s_menuname($s_menuname) - \$s_menuebene($s_menuebene) - \$s_menupos($s_menupos) - \$s_elternid($s_elternid)
      <br>
EOF
   }