Нужен пример чтения БД и заполнения формы

function exarr($a) {
    $r = '<ul>';
    foreach($a as $k=>$v) {
        $r .= '<li>['.$k.'] = '.$v;
        if(is_array($v)) $r .= exarr($v);
        $r .= '</li>';
    }
    $r .= '</ul>';
    return $r;
}

//drupal_set_message(exarr($form));
    //drupal_set_message(exarr($form_state));

function object_form(){
global $user;
$uid = $user->uid;
$form['help'] = array(
    '#type' => 'fieldset',
    '#title' => 'Помощь',
    '#collapsible' => TRUE,
    '#collapsed' => TRUE,
  );
 
$content = '<ul><li>Список материальных ценностей</li>' .
        '<li>Для удаления или редактирования данных нажмите соответсвующую кнопку</li>'.
        '<li>Для добавления данных в меню нажмиье кнопку "Добавить"</li></ul>';
 
$form['help']['content']  = array('#type' => 'markup', '#value' => $content);
 
$header = array ('№','Дата','Откуда и по<br /> какому документу', 'Количество','Наименование <br />предметов');
 
$gbquery='SELECT `mat`.`id`,`doc`.`date_add`, `mat`.`doc_name`, `mat`.`poz_kolichestvo`, `doc`.`name` FROM  `ob_materials`  AS `mat`, `ob_document` AS `doc`  
WHERE (`doc`.`uid`='.$uid.') AND (`mat`.`id`=`doc`.`id`)';
$result = db_query($gbquery);
while ($row = db_fetch_object($result)){
    $rows[]=array(
        $row->id,
        $row->date_add,
        $row->doc_name,
        $row->poz_kolichestvo,
        $row->name,
        '<a href="'.url('object/del').'/'.$row->id.'">Удалить</a>',
        '<a href="'.url('object/edit').'/'.$row->id.'">Редактировать</a>'
    );
}
$table = theme_table($header, $rows, $attributes = array('border' => 0), $caption = NULL);
 
$form['object'] = array(
    '#type' => 'fieldset',
    '#title' => 'материальные ценности',
    '#tree' => TRUE,
  );
$form['object']['table'] = array('#type' => 'markup', '#value' => $table);
return $form;
}