function FindChildren($parent, $level)
 {
     global $flag, $data, $tree_text, $tree_value, $tree_level, $undef_flag;
     for ($i = 0; $i < count($data); $i++) {
         if ($data[$i]['reference'] == $parent and !isset($flag[$i])) {
             $tree_value[] = $data[$i]['value'];
             $tree_text[] = aux::mkIndent($level) . $data[$i]['text'];
             $tree_level[] = $level;
             $flag[$i] = true;
             aux::FindChildren($data[$i]['value'], $level + 1);
         }
     }
 }